diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-01-08 09:37:25 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-01-08 09:37:25 (GMT) |
commit | f09dcac7855bb4d75a3ca3b44b9d5ce188260bff (patch) | |
tree | 2f902d8a9af2864c706770cb5609a8a956076a4c /unix/tclUnixTime.c | |
parent | 6b7dec8d6a72719ff9684fa6c71ec40b2637d8ba (diff) | |
download | tcl-f09dcac7855bb4d75a3ca3b44b9d5ce188260bff.zip tcl-f09dcac7855bb4d75a3ca3b44b9d5ce188260bff.tar.gz tcl-f09dcac7855bb4d75a3ca3b44b9d5ce188260bff.tar.bz2 |
Omit -Wdeclaration-after-statement from CFLAGS: No longer needed since we stopped support for MSVC 6++
Change Tcl_WideInt -> long long in various places: Tcl_WideInt could be a 128-bit type, we don't want that everywhere.
Diffstat (limited to 'unix/tclUnixTime.c')
-rw-r--r-- | unix/tclUnixTime.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/unix/tclUnixTime.c b/unix/tclUnixTime.c index ead7b0c..adeacb68 100644 --- a/unix/tclUnixTime.c +++ b/unix/tclUnixTime.c @@ -100,13 +100,13 @@ TclpGetSeconds(void) *---------------------------------------------------------------------- */ -Tcl_WideInt +long long TclpGetMicroseconds(void) { Tcl_Time time; tclGetTimeProcPtr(&time, tclTimeClientData); - return ((Tcl_WideInt)time.sec)*1000000 + time.usec; + return ((long long)time.sec)*1000000 + time.usec; } /* @@ -177,19 +177,19 @@ TclpGetClicks(void) *---------------------------------------------------------------------- */ -Tcl_WideInt +long long TclpGetWideClicks(void) { - Tcl_WideInt now; + long long now; if (tclGetTimeProcPtr != NativeGetTime) { Tcl_Time time; tclGetTimeProcPtr(&time, tclTimeClientData); - now = ((Tcl_WideInt)time.sec)*1000000 + time.usec; + now = ((long long)time.sec)*1000000 + time.usec; } else { #ifdef MAC_OSX_TCL - now = (Tcl_WideInt) (mach_absolute_time() & INT64_MAX); + now = (long long) (mach_absolute_time() & INT64_MAX); #else #error Wide high-resolution clicks not implemented on this platform #endif @@ -217,7 +217,7 @@ TclpGetWideClicks(void) double TclpWideClicksToNanoseconds( - Tcl_WideInt clicks) + long long clicks) { double nsec; |