diff options
| author | andy <andrew.m.goth@gmail.com> | 2016-12-21 23:23:01 (GMT) |
|---|---|---|
| committer | andy <andrew.m.goth@gmail.com> | 2016-12-21 23:23:01 (GMT) |
| commit | a81df1ea2626456589814438e71ba6e5ab96c26c (patch) | |
| tree | 2a055407ae10e33306296064bd0ceae7baaeb25a | |
| parent | e81d963cde83c6a84735a0ea144b46550872d385 (diff) | |
| download | tcl-a81df1ea2626456589814438e71ba6e5ab96c26c.zip tcl-a81df1ea2626456589814438e71ba6e5ab96c26c.tar.gz tcl-a81df1ea2626456589814438e71ba6e5ab96c26c.tar.bz2 | |
Correct typo, credit Brad Lanam for report
| -rw-r--r-- | generic/tclVar.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclVar.c b/generic/tclVar.c index 7206a4f..742e18a 100644 --- a/generic/tclVar.c +++ b/generic/tclVar.c @@ -1488,7 +1488,7 @@ ArrayAborted( * variable is located. */ ArraySearch *searchPtr) /* Array enumeration state structure. */ { - if (searchPtr->flags & SEARCH_ABORTED_BIT) { + if (searchPtr->flags & SEARCH_ABORTED) { ArraySearchFree(searchPtr); Tcl_SetResult(interp, "search aborted due to array change", TCL_STATIC); Tcl_SetErrorCode(interp, "TCL", "LOOKUP", "ARRAYSEARCH", "n/a", NULL); |