From c1e474f005c99ca3d2210411389970f5da55c422 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Mon, 9 Nov 2015 11:15:11 -0800 Subject: Restored Text.Pandoc.Compat.Monoid. Don't use custom prelude for latest ghc. This is a better approach to making 'stack ghci' and 'cabal repl' work. Instead of using NoImplicitPrelude, we only use the custom prelude for older ghc versions. The custom prelude presents a uniform API that matches the current base version's prelude. So, when developing (presumably with latest ghc), we don't use a custom prelude at all and hence have no trouble with ghci. The custom prelude no longer exports (<>): we now want to match the base 4.8 prelude behavior. --- src/Text/Pandoc/Compat/Monoid.hs | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 src/Text/Pandoc/Compat/Monoid.hs (limited to 'src/Text/Pandoc/Compat') diff --git a/src/Text/Pandoc/Compat/Monoid.hs b/src/Text/Pandoc/Compat/Monoid.hs new file mode 100644 index 000000000..4daceb8e1 --- /dev/null +++ b/src/Text/Pandoc/Compat/Monoid.hs @@ -0,0 +1,17 @@ +{-# LANGUAGE CPP #-} +module Text.Pandoc.Compat.Monoid ( (<>) ) + where + +#if MIN_VERSION_base(4,5,0) +import Data.Monoid ((<>)) + +#else +import Data.Monoid + +infixr 6 <> + +--- | An infix synonym for 'mappend'. +(<>) :: Monoid m => m -> m -> m +(<>) = mappend +{-# INLINE (<>) #-} +#endif -- cgit v1.2.3