Use #if MIN_VERSION_transformers(0,4,0) instead of __GLASGOW_HASKELL__ >= 710
This commit is contained in:
parent
6de5d8f829
commit
09c37eb916
@ -24,7 +24,7 @@ import Control.Monad.Trans.Identity ( IdentityT)
|
|||||||
import Control.Monad.Trans.List ( ListT )
|
import Control.Monad.Trans.List ( ListT )
|
||||||
import Control.Monad.Trans.Maybe ( MaybeT )
|
import Control.Monad.Trans.Maybe ( MaybeT )
|
||||||
import Control.Monad.Trans.Error ( ErrorT, Error)
|
import Control.Monad.Trans.Error ( ErrorT, Error)
|
||||||
#if __GLASGOW_HASKELL__ >= 710
|
#if MIN_VERSION_transformers(0,4,0)
|
||||||
import Control.Monad.Trans.Except ( ExceptT )
|
import Control.Monad.Trans.Except ( ExceptT )
|
||||||
#endif
|
#endif
|
||||||
import Control.Monad.Trans.Reader ( ReaderT )
|
import Control.Monad.Trans.Reader ( ReaderT )
|
||||||
@ -58,7 +58,7 @@ GO(IdentityT)
|
|||||||
GO(ListT)
|
GO(ListT)
|
||||||
GO(MaybeT)
|
GO(MaybeT)
|
||||||
GOX(Error e, ErrorT e)
|
GOX(Error e, ErrorT e)
|
||||||
#if __GLASGOW_HASKELL__ >= 710
|
#if MIN_VERSION_transformers(0,4,0)
|
||||||
GO(ExceptT e)
|
GO(ExceptT e)
|
||||||
#endif
|
#endif
|
||||||
GO(ReaderT r)
|
GO(ReaderT r)
|
||||||
@ -84,7 +84,7 @@ GO(IdentityT)
|
|||||||
GO(ListT)
|
GO(ListT)
|
||||||
GO(MaybeT)
|
GO(MaybeT)
|
||||||
GOX(Error e, ErrorT e)
|
GOX(Error e, ErrorT e)
|
||||||
#if __GLASGOW_HASKELL__ >= 710
|
#if MIN_VERSION_transformers(0,4,0)
|
||||||
GO(ExceptT e)
|
GO(ExceptT e)
|
||||||
#endif
|
#endif
|
||||||
GO(ReaderT r)
|
GO(ReaderT r)
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user