Merge pull request #70 from philburk/ignoreds
[pforth] / fth / numberio.fth
index 74d1006..05ec4da 100644 (file)
@@ -4,7 +4,7 @@
 \ numeric conversion
 \
 \ Author: Phil Burk
 \ numeric conversion
 \
 \ Author: Phil Burk
-\ Copyright 1994 3DO, Phil Burk, Larry Polansky, Devid Rosenboom
+\ Copyright 1994 3DO, Phil Burk, Larry Polansky, David Rosenboom
 \
 \ The pForth software code is dedicated to the public domain,
 \ and any third party may reproduce, distribute and modify
 \
 \ The pForth software code is dedicated to the public domain,
 \ and any third party may reproduce, distribute and modify
@@ -96,7 +96,7 @@ decimal
 
     base @ -rot                        ( base c-addr u )
 
 
     base @ -rot                        ( base c-addr u )
 
-    \ Regonize prefixes and change base if needed
+    \ Recognize prefixes and change base if needed
     over c@ >r                 ( base c-addr u  ) ( r: char )
     r@ [char] # = if rot drop 10 -rot 1 /string then
     r@ [char] $ = if rot drop 16 -rot 1 /string then
     over c@ >r                 ( base c-addr u  ) ( r: char )
     r@ [char] # = if rot drop 10 -rot 1 /string then
     r@ [char] $ = if rot drop 16 -rot 1 /string then