[tcltk-perl] why simple Tcl script have very different execution time...
Brought to you by:
hobbs
From: Konovalov, V. <vko...@sp...> - 2004-10-19 03:10:58
|
why simple Tcl script have very different execution time when invoked from file and from tclsh? Give following simple script: for {set i 0} {$i < 1000000} {incr i} {} If invoked from file: tclsh a.tcl finishes execution in about 6 seconds on my PC. When I input same string from within "tclsh" shell it finishes in 3 seconds. Same behaviour (but larger execution time) when I replace 1000000 with 10000000 --- 60 and 25 seconds appropriately How this could be explained? Better yet, how can I speed up worse case to be in line with best one? I used ActiveTCL version 8.4.6 Thanks in advance. Vadim. |