diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-21 16:18:10 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-21 16:18:10 (GMT) |
commit | c736c693049e659603b5cc2efb22092d921cc250 (patch) | |
tree | 040cd8807107ecb6756f0fafd333fbffe946f6c5 /win | |
parent | ff710528dbb61e071fac856e1923f8a59c689a2a (diff) | |
download | tcl-c736c693049e659603b5cc2efb22092d921cc250.zip tcl-c736c693049e659603b5cc2efb22092d921cc250.tar.gz tcl-c736c693049e659603b5cc2efb22092d921cc250.tar.bz2 |
Fix [fb4a0a6675]: signed integer overflow in TclpGetClicks()
Diffstat (limited to 'win')
-rw-r--r-- | win/tclWinTime.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/win/tclWinTime.c b/win/tclWinTime.c index f75567e..ed58824 100644 --- a/win/tclWinTime.c +++ b/win/tclWinTime.c @@ -225,7 +225,7 @@ TclpGetClicks(void) Tcl_Time now; /* Current Tcl time */ tclGetTimeProcPtr(&now, tclTimeClientData); /* Tcl_GetTime inlined */ - return (unsigned long)(now.sec * 1000000) + now.usec; + return ((unsigned long)(now.sec)*1000000UL) + (unsigned long)(now.usec); } } |