Commit e19ae5df authored by gmainlan@microsoft.com's avatar gmainlan@microsoft.com
Browse files

Catch potential garbage after -msse.

parent 680441de
......@@ -220,7 +220,8 @@ processOneArg opt_kind rest arg args
Just min <- parseInt min_s -> Right (f maj min, args)
| [maj_s] <- split '.' rest_no_eq,
Just maj <- parseInt maj_s -> Right (f maj 0, args)
| otherwise -> Right (f 1 0, args)
| null rest_no_eq -> Right (f 1 0, args)
| otherwise -> Left ("malformed version argument in " ++ dash_arg)
findArg :: [Flag m] -> String -> Maybe (String, OptKind m)
......
Supports Markdown
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