diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-22 14:07:39 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-22 14:07:39 (GMT) |
commit | f53107854d150d09590ee24be61d25f522abb678 (patch) | |
tree | b1c16cb2de8c3e6bc00e6e35761bab1985a3cef5 /generic/tclInt.h | |
parent | a85181bdcc4455c4b42e6873318fdc8232b88a52 (diff) | |
parent | 92ea491e1df5a8c3467062724cc6e6accda787a8 (diff) | |
download | tcl-f53107854d150d09590ee24be61d25f522abb678.zip tcl-f53107854d150d09590ee24be61d25f522abb678.tar.gz tcl-f53107854d150d09590ee24be61d25f522abb678.tar.bz2 |
Merge 9.0
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 3241651..8ccad81 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4566,17 +4566,10 @@ MODULE_SCOPE const TclFileAttrProcs tclpFileAttrProcs[]; *---------------------------------------------------------------- */ -#if TCL_UTF_MAX > 3 #define TclUtfToUniChar(str, chPtr) \ (((UCHAR(*(str))) < 0x80) ? \ ((*(chPtr) = UCHAR(*(str))), 1) \ : Tcl_UtfToUniChar(str, chPtr)) -#else -#define TclUtfToUniChar(str, chPtr) \ - (((UCHAR(*(str))) < 0x80) ? \ - ((*(chPtr) = UCHAR(*(str))), 1) \ - : Tcl_UtfToChar16(str, chPtr)) -#endif /* *---------------------------------------------------------------- |