Branch: Tag:

2000-04-21

2000-04-21 00:29:48 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more opcodes formalized..

Rev: src/interpret.c:1.145
Rev: src/interpret_functions.h:1.15
Rev: src/interpreter.h:1.43
Rev: src/lex.c:1.77
Rev: src/peep.c:1.31

5:   \*/   /**/   #include "global.h" - RCSID("$Id: interpret.c,v 1.144 2000/04/19 16:03:30 mast Exp $"); + RCSID("$Id: interpret.c,v 1.145 2000/04/21 00:29:48 hubbe Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"
417:   #define DOJUMP() \    do { int tmp; tmp=EXTRACT_INT(pc); pc+=tmp; if(tmp < 0) fast_check_threads_etc(6); }while(0)    + #define SKIPJUMP() pc+=sizeof(INT32) +    #define COMPARISMENT(ID,EXPR) \   CASE(ID); \   instr=EXPR; \
522:   }      #endif -  +    static int o_catch(unsigned char *pc);      #ifdef PIKE_DEBUG