--- gforth/see.fs	2004/06/19 15:32:31	1.54
+++ gforth/see.fs	2004/12/28 19:51:44	1.55
@@ -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