X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FStable.h;h=ebabee7ad0158306c8d3bca327f693f1488d2ec1;hb=d83c0339a26179567eed0a8d65d944008e3637b2;hp=258a6bea802dbb533d7c882bffe62b2cb31ce358;hpb=a2a67cd520b9841114d69a87a423dabcb3b4368e;p=ghc-hetmet.git diff --git a/rts/Stable.h b/rts/Stable.h index 258a6be..ebabee7 100644 --- a/rts/Stable.h +++ b/rts/Stable.h @@ -17,7 +17,9 @@ #include "sm/GC.h" // for evac_fn below -void freeStablePtr (StgStablePtr sp); +BEGIN_RTS_PRIVATE + +void freeStablePtr ( StgStablePtr sp ); void initStablePtrTable ( void ); void exitStablePtrTable ( void ); @@ -31,4 +33,6 @@ void updateStablePtrTable ( rtsBool full ); void stablePtrPreGC ( void ); void stablePtrPostGC ( void ); +END_RTS_PRIVATE + #endif /* STABLE_H */