diff options
Diffstat (limited to 'test/Haddock/Parser/UtilSpec.hs')
-rw-r--r-- | test/Haddock/Parser/UtilSpec.hs | 23 |
1 files changed, 0 insertions, 23 deletions
diff --git a/test/Haddock/Parser/UtilSpec.hs b/test/Haddock/Parser/UtilSpec.hs deleted file mode 100644 index 9e1e8de1..00000000 --- a/test/Haddock/Parser/UtilSpec.hs +++ /dev/null @@ -1,23 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} -module Haddock.Parser.UtilSpec (main, spec) where - -import Test.Hspec -import Data.Either - -import Data.Attoparsec.ByteString.Char8 -import Haddock.Parser - -main :: IO () -main = hspec spec - -spec :: Spec -spec = do - describe "takeUntil" $ do - it "takes everything until a specified byte sequence" $ do - parseOnly (takeUntil "end") "someend" `shouldBe` Right "some" - - it "requires the end sequence" $ do - parseOnly (takeUntil "end") "someen" `shouldSatisfy` isLeft - - it "takes escaped bytes unconditionally" $ do - parseOnly (takeUntil "end") "some\\endend" `shouldBe` Right "some\\end" |