egghelp/eggheads community

How to use lreplace in nested lists

2004-08-09T12:10:40-04:00

Thanks alot!

// Peter

Statistics: Posted by QKill — Mon Aug 09, 2004 12:10 pm

How to use lreplace in nested lists

2004-08-09T11:18:42-04:00

use 'lset' if you're using one of the most recent versions of Tcl, if not, try this proc:

Code:

proc lreplace2 {list path val} {set i [lindex $path 0]set path [lrange $path 1 end]if {[llength $path]} {lreplace $list $i $i [lreplace2 [lindex $list $i] $path $val]} {lreplace $list $i $i $val}}

% lreplace2 {{{0 1 2} {0 1 2}} 2} {0 1 0} Hey?
{{0 1 2} {Hey? 1 2}} 2

Statistics: Posted by user — Mon Aug 09, 2004 11:18 am

How to use lreplace in nested lists

2004-08-09T09:13:53-04:00

Hi,

how can i update an object in a nested list?

Code:

set cal(0) [list {2} {2004-09-02} {19:00} {clame} {{{q3wcp14} {3} {14}} {{q3wcp17} {20} {1}}} {information} {5} {qkill} {blue} {tiny}]

If i for example want to update the value q3wcp17 which is in the third level of the nested list. Can anyone help me?

Thanks!

// Peter

Statistics: Posted by QKill — Mon Aug 09, 2004 9:13 am