X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fgeneric-functions.lisp;h=73462f16c6fe6206bba852a20c4524585010fa4a;hb=992e6a70a0cae3f6d43bdbba18f77306fdf10662;hp=34f398193e3f0e9ef92c693082feb54e3f6353c0;hpb=2d237dbc3edb1f6f5337ab19dd74a317e43234db;p=sbcl.git

diff --git a/src/pcl/generic-functions.lisp b/src/pcl/generic-functions.lisp
index 34f3981..73462f1 100644
--- a/src/pcl/generic-functions.lisp
+++ b/src/pcl/generic-functions.lisp
@@ -76,8 +76,6 @@
 
 (defgeneric class-precedence-list (pcl-class))
 
-(defgeneric class-predicate-name (class))
-
 (defgeneric class-wrapper (pcl-class))
 
 (defgeneric definition-source (definition-source-mixin))
@@ -106,7 +104,7 @@
 
 (defgeneric method-combination-options (standard-method-combination))
 
-(defgeneric method-combination-type (standard-method-combination))
+(defgeneric method-combination-type-name (standard-method-combination))
 
 (defgeneric method-fast-function (standard-method))