diff options
author | Dmitry Antipov <dmantipov@yandex.ru> | 2012-12-03 12:06:02 +0400 |
---|---|---|
committer | Dmitry Antipov <dmantipov@yandex.ru> | 2012-12-03 12:06:02 +0400 |
commit | 62c2e5ed3a9c991cef2594b44afc74893f6ce26b (patch) | |
tree | 336fec5e4e929d0505889deefe3f4f484e9fc38a /src/lisp.h | |
parent | 1c960c45ac19595af7a4a741da7837d2057d977a (diff) | |
download | emacs-62c2e5ed3a9c991cef2594b44afc74893f6ce26b.tar.gz emacs-62c2e5ed3a9c991cef2594b44afc74893f6ce26b.tar.bz2 emacs-62c2e5ed3a9c991cef2594b44afc74893f6ce26b.zip |
* alloc.c (free_save_value): New function.
(safe_alloca_unwind): Use it.
* lisp.h (free_save_value): New prototype.
* editfns.c (save_excursion_save): Use Lisp_Misc_Save_Value.
Add comment.
(save_excursion_restore): Adjust to match saved data structure.
Use free_save_value to offload some work from GC. Drop obsolete
#if 0 code.
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 419176d06c8..4dae66eec96 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -2963,6 +2963,7 @@ extern Lisp_Object make_float (double); extern void display_malloc_warning (void); extern ptrdiff_t inhibit_garbage_collection (void); extern Lisp_Object make_save_value (void *, ptrdiff_t); +extern void free_save_value (Lisp_Object); extern Lisp_Object build_overlay (Lisp_Object, Lisp_Object, Lisp_Object); extern void free_marker (Lisp_Object); extern void free_cons (struct Lisp_Cons *); |