From e06899ef1fb4a0b6a034cceb4b9ec11725720efa Mon Sep 17 00:00:00 2001 From: Nathan Gass Date: Tue, 11 Jan 2011 20:41:34 +0100 Subject: Add reader groups for markdown and rst reader tests. --- src/test-pandoc.hs | 22 ++++++++++++---------- 1 file 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"] -- cgit v1.2.3