diff options
Diffstat (limited to 'rts/sm/ShouldCompact.h')
| -rw-r--r-- | rts/sm/ShouldCompact.h | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/rts/sm/ShouldCompact.h b/rts/sm/ShouldCompact.h new file mode 100644 index 0000000000..a8ae85df51 --- /dev/null +++ b/rts/sm/ShouldCompact.h @@ -0,0 +1,26 @@ +/* ----------------------------------------------------------------------------- + * + * (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: + * + * http://ghc.haskell.org/trac/ghc/wiki/Commentary/Rts/Storage/GC + * + * ---------------------------------------------------------------------------*/ + +#ifndef SM_SHOULDCOMPACT_H +#define SM_SHOULDCOMPACT_H + +#define SHOULDCOMPACT_STATIC 0 +#define SHOULDCOMPACT_IN_CNF 1 +#define SHOULDCOMPACT_NOTIN_CNF 2 +#define SHOULDCOMPACT_PINNED 3 + +#ifndef CMINUSMINUS +extern StgWord shouldCompact (StgCompactNFData *str, StgClosure *p); +#endif + +#endif |