The Lambda Lab
/
projects
/
scheme.forth.jl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Debugging.
[scheme.forth.jl.git]
/
scheme.4th
diff --git
a/scheme.4th
b/scheme.4th
index
d075e81
..
4dee70f
100644
(file)
--- a/
scheme.4th
+++ b/
scheme.4th
@@
-126,8
+126,6
@@
create-symbol ok ok-symbol
\ ---- Environments ---- {{{
-objvar global-env
-
: enclosing-env ( env -- env )
cdr ;
@@
-238,6
+236,10
@@
objvar env
hide env
+objvar global-env
+nil nil nil extend-env
+global-env setobj
+
\ }}}
\ ---- Read ---- {{{