blob: 4bb8733732300d894cb9d089c295a60ea21c48cc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
module System.CPUTime.Unsupported
( getCPUTime
, getCpuTimePrecision
) where
import GHC.IO.Exception
getCPUTime :: IO Integer
getCPUTime =
ioError (IOError Nothing UnsupportedOperation
"getCPUTime"
"can't get CPU time"
Nothing Nothing)
getCpuTimePrecision :: IO Integer
getCpuTimePrecision =
ioError (IOError Nothing UnsupportedOperation
"cpuTimePrecision"
"can't get CPU time"
Nothing Nothing)
|