1998-04-01
1998-04-01 00:47:49 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
-
596e3664cda06be2813326f2dd44c573d43c1c57
(11 lines)
(+6/-5)
[
Show
| Annotate
]
Branch: 7.9
optimized, improved and bugfixed
Rev: bin/mkpeep.pike:1.7
Rev: src/cpp.c:1.22
Rev: src/interpret.c:1.73
Rev: src/language.yacc:1.68
Rev: src/lex.c:1.47
Rev: src/peep.c:1.21
Rev: src/peep.in:1.14
12:
#include "peep.h"
#include "dmalloc.h"
- RCSID("$Id: peep.c,v 1.20 1998/03/31 21:52:23 hubbe Exp $");
+ RCSID("$Id: peep.c,v 1.21 1998/04/01 00:47:48 hubbe Exp $");
struct p_instr_s
{
59: Inside #if defined(DEBUG)
#ifdef DEBUG
if(!hasarg(f) && b)
- fatal("hasarg() is wrong!\n");
+ fatal("hasarg(%d) is wrong!\n",f);
#endif
p=(p_instr *)low_make_buf_space(sizeof(p_instr), &instrbuf);
82: Inside #if defined(DEBUG)
{
#ifdef DEBUG
if(hasarg(f))
- fatal("hasarg() is wrong!\n");
+ fatal("hasarg(%d) is wrong!\n",f);
#endif
return insert_opcode(f,0,current_line, current_file);
}
340: Inside #if defined(DEBUG)
#ifdef DEBUG
if(!hasarg(f) && b)
- fatal("hasarg() is wrong!\n");
+ fatal("hasarg(%d) is wrong!\n",f);
#endif
p=(p_instr *)low_make_buf_space(sizeof(p_instr), &instrbuf);
368: Inside #if defined(DEBUG)
{
#ifdef DEBUG
if(hasarg(f))
- fatal("hasarg() is wrong!\n");
+ fatal("hasarg(%d) is wrong!\n",f);
#endif
return insopt(f,0,cl, cf);
}