--- gforth/engine/engine.c 2003/08/22 08:08:46 1.66 +++ gforth/engine/engine.c 2003/10/09 14:15:20 1.68 @@ -19,6 +19,9 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. */ +#define USE_NO_TOS +#define USE_NO_FTOS + #include "config.h" #include "forth.h" #include @@ -233,7 +236,8 @@ extern int gforth_memcmp(const char * s1 #error illegal ENGINE value #endif /* ENGINE */ -#define LABEL2(name) K_##name: +/* the asm(""); is there to get a stop compiled on Itanium */ +#define LABEL2(name) K_##name: asm(""); Label *engine(Xt *ip0, Cell *sp0, Cell *rp0, Float *fp0, Address lp0) /* executes code at ip, if ip!=NULL