diff options
| author | Gregory Heytings | 2022-08-01 19:11:01 +0000 |
|---|---|---|
| committer | Gregory Heytings | 2022-08-01 21:11:49 +0200 |
| commit | 9d8a6c82838f2f24e76a67379b02956aa668d7cf (patch) | |
| tree | 4c2a1c40d39de489d90575d13efffcee13955a94 /src/lisp.h | |
| parent | c2ed2e68586098b600ff10a85e882ceb9eeb0c32 (diff) | |
| download | emacs-9d8a6c82838f2f24e76a67379b02956aa668d7cf.tar.gz emacs-9d8a6c82838f2f24e76a67379b02956aa668d7cf.zip | |
Fix the bytecode incompatibility due to the change to 'narrow-to-region'.
* src/editfns.c (narrow_to_region_internal): New function, which
contains the body previously in 'Fnarrow_to_region' but accepts
a third argument.
(Fnarrow_to_region): Use the new function. Update the docstring.
(Fwiden): Update the docstring.
* src/lisp.h: Prototype of the new function.
* src/xdisp.c (handle_fontified_prop): Use the new function instead
of 'Fnarrow_to_region'.
* src/process.c (Finternal_default_process_filter):
* src/lread.c (readevalloop): Remove the third argument to
'Fnarrow_to_region'.
* src/bytecode.c (exec_byte_code):
* lisp/emacs-lisp/comp.el (comp-limplify-lap-inst):
* lisp/emacs-lisp/bytecomp.el: Restore the statu quo ante.
* etc/NEWS: Remove the entry about the new optional argument.
* doc/lispref/positions.texi (Narrowing): Update the documentation.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lisp.h b/src/lisp.h index 807fcb0e5ba..c8ad0bc56f5 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -4679,6 +4679,7 @@ extern void save_restriction_restore (Lisp_Object); | |||
| 4679 | extern Lisp_Object make_buffer_string (ptrdiff_t, ptrdiff_t, bool); | 4679 | extern Lisp_Object make_buffer_string (ptrdiff_t, ptrdiff_t, bool); |
| 4680 | extern Lisp_Object make_buffer_string_both (ptrdiff_t, ptrdiff_t, ptrdiff_t, | 4680 | extern Lisp_Object make_buffer_string_both (ptrdiff_t, ptrdiff_t, ptrdiff_t, |
| 4681 | ptrdiff_t, bool); | 4681 | ptrdiff_t, bool); |
| 4682 | extern Lisp_Object narrow_to_region_internal (Lisp_Object, Lisp_Object, bool); | ||
| 4682 | extern void init_editfns (void); | 4683 | extern void init_editfns (void); |
| 4683 | extern void syms_of_editfns (void); | 4684 | extern void syms_of_editfns (void); |
| 4684 | 4685 | ||