diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-25 15:18:36 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-25 15:18:36 (GMT) |
commit | c08bf43ca1a8ebb3390a96f52deb2cfab0d2dace (patch) | |
tree | 3860dfcfcf70c610e4d476cf474e3475fe98e7d8 | |
parent | 269d4eec3f4013ae6828714fa998a38fd9dddd5b (diff) | |
download | tk-c08bf43ca1a8ebb3390a96f52deb2cfab0d2dace.zip tk-c08bf43ca1a8ebb3390a96f52deb2cfab0d2dace.tar.gz tk-c08bf43ca1a8ebb3390a96f52deb2cfab0d2dace.tar.bz2 |
Make TCL_INDEX_TEMP_TABLE flag usable in Tk 8.7. Not used anywhere yet.
-rw-r--r-- | generic/tkInt.h | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/generic/tkInt.h b/generic/tkInt.h index c171bf0..5b777c6 100644 --- a/generic/tkInt.h +++ b/generic/tkInt.h @@ -123,6 +123,17 @@ # endif #endif +/* + * Fallback in case Tk is linked against a Tcl version not having TIP #585 + * (TCL_INDEX_TEMP_TABLE flag). This allows to use the internal + * INDEX_TEMP_TABLE flag of Tcl. However this is rather ugly and not robust + * since nothing prevents Tcl from changing the value of its internal flags! + */ + +#if !defined(TCL_INDEX_TEMP_TABLE) +# define TCL_INDEX_TEMP_TABLE 2 +#endif + #ifndef TCL_Z_MODIFIER # if defined(_WIN64) # define TCL_Z_MODIFIER "I" |