version 1.4, 2002/08/07 10:11:19
|
version 1.5, 2002/12/27 15:51:28
|
Line 42 typedef union Cell {
|
Line 42 typedef union Cell {
|
#define vm_a2Cell(_x,_cell) ((_cell).a=(_x)) |
#define vm_a2Cell(_x,_cell) ((_cell).a=(_x)) |
#define vm_Cell2Cell(_x,_y) ((_y)=(_x)) |
#define vm_Cell2Cell(_x,_y) ((_y)=(_x)) |
|
|
|
/* for future extensions */ |
|
#define IMM_ARG(access,value) (access) |
|
|
#define VM_IS_INST(_inst, n) ((_inst).inst == vm_prim[n]) |
#define VM_IS_INST(_inst, n) ((_inst).inst == vm_prim[n]) |
|
|
extern Label *vm_prim; |
extern Label *vm_prim; |