##// END OF EJS Templates
Revert "Remove worse commit"...
Revert "Remove worse commit" This reverts commit a6522680236132283b040266dfb186fb73be0d8f.

File last commit:

r2:451739a45362
r254:42bd65f9354a
Show More
IPSIS_S04_FILENAME.tcl
13 lines | 479 B | application/x-tcl | TclLexer
#!/usr/bin/tclsh
# Naming conventions for file names
set fileNameRegex [getParameter "filename-regex" {^[A-Z]\w*$}]
foreach fileName [getSourceFileNames] {
# Check file name
if {[regexp {(?:\\|/)?([^\\/]+?)\.(?:h|cpp)$} $fileName matchedExpr fileNameWithoutExt]} {
if {![regexp $fileNameRegex $fileNameWithoutExt]} {
report $fileName 1 "The file names should match the following regex: $fileNameRegex (found: $fileNameWithoutExt)"
}
}
}