diff options
Diffstat (limited to 'src/boot/strap')
| -rw-r--r-- | src/boot/strap/translator.clisp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/boot/strap/translator.clisp b/src/boot/strap/translator.clisp index 06af9992..0b7eb64b 100644 --- a/src/boot/strap/translator.clisp +++ b/src/boot/strap/translator.clisp @@ -551,8 +551,7 @@ (RETURN (PROGN (SETQ |expr'| - (CDR (CDR (|shoeCompTran| - (LIST 'LAMBDA (LIST '|x|) |expr|))))) + (CDR (CDR (|shoeCompTran| (LIST 'LAMBDA NIL |expr|))))) (LET ((|bfVar#9| |expr'|) (|t| NIL)) (LOOP (COND |