##// END OF EJS Templates
Updates test files with new AMDA file header...
Updates test files with new AMDA file header Old files are moved to an archive folder

File last commit:

r2:451739a45362
r775:21f27f9e6cd9
Show More
IPSIS_C09.tcl
23 lines | 677 B | application/x-tcl | TclLexer
Ajout de vera++
r2 #!/usr/bin/tclsh
# using namespace are not allowed in header files
foreach fileName [getSourceFileNames] {
set extension [file extension $fileName]
if {[lsearch {.h .hh .hpp .hxx .ipp} $extension] != -1} {
set state "start"
foreach token [getTokens $fileName 1 0 -1 -1 {using namespace identifier}] {
set type [lindex $token 3]
if {$state == "using" && $type == "namespace"} {
report $fileName $usingLine "using namespace not allowed in header file"
}
if {$type == "using"} {
set usingLine [lindex $token 1]
}
set state $type
}
}
}