parseCommandLine :: String -> Either ParseError Command
parseCommandLine = parse commandLine ""
parseCommandLine :: String -> Either ParseError Command
parseCommandLine = parse commandLine ""
parseCommandLine = parse commandLine ""