diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-07 01:21:01 +0100 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-07 01:21:01 +0100 |
| commit | 2ce1f6788979af805f4ef40ee06c3f38cd22f4ab (patch) | |
| tree | 97e00fe8df2afbd7f1e381768466e574102da8b5 | |
| parent | ad9ece8b32dcf6a7b0fee2e1503b6cc0be66003f (diff) | |
Call ENSURE-GENERIC-FUNCTION-USING-CLASS at compile-time as well.
darcs-hash:ac21bf3688413d3cd95cc68748f3a68546c586d6
| -rw-r--r-- | Lisp/method-definition.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Lisp/method-definition.lisp b/Lisp/method-definition.lisp index ec3138c..b4d5835 100644 --- a/Lisp/method-definition.lisp +++ b/Lisp/method-definition.lisp @@ -216,7 +216,7 @@ __super__" '#:objective-c-methods))) (return `(progn - (eval-when (:load-toplevel :execute) + (eval-when (:compile-toplevel :load-toplevel :execute) (unless (fboundp ',real-name) ;; Note that we need not specify a ;; :LAMBDA-LIST here, as not supplying |