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.84 2001/07/16 21:53:40 mast Exp $"); + RCSID("$Id: encode.c,v 1.85 2001/07/16 21:57:55 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:1955:    struct unfinished_obj_link *l, **ptr;    for(ptr= &data->unfinished_objects ; (l=*ptr);)    {    struct object *o=l->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{    ptr=&l->next;    continue;    }    }    *ptr = l->next;    free((char *)l);    }    }