pike.git / src / mapping.c

version» Context lines:

pike.git/src/mapping.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: mapping.c,v 1.34 1998/05/16 08:21:47 hubbe Exp $"); + RCSID("$Id: mapping.c,v 1.35 1998/08/05 20:51:14 hubbe Exp $");   #include "main.h"   #include "object.h"   #include "mapping.h"   #include "svalue.h"   #include "array.h"   #include "pike_macros.h"   #include "language.h"   #include "error.h"   #include "pike_memory.h"   #include "dynamic_buffer.h"
pike.git/src/mapping.c:973: Inside #if defined(DEBUG)
   MAPPING_LOOP(m)    {    num++;       if(! ( (1 << k->ind.type) & (m->ind_types) ))    fatal("Mapping indices type field lies.\n");       if(! ( (1 << k->val.type) & (m->val_types) ))    fatal("Mapping values type field lies.\n");    +  check_svalues(& k->ind); +  check_svalues(& k->val);    }       if(m->size != num)    fatal("Shields are failing, hull integrity down to 20%%\n");   }      void check_all_mappings(void)   {    struct mapping *m;    for(m=first_mapping;m;m=m->next)