(SETF GENERIC-FUNCTION) is now a generic function.

This commit is contained in:
Juan Jose Garcia Ripoll 2013-01-12 10:16:09 +01:00
parent f7afeb4c34
commit 7c9ee7bd78

View file

@ -324,3 +324,6 @@ their lambda lists ~A and ~A are not congruent."
(function-to-method 'find-method-combination
'((gf standard-generic-function) method-combination-type-name method-combination-options))
(function-to-method '(setf generic-function-name)
'((name t) (gf generic-function)))