diff options
| author | Darren Bane <darren.bane@gmail.com> | 2020-08-09 00:09:30 +0100 |
|---|---|---|
| committer | Darren Bane <darren.bane@gmail.com> | 2020-08-09 00:09:30 +0100 |
| commit | 005aa834772ecb16fce512c05821db862cef8b95 (patch) | |
| tree | 9bce6f1d2c2227384f8e3ef8a92319a1b54f1396 | |
| parent | 1167e1207e3c0928f04aa3ed51fc315fb5b8729a (diff) | |
| download | lsp-005aa834772ecb16fce512c05821db862cef8b95.tar.gz | |
Merge in changes from the Mac
| -rw-r--r-- | cbasic.lisp | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/cbasic.lisp b/cbasic.lisp index 99220fb..ddbd900 100644 --- a/cbasic.lisp +++ b/cbasic.lisp @@ -16,4 +16,9 @@ (defun main () (catch 'end (lambda () - (format (standard-output) "BASIC version 0.1 + (format (standard-output) "BASIC version 0.1~%~%") + (for ((st (create (class <state>)))) + (()) + (format (standard-output) "> ") + (catch 'error (one-command st))))) + (format (standard-output) "See you later...~%")) |