Support GHC 9.12 (#151)
* Test 9.6 and 9.8 in CI * Support GHC 9.10 * Support GHC 9.12 --------- Co-authored-by: Tom Ellis <tom-git@jaguarpaw.co.uk>
This commit is contained in:
@@ -9,7 +9,7 @@ jobs:
|
|||||||
runs-on: ubuntu-latest
|
runs-on: ubuntu-latest
|
||||||
strategy:
|
strategy:
|
||||||
matrix:
|
matrix:
|
||||||
ghc: ['9.4.4', '9.2.6', '9.0.2', '8.10.7', '8.8.4', '8.6.5', '8.4.4', '8.2.2', '8.0.2']
|
ghc: ['9.12.1', '9.10.1', '9.8.2', '9.6.5', '9.4.4', '9.2.6', '9.0.2', '8.10.7', '8.8.4', '8.6.5', '8.4.4', '8.2.2', '8.0.2']
|
||||||
cabal: ['latest', 3.2]
|
cabal: ['latest', 3.2]
|
||||||
fail-fast: false
|
fail-fast: false
|
||||||
env:
|
env:
|
||||||
|
|||||||
+6
-3
@@ -25,6 +25,9 @@ tested-with:
|
|||||||
|| ==9.0.1
|
|| ==9.0.1
|
||||||
|| ==9.2.2
|
|| ==9.2.2
|
||||||
|| ==9.6.1
|
|| ==9.6.1
|
||||||
|
|| ==9.8.2
|
||||||
|
|| ==9.10.1
|
||||||
|
|| ==9.12.1
|
||||||
|
|
||||||
extra-source-files:
|
extra-source-files:
|
||||||
README.md
|
README.md
|
||||||
@@ -68,12 +71,12 @@ library
|
|||||||
build-depends:
|
build-depends:
|
||||||
array >=0.4 && <0.6
|
array >=0.4 && <0.6
|
||||||
, async >=2.0 && <2.3
|
, async >=2.0 && <2.3
|
||||||
, base >=4.6 && <4.20
|
, base >=4.6 && <4.22
|
||||||
, bytestring >=0.10 && <0.13
|
, bytestring >=0.10 && <0.13
|
||||||
, containers >=0.5 && <0.8
|
, containers >=0.5 && <0.8
|
||||||
, deepseq >=1.3 && <1.6
|
, deepseq >=1.3 && <1.6
|
||||||
, ghc-prim >=0.3 && <0.12
|
, ghc-prim >=0.3 && <0.14
|
||||||
, hashable >=1.2 && <1.5
|
, hashable >=1.2 && <1.6
|
||||||
, mtl >=2.1 && <2.4
|
, mtl >=2.1 && <2.4
|
||||||
, mtl-compat >=0.2 && <0.3
|
, mtl-compat >=0.2 && <0.3
|
||||||
, stm >=2.4 && <2.6
|
, stm >=2.4 && <2.6
|
||||||
|
|||||||
@@ -20,7 +20,7 @@ import Data.List (groupBy, sortBy)
|
|||||||
import Data.Maybe (Maybe (Nothing))
|
import Data.Maybe (Maybe (Nothing))
|
||||||
import Data.Ord (Ord, comparing)
|
import Data.Ord (Ord, comparing)
|
||||||
import qualified Data.Set as Set
|
import qualified Data.Set as Set
|
||||||
import GHC.Num ((*), (+), Num)
|
import Prelude ((*), (+), Num)
|
||||||
|
|
||||||
head :: (Foldable f) => f a -> Maybe a
|
head :: (Foldable f) => f a -> Maybe a
|
||||||
head = foldr (\x _ -> pure x) Nothing
|
head = foldr (\x _ -> pure x) Nothing
|
||||||
|
|||||||
@@ -35,7 +35,7 @@ import Data.Either (Either(Left, Right))
|
|||||||
import Data.Function ((.))
|
import Data.Function ((.))
|
||||||
import Data.List (null, head, last, tail, init, maximum, minimum, foldr1, foldl1, foldl1', (++))
|
import Data.List (null, head, last, tail, init, maximum, minimum, foldr1, foldl1, foldl1', (++))
|
||||||
|
|
||||||
import GHC.Num ((-))
|
import Prelude ((-))
|
||||||
import GHC.Show (show)
|
import GHC.Show (show)
|
||||||
|
|
||||||
liftMay :: (a -> Bool) -> (a -> b) -> (a -> Maybe b)
|
liftMay :: (a -> Bool) -> (a -> b) -> (a -> Maybe b)
|
||||||
|
|||||||
Reference in New Issue
Block a user