Add support for ghc 8.0.2 rc1

This commit is contained in:
Joe Hermaszewski 2016-11-30 12:46:14 +00:00
parent 9ef3e67f21
commit 666f47ca14

View File

@ -104,7 +104,7 @@ import TcRnTypes
#endif #endif
#endif #endif
#if MIN_VERSION_GLASGOW_HASKELL(8,0,2,0) #if MIN_VERSION_GLASGOW_HASKELL(8,0,1,20161117)
import GHC hiding (ClsInst, withCleanupSession) import GHC hiding (ClsInst, withCleanupSession)
import qualified GHC (withCleanupSession) import qualified GHC (withCleanupSession)
#elif __GLASGOW_HASKELL__ >= 706 #elif __GLASGOW_HASKELL__ >= 706
@ -685,7 +685,7 @@ everythingStagedWithContext stage s0 f z q x
withCleanupSession :: GhcMonad m => m a -> m a withCleanupSession :: GhcMonad m => m a -> m a
#if __GLASGOW_HASKELL__ >= 800 #if __GLASGOW_HASKELL__ >= 800
#if MIN_VERSION_GLASGOW_HASKELL(8,0,2,0) #if MIN_VERSION_GLASGOW_HASKELL(8,0,1,20161117)
withCleanupSession = GHC.withCleanupSession withCleanupSession = GHC.withCleanupSession
#else #else
withCleanupSession ghc = ghc `gfinally` cleanup withCleanupSession ghc = ghc `gfinally` cleanup