pike.git / src / array.c

version» Context lines:

pike.git/src/array.c:16:   #include "pike_types.h"   #include "fsort.h"   #include "builtin_functions.h"   #include "pike_memory.h"   #include "gc.h"   #include "main.h"   #include "security.h"   #include "stuff.h"   #include "bignum.h"    - RCSID("$Id: array.c,v 1.59 1999/12/10 22:38:26 grubba Exp $"); + RCSID("$Id: array.c,v 1.60 2000/02/02 00:37:21 hubbe Exp $");      struct array empty_array=   {    1, /* Never free */   #ifdef PIKE_SECURITY    0,   #endif    &empty_array, /* Next */    &empty_array, /* previous (circular) */    0, /* Size = 0 */
pike.git/src/array.c:1800: Inside #if defined(PIKE_DEBUG)
  #ifdef PIKE_DEBUG    if(d_flag > 1) array_check_type_field(a);   #endif    if(a->type_field & BIT_COMPLEX)    {    TYPE_FIELD t;    t=debug_gc_check_svalues(ITEM(a), a->size, T_ARRAY, a);       /* Ugly, but we are not allowed to change type_field    * at the same time as the array is being built... -  * Actually we just need beter primitives for building arrays. +  * Actually we just need better primitives for building arrays.    */    if(!(a->type_field & BIT_UNFINISHED) || a->refs!=1)    a->type_field = t;    else    a->type_field |= t;    }       a=a->next;    } while (a != & empty_array);   }