diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-14 13:07:19 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-14 13:07:19 (GMT) |
| commit | fc77f0dda4c38f5d8a31b62f9e2cb35927922dc5 (patch) | |
| tree | 6db3c9a8eecf14ab943a33f85a465aa9c37758cc /win/tclWinSerial.c | |
| parent | 4396d37f6f0fc2dc3b776872b73ff9717ea26e43 (diff) | |
| parent | 93022718af12833e135ad743bc6169bcfd443ddf (diff) | |
| download | tcl-fc77f0dda4c38f5d8a31b62f9e2cb35927922dc5.zip tcl-fc77f0dda4c38f5d8a31b62f9e2cb35927922dc5.tar.gz tcl-fc77f0dda4c38f5d8a31b62f9e2cb35927922dc5.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'win/tclWinSerial.c')
| -rw-r--r-- | win/tclWinSerial.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/win/tclWinSerial.c b/win/tclWinSerial.c index 9f559e6..fed1c5e 100644 --- a/win/tclWinSerial.c +++ b/win/tclWinSerial.c @@ -1669,7 +1669,8 @@ SerialSetOptionProc( if (!GetCommState(infoPtr->handle, &dcb)) { goto getStateFailed; } - native = Tcl_WinUtfToTChar(value, -1, &ds); + Tcl_DStringInit(&ds); + native = Tcl_UtfToWCharDString(value, -1, &ds); result = BuildCommDCB(native, &dcb); Tcl_DStringFree(&ds); |