Posted to tcl by schelte at Thu Apr 29 21:54:30 GMT 2010view pretty
% 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