diff options
author | Rich Hickey <richhickey@gmail.com> | 2006-04-29 21:00:26 +0000 |
---|---|---|
committer | Rich Hickey <richhickey@gmail.com> | 2006-04-29 21:00:26 +0000 |
commit | afc0139caa18f577971fbdfc2a16f35f6c9f44a1 (patch) | |
tree | 3babdcbf5a2fa8dff85252d9743ec27b9d828711 /src/lisp/test.lisp | |
parent | 8e01cb19d1f2ed95b88c040457a622325dedc158 (diff) |
added let. let*
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 |