diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-22 16:51:43 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-22 16:51:43 (GMT) |
commit | fbdc68b6a22a1be2c7923c6a2ab13214d3655aba (patch) | |
tree | 0f6bb9b880b126d19c83d5788bbc06fb21a46101 /win/tclWin32Dll.c | |
parent | 9f9a9e291d8ef1d9d6183a445c9fe19374261c4d (diff) | |
download | tcl-fbdc68b6a22a1be2c7923c6a2ab13214d3655aba.zip tcl-fbdc68b6a22a1be2c7923c6a2ab13214d3655aba.tar.gz tcl-fbdc68b6a22a1be2c7923c6a2ab13214d3655aba.tar.bz2 |
Handle the (unlikely) case that Tcl_DStringSetLength() results in a re-allocation of the buffer
Diffstat (limited to 'win/tclWin32Dll.c')
-rw-r--r-- | win/tclWin32Dll.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/win/tclWin32Dll.c b/win/tclWin32Dll.c index 2216a66..13a3dec 100644 --- a/win/tclWin32Dll.c +++ b/win/tclWin32Dll.c @@ -524,6 +524,7 @@ Tcl_WinTCharToUtf( memmove(r+2, r+1, p-r+size-1); memcpy(r++, "\xC0\x80", 2); Tcl_DStringSetLength(dsPtr, ++size + 1); + r = p = (char *)Tcl_DStringValue(dsPtr); } ++r; } |