X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FScav.h;h=699e48cbac178fc20b0c2ac87ef406b609f6ee51;hb=890f22ef8eff8dbb5b31fa221dfce65a7b84c202;hp=ab66775641f5afbb0041731622c87dc60af3bac1;hpb=d5bd3e829c47c03157cf41cad581d2df44dfd81b;p=ghc-hetmet.git diff --git a/rts/sm/Scav.h b/rts/sm/Scav.h index ab66775..699e48c 100644 --- a/rts/sm/Scav.h +++ b/rts/sm/Scav.h @@ -1,6 +1,6 @@ /* ----------------------------------------------------------------------------- * - * (c) The GHC Team 1998-2006 + * (c) The GHC Team 1998-2008 * * Generational garbage collector: scavenging functions * @@ -11,5 +11,22 @@ * * ---------------------------------------------------------------------------*/ -void scavenge_loop (void); -void scavenge_mutable_list (generation *g); +#ifndef SM_SCAV_H +#define SM_SCAV_H + +#include "BeginPrivate.h" + +void scavenge_loop (void); +void scavenge_mutable_list (bdescr *bd, generation *gen); +void scavenge_capability_mut_lists (Capability *cap); + +#ifdef THREADED_RTS +void scavenge_loop1 (void); +void scavenge_mutable_list1 (bdescr *bd, generation *gen); +void scavenge_capability_mut_Lists1 (Capability *cap); +#endif + +#include "EndPrivate.h" + +#endif /* SM_SCAV_H */ +