diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-09-26 11:45:14 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-09-26 11:45:14 (GMT) |
commit | 6fc7c3942a4f1f84b585a5570818f98299254c51 (patch) | |
tree | 3d5fa836f5a3c3ea017592b62ab7f54bdcb87724 /generic/tkInt.h | |
parent | 05a224b57c876cd9db9d2478dddf9614b16b0661 (diff) | |
download | tk-6fc7c3942a4f1f84b585a5570818f98299254c51.zip tk-6fc7c3942a4f1f84b585a5570818f98299254c51.tar.gz tk-6fc7c3942a4f1f84b585a5570818f98299254c51.tar.bz2 |
Introduce two utility functions for handling Unicode surrogate pairs, and use it in tkWinKey.c. No change in functionality.
Diffstat (limited to 'generic/tkInt.h')
-rw-r--r-- | generic/tkInt.h | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/generic/tkInt.h b/generic/tkInt.h index dd5dcad..f360f08 100644 --- a/generic/tkInt.h +++ b/generic/tkInt.h @@ -1232,6 +1232,14 @@ MODULE_SCOPE Status TkParseColor (Display * display, MODULE_SCOPE void TkUnixSetXftClipRegion(TkRegion clipRegion); #endif +#if TCL_UTF_MAX > 4 +# define TkUtfToUniChar Tcl_UtfToUniChar +# define TkUniCharToUtf Tcl_UniCharToUtf +#else + MODULE_SCOPE int TkUtfToUniChar(const char *, int *); + MODULE_SCOPE int TkUniCharToUtf(int, char *); +#endif + /* * Unsupported commands. */ |