diff options
| author | andreask <andreask> | 2014-12-01 20:17:04 (GMT) |
|---|---|---|
| committer | andreask <andreask> | 2014-12-01 20:17:04 (GMT) |
| commit | d7cf041bab9ace3408763b9c55dcc337e53d4600 (patch) | |
| tree | 1858e85ab41068f2b655adfb946d7419325364f8 | |
| parent | 7f5ddf43eee64cc31303c2659b011bceba8ff06c (diff) | |
| download | tcl-d7cf041bab9ace3408763b9c55dcc337e53d4600.zip tcl-d7cf041bab9ace3408763b9c55dcc337e53d4600.tar.gz tcl-d7cf041bab9ace3408763b9c55dcc337e53d4600.tar.bz2 | |
Fix missing export of the "NewForeachInfoType" AuxData structure for tbcload/tclcompiler packages.
| -rw-r--r-- | generic/tclCompile.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index 3736498..0f4dfaf 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -4342,10 +4342,11 @@ TclInitAuxDataTypeTable(void) Tcl_InitHashTable(&auxDataTypeTable, TCL_STRING_KEYS); /* - * There are only three AuxData types at this time, so register them here. + * There are only four AuxData types at this time, so register them here. */ RegisterAuxDataType(&tclForeachInfoType); + RegisterAuxDataType(&tclNewForeachInfoType); RegisterAuxDataType(&tclJumptableInfoType); RegisterAuxDataType(&tclDictUpdateInfoType); } |