blob: 10c158c0270be4ff08a95c3f1c2a848cf38cde10 (
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
|
/* -----------------------------------------------------------------------------
*
* (c) The GHC Team, 2000-2015
*
* RTS Symbols
*
* ---------------------------------------------------------------------------*/
#ifndef RTS_SYMBOLS_H
#define RTS_SYMBOLS_H
#include "ghcautoconf.h"
#ifdef LEADING_UNDERSCORE
#define MAYBE_LEADING_UNDERSCORE_STR(s) ("_" s)
#else
#define MAYBE_LEADING_UNDERSCORE_STR(s) (s)
#endif
typedef struct _RtsSymbolVal {
const char *lbl;
void *addr;
} RtsSymbolVal;
extern RtsSymbolVal rtsSyms[];
#endif /* RTS_SYMBOLS_H */
|