git.iko.soy/text
on master help sign in
Merge pull request #125 from Jubobs/master
93f48a8Bryan O'Sullivan
Data/Text.hs+2−2
compare with master
unifiedsplit
@@ -912,13 +912,13 @@ concatMap f = concat . foldr ((:) . f) []
912{-# INLINE concatMap #-}
912{-# INLINE concatMap #-}
913
913
914-- | /O(n)/ 'any' @p@ @t@ determines whether any character in the
914-- | /O(n)/ 'any' @p@ @t@ determines whether any character in the
915−-- 'Text' @t@ satisifes the predicate @p@. Subject to fusion.
915+-- 'Text' @t@ satisfies the predicate @p@. Subject to fusion.
916any :: (Char -> Bool) -> Text -> Bool
916any :: (Char -> Bool) -> Text -> Bool
917any p t = S.any p (stream t)
917any p t = S.any p (stream t)
918{-# INLINE any #-}
918{-# INLINE any #-}
919
919
920-- | /O(n)/ 'all' @p@ @t@ determines whether all characters in the
920-- | /O(n)/ 'all' @p@ @t@ determines whether all characters in the
921−-- 'Text' @t@ satisify the predicate @p@. Subject to fusion.
921+-- 'Text' @t@ satisfy the predicate @p@. Subject to fusion.
922all :: (Char -> Bool) -> Text -> Bool
922all :: (Char -> Bool) -> Text -> Bool
923all p t = S.all p (stream t)
923all p t = S.all p (stream t)
924{-# INLINE all #-}
924{-# INLINE all #-}
Data/Text/Internal/Fusion/Common.hs+2−2
@@ -593,7 +593,7 @@ concatMap f = foldr (append . f) empty
593{-# INLINE [0] concatMap #-}
593{-# INLINE [0] concatMap #-}
594
594
595-- | /O(n)/ any @p @xs determines if any character in the stream
595-- | /O(n)/ any @p @xs determines if any character in the stream
596−-- @xs@ satisifes the predicate @p@.
596+-- @xs@ satisfies the predicate @p@.
597any :: (Char -> Bool) -> Stream Char -> Bool
597any :: (Char -> Bool) -> Stream Char -> Bool
598any p (Stream next0 s0 _len) = loop_any s0
598any p (Stream next0 s0 _len) = loop_any s0
599 where
599 where
@@ -605,7 +605,7 @@ any p (Stream next0 s0 _len) = loop_any s0
605{-# INLINE [0] any #-}
605{-# INLINE [0] any #-}
606
606
607-- | /O(n)/ all @p @xs determines if all characters in the 'Text'
607-- | /O(n)/ all @p @xs determines if all characters in the 'Text'
608−-- @xs@ satisify the predicate @p@.
608+-- @xs@ satisfy the predicate @p@.
609all :: (Char -> Bool) -> Stream Char -> Bool
609all :: (Char -> Bool) -> Stream Char -> Bool
610all p (Stream next0 s0 _len) = loop_all s0
610all p (Stream next0 s0 _len) = loop_all s0
611 where
611 where
Data/Text/Lazy.hs+2−2
@@ -881,13 +881,13 @@ concatMap f = concat . foldr ((:) . f) []
881{-# INLINE concatMap #-}
881{-# INLINE concatMap #-}
882
882
883-- | /O(n)/ 'any' @p@ @t@ determines whether any character in the
883-- | /O(n)/ 'any' @p@ @t@ determines whether any character in the
884−-- 'Text' @t@ satisifes the predicate @p@. Subject to fusion.
884+-- 'Text' @t@ satisfies the predicate @p@. Subject to fusion.
885any :: (Char -> Bool) -> Text -> Bool
885any :: (Char -> Bool) -> Text -> Bool
886any p t = S.any p (stream t)
886any p t = S.any p (stream t)
887{-# INLINE any #-}
887{-# INLINE any #-}
888
888
889-- | /O(n)/ 'all' @p@ @t@ determines whether all characters in the
889-- | /O(n)/ 'all' @p@ @t@ determines whether all characters in the
890−-- 'Text' @t@ satisify the predicate @p@. Subject to fusion.
890+-- 'Text' @t@ satisfy the predicate @p@. Subject to fusion.
891all :: (Char -> Bool) -> Text -> Bool
891all :: (Char -> Bool) -> Text -> Bool
892all p t = S.all p (stream t)
892all p t = S.all p (stream t)
893{-# INLINE all #-}
893{-# INLINE all #-}