summaryrefslogtreecommitdiff
path: root/Lisp/libobjcl.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2007-09-16 01:21:31 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2007-09-16 01:21:31 +0200
commit319cdb79ca6ca45c9b2912ead651dffcf35ecbf5 (patch)
treeb2fd4e57953fb050316c74f818d23dff565b8b01 /Lisp/libobjcl.lisp
parent6a82b0dd5fd0f087ecda5923c6ae93fcea806141 (diff)
Add test cases for PRIMITIVE-INVOKE and fix some stupid bugs.
darcs-hash:d1f3e7e599cad38b28c45448adeec9126d043e05
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 6cb9759..978bcfe 100644
--- a/Lisp/libobjcl.lisp
+++ b/Lisp/libobjcl.lisp
@@ -28,7 +28,7 @@
(defcfun ("objcl_invoke_method"
%objcl-invoke-method) obj-data
(receiver obj-data)
- (method-selector obj-data)
+ (method-selector :pointer)
(argc :int)
&rest)