diff options
Diffstat (limited to 'tests/Regex.hs')
-rw-r--r-- | tests/Regex.hs | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/tests/Regex.hs b/tests/Regex.hs new file mode 100644 index 0000000..5aac932 --- /dev/null +++ b/tests/Regex.hs @@ -0,0 +1,24 @@ +module Regex + ( regexGroup + ) where + +import qualified Data.Map as M + +import Data.Binary +import Test.Framework (testGroup) +import Test.Framework.Providers.HUnit +import Test.Framework.Providers.QuickCheck2 +import Test.HUnit +import Test.QuickCheck + +import Text.Hakyll.Regex + +-- Regex test group. +regexGroup = testGroup "Regex" + [ testCase "test_splitRegex_1" test_splitRegex_1 + , testCase "test_splitRegex_2" test_splitRegex_2 + ] + +-- Split Regex test cases. +test_splitRegex_1 = splitRegex "," "1,2,3" @?= ["1", "2", "3"] +test_splitRegex_2 = splitRegex "," ",1,2," @?= ["1", "2"] |