pike.git / src / peep.c

version» Context lines:

pike.git/src/peep.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: peep.c,v 1.79 2002/11/02 14:58:08 grubba Exp $ + || $Id: peep.c,v 1.80 2002/11/04 09:41:48 grubba Exp $   */      #include "global.h"   #include "language.h"   #include "stralloc.h"   #include "dynamic_buffer.h"   #include "program.h"   #include "las.h"   #include "docode.h"   #include "main.h"
pike.git/src/peep.c:19:   #include "peep.h"   #include "dmalloc.h"   #include "stuff.h"   #include "bignum.h"   #include "opcodes.h"   #include "builtin_functions.h"   #include "constants.h"   #include "interpret.h"   #include "pikecode.h"    - RCSID("$Id: peep.c,v 1.79 2002/11/02 14:58:08 grubba Exp $"); + RCSID("$Id: peep.c,v 1.80 2002/11/04 09:41:48 grubba Exp $");      static void asm_opt(void);      dynamic_buffer instrbuf;      static int hasarg(int opcode)   {    return instrs[opcode-F_OFFSET].flags & I_HASARG;   }   
pike.git/src/peep.c:469: Inside #if defined(ADJUST_PIKE_PC)
   if (instrs[c->opcode - F_OFFSET].flags & I_PC_AT_NEXT)    ADJUST_PIKE_PC (PIKE_PC);   #endif      #ifdef PIKE_DEBUG    if (instrs[c->opcode - F_OFFSET].flags & I_HASPOINTER) {    if ((e+1 < length) || c[1].opcode != F_POINTER) {    Pike_fatal("Expected instruction %s to be followed by a pointer.\n"    "Got %s\n.",    instrs[c->opcode - F_OFFSET].name, -  (e+1 < length)?instrs[c[1]->opcode - F_OFFSET].name:"EOI"); +  (e+1 < length)?instrs[c[1].opcode - F_OFFSET].name:"EOI");    }    }   #endif /* PIKE_DEBUG */      #ifdef ALIGN_PIKE_JUMPS    if(e+1 < length)    {    /* FIXME: Note that this code won't work for opcodes of type    * I_ISJUMPARG or I_ISJUMPARGS, since c may already    * have been advanced to the corresponding F_POINTER.