diff --git a/ansi-tests/misc.lsp b/ansi-tests/misc.lsp
index 20c1620e22b44285526f1ef7ebf97fd4e803a05f..5adf2e839da16c03b938fa6002e06100350cdfd3 100644
--- a/ansi-tests/misc.lsp
+++ b/ansi-tests/misc.lsp
@@ -11282,3 +11282,17 @@ Broken at C::WT-MAKE-CLOSURE.
 		 (- -83659.0 (the (member 35182846) p2)))))
     (funcall (compile nil form) 35182846))
   #.(- -83659.0 35182846))
+
+;;; sbcl (x86 linux) 0.9.11.4
+;;; Different results
+
+(deftest misc.635
+  (let* ((form '(lambda (p2)
+		 (declare (optimize (speed 0) (safety 1)
+				    (debug 2) (space 2))
+			  (type (member -19261719) p2))
+		 (ceiling -46022.094 p2))))
+    (values (funcall (compile nil form) -19261719)))
+  1)
+
+  
\ No newline at end of file