diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-09-09 19:49:08 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-09-09 19:49:08 (GMT) |
commit | e19c2ce585d7fe309059bb96044b08dbfa850a6b (patch) | |
tree | 0e1dfc6cdd11a98cd4dcc4114975380736e527fd /generic/tclCompCmdsSZ.c | |
parent | 04d10eb983cb26686f38383404b6b6ef9876f9e1 (diff) | |
download | tcl-e19c2ce585d7fe309059bb96044b08dbfa850a6b.zip tcl-e19c2ce585d7fe309059bb96044b08dbfa850a6b.tar.gz tcl-e19c2ce585d7fe309059bb96044b08dbfa850a6b.tar.bz2 |
[84af1192f5]: [regsub] compiler no longer confused by quantification handling.
Diffstat (limited to 'generic/tclCompCmdsSZ.c')
-rw-r--r-- | generic/tclCompCmdsSZ.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompCmdsSZ.c b/generic/tclCompCmdsSZ.c index f2e5dd2..28cab1e 100644 --- a/generic/tclCompCmdsSZ.c +++ b/generic/tclCompCmdsSZ.c @@ -2091,7 +2091,7 @@ IssueSwitchChainedTests( */ if (TclReToGlob(NULL, bodyToken[i]->start, - bodyToken[i]->size, &ds, &exact) == TCL_OK) { + bodyToken[i]->size, &ds, &exact, NULL) == TCL_OK){ simple = 1; PushLiteral(envPtr, Tcl_DStringValue(&ds), Tcl_DStringLength(&ds)); |