blob: e685a9dec1e98b3f088b79edefbe5578a68a2bc2 (
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, 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 char SymbolName;
typedef void SymbolAddr;
typedef struct _RtsSymbolVal {
const SymbolName* lbl;
SymbolAddr* addr;
} RtsSymbolVal;
extern RtsSymbolVal rtsSyms[];
#endif /* RTS_SYMBOLS_H */
|
