--- gforth/see.fs	2002/01/04 20:31:54	1.38
+++ gforth/see.fs	2002/01/26 16:31:40	1.39
@@ -584,10 +584,7 @@ Defer discode ( addr u -- ) \ gforth
 
 : seecode ( xt -- )
     dup s" Code" .defname
-    threading-method
-    if
-	>code-address
-    then
+    >code-address
     dup in-dictionary? \ user-defined code word?
     if
 	dup next-head