Skip to content

Commit

Permalink
Tcl_GetUnicode() et all (from the UTF16 compatibility layer) should b…
Browse files Browse the repository at this point in the history
…e handled by TCL_NO_DEPRECATED as well, if TCL_UTF_MAX=3
  • Loading branch information
jan.nijtmans committed Jan 10, 2025
1 parent 7ab0b63 commit ab6140e
Showing 1 changed file with 16 additions and 0 deletions.
16 changes: 16 additions & 0 deletions generic/tclDecls.h
Original file line number Diff line number Diff line change
Expand Up @@ -4476,6 +4476,22 @@ extern const TclStubs *tclStubsPtr;
# define Tcl_UtfToUniChar Tcl_UtfToChar16
# undef Tcl_UniCharLen
# define Tcl_UniCharLen Tcl_Char16Len
# ifndef TCL_NO_DEPRECATED
# undef Tcl_GetUnicode
# undef Tcl_GetUnicodeFromObj
# undef Tcl_SetUnicodeObj
# undef Tcl_AppendUnicodeToObj
# undef Tcl_UtfAtIndex
# undef Tcl_GetCharLength
# undef Tcl_UniCharNcmp
# undef Tcl_UniCharNcasecmp
# undef Tcl_UniCharCaseMatch
# undef Tcl_GetRange
# undef Tcl_GetUniChar
# undef Tcl_NumUtfChars
# undef Tcl_UtfNcmp
# undef Tcl_UtfNcasecmp
# endif
#elif !defined(BUILD_tcl)
# undef Tcl_NumUtfChars
# define Tcl_NumUtfChars TclNumUtfChars
Expand Down

0 comments on commit ab6140e

Please sign in to comment.