on master help sign in
Add more interleaved tests and mplus tests
commite246532213ce8e2ba8c84a5e3c19b8a9c552b652 authorHarendra Kumar <harendra.kumar@gmail.com> dateSat 14 Oct 2017, 02:53 (9 years ago) parentc0d2b00
1 file changed+4−2
test/Main.hs+4−2
test/Main.hs+4−2
@@ -86,15 +86,17 @@ main = hspec $ do
8686
8787 describe "Serial Composition (<>)" $ compose (<>) id
8888 describe "Serial Composition (mappend)" $ compose mappend id
89+ describe "Interleaved Composition (<>)" $ compose (<=>) sort
8990 describe "Left biased parallel Composition (<|)" $ compose (<|) sort
9091 describe "Fair parallel Composition (<|>)" $ compose (<|>) sort
92+ describe "Fair parallel Composition (mplus)" $ compose mplus sort
9193
9294 ---------------------------------------------------------------------------
9395 -- Monoidal Composition ordering checks
9496 ---------------------------------------------------------------------------
9597
96− describe "Serial interleaved (<=>)" $ interleaved (<=>)
97− describe "Parallel interleaved (<|>)" $ interleaved (<|>)
98+ describe "Serial interleaved ordering check (<=>)" $ interleaved (<=>)
99+ describe "Parallel interleaved ordering check (<|>)" $ interleaved (<|>)
98100 describe "Left biased parallel time order check" $ parallelCheck (<|)
99101 describe "Fair parallel time order check" $ parallelCheck (<|>)
100102