commit 67bdf283275b17c4a845eba56f3505b14000ce26
author swissChili <swisschili@fastmail.com> Sun Jun 06 18:46:08 2021 -0700
committer swissChili <swisschili@fastmail.com> Sun Jun 06 18:46:08 2021 -0700
tree a79f61fb8185517f304df7d79d96a9373a1c60bb
parent 1b83922e871119a47bc12b7b334dc73942a0b9b8

Add let1

src/lisp/test.lisp

diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp
index 08b96ba..32152f1 100644
--- a/src/lisp/test.lisp
+++ b/src/lisp/test.lisp
@@ -1,7 +1,12 @@
 (defun add-two (a)
   (+ a 2))
 
-(defun main ()
+(defun main-old ()
   (if t
     (print (add-two (* 4 3)))
     (print (- 3 6))))
+
+(defun main()
+  (let1 (a 3)
+    (print "a is")
+    (print a)))
\ No newline at end of file