diff options
| author | Gregory Heytings | 2023-02-14 20:22:50 +0000 |
|---|---|---|
| committer | Gregory Heytings | 2023-02-14 21:41:35 +0100 |
| commit | 5206a551c166fc1908edff4fdf1695f7cef3600a (patch) | |
| tree | 6865a1e4131030a6c32c7551c8441a63ea349bd2 /src/lisp.h | |
| parent | accd88d55455b8c585b162242e6e4ede742afa99 (diff) | |
| download | emacs-5206a551c166fc1908edff4fdf1695f7cef3600a.tar.gz emacs-5206a551c166fc1908edff4fdf1695f7cef3600a.zip | |
Improve backward compatibility of save-restriction
* src/editfns.c (save_restriction_save_1): Renamed from
'save_restrictions_save'. Make it static.
(save_restriction_restore_1): Renamed from
'save_restriction_restore'. Make it static.
(save_restriction_restore): New function, combining
'save_restriction_save_1' and 'narrowing_locks_save'.
(save_restriction_save): New function, combining
'save_restriction_restore_1' and 'narrowing_locks_restore'.
(Fsave_restriction): Restore the previous code.
(narrowing_locks_save, narrowing_locks_restore): Make them static.
* src/lisp.h: Remove two functions that are not externally visible
anymore.
* src/comp.c (helper_save_restriction): Restore the previous code.
* src/bytecode.c (exec_byte_code): Restore the previous code.
* lisp/emacs-lisp/bytecomp.el (byte-compile-save-restriction):
Decrement unbinding count.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/lisp.h b/src/lisp.h index 93197d38176..1276285e2f2 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -4684,8 +4684,6 @@ extern void save_excursion_save (union specbinding *); | |||
| 4684 | extern void save_excursion_restore (Lisp_Object, Lisp_Object); | 4684 | extern void save_excursion_restore (Lisp_Object, Lisp_Object); |
| 4685 | extern Lisp_Object save_restriction_save (void); | 4685 | extern Lisp_Object save_restriction_save (void); |
| 4686 | extern void save_restriction_restore (Lisp_Object); | 4686 | extern void save_restriction_restore (Lisp_Object); |
| 4687 | extern Lisp_Object narrowing_locks_save (void); | ||
| 4688 | extern void narrowing_locks_restore (Lisp_Object); | ||
| 4689 | extern Lisp_Object make_buffer_string (ptrdiff_t, ptrdiff_t, bool); | 4687 | extern Lisp_Object make_buffer_string (ptrdiff_t, ptrdiff_t, bool); |
| 4690 | extern Lisp_Object make_buffer_string_both (ptrdiff_t, ptrdiff_t, ptrdiff_t, | 4688 | extern Lisp_Object make_buffer_string_both (ptrdiff_t, ptrdiff_t, ptrdiff_t, |
| 4691 | ptrdiff_t, bool); | 4689 | ptrdiff_t, bool); |