diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-07-13 15:07:39 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-07-13 15:07:39 (GMT) |
commit | dcf0075b187c06e8c88feee09a0dfc33c14a6b88 (patch) | |
tree | 0494ca01f4742003383f3d73f7ced6ef870dd181 /generic | |
parent | 651416ffcce971c426fc6d5b1a93e661f1e368c6 (diff) | |
parent | e04398953ff1c2dc018c8e9183d9af690eb7a3bc (diff) | |
download | tcl-dcf0075b187c06e8c88feee09a0dfc33c14a6b88.zip tcl-dcf0075b187c06e8c88feee09a0dfc33c14a6b88.tar.gz tcl-dcf0075b187c06e8c88feee09a0dfc33c14a6b88.tar.bz2 |
merge core-8-6-branch
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclInt.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 3aaff6d..118af85 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4408,7 +4408,7 @@ MODULE_SCOPE void TclDbInitNewObj(Tcl_Obj *objPtr, const char *file, #define TclUtfToUniChar(str, chPtr) \ ((((unsigned char) *(str)) < 0xC0) ? \ - ((*(chPtr) = (Tcl_UniChar) *(str)), 1) \ + ((*(chPtr) = (unsigned char) *(str)), 1) \ : Tcl_UtfToUniChar(str, chPtr)) /* |