Posted to tcl by evilotto at Mon Jun 17 21:11:27 GMT 2013view raw
- % set d [dict create]
- % for {set x 0} {$x < 100000} {incr x} {dict set d key:$x value:$x}
- % time {lreverse $d} 100
- 3332.55 microseconds per iteration
- % time {dict create {*}[lreverse $d]} 100
- 61818.58 microseconds per iteration
- % time {set e {}; dict for {k v} $d {lappend e $v $k}} 100
- 121130.29 microseconds per iteration
- %