summaryrefslogtreecommitdiff
path: root/Lisp/libobjcl.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-03-18 22:48:38 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-03-18 22:48:38 +0100
commit0c1a8882f03cdaf283e4289a3d2c5d89a1c01199 (patch)
treea642e2d59547a38639647fe2b8b57cfaa8236512 /Lisp/libobjcl.lisp
parent4fdf935d2221eb659827fe9714a19d956ecff253 (diff)
Fix support for older versions of CFFI.
darcs-hash:2f77404ae69521fa59b974123814e7f008692d37
Diffstat (limited to 'Lisp/libobjcl.lisp')
-rw-r--r--Lisp/libobjcl.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/Lisp/libobjcl.lisp b/Lisp/libobjcl.lisp
index de325cb..421c014 100644
--- a/Lisp/libobjcl.lisp
+++ b/Lisp/libobjcl.lisp
@@ -1005,7 +1005,7 @@ __enable-method-syntax__.
(defun objcl-class-backed-by-lisp-class-p/pointer (class-ptr)
(not (zerop (%objcl-class-backed-by-lisp-class-p class-ptr))))
-#? c-pointer t ->
+#? c-pointer t -> &rest t
(defun objcl-class-set-backed-by-lisp-class/pointer (class-ptr backed-p)
(%objcl-class-set-backed-by-lisp-class class-ptr (if backed-p 1 0)))