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.225 2009/11/28 13:14:00 mast Exp $ + || $Id: array.c,v 1.226 2009/11/28 13:36:20 mast 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:2682:    gc_checked_as_weak(a);    }    else    gc_check_svalues(ITEM(a), a->size);    }    } GC_LEAVE;   }      void gc_mark_array_as_referenced(struct array *a)   { -  if(gc_mark(a)) +  if(gc_mark(a, T_ARRAY))    GC_ENTER (a, T_ARRAY) {    if (a == gc_mark_array_pos)    gc_mark_array_pos = a->next;    if (a == gc_internal_array)    gc_internal_array = a->next;    else {    DOUBLEUNLINK (first_array, a);    DOUBLELINK (first_array, a); /* Linked in first. */    }