[Shell-escape] Add empty input string test

2015-12-30 21:18:57 +03:00 · 2015-12-30 21:18:57 +03:00 · 9f5dc6dc3c
commit 9f5dc6dc3c
parent 849496c047
1 changed files with 5 additions and 0 deletions
--- a/test/ShellParseSpec.hs
+++ b/test/ShellParseSpec.hs
@ -27,3 +27,8 @@ spec =
        `shouldBe` ["test", "command"]
      parseCmdLine "   ascii-escape           test       command"
        `shouldBe` ["test", "command"]
+    it "parses empty string as no argument" $ do
+      parseCmdLine ""
+        `shouldBe` [""]
+      parseCmdLine "ascii-escape "
+        `shouldBe` [""]