Fix to macro-expand

db4
James Cash 2008-06-07 21:08:14 -04:00
parent 2a92f454a6
commit d7e8d65d81
1 changed files with 1 additions and 1 deletions

View File

@ -113,7 +113,7 @@ PRIVATE>
call ; inline
: macro-expand ( cons -- quot )
uncons [ list>seq [ ] like ] [ lookup-macro macro-call compile-form ] bi* ;
uncons [ list>seq [ ] like ] [ lookup-macro ] bi* call compile-form ;
: lisp-string>factor ( str -- quot )
lisp-expr parse-result-ast compile-form ;