diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-03-14 17:05:36 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-14 17:07:23 +0100 |
commit | 6ecc5b96a9854382682fd1c9231133c08dae7b17 (patch) | |
tree | 3703f769c52b951a6233a3b92736b84cc47700ed /test/Tests/Readers/RST.hs | |
parent | 0b4ae3af662587a69e6893b7f6c347d90912c48f (diff) | |
download | pandoc-6ecc5b96a9854382682fd1c9231133c08dae7b17.tar.gz |
Use tasty for tests rather than test-framework.
Diffstat (limited to 'test/Tests/Readers/RST.hs')
-rw-r--r-- | test/Tests/Readers/RST.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/test/Tests/Readers/RST.hs b/test/Tests/Readers/RST.hs index 7a0a3de28..7f67ee742 100644 --- a/test/Tests/Readers/RST.hs +++ b/test/Tests/Readers/RST.hs @@ -2,7 +2,7 @@ {-# LANGUAGE ScopedTypeVariables #-} module Tests.Readers.RST (tests) where -import Test.Framework +import Test.Tasty import Tests.Helpers import Text.Pandoc import Text.Pandoc.Arbitrary () @@ -13,10 +13,10 @@ rst = purely $ readRST def{ readerStandalone = True } infix 4 =: (=:) :: ToString c - => String -> (String, c) -> Test + => String -> (String, c) -> TestTree (=:) = test rst -tests :: [Test] +tests :: [TestTree] tests = [ "line block with blank line" =: "| a\n|\n| b" =?> lineBlock [ "a", mempty, "\160b" ] , testGroup "field list" |