pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:1:   /*   || 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: interpret.c,v 1.345 2004/04/03 21:53:49 mast Exp $ + || $Id: interpret.c,v 1.346 2004/04/03 21:59:37 mast Exp $   */      #include "global.h" - RCSID("$Id: interpret.c,v 1.345 2004/04/03 21:53:49 mast Exp $"); + RCSID("$Id: interpret.c,v 1.346 2004/04/03 21:59:37 mast Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"   #include "svalue.h"   #include "array.h"   #include "mapping.h"   #include "pike_error.h"   #include "stralloc.h"   #include "constants.h"   #include "pike_macros.h"
pike.git/src/interpret.c:1426:    if (filep) {    free_string(filep);    }    free(s);   }      static void do_trace_func_return (int got_retval, struct object *o, int fun)   {    dynamic_buffer save_buf;    init_buf (&save_buf); -  if (fun >= 0) { +  if (o) {    if (o->prog) {    struct identifier *id = ID_FROM_INT (o->prog, fun);    char buf[50];    sprintf(buf, "%lx->", DO_NOT_WARN((long) PTR_TO_INT (o)));    my_strcat(buf);    if (id->name->size_shift)    my_strcat ("[widestring function name]");    else    my_strcat(id->name->str);    my_strcat ("() ");
pike.git/src/interpret.c:1578:    *    * Returns zero if the function was invalid or has been executed.    *    * Returns one if a frame has been set up to start the function    * with eval_instruction(Pike_fp->pc - ENTRY_PROLOGUE_SIZE). After    * eval_instruction() is done the frame needs to be removed by a call    * to low_return() or low_return_pop().    */   int low_mega_apply(enum apply_type type, INT32 args, void *arg1, void *arg2)   { -  struct object *o; +  struct object *o = NULL;    struct pike_frame *scope=0; -  ptrdiff_t fun = -1; +  ptrdiff_t fun;    struct svalue *save_sp=Pike_sp-args;      #if defined(PIKE_DEBUG) && defined(_REENTRANT)    if(d_flag)    {    THREAD_T self = th_self();       CHECK_INTERPRETER_LOCK();       if( Pike_interpreter.thread_state &&