@@ -13,7 +13,9 @@ import Data.Traversable
1313import Control.Monad hiding (mapM, mapM_, forM_, forM, sequence)
1414import Control.Monad.Reader hiding (mapM, mapM_, forM_, forM, sequence)
1515import GHC.Exts
16+#if !MIN_VERSION_base(4,8,0)
1617import Control.Applicative
18+#endif
1719import Data.Dependent.Map (DMap, DSum (..))
1820import qualified Data.Dependent.Map as DMap
1921import Data.GADT.Compare