core: map-integers -> map-integers-as

[factor.git] / extra / geohash / geohash.factor

diff --git a/extra/geohash/geohash.factor b/extra/geohash/geohash.factor
index 993e62e9c5c90a49ff6992011e175e7677acb2a4..25eeb2e1995253339baf2d8be439136bb2d60f3a 100644 (file)
--- a/extra/geohash/geohash.factor
+++ b/extra/geohash/geohash.factor
@@ -39,7 +39,7 @@ IN: geohash
 <<
 CONSTANT: base32-alphabet $[ "0123456789bcdefghjkmnpqrstuvwxyz" >byte-array ]
 >>
-CONSTANT: base32-inverse $[ 256 [ base32-alphabet index 0xff or ] B{ } map-integers ]
+CONSTANT: base32-inverse $[ 256 [ base32-alphabet index 0xff or ] B{ } map-integers-as ]
 
 : base32-encode ( x -- str )
     -59 12 [