Add comments of future implementation of now

182f0840 · Yiannis Tsiouris · 421e000b · 182f0840
Commit 182f0840 authored Nov 18, 2014 by Yiannis Tsiouris
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 1 deletion

Utils.hs Utils.hs +4 -1

No files found.
--- a/Utils.hs
+++ b/Utils.hs
 module Utils (now) where

+--import System.CPUTime (getCPUTime)
+
 -- current wall clock time (in milliseconds since start of RTS)
 -- FIXME: get current wall clock time
+--now :: IO Integer
 now :: Int
-now = 42
+now = 42 --getCPUTime