2004-09-27
2004-09-27 21:37:13 by Martin Stjernholm <mast@lysator.liu.se>
-
b0eec219064a3290f2db15ed848d1213bf273a79
(13 lines)
(+8/-5)
[
Show
| Annotate
]
Branch: 7.6
Fixed --with-cleanup-on-exit to work without rtldebug.
Rev: src/array.h:1.62
Rev: src/dmalloc.h:1.52
Rev: src/gc.c:1.254
Rev: src/gc.h:1.113
Rev: src/main.c:1.203
Rev: src/mapping.h:1.56
Rev: src/multiset.h:1.36
Rev: src/object.h:1.86
Rev: src/pike_memory.c:1.152
Rev: src/program.h:1.204
Rev: src/stralloc.c:1.166
Rev: src/stralloc.h:1.82
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: stralloc.c,v 1.165 2004/04/15 17:34:40 mast Exp $
+ || $Id: stralloc.c,v 1.166 2004/09/27 21:37:13 mast Exp $
*/
#include "global.h"
24:
#include <ctype.h>
#include <math.h>
- RCSID("$Id: stralloc.c,v 1.165 2004/04/15 17:34:40 mast Exp $");
+ RCSID("$Id: stralloc.c,v 1.166 2004/09/27 21:37:13 mast Exp $");
/* #define STRALLOC_USE_PRIMES */
1820:
empty_pike_string = make_shared_string("");
}
- #ifdef DEBUG_MALLOC
+ #ifdef DO_PIKE_CLEANUP
struct shared_string_location *all_shared_string_locations;
#endif
1835:
empty_pike_string = 0;
}
- #if defined(PIKE_DEBUG) && defined(DEBUG_MALLOC)
+ #ifdef DO_PIKE_CLEANUP
while(all_shared_string_locations)
{
struct shared_string_location *x=all_shared_string_locations;
1844: Inside #if defined(PIKE_DEBUG) && defined(DEBUG_MALLOC)
x->s=0;
}
- if(verbose_debug_exit)
+ if (exit_with_cleanup)
{
INT32 num,size;
count_memory_in_strings(&num,&size);
if(num)
{
fprintf(stderr,"Strings left: %d (%d bytes) (zapped)\n",num,size);
-
+ #ifdef PIKE_DEBUG
dump_stralloc_strings();
-
+ #endif
}
}
#endif