]> gitweb.factorcode.org Git - factor.git/commitdiff
Minor changes, still trying to get lisp working
authorJames Cash <james.nvc@gmail.com>
Sat, 26 Jul 2008 22:23:01 +0000 (18:23 -0400)
committerJames Cash <james.nvc@gmail.com>
Sun, 24 Aug 2008 03:13:31 +0000 (23:13 -0400)
extra/lisp/lisp.factor

index 8e5322b0bec25b54319704a3a8a761758be983f2..9386e63cc6c8451fed12da2f1933faf4f01018e2 100644 (file)
@@ -49,7 +49,7 @@ DEFER: define-lisp-macro
     swap '[ , cut '[ @ , seq>list ] call , call ] ;
 
 : normal-lambda ( body vars -- quot )
-    localize-lambda <lambda> lambda-rewrite [ compose call ] compose ;
+    localize-lambda <lambda> lambda-rewrite [ compose call ] compose 1quotation ;
 PRIVATE>
 
 : convert-lambda ( cons -- quot )