pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   /**/   #include "global.h" - RCSID("$Id: interpret.c,v 1.189 2001/03/09 02:28:22 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.190 2001/03/17 16:32:14 grubba Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"   #include "svalue.h"   #include "array.h"   #include "mapping.h"   #include "pike_error.h"   #include "language.h"   #include "stralloc.h"   #include "constants.h"
pike.git/src/interpret.c:1673: Inside #if defined(PIKE_DEBUG)
   if(f->locals < Pike_interpreter.evaluator_stack ||    f->locals > &(Pike_interpreter.evaluator_stack[Pike_stack_size]))    fatal("Local variable pointer points to FinspĂ„ng.\n");       if(f->args < 0 || f->args > Pike_stack_size)    fatal("FEL FEL FEL! HELP!! (corrupted pike_frame)\n");    }    }   }    - /*! Prints the Pike backtrace for the interpreter context in the given -  *! thread to stderr, without messing in the internals (doesn't even -  *! use dynamic_buffer). -  *! -  *! This function is intended only for convenient use inside a -  *! debugger session; it can't be used from inside the code. + /*: Prints the Pike backtrace for the interpreter context in the given +  *: thread to stderr, without messing in the internals (doesn't even +  *: use dynamic_buffer). +  *: +  *: This function is intended only for convenient use inside a +  *: debugger session; it can't be used from inside the code.    */   void gdb_backtrace (   #ifdef PIKE_THREADS    THREAD_T thread_id   #endif   )   {    struct pike_frame *f, *of;      #ifdef PIKE_THREADS
pike.git/src/interpret.c:1881:    }       if (i < args - 1) fputs (", ", stderr);    }    fputs (")\n", stderr);    }    else    fputs ("frame with no references\n", stderr);   }    - /*! Prints the Pike backtraces for the interpreter contexts in all -  *! Pike threads to stderr, using @[gdb_backtrace]. -  *! -  *! This function is intended only for convenient use inside a -  *! debugger session; it can't be used from inside the program. + /*: Prints the Pike backtraces for the interpreter contexts in all +  *: Pike threads to stderr, using @[gdb_backtrace]. +  *: +  *: This function is intended only for convenient use inside a +  *: debugger session; it can't be used from inside the program.    */   void gdb_backtraces()   {   #ifdef PIKE_THREADS    extern INT32 gdb_next_thread_state(INT32, struct thread_state **);    INT32 i = 0;    struct thread_state *ts = 0;    while ((i = gdb_next_thread_state (i, &ts)), ts) {    fprintf (stderr, "\nTHREAD_ID %ld (swapped %s):\n",    (long) ts->id, ts->swapped ? "out" : "in");