[Emacs-diffs] emacs-25 af40b76: Byte Compiler: generate code to adjust stack count after call to `signal'.

[Alan Mackenzie]

branch: emacs-25
commit af40b7689a768f8a4b931d9c655c9c8bdba9393e
Author: Alan Mackenzie <address@hidden>
Commit: Alan Mackenzie <address@hidden>

    Byte Compiler: generate code to adjust stack count after call to `signal'.
    
    Corrects change from earlier today.
    
    * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): supply the current value 
of
    `byte-compile--for-effect' as argument to `byte-compile-form'.
---
 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 ffe73de..8fd2594 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)))