--- gforth/see.fs 2002/04/01 15:34:34 1.40 +++ gforth/see.fs 2002/09/14 11:18:57 1.41 @@ -483,7 +483,7 @@ c-extender ! ( end!) 2drop false EXIT THEN THEN \ jump over to extender, if any 26jan97jaw - 2 pick <> + xt>threaded 2 pick <> WHILE 2 cells + REPEAT nip cell+ perform