emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] feature/byte-switch fbe6b90 3/3: * lisp/emacs-lisp/bytecom


From: Vibhav Pant
Subject: [Emacs-diffs] feature/byte-switch fbe6b90 3/3: * lisp/emacs-lisp/bytecomp.el: Fix errors with matching quoted forms
Date: Thu, 19 Jan 2017 17:44:55 +0000 (UTC)

branch: feature/byte-switch
commit fbe6b90b0ced594cf74d5fd0dc9a32666f0d7d38
Author: Vibhav Pant <address@hidden>
Commit: Vibhav Pant <address@hidden>

    * lisp/emacs-lisp/bytecomp.el: Fix errors with matching quoted forms
    
    * lisp/emacs-lisp/bytecomp.el: (byte-compile-cond-jump-table-info)
      eval obj2 to avoid quoted forms being stored as is.
---
 lisp/emacs-lisp/bytecomp.el |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 74d135d..cb23569 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -4005,7 +4005,7 @@ that suppresses all warnings during execution of BODY."
                         (eq obj1 prev-var)
                         ;; discard duplicate clauses
                         (not (assq obj2 cases)))
-                   (push (list obj2 body) cases)
+                   (push (list (eval obj2) body) cases)
                  (if (eq condition t)
                      (progn (push (list 'default body) cases)
                             (throw 'break t))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]