diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-24 13:58:06 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-24 13:58:06 (GMT) |
| commit | 4576277c9931b6267da5083fb250652d077bb819 (patch) | |
| tree | 7db68db0357ed4b4a8010cc5ca5718c4d1577a25 /generic/tclInt.h | |
| parent | 53f15cc67318ebe942c270c60268b0396688befc (diff) | |
| download | tcl-4576277c9931b6267da5083fb250652d077bb819.zip tcl-4576277c9931b6267da5083fb250652d077bb819.tar.gz tcl-4576277c9931b6267da5083fb250652d077bb819.tar.bz2 | |
Add TclGetUniChar() to the compatibility set
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index b6cf3b4..cc13c61 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -3335,6 +3335,8 @@ MODULE_SCOPE int TclZipfs_Init(Tcl_Interp *interp); # define Tcl_UtfAtIndex TclUtfAtIndex # undef Tcl_GetRange # define Tcl_GetRange TclGetRange +# undef Tcl_GetUniChar +# define Tcl_GetUniChar TclGetUniChar #else # define tclUniCharStringType tclStringType # define TclGetUnicodeFromObj_ Tcl_GetUnicodeFromObj @@ -3351,6 +3353,8 @@ MODULE_SCOPE int TclZipfs_Init(Tcl_Interp *interp); # define TclUtfAtIndex Tcl_UtfAtIndex # undef TclGetRange # define TclGetRange Tcl_GetRange +# undef TclGetUniChar +# define TclGetUniChar Tcl_GetUniChar #endif |