X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FWeak.h;h=a931b054cc342beb16bcb8fec911b7e0b13a7338;hb=6cf8982ac30be6836a0cdd8be5a6ac1a1a144213;hp=cf93b4df9ee4733815a712434adf369f117ec77b;hpb=6c095bfa3c8c81b52ad92853acd326453d320d7b;p=ghc-hetmet.git

diff --git a/rts/Weak.h b/rts/Weak.h
index cf93b4d..a931b05 100644
--- a/rts/Weak.h
+++ b/rts/Weak.h
@@ -11,9 +11,17 @@
 
 #include "Capability.h"
 
-void runCFinalizer(StgVoid *fn, StgVoid *ptr, StgVoid *env, StgWord flag);
+BEGIN_RTS_PRIVATE
+
+extern rtsBool running_finalizers;
+extern StgWeak * weak_ptr_list;
+
+void runCFinalizer(void *fn, void *ptr, void *env, StgWord flag);
 void runAllCFinalizers(StgWeak *w);
 void scheduleFinalizers(Capability *cap, StgWeak *w);
 void markWeakList(void);
 
-#endif
+END_RTS_PRIVATE
+
+#endif /* WEAK_H */
+