diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-07-21 11:37:21 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-07-21 11:37:21 (GMT) |
commit | 7caf2af1db913adaf775172aaa508e3b98274967 (patch) | |
tree | 825543b8d5a65f0df13f5d6f630ae65d903d187f /win | |
parent | 9195d0b1bc6a7d80e16f86172efd83c4cb73919b (diff) | |
download | tcl-7caf2af1db913adaf775172aaa508e3b98274967.zip tcl-7caf2af1db913adaf775172aaa508e3b98274967.tar.gz tcl-7caf2af1db913adaf775172aaa508e3b98274967.tar.bz2 |
simplify tenviron2utfdstr/utf2tenvirondstr macro's, since 2nd argument is always -1
Improve error-handling related to environment variables
All 'stolen' from TIP #571 branch
Diffstat (limited to 'win')
-rw-r--r-- | win/tclWinInit.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/win/tclWinInit.c b/win/tclWinInit.c index 253acee..01714f0 100644 --- a/win/tclWinInit.c +++ b/win/tclWinInit.c @@ -579,9 +579,6 @@ TclpSetVariables( *---------------------------------------------------------------------- */ -# define tenviron2utfdstr(string, len, dsPtr) \ - (char *)Tcl_Char16ToUtfDString((const unsigned short *)(string), ((((len) + 2) >> 1) - 1), (dsPtr)) - Tcl_Size TclpFindVariable( const char *name, /* Name of desired environment variable |