diff options
Diffstat (limited to 'src/lisp/test.lisp')
| -rw-r--r-- | src/lisp/test.lisp | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp index 40d45822..2594cc33 100644 --- a/src/lisp/test.lisp +++ b/src/lisp/test.lisp @@ -20,9 +20,14 @@ (:foo x)) (defn fl (a b c) - (let ((d b) - d)) - (let ((e c) - e))) + (let ((d (let ((x a)) x))) + d) + (let ((e c)) + e)) + +(defn fl* (a b c) + (let* ((d b) + (e d)) + e)) (defn fr (a b & c) c)
\ No newline at end of file |