Posted to tcl by schelte at Thu Apr 29 21:54:30 GMT 2010view raw
- % proc foo {} {array set foo {k1 v1 k2 v2 k3 v3}}
- % proc foo1 {} {array set foo {k1 v1 k2 v2 k3 v3}}
- % time foo 100000
- 3.48418 microseconds per iteration
- % time foo1 100000
- 1.7591 microseconds per iteration
- % time foo 100000
- 3.70262 microseconds per iteration
- % time foo1 100000
- 1.59128 microseconds per iteration