diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-30 17:32:25 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-30 17:32:25 (GMT) |
| commit | 6c4b78cfa8c06ea5963591778902da74850d1985 (patch) | |
| tree | e0740646c5e683c241d4444fd0e756fd45a773ef /generic/tclInt.h | |
| parent | ad7deae63486dd51cf1b388dbb095d0f0419aa34 (diff) | |
| parent | 1645895629e813e4fbabf9d91e4b6077827ebab0 (diff) | |
| download | tcl-6c4b78cfa8c06ea5963591778902da74850d1985.zip tcl-6c4b78cfa8c06ea5963591778902da74850d1985.tar.gz tcl-6c4b78cfa8c06ea5963591778902da74850d1985.tar.bz2 | |
Eliminate ListSizeT_MAX, since it's the same as TCL_SIZE_MAX
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 1481b5c..2d3a0fc 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2440,16 +2440,6 @@ typedef enum TclEolTranslation { #define TCL_INVOKE_NO_UNKNOWN (1<<1) #define TCL_INVOKE_NO_TRACEBACK (1<<2) -#if TCL_MAJOR_VERSION > 8 -/* - * SSIZE_MAX, NOT SIZE_MAX as negative differences need to be expressed - * between values of the Tcl_Size type so limit the range to signed - */ -# define ListSizeT_MAX ((Tcl_Size)PTRDIFF_MAX) -#else -# define ListSizeT_MAX INT_MAX -#endif - /* * ListStore -- * @@ -2490,7 +2480,7 @@ typedef struct ListStore { /* Max number of elements that can be contained in a list */ #define LIST_MAX \ - ((Tcl_Size)(((size_t)ListSizeT_MAX - offsetof(ListStore, slots)) \ + ((Tcl_Size)(((size_t)TCL_SIZE_MAX - offsetof(ListStore, slots)) \ / sizeof(Tcl_Obj *))) /* Memory size needed for a ListStore to hold numSlots_ elements */ #define LIST_SIZE(numSlots_) \ |