regex-applicative 0.3 → 0.3.0.1
raw patch · 3 files changed
+16/−10 lines, 3 filesdep +tastydep +tasty-hunitdep +tasty-smallcheckdep −test-frameworkdep −test-framework-hunitdep −test-framework-smallcheck
Dependencies added: tasty, tasty-hunit, tasty-smallcheck
Dependencies removed: test-framework, test-framework-hunit, test-framework-smallcheck
Files
- CHANGES.md +5/−0
- regex-applicative.cabal +6/−5
- test.hs +5/−5
CHANGES.md view
@@ -1,6 +1,11 @@ Changes ======= +0.3.0.1+-------++Port the test suite to tasty+ 0.3 --- * Add a new module, `Text.Regex.Applicative.Common`, which contains some
regex-applicative.cabal view
@@ -9,7 +9,7 @@ -- standards guiding when and how versions should be incremented. -- DO NOT FORGET TO UPDATE THE GIT TAG BELOW!!!-Version: 0.3+Version: 0.3.0.1 -- A short (one-line) description of the package. Synopsis: Regex-based parsing with applicative interface@@ -56,7 +56,7 @@ Source-repository this type: git location: git://github.com/feuerbach/regex-applicative.git- tag: v0.3+ tag: v0.3.0.1 Library Default-language: Haskell2010@@ -89,12 +89,13 @@ Test-Suite test-regex-applicative type: exitcode-stdio-1.0 main-is: test.hs+ GHC-Options: -threaded Default-language: Haskell2010 Build-depends: base < 5, containers, transformers, smallcheck >= 1.0, HUnit,- test-framework,- test-framework-smallcheck,- test-framework-hunit+ tasty,+ tasty-smallcheck,+ tasty-hunit
test.hs view
@@ -10,9 +10,9 @@ import Test.HUnit import Test.SmallCheck import Test.SmallCheck.Series-import Test.Framework-import Test.Framework.Providers.SmallCheck-import Test.Framework.Providers.HUnit+import Test.Tasty+import Test.Tasty.SmallCheck+import Test.Tasty.HUnit -- Small alphabets as SmallCheck's series newtype A = A { a :: Char } deriving Show@@ -85,7 +85,7 @@ let fs = map f s in isJust (fs =~ re) == isJust (fs =~ (re *> pure ())) -tests =+tests = testGroup "Tests" [ testGroup "Engine tests" [ t "re1" 10 $ prop re1 a , t "re2" 10 $ prop re2 ab@@ -176,7 +176,7 @@ ] ] where- t name n = withDepth n . testProperty name+ t name n = localOption (SmallCheckDepth n) . testProperty name u name real ideal = testCase name (assertEqual "" real ideal) main = defaultMain tests