mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-07 20:30:32 -08:00
Code Issues Projects Releases Wiki Activity

Handle the optional argument of 'narrow-to-region' in byte-compiled code.

Browse source 
* lisp/emacs-lisp/bytecomp.el: Adapt the specifications.

* src/bytecode.c (exec_byte_code): Get the optional argument.
This commit is contained in:
Gregory Heytings 2022-07-30 12:02:28 +00:00
parent 6ce75b1979
commit a5adcbdf28
2 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/bytecode.c
View file

@ -1480,8 +1480,8 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template,
CASE (Bnarrow_to_region):
{
Lisp_Object v1 = POP;
TOP = Fnarrow_to_region (TOP, v1, Qnil);
Lisp_Object v2 = POP, v1 = POP;
TOP = Fnarrow_to_region (TOP, v1, v2);
NEXT;
}