git.iko.soy/typeable/pandoc
on master help sign in
Remove an inline monad compatibility macro.
1cdebe1Jesse Rosenthal
src/Text/Pandoc/Pretty.hs−12
compare with master
unifiedsplit
@@ -126,18 +126,6 @@ isEmpty = null . toList . unDoc
126empty :: Doc
126empty :: Doc
127empty = mempty
127empty = mempty
128
128
129−#if MIN_VERSION_base(4,5,0)
130−-- (<>) is defined in Data.Monoid
131−#else
132−infixr 6 <>
133−
134−-- | An infix synonym for 'mappend'.
135−-- @a <> b@ is the result of concatenating @a@ with @b@.
136−(<>) :: Monoid m => m -> m -> m
137−(<>) = mappend
138−{-# INLINE (<>) #-}
139−#endif
140−
141-- | Concatenate a list of 'Doc's.
129-- | Concatenate a list of 'Doc's.
142cat :: [Doc] -> Doc
130cat :: [Doc] -> Doc
143cat = mconcat
131cat = mconcat