hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

[Shell-Parse] Use \STX and \ETX for quoting

Browse Source 
Also drops escaping
This commit is contained in:
Nikolay Yakimov
2015-12-27 02:42:45 +03:00
parent 5e4026b946
commit fff9087ff7
2 changed files with 12 additions and 46 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
test/ShellParseSpec.hs
View File

@@ -10,27 +10,9 @@ spec =
describe "parseCmdLine" $ do
it "splits arguments" $
parseCmdLine "test command line" `shouldBe` ["test", "command", "line"]
it "honors double quotes" $
parseCmdLine "test command line \"with double quotes\""
`shouldBe` ["test", "command", "line", "with double quotes"]
it "escapes spaces" $ do
parseCmdLine "with\\ spaces"
`shouldBe` ["with spaces"]
parseCmdLine "\"with\\ spaces\""
`shouldBe` ["with spaces"]
it "escapes '\\'" $ do
parseCmdLine "\\\\"
`shouldBe` ["\\"]
parseCmdLine "\"\\\\\""
`shouldBe` ["\\"]
it "escapes double quotes" $ do
parseCmdLine "\\\""
`shouldBe` ["\""]
parseCmdLine "\"\\\"\""
`shouldBe` ["\""]
it "doesn't escape random characters" $
parseCmdLine "\\a\\b\\c"
`shouldBe` ["\\a\\b\\c"]
it "honors quoted segments" $
parseCmdLine "test command line \STXwith quoted segment\ETX"
`shouldBe` ["test", "command", "line", "with quoted segment"]
it "squashes multiple spaces" $
parseCmdLine "test command"
`shouldBe` ["test", "command"]