ci/vera++/rules/L004: add warning support
Signed-off-by: Jose Alamos <jose@alamos.cc>
This commit is contained in:
parent
da17a1b5a3
commit
f3a934a169
6
dist/tools/vera++/scripts/rules/L004.tcl
vendored
6
dist/tools/vera++/scripts/rules/L004.tcl
vendored
@ -3,11 +3,17 @@
|
|||||||
|
|
||||||
set maxLength [getParameter "max-line-length" 100]
|
set maxLength [getParameter "max-line-length" 100]
|
||||||
|
|
||||||
|
#MOD: We add here a line length thershold for line length
|
||||||
|
set maxLengthWarn [getParameter "max-line-length-warn" 80]
|
||||||
|
|
||||||
foreach f [getSourceFileNames] {
|
foreach f [getSourceFileNames] {
|
||||||
set lineNumber 1
|
set lineNumber 1
|
||||||
foreach line [getAllLines $f] {
|
foreach line [getAllLines $f] {
|
||||||
if {[string length $line] > $maxLength} {
|
if {[string length $line] > $maxLength} {
|
||||||
report $f $lineNumber "line is longer than ${maxLength} characters"
|
report $f $lineNumber "line is longer than ${maxLength} characters"
|
||||||
|
} elseif {[string length $line] > $maxLengthWarn} {
|
||||||
|
# puts won't make vera++ return error code when invoked with --error
|
||||||
|
puts "$f:$lineNumber: warning: line is longer than $maxLengthWarn characters"
|
||||||
}
|
}
|
||||||
incr lineNumber
|
incr lineNumber
|
||||||
}
|
}
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user