diff --git a/ansi-tests/misc.lsp b/ansi-tests/misc.lsp
index b6f0379228069fcf1f69a98572bff67d1244b60f..215eaf87242f269105cd67a24efea710fd4e911c 100644
--- a/ansi-tests/misc.lsp
+++ b/ansi-tests/misc.lsp
@@ -998,3 +998,41 @@
 		     -12))))
   -12)
 
+;;; cmucl (2003-10-12) "Invalid number of arguments: 2"
+(deftest misc.80
+  (funcall
+   (compile nil
+	    '(lambda (b c)
+	       (declare (notinline > logior imagpart))
+	       (declare (optimize (speed 0) (debug 0)))
+	       (labels ((%f16 ()
+			      (imagpart
+			       (block b3
+				 (logeqv (logior -122516 (if (> -1 0) (return-from b3 c) b))
+					 (return-from %f16 32186310))))))
+		 (lognor (%f16) b))))
+   -123886 -1656)
+  57385)
+
+;;; cmucl (2003-10-12) "NIL is not of type C::REF"
+(deftest misc.81
+  (funcall
+   (compile nil '(lambda (b)
+		   (block b7
+		     (let ((v3 (return-from b7 b)))
+		       (unwind-protect b)))))
+   17)
+  17)
+
+;;; cmucl (2003-10-12) "The assertion C::SUCC failed"
+(deftest misc.82
+  (funcall
+   (compile nil '(lambda (c)
+		   (labels ((%f15 ()
+				  (* (unwind-protect c)
+				     (max -5726369
+					  (return-from %f15 3099206)))))
+		     c)))
+   0)
+  0)
+