madlang 2.1.0.2 → 2.1.0.3
raw patch · 2 files changed
+5/−5 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- madlang.cabal +1/−1
- test/Spec.hs +4/−4
madlang.cabal view
@@ -1,5 +1,5 @@ name: madlang-version: 2.1.0.2+version: 2.1.0.3 synopsis: Randomized templating language DSL description: Please see README.md homepage: https://github.com/vmchale/madlang#readme
test/Spec.hs view
@@ -39,10 +39,10 @@ -- file <- madFileTibetan -- parseTok "" [] file `shouldParse` (List [(1.0,List [(0.5,Value "heads"),(0.5,Value "tails")])]) describe "runFile" $ do- parallel $ before (readFile' "test/templates/include.mad") $ it "parses file with inclusions" $ \file -> do- runFile [] "test/templates/include.mad" >>= (`shouldSatisfy` (\a -> any (a==) ["heads","tails","on parallel $ its side"]))- parallel $ before (readFile' "test/templates/ordered.mad") $ it "runs on a file out of order" $ \file -> do- runFile [] "test/templates/ordered.mad" >>= (`shouldSatisfy` (\a -> any (a==) ["heads","tails","one","two","three","thid"]))+ parallel $ it "parses file with inclusions" $ \file -> do+ runFile [] "test/templates/include.mad" >>= (`shouldSatisfy` (\a -> any (a==) ["heads","tails","on its side"]))+ parallel $ it "runs on a file out of order" $ \file -> do+ runFile [] "test/templates/ordered.mad" >>= (`shouldSatisfy` (\a -> any (a==) ["heads","tails","one","two","three","third"])) semErr :: Selector SemanticError semErr = const True