@@ -1,3 +1,4 @@
1+{-# LANGUAGE CPP #-}
12{-# LANGUAGE DeriveGeneric #-}
23{-# LANGUAGE GeneralizedNewtypeDeriving #-}
34{-
@@ -80,7 +81,11 @@ data Term =
8081 deriving (Show, Eq, Ord, Generic, Enum, Read)
8182
8283newtype Translations = Translations (M.Map Term String)
84+#if MIN_VERSION_base(4,9,0)
85+ deriving (Show, Generic, Semigroup, Monoid)
86+#else
8387 deriving (Show, Generic, Monoid)
88+#endif
8489
8590instance FromJSON Term where
8691 parseJSON (String t) = case safeRead (T.unpack t) of