Skip to content
Snippets Groups Projects
Commit 38bc3d17 authored by Rodrigo Mesquita's avatar Rodrigo Mesquita :seedling: Committed by Matthew Pickering
Browse files

Extend head.hackage

With:
* c2hs (build_tool_package)
* servant-conduit
* servant-machines
* freer-simple
* linear-generics

This adds patches for freer-simple and servant-*, but adds all 5 to the
CI extra packages

Closes ghc/head.hackage#69
parent 174ef8c5
No related branches found
No related tags found
No related merge requests found
Pipeline #63421 passed with warnings
...@@ -77,10 +77,14 @@ echo "Found GHC $version, commit $commit." ...@@ -77,10 +77,14 @@ echo "Found GHC $version, commit $commit."
case $version in case $version in
9.2.*) 9.2.*)
# package ticket # package ticket
broken linear-generics 22917
;; ;;
9.4.*) 9.4.*)
# package ticket # package ticket
broken linear-generics 22546
broken servant-conduit 22915
broken servant-machines 22913
;; ;;
9.6.*) 9.6.*)
...@@ -115,10 +119,14 @@ extra_package mmark ...@@ -115,10 +119,14 @@ extra_package mmark
extra_package doctest 0.21.0 extra_package doctest 0.21.0
extra_package tasty extra_package tasty
extra_package pandoc extra_package pandoc
extra_package servant-conduit
extra_package servant-machines
extra_package linear-generics
# Build-tool packages # Build-tool packages
build_tool_package alex build_tool_package alex
build_tool_package happy build_tool_package happy
build_tool_package c2hs
# $BUILD_MODE controls how head.hackage runs. # $BUILD_MODE controls how head.hackage runs.
# =========================================== # ===========================================
......
diff --git a/src/Control/Monad/Freer/Internal.hs b/src/Control/Monad/Freer/Internal.hs
index de96a4c..c298790 100644
--- a/src/Control/Monad/Freer/Internal.hs
+++ b/src/Control/Monad/Freer/Internal.hs
@@ -153,7 +153,7 @@ instance Monad (Eff effs) where
E u q >>= k = E u (q |> k)
{-# INLINE (>>=) #-}
-instance (MonadBase b m, LastMember m effs) => MonadBase b (Eff effs) where
+instance (Monad b, MonadBase b m, LastMember m effs) => MonadBase b (Eff effs) where
liftBase = sendM . liftBase
{-# INLINE liftBase #-}
diff --git a/servant-conduit.cabal b/servant-conduit.cabal
index 83a504f..d4e5a0d 100644
--- a/servant-conduit.cabal
+++ b/servant-conduit.cabal
@@ -39,7 +39,7 @@ library
, conduit >=1.3.1 && <1.4
, mtl >=2.2.2 && <2.3
, resourcet >=1.2.2 && <1.3
- , servant >=0.15 && <0.19
+ , servant >=0.15 && <0.20
, unliftio-core >=0.1.2.0 && <0.3
hs-source-dirs: src
default-language: Haskell2010
diff --git a/servant-machines.cabal b/servant-machines.cabal
index 79401a1..b7aca6e 100644
--- a/servant-machines.cabal
+++ b/servant-machines.cabal
@@ -38,7 +38,7 @@ library
, bytestring >=0.10.8.1 && <0.11
, machines >=0.6.4 && <0.8
, mtl >=2.2.2 && <2.3
- , servant >=0.15 && <0.19
+ , servant >=0.15 && <0.20
hs-source-dirs: src
default-language: Haskell2010
ghc-options: -Wall
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment