4 lines
115 B
Tcl
4 lines
115 B
Tcl
set aList {foo}
|
|
lappend aList # bar
|
|
puts $aList ;# ==> prints "foo # bar"
|
|
puts [llength $aList] ;# ==> 3
|