summaryrefslogtreecommitdiff
path: root/rts/sm/Scav.h
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"