]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/ui/text/core-text/core-text.factor
basis/extra: replace "/ >integer" with "/i" in a few places.
[factor.git] / basis / ui / text / core-text / core-text.factor
index 4225884aef23f936598060f665ce40e6dc4a3b18..80353404a5b26bce6e36f9040e99ea7ed9b71ad3 100644 (file)
@@ -54,8 +54,8 @@ M:: core-text-renderer x>offset ( x font string -- n )
     ] if-empty ;
 
 M:: core-text-renderer offset>x ( n font string -- x )
-    font string cached-line line>> 
-    0 n string subseq utf16n encode length 2 / >integer
+    font string cached-line line>>
+    0 n string subseq utf16n encode length 2 /i
     f
     CTLineGetOffsetForStringIndex unscale ;