pike.git / src / mapping.c

version» Context lines:

pike.git/src/mapping.c:1:   /*   || 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: mapping.c,v 1.156 2002/11/28 02:20:48 mast Exp $ + || $Id: mapping.c,v 1.157 2002/12/01 00:16:54 mast Exp $   */      #include "global.h" - RCSID("$Id: mapping.c,v 1.156 2002/11/28 02:20:48 mast Exp $"); + RCSID("$Id: mapping.c,v 1.157 2002/12/01 00:16:54 mast Exp $");   #include "main.h"   #include "object.h"   #include "mapping.h"   #include "svalue.h"   #include "array.h"   #include "pike_macros.h"   #include "pike_error.h"   #include "pike_memory.h"   #include "dynamic_buffer.h"   #include "interpret.h"
pike.git/src/mapping.c:42:         #define MAPPING_DATA_SIZE(HSIZE, KEYPAIRS) \    (ptrdiff_t)( MD_KEYPAIRS(0, HSIZE) + KEYPAIRS )            #undef EXIT_BLOCK   #define EXIT_BLOCK(m) do{ \   DO_IF_DEBUG( \ -  if(m->refs) \ -  Pike_fatal("really free mapping on mapping with nonzero refs.\n"); \ +  if(m->refs) { \ +  DO_IF_DMALLOC(describe_something(m, T_MAPPING, 0,2,0, NULL)); \ +  Pike_fatal("really free mapping on mapping with %d refs.\n", m->refs); \ +  } \   ) \    \    FREE_PROT(m); \    \    unlink_mapping_data(m->data); \    \    DOUBLEUNLINK(first_mapping, m); \    \    GC_FREE(m); \   }while(0)