Commits

Bryan O'Sullivan committed 133262d

Fix typos.

Comments (0)

Files changed (2)

 {-# INLINE foldr #-}
 
 -- | /O(n)/ A variant of 'foldr' that has no starting value argument,
--- and thust must be applied to a non-empty 'Text'.  Subject to
+-- and thus must be applied to a non-empty 'Text'.  Subject to
 -- fusion.
 foldr1 :: (Char -> Char -> Char) -> Text -> Char
 foldr1 f t = S.foldr1 f (stream t)

Data/Text/Lazy.hs

 {-# INLINE foldr #-}
 
 -- | /O(n)/ A variant of 'foldr' that has no starting value argument,
--- and thust must be applied to a non-empty 'Text'.  Subject to
+-- and thus must be applied to a non-empty 'Text'.  Subject to
 -- fusion.
 foldr1 :: (Char -> Char -> Char) -> Text -> Char
 foldr1 f t = S.foldr1 f (stream t)