trying to fix travis ci.

This commit is contained in:
Kazu Yamamoto 2014-09-23 16:00:22 +09:00
parent 1545f05d87
commit 9974bcbf79
2 changed files with 9 additions and 0 deletions

View File

@ -156,6 +156,7 @@ Executable ghc-modi
, containers
, directory
, filepath
, old-time
, process
, split
, time

View File

@ -26,7 +26,11 @@ import CoreMonad (liftIO)
import Data.IORef (IORef, newIORef, readIORef, writeIORef)
import Data.List (isPrefixOf)
import Data.Maybe (isJust)
#if __GLASGOW_HASKELL__ <= 704
import System.Time (ClockTime)
#else
import Data.Time (UTCTime)
#endif
import Data.Typeable (Typeable)
import System.Directory (getModificationTime, doesDirectoryExist, getDirectoryContents)
import System.IO (openBinaryFile, IOMode(..))
@ -50,7 +54,11 @@ instance Exception Restart
----------------------------------------------------------------
data World = World {
#if __GLASGOW_HASKELL__ <= 704
worldCabalFileModificationTime :: Maybe ClockTime
#else
worldCabalFileModificationTime :: Maybe UTCTime
#endif
} deriving (Show, Eq)
getCurrentWorld :: IOish m => GhcModT m World