Posted to tcl by dbohdan at Fri Jan 01 19:06:07 GMT 2016view raw
- $ cat append.tcl
- puts [time {set a {}; for {set i 0} {$i < 10000000} {incr i} { append a @ }} 10]
- $ tclsh append.tcl
- 7152838.1 microseconds per iteration
- $ jimsh append.tcl
- 2172198 microseconds per iteration
Comments
Posted by miguel at Fri Jan 01 23:46:36 GMT 2016 [text] [code]
Compilation cost? Try the same with 1000 iterations instead of 10 (maybe reducing the iter number in the timed loop)