Branch: Tag:

1997-11-08

1997-11-08 01:35:41 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more debug added

Rev: src/array.c:1.21
Rev: src/builtin_functions.c:1.56
Rev: src/gc.c:1.22
Rev: src/gc.h:1.13
Rev: src/interpret.c:1.55
Rev: src/lex.c:1.30
Rev: src/main.c:1.27
Rev: src/mapping.c:1.24
Rev: src/modules/files/file.c:1.61
Rev: src/multiset.c:1.8
Rev: src/object.c:1.29
Rev: src/program.c:1.46
Rev: src/stralloc.c:1.18
Rev: src/svalue.c:1.17
Rev: src/threads.c:1.46

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: interpret.c,v 1.54 1997/11/01 21:57:49 grubba Exp $"); + RCSID("$Id: interpret.c,v 1.55 1997/11/08 01:34:38 hubbe Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"
87: Inside #if defined(DEBUG)
  #ifdef DEBUG   static void gc_check_stack_callback(struct callback *foo, void *bar, void *gazonk)   { -  gc_xmark_svalues(evaluator_stack,sp-evaluator_stack-1); +  debug_gc_xmark_svalues(evaluator_stack,sp-evaluator_stack-1,"interpreter stack");   }   #endif   
1140:    }       do_return: - #if defined(DEBUG) && defined(GC2) + #ifdef DEBUG    if(d_flag > 2)    do_gc();   #endif