diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2007-09-23 03:23:01 +0200 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2007-09-23 03:23:01 +0200 |
| commit | 0544272da832227ad04ae1a48c478a166e81077d (patch) | |
| tree | 6cd047f1737c31361b32ae58370ed25776e509ab /Lisp/init.lisp | |
| parent | 7765ad52e00034edd23bb09bade83d8b282f8040 (diff) | |
Make memory management a lot saner.
darcs-hash:274be9f0ed5fa33e5e883d7b3df57f00c567e777
Diffstat (limited to 'Lisp/init.lisp')
| -rw-r--r-- | Lisp/init.lisp | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Lisp/init.lisp b/Lisp/init.lisp index a56d2e2..f965995 100644 --- a/Lisp/init.lisp +++ b/Lisp/init.lisp @@ -4,6 +4,8 @@ (eval-when (:load-toplevel) (unless (boundp '+nil+) + ;; As nil is never deallocated, we can safely use MAKE-INSTANCE + ;; here. (defconstant +nil+ (make-instance 'id :pointer (objcl-get-nil)))) (unless (boundp '+yes+) |