www

commit 0d0e68fbee966473da7ab6a692007d1ab4ece065
parent dabeb07ef4dcbfbabb1e514b4a52eeb86a63b4e0
Author: Georges Dupéron <jahvascriptmaniac+github@free.fr>
Date:   Mon,  1 Nov 2010 16:18:21 +0100

Merge branch 'master' of github:dumbs/2010-m1s1-compilation

Diffstat:
M
lisp2li.lisp
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp2li.lisp b/lisp2li.lisp
@@ -45,7 +45,7 @@ par le compilateur et par l’interpréteur"
          (cons :call (cons 'set-binding (list `(:lit . ,env)
                                               (cons :lit (second expr))
                                               (cons :lit (third expr))))))
-        ((eq 'let (car expr))
+        ((eq 'let (car expr)) ;; Idee de Georges :  (let ((x 1) (y 2) (z 3)) (list x y z)) === ((lambda (x y z) (list x y z)) 1 2 3)
          (push-new-env env "LET")
          (map-lisp2li-let expr env))
         ((macro-function (car expr))