Constant-diadic lambdas work now, just need to get vararg lambdas and macros
parent
e6c9a3dfa5
commit
2487ff9c8c
extra/lisp
|
@ -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 1quotation ;
|
||||
localize-lambda <lambda> lambda-rewrite [ compose call call ] compose 1quotation ;
|
||||
PRIVATE>
|
||||
|
||||
: convert-lambda ( cons -- quot )
|
||||
|
|
Loading…
Reference in New Issue