git.iko.soy/servant
on master help sign in
Merge pull request #1514 from guibou/fix_ghc92_build
7a770b5Gaël Deest
servant/src/Servant/Links.hs+1−1
compare with master
unifiedsplit
@@ -649,7 +649,7 @@ simpleToLink _ toA _ = toLink toA (Proxy :: Proxy sub)
649-- Erroring instance for 'HasLink' when a combinator is not fully applied
649-- Erroring instance for 'HasLink' when a combinator is not fully applied
650instance TypeError (PartialApplication HasLink arr) => HasLink ((arr :: a -> b) :> sub)
650instance TypeError (PartialApplication HasLink arr) => HasLink ((arr :: a -> b) :> sub)
651 where
651 where
652− type MkLink (arr :> sub) _ = TypeError (PartialApplication HasLink arr)
652+ type MkLink (arr :> sub) _ = TypeError (PartialApplication (HasLink :: * -> Constraint) arr)
653 toLink = error "unreachable"
653 toLink = error "unreachable"
654
654
655-- Erroring instances for 'HasLink' for unknown API combinators
655-- Erroring instances for 'HasLink' for unknown API combinators