--- gforth/engine/threaded.h	2000/12/24 15:54:18	1.9
+++ gforth/engine/threaded.h	2001/01/06 19:29:15	1.10
@@ -393,4 +393,4 @@
 #endif /* !defined(DOUBLY_INDIRECT) */
 
 #define NEXT ({DEF_CA NEXT_P1; NEXT_P2;})
-#define ipTOS NEXT_INST
+#define IPTOS NEXT_INST