enum_from_to lo hi
generates {lo lo+1 ... hi-1 hi}
Source code:
set result {} for {set i $lo} {$i<=$hi} {incr i} { lappend result $i } return $result