Minor edits

db4
James Cash 2008-06-05 20:38:12 -04:00
parent 887b385250
commit 9a0484b3a5
2 changed files with 3 additions and 4 deletions

View File

@ -9,8 +9,8 @@ IN: lisp
DEFER: convert-form
DEFER: funcall
DEFER: lookup-var
DEFER: lisp-macro?
DEFER: lookup-macro
DEFER: lisp-macro?
DEFER: macro-expand
DEFER: define-lisp-macro
@ -110,10 +110,9 @@ PRIVATE>
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
SYMBOL: lisp-env
ERROR: no-such-var variable-name ;
SYMBOL: macro-env
ERROR: no-such-var variable-name ;
M: no-such-var summary drop "No such variable" ;
: init-env ( -- )

View File

@ -8,7 +8,7 @@ IN: lists
MIXIN: list
GENERIC: car ( cons -- car )
GENERIC: cdr ( cons -- cdr )
GENERIC: nil? ( cons -- ? )
GENERIC: nil? ( object -- ? )
TUPLE: cons car cdr ;