X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FRtsExternal.h;fp=ghc%2Fincludes%2FRtsExternal.h;h=a5979184adc84c210af59e366d7a7795a434c5e6;hb=de90a39db460e0b6f1d7e0cfeca98f0d24dd98ea;hp=c8b1f1cc60703bea7fce79eca1805007b1653fda;hpb=397ef49cc353599f37292d3f79d42040297312d4;p=ghc-hetmet.git

diff --git a/ghc/includes/RtsExternal.h b/ghc/includes/RtsExternal.h
index c8b1f1c..a597918 100644
--- a/ghc/includes/RtsExternal.h
+++ b/ghc/includes/RtsExternal.h
@@ -78,5 +78,7 @@ typedef void (*evac_fn)(StgClosure **);
 extern void performGC(void);
 extern void performMajorGC(void);
 extern void performGCWithRoots(void (*get_roots)(evac_fn));
+extern HsInt64 getAllocations( void );
+extern void revertCAFs( void );
 
 #endif /*  RTSEXTERNAL_H */