diff options
author | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-03 17:30:46 +0100 |
---|---|---|
committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-03 17:30:46 +0100 |
commit | 2e26057818b48da27a5355e2d2101cb8605b840f (patch) | |
tree | cfa916870cdc83e35a12dcabc4ae62c86b63fa2b /Lisp/method-invocation.lisp | |
parent | 68041467b00a878bd7325bf2f385bd58de7a2a20 (diff) |
Implement ADD-METHOD :AFTER (OBJECTIVE-C-GENERIC-FUNCTION OBJECTIVE-C-METHOD).
darcs-hash:16207045b44287e0f3f332937d826d1cc6c44296
Diffstat (limited to 'Lisp/method-invocation.lisp')
-rw-r--r-- | Lisp/method-invocation.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Lisp/method-invocation.lisp b/Lisp/method-invocation.lisp index 03e2ab7..bbbee68 100644 --- a/Lisp/method-invocation.lisp +++ b/Lisp/method-invocation.lisp @@ -313,7 +313,7 @@ easier to use with __apply__. (defun typespec->c-type (typespec) (case (typespec-primary-type typespec) ((:pointer pointer struct union id objective-c-class exception array - selector) + selector :id :class :exception :selector) :pointer) ((:string) :string) (otherwise (typespec-primary-type typespec)))) |