diff options
| author | dgp <dgp@users.sourceforge.net> | 2018-03-13 03:26:42 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2018-03-13 03:26:42 (GMT) |
| commit | 1af314024ce79b04aeea90db90286589dbbb3bb8 (patch) | |
| tree | 945a287c2f2c9c0b09a6a4b593b5264a7dd5663d /generic/tclCompCmdsSZ.c | |
| parent | a28f176470d4f9c36163a55a0ecee4bd8d08dc3d (diff) | |
| parent | 23178bb2087e384cb320634e4974b3dc6104eb89 (diff) | |
| download | tcl-1af314024ce79b04aeea90db90286589dbbb3bb8.zip tcl-1af314024ce79b04aeea90db90286589dbbb3bb8.tar.gz tcl-1af314024ce79b04aeea90db90286589dbbb3bb8.tar.bz2 | |
Merge new test and comments from 8.5 to demo that INST_STR_REPLACE is bad.
Diffstat (limited to 'generic/tclCompCmdsSZ.c')
| -rw-r--r-- | generic/tclCompCmdsSZ.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclCompCmdsSZ.c b/generic/tclCompCmdsSZ.c index 5cd1c3b..e84f382 100644 --- a/generic/tclCompCmdsSZ.c +++ b/generic/tclCompCmdsSZ.c @@ -1008,6 +1008,7 @@ TclCompileStringReplaceCmd( tokenPtr = TokenAfter(tokenPtr); replacementTokenPtr = TokenAfter(tokenPtr); } + goto genericReplace; tokenPtr = TokenAfter(valueTokenPtr); if (TclGetIndexFromToken(tokenPtr, TCL_INDEX_START, TCL_INDEX_AFTER, |