From: Alan Mackenzie <acm@muc.de>
Date: Tue, 24 Nov 2015 12:40:39 +0000 (+0000)
Subject: Byte compile: Output an error, not a warning, for odd number of args to setq
X-Git-Tag: emacs-25.0.90~664
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a67cc630db28cf734d0e47f231add30c782bd8cf;p=emacs.git

Byte compile: Output an error, not a warning, for odd number of args to setq

* lisp/emacs-lisp/bytecomp.el (byte-compile-setq): Amend.
---

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))