Commit fb5c1912 authored by Sylvain Henry's avatar Sylvain Henry Committed by Marge Bot

Remove redundant case

This alternative is redundant and triggers no warning when building with 8.6.5
parent 95741ea1
......@@ -1353,10 +1353,8 @@ parseCfgWeights s oldWeights =
, null rest
= [s1]
| (s1,rest) <- break (== ',') s
= [s1] ++ settings (drop 1 rest)
#if __GLASGOW_HASKELL__ <= 810
| otherwise = panic $ "Invalid cfg parameters." ++ exampleString
#endif
= s1 : settings (drop 1 rest)
assignment as
| (name, _:val) <- break (== '=') as
= (name,read val)
......
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