@@ -222,10 +222,11 @@ snoc t c = foldrChunks Chunk (singleton c) t
222 unstream (S.snoc (stream t) c) = snoc t c
222 unstream (S.snoc (stream t) c) = snoc t c
225−-- | /O(n\/c)/ Append two 'Text's
225+-- | /O(n\/c)/ Appends one 'Text' to another. Subject to array
226append :: Text -> Text -> Text
227append :: Text -> Text -> Text
227append xs ys = foldrChunks Chunk ys xs
228append xs ys = foldrChunks Chunk ys xs
228−{-# INLINE append #-}
229+{-# INLINE [1] append #-}
231"LAZY TEXT append -> fused" [~1] forall t1 t2.
232"LAZY TEXT append -> fused" [~1] forall t1 t2.