diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp
index ee6773e..2ddedd8 100644
--- a/src/lisp/test.lisp
+++ b/src/lisp/test.lisp
@@ -1,2 +1,5 @@
 (defun my-fun (a b)
   (display t "%a\n" (+ a b)))
+
+(defun main ()
+  (my-fun pi four))