pike.git / src / builtin.cmod

version» Context lines:

pike.git/src/builtin.cmod:1:   /* -*- c -*- -  * $Id: builtin.cmod,v 1.39 2001/06/19 21:41:01 grubba Exp $ +  * $Id: builtin.cmod,v 1.40 2001/06/19 21:46:13 grubba Exp $    */      #include "global.h"   #include "interpret.h"   #include "svalue.h"   #include "opcodes.h"   #include "pike_macros.h"   #include "object.h"   #include "program.h"   #include "array.h"
pike.git/src/builtin.cmod:638:    * Backtrace handling.    */      /*! @class BacktraceFrame    */      PIKECLASS backtrace_frame   {    PIKEVAR mixed fun;    PIKEVAR array args; -  CVAR struct program *prog; +  CVAR struct program *prog; /* FIXME: Ought to be a private pikevar... */    CVAR unsigned char *pc;    CVAR struct pike_string *filename;    CVAR INT_TYPE lineno;       INIT    {    THIS->fun.type = T_INT;    THIS->fun.u.integer = 0;    THIS->prog = NULL;    THIS->pc = 0;
pike.git/src/builtin.cmod:672:    THIS->args = NULL;    }    if (THIS->filename) {    free_string(THIS->filename);    THIS->filename = NULL;    }    THIS->pc = 0;    THIS->lineno = 0;    free_svalue(&THIS->fun);    THIS->fun.type = T_INT; +  THIS->fun.u.integer = 0;    }       PIKEFUN int(0..1) _is_type(string t)    {    INT_TYPE res = (t == findstring("array"));    pop_n_elems(args);    push_int(res);    }       PIKEFUN string _sprintf(int c, mapping|void opts)