diff options
| author | Nathan Gass <gass@search.ch> | 2011-01-11 20:41:34 +0100 |
|---|---|---|
| committer | Nathan Gass <gass@search.ch> | 2011-01-11 20:41:34 +0100 |
| commit | e06899ef1fb4a0b6a034cceb4b9ec11725720efa (patch) | |
| tree | 33a18c4b49c8818227a9ae3c83a9e49d956fa082 /src/test-pandoc.hs | |
| parent | c0700987ba30de0cd7aa697da144eb19a58147ab (diff) | |
| download | pandoc-e06899ef1fb4a0b6a034cceb4b9ec11725720efa.tar.gz | |
Add reader groups for markdown and rst reader tests.
Diffstat (limited to 'src/test-pandoc.hs')
| -rw-r--r-- | src/test-pandoc.hs | 22 |
1 files changed, 12 insertions, 10 deletions
diff --git a/src/test-pandoc.hs b/src/test-pandoc.hs index 43b8a2afa..0c0218ae8 100644 --- a/src/test-pandoc.hs +++ b/src/test-pandoc.hs @@ -82,19 +82,21 @@ markdownCitationTest tests :: [Test] tests = [ testGroup "markdown" [ runWriterTest "" "markdown" - , runTest "reader" ["-r", "markdown", "-w", "native", "-s", "-S"] - "testsuite.txt" "testsuite.native" - , runTest "reader (tables)" ["-r", "markdown", "-w", "native"] - "tables.txt" "tables.native" - , runTest "reader (more)" ["-r", "markdown", "-w", "native", "-S"] - "markdown-reader-more.txt" "markdown-reader-more.native" + , testGroup "reader" [ runTest "basic" ["-r", "markdown", "-w", "native", "-s", "-S"] + "testsuite.txt" "testsuite.native" + , runTest "tables" ["-r", "markdown", "-w", "native"] + "tables.txt" "tables.native" + , runTest "more" ["-r", "markdown", "-w", "native", "-S"] + "markdown-reader-more.txt" "markdown-reader-more.native" + ] , markdownCitationTest ] , testGroup "rst" [ runWriterTest "" "rst" - , runTest "reader" ["-r", "rst", "-w", "native", "-s", "-S"] - "rst-reader.rst" "rst-reader.native" - , runTest "reader (tables)" ["-r", "rst", "-w", "native"] - "tables.rst" "tables-rstsubset.native" + , testGroup "reader" [ runTest "basic" ["-r", "rst", "-w", "native", "-s", "-S"] + "rst-reader.rst" "rst-reader.native" + , runTest "tables" ["-r", "rst", "-w", "native"] + "tables.rst" "tables-rstsubset.native" + ] ] , testGroup "latex" [ runWriterTest "" "latex" , runTest "reader" ["-r", "latex", "-w", "native", "-s", "-R"] |