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:
alexfmpe
2025-05-15 22:13:14 -04:00
committed by GitHub
co-authored by Tom Ellis
parent 20f2e894c9
commit daad7c317d
4 changed files with 9 additions and 6 deletions
+1 -1
View File
@@ -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
View File
@@ -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
+1 -1
View File
@@ -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
+1 -1
View File
@@ -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)