Skip to content

Commit 448098a

Browse files
committed
io-sim-por: wrong step in the log
We report `EventTxWakup` in the thread that waken up the thread, but we report the `ThreadId` of the awaken thread. Including step of the executed thread is misleading.
1 parent 446623c commit 448098a

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

io-sim/src/Control/Monad/IOSimPOR/Internal.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -650,7 +650,7 @@ schedule thread@Thread{
650650
return $
651651
SimPORTrace time tid tstep tlbl (EventTxCommitted written' created' (Just effect')) $
652652
traceMany
653-
[ (time, tid', tstep, tlbl', EventTxWakeup vids')
653+
[ (time, tid', (-1), tlbl', EventTxWakeup vids')
654654
| tid' <- unblocked
655655
, let tlbl' = lookupThreadLabel tid' threads
656656
, let Just vids' = Set.toList <$> Map.lookup tid' wokeby ] $

0 commit comments

Comments
 (0)