pike.git / src / array.c

version» Context lines:

pike.git/src/array.c:1131:    INT32 e;       array_fix_type_field(a);    if(a->type_field == BIT_INT)    {    for(e=0; e<a->size; e++)    if(ITEM(a)[e].u.integer != 0)    break;    if(e == a->size)    { -  return mkefuncallnode("allocate", -  mknode(F_ARG_LIST, -  mkintnode(a->size), -  mkstrnode(make_shared_string("mixed")) -  )); +  return mkefuncallnode("allocate",mkintnode(a->size));    }    }    if(check_that_array_is_constant(a))    {    s.type=T_ARRAY;    s.subtype=0;    s.u.array=a;    return mkconstantsvaluenode(&s);    }else{    node *ret=0;
pike.git/src/array.c:1555:      void zap_all_arrays(void)   {    struct array *a,*next;       a=&empty_array;    do    {      #if defined(DEBUG) && defined(DEBUG_MALLOC) -  if(verbose_debug_exit) +  if(verbose_debug_exit && a!=&empty_array)    debug_dump_array(a);   #endif       a->refs++;    free_svalues(ITEM(a), a->size, a->type_field);    a->size=0;       if(!(next=a->next))    fatal("Null pointer in array list.\n");