diff options
author | Karel Gardas <karel.gardas@centrum.cz> | 2011-01-12 05:18:29 +0000 |
---|---|---|
committer | Karel Gardas <karel.gardas@centrum.cz> | 2011-01-12 05:18:29 +0000 |
commit | ff7ee297b541101f930edf1a1c0a8323f49ccd5b (patch) | |
tree | b41196e3b6e977caac1abb62751c6c031d6a85af /rts/RtsProbes.d | |
parent | a914a2249f13e36695060084465e97c2174ab71d (diff) | |
download | haskell-ff7ee297b541101f930edf1a1c0a8323f49ccd5b.tar.gz |
replace C++ comments with C comments (Solaris' DTrace fails on C++ comments)
Diffstat (limited to 'rts/RtsProbes.d')
-rw-r--r-- | rts/RtsProbes.d | 54 |
1 files changed, 28 insertions, 26 deletions
diff --git a/rts/RtsProbes.d b/rts/RtsProbes.d index 6312c43362..dbc5111e46 100644 --- a/rts/RtsProbes.d +++ b/rts/RtsProbes.d @@ -10,30 +10,32 @@ #include "rts/EventLogFormat.h" -// ----------------------------------------------------------------------------- -// Payload datatypes for Haskell events -// ----------------------------------------------------------------------------- - -// We effectively have: -// -// typedef uint16_t EventTypeNum; -// typedef uint64_t EventTimestamp; // in nanoseconds -// typedef uint32_t EventThreadID; -// typedef uint16_t EventCapNo; -// typedef uint16_t EventPayloadSize; // variable-size events -// typedef uint16_t EventThreadStatus; - - -// ----------------------------------------------------------------------------- -// The HaskellEvent provider captures everything from eventlog for use with -// dtrace -// ----------------------------------------------------------------------------- - -// These probes correspond to the events defined in EventLogFormat.h -// +/* ----------------------------------------------------------------------------- + * Payload datatypes for Haskell events + * ----------------------------------------------------------------------------- + */ + +/* We effectively have: + * + * typedef uint16_t EventTypeNum; + * typedef uint64_t EventTimestamp; // in nanoseconds + * typedef uint32_t EventThreadID; + * typedef uint16_t EventCapNo; + * typedef uint16_t EventPayloadSize; // variable-size events + * typedef uint16_t EventThreadStatus; + */ + +/* ----------------------------------------------------------------------------- + * The HaskellEvent provider captures everything from eventlog for use with + * dtrace + * ----------------------------------------------------------------------------- + */ + +/* These probes correspond to the events defined in EventLogFormat.h + */ provider HaskellEvent { - // scheduler events + /* scheduler events */ probe create__thread (EventCapNo, EventThreadID); probe run__thread (EventCapNo, EventThreadID); probe stop__thread (EventCapNo, EventThreadID, EventThreadStatus, EventThreadID); @@ -49,11 +51,11 @@ provider HaskellEvent { probe request__par__gc (EventCapNo); probe create__spark__thread (EventCapNo, EventThreadID); - // other events -//This one doesn't seem to be used at all at the moment: -// probe log__msg (char *); + /* other events */ +/* This one doesn't seem to be used at all at the moment: */ +/* probe log__msg (char *); */ probe startup (EventCapNo); - // we don't need EVENT_BLOCK_MARKER with dtrace + /* we don't need EVENT_BLOCK_MARKER with dtrace */ probe user__msg (EventCapNo, char *); probe gc__idle (EventCapNo); probe gc__work (EventCapNo); |