--- gforth/see.fs	2004/06/19 15:32:31	1.54
+++ gforth/see.fs	2004/12/31 13:23:58	1.56
@@ -1,6 +1,6 @@
 \ SEE.FS       highend SEE for ANSforth                16may93jaw
 
-\ Copyright (C) 1995,2000,2003 Free Software Foundation, Inc.
+\ Copyright (C) 1995,2000,2003,2004 Free Software Foundation, Inc.
 
 \ This file is part of Gforth.
 
@@ -673,13 +673,15 @@ Defer discode ( addr u -- ) \ gforth
     cell +loop
     here ;
 
+[ifundef] umin \ !! bootstrapping help
 : umin ( u1 u2 -- u )
     2dup u>
     if
 	swap
     then
     drop ;
-	
+[then]
+
 : next-prim ( addr1 -- addr2 ) \ gforth
     \G find the next primitive after addr1 (unreliable)
     1+ >r -1 primstart