diff --git a/ansi-tests/misc.lsp b/ansi-tests/misc.lsp
index 14222935b663385b967af7a7113ff594a9f1d85b..96fa019da0797a1969de953674282975a726d1aa 100644
--- a/ansi-tests/misc.lsp
+++ b/ansi-tests/misc.lsp
@@ -7158,23 +7158,13 @@ Broken at C::WT-C-INLINE-LOC.
    12851164 182468232812 -2243976802 309299185674 2538150 1855615980)
   0)
 
+;;; abcl (25 May 2004)
+;;; 0 is not of type LIST
 (deftest misc.376
   (funcall
    (compile
     nil
-    '(lambda () ; (a b c d e f g h i)
-       #|
-       (declare (type (integer -3780481450018 4128865857054) a))
-       (declare (type (integer -15 7920255) b))
-       (declare (type (integer -2 1) c))
-       (declare (type (integer -6 157) d))
-       (declare (type (integer -3022 3523491) e))
-       (declare (type (integer -3 18632748) f))
-       (declare (type (integer -4 149) g))
-       (declare (type (integer -22 -1) h))
-       (declare (type (integer -176782576526 -1863239307) i))
-       (declare (ignorable a b c d e f g h i))
-       |#
+    '(lambda ()
        (declare (optimize (speed 1) (space 1) (safety 2) (debug 1)
 			  (compilation-speed 0)))
        (dotimes (iv4 3
@@ -7182,8 +7172,5 @@ Broken at C::WT-C-INLINE-LOC.
 		       (progn (cdr *s6*) 0)))
 	 (floor (rational (let ((*s2*
 				 (rational (common-lisp:handler-case 0))))
-			    0))))))
-   )
+			    0)))))))
   0)
-
-