diff options
| author | Case Duckworth | 2024-03-19 22:20:42 -0500 |
|---|---|---|
| committer | Case Duckworth | 2024-03-19 22:20:42 -0500 |
| commit | dd483e481c5cb5e2bf5aa7fba21bdb1a2d85fc9c (patch) | |
| tree | 99e391db9f209f7fca8db8e9aa8edbbb05cff28d /base.lua | |
| parent | A new start! (diff) | |
| download | lam-new-start.tar.gz lam-new-start.zip | |
Remove need for `lambda` to include an implicit `begin` new-start
This way i can write begin in terms of lambda
Diffstat (limited to 'base.lua')
| -rw-r--r-- | base.lua | 8 |
1 files changed, 0 insertions, 8 deletions
| diff --git a/base.lua b/base.lua index 9c5b5b7..6dc71e4 100644 --- a/base.lua +++ b/base.lua | |||
| @@ -5,14 +5,6 @@ local type = require "type" | |||
| 5 | local isNull = type.isNull | 5 | local isNull = type.isNull |
| 6 | 6 | ||
| 7 | base.env = { | 7 | base.env = { |
| 8 | begin = | ||
| 9 | function (r) | ||
| 10 | local r = r | ||
| 11 | while not isNull(r.cdr) do | ||
| 12 | r = r.cdr | ||
| 13 | end | ||
| 14 | return r.car | ||
| 15 | end, | ||
| 16 | ["+"] = | 8 | ["+"] = |
| 17 | function (r) | 9 | function (r) |
| 18 | local r, a = r, 0 | 10 | local r, a = r, 0 |