/* ----------------------------------------------------------------------------- * * (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"