ui.text.core-text: fix jumping "def".

diff --git a/basis/ui/text/core-text/core-text.factor b/basis/ui/text/core-text/core-text.factor
index 7636349b87221f1085894a09fd3d8e619edca2be..3f66ae60cd41aef1aee01d6cb6cdac99951587a9 100644 (file)
--- a/basis/ui/text/core-text/core-text.factor
+++ b/basis/ui/text/core-text/core-text.factor
@@ -12,13 +12,13 @@ SINGLETON: core-text-renderer
 <PRIVATE
 
 : unscale ( m -- n )
-    retina? get-global [ 2 /i ] when ; inline
+    retina? get-global [ 2.0 / ] when ; inline
 
 : scale ( m -- n )
-    retina? get-global [ 2 * ] when ; inline
+    retina? get-global [ 2.0 * ] when ; inline
 
 : scale-dim ( dim -- dim' )
-    retina? get-global [ [ 2 /i ] map ] when ; inline
+    retina? get-global [ [ 2.0 / ] map ] when ; inline
 
 : scale-metrics ( metrics -- metrics' )
     retina? get-global [