summaryrefslogtreecommitdiff
path: root/Lisp/data-types.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2007-09-15 23:52:00 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2007-09-15 23:52:00 +0200
commitd9ac18064cf40f6fbbb09ec8ca74de212c012326 (patch)
treed76e3158d597d7df2b0f53bd8ce7d97c8898b1c6 /Lisp/data-types.lisp
parent73ca06d6c103bae75e837e2966c757a42d3a7969 (diff)
Reimplement PRIMITIVE-INVOKE and rename the old version UNSAFE-PRIMITIVE-INVOKE.
darcs-hash:a941bade2677db3d5773c20ffda171c7c9721a98
Diffstat (limited to 'Lisp/data-types.lisp')
-rw-r--r--Lisp/data-types.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/Lisp/data-types.lisp b/Lisp/data-types.lisp
index 6f66e8c..c757070 100644
--- a/Lisp/data-types.lisp
+++ b/Lisp/data-types.lisp
@@ -42,7 +42,7 @@
((pointer :type c-pointer
:reader pointer-to
:initarg :pointer
- :initform nil)))
+ :initform (cffi:null-pointer))))
(defclass selector (c-pointer-wrapper) ()