diff options
| -rw-r--r-- | win/tclWinInit.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tclWinInit.c b/win/tclWinInit.c index 57bd63f..35ce207 100644 --- a/win/tclWinInit.c +++ b/win/tclWinInit.c @@ -115,7 +115,7 @@ static const OSVERSIONINFOW *TclpGetWindowsVersion(void) static INIT_ONCE osInfoOnce = INIT_ONCE_STATIC_INIT; OSVERSIONINFOW *osInfoPtr = NULL; BOOL result = InitOnceExecuteOnce( - &osInfoOnce, TclpGetWindowsVersionOnce, NULL, &osInfoPtr); + &osInfoOnce, TclpGetWindowsVersionOnce, NULL, (LPVOID *)&osInfoPtr); return result ? osInfoPtr : NULL; } @@ -475,7 +475,7 @@ const char * Tcl_GetEncodingNameFromEnvironment( Tcl_DString *bufPtr) { - OSVERSIONINFOW *osInfoPtr = TclpGetWindowsVersion(); + const OSVERSIONINFOW *osInfoPtr = TclpGetWindowsVersion(); /* * TIP 716 - for Build 18362 or higher, force utf-8. Note Windows build * numbers always increase, so no need to check major / minor versions. |