on master help sign in
Fix compiler warning
commit4db31551f4ce49693e7a22bbe15f382c2de1d9e4 authorBryan O'Sullivan <bos@serpentine.com> dateSun 27 Apr 2014, 22:17 (12 years ago) parentbe120c5
1 file changed+1−1
Data/Text/Lazy.hs+1−1
Data/Text/Lazy.hs+1−1
@@ -985,7 +985,7 @@ dropEnd :: Int64 -> Text -> Text
985985dropEnd n t0
986986 | n <= 0 = t0
987987 | otherwise = dropChunk n . L.reverse . toChunks $ t0
988− where dropChunk m [] = empty
988+ where dropChunk _ [] = empty
989989 dropChunk m (t:ts)
990990 | m >= l = dropChunk (m-l) ts
991991 | otherwise = fromChunks . L.reverse $