Mercurial > hg > Papers > 2019 > anatofuz-prosym

view Paper/src/cbc-interp-next.cbc @ 98:b360b0159390 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
update
author Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Fri, 11 Jan 2019 14:08:33 +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);
}