pike.git / src / array.c

version» Context lines:

pike.git/src/array.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: array.c,v 1.228 2010/07/11 12:30:45 jonasw Exp $ + || $Id: array.c,v 1.229 2010/07/11 12:39:11 jonasw Exp $   */      #include "global.h"   #include "svalue.h"   #include "array.h"   #include "object.h"   #include "las.h"   #include "stralloc.h"   #include "interpret.h"   #include "opcodes.h"
pike.git/src/array.c:2433:   #endif       if (!a->size) {    ret = (a->flags & ARRAY_WEAK_FLAG) ? &weak_empty_array : &empty_array;    add_ref(ret);    return ret;    }       ret=allocate_array_no_init(a->size,0);    +  if (m) {    aa.type = T_ARRAY;    aa.subtype = 0;    aa.u.array = a;    bb.type = T_ARRAY;    bb.subtype = 0;    bb.u.array = ret;    low_mapping_insert(m, &aa, &bb, 1); -  +  }       ret->flags = a->flags & ~ARRAY_LVALUE;       copy_svalues_recursively_no_free(ITEM(ret),ITEM(a),a->size,m);       ret->type_field=a->type_field;    return ret;   }      /** Apply the elements of an array. Arguments the array should be