tcl-otcl 脚本：concat（合并两个 list）

       concat：合并两个 list。

# 合并两个list
set a {0 1 2}
puts $a
set b {k f c}
puts $b
set ab [concat $a $b]        ;# 合并两个 list
puts $ab


0 1 2
k f c
0 1 2 k f c