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.86 2000/09/08 16:19:42 grubba Exp $"); + RCSID("$Id: array.c,v 1.87 2000/09/14 19:58:43 mast Exp $");      PMOD_EXPORT 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:96:    if (gc_internal_array != &empty_array) {    if (v == gc_internal_array)    gc_internal_array = v->next;    if (v == gc_mark_array_pos)    gc_mark_array_pos = v->next;    }    UNLINK_ARRAY(v);       free((char *)v);    -  GC_FREE(); +  GC_FREE(v);   }      /*    * Free an array, call this when the array has zero references    */   PMOD_EXPORT void really_free_array(struct array *v)   {   #ifdef PIKE_DEBUG    if(v == & empty_array)    fatal("Tried to free the empty_array.\n");