EventLog: Factor out ensureRoomFor*Event
[ghc.git] / rts / RtsProbes.d
index fd47b75..226f881 100644 (file)
@@ -6,6 +6,12 @@
  *
  * ---------------------------------------------------------------------------*/
 
+#ifdef __APPLE__ && __MACH__
+# if MAC_OS_X_VERSION_MIN_REQUIRED >= MAC_OS_X_VERSION_10_9
+#  define USE_INTTYPES_H_FOR_RTS_PROBES_D
+# endif
+#endif
+
 #include "HsFFI.h"
 #include "rts/EventLogFormat.h"
 
@@ -99,4 +105,5 @@ provider HaskellEvent {
 /*  probe log__msg (char *); */
   /* we don't need EVENT_BLOCK_MARKER with dtrace */
   probe user__msg (EventCapNo, char *);
+  probe user__marker (EventCapNo, char *);
 };