diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-06 23:34:26 +0100 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-06 23:34:26 +0100 |
| commit | e49885190142d1655cd4358d402dba5237445409 (patch) | |
| tree | 2f34046ca25848136648d1b931367730e0d1db2f /Lisp/method-definition.lisp | |
| parent | 016f543b4726b8c46415c78eb0efea86488a4641 (diff) | |
Remove a bunch of DEFINE-OBJECTIVE-C-GENERIC-FUNCTION calls.
darcs-hash:83d1f95687bb761a7fb70c1a901722d4cd2c5caf
Diffstat (limited to 'Lisp/method-definition.lisp')
| -rw-r--r-- | Lisp/method-definition.lisp | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Lisp/method-definition.lisp b/Lisp/method-definition.lisp index 7c9c75f..9541a49 100644 --- a/Lisp/method-definition.lisp +++ b/Lisp/method-definition.lisp @@ -217,6 +217,11 @@ __super__" `(progn (eval-when (:load-toplevel :execute) (unless (fboundp ',real-name) + ;; Note that we need not specify a + ;; :LAMBDA-LIST here, as not supplying + ;; it means it's simply going to be + ;; initialised when a method is first + ;; added to the generic function. (ensure-generic-function ',real-name :generic-function-class |