diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp
index 82e5955..6f4abb8 100644
--- a/src/lisp/test.lisp
+++ b/src/lisp/test.lisp
@@ -1,7 +1,12 @@
 (defun two-plus-two ()
   (+ 2 2))
 
-(defun main ()
+(defun hmm-main ()
   (print "64 / (2 + 2) =")
   (print (/ 64 (two-plus-two)))
   (print nil))
+
+(defun main ()
+  (if t
+    (print 1)
+    (print 2)))