blob: 14856bf94338461d2876bb34116e85a7285fec5d (
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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
/* -----------------------------------------------------------------------------
*
* (c) The GHC Team, 1998-2009
*
* General utility functions used in the RTS.
*
* ---------------------------------------------------------------------------*/
#ifndef RTSUTILS_H
#define RTSUTILS_H
/* -----------------------------------------------------------------------------
* (Checked) dynamic allocation
* -------------------------------------------------------------------------- */
void initAllocator(void);
void shutdownAllocator(void);
void *stgMallocBytes(int n, char *msg)
GNUC3_ATTRIBUTE(__malloc__);
void *stgReallocBytes(void *p, int n, char *msg);
void *stgCallocBytes(int n, int m, char *msg)
GNUC3_ATTRIBUTE(__malloc__);
void stgFree(void* p);
/* -----------------------------------------------------------------------------
* Misc other utilities
* -------------------------------------------------------------------------- */
void heapOverflow(void);
char *time_str(void);
char *ullong_format_string(ullong, char *, rtsBool);
#ifdef DEBUG
void heapCheckFail( void );
#endif
// XXX shouldn't be here
void* __hscore_get_saved_termios(int fd);
void __hscore_set_saved_termios(int fd, void* ts);
void printRtsInfo(void);
HsInt genSymZh(void);
HsInt resetGenSymZh(void);
/* Alternate to raise(3) for threaded rts, for OpenBSD */
int genericRaise(int sig);
int rts_isProfiled(void);
#endif /* RTSUTILS_H */
|