@@ -76,7 +76,7 @@ empty = Text A.empty 0 0
76-- memory if its length has dwindled to zero.
76-- memory if its length has dwindled to zero.
77text :: A.Array -> Int -> Int -> Text
77text :: A.Array -> Int -> Int -> Text
78text arr off len | len == 0 = empty
78text arr off len | len == 0 = empty
79− | otherwise = text arr off len
79+ | otherwise = text_ arr off len
80{-# INLINE text #-}
80{-# INLINE text #-}
82textP :: A.Array -> Int -> Int -> Text
82textP :: A.Array -> Int -> Int -> Text