| commit | 8fc5e2f3da976b6808039bd4bc39eb19fe24a4c5 | [log] [tgz] |
|---|---|---|
| author | swissChili <swisschili@fastmail.com> | Thu Apr 22 13:45:10 2021 -0700 |
| committer | swissChili <swisschili@fastmail.com> | Thu Apr 22 13:45:10 2021 -0700 |
| tree | 759a055512638df297f6055b80593c57bbc0d0f4 | |
| parent | 6aff2bba2f55c6a58ac8198964e8825b625cde1c [diff] [blame] |
Add compile_tl (), compile `defun's
diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp index a4836eb..68cc615 100644 --- a/src/lisp/test.lisp +++ b/src/lisp/test.lisp
@@ -1,5 +1,6 @@ -(defun my-fun (a b) - (display t "%a\n" (+ a b))) +(defun two-plus-two () + (+ 2 2)) (defun main () - (my-fun pi 4 773832)) + (print "64 / (2 + 2) =") + (print (/ 64 (two-plus-two))))