2007-04-25
2007-04-25 21:58:33 by Martin Stjernholm <mast@lysator.liu.se>
-
fec15ecb62fe38bd4a2ac479abeb91afd649842b
(12 lines)
(+8/-4)
[
Show
| Annotate
]
Branch: 7.9
Improved leak reports for types.
Rev: src/gc.c:1.280
Rev: src/module.c:1.41
Rev: src/pike_types.c:1.296
Rev: src/pike_types.h:1.106
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.279 2007/03/31 21:41:34 grubba Exp $
+ || $Id: gc.c,v 1.280 2007/04/25 21:58:33 mast Exp $
*/
#include "global.h"
1778: Inside #if defined(PIKE_DEBUG)
gc_check_all_mappings();
gc_check_all_programs();
gc_check_all_objects();
+ #if defined (PIKE_DEBUG) || defined (DO_PIKE_CLEANUP)
+ debug_gc_check_all_types();
+ #endif
} GC_LEAVE;
#ifdef DEBUG_MALLOC
2939:
n += gc_touch_all_programs();
n += gc_touch_all_objects();
#ifdef PIKE_DEBUG
- #if 0
- gc_touch_all_types();
- #endif
+
gc_touch_all_strings();
#endif
if (n != (unsigned) num_objects)
2964:
gc_check_all_mappings();
gc_check_all_programs();
gc_check_all_objects();
+ #if defined (PIKE_DEBUG) || defined (DO_PIKE_CLEANUP)
+ debug_gc_check_all_types();
+ #endif
} END_ACCEPT_UNFINISHED_TYPE_FIELDS;
GC_VERBOSE_DO(fprintf(stderr, "| check: %u references in %d things, "