Posted to tcl by colin at Wed May 23 06:00:58 GMT 2012view pretty

Out of the Box
THREAD:8148.08 microseconds per iteration
INTERP:7060.47 microseconds per iteration
PROC:10.85 microseconds per iteration
E_THREAD:74.22 microseconds per iteration
E_INTERP:6.23 microseconds per iteration
E_PROC:2.06 microseconds per iteration
A_THREAD:38.23 microseconds per iteration
AE_THREAD:5897

With [proc tclInit {} {}]
THREAD:3713.32 microseconds per iteration
INTERP:3155.04 microseconds per iteration
PROC:10.26 microseconds per iteration
E_THREAD:52.02 microseconds per iteration
E_INTERP:6.23 microseconds per iteration
E_PROC:2.12 microseconds per iteration
A_THREAD:6.6 microseconds per iteration
AE_THREAD:3551

With [proc tclInit {} {incr ::THC}]
THREAD:3623.84 microseconds per iteration
INTERP:3248.57 microseconds per iteration
PROC:10.76 microseconds per iteration
E_THREAD:51.81 microseconds per iteration
E_INTERP:6.93 microseconds per iteration
E_PROC:2.14 microseconds per iteration
A_THREAD:6.48 microseconds per iteration
AE_THREAD:3613