tcl - lappend 命令

lappend命令 语法：lappend varname value ?value...? 把每个 value 的值作为一个元素附加到变量 varname 后面，并返回变量的新值，如果 varname 不存在，就生成这个变量。例： % lappend a 1 2 3 1 2 3 % set a 1 2 3

示例：

set lst [list 1 2 3 4]

>1 2 3 4

lappend lst [list 1 2 3]

>1 2 3 4 {1 2 3}

lappend第二个参数是一个数时，给指定列表添加一个元素；第二个参数是一个列表时，也给指定列表添加一个元素，但是该元素是列表（一个整体），不是将新列表中的元素加入到列表中。继续：

set a(1) [list 1 2 3 4]

>1 2 3 4

lappend a(1) 5

>1 2 3 4 5

lappend a(1) [list 1 2 3]

>1 2 3 4 5 {1 2 3}