blob: 26da35d4cdc5f4b0f4e57c0532b612af020fced0 (
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
31
32
33
34
35
36
37
|
/* -----------------------------------------------------------------------------
*
* (c) The GHC Team, 2008-2009
*
* Haskell Program Coverage
*
* Do not #include this file directly: #include "Rts.h" instead.
*
* To understand the structure of the RTS headers, see the wiki:
* http://hackage.haskell.org/trac/ghc/wiki/Commentary/SourceTree/Includes
*
* -------------------------------------------------------------------------- */
#ifndef RTS_HPC_H
#define RTS_HPC_H
// Simple linked list of modules
typedef struct _HpcModuleInfo {
char *modName; // name of module
StgWord32 tickCount; // number of ticks
StgWord32 tickOffset; // offset into a single large .tix Array
StgWord32 hashNo; // Hash number for this module's mix info
StgWord64 *tixArr; // tix Array; local for this module
struct _HpcModuleInfo *next;
} HpcModuleInfo;
int hs_hpc_module (char *modName,
StgWord32 modCount,
StgWord32 modHashNo,
StgWord64 *tixArr);
HpcModuleInfo * hs_hpc_rootModule (void);
void startupHpc(void);
void exitHpc(void);
#endif /* RTS_HPC_H */
|
