changeset 31152:fb30bcf39f12

(mark_byte_stack): Add a comment.
author Gerd Moellmann <gerd@gnu.org>
date Thu, 24 Aug 2000 11:42:33 +0000
parents 21ca2a5ae10b
children 49294d7cfd5b
files src/bytecode.c
diffstat 1 files changed, 7 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/bytecode.c	Thu Aug 24 11:42:16 2000 +0000
+++ b/src/bytecode.c	Thu Aug 24 11:42:33 2000 +0000
@@ -272,6 +272,13 @@
 
   for (stack = byte_stack_list; stack; stack = stack->next)
     {
+      /* If STACK->top is null here, this means there's an opcode in
+	 Fbyte_code that wasn't expected to GC, but did.  To find out
+	 which opcode this is, record the value of `stack', and walk
+	 up the stack in a debugger, stopping in frames of Fbyte_code.
+	 The culprit is found in the frame of Fbyte_code where the
+	 address of its local variable `stack' is equal to the
+	 recorded value of `stack' here.  */
       if (!stack->top)
 	abort ();