blob: 43e53e9fc7de6b6ab5839f0b19db36f30533b0e5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
/* -----------------------------------------------------------------------------
*
* (c) The GHC Team 2016
*
* GC support for immutable non-GCed structures
*
* Documentation on the architecture of the Garbage Collector can be
* found in the online commentary:
*
* https://gitlab.haskell.org/ghc/ghc/wikis/commentary/rts/storage/gc
*
* ---------------------------------------------------------------------------*/
#pragma once
#define SHOULDCOMPACT_STATIC 0
#define SHOULDCOMPACT_IN_CNF 1
#define SHOULDCOMPACT_NOTIN_CNF 2
#define SHOULDCOMPACT_PINNED 3
#if !defined(CMINUSMINUS)
extern StgWord shouldCompact (StgCompactNFData *str, StgClosure *p);
#endif
|
