15/07/2010, 19:47
en accord avec la ligne :
remplace :
par :
tcl
set newlines [list [lrange $data $::memnb end]]
remplace :
tcl
foreach line $newline {
par :
tcl
foreach line $newlines {