diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-01-10 14:02:03 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-01-10 14:02:03 (GMT) |
| commit | 48d6a20861f95be856bef0e780c054757c9c3803 (patch) | |
| tree | 39db34fe5a67b052bf5af3a728c43b10b954bfd5 /win/tclWinInit.c | |
| parent | 498f069f0e0b2f665d04a2a3b1b691f53297fe2c (diff) | |
| download | tcl-48d6a20861f95be856bef0e780c054757c9c3803.zip tcl-48d6a20861f95be856bef0e780c054757c9c3803.tar.gz tcl-48d6a20861f95be856bef0e780c054757c9c3803.tar.bz2 | |
Re-implement Tcl_WinTCharToUtf/Tcl_WinUtfToTChar in pure win32 api, even for TCL_UTF_MAX=3. We can do that now safely, because of the changed handling of valid 4-byte UTF-8 characters in the previous commit.
Diffstat (limited to 'win/tclWinInit.c')
| -rw-r--r-- | win/tclWinInit.c | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/win/tclWinInit.c b/win/tclWinInit.c index dc8bba7..91f149b 100644 --- a/win/tclWinInit.c +++ b/win/tclWinInit.c @@ -487,18 +487,11 @@ TclpSetInitialEncodings(void) { Tcl_DString encodingName; - TclpSetInterfaces(); Tcl_SetSystemEncoding(NULL, Tcl_GetEncodingNameFromEnvironment(&encodingName)); Tcl_DStringFree(&encodingName); } -void TclWinSetInterfaces( - int dummy) /* Not used. */ -{ - TclpSetInterfaces(); -} - const char * Tcl_GetEncodingNameFromEnvironment( Tcl_DString *bufPtr) |