pike.git/ src/ builtin_functions.c

2005-02-09

2005-02-09 16:43:35 by Martin Stjernholm <mast@lysator.liu.se>

• 09f288c04d844b45e3fd699c22042fd24519707b (10 lines) (+8/-2) ^{[ Show | Annotate ]}
  Branch: 7.9

Pass a flag to lfun::destroy about the reason for the destruct.

Rev: lib/modules/Object.pmod:1.1
Rev: src/builtin_functions.c:1.587
Rev: src/gc.c:1.262
Rev: src/object.c:1.265
Rev: src/object.h:1.90
Rev: src/program.c:1.586

2:   || 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: builtin_functions.c,v 1.586 2004/12/23 13:44:44 grubba Exp $ + || $Id: builtin_functions.c,v 1.587 2005/02/09 16:35:50 mast Exp $   */      #include "global.h"
2377:    Pike_error("Destruct permission denied.\n");   #endif    debug_malloc_touch(o); -  destruct(o); +  destruct_object (o, DESTRUCT_EXPLICIT);    pop_n_elems(args);    destruct_objects_to_destruct();   }
8697:    ADD_INT_CONSTANT("__FLOAT_PRECISION_FLOAT__",1,0);   #endif   #endif +  +  ADD_INT_CONSTANT ("DESTRUCT_EXPLICIT", DESTRUCT_EXPLICIT, 0); +  ADD_INT_CONSTANT ("DESTRUCT_NO_REFS", DESTRUCT_NO_REFS, 0); +  ADD_INT_CONSTANT ("DESTRUCT_GC", DESTRUCT_GC, 0); +  ADD_INT_CONSTANT ("DESTRUCT_CLEANUP", DESTRUCT_CLEANUP, 0);   }