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.228 2001/07/19 19:06:48 grubba Exp $"); + RCSID("$Id: interpret.c,v 1.229 2001/07/20 15:48:59 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:26:   #include "builtin_functions.h"   #include "signal_handler.h"   #include "gc.h"   #include "threads.h"   #include "callback.h"   #include "fd_control.h"   #include "security.h"   #include "block_alloc.h"   #include "bignum.h"   #include "pike_types.h" + #include "pikecode.h"      #include <fcntl.h>   #include <errno.h>   #include <ctype.h>      #ifdef HAVE_MMAP   #ifdef HAVE_SYS_TYPES_H   #include <sys/types.h>   #endif   
pike.git/src/interpret.c:1423:    PIKE_OPCODE_T *pc;      #ifdef PIKE_DEBUG    if (Pike_in_gc > GC_PASS_PREPARE && Pike_in_gc < GC_PASS_FREE)    fatal("Pike code called within gc.\n");   #endif       debug_malloc_touch(Pike_fp);    pc=new_frame->context.prog->program + function->func.offset;    - #ifdef HAVE_COMPUTED_GOTO -  num_locals = (int)(ptrdiff_t)((pc++)[0]); -  num_args = (int)(ptrdiff_t)((pc++)[0]); - #elif defined(PIKE_USE_MACHINE_CODE) && defined(sparc) -  num_locals = (pc++)[0]; -  num_args = (pc++)[0]; - #else /* !HAVE_COMPUTED_GOTO */ -  num_locals = EXTRACT_UCHAR(pc++); -  num_args = EXTRACT_UCHAR(pc++); - #endif /* HAVE_COMPUTED_GOTO */ +  num_locals = READ_INCR_BYTE(pc); +  num_args = READ_INCR_BYTE(pc);      #ifdef PIKE_DEBUG    if(num_locals < num_args)    fatal("Wrong number of arguments or locals in function def.\n"    "num_locals: %d < num_args: %d\n",    num_locals, num_args);   #endif       if(function->identifier_flags & IDENTIFIER_SCOPE_USED)    new_frame->expendible+=num_locals;