Skip to content

Commit 2bbeeb1

Browse files
committed
io-sim-por: improved StepInfo haddocks
1 parent 699677a commit 2bbeeb1

File tree

1 file changed

+16
-6
lines changed
  • io-sim/src/Control/Monad/IOSimPOR

1 file changed

+16
-6
lines changed

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

Lines changed: 16 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -196,17 +196,27 @@ data Step = Step {
196196
-- StepInfo
197197
--
198198

199-
-- As we run a simulation, we collect info about each previous step
199+
-- | As we execute a simulation, we collect information about each step. This
200+
-- information is updated as the simulation evolves by
201+
-- `Control.Monad.IOSimPOR.Types.updateRaces`.
202+
--
200203
data StepInfo = StepInfo {
204+
-- | Step that we want to reschedule to run after a step in `stepInfoRaces`
205+
-- (there will be one schedule modification per step in
206+
-- `stepInfoRaces`).
201207
stepInfoStep :: !Step,
202-
-- Control information when we reached this step
208+
209+
-- | Control information when we reached this step.
203210
stepInfoControl :: !ScheduleControl,
204-
-- threads that are still concurrent with this step
211+
212+
-- | Threads that are still concurrent with this step.
205213
stepInfoConcurrent :: !(Set ThreadId),
206-
-- steps following this one that did not happen after it
207-
-- (in reverse order)
214+
215+
-- | Steps following this one that did not happen after it
216+
-- (in reverse order).
208217
stepInfoNonDep :: ![Step],
209-
-- later steps that race with this one
218+
219+
-- | Later steps that race with `stepInfoStep`.
210220
stepInfoRaces :: ![Step]
211221
}
212222
deriving Show

0 commit comments

Comments
 (0)