diff --git a/general-info/release-20b.txt b/general-info/release-20b.txt
index 7c076bd9d7d57748674b37eb8373d97d03648efa..6c2008926de2878c34c7cc09ade3580db5975dea 100644
--- a/general-info/release-20b.txt
+++ b/general-info/release-20b.txt
@@ -56,6 +56,8 @@ New in this release:
       DECLARATION. 
     - The :METHOD-CLASS argument to ENSURE-GENERIC-FUNCTION can be a
       class object as well as a name.
+    - Recognize but ignore the :DECLARE argument to
+      ENSURE-GENERIC-FUNCTION. 
 
   * Bugfixes:
     - On Unicode builds, printing of '|\|| and '|`| was incorrect
diff --git a/pcl/boot.lisp b/pcl/boot.lisp
index 7fea1003023c348c8250ce79fc89e04f8927a292..2b8ff9abed41b1fb6eb5b2f0544873f3c2e67290 100644
--- a/pcl/boot.lisp
+++ b/pcl/boot.lisp
@@ -25,7 +25,7 @@
 ;;; *************************************************************************
 
 (file-comment
- "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/boot.lisp,v 1.76 2010/04/17 18:31:42 rtoy Exp $")
+ "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/boot.lisp,v 1.77 2010/04/17 19:05:51 rtoy Exp $")
 
 (in-package :pcl)
 (intl:textdomain "cmucl")
@@ -1891,6 +1891,7 @@ work during bootstrapping.
 		   :generic-function-class ,gf-class)))
      (remf ,all-keys :generic-function-class)
      (remf ,all-keys :environment)
+     (remf ,all-keys :declare)
      (let ((combin (getf ,all-keys :method-combination '.shes-not-there.)))
        (unless (eq combin '.shes-not-there.)
 	 (setf (getf ,all-keys :method-combination)