view Paper/src/cbc-interp-next.cbc @ 67:60a15dd5023c

fix abst
author Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Mon, 19 Nov 2018 16:10:39 +0900
parents f01d5bc55dea
children
line wrap: on
line source

#define NEXT_OP(i) (i->op = *(MVMuint16 *)(i->cur_op), i->cur_op += 2, i->op)

#define DISPATCH(op) {goto (CODES[op])(i);}
#define OP(name) OP_ ## name
#define NEXT(i) CODES[NEXT_OP(i)](i)
static int tracing_enabled = 0;

__code cbc_next(INTERP i){
    goto NEXT(i);
}