on master help sign in
Remove a rewrite rule that makes GHC 7.4.1 ill
b92886bBryan O'Sullivan
Data/Text.hs−2
@@ -1439,8 +1439,6 @@ isPrefixOf a@(Text _ _ alen) b@(Text _ _ blen) =
1439{-# RULES
1439{-# RULES
1440"TEXT isPrefixOf -> fused" [~1] forall s t.
1440"TEXT isPrefixOf -> fused" [~1] forall s t.
1441 isPrefixOf s t = S.isPrefixOf (stream s) (stream t)
1441 isPrefixOf s t = S.isPrefixOf (stream s) (stream t)
1442−"TEXT isPrefixOf -> unfused" [1] forall s t.
1443− S.isPrefixOf (stream s) (stream t) = isPrefixOf s t
1444 #-}
1442 #-}
1445
1443
1446-- | /O(n)/ The 'isSuffixOf' function takes two 'Text's and returns
1444-- | /O(n)/ The 'isSuffixOf' function takes two 'Text's and returns