diff options
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 4a418c1aade..8a6e761fe40 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -2384,8 +2384,7 @@ TARGET-BB-SYM is the symbol name of the target block." for insn-seq on (comp-block-insns b) do (pcase insn-seq - (`((set ,(and (pred comp-mvar-p) tmp-mvar) - ,(and (pred comp-mvar-p) obj1)) + (`((set ,(and (pred comp-mvar-p) tmp-mvar) ,(pred comp-mvar-p)) ;; (comment ,_comment-str) (cond-jump ,tmp-mvar ,obj2 . ,blocks)) (cl-loop |