diff --git a/System/TimeIt.hs b/System/TimeIt.hs
--- a/System/TimeIt.hs
+++ b/System/TimeIt.hs
@@ -1,13 +1,20 @@
-module System.TimeIt(timeIt) where
+module System.TimeIt(timeIt, timeItT) where
 import System.CPUTime
 import Text.Printf
 
+-- |Wrap an 'IO' computation so that it prints out the execution time.
 timeIt :: IO a -> IO a
 timeIt ioa = do
+    (t, a) <- timeItT ioa
+    printf "CPU time: %6.2fs\n" t
+    return a
+
+-- |Wrap an 'IO' computation so that it returns execution time is seconds as well as the real value.
+timeItT :: IO a -> IO (Double, a)
+timeItT ioa = do
     t1 <- getCPUTime
     a <- ioa
     t2 <- getCPUTime
     let t :: Double
 	t = fromIntegral (t2-t1) * 1e-12
-    printf "CPU time: %6.2fs\n" t
-    return a
+    return (t, a)
diff --git a/timeit.cabal b/timeit.cabal
--- a/timeit.cabal
+++ b/timeit.cabal
@@ -1,5 +1,5 @@
 Name:		timeit
-Version:	0.9.0.0
+Version:	1.0.0.0
 License:	BSD3
 Author:		Lennart Augustsson
 Maintainer:	Lennart Augustsson
@@ -9,3 +9,4 @@
 Build-type:	Simple
 Build-Depends:	base
 Exposed-modules:	System.TimeIt
+build-depends: base >= 3 && < 5