diff --git a/ansi-tests/misc.lsp b/ansi-tests/misc.lsp
index 855ef67685903b834b23e73b813fa16c1a0b0b4a..20c1620e22b44285526f1ef7ebf97fd4e803a05f 100644
--- a/ansi-tests/misc.lsp
+++ b/ansi-tests/misc.lsp
@@ -11272,3 +11272,13 @@ Broken at C::WT-MAKE-CLOSURE.
     (funcall (compile nil form) 1861 x))
   -17045.0)
 
+;;; sbcl (x86 linux) 0.9.10.48
+;;;  The value 35182846 is not of type (INTEGER 35182846 35182846).
+
+(deftest misc.634
+  (let ((form '(lambda (p2)
+		 (declare (optimize (speed 0) (safety 3) (debug 3) (space 2))
+			  (type number p2))
+		 (- -83659.0 (the (member 35182846) p2)))))
+    (funcall (compile nil form) 35182846))
+  #.(- -83659.0 35182846))