From 9e6eee36b5af2e2b719bca0279a063cfbeef2042 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Gerd=20M=C3=B6llmann?= Date: Sat, 30 Jul 2022 17:32:04 +0200 Subject: [PATCH] Fix native compiler handling of narrow-to-region * lisp/emacs-lisp/comp.el (comp-limplify-lap-inst): Use auto for byte-narrow-to-region. --- lisp/emacs-lisp/comp.el | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 6e9132e4304..4354ea03a4e 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -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) -- 2.39.2