@@ -1,3 +1,4 @@
1+{-# LANGUAGE CPP #-}
12{-# LANGUAGE DeriveTraversable #-}
23{-# LANGUAGE FlexibleContexts #-}
34{-# LANGUAGE FlexibleInstances #-}
@@ -24,7 +25,9 @@ import Data.List
2425import Data.Map (Map)
2526import qualified Data.Map as Map
2627import Data.Maybe
28+#if !MIN_VERSION_base(4,10,0)
2729import Data.Semigroup (Semigroup (..), (<>))
30+#endif
2831import qualified Data.Set as Set
2932import Data.These (These(..))
3033import Data.Tuple