git.iko.soy/text
on master help sign in
Check empty chunk invariant properly
94d4857Bryan O'Sullivan
Data/Text/Lazy.hs+1−1
compare with master
unifiedsplit
@@ -277,7 +277,7 @@ toStrict t = T.concat (toChunks t)
277{-# INLINE [1] toStrict #-}
277{-# INLINE [1] toStrict #-}
278
278
279fromStrict :: T.Text -> Text
279fromStrict :: T.Text -> Text
280−fromStrict t = Chunk t Empty
280+fromStrict t = chunk t Empty
281{-# INLINE [1] fromStrict #-}
281{-# INLINE [1] fromStrict #-}
282
282
283cons :: Char -> Text -> Text
283cons :: Char -> Text -> Text