mirror of
https://github.com/iritmaximus/haskell.git
synced 2026-10-12 19:13:39 +03:00
upgrade to stackage snapshot lts-17.10, GHC 8.10.4
This commit is contained in:
@@ -9,8 +9,8 @@ where
|
||||
import Data.Char
|
||||
import Data.List
|
||||
import Data.Maybe
|
||||
import Language.Haskell.TH
|
||||
import Language.Haskell.TH.Syntax
|
||||
import Language.Haskell.TH hiding (reifyType)
|
||||
import Language.Haskell.TH.Syntax hiding (reifyType)
|
||||
|
||||
-- testing presence of definitions
|
||||
|
||||
@@ -238,7 +238,7 @@ unqualify (AppE f x) = AppE (unqualify f) (unqualify x)
|
||||
unqualify (InfixE mleft op mright) = InfixE (fmap unqualify mleft) (unqualify op) (fmap unqualify mright)
|
||||
unqualify (UInfixE left op right) = UInfixE (unqualify left) (unqualify op) (unqualify right)
|
||||
unqualify (LitE l) = LitE l
|
||||
unqualify (TupE exps) = TupE (map unqualify exps)
|
||||
unqualify (TupE exps) = TupE (map (fmap unqualify) exps)
|
||||
unqualify (ListE exps) = ListE (map unqualify exps)
|
||||
unqualify (ArithSeqE (FromR x)) = ArithSeqE (FromR (unqualify x))
|
||||
unqualify x = error $ "Unsupported: " ++ show x
|
||||
|
||||
@@ -1,2 +1,2 @@
|
||||
resolver: lts-16.31
|
||||
resolver: lts-17.10
|
||||
install-ghc: true
|
||||
|
||||
@@ -4,5 +4,5 @@ build-type: Simple
|
||||
cabal-version: >= 1.10
|
||||
|
||||
library
|
||||
build-depends: QuickCheck, hspec, base, containers, array, transformers, template-haskell, generic-random, JuicyPixels, HTTP, text, bytestring, wai, warp
|
||||
build-depends: QuickCheck, hspec, base, containers, array, transformers, template-haskell, generic-random, JuicyPixels, HTTP, text, bytestring, wai, warp, sqlite-simple, hedgehog
|
||||
default-language: Haskell2010
|
||||
|
||||
Reference in New Issue
Block a user