Fix native compiler handling of narrow-to-region

* lisp/emacs-lisp/comp.el (comp-limplify-lap-inst): Use auto for
byte-narrow-to-region.
This commit is contained in:
Gerd Möllmann 2022-07-30 17:32:04 +02:00
parent 250dbaa7dd
commit 9e6eee36b5

View file

@ -1915,11 +1915,7 @@ and the annotation emission."
(byte-char-syntax auto)
(byte-buffer-substring auto)
(byte-delete-region auto)
(byte-narrow-to-region
(comp-emit-set-call (comp-call 'narrow-to-region
(comp-slot)
(comp-slot+1)
(make-comp-mvar :constant nil))))
(byte-narrow-to-region auto)
(byte-widen
(comp-emit-set-call (comp-call 'widen)))
(byte-end-of-line auto)