X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FScav.h;fp=rts%2Fsm%2FScav.h;h=ad466c8488866e30137e8ff00bed90b9cfbb4c9a;hb=9a9803e8dc80ba41bd3e2d31228e64fa6b61060e;hp=259fe1289a869d2e41eeb6b1e8efaeb51e91d83b;hpb=b25c93f1c914d81d77aeafeb49263f29bed128aa;p=ghc-hetmet.git diff --git a/rts/sm/Scav.h b/rts/sm/Scav.h index 259fe12..ad466c8 100644 --- a/rts/sm/Scav.h +++ b/rts/sm/Scav.h @@ -14,7 +14,7 @@ #ifndef SM_SCAV_H #define SM_SCAV_H -#pragma GCC visibility push(hidden) +BEGIN_RTS_PRIVATE void scavenge_loop (void); void scavenge_mutable_list (bdescr *bd, generation *gen); @@ -26,7 +26,7 @@ void scavenge_mutable_list1 (bdescr *bd, generation *gen); void scavenge_capability_mut_Lists1 (Capability *cap); #endif -#pragma GCC visibility pop +END_RTS_PRIVATE #endif /* SM_SCAV_H */