summaryrefslogtreecommitdiff
path: root/Lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-03-04 23:09:50 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-03-04 23:09:50 +0100
commite06aa593fb25fb4e31e500fec9dc67b9ea842ba1 (patch)
treec6f72614ad598d00d84f46e20d2cd833140a4c2d /Lisp
parente6e947b18ce0b6a5f62523adade5d7ffaefbac59 (diff)
Fix DEFINE-OBJECTIVE-C-GENERIC-FUNCTION.
darcs-hash:57cc807cebf34e1ea2e6367648f436e3af2dfa33
Diffstat (limited to 'Lisp')
-rw-r--r--Lisp/defpackage.lisp1
-rw-r--r--Lisp/method-definition.lisp3
2 files changed, 3 insertions, 1 deletions
diff --git a/Lisp/defpackage.lisp b/Lisp/defpackage.lisp
index 234e3d0..59aa041 100644
--- a/Lisp/defpackage.lisp
+++ b/Lisp/defpackage.lisp
@@ -23,6 +23,7 @@
;; Functions
(:export #:initialise-runtime
#:shutdown-runtime
+ #:install-reader-syntax
#:enable-method-syntax
#:enable-objective-c-syntax
#:disable-method-syntax
diff --git a/Lisp/method-definition.lisp b/Lisp/method-definition.lisp
index 7342c4a..41f1f84 100644
--- a/Lisp/method-definition.lisp
+++ b/Lisp/method-definition.lisp
@@ -88,7 +88,8 @@
,@(unless (position :method-class
options
:key #'car)
- `((:method-class objcl:objective-c-method)))))
+ `((:method-class objcl:objective-c-method)))
+ ,@options))
(defvar *callback-names* (make-hash-table :test #'eql))