From a7f385ef1213aac80918a5b03e76f1c38e896fdb Mon Sep 17 00:00:00 2001 From: James Cash Date: Sat, 26 Jul 2008 18:23:01 -0400 Subject: [PATCH] Minor changes, still trying to get lisp working --- extra/lisp/lisp.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/lisp/lisp.factor b/extra/lisp/lisp.factor index 8e5322b0be..9386e63cc6 100644 --- a/extra/lisp/lisp.factor +++ b/extra/lisp/lisp.factor @@ -49,7 +49,7 @@ DEFER: define-lisp-macro swap '[ , cut '[ @ , seq>list ] call , call ] ; : normal-lambda ( body vars -- quot ) - localize-lambda lambda-rewrite [ compose call ] compose ; + localize-lambda lambda-rewrite [ compose call ] compose 1quotation ; PRIVATE> : convert-lambda ( cons -- quot )