Tweak documentation

Author: Bodigrim

src/Data/Text/Array.hs

@@ -134,12 +134,11 @@ unsafeIndex (ByteArray arr) i@(I# i#) =
   case indexWord8Array# arr i# of r# -> (W8# r#)
 {-# INLINE unsafeIndex #-}
 
--- | 'sizeofMutableByteArray#' is deprecated, because it is unsafe in the presence of
--- 'shrinkMutableByteArray#' and 'resizeMutableByteArray#'.
---
--- @since 2.0
+-- | @since 2.0
 getSizeofMArray :: MArray s -> ST s Int
 getSizeofMArray (MutableByteArray marr) = ST $ \s0# ->
+  -- Cannot simply use (deprecated) 'sizeofMutableByteArray#', because it is
+  -- unsafe in the presence of 'shrinkMutableByteArray#' and 'resizeMutableByteArray#'.
   case getSizeofMutableByteArray# marr s0# of
     (# s1#, word8len# #) -> (# s1#, I# word8len# #)
 

src/Data/Text/Internal/Encoding/Utf8.hs

@@ -68,6 +68,7 @@ between x y z = x >= y && x <= z
 --   | ord c < 0x800   = 2
 --   | ord c < 0x10000 = 3
 --   | otherwise       = 4
+-- Implementation suggested by Alex Mason.
 
 -- | @since 2.0
 utf8Length :: Char -> Int