barrucadu/dejafu
1
1
Fork 0
mirror of https://github.com/barrucadu/dejafu.git synced 2024-12-19 19:41:31 +03:00
Code Issues Projects Releases Wiki Activity

Add Functor context to sctBoundedM for pre-AMP GHC

Browse Source
This commit is contained in:
Michael Walker 2015-08-10 10:37:42 +01:00
parent d32ee150bd
commit dea286a582
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Test/DejaFu/SCT.hs
View File

@ -144,7 +144,7 @@ sctBoundedIO bv backtrack initialise c = sctBoundedM bv backtrack initialise run
run sched s = runConcIO' sched s c
-- | Generic SCT runner.
sctBoundedM :: Monad m
sctBoundedM :: (Functor m, Monad m)
=> ([Decision] -> Bool)
-> ([BacktrackStep] -> Int -> ThreadId -> [BacktrackStep])
-> (Maybe (ThreadId, ThreadAction) -> NonEmpty (ThreadId, ThreadAction') -> NonEmpty ThreadId)