Posted to tcl by schelte at Thu Apr 29 21:54:30 GMT 2010view raw

  1. % proc foo {} {array set foo {k1 v1 k2 v2 k3 v3}}
  2. % proc foo1 {} {array set foo {k1 v1 k2 v2 k3 v3}}
  3. % time foo 100000
  4. 3.48418 microseconds per iteration
  5. % time foo1 100000
  6. 1.7591 microseconds per iteration
  7. % time foo 100000
  8. 3.70262 microseconds per iteration
  9. % time foo1 100000
  10. 1.59128 microseconds per iteration