version 1.1, 2002/06/02 15:46:17
|
version 1.4, 2003/08/25 14:17:56
|
Line 1
|
Line 1
|
/* vm disassembler wrapper |
/* vm disassembler wrapper |
|
|
Copyright (C) 2001 Free Software Foundation, Inc. |
Copyright (C) 2001,2002,2003 Free Software Foundation, Inc. |
|
|
This file is part of Gforth. |
This file is part of Gforth. |
|
|
Line 21
|
Line 21
|
|
|
#include "mini.h" |
#include "mini.h" |
|
|
|
#define IP (ip+1) |
|
#define IPTOS IP[0] |
|
|
void vm_disassemble(Inst *ip, Inst *endp, Label vm_prim[]) |
void vm_disassemble(Inst *ip, Inst *endp, Label vm_prim[]) |
{ |
{ |
while (ip<endp) { |
while (ip<endp) { |