Commit 866efa3e authored by Michael Hanus 's avatar Michael Hanus
Browse files

Small bug fix for parsing --options

parent 880d8ed2
...@@ -321,7 +321,7 @@ renderCommandLine [] = [] ...@@ -321,7 +321,7 @@ renderCommandLine [] = []
renderCommandLine ((Val s):as) = s ++ " " ++ (renderCommandLine as) renderCommandLine ((Val s):as) = s ++ " " ++ (renderCommandLine as)
renderCommandLine ((FlagWithValue n v):as) = renderCommandLine ((FlagWithValue n v):as) =
"--" ++ n ++ "=" ++ v ++ " " ++ (renderCommandLine as) "--" ++ n ++ "=" ++ v ++ " " ++ (renderCommandLine as)
renderCommandLine ((Flag n):as) = "-" ++ n ++ " " ++ (renderCommandLine as) renderCommandLine ((Flag n):as) = "--" ++ n ++ " " ++ (renderCommandLine as)
--- Further parses a parsed command line using a parser spec. --- Further parses a parsed command line using a parser spec.
--- ---
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment