pike.git / src / lex.c

version» Context lines:

pike.git/src/lex.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: lex.c,v 1.88 2001/05/10 22:14:37 hubbe Exp $"); + RCSID("$Id: lex.c,v 1.89 2001/06/26 21:03:49 hubbe Exp $");   #include "language.h"   #include "array.h"   #include "lex.h"   #include "stralloc.h"   #include "dynamic_buffer.h"   #include "constants.h"   #include "hashtable.h"   #include "stuff.h"   #include "pike_memory.h"   #include "interpret.h"
pike.git/src/lex.c:52: Inside #if defined(PIKE_DEBUG)
   fprintf(stderr,"Opcode usage: (opcode, runned, compiled)\n");    for(e=0;e<F_MAX_OPCODE-F_OFFSET;e++)    {    fprintf(stderr,":: %-30s %8ld %8ld\n",    low_get_f_name(e+F_OFFSET,0),    (long)instrs[e].runs,    (long)instrs[e].compiles);    }      #ifdef INSTR_PROFILING +  if(p_flag>1) +  { +  fprintf(stderr,"Opcode sequences: (runned, opcode, opcode)\n");    for(e=0;e<F_MAX_OPCODE-F_OFFSET;e++)    {    int d;    for(d=0;d<256;d++)    if(instrs[e].reruns[d])    fprintf(stderr,"%010ld::%s - %s\n",instrs[e].reruns[d],low_get_f_name(e+F_OFFSET,0),low_get_f_name(d+F_OFFSET,0));    } -  +  }   #endif    }   #endif   }      #define OPCODE0(OP,DESC) { DESC, OP, 0 },   #define OPCODE1(OP,DESC) { DESC, OP, I_HASARG },   #define OPCODE2(OP,DESC) { DESC, OP, I_TWO_ARGS },      #define OPCODE0_TAIL(OP,DESC) { DESC, OP, 0 },