From 666bba863c25ae2991bbcb34ce8162341c30329b Mon Sep 17 00:00:00 2001
From: Paolo Capriotti <p.capriotti@gmail.com>
Date: Fri, 23 Mar 2012 17:22:20 +0000
Subject: Define monotonic time function for Darwin.

---
 libraries/base/include/HsBase.h | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'libraries/base/include')

diff --git a/libraries/base/include/HsBase.h b/libraries/base/include/HsBase.h
index b321967634..29559d5e43 100644
--- a/libraries/base/include/HsBase.h
+++ b/libraries/base/include/HsBase.h
@@ -110,6 +110,9 @@
 # else
 #  define CLOCK_ID CLOCK_REALTIME
 # endif
+#elif defined(darwin_HOST_OS)
+# include <mach/mach.h>
+# include <mach/mach_time.h>
 #endif
 
 #if !defined(__MINGW32__) && !defined(irix_HOST_OS)
-- 
cgit v1.2.1