blob: 94250bcf7a1bca1f50d0bff699d34a6269cd1a85 (
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
|
/* -----------------------------------------------------------------------------
*
* (c) The GHC Team 1998-2008
*
* Generational garbage collector: scavenging functions
*
* 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
#include "BeginPrivate.h"
void scavenge_loop (void);
void scavenge_capability_mut_lists (Capability *cap);
void scavengeTSO (StgTSO *tso);
void scavenge_stack (StgPtr p, StgPtr stack_end);
void scavenge_fun_srt (const StgInfoTable *info);
void scavenge_thunk_srt (const StgInfoTable *info);
StgPtr scavenge_mut_arr_ptrs (StgMutArrPtrs *a);
StgPtr scavenge_PAP (StgPAP *pap);
StgPtr scavenge_AP (StgAP *ap);
void scavenge_compact (StgCompactNFData *str);
#if defined(THREADED_RTS)
void scavenge_loop1 (void);
void scavenge_capability_mut_Lists1 (Capability *cap);
void scavengeTSO1 (StgTSO *tso);
void scavenge_stack1 (StgPtr p, StgPtr stack_end);
void scavenge_fun_srt1 (const StgInfoTable *info);
void scavenge_thunk_srt1 (const StgInfoTable *info);
StgPtr scavenge_mut_arr_ptrs1 (StgMutArrPtrs *a);
StgPtr scavenge_PAP1 (StgPAP *pap);
StgPtr scavenge_AP1 (StgAP *ap);
void scavenge_compact1 (StgCompactNFData *str);
#endif
#include "EndPrivate.h"
|