diff options
| author | Ian Lynagh <ian@well-typed.com> | 2013-01-17 15:33:26 +0000 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2013-01-17 15:33:56 +0000 |
| commit | fd3fd18a570d7b61e72614fc9594e721d8a53ab0 (patch) | |
| tree | c49da34cc452217c16ddf6ac3f190870d0d4445e /includes | |
| parent | 81f4cd3e08996d35b3a70dfee4d70a829f2f2622 (diff) | |
| download | haskell-fd3fd18a570d7b61e72614fc9594e721d8a53ab0.tar.gz | |
Expose the prototype for getMonotonicNSec
Fixes T3807 on OS X 32.
Diffstat (limited to 'includes')
| -rw-r--r-- | includes/Rts.h | 1 | ||||
| -rw-r--r-- | includes/rts/GetTime.h | 19 |
2 files changed, 20 insertions, 0 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 */ |