##// END OF EJS Templates
remise au norme de cppcheck (mise à jour de la version de sortie xml de 1 vers 2)
remise au norme de cppcheck (mise à jour de la version de sortie xml de 1 vers 2)

File last commit:

r2:451739a45362
r10:b8cb68884afd
Show More
DUMP.tcl
13 lines | 326 B | application/x-tcl | TclLexer
#!/usr/bin/tclsh
foreach f [getSourceFileNames] {
puts "Tokens in file ${f}:"
foreach t [getTokens $f 1 0 -1 -1 {}] {
set value [lindex $t 0]
set line [lindex $t 1]
set column [lindex $t 2]
set name [lindex $t 3]
puts "${line}/${column}\t${name}\t${value}"
}
puts ""
}