diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-11 12:56:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-11 12:56:29 (GMT) |
| commit | db90eb87ab6118052b0ff26ddad694ff1e4c17df (patch) | |
| tree | 03481b58a31f0fcf82158c6c66891c88725e957f /generic/tclCompile.h | |
| parent | aad9b75e1d3c584fd11cdd91c36e092034331ec8 (diff) | |
| parent | 3fc6f6245925a152501636599639794d46e2e45a (diff) | |
| download | tcl-db90eb87ab6118052b0ff26ddad694ff1e4c17df.zip tcl-db90eb87ab6118052b0ff26ddad694ff1e4c17df.tar.gz tcl-db90eb87ab6118052b0ff26ddad694ff1e4c17df.tar.bz2 | |
Merge 8.6. Remove tests/safe-stock86.test for win builds too (GIT, what are you doing ...!)
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 5c1b67c..21a27f7 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -991,7 +991,7 @@ typedef struct JumpFixupArray { typedef struct ForeachVarList { int numVars; /* The number of variables in the list. */ - int varIndexes[1]; /* An array of the indexes ("slot numbers") + int varIndexes[TCLFLEXARRAY];/* An array of the indexes ("slot numbers") * for each variable in the procedure's array * of local variables. Only scalar variables * are supported. The actual size of this @@ -1015,7 +1015,7 @@ typedef struct ForeachInfo { * the loop's iteration count. Used to * determine next value list element to assign * each loop var. */ - ForeachVarList *varLists[1];/* An array of pointers to ForeachVarList + ForeachVarList *varLists[TCLFLEXARRAY];/* An array of pointers to ForeachVarList * structures describing each var list. The * actual size of this field will be large * enough to numVars indexes. THIS MUST BE THE @@ -1046,7 +1046,7 @@ MODULE_SCOPE const AuxDataType tclJumptableInfoType; typedef struct { int length; /* Size of array */ - int varIndices[1]; /* Array of variable indices to manage when + int varIndices[TCLFLEXARRAY]; /* Array of variable indices to manage when * processing the start and end of a [dict * update]. There is really more than one * entry, and the structure is allocated to |