X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FWeak.h;h=8fccae2a63201bcb7278c96e74c5275db05efd5c;hb=fa00cc50ecd1aa292657720b7594b7bdb82c970c;hp=ba8c1ca913acdfab16ae7a3bfa15d48faa2d4133;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git

diff --git a/rts/Weak.h b/rts/Weak.h
index ba8c1ca..8fccae2 100644
--- a/rts/Weak.h
+++ b/rts/Weak.h
@@ -11,6 +11,10 @@
 
 #include "Capability.h"
 
+extern rtsBool running_finalizers;
+
+void runCFinalizer(StgVoid *fn, StgVoid *ptr, StgVoid *env, StgWord flag);
+void runAllCFinalizers(StgWeak *w);
 void scheduleFinalizers(Capability *cap, StgWeak *w);
 void markWeakList(void);