0.6.11.13:

[sbcl.git] / src / compiler / debug-dump.lisp

diff --git a/src/compiler/debug-dump.lisp b/src/compiler/debug-dump.lisp
index 60169da..c852972 100644 (file)
--- a/src/compiler/debug-dump.lisp
+++ b/src/compiler/debug-dump.lisp
@@ -441,7 +441,7 @@
                (cond (info
                       (case (arg-info-kind info)
                         (:keyword
-                         (res (arg-info-keyword info)))
+                         (res (arg-info-key info)))
                         (:rest
                          (res 'rest-arg))
                         (:more-context