diff --git a/src/UHC/Util/FPath.hs b/src/UHC/Util/FPath.hs
--- a/src/UHC/Util/FPath.hs
+++ b/src/UHC/Util/FPath.hs
@@ -36,6 +36,8 @@
   , filePathMkPrefix, filePathUnPrefix
   , filePathCoalesceSeparator
   , filePathMkAbsolute, filePathUnAbsolute
+  
+  , fpathGetModificationTime
   )
 where
 
@@ -46,6 +48,7 @@
 import System.Directory
 
 import UHC.Util.Utils
+import UHC.Util.Time
 
 -------------------------------------------------------------------------------------------
 -- Making prefix and inverse, where a prefix has a tailing '/'
@@ -351,3 +354,11 @@
   = do fs <- searchPathForReadableFiles True paths suffs fp
        return (listToMaybe fs)
 
+-------------------------------------------------------------------------------------------
+-- Get modification time, with old-time + time compatibility
+-------------------------------------------------------------------------------------------
+
+fpathGetModificationTime :: FPath -> IO UTCTime
+fpathGetModificationTime fp = do let fn = fpathToStr fp
+                                 t <- getModificationTime fn
+                                 return (toUTCTime t)
diff --git a/src/UHC/Util/Time.hs b/src/UHC/Util/Time.hs
new file mode 100644
--- /dev/null
+++ b/src/UHC/Util/Time.hs
@@ -0,0 +1,28 @@
+-- wrapping around time to look like old-time, only for that what is being used.
+
+module UHC.Util.Time
+  ( module Data.Time.Compat,
+	module Data.Time,
+	module Data.Time.Clock,
+	ClockTime,
+	diffClockTimes,
+	noTimeDiff,
+	getClockTime
+  )
+  where
+
+import Data.Time
+import Data.Time.Clock
+import Data.Time.Compat
+
+-- | a for now alias for old-time ClockTime
+type ClockTime = UTCTime
+
+diffClockTimes = diffUTCTime
+
+noTimeDiff :: NominalDiffTime
+noTimeDiff = toEnum 0
+
+getClockTime :: IO ClockTime
+getClockTime = getCurrentTime
+
diff --git a/uhc-util.cabal b/uhc-util.cabal
--- a/uhc-util.cabal
+++ b/uhc-util.cabal
@@ -1,5 +1,5 @@
 Name:				uhc-util
-Version:			0.1.0.1
+Version:			0.1.0.2
 cabal-version:      >= 1.6
 License:			BSD3
 Copyright:			Utrecht University, Department of Information and Computing Sciences, Software Technology group
@@ -18,15 +18,16 @@
     base >= 4 && < 5,
     mtl >= 2 && < 3,
     fgl >= 5.4 && < 6.0,
-    directory >= 1.2 && < 2,
     hashable >= 1.1 && < 1.2,
-    old-time >= 1.1 && < 1.2,
-    containers >= 0.4 && < 0.5,
-    array >= 0.4 && < 0.5,
+    containers >= 0.4 && < 0.6,
+    directory >= 1.1 && < 2,
+    array >= 0.3 && < 0.5,
     process >= 1.1 && < 1.2,
     binary >= 0.5 && < 1,
     bytestring >= 0.9 && < 1,
-    uulib >= 0.9 && < 1
+    uulib >= 0.9 && < 1,
+    time-compat >= 0.1.0.1 && < 0.2,
+    time >= 1.2 && < 1.5
   Exposed-Modules:
     UHC.Util.AGraph,
     UHC.Util.Binary,
@@ -43,7 +44,8 @@
     UHC.Util.PrettyUtils,
     UHC.Util.Rel,
     UHC.Util.ScanUtils,
-    UHC.Util.Utils
+    UHC.Util.Utils,
+    UHC.Util.Time
   Ghc-Options:		
   HS-Source-Dirs:     	src
   Build-Tools: