Kurt Welgehausen wrote:
proc lpartition {recsize data} {
set ret {}
set datalen [llength $data]
for {set i 0; set j [expr {$recsize-1}]} \
{$i < $datalen} {incr i $recsize; incr j $recsize} {
lappend ret [lrange $data $i $j]
}
set ret}
So is there another way to determine the number
> Is there a fast way to get ... list of lists ... ?
proc lpartition {recsize data} {
set ret {}
set datalen [llength $data]
for {set i 0; set j [expr {$recsize-1}]} \
{$i < $datalen} {incr i $recsize; incr j $recsize} {
lappend ret [lrange $data $i $j]
}
set ret
}
or for a
2 matches
Mail list logo