blob: 07026979d8f2ef4b292862f698676ba55c2c7f3d (
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
|
/* -----------------------------------------------------------------------------
*
* (c) The GHC Team, 2017-2021
*
* IPE API
*
* Do not #include this file directly: #include "Rts.h" instead.
*
* To understand the structure of the RTS headers, see the wiki:
* https://gitlab.haskell.org/ghc/ghc/wikis/commentary/source-tree/includes
*
* -------------------------------------------------------------------------- */
#pragma once
typedef struct InfoProv_ {
char *table_name;
char *closure_desc;
char *ty_desc;
char *label;
char *module;
char *srcloc;
} InfoProv;
typedef struct InfoProvEnt_ {
StgInfoTable *info;
InfoProv prov;
} InfoProvEnt;
void registerInfoProvList(InfoProvEnt **cc_list);
InfoProvEnt *lookupIPE(StgInfoTable *info);
|