lreverse

 

Encore une contribution du Yoda des Whizzlets [1].

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


Catégorie Manuel Tcl/Tk