From 4cd05aedb926207c98d597f23c3f6d4caa6eed89 Mon Sep 17 00:00:00 2001 From: Daniel Gröber Date: Sat, 26 Jan 2019 15:15:07 +0100 Subject: Update stack_resolver_table --- tests/GhcSession.hs | 19 +++++++++++-------- 1 file 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 () -- cgit v1.2.3