Merge branch 'ygeyzel-grammer_fix_sc2183'
This commit is contained in:
commit
d1d574c091
|
@ -690,6 +690,7 @@ checkPrintfVar = CommandCheck (Exactly "printf") (f . arguments) where
|
|||
let formats = getPrintfFormats string
|
||||
let formatCount = length formats
|
||||
let argCount = length more
|
||||
let pluraliseIfMany word n = if n > 1 then word ++ "s" else word
|
||||
|
||||
return $ if
|
||||
| argCount == 0 && formatCount == 0 ->
|
||||
|
@ -705,7 +706,8 @@ checkPrintfVar = CommandCheck (Exactly "printf") (f . arguments) where
|
|||
return () -- Great: a suitable number of arguments
|
||||
| otherwise ->
|
||||
warn (getId format) 2183 $
|
||||
"This format string has " ++ show formatCount ++ " variables, but is passed " ++ show argCount ++ " arguments."
|
||||
"This format string has " ++ show formatCount ++ " " ++ pluraliseIfMany "variable" formatCount ++
|
||||
", but is passed " ++ show argCount ++ pluraliseIfMany " argument" argCount ++ "."
|
||||
|
||||
unless ('%' `elem` concat (oversimplify format) || isLiteral format) $
|
||||
info (getId format) 2059
|
||||
|
|
Loading…
Reference in New Issue