File tree Expand file tree Collapse file tree 1 file changed +5
-1
lines changed
servant-client/src/Servant/Client Expand file tree Collapse file tree 1 file changed +5
-1
lines changed Original file line number Diff line number Diff line change
1
+ {-# LANGUAGE CPP #-}
1
2
{-# LANGUAGE DataKinds #-}
2
3
{-# LANGUAGE DefaultSignatures #-}
3
4
{-# LANGUAGE FlexibleContexts #-}
6
7
{-# LANGUAGE TypeFamilies #-}
7
8
{-# LANGUAGE TypeOperators #-}
8
9
{-# LANGUAGE UndecidableInstances #-}
10
+
11
+ #include "overlapping-compat.h"
12
+
9
13
module Servant.Client.Generic
10
14
( ClientLike (.. )
11
15
, genericMkClientL
@@ -142,7 +146,7 @@ instance (GClientList b acc, GClientList a (ClientList b acc))
142
146
=> GClientList (a :<|> b ) acc where
143
147
gClientList (a :<|> b) acc = gClientList a (gClientList b acc)
144
148
145
- instance {-# OVERLAPPABLE #-} (ClientList client acc ~ (client ': acc ))
149
+ instance OVERLAPPABLE_ (ClientList client acc ~ (client ': acc ))
146
150
=> GClientList client acc where
147
151
gClientList c acc = I c :* acc
148
152
You can’t perform that action at this time.
0 commit comments