diff options
| -rw-r--r-- | unix/tclUnixTime.c | 4 | ||||
| -rw-r--r-- | win/tclWinTime.c | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/unix/tclUnixTime.c b/unix/tclUnixTime.c index e0c7ac8..6ca641d 100644 --- a/unix/tclUnixTime.c +++ b/unix/tclUnixTime.c @@ -155,7 +155,7 @@ TclpGetClicks(void) Tcl_Time time; GetTime(&time); - now = time.sec*1000000 + time.usec; + now = ((unsigned long)(time.sec)*1000000UL) + (unsigned long)(time.usec); } else { /* * A semi-NativeGetTime, specialized to clicks. @@ -168,7 +168,7 @@ TclpGetClicks(void) Tcl_Time time; GetTime(&time); - now = time.sec*1000000 + time.usec; + now = ((unsigned long)(time.sec)*1000000UL) + (unsigned long)(time.usec); #endif /* NO_GETTOD */ return now; diff --git a/win/tclWinTime.c b/win/tclWinTime.c index 45338dd..a7e8474 100644 --- a/win/tclWinTime.c +++ b/win/tclWinTime.c @@ -249,7 +249,7 @@ TclpGetClicks(void) Tcl_Time now; /* Current Tcl time */ GetTime(&now); - return (unsigned long) (now.sec * 1000000) + now.usec; + return ((unsigned long)(now.sec)*1000000UL) + (unsigned long)(now.usec); } } |