Branch: Tag:

2007-03-07

2007-03-07 18:41:31 by Martin Stjernholm <mast@lysator.liu.se>

Don't think GC_PASS_POSTTOUCH really works (it could only be executed when
d_flag >= 1).

Rev: src/gc.c:1.262

2:   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: gc.c,v 1.261 2006/04/02 07:24:47 mast Exp $ + || $Id: gc.c,v 1.262 2007/03/07 18:41:31 mast Exp $   */      #include "global.h"
33:      #include "block_alloc.h"    - RCSID("$Id: gc.c,v 1.261 2006/04/02 07:24:47 mast Exp $"); + RCSID("$Id: gc.c,v 1.262 2007/03/07 18:41:31 mast Exp $");      int gc_enabled = 1;   
1379:    break;    }    + #if 0 +  /* Disabled since we can't assume any correlation between the +  * marks and the actual blocks in or after GC_PASS_FREE. */    case GC_PASS_POSTTOUCH:    m = find_marker(a);    if (!*(INT32 *) a)
1421:   #endif    }    break; + #endif       default:    Pike_fatal("debug_gc_touch() used in invalid gc pass.\n");
3118:    GC_VERBOSE_DO(fprintf(stderr, "| destruct: %d things really freed\n",    obj_count - num_objects));    + #if 0 +  /* Disabled since we can't assume any correlation between the +  * marks and the actual blocks in or after GC_PASS_FREE. */    if (gc_debug) {    unsigned n;    Pike_in_gc=GC_PASS_POSTTOUCH;
3131:    Pike_fatal("Object count wrong after gc; expected %d, got %d.\n", num_objects, n);    GC_VERBOSE_DO(fprintf(stderr, "| posttouch: %u things\n", n));    } + #endif +    #ifdef PIKE_DEBUG    if (gc_extra_refs) {    size_t e;