diff options
| author | dgp@users.sourceforge.net <dgp> | 2011-05-31 19:58:45 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2011-05-31 19:58:45 (GMT) |
| commit | 9b7074655dd815162eed5312d42ffd5749dc4562 (patch) | |
| tree | 66de8db16f5e91e8891a0c300612975e1eb9d8a2 /generic/tclInt.h | |
| parent | 8533b0d540f852bbe9f05fe179a2acaf5b012d0a (diff) | |
| parent | 6593c167d4c24fc3b2496b7b177ebf96773bebfd (diff) | |
| download | tcl-9b7074655dd815162eed5312d42ffd5749dc4562.zip tcl-9b7074655dd815162eed5312d42ffd5749dc4562.tar.gz tcl-9b7074655dd815162eed5312d42ffd5749dc4562.tar.bz2 | |
Rewind from a refactoring that veered into the weeds.
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index d010284..cde46ac 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2443,6 +2443,8 @@ typedef struct List { #define LIST_MAX \ (1 + (int)(((size_t)UINT_MAX - sizeof(List))/sizeof(Tcl_Obj *))) +#define LIST_SIZE(numElems) \ + (unsigned)(sizeof(List) + (((numElems) - 1) * sizeof(Tcl_Obj *))) /* * Macro used to get the elements of a list object. |