#1685: getCPUTime does not work in general
--------------------------------+-------------------------------------------
Reporter: [EMAIL PROTECTED] | Owner:
Type: bug | Status: new
Priority: normal | Milestone: 6.8
Component: GHCi | Version: 6.7
Severity: major | Keywords:
Difficulty: Unknown | Os: Unknown
Testcase: | Architecture: Unknown
--------------------------------+-------------------------------------------
With
{{{
fromPicoSeconds picoseconds =
let (n,k) = divMod picoseconds (10^12)
in normalizeTimeDiff (diffClockTimes (TOD n k) (TOD 0 0))
}}}
Then evaluate the following:
{{{
replicateM 1000 $ liftM fromPicoSeconds getCPUTime
}}}
They all return the same number of picoseconds. Computers aren't that
fast. I expected to see at least some different numbers.
--
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/1685>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler
_______________________________________________
Glasgow-haskell-bugs mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/glasgow-haskell-bugs
