diff options
author | Darren Bane <darren.bane@gmail.com> | 2021-05-14 23:47:35 +0100 |
---|---|---|
committer | Darren Bane <darren.bane@gmail.com> | 2021-05-14 23:47:35 +0100 |
commit | af38818bb582e212b5f52566a71cede0d1675d29 (patch) | |
tree | c35d0b1e3fb12e94d8af6b7080ad532e0169e69d /basic.lsp | |
parent | 0c2561d21d59254669dea0b662946d82fcc7c50c (diff) | |
download | lsp-af38818bb582e212b5f52566a71cede0d1675d29.tar.gz |
Making changes
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 |