Posted to tcl by mjanssen at Tue Jan 22 16:01:50 GMT 2008view pretty

$ ./tclsh85.exe
% while 1 { puts [time {lappend b [string repeat a 100]} 100000] ; unset b}
2.81914 microseconds per iteration
2.74498 microseconds per iteration
2.73918 microseconds per iteration
2.77697 microseconds per iteration
2.73516 microseconds per iteration
2.79858 microseconds per iteration
2.81713 microseconds per iteration
2.79984 microseconds per iteration
2.78266 microseconds per iteration
2.80925 microseconds per iteration
2.75137 microseconds per iteration
2.80046 microseconds per iteration
2.76281 microseconds per iteration
2.80665 microseconds per iteration
2.80093 microseconds per iteration


nlv18605@NLVNYMAC01DT597 /c/src/tcl8.5.0/win
$ /bin/tclsh85.exe
%  while 1 { puts [time {lappend b [string repeat a 100]} 100000] ; unset b}
3.35698 microseconds per iteration
3.19896 microseconds per iteration
3.22432 microseconds per iteration
3.68512 microseconds per iteration
3.27089 microseconds per iteration
3.18235 microseconds per iteration
3.1747 microseconds per iteration
3.21845 microseconds per iteration
3.23271 microseconds per iteration
3.24681 microseconds per iteration
3.29028 microseconds per iteration
3.1821 microseconds per iteration
3.27428 microseconds per iteration
3.26963 microseconds per iteration
3.16715 microseconds per iteration
3.23826 microseconds per iteration
3.20569 microseconds per iteration