pike.git / src / array.c

version» Context lines:

pike.git/src/array.c:12:   #include "interpret.h"   #include "language.h"   #include "error.h"   #include "pike_types.h"   #include "fsort.h"   #include "builtin_functions.h"   #include "pike_memory.h"   #include "gc.h"   #include "main.h"    - RCSID("$Id: array.c,v 1.38 1998/05/13 07:38:29 hubbe Exp $"); + RCSID("$Id: array.c,v 1.39 1998/05/24 02:28:20 hubbe Exp $");      struct array empty_array=   {    1, /* Never free */    &empty_array, /* Next */    &empty_array, /* previous (circular) */    0, /* Size = 0 */    0, /* malloced Size = 0 */    0, /* no types */    0, /* no flags */
pike.git/src/array.c:1524: Inside #if defined(DEBUG)
   fatal("Array check: a->next->prev != a\n");       if(a->size > a->malloced_size)    fatal("Array is larger than malloced block!\n");       if(a->refs <=0 )    fatal("Array has zero refs.\n");       for(e=0;e<a->size;e++)    { -  if(! ( (1 << ITEM(a)[e].type) & (a->type_field) )) +  if(! ( (1 << ITEM(a)[e].type) & (a->type_field) ) && ITEM(a)[e].type<16)    fatal("Type field lies.\n");       check_svalue(ITEM(a)+e);    }   }      void check_all_arrays(void)   {    struct array *a;