diff options
| author | Andrea Corallo <akrl@sdf.org> | 2020-12-22 13:04:02 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2020-12-24 15:36:36 +0100 |
| commit | 715cac119a02adb489cfda4b8f310cff87c55a2c (patch) | |
| tree | c7818dec5a9492c931e84fbc8e923b83b44585dc /lisp | |
| parent | c07c9f6bf81d2355672839e7423a9f2a5f00e4fb (diff) | |
| download | emacs-715cac119a02adb489cfda4b8f310cff87c55a2c.tar.gz emacs-715cac119a02adb489cfda4b8f310cff87c55a2c.tar.bz2 emacs-715cac119a02adb489cfda4b8f310cff87c55a2c.zip | |
* lisp/emacs-lisp/comp.el (comp-limplify-lap-inst): Opencode byte-not.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index eef63b52c44..ad09210d8dd 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -1446,7 +1446,9 @@ the annotation emission." (byte-listp auto) (byte-eq auto) (byte-memq auto) - (byte-not null) + (byte-not + (comp-emit-set-call (comp-call 'eq (comp-slot-n (comp-sp)) + (make-comp-mvar :constant nil)))) (byte-car auto) (byte-cdr auto) (byte-cons auto) |