diff options
| author | Austin Seipp <austin@well-typed.com> | 2014-07-21 20:29:03 -0500 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2014-07-28 09:29:15 -0500 |
| commit | 1c89c96bd5118d14c003128839b8b67c4c6d90f1 (patch) | |
| tree | 551045f2cce6d59fc9a8bcf3f5ab6326ee931375 | |
| parent | f2a3f539a6fc1a92b4f1d7f01b51c8b69a63fb77 (diff) | |
| download | haskell-1c89c96bd5118d14c003128839b8b67c4c6d90f1.tar.gz | |
rts: delint Messages.c
Signed-off-by: Austin Seipp <austin@well-typed.com>
| -rw-r--r-- | rts/Messages.c | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/rts/Messages.c b/rts/Messages.c index 82d8699d60..5a67bf3e8c 100644 --- a/rts/Messages.c +++ b/rts/Messages.c @@ -166,8 +166,8 @@ nat messageBlackHole(Capability *cap, MessageBlackHole *msg) StgClosure *bh = UNTAG_CLOSURE(msg->bh); StgTSO *owner; - debugTraceCap(DEBUG_sched, cap, "message: thread %d blocking on blackhole %p", - (W_)msg->tso->id, msg->bh); + debugTraceCap(DEBUG_sched, cap, "message: thread %d blocking on " + "blackhole %p", (W_)msg->tso->id, msg->bh); info = bh->header.info; @@ -210,7 +210,8 @@ loop: #ifdef THREADED_RTS if (owner->cap != cap) { sendMessage(cap, owner->cap, (Message*)msg); - debugTraceCap(DEBUG_sched, cap, "forwarding message to cap %d", owner->cap->no); + debugTraceCap(DEBUG_sched, cap, "forwarding message to cap %d", + owner->cap->no); return 1; } #endif @@ -273,7 +274,8 @@ loop: #ifdef THREADED_RTS if (owner->cap != cap) { sendMessage(cap, owner->cap, (Message*)msg); - debugTraceCap(DEBUG_sched, cap, "forwarding message to cap %d", owner->cap->no); + debugTraceCap(DEBUG_sched, cap, "forwarding message to cap %d", + owner->cap->no); return 1; } #endif |