2008-08-09 16:51:08 +00:00
|
|
|
{-# OPTIONS_GHC -Wall #-}
|
|
|
|
|
|
|
|
module Main where
|
2011-01-04 01:00:01 +01:00
|
|
|
|
2011-01-12 13:11:08 +01:00
|
|
|
import Test.Framework
|
2013-01-18 11:23:09 -08:00
|
|
|
import GHC.IO.Encoding
|
2011-01-12 19:10:56 +01:00
|
|
|
import qualified Tests.Old
|
|
|
|
import qualified Tests.Readers.LaTeX
|
2011-01-26 22:09:09 -08:00
|
|
|
import qualified Tests.Readers.Markdown
|
2014-03-04 00:33:25 +01:00
|
|
|
import qualified Tests.Readers.Org
|
2015-05-13 20:39:01 -07:00
|
|
|
import qualified Tests.Readers.HTML
|
2011-01-26 09:10:39 -08:00
|
|
|
import qualified Tests.Readers.RST
|
2014-06-16 22:44:40 -07:00
|
|
|
import qualified Tests.Readers.Docx
|
2015-07-23 09:06:14 +02:00
|
|
|
import qualified Tests.Readers.Odt
|
2014-07-25 20:39:13 +01:00
|
|
|
import qualified Tests.Readers.Txt2Tags
|
2014-08-10 14:33:18 +01:00
|
|
|
import qualified Tests.Readers.EPUB
|
2011-01-21 10:23:41 -08:00
|
|
|
import qualified Tests.Writers.ConTeXt
|
2012-06-01 10:50:22 -07:00
|
|
|
import qualified Tests.Writers.LaTeX
|
2011-01-29 16:26:00 -08:00
|
|
|
import qualified Tests.Writers.HTML
|
2014-04-11 23:19:51 -06:00
|
|
|
import qualified Tests.Writers.Docbook
|
2011-01-22 12:28:30 -08:00
|
|
|
import qualified Tests.Writers.Native
|
2011-06-06 05:56:59 -07:00
|
|
|
import qualified Tests.Writers.Markdown
|
2014-08-03 16:48:55 +04:00
|
|
|
import qualified Tests.Writers.Plain
|
2014-05-03 21:24:20 -07:00
|
|
|
import qualified Tests.Writers.AsciiDoc
|
2015-03-03 14:37:02 +03:00
|
|
|
import qualified Tests.Writers.Docx
|
2015-04-16 19:27:33 +03:00
|
|
|
import qualified Tests.Writers.RST
|
2015-12-24 11:36:58 -05:00
|
|
|
import qualified Tests.Writers.TEI
|
2011-01-29 10:03:00 -08:00
|
|
|
import qualified Tests.Shared
|
2013-08-10 19:04:15 -07:00
|
|
|
import qualified Tests.Walk
|
2012-07-26 09:43:27 -07:00
|
|
|
import Text.Pandoc.Shared (inDirectory)
|
2014-08-13 12:19:42 -07:00
|
|
|
import System.Environment (getArgs)
|
2008-08-09 16:51:08 +00:00
|
|
|
|
2011-01-04 01:00:01 +01:00
|
|
|
tests :: [Test]
|
2011-01-12 19:10:56 +01:00
|
|
|
tests = [ testGroup "Old" Tests.Old.tests
|
2011-01-29 10:03:00 -08:00
|
|
|
, testGroup "Shared" Tests.Shared.tests
|
2013-08-10 19:04:15 -07:00
|
|
|
, testGroup "Walk" Tests.Walk.tests
|
2011-01-22 15:54:24 -08:00
|
|
|
, testGroup "Writers"
|
|
|
|
[ testGroup "Native" Tests.Writers.Native.tests
|
|
|
|
, testGroup "ConTeXt" Tests.Writers.ConTeXt.tests
|
2012-06-01 10:50:22 -07:00
|
|
|
, testGroup "LaTeX" Tests.Writers.LaTeX.tests
|
2011-01-29 16:26:00 -08:00
|
|
|
, testGroup "HTML" Tests.Writers.HTML.tests
|
2014-04-11 23:19:51 -06:00
|
|
|
, testGroup "Docbook" Tests.Writers.Docbook.tests
|
2011-06-06 05:56:59 -07:00
|
|
|
, testGroup "Markdown" Tests.Writers.Markdown.tests
|
2014-08-03 16:48:55 +04:00
|
|
|
, testGroup "Plain" Tests.Writers.Plain.tests
|
2014-05-03 21:24:20 -07:00
|
|
|
, testGroup "AsciiDoc" Tests.Writers.AsciiDoc.tests
|
2015-03-03 14:37:02 +03:00
|
|
|
, testGroup "Docx" Tests.Writers.Docx.tests
|
2015-04-16 19:27:33 +03:00
|
|
|
, testGroup "RST" Tests.Writers.RST.tests
|
2015-12-24 11:36:58 -05:00
|
|
|
, testGroup "TEI" Tests.Writers.TEI.tests
|
2011-01-22 15:54:24 -08:00
|
|
|
]
|
2011-01-14 00:30:36 -08:00
|
|
|
, testGroup "Readers"
|
|
|
|
[ testGroup "LaTeX" Tests.Readers.LaTeX.tests
|
2011-01-26 22:09:09 -08:00
|
|
|
, testGroup "Markdown" Tests.Readers.Markdown.tests
|
2015-05-13 20:39:01 -07:00
|
|
|
, testGroup "HTML" Tests.Readers.HTML.tests
|
2014-03-04 00:33:25 +01:00
|
|
|
, testGroup "Org" Tests.Readers.Org.tests
|
2011-01-26 09:10:39 -08:00
|
|
|
, testGroup "RST" Tests.Readers.RST.tests
|
2014-06-16 22:44:40 -07:00
|
|
|
, testGroup "Docx" Tests.Readers.Docx.tests
|
2015-07-23 09:06:14 +02:00
|
|
|
, testGroup "Odt" Tests.Readers.Odt.tests
|
2014-07-25 20:39:13 +01:00
|
|
|
, testGroup "Txt2Tags" Tests.Readers.Txt2Tags.tests
|
2014-08-10 14:33:18 +01:00
|
|
|
, testGroup "EPUB" Tests.Readers.EPUB.tests
|
2011-01-14 00:30:36 -08:00
|
|
|
]
|
2011-01-04 01:00:01 +01:00
|
|
|
]
|
|
|
|
|
2008-08-09 16:51:08 +00:00
|
|
|
main :: IO ()
|
2013-01-18 11:23:09 -08:00
|
|
|
main = do
|
|
|
|
setLocaleEncoding utf8
|
2014-08-13 12:19:42 -07:00
|
|
|
args <- getArgs
|
|
|
|
inDirectory "tests" $ defaultMainWithArgs tests args
|