pike.git / src / encode.c

version» Context lines:

pike.git/src/encode.c:18:   #include "pike_error.h"   #include "operators.h"   #include "builtin_functions.h"   #include "module_support.h"   #include "fsort.h"   #include "threads.h"   #include "stuff.h"   #include "version.h"   #include "bignum.h"    - RCSID("$Id: encode.c,v 1.83 2001/07/16 00:38:27 mast Exp $"); + RCSID("$Id: encode.c,v 1.84 2001/07/16 21:53:40 mast Exp $");      /* #define ENCODE_DEBUG */      #ifdef ENCODE_DEBUG   /* Pass a nonzero integer as the third arg to encode_value,    * encode_value_canonic and decode_value to activate this debug. */   #define EDB(N,X) do if (data->debug>=N) {X;} while (0)   #else   #define EDB(N,X) do {} while (0)   #endif
pike.git/src/encode.c:1496:    debug_malloc_touch(o);    pop_stack();    push_object(o);       if(o->prog)    {    if(o->prog->flags & PROGRAM_FINISHED)    {    apply_lfun(o, LFUN___INIT, 0);    pop_stack(); +  apply_lfun(o,LFUN_CREATE, 0); +  pop_stack();    }else{    struct unfinished_obj_link *ol=ALLOC_STRUCT(unfinished_obj_link);    ol->o=o;    ol->next=data->unfinished_objects;    data->unfinished_objects=ol;    }    }       EDB(2,fprintf(stderr, "%*sDecoded an object to <%d>: ",    data->depth, "", tmp.u.integer);