commit | 7e1393c8f962e222d61a84f4f78e30ce028dc45b | [log] [tgz] |
---|---|---|
author | swissChili <swisschili@fastmail.com> | Wed Jul 07 12:59:12 2021 -0700 |
committer | swissChili <swisschili@fastmail.com> | Wed Jul 07 12:59:12 2021 -0700 |
tree | a90ccdaa57067c7ec7b843f636759540cd224953 | |
parent | 15f1caee9d71a13069ce1cfa652e4767b1c4c189 [diff] |
Add (read), improve error reporting
diff --git a/lib/lisp/repl/repl.lisp b/lib/lisp/repl/repl.lisp new file mode 100644 index 0000000..97206dd --- /dev/null +++ b/lib/lisp/repl/repl.lisp
@@ -0,0 +1,9 @@ +(defun repl () + (let1 (val (read)) + (when val + (print (eval val)) + (repl)))) + +(defun main () + (print "Welcome to the Bluejay REPL!") + (repl))