haskell-lambdabot-core: apply patch from @int-e to fix GHC 8.4.x build
This commit is contained in:
parent
31f76cde3e
commit
8f96324584
@ -448,4 +448,6 @@ self: super: {
|
|||||||
sha256 = "1bpsqq80h6nxm04wddgcgyzn0fjfsmhccmqb211jqswv5209znx8";
|
sha256 = "1bpsqq80h6nxm04wddgcgyzn0fjfsmhccmqb211jqswv5209znx8";
|
||||||
});
|
});
|
||||||
|
|
||||||
|
lambdabot-core = appendPatch super.lambdabot-core ./patches/lambdabot-core-ghc-8.4.x-fix.patch;
|
||||||
|
|
||||||
}
|
}
|
||||||
|
@ -0,0 +1,15 @@
|
|||||||
|
index 60e134c..246d8ca 100644
|
||||||
|
--- lambdabot-core/src/Lambdabot/Config.hs
|
||||||
|
+++ lambdabot-core/src/Lambdabot/Config.hs
|
||||||
|
@@ -29,9 +29,9 @@ import Data.Typeable
|
||||||
|
import Data.Generics (everywhere, mkT)
|
||||||
|
import Language.Haskell.TH
|
||||||
|
|
||||||
|
-data Config t where Config :: (Typeable1 k, GCompare k) => !(k t) -> t -> (t -> t -> t) -> Config t
|
||||||
|
+data Config t where Config :: (Typeable k, GCompare k) => !(k t) -> t -> (t -> t -> t) -> Config t
|
||||||
|
|
||||||
|
-cast1 :: (Typeable1 f, Typeable1 g) => f a -> Maybe (g a)
|
||||||
|
+cast1 :: (Typeable f, Typeable g) => f a -> Maybe (g a)
|
||||||
|
cast1 = fmap runIdentity . gcast1 . Identity
|
||||||
|
|
||||||
|
instance GEq Config where
|
Loading…
x
Reference in New Issue
Block a user