diff options
Diffstat (limited to 'main.lisp')
| -rw-r--r-- | main.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -13,12 +13,12 @@ ;; (format t "~s~%" program) ;; (generate-program program :compile t))) (generate-program (make-program (second args)) :compile t)) - ((string= flag "-i") - (interpret-program (make-program (second args)))) ((string= flag "-p") (format t "~a" (make-program (second args)))) ((string= flag "-t") (run-tests)) + ((string= flag "-s") + (simulate-program (make-program (second args)))) (t (format t "~a is not a valid flag~%" flag)))))) ;; (defun make-exe () |