version 1.7, 2002/08/07 11:06:49
|
version 1.8, 2002/12/27 15:51:28
|
Line 65 void vm_print_profile(FILE *file);
|
Line 65 void vm_print_profile(FILE *file);
|
/* the cast in vm_Cell2Cell is needed because the base type for |
/* the cast in vm_Cell2Cell is needed because the base type for |
inst-stream is Cell, but *IP is an Inst */ |
inst-stream is Cell, but *IP is an Inst */ |
|
|
|
/* for future extensions */ |
|
#define IMM_ARG(access,value) (access) |
|
|
#define VM_IS_INST(inst, n) ((inst) == vm_prim[n]) |
#define VM_IS_INST(inst, n) ((inst) == vm_prim[n]) |
|
|
/* mini type-specific support functions */ |
/* mini type-specific support functions */ |