@@ -13,7 +13,9 @@ import qualified Data.IntMap as IntMap
13import Data.Map (Map)
13import Data.Map (Map)
14import qualified Data.Map as Map
14import qualified Data.Map as Map
15import Data.Maybe
15import Data.Maybe
16+#if MIN_VERSION_base(4,9,0)
16import Data.Semigroup (Option(..))
17import Data.Semigroup (Option(..))
18--TODO: See if there's a better class in the standard libraries already
20--TODO: See if there's a better class in the standard libraries already