git.iko.soy/text
on master help sign in
Ooops!
5b7aa7bBryan O'Sullivan
Data/Text.hs+1−1
compare with master
unifiedsplit
@@ -388,7 +388,7 @@ cons :: Char -> Text -> Text
388cons c t = unstream (S.cons (safe c) (stream t))
388cons c t = unstream (S.cons (safe c) (stream t))
389{-# INLINE cons #-}
389{-# INLINE cons #-}
390
390
391−infixr 5 cons
391+infixr 5 `cons`
392
392
393-- | /O(n)/ Adds a character to the end of a 'Text'. This copies the
393-- | /O(n)/ Adds a character to the end of a 'Text'. This copies the
394-- entire array in the process, unless fused. Subject to fusion.
394-- entire array in the process, unless fused. Subject to fusion.
Data/Text/Lazy.hs+1−1
@@ -392,7 +392,7 @@ cons :: Char -> Text -> Text
392cons c t = Chunk (T.singleton c) t
392cons c t = Chunk (T.singleton c) t
393{-# INLINE [1] cons #-}
393{-# INLINE [1] cons #-}
394
394
395−infixr 5 cons
395+infixr 5 `cons`
396
396
397{-# RULES
397{-# RULES
398"LAZY TEXT cons -> fused" [~1] forall c t.
398"LAZY TEXT cons -> fused" [~1] forall c t.