aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2011-01-14 18:01:57 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2011-01-14 18:01:57 -0800
commit0222f367b18ac4f77ab76751792c5757c2641d51 (patch)
treeea4eb87d99b0ba76d4adaf4afdd9cd51a1e3a6f4
parent09e9a86db95073c7b7672feacc5a5229a6249a07 (diff)
downloadpandoc-0222f367b18ac4f77ab76751792c5757c2641d51.tar.gz
Keep Tests.Arbitrary but remove quickcheck tests for now.
Remove Tests.Shared. Remove dependency on QuickCheck.
-rw-r--r--pandoc.cabal4
-rw-r--r--tests/Tests/Shared.hs13
-rw-r--r--tests/test-pandoc.hs2
3 files changed, 1 insertions, 18 deletions
diff --git a/pandoc.cabal b/pandoc.cabal
index 20bb6ff3d..63a6f7fa9 100644
--- a/pandoc.cabal
+++ b/pandoc.cabal
@@ -305,10 +305,8 @@ Executable test-pandoc
Extensions: CPP
Build-Depends: base >= 4 && < 5, Diff, test-framework >= 0.3 && < 0.4,
test-framework-hunit >= 0.2 && < 0.3,
- test-framework-quickcheck2 >= 0.2 && < 0.3,
- HUnit >= 1.2 && < 1.3, QuickCheck >= 2.3 && < 2.5
+ HUnit >= 1.2 && < 1.3
Other-Modules: Tests.Old
Tests.Helpers
Tests.Arbitrary
- Tests.Shared
Tests.Readers.LaTeX
diff --git a/tests/Tests/Shared.hs b/tests/Tests/Shared.hs
deleted file mode 100644
index c7222c035..000000000
--- a/tests/Tests/Shared.hs
+++ /dev/null
@@ -1,13 +0,0 @@
-module Tests.Shared (tests) where
-import Test.Framework.Providers.QuickCheck2
-import Test.Framework
-import Tests.Arbitrary
-import Text.Pandoc.Shared
-import Text.Pandoc
-
-normalize_rt :: Pandoc -> Bool
-normalize_rt d = normalize (normalize d) == normalize d
-
-tests :: [Test]
-tests = [ testProperty "normalize_rt" normalize_rt ]
-
diff --git a/tests/test-pandoc.hs b/tests/test-pandoc.hs
index 9f3d65300..316060c83 100644
--- a/tests/test-pandoc.hs
+++ b/tests/test-pandoc.hs
@@ -6,14 +6,12 @@ import Test.Framework
import qualified Tests.Old
import qualified Tests.Readers.LaTeX
-import qualified Tests.Shared
tests :: [Test]
tests = [ testGroup "Old" Tests.Old.tests
, testGroup "Readers"
[ testGroup "LaTeX" Tests.Readers.LaTeX.tests
]
- , testGroup "Shared" Tests.Shared.tests
]
main :: IO ()