diff --git a/ansi-tests/misc.lsp b/ansi-tests/misc.lsp
index 37cc5321e4afc69db179bba74c1af8e0e71ff654..d0f2aef0bb0003e75d84759cae50c0c75ca49f31 100644
--- a/ansi-tests/misc.lsp
+++ b/ansi-tests/misc.lsp
@@ -11593,3 +11593,16 @@ Broken at C::WT-MAKE-CLOSURE.
 			 0))))
     (funcall (compile nil form) 2582756596))
   0)
+
+;;; sbcl 0.9.13.8 (x86 linux)
+;;; VALUES type illegal in this context:  *
+
+(deftest misc.649
+  (let ((form '(lambda (p2)
+		 (declare (optimize (speed 0) (safety 0) (debug 2) (space 2))
+			  (type (member integer *) p2))
+		 (coerce 523242 p2))))
+    (funcall (compile nil form) 523242))
+  523242)
+
+