diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index b29e77b14b5..5e6df282b3f 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -3713,9 +3713,9 @@ discarding."
     (if args
 	(while args
 	  (if (eq (length args) 1)
-              (byte-compile-warn
-               "missing value for `%S' at end of setq"
-               (car args)))
+              (byte-compile-log-warning
+               (format "missing value for `%S' at end of setq" (car args))
+               nil :error))
           (byte-compile-form (car (cdr args)))
 	  (or byte-compile--for-effect (cdr (cdr args))
 	      (byte-compile-out 'byte-dup 0))