From 0091ae4720b1a9a7eaf0316918771589da570ad7 Mon Sep 17 00:00:00 2001 From: Johan Tibell Date: Wed, 29 Aug 2012 18:08:56 -0700 Subject: [PATCH] Add missing file --- Data/Csv/Compat/Monoid.hs | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 Data/Csv/Compat/Monoid.hs diff --git a/Data/Csv/Compat/Monoid.hs b/Data/Csv/Compat/Monoid.hs new file mode 100644 index 0000000..66bbdff --- /dev/null +++ b/Data/Csv/Compat/Monoid.hs @@ -0,0 +1,14 @@ +{-# LANGUAGE CPP #-} +module Data.Csv.Compat.Monoid + ( (<>) + ) where + +import Data.Monoid + +#if !MIN_VERSION_base(4,5,0) +infixr 6 <> +-- | An infix synonym for 'mappend'. +(<>) :: Monoid m => m -> m -> m +(<>) = mappend +{-# INLINE (<>) #-} +#endif