diff options
author | Andrea Corallo <akrl@sdf.org> | 2021-03-06 20:51:11 +0100 |
---|---|---|
committer | Andrea Corallo <akrl@sdf.org> | 2021-03-06 20:52:34 +0100 |
commit | 3848f3bff0d39e21ee016ea9c3fae4bf07fc0a57 (patch) | |
tree | c7dac3e0cace84d19b19702279cb71773160ebb4 /lisp/emacs-lisp/comp.el | |
parent | 05259c4a238efa40fa66ac51844aa5227b9c576b (diff) | |
download | emacs-3848f3bff0d39e21ee016ea9c3fae4bf07fc0a57.tar.gz emacs-3848f3bff0d39e21ee016ea9c3fae4bf07fc0a57.tar.bz2 emacs-3848f3bff0d39e21ee016ea9c3fae4bf07fc0a57.zip |
* lisp/emacs-lisp/comp.el (comp-add-cond-cstrs-simple): Suppress warning.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
-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 |