X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=rts%2Feventlog%2FEventLog.h;h=6ebf33ddc1ea8b428c064b1255e4901642273d42;hb=7408b39235bccdcde48df2a73337ff976fbc09b7;hp=364d12a3a60dd4a6ba0d13bceaaf5d6f0268bfe6;hpb=d71615757d0462b1721ee3664c5fa9f79325d666;p=ghc-hetmet.git diff --git a/rts/eventlog/EventLog.h b/rts/eventlog/EventLog.h index 364d12a..6ebf33d 100644 --- a/rts/eventlog/EventLog.h +++ b/rts/eventlog/EventLog.h @@ -26,13 +26,21 @@ void endEventLogging(void); void freeEventLogging(void); /* - * Post an event to the capability's event buffer. + * Post a scheduler event to the capability's event buffer (an event + * that has an associated thread). */ void postSchedEvent(Capability *cap, EventTypeNum tag, StgThreadID id, StgWord64 other); +/* + * Post a nullary event. + */ +void postEvent(Capability *cap, EventTypeNum tag); + void postMsg(char *msg, va_list ap); +void postUserMsg(Capability *cap, char *msg, va_list ap); + void postCapMsg(Capability *cap, char *msg, va_list ap); #else /* !TRACING */ @@ -43,11 +51,15 @@ INLINE_HEADER void postSchedEvent (Capability *cap STG_UNUSED, StgWord64 other STG_UNUSED) { /* nothing */ } +INLINE_HEADER void postEvent (Capability *cap STG_UNUSED, + EventTypeNum tag STG_UNUSED) +{ /* nothing */ } + INLINE_HEADER void postMsg (char *msg STG_UNUSED, va_list ap STG_UNUSED) { /* nothing */ } -INLINE_HEADER void postCapMsg (Capability *cap, +INLINE_HEADER void postCapMsg (Capability *cap STG_UNUSED, char *msg STG_UNUSED, va_list ap STG_UNUSED) { /* nothing */ }