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 | 9dd9b629b31ee0887635f10518915ec61a53b25f (patch) | |
tree | 0494ca01f4742003383f3d73f7ced6ef870dd181 /generic/tclInt.h | |
parent | 457f43e25bc14e667885d09a37c0e5fc6c740a23 (diff) | |
parent | 440dbbf6207e361cc6c315e5cc2bc8eb59205684 (diff) | |
download | tcl-9dd9b629b31ee0887635f10518915ec61a53b25f.zip tcl-9dd9b629b31ee0887635f10518915ec61a53b25f.tar.gz tcl-9dd9b629b31ee0887635f10518915ec61a53b25f.tar.bz2 |
merge core-8-6-branch
Diffstat (limited to 'generic/tclInt.h')
-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)) /* |