REMOVE-METHOD was inlined, instead of being invoked through its generic function.

This commit is contained in:
Juan Jose Garcia Ripoll 2012-12-03 00:42:31 +01:00
parent aeb5563ea5
commit 645090b557

View file

@ -128,7 +128,8 @@
t))))
(defun add-method (gf method)
(declare (notinline method-qualifiers)) ; during boot it's a structure accessor
;; during boot it's a structure accessor
(declare (notinline method-qualifiers remove-method))
;;
;; 1) The method must not be already installed in another generic function.
;;