1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
|
if(!s) fatal("Allocation failed\n");
s->id=tokenv|0x8000;
s->addr=ptr-1;
s->next=labelstack;
labelstack=s;
}
break;
case OP_IF:
AddInst(OP_IF);
FlowPush(OP_IF);
peep=++ptr;
break;
case OP_THEN:
FlowPop(OP_IF);
cl->codes[flowptr[flowdepth]]=peep=ptr;
break;
|
|
|
|
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
|
if(!s) fatal("Allocation failed\n");
s->id=tokenv|0x8000;
s->addr=ptr-1;
s->next=labelstack;
labelstack=s;
}
break;
case OP_IF: case OP_OR: case OP_AND:
AddInst(tokenv);
FlowPush(OP_IF);
peep=++ptr;
break;
case OP_THEN:
FlowPop(OP_IF);
cl->codes[flowptr[flowdepth]]=peep=ptr;
break;
|