1. Bryan O'Sullivan
  2. text

Commits

tibbe  committed 763d5b0

Inline mconcat

  • Participants
  • Parent commits 6923347
  • Branches default

Comments (0)

Files changed (1)

File Data/Text/Lazy/Builder.hs

View file
    {-# INLINE mempty #-}
    mappend = append
    {-# INLINE mappend #-}
+   mconcat = foldr mappend mempty
+   {-# INLINE mconcat #-}
 
 instance String.IsString Builder where
     fromString = fromString