Make servant-foreign build on GHC 8.2

This commit is contained in:
Ryan Scott 2017-04-01 13:56:08 -04:00 committed by GitHub
parent f05b394261
commit ec4573d988

View File

@ -189,7 +189,7 @@ instance (HasForeign lang ftype a, HasForeign lang ftype b)
instance (KnownSymbol sym, HasForeignType lang ftype t, HasForeign lang ftype api) instance (KnownSymbol sym, HasForeignType lang ftype t, HasForeign lang ftype api)
=> HasForeign lang ftype (Capture sym t :> api) where => HasForeign lang ftype (Capture sym t :> api) where
type Foreign ftype (Capture sym a :> api) = Foreign ftype api type Foreign ftype (Capture sym t :> api) = Foreign ftype api
foreignFor lang Proxy Proxy req = foreignFor lang Proxy Proxy req =
foreignFor lang Proxy (Proxy :: Proxy api) $ foreignFor lang Proxy (Proxy :: Proxy api) $