pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:1:   /* -  * $Id: interpret_functions.h,v 1.35 2000/12/05 21:08:18 per Exp $ +  * $Id: interpret_functions.h,v 1.36 2001/01/08 20:04:48 mast Exp $    *    * Opcode definitions for the interpreter.    */      OPCODE0(F_UNDEFINED,"push UNDEFINED")    push_int(0);    Pike_sp[-1].subtype=NUMBER_UNDEFINED;   BREAK;      OPCODE0(F_CONST0, "push 0")
pike.git/src/interpret_functions.h:1607:         #ifdef PIKE_DEBUG    if(args != EXTRACT_UCHAR(addr-1))    fatal("Wrong number of arguments in F_TAIL_RECUR %d != %d\n",    args, EXTRACT_UCHAR(addr-1));   #endif       if(Pike_sp-args != Pike_fp->locals)    { + #ifdef PIKE_DEBUG +  if (Pike_sp < Pike_fp->locals + args) +  fatal("Pike_sp (%p) < Pike_fp->locals (%p) + args (%d)\n", +  Pike_sp, Pike_fp->locals, args); + #endif    assign_svalues(Pike_fp->locals, Pike_sp-args, args, BIT_MIXED);    pop_n_elems(Pike_sp - (Pike_fp->locals + args));    }       clear_svalues(Pike_sp, num_locals - args);    Pike_sp += num_locals - args;      #ifdef PIKE_DEBUG    if(Pike_sp != Pike_fp->locals + Pike_fp->num_locals)    fatal("Sp whacked!\n");   #endif       pc=addr;   }   BREAK