summaryrefslogtreecommitdiff
path: root/Lisp/libobjcl.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-03-03 18:33:47 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-03-03 18:33:47 +0100
commitb47bc1b65a3db942bb7e7b2e9b62ddc92d98ca8f (patch)
treef287eb9dde13cbe24360f0be7b83716d6287738c /Lisp/libobjcl.lisp
parent7736eab7d8a7b415dba3676a495c0ac3b2e28020 (diff)
Avoid calling objcl_class_name on unregistered classes.
darcs-hash:ea38f791e7f2bdc840e92709e1b915d985cc9700
Diffstat (limited to 'Lisp/libobjcl.lisp')
-rw-r--r--Lisp/libobjcl.lisp1
1 files changed, 1 insertions, 0 deletions
diff --git a/Lisp/libobjcl.lisp b/Lisp/libobjcl.lisp
index f13d298..394672e 100644
--- a/Lisp/libobjcl.lisp
+++ b/Lisp/libobjcl.lisp
@@ -162,6 +162,7 @@
(defcfun ("objcl_add_method" %objcl-add-method) :void
(class :pointer)
+ (class-name :string)
(method-name :pointer)
(callback :pointer)
(argc :int)