diff --git a/make-host-1.lisp b/make-host-1.lisp
index 7d7bcc519..b9c9a52f6 100644
--- a/make-host-1.lisp
+++ b/make-host-1.lisp
@@ -47,7 +47,7 @@
                           (declare (ignore c))
                           (setq warnp 'warning))))
          (with-compilation-unit () ,@forms))
-       (when (and (string>= (cl:lisp-implementation-version) "2")
+       (when (and (string>= (cl:lisp-implementation-version) "2.1")
                   (or warnp style-warnp) *fail-on-warnings*)
          (cerror "Proceed anyway"
                  "make-host-1 stopped due to unexpected ~A." (or warnp style-warnp))))