diff options
author | dgp <dgp@users.sourceforge.net> | 2017-09-02 21:36:57 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2017-09-02 21:36:57 (GMT) |
commit | 19028a0d17ae987e42a91918abe8421e3030812b (patch) | |
tree | 7d06332b52ff9d4645ae411863a63a055b3f1eb8 /generic/tclInt.h | |
parent | 39efd5474116799b123d4082bca3a9c30c7b8b82 (diff) | |
parent | 0364abb28794dfc51a043615b44ead2175bf91f4 (diff) | |
download | tcl-19028a0d17ae987e42a91918abe8421e3030812b.zip tcl-19028a0d17ae987e42a91918abe8421e3030812b.tar.gz tcl-19028a0d17ae987e42a91918abe8421e3030812b.tar.bz2 |
merge 8.5bug_0e4d88b650
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 6113f23..25bec6a 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -3670,7 +3670,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)) /* |