diff options
Diffstat (limited to 'generic/Types.h')
-rw-r--r-- | generic/Types.h | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/generic/Types.h b/generic/Types.h index f46a4a0..e044555 100644 --- a/generic/Types.h +++ b/generic/Types.h @@ -387,6 +387,13 @@ typedef struct { #define CLEAR(var, mask) ((var) &= ~(mask)) #define ASSIGN(var, mask, bool) ((bool) ? SET((var), (mask)) : CLEAR((var), (mask))) +/* + * Macros for Tk8.4/perl/Tk utf compatibility + */ +#ifdef PTK +#define Tcl_NumUtfChars(str, len) ((len)<0?strlen(str):(len)) +#define Tcl_UtfAtIndex(str, index) (&(str)[(index)]) +#endif #ifdef __CPLUSPLUS__ } |