how to create tcl list of multiple list in tcl?

Question

I have list of objects in a variable stored as $m_objs using each object i can get 4 different values like demoRoot demoSuite demoCase and ic so each of those has to be a list of list like this:

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}
}

So i tried using foreach loop like this:

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
}

Output i get is for only one iteration like this

puts $icList
PTSE2 actions misc rmon_counters

but the Output should be obtained as i mentioned as set data {...........}

Please help me to get this one

The puts is only printing the value for one iteration (the last one). The list of lists is built in the tests variable; try printing that? — Donal Fellows
– Donal Fellows, Commented Jan 18, 2017 at 10:31

Brad Lanam · Accepted Answer · 2017-01-18 07:36:07Z

2

Change this line:

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

to:

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

This will create icList as a list rather than a string, and will be appended to the tests list as a list.

References: list

answered Jan 18, 2017 at 7:36

Brad Lanam

5,9532 gold badges25 silver badges34 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

how to create tcl list of multiple list in tcl?

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related