Re: Recursive proc/check file size

* Neil Madden <nem@xxxxxxxxxxxxx>
| proc checksize {myfile {prevsize 0}} {
| set filesize [file size $myfile]
| puts $filesize
| if {$filesize > 0 && $filesize == $prevsize} {
| puts "all done"

On a loaded machine, or due to flushing behaviour, the 'all done'
might not be true.

While the approach of using 'prevsize' as an additional argument
instead of a global variable is good advice, I would not recommend the
whole procedure as a solution the original problem. AF has posted a
different solution in the other thread using a redirected pipe which
seems better suited here (
Message-ID: <9e7c1925-e58c-48d1-b189-324132abb57d@xxxxxxxxxxxxxxxxxxxxxxxxxxxx>
).

R'
.

Relevant Pages