summaryrefslogtreecommitdiff
path: root/tests/Tests/Shared.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2011-01-29 11:24:16 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2011-01-29 11:24:16 -0800
commit570d8ff08c7007c4fffd345c9bf2057201a0bdd4 (patch)
tree1e420ee65bbde87c52b714449622c5ef2adcd194 /tests/Tests/Shared.hs
parentfbf166b6c30a752047c7f49c20313421e3465009 (diff)
Moved tests to src.
Diffstat (limited to 'tests/Tests/Shared.hs')
-rw-r--r--tests/Tests/Shared.hs21
1 files changed, 0 insertions, 21 deletions
diff --git a/tests/Tests/Shared.hs b/tests/Tests/Shared.hs
deleted file mode 100644
index c35a158c1..000000000
--- a/tests/Tests/Shared.hs
+++ /dev/null
@@ -1,21 +0,0 @@
-module Tests.Shared (tests) where
-
-import Text.Pandoc.Definition
-import Text.Pandoc.Shared
-import Test.Framework
-import Tests.Helpers
-import Tests.Arbitrary()
-
-tests :: [Test]
-tests = [ testGroup "normalize"
- [ property "p_normalize_blocks_rt" p_normalize_blocks_rt
- , property "p_normalize_inlines_rt" p_normalize_inlines_rt
- ]
- ]
-
-p_normalize_blocks_rt :: [Block] -> Bool
-p_normalize_blocks_rt bs = normalize bs == normalize (normalize bs)
-
-p_normalize_inlines_rt :: [Inline] -> Bool
-p_normalize_inlines_rt ils = normalize ils == normalize (normalize ils)
-