lreverse
La curiosité n’est pas un vilain défaut mais une qualité fondamentale.
Encore une contribution du Yoda des Whizzlets RS.
Cette commande (qui est/sera dans Tcl 8.5) retourne (au sens propre) la liste reçue en argument.
proc ::lreverse list {
set res {}
set i [llength $list]
while {$i > 0} {lappend res [lindex $list [incr i -1]]}
set res
}
Voir également :
list, lsearch, lremove, lreverse, lset
Mis à jour le 19 septembre 2012 à 12:50 CEST par Stéphane Aulery