[Tcl] file copy does not "touch" file. Why?

In a situation, when both source and destination files exist, file copy (with
-force of course) does not update the last modification time of the
destination file. This "feature" has a strong impact on cooperation with
'make'.

Is that really intended? I have to do 'touch' externally to make it correct.
The external "cp" command on unix does touch the destination file.

-- 
//  _    ___         Michal "Sektor" Malecki <sektor(whirl)kis.p.lodz.pl>
\\ L_ |/ `|  /^\ ,()                         <ethourhs(O)gmail.com>
// \_ |\  \/ \_/ /\ C++ bez cholesterolu: http://www.intercon.pl/~sektor/cbx
"I am allergic to Java because programming in Java reminds me casting spells"