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 },