From 28fff0b499a669584b208387ba5a3c2f91f82c78 Mon Sep 17 00:00:00 2001 From: Isaac Dupree Date: Sun, 23 Aug 2009 23:25:24 +0000 Subject: Utils: ghc >= 6.10 --- src/Haddock/Utils.hs | 6 ------ 1 file changed, 6 deletions(-) (limited to 'src/Haddock') diff --git a/src/Haddock/Utils.hs b/src/Haddock/Utils.hs index b7c4e48e..6a30cb07 100644 --- a/src/Haddock/Utils.hs +++ b/src/Haddock/Utils.hs @@ -76,13 +76,7 @@ import System.FilePath import Distribution.Verbosity import Distribution.ReadE -#if __GLASGOW_HASKELL__ >= 609 import MonadUtils ( MonadIO(..) ) -#else -class Monad m => MonadIO m where - liftIO :: IO a -> m a -instance MonadIO IO where liftIO = id -#endif -- ----------------------------------------------------------------------------- -- cgit v1.2.3