diff options
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index ccfd05e..c3e0f9d 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -269,8 +269,6 @@ extern "C" { #ifndef CONST # define CONST const #endif -#define CONST84 const -#define CONST84_RETURN const #endif /* !TCL_NO_DEPRECATED */ @@ -2157,7 +2155,7 @@ typedef struct Tcl_EncodingType { */ #ifndef TCL_UTF_MAX -#define TCL_UTF_MAX 3 +#define TCL_UTF_MAX 4 #endif /* @@ -2347,10 +2345,10 @@ typedef int (Tcl_NRPostProc) (ClientData data[], Tcl_Interp *interp, /* *---------------------------------------------------------------------------- * The following constant is used to test for older versions of Tcl in the - * stubs tables. + * stubs tables. If TCL_UTF_MAX>4 use a different value. */ -#define TCL_STUB_MAGIC ((int) 0xFCA3BACF) +#define TCL_STUB_MAGIC ((int) 0xFCA3BACF + (TCL_UTF_MAX>4)) /* * The following function is required to be defined in all stubs aware |