Return to disasm.c CVS log | Up to [gforth] / gforth / vmgen-ex |
version 1.1, 2001/04/29 11:28:23 | version 1.2, 2002/08/07 10:11:18 |
---|---|
Line 21 | Line 21 |
#include "mini.h" | #include "mini.h" |
void vm_disassemble(Inst *ip, Inst *endp, Inst prim[]) | #define IP (ip+1) |
#define IPTOS IP[0] | |
void vm_disassemble(Inst *ip, Inst *endp, Inst vm_prim[]) | |
{ | { |
while (ip<endp) { | while (ip<endp) { |
fprintf(vm_out,"%p: ",ip); | fprintf(vm_out,"%p: ",ip); |