diff options
Diffstat (limited to 'Lisp/init.lisp')
| -rw-r--r-- | Lisp/init.lisp | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/Lisp/init.lisp b/Lisp/init.lisp index 84ae511..72d616f 100644 --- a/Lisp/init.lisp +++ b/Lisp/init.lisp @@ -1,3 +1,12 @@ (in-package #:mulk.objective-cl) (initialise-runtime) + +(eval-when (:load-toplevel) + (unless (boundp '+nil+) + (defconstant +nil+ + (make-instance 'id :pointer (objcl-get-nil)))) + (unless (boundp '+yes+) + (defconstant +yes+ (objcl-get-yes))) + (unless (boundp '+no+) + (defconstant +no+ (objcl-get-no)))) |