update submodules for GHC.HetMet.GArrow -> Control.GArrow renaming
[ghc-hetmet.git] / rts / RtsUtils.h
index 14856bf..b571126 100644 (file)
@@ -9,6 +9,8 @@
 #ifndef RTSUTILS_H
 #define RTSUTILS_H
 
+#include "BeginPrivate.h"
+
 /* -----------------------------------------------------------------------------
  * (Checked) dynamic allocation
  * -------------------------------------------------------------------------- */
@@ -33,24 +35,19 @@ void stgFree(void* p);
 void heapOverflow(void);
 
 char *time_str(void);
-char *ullong_format_string(ullong, char *, rtsBool);
+char *showStgWord64(StgWord64, char *, rtsBool);
 
 #ifdef DEBUG
 void heapCheckFail( void );
 #endif
 
-// XXX shouldn't be here
-void* __hscore_get_saved_termios(int fd);
-void  __hscore_set_saved_termios(int fd, void* ts);
-
 void printRtsInfo(void);
 
-HsInt genSymZh(void);
-HsInt resetGenSymZh(void);
-
 /* Alternate to raise(3) for threaded rts, for OpenBSD */
 int genericRaise(int sig);
 
-int rts_isProfiled(void);
+void checkFPUStack(void);
+
+#include "EndPrivate.h"
 
 #endif /* RTSUTILS_H */