diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-14 19:11:57 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-14 19:11:57 (GMT) |
commit | 6fa16c680c6af311355e3c43f9123007c5fa565b (patch) | |
tree | 5bc839e36bb43119086558688dba279495a8d4f3 /generic/tkInt.h | |
parent | 62a467f50761835b22b455d6ff0105b2e4bbe4dd (diff) | |
parent | fe4022603129271b3e6e9f98136265c7982938dc (diff) | |
download | tk-6fa16c680c6af311355e3c43f9123007c5fa565b.zip tk-6fa16c680c6af311355e3c43f9123007c5fa565b.tar.gz tk-6fa16c680c6af311355e3c43f9123007c5fa565b.tar.bz2 |
More improvements handling characters > U+FFFF as surrogates. Add internal TkUtfPrev(), which handles jumping back over surrogate pairs.
Diffstat (limited to 'generic/tkInt.h')
-rw-r--r-- | generic/tkInt.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/tkInt.h b/generic/tkInt.h index 8f958ab..f638c56 100644 --- a/generic/tkInt.h +++ b/generic/tkInt.h @@ -1284,9 +1284,11 @@ MODULE_SCOPE void TkUnixSetXftClipRegion(TkRegion clipRegion); #if TCL_UTF_MAX > 4 # define TkUtfToUniChar Tcl_UtfToUniChar # define TkUniCharToUtf Tcl_UniCharToUtf +# define TkUtfPrev Tcl_UtfPrev #else MODULE_SCOPE int TkUtfToUniChar(const char *, int *); MODULE_SCOPE int TkUniCharToUtf(int, char *); + MODULE_SCOPE const char *TkUtfPrev(const char *, const char *); #endif /* |