junit-xml 0.1.0.1 → 0.1.0.2
raw patch · 4 files changed
+17/−15 lines, 4 filesdep ~tastyPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: tasty
API changes (from Hackage documentation)
Files
- CHANGELOG.md +4/−0
- README.md +2/−0
- junit-xml.cabal +3/−3
- src/Text/XML/JUnit.hs +8/−12
CHANGELOG.md view
@@ -1,3 +1,7 @@+# 0.1.0.2++- Expand version bounds to include tasy 1.4.+ # 0.1.0.1 - Expand version bounds to include tasty 1.3.
README.md view
@@ -1,3 +1,5 @@+[](https://travis-ci.org/jwoudenberg/junit-xml)+ # junit-xml A library for producing JUnit style XML reports in Haskell, for consumption by CI platforms like Jenkins.
junit-xml.cabal view
@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: da921af1660cb968fd27fb14a85bb5264cf4ba37873600137376f5434834fd61+-- hash: 72708238608fb2cef765e9a4e99c281514463f5ce7d370f27c767776c934e6a9 name: junit-xml-version: 0.1.0.1+version: 0.1.0.2 synopsis: Producing JUnit-style XML test reports. description: Please see the README at <https://github.com/jwoudenberg/junit-xml>. category: Web@@ -52,6 +52,6 @@ build-depends: base , junit-xml- , tasty >=1.1 && <1.4+ , tasty >=1.1 && <1.5 , tasty-golden >=2.3 && <2.4 default-language: Haskell2010
src/Text/XML/JUnit.hs view
@@ -238,7 +238,6 @@ } class Outcome a where- outcomeToXML :: a -> Maybe XML.Element outcomeCounter :: a -> Counts@@ -246,7 +245,6 @@ data Passed = Passed instance Outcome Passed where- outcomeToXML _ = Nothing outcomeCounter _ = mempty {cumTests = 1}@@ -254,7 +252,6 @@ data Skipped = Skipped instance Outcome Skipped where- outcomeToXML _ = Just $ XML.Element "skipped" mempty [] outcomeCounter _ = mempty {cumSkipped = 1, cumTests = 1}@@ -268,7 +265,6 @@ } instance Outcome Failed where- outcomeToXML = Just . encodeFailure outcomeCounter _ = mempty {cumFailed = 1, cumTests = 1}@@ -312,7 +308,6 @@ } instance Outcome Errored where- outcomeToXML = Just . encodeError outcomeCounter _ = mempty {cumErrored = 1, cumTests = 1}@@ -357,13 +352,14 @@ } instance Semigroup Counts where- c1 <> c2 = Counts- { cumTests = cumTests c1 + cumTests c2,- cumFailed = cumFailed c1 + cumFailed c2,- cumErrored = cumErrored c1 + cumErrored c2,- cumSkipped = cumSkipped c1 + cumSkipped c2,- cumTime = cumTime c1 + cumTime c2- }+ c1 <> c2 =+ Counts+ { cumTests = cumTests c1 + cumTests c2,+ cumFailed = cumFailed c1 + cumFailed c2,+ cumErrored = cumErrored c1 + cumErrored c2,+ cumSkipped = cumSkipped c1 + cumSkipped c2,+ cumTime = cumTime c1 + cumTime c2+ } instance Monoid Counts where mempty = Counts 0 0 0 0 0