--- gforth/engine/main.c	2002/12/19 20:43:26	1.79
+++ gforth/engine/main.c	2002/12/19 23:22:19	1.80
@@ -893,6 +893,7 @@ void compile_prim1(Cell *start)
 Label compile_prim(Label prim)
 {
   Cell x=(Cell)prim;
+  assert(0);
   compile_prim1(&x);
   return (Label)x;
 }