93f48a8 · text · git.iko.soy

git.iko.soy/text

Merge pull request #125 from Jubobs/master

Fix some typos

commit93f48a8d78c0402858fc3ca00b14c499f7805d2c authorBryan O'Sullivan <bos@serpentine.com> dateTue 22 Dec 2015, 11:11 (11 years ago) parent75726f0 8758ad9

3 files changed+6−6

compare with master

unifiedsplit

Data/Text.hs+2−2 Data/Text/Internal/Fusion/Common.hs+2−2 Data/Text/Lazy.hs+2−2

Data/Text.hs+2−2

@@ -912,13 +912,13 @@ concatMap f = concat . foldr ((:) . f) []

912912{-# INLINE concatMap #-}

913913

914914-- | /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.

916916any :: (Char -> Bool) -> Text -> Bool

917917any p t = S.any p (stream t)

918918{-# INLINE any #-}

919919

920920-- | /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.

922922all :: (Char -> Bool) -> Text -> Bool

923923all p t = S.all p (stream t)

924924{-# INLINE all #-}

Data/Text/Internal/Fusion/Common.hs+2−2

@@ -593,7 +593,7 @@ concatMap f = foldr (append . f) empty

593593{-# INLINE [0] concatMap #-}

594594

595595-- | /O(n)/ any @p @xs determines if any character in the stream

596−-- @xs@ satisifes the predicate @p@.

596+-- @xs@ satisfies the predicate @p@.

597597any :: (Char -> Bool) -> Stream Char -> Bool

598598any p (Stream next0 s0 _len) = loop_any s0

599599 where

@@ -605,7 +605,7 @@ any p (Stream next0 s0 _len) = loop_any s0

605605{-# INLINE [0] any #-}

606606

607607-- | /O(n)/ all @p @xs determines if all characters in the 'Text'

608−-- @xs@ satisify the predicate @p@.

608+-- @xs@ satisfy the predicate @p@.

609609all :: (Char -> Bool) -> Stream Char -> Bool

610610all p (Stream next0 s0 _len) = loop_all s0

611611 where

Data/Text/Lazy.hs+2−2

@@ -881,13 +881,13 @@ concatMap f = concat . foldr ((:) . f) []

881881{-# INLINE concatMap #-}

882882

883883-- | /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.

885885any :: (Char -> Bool) -> Text -> Bool

886886any p t = S.any p (stream t)

887887{-# INLINE any #-}

888888

889889-- | /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.

891891all :: (Char -> Bool) -> Text -> Bool

892892all p t = S.all p (stream t)

893893{-# INLINE all #-}