--- gforth/vmgen-ex/engine.c 2002/08/07 11:06:49 1.9 +++ gforth/vmgen-ex/engine.c 2002/08/20 07:59:02 1.10 @@ -132,10 +132,9 @@ #define NEXT ({DEF_CA NEXT_P1; NEXT_P2;}) #define IPTOS NEXT_INST -#define CASE #define INST_ADDR(name) (Label)&&I_##name -#define LABEL(name) I_##name +#define LABEL(name) I_##name: #else /* !defined(__GNUC__) */ /* use switch dispatch */ #define DEF_CA @@ -148,10 +147,12 @@ #define INC_IP(const_inc) (ip+=(const_inc)) #define IPTOS NEXT_INST #define INST_ADDR(name) I_##name -#define LABEL(name) case I_##name +#define LABEL(name) case I_##name: #endif /* !defined(__GNUC__) */ +#define LABEL2(x) + #ifdef VM_PROFILING #define SUPER_END vm_count_block(IP) #else