pike.git/ src/ gc.c

2000-04-17

2000-04-17 21:06:24 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 111fdd5327056423ca3aa3d7eae57316accfe159 (9 lines) (+8/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

more gc() paranoia

Rev: src/block_alloc.h:1.19
Rev: src/error.c:1.49
Rev: src/gc.c:1.69
Rev: src/gc.h:1.32
Rev: src/interpret.c:1.142
Rev: src/object.c:1.112
Rev: src/pike_memory.c:1.66
Rev: src/svalue.c:1.69

29:      #include "block_alloc.h"    - RCSID("$Id: gc.c,v 1.68 2000/04/15 08:15:49 hubbe Exp $"); + RCSID("$Id: gc.c,v 1.69 2000/04/17 21:06:24 hubbe Exp $");      /* Run garbage collect approximate every time we have    * 20 percent of all arrays, objects and programs is
485:      void describe_something(void *a, int t, int indent, int depth, int flags)   { +  int tmp;    struct program *p=(struct program *)a;    if(!a) return;   
494:    return;    }    +  /* Disable debug, this may help reduce recursion bugs */ +  tmp=d_flag; +  d_flag=0; +    #ifdef DEBUG_MALLOC    if (((int)a) == 0x55555555) {    fprintf(stderr,"%*s**Location: %p Type: %s Zapped pointer\n",indent,"",a,
518:          fprintf(stderr,"%*s*******************\n",indent,""); +  d_flag=tmp;   }      void describe(void *x)