[project @ 2005-04-04 10:39:23 by simonmar]

[ghc-hetmet.git] / ghc / includes / RtsExternal.h

diff --git a/ghc/includes/RtsExternal.h b/ghc/includes/RtsExternal.h
index c8b1f1c..a597918 100644 (file)
--- 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 */