From: Stas Boukarev <stassats@gmail.com>
Date: Sun, 22 Jan 2012 03:21:10 +0000 (+0800)
Subject: maybe-update-info-for-gf: Use KEYWORD-SPEC-NAME for keyword parameters.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=26d8f7707843aba4ba2a071b3b2d4c91e8c0d798;hp=6548750bc1ca4d832afed1744cdc7133b232c6f2;p=sbcl.git

maybe-update-info-for-gf: Use KEYWORD-SPEC-NAME for keyword parameters.

Use KEYWORD-SPEC-NAME instead of KEYWORDICATE to handle keyword
parameter definitions like ((:keyword var) default).

Patch by Andy Hefner.
---

diff --git a/src/pcl/methods.lisp b/src/pcl/methods.lisp
index 7efb80d..c1e5fc4 100644
--- a/src/pcl/methods.lisp
+++ b/src/pcl/methods.lisp
@@ -635,7 +635,7 @@
                                       (remove-duplicates
                                        (nconc
                                         (mapcan #'function-keywords methods)
-                                        (mapcar #'keywordicate gf.keys))))))
+                                        (mapcar #'keyword-spec-name gf.keys))))))
                                 (when all-keys
                                   (setq keysp t)
                                   `(&key ,@all-keys))))