X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=rts%2FRtsUtils.h;h=11a2826596e2c99d4eb0d690df9b9790b9ac8262;hb=4c719df405e70f6d58c6e351df8bf94a3af6b1fe;hp=93139367b31c06b4de7cc5dc5a704c3869cbb25e;hpb=e3c55aebd4f9ce7a5b4390d4726612865fd207f2;p=ghc-hetmet.git

diff --git a/rts/RtsUtils.h b/rts/RtsUtils.h
index 9313936..11a2826 100644
--- a/rts/RtsUtils.h
+++ b/rts/RtsUtils.h
@@ -13,6 +13,9 @@
  * (Checked) dynamic allocation
  * -------------------------------------------------------------------------- */
 
+extern void initAllocator(void);
+extern void shutdownAllocator(void);
+
 extern void *stgMallocBytes(int n, char *msg)
     GNUC3_ATTRIBUTE(__malloc__);
 
@@ -37,10 +40,6 @@ extern nat stg_strlen(char *str);
 extern char *time_str(void);
 extern char *ullong_format_string(ullong, char *, rtsBool);
 
-#ifdef PAR
-extern ullong msTime(void);
-#endif
-
 #ifdef DEBUG
 extern void heapCheckFail( void );
 #endif
@@ -48,4 +47,8 @@ extern void heapCheckFail( void );
 extern void* __hscore_get_saved_termios(int fd);
 extern void __hscore_set_saved_termios(int fd, void* ts);
 
+void printRtsInfo(void);
+
+int rts_isProfiled(void);
+
 #endif /* RTSUTILS_H */