X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FScav.h;h=10b9ffde401756483ed1ebddac525d457fce0458;hb=a2a67cd520b9841114d69a87a423dabcb3b4368e;hp=e8eab485d5165d6a87de8a5cbe957cf8848a1d8c;hpb=a370654a872838c43e63bdd6cc279c0ee9913cdf;p=ghc-hetmet.git diff --git a/rts/sm/Scav.h b/rts/sm/Scav.h index e8eab48..10b9ffd 100644 --- a/rts/sm/Scav.h +++ b/rts/sm/Scav.h @@ -11,6 +11,18 @@ * * ---------------------------------------------------------------------------*/ +#ifndef SM_SCAV_H +#define SM_SCAV_H + void scavenge_loop (void); -rtsBool any_work (void); -void scavenge_mutable_list (generation *g); +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 + +#endif /* SM_SCAV_H */ +