summaryrefslogtreecommitdiff
path: root/Lisp/method-invocation.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'Lisp/method-invocation.lisp')
-rw-r--r--Lisp/method-invocation.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/Lisp/method-invocation.lisp b/Lisp/method-invocation.lisp
index 08e0dac..3170670 100644
--- a/Lisp/method-invocation.lisp
+++ b/Lisp/method-invocation.lisp
@@ -386,7 +386,8 @@ easier to use with __apply__.
(defun typespec->c-type (typespec)
(case (car typespec)
- ((:pointer struct union id objective-c-class exception array selector)
+ ((:pointer pointer struct union id objective-c-class exception array
+ selector)
:pointer)
((:string) :string)
(otherwise (car typespec))))