[Shell-escape] Add empty input string test

This commit is contained in:
Nikolay Yakimov 2015-12-30 21:18:57 +03:00
parent 849496c047
commit 9f5dc6dc3c

View File

@ -27,3 +27,8 @@ spec =
`shouldBe` ["test", "command"] `shouldBe` ["test", "command"]
parseCmdLine " ascii-escape test command" parseCmdLine " ascii-escape test command"
`shouldBe` ["test", "command"] `shouldBe` ["test", "command"]
it "parses empty string as no argument" $ do
parseCmdLine ""
`shouldBe` [""]
parseCmdLine "ascii-escape "
`shouldBe` [""]