diff options
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index ffe73defcbb..8fd2594fec8 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -3749,7 +3749,8 @@ discarding." (format "missing value for `%S' at end of setq" (car (last args))) nil :error) (byte-compile-form - `(signal 'wrong-number-of-arguments '(setq ,len)))) + `(signal 'wrong-number-of-arguments '(setq ,len)) + byte-compile--for-effect)) (if args (while args (byte-compile-form (car (cdr args))) |