--- gforth/kernel/int.fs	2006/01/18 12:56:13	1.124
+++ gforth/kernel/int.fs	2006/01/27 10:43:52	1.125
@@ -136,7 +136,7 @@ const Create bases   0A , 10 ,   2 ,   0
     x@+/string 0 s" '" 2rot string-prefix? ;
 
 : s>unumber? ( addr u -- ud flag ) \ gforth
-    \G converts string addr len into ud, flag indicates success
+    \G converts string addr u into ud, flag indicates success
     dpl on
     over c@ '' = if
 	1 /string s'>unumber? exit
@@ -159,8 +159,8 @@ const Create bases   0A , 10 ,   2 ,   0
     r> base ! ;
 
 \ ouch, this is complicated; there must be a simpler way - anton
-: s>number? ( addr len -- d f ) \ gforth
-    \G converts string addr len into d, flag indicates success
+: s>number? ( addr u -- d f ) \ gforth
+    \G converts string addr u into d, flag indicates success
     sign? >r
     s>unumber?
     0= IF