tclに複数のリストのtclリストを作成するには？

Question

私はdemoRoot demoSuite demoCaseやICなどの4つの異なる値を取得することができ、各オブジェクトを使用して$ M_OBJSとして格納された変数にオブジェクトのリストを持っているので、これらのそれぞれは、このようなリストのリストである必要があります：

set data { 
    {demoRoot1 demoSuite1 demoCase1 ic1} 
    {demoRoot2 demoSuite2 demoCase2 ic2} 
    {demoRoot3 demoSuite3 demoCase3 ic3} 
    {demoRoot4 demoSuite4 demoCase4 ic4} 
    {demoRoot5 demoSuite5 demoCase5 ic5} 
    {demoRoot5 demoSuite5 demoCase5 ic5} 
} 

だから私はこのようにforeachループを使用してみました：私は取得

set tests [list] 

foreach ic $m_ics \ 
{ 
    set icRoot [$ic getRoot] 
    set icSuite [$ic getSuite] 
    set icCase [$ic getCase] 
    set icName [$ic getName] 
    set icList "$icRoot $icSuite $icCase $icName" 
    lappend tests $icList 
} 

出力はこの

puts $icList 
PTSE2 actions misc rmon_counters 

しかしOutpのような唯一の繰り返しのためにあります

set icList "$icRoot $icSuite $icCase $icName" 

へ：

set icList [list $icRoot $icSuite $icCase $icName] 

これはとしてicListを作成します。私は、私はこの1つの

Answer 1

変更にこの行を取得するには助けてくださいset data {...........}

ように述べたように、UTが得られなければなりませんリストではなく、リストとしてリストに追加されます。

参照：list