added interpreter again

This commit is contained in:
2024-08-09 15:01:12 +03:00
parent e7b5f4fec7
commit 9f9956e889
3 changed files with 75 additions and 2 deletions

View File

@@ -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 ()