Fix ghc-7.8.4 build
This commit is contained in:
parent
01324754da
commit
9d52cff1bb
1 changed files with 5 additions and 1 deletions
|
@ -1,3 +1,4 @@
|
||||||
|
{-# LANGUAGE CPP #-}
|
||||||
{-# LANGUAGE DataKinds #-}
|
{-# LANGUAGE DataKinds #-}
|
||||||
{-# LANGUAGE DefaultSignatures #-}
|
{-# LANGUAGE DefaultSignatures #-}
|
||||||
{-# LANGUAGE FlexibleContexts #-}
|
{-# LANGUAGE FlexibleContexts #-}
|
||||||
|
@ -6,6 +7,9 @@
|
||||||
{-# LANGUAGE TypeFamilies #-}
|
{-# LANGUAGE TypeFamilies #-}
|
||||||
{-# LANGUAGE TypeOperators #-}
|
{-# LANGUAGE TypeOperators #-}
|
||||||
{-# LANGUAGE UndecidableInstances #-}
|
{-# LANGUAGE UndecidableInstances #-}
|
||||||
|
|
||||||
|
#include "overlapping-compat.h"
|
||||||
|
|
||||||
module Servant.Client.Generic
|
module Servant.Client.Generic
|
||||||
( ClientLike(..)
|
( ClientLike(..)
|
||||||
, genericMkClientL
|
, genericMkClientL
|
||||||
|
@ -142,7 +146,7 @@ instance (GClientList b acc, GClientList a (ClientList b acc))
|
||||||
=> GClientList (a :<|> b) acc where
|
=> GClientList (a :<|> b) acc where
|
||||||
gClientList (a :<|> b) acc = gClientList a (gClientList b acc)
|
gClientList (a :<|> b) acc = gClientList a (gClientList b acc)
|
||||||
|
|
||||||
instance {-# OVERLAPPABLE #-} (ClientList client acc ~ (client ': acc))
|
instance OVERLAPPABLE_ (ClientList client acc ~ (client ': acc))
|
||||||
=> GClientList client acc where
|
=> GClientList client acc where
|
||||||
gClientList c acc = I c :* acc
|
gClientList c acc = I c :* acc
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue