(Fgarbage_collect): Call unmark_byte_stack.

2 files changed, 9 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 60123628e87..914910d3a3b 100644
--- 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 03356fea00b..546bdb15b45 100644
--- 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);