diff options
Diffstat (limited to 'unix/tclUnixTime.c')
| -rw-r--r-- | unix/tclUnixTime.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/unix/tclUnixTime.c b/unix/tclUnixTime.c index 770f904..2fb1782 100644 --- a/unix/tclUnixTime.c +++ b/unix/tclUnixTime.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixTime.c,v 1.31 2007/08/03 13:51:41 dkf Exp $ + * RCS: @(#) $Id: tclUnixTime.c,v 1.32 2007/11/10 20:49:43 das Exp $ */ #include "tclInt.h" @@ -192,11 +192,11 @@ TclpGetWideClicks(void) *----------------------------------------------------------------------------- */ -Tcl_WideInt +double TclpWideClicksToNanoseconds( Tcl_WideInt clicks) { - Tcl_WideInt nsec; + double nsec; if (tclGetTimeProcPtr != NativeGetTime) { nsec = clicks * 1000; @@ -210,9 +210,9 @@ TclpWideClicksToNanoseconds( maxClicksForUInt64 = UINT64_MAX / tb.numer; } if ((uint64_t) clicks < maxClicksForUInt64) { - nsec = (Tcl_WideInt) ((uint64_t) clicks * tb.numer / tb.denom); + nsec = ((uint64_t) clicks) * tb.numer / tb.denom; } else { - nsec = (Tcl_WideInt) ((long double) clicks * tb.numer / tb.denom); + nsec = ((long double) (uint64_t) clicks) * tb.numer / tb.denom; } #else #error Wide high-resolution clicks not implemented on this platform |