pike.git/ src/ array.h

2004-04-18

2004-04-18 02:16:06 by Martin Stjernholm <mast@lysator.liu.se>

• 4fab5f45f59af41f8a04567aac6d0455fd16b5b8 (14 lines) (+12/-2) ^{[ Show | Annotate ]}
  Branch: 7.9

Improved debug during cleanup: If there are internal refs that the gc don't
know about it will free them during the leak report. When they then are
freed from their real places later on, they will run out of refs. Therefore
the debug now prints all locations the leaked objects are freed from.

Rev: src/array.h:1.59
Rev: src/dmalloc.h:1.50
Rev: src/gc.c:1.253
Rev: src/gc.h:1.112
Rev: src/main.c:1.200
Rev: src/mapping.h:1.54
Rev: src/multiset.h:1.34
Rev: src/object.h:1.82
Rev: src/program.c:1.563
Rev: src/program.h:1.202

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: array.h,v 1.58 2004/03/17 15:27:26 grubba Exp $ + || $Id: array.h,v 1.59 2004/04/18 02:16:05 mast Exp $   */      #ifndef ARRAY_H
68:   #define PIKE_ARRAY_OP_SUB PIKE_MINTERM(PIKE_ARRAY_OP_TAKE_A,PIKE_ARRAY_OP_SKIP_A ,PIKE_ARRAY_OP_SKIP_B)       - #define free_array(V) do{ struct array *v_=(V); debug_malloc_touch(v_); if(!sub_ref(v_)) really_free_array(v_); }while(0) + #define free_array(V) do{ \ +  struct array *v_=(V); \ +  debug_malloc_touch(v_); \ +  DO_IF_PIKE_CLEANUP ( \ +  if (gc_external_refs_zapped) \ +  gc_check_zapped (v_, PIKE_T_ARRAY, __FILE__, __LINE__); \ +  ); \ +  if(!sub_ref(v_)) \ +  really_free_array(v_); \ +  }while(0)      #define allocate_array(X) low_allocate_array((X),0)   #define allocate_array_no_init(X,Y) low_allocate_array((X),(Y))