core-text: change metrics>dim not to ceiling.

diff --git a/basis/core-text/core-text.factor b/basis/core-text/core-text.factor
index ab0b857b3815b24e62cac3528b94abd1fd5ef9da..8a7b496967c13ed0f15b62f7de2d61b34fc61bf1 100644 (file)
--- a/basis/core-text/core-text.factor
+++ b/basis/core-text/core-text.factor
@@ -77,9 +77,7 @@ render-loc render-dim ;
     compute-height ;
 
 : metrics>dim ( bounds -- dim )
-    [ width>> ] [ [ ascent>> ] [ descent>> ] bi + ] bi
-    [ ceiling >integer ]
-    bi@ 2array ;
+    [ width>> ] [ [ ascent>> ] [ descent>> ] bi + ] bi 2array ;
 
 : fill-background ( context font dim -- )
     [ background>> >rgba-components CGContextSetRGBFillColor ]