@@ -346,7 +346,7 @@ append (Text arr1 off1 len1) (Text arr2 off2 len2) = Text (A.run x) 0 len
347 arr <- A.unsafeNew len
347 arr <- A.unsafeNew len
348 A.copyI arr 0 arr1 off1 len1
348 A.copyI arr 0 arr1 off1 len1
349− A.copyI arr len1 arr2 off2 (len1+len2)
349+ A.copyI arr len1 arr2 off2 len
350 return arr
350 return arr
351{-# INLINE append #-}
351{-# INLINE append #-}