@@ -84,7 +84,7 @@ splitOnSeq = do
84splitOnSuffixSeq :: Spec
84splitOnSuffixSeq :: Spec
85splitOnSuffixSeq = do
85splitOnSuffixSeq = do
86 describe "Tests for splitOnSuffixSeq" $ do
86 describe "Tests for splitOnSuffixSeq" $ do
87− it "splitSuffixOn_ \".\" \"\" [\"\"]"
87+ it "splitSuffixOn_ \".\" \"\" []"
88 $ splitSuffixOn_ "." "" `shouldReturn` []
88 $ splitSuffixOn_ "." "" `shouldReturn` []
89 it "splitSuffixOn_ \".\" \".\" [\"\"]"
89 it "splitSuffixOn_ \".\" \".\" [\"\"]"
90 $ splitSuffixOn_ "." "." `shouldReturn` [""]
90 $ splitSuffixOn_ "." "." `shouldReturn` [""]