aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--tests/GhcSession.hs19
1 files changed, 11 insertions, 8 deletions
diff --git a/tests/GhcSession.hs b/tests/GhcSession.hs
index 0d20a5f..0a62d2e 100644
--- a/tests/GhcSession.hs
+++ b/tests/GhcSession.hs
@@ -13,11 +13,12 @@ import GHC.Paths (libdir)
import Outputable
import DynFlags
-import Control.Arrow ((***))
+import Control.Arrow (second)
import qualified Control.Exception as E
import Control.Monad
import Control.Monad.IO.Class
import Data.List
+import Data.Tuple
import Data.Version
import qualified Data.Map as Map
import System.Environment (getArgs)
@@ -388,13 +389,15 @@ stackProjSetup ghcVer =
}
stack_resolver_table :: [(Version, String)]
-stack_resolver_table = map (parseVer *** ("lts-"++))
- [ ("7.10.3", "6.35")
- , ("8.0.1", "7.24")
- , ("8.0.2", "9.21")
- , ("8.2.2", "11.22")
- , ("8.4.3", "12.14")
- , ("8.4.4", "12.19")
+stack_resolver_table = map (swap . second parseVer)
+ [ ("lts-13.5", "8.6.3")
+ , ("lts-12.26", "8.4.4")
+ , ("lts-12.14", "8.4.3")
+ , ("lts-11.22", "8.2.2")
+ , ("lts-9.21", "8.0.2")
+ , ("lts-7.24", "8.0.1")
+ , ("lts-6.35", "7.10.3")
+ , ("lts-3.22", "7.10.2")
]
copyStackYamls :: FilePath -> FilePath -> IO ()