I have two lists, say a and b
set a {1 2 3}
set b {x y z}

I need output as {1 x 2 y 3 z}
Is there any TCL function which does that?


There's no function to merge two lists in that order - concat will join one list on after another, but that's NOT what you need!  I would do it with a for loop ...

Code:

set a {1 2 3} set b {x y z} for {set k 0} {$k < [llength $b]} {incr k} {        lappend result [lindex $a $k]        lappend result [lindex $b $k]        } puts $result

---