--- gforth/engine/main.c 2010/04/05 22:17:56 1.229 +++ gforth/engine/main.c 2010/04/20 19:27:12 1.230 @@ -412,7 +412,7 @@ void gforth_relocate(Cell *image, const case CF(DODEFER) : case CF(DOFIELD) : case CF(DOABICODE) : MAKE_CF(image+i,symbols[CF(token)]); break; - case CF(DOESJUMP): image[i]=0; break; + case CF(DOESJUMP): assert(0); image[i]=0; break; #endif /* !defined(DOUBLY_INDIRECT) */ case CF(DODOES) : MAKE_DOES_CF(image+i,(Xt *)(image[i+1]+((Cell)start)));