commit | 8b5ec7a9a45e19ceb7633371fa19f1fa6e7252cd | [log] [tgz] |
---|---|---|
author | swissChili <swisschili@fastmail.com> | Fri Aug 05 22:26:17 2022 -0700 |
committer | swissChili <swisschili@fastmail.com> | Fri Aug 05 22:26:17 2022 -0700 |
tree | 59ad2db72eca30cc6d59253cd0baa40be229bd3b | |
parent | 3e57d7c3f70371f9acf95326c2f5c2cd0e8d2d15 [diff] [blame] |
Add low-level class support, stub of high level OOP wrapper
diff --git a/src/lisp/test-oop.lisp b/src/lisp/test-oop.lisp new file mode 100644 index 0000000..40c7b9b --- /dev/null +++ b/src/lisp/test-oop.lisp
@@ -0,0 +1,4 @@ +(defclass person (name age)) + +(defun main () + (print (make-person "john" 30)))