Handle the optional argument of 'narrow-to-region' in byte-compiled code.
* lisp/emacs-lisp/bytecomp.el: Adapt the specifications. * src/bytecode.c (exec_byte_code): Get the optional argument.
This commit is contained in:
@@ -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;
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user