diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-05 15:14:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-05 15:14:29 (GMT) |
| commit | 96c82a32e19afd4581f3aa21da39c8c6aa90bd7c (patch) | |
| tree | 31455945857d2de92c86342b6a07d812a83f4350 /win/tclWinTime.c | |
| parent | 2d7fb3bc20951567f5cd26584fb146ea5c271cc2 (diff) | |
| parent | 26c1cd495a1ba8397db198e13aafe1a29287e6d0 (diff) | |
| download | tcl-96c82a32e19afd4581f3aa21da39c8c6aa90bd7c.zip tcl-96c82a32e19afd4581f3aa21da39c8c6aa90bd7c.tar.gz tcl-96c82a32e19afd4581f3aa21da39c8c6aa90bd7c.tar.bz2 | |
Mark more function paramaters as unused. Now Tcl compiles fully (on UNIX and Windows) without -Wunused-parameters warnings
Diffstat (limited to 'win/tclWinTime.c')
| -rw-r--r-- | win/tclWinTime.c | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/win/tclWinTime.c b/win/tclWinTime.c index 49389de..39e1100 100644 --- a/win/tclWinTime.c +++ b/win/tclWinTime.c @@ -414,8 +414,11 @@ Tcl_GetTime( static void NativeScaleTime( Tcl_Time *timePtr, - ClientData clientData) + ClientData dummy) { + (void)timePtr; + (void)dummy; + /* * Native scale is 1:1. Nothing is done. */ @@ -649,9 +652,10 @@ NativeGetMicroseconds(void) static void NativeGetTime( Tcl_Time *timePtr, - ClientData clientData) + ClientData dummy) { Tcl_WideInt usecSincePosixEpoch; + (void)dummy; /* * Try to use high resolution timer. @@ -694,8 +698,10 @@ void TclWinResetTimerResolution(void); static void StopCalibration( - ClientData unused) /* Client data is unused */ + ClientData dummy) /* Client data is unused */ { + (void)dummy; + SetEvent(timeInfo.exitEvent); /* @@ -972,6 +978,7 @@ CalibrationThread( { FILETIME curFileTime; DWORD waitResult; + (void)arg; /* * Get initial system time and performance counter. |