(Fgarbage_collect): Call unmark_byte_stack.

diff --git a/src/ChangeLog b/src/ChangeLog
index 60123628e87f0089a8acdb067737bd26eba77d56..914910d3a3bcfa8812e7787980130309891e32e2 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,13 @@
 1999-11-07  Gerd Moellmann  <gerd@gnu.org>
 
+       * alloc.c (Fgarbage_collect): Call unmark_byte_stack.
+
+       * lisp.h: Add prototype for unmark_byte_stack.
+
+       * bytecode.c (mark_byte_stack): Use XMARKBIT and XMARK.
+       (unmark_byte_stack): Renamed from relocate_byte_pcs.  Use
+       XUNMARK.
+
        * xdisp.c (resize_mini_window): Fix computation of needed
        mini-window height.
 

diff --git a/src/alloc.c b/src/alloc.c
index 03356fea00ba73ed14419183e140e5c9a483f942..546bdb15b455c6d84a80f99ac0b1daf6b2eb0125 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -1912,7 +1912,7 @@ Garbage collection happens automatically if you cons more than\n\
   for (tail = gcprolist; tail; tail = tail->next)
     for (i = 0; i < tail->nvars; i++)
       XUNMARK (tail->var[i]);
-  relocate_byte_pcs ();
+  unmark_byte_stack ();
   for (backlist = backtrace_list; backlist; backlist = backlist->next)
     {
       XUNMARK (*backlist->function);