diff options
author | donnie@darthik.com <unknown> | 2009-04-13 01:11:40 +0000 |
---|---|---|
committer | donnie@darthik.com <unknown> | 2009-04-13 01:11:40 +0000 |
commit | c29305dadcb245bb080f65d946d92d0035243b6c (patch) | |
tree | 741ae319986706faf986a26f06be7889cfa16aae /rts/eventlog/EventLog.h | |
parent | 543823a15820e4006b4d973b1bddf07749f7c1b3 (diff) | |
download | haskell-c29305dadcb245bb080f65d946d92d0035243b6c.tar.gz |
Changed postEvent last argument from "nat from" to "StgWord64 other".
StgWord64 other better represents this argument since it can be used as
any particular data, thus "other" and not the "from" capability as it was
previously strictly used. Also, StgWord64 is normally larger than type
nat to allow for larger data to be passed through the "other" argument.
Diffstat (limited to 'rts/eventlog/EventLog.h')
-rw-r--r-- | rts/eventlog/EventLog.h | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/rts/eventlog/EventLog.h b/rts/eventlog/EventLog.h index 386730106e..c2511b986b 100644 --- a/rts/eventlog/EventLog.h +++ b/rts/eventlog/EventLog.h @@ -23,15 +23,15 @@ void initEventLogging(void); void endEventLogging(void); void freeEventLogging(void); -void postEvent_(Capability *cap, EventTypeNum tag, StgThreadID id, nat from); +void postEvent_(Capability *cap, EventTypeNum tag, StgThreadID id, StgWord64 other); /* * Post an event to the capability's event buffer. */ -INLINE_HEADER void postEvent(Capability *cap, EventTypeNum tag, StgThreadID id, nat from) +INLINE_HEADER void postEvent(Capability *cap, EventTypeNum tag, StgThreadID id, StgWord64 other) { if (RtsFlags.EventLogFlags.doEventLogging) { - postEvent_(cap, tag, id, from); + postEvent_(cap, tag, id, other); } } @@ -42,7 +42,7 @@ void printAndClearEventLog(Capability *cap); INLINE_HEADER void postEvent(Capability *cap STG_UNUSED, EventTypeNum tag STG_UNUSED, StgThreadID id STG_UNUSED, - nat from STG_UNUSED) + StgWord64 other STG_UNUSED) { /* nothing */ } |