martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(Fbyte_code) <Bvarbind, Bunwind_protect>: Add

Browse Source 
BEFORE/AFTER_POTENTIAL_GC.
This commit is contained in:
Gerd Moellmann
2000-11-21 16:47:04 +00:00
parent 9bbd146557
commit 56b8eef5a0
1 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/bytecode.c
View File

@@ -644,7 +644,10 @@ If the third argument is incorrect, Emacs may crash.")
case Bvarbind+5:
op -= Bvarbind;
varbind:
/* Specbind can signal and thus GC. */
BEFORE_POTENTIAL_GC ();
specbind (vectorp[op], POP);
AFTER_POTENTIAL_GC ();
break;
case Bcall+6:
@@ -850,7 +853,10 @@ If the third argument is incorrect, Emacs may crash.")
}
case Bunwind_protect:
/* The function record_unwind_protect can GC. */
BEFORE_POTENTIAL_GC ();
record_unwind_protect (0, POP);
AFTER_POTENTIAL_GC ();
(specpdl_ptr - 1)->symbol = Qnil;
break;