0.pre7.49:

[sbcl.git] / src / compiler / checkgen.lisp

diff --git a/src/compiler/checkgen.lisp b/src/compiler/checkgen.lisp
index 92f4f13..635960b 100644 (file)
--- a/src/compiler/checkgen.lisp
+++ b/src/compiler/checkgen.lisp
@@ -489,8 +489,7 @@
                    (mark-error-continuation cont)
                    (unless (policy node (= inhibit-warnings 3))
                      (do-type-warning use))))))
-           (when (and (eq type-check t)
-                      (not *byte-compiling*))
+           (when (eq type-check t)
              (cond ((probable-type-check-p cont)
                     (conts cont))
                    (t