diff options
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 |