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.51 1997/10/14 05:35:12 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.52 1997/10/25 17:33:58 grubba Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"   #include "svalue.h"   #include "array.h"   #include "mapping.h"   #include "error.h"   #include "language.h"   #include "stralloc.h"   #include "constants.h"
pike.git/src/interpret.c:699:    push_int(1);    o_subtract();    assign_svalue(fp->locals+instr,sp-1);    }    break;       CASE(F_POST_DEC_LOCAL);    instr=GET_ARG();    assign_svalue_no_free(sp++,fp->locals+instr);    goto dec_local_and_pop; -  fp->locals[instr].u.integer--; +  /* fp->locals[instr].u.integer--; */    break;       CASE(F_DEC_LOCAL_AND_POP);    instr=GET_ARG();    dec_local_and_pop:    if(fp->locals[instr].type == T_INT)    {    fp->locals[instr].u.integer--;    }else{    assign_svalue_no_free(sp++,fp->locals+instr);