varying 0.7.0.1 → 0.7.0.2
raw patch · 2 files changed
+8/−7 lines, 2 files
Files
- test/Main.hs +7/−6
- varying.cabal +1/−1
test/Main.hs view
@@ -66,9 +66,9 @@ it "should produce output exactly one time per call" $ concat scans `shouldBe` "hey, there..." - describe "fromEvent" $ do+ describe "untilProc" $ do let s = do- str <- fromEvent $ var f+ str <- untilProc $ var f step $ Just str step $ Just "done" f :: Int -> Maybe String@@ -108,8 +108,9 @@ it "should step twice and left should win" $ unwords scans `shouldBe` "start s10:s20 s11:s21 right won with True" - describe "raceMany" $ do- let s1 = do step "t"+ describe "raceAny" $ do+ let s1 :: Spline () String Int+ s1 = do step "t" step "c" return 0 s2 = do step "h"@@ -117,8 +118,8 @@ return 1 s3 = do step "e" step "t"- return (2 :: Int)- s = do x <- raceMany [s1,s2,s3]+ return 2 + s = do x <- raceAny [s1,s2,s3] step $ show x Identity scans = scanSpline s "" $ replicate 3 () it "should output in parallel (mappend) and return the first or leftmost result" $ unwords scans `shouldBe` "the cat 0"
varying.cabal view
@@ -10,7 +10,7 @@ -- PVP summary: +-+------- breaking API changes -- | | +----- non-breaking API additions -- | | | +--- code changes with no API change-version: 0.7.0.1+version: 0.7.0.2 -- A short (one-line) description of the package. synopsis: FRP through value streams and monadic splines.