blob: 03e1f171be144010966d2c36a34a230da4348854 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
/* -----------------------------------------------------------------------------
*
* (c) The GHC Team 2005
*
* Machine-independent interface to time measurement
*
* ---------------------------------------------------------------------------*/
#ifndef GETTIME_H
#define GETTIME_H
BEGIN_RTS_PRIVATE
// We'll use a fixed resolution of usec for now. The machine
// dependent implementation may have a different resolution, but we'll
// normalise to this for the machine independent interface.
#define TICKS_PER_SECOND 1000000
typedef StgInt64 Ticks;
Ticks getProcessCPUTime (void);
Ticks getThreadCPUTime (void);
Ticks getProcessElapsedTime (void);
void getProcessTimes (Ticks *user, Ticks *elapsed);
// Not strictly timing, but related
nat getPageFaults (void);
END_RTS_PRIVATE
#endif /* GETTIME_H */
|