diff options
Diffstat (limited to 'basic.lsp')
-rw-r--r-- | basic.lsp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/basic.lsp b/basic.lsp index 09efc5c..a91cc1c 100644 --- a/basic.lsp +++ b/basic.lsp @@ -9,7 +9,7 @@ (defclass <exp-int> (<expression>) ((int :accessor int))) (defclass <exp-var> (<expression>) ((var :accessor var))) (defclass <exp-str> (<expression>) ((str :accessor str))) -(defclass <exp-unr> (<expression>) ((op :accessor op) (exp :accessor exp))) +(defclass <exp-unr> (<expression>) ((op :accessor op) (expr :accessor expr))) (defclass <exp-bin> (<expression>) ((exp1 :accessor exp1) (op :accessor op) (exp2 :accessor exp2))) (defclass <command> () () (:abstractp t)) @@ -268,6 +268,7 @@ ;;;; Program evaluation (defun run (state) + ) ;;; Finishing touches |