mirror of
https://github.com/barrucadu/dejafu.git
synced 2024-12-21 04:21:30 +03:00
22 lines
607 B
Haskell
Executable File
22 lines
607 B
Haskell
Executable File
module Cases where
|
|
|
|
import Test.Framework (Test, testGroup)
|
|
|
|
import qualified Cases.SingleThreaded as S
|
|
import qualified Cases.MultiThreaded as M
|
|
import qualified Cases.Refinement as R
|
|
import qualified Cases.Litmus as L
|
|
import qualified Cases.Async as A
|
|
import qualified Cases.Discard as D
|
|
|
|
-- | Run all the test cases.
|
|
testCases :: [Test]
|
|
testCases = map (uncurry testGroup)
|
|
[ ("Single Threaded", S.tests)
|
|
, ("Multi Threaded", M.tests)
|
|
, ("Refinement", R.tests)
|
|
, ("Litmus", L.tests)
|
|
, ("Async", A.tests)
|
|
, ("Discard", D.tests)
|
|
]
|