From e49885190142d1655cd4358d402dba5237445409 Mon Sep 17 00:00:00 2001 From: Matthias Benkard Date: Thu, 6 Mar 2008 23:34:26 +0100 Subject: Remove a bunch of DEFINE-OBJECTIVE-C-GENERIC-FUNCTION calls. darcs-hash:83d1f95687bb761a7fb70c1a901722d4cd2c5caf --- Lisp/method-definition.lisp | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'Lisp/method-definition.lisp') 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 -- cgit v1.2.3