1.0.32.12: Fix slot-value on specialized parameters in SVUC methods

[sbcl.git] / src / code / eval.lisp

diff --git a/src/code/eval.lisp b/src/code/eval.lisp
index f639dd7..ac9718f 100644 (file)
--- a/src/code/eval.lisp
+++ b/src/code/eval.lisp
@@ -130,7 +130,7 @@
         (typecase exp
           (symbol
            (ecase (info :variable :kind exp)
-             ((:special :global :constant)
+             ((:special :global :constant :unknown)
               (symbol-value exp))
              ;; FIXME: This special case here is a symptom of non-ANSI
              ;; weirdness in SBCL's ALIEN implementation, which could