diff options
| author | dgp <dgp@users.sourceforge.net> | 2017-07-18 13:34:16 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2017-07-18 13:34:16 (GMT) |
| commit | dcf71727af7c004849649ee60bcd285f604c7b07 (patch) | |
| tree | 37a655c263bfffbf1ef6a285b9bd9b9abbded617 /generic/tclInt.h | |
| parent | 5ebb774188fab74b559f61332e3d9655f2843920 (diff) | |
| parent | bb331bf1d89f77b744f8a757f3aeb28de48b6363 (diff) | |
| download | tcl-dcf71727af7c004849649ee60bcd285f604c7b07.zip tcl-dcf71727af7c004849649ee60bcd285f604c7b07.tar.gz tcl-dcf71727af7c004849649ee60bcd285f604c7b07.tar.bz2 | |
merge trunk
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 5f96914..ce490c2 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4338,7 +4338,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)) /* |