--- gforth/see.fs 1999/05/20 13:31:57 1.23 +++ gforth/see.fs 1999/11/20 12:12:52 1.24 @@ -629,7 +629,7 @@ IS discode \G etc.) is lost. name find-name dup 0= IF - drop -&13 bounce + drop -&13 throw THEN name-see ;