diff options
| author | Gerd Möllmann <gerd@gnu.org> | 2022-07-29 17:28:25 +0200 |
|---|---|---|
| committer | Gerd Möllmann <gerd@gnu.org> | 2022-07-29 17:28:25 +0200 |
| commit | 9ebd0455f344e6806400fef2ee0b410a33b68ad5 (patch) | |
| tree | 7dd813ca2336808458c01c97353860760c171411 /lisp/emacs-lisp | |
| parent | 9547c285837e80af059f7676e8af856fb55d1c14 (diff) | |
| download | emacs-9ebd0455f344e6806400fef2ee0b410a33b68ad5.tar.gz emacs-9ebd0455f344e6806400fef2ee0b410a33b68ad5.tar.bz2 emacs-9ebd0455f344e6806400fef2ee0b410a33b68ad5.zip | |
Adapt native compiler to change in narrow-to-region
* lisp/emacs-lisp/comp.el (comp-limplify-lap-inst): Add third
argument nil for narrow-to-region.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 5ee10fcbca2..6e9132e4304 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -1918,7 +1918,8 @@ and the annotation emission." (byte-narrow-to-region (comp-emit-set-call (comp-call 'narrow-to-region (comp-slot) - (comp-slot+1)))) + (comp-slot+1) + (make-comp-mvar :constant nil)))) (byte-widen (comp-emit-set-call (comp-call 'widen))) (byte-end-of-line auto) |