diff options
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c index 90d8c335185..86011a234c0 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -3415,6 +3415,12 @@ record_unwind_protect_int (void (*function) (int), int arg) | |||
| 3415 | } | 3415 | } |
| 3416 | 3416 | ||
| 3417 | void | 3417 | void |
| 3418 | record_unwind_protect_excursion (void) | ||
| 3419 | { | ||
| 3420 | record_unwind_protect (save_excursion_restore, save_excursion_save ()); | ||
| 3421 | } | ||
| 3422 | |||
| 3423 | void | ||
| 3418 | record_unwind_protect_void (void (*function) (void)) | 3424 | record_unwind_protect_void (void (*function) (void)) |
| 3419 | { | 3425 | { |
| 3420 | specpdl_ptr->unwind_void.kind = SPECPDL_UNWIND_VOID; | 3426 | specpdl_ptr->unwind_void.kind = SPECPDL_UNWIND_VOID; |