summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--includes/Rts.h1
-rw-r--r--includes/rts/GetTime.h19
-rw-r--r--rts/GetTime.h1
3 files changed, 20 insertions, 1 deletions
diff --git a/includes/Rts.h b/includes/Rts.h
index edb48c1a91..b2f44cbba4 100644
--- a/includes/Rts.h
+++ b/includes/Rts.h
@@ -226,6 +226,7 @@ INLINE_HEADER Time fsecondsToTime (double t)
#include "rts/Flags.h"
#include "rts/Adjustor.h"
#include "rts/FileLock.h"
+#include "rts/GetTime.h"
#include "rts/Globals.h"
#include "rts/IOManager.h"
#include "rts/Linker.h"
diff --git a/includes/rts/GetTime.h b/includes/rts/GetTime.h
new file mode 100644
index 0000000000..79cef4fc7f
--- /dev/null
+++ b/includes/rts/GetTime.h
@@ -0,0 +1,19 @@
+/* -----------------------------------------------------------------------------
+ *
+ * (c) The GHC Team, 1995-2009
+ *
+ * Interface to the RTS time
+ *
+ * Do not #include this file directly: #include "Rts.h" instead.
+ *
+ * To understand the structure of the RTS headers, see the wiki:
+ * http://hackage.haskell.org/trac/ghc/wiki/Commentary/SourceTree/Includes
+ *
+ * ---------------------------------------------------------------------------*/
+
+#ifndef RTS_GETTIME_H
+#define RTS_GETTIME_H
+
+StgWord64 getMonotonicNSec (void);
+
+#endif /* RTS_GETTIME_H */
diff --git a/rts/GetTime.h b/rts/GetTime.h
index 4b967b5b9a..32c3754829 100644
--- a/rts/GetTime.h
+++ b/rts/GetTime.h
@@ -12,7 +12,6 @@
#include "BeginPrivate.h"
void initializeTimer (void);
-StgWord64 getMonotonicNSec (void);
Time getProcessCPUTime (void);
Time getThreadCPUTime (void);