diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-14 12:41:37 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-14 12:41:37 (GMT) |
| commit | 93022718af12833e135ad743bc6169bcfd443ddf (patch) | |
| tree | b16d8ef4b2c6dd1fc739b04a568e411969721611 /generic/tclIOSock.c | |
| parent | 5406b207723fa1acec5df7441387d1c9229a88ac (diff) | |
| parent | 0ef77b52637aa508cfcf98f6fb583cbeca47b5a4 (diff) | |
| download | tcl-93022718af12833e135ad743bc6169bcfd443ddf.zip tcl-93022718af12833e135ad743bc6169bcfd443ddf.tar.gz tcl-93022718af12833e135ad743bc6169bcfd443ddf.tar.bz2 | |
TIP #548 implementation: Support `wchar_t` conversion functions and deprecate `Tcl_WinUtfToTChar()` and `Tcl_WinTCharToUtf()`
Diffstat (limited to 'generic/tclIOSock.c')
| -rw-r--r-- | generic/tclIOSock.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tclIOSock.c b/generic/tclIOSock.c index 12e2900..adf729a 100644 --- a/generic/tclIOSock.c +++ b/generic/tclIOSock.c @@ -30,11 +30,12 @@ gai_strerror( ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&dataKey); if (tsdPtr->initialized) { - Tcl_DStringFree(&tsdPtr->errorMsg); + Tcl_DStringSetLength(&tsdPtr->errorMsg, 0); } else { + Tcl_DStringInit(&tsdPtr->errorMsg); tsdPtr->initialized = 1; } - Tcl_WinTCharToUtf(gai_strerrorW(code), -1, &tsdPtr->errorMsg); + Tcl_WCharToUtfDString(gai_strerrorW(code), -1, &tsdPtr->errorMsg); return Tcl_DStringValue(&tsdPtr->errorMsg); } #endif |