diff options
| author | dgp <dgp@users.sourceforge.net> | 2018-02-06 17:26:40 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2018-02-06 17:26:40 (GMT) |
| commit | 25fcbf685dbd09f24d7d45c8c6b90ed3c33eab17 (patch) | |
| tree | 83acb4c3bbd06ea9553411522d4a1d7ab66553a0 /generic/tclExecute.c | |
| parent | ca5e7c5b63ce1355c653763e82f8e75f7a38d333 (diff) | |
| download | tcl-25fcbf685dbd09f24d7d45c8c6b90ed3c33eab17.zip tcl-25fcbf685dbd09f24d7d45c8c6b90ed3c33eab17.tar.gz tcl-25fcbf685dbd09f24d7d45c8c6b90ed3c33eab17.tar.bz2 | |
Rename TclStringFind to TclStringFirst. Repair its operations on bytearrays.
Stop trying to operate on utf-8 until we nail that down better.
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index a30ec89..679b57a 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -5715,7 +5715,7 @@ TEBCresume( NEXT_INST_V(1, 3, 1); case INST_STR_FIND: - match = TclStringFind(OBJ_UNDER_TOS, OBJ_AT_TOS, 0); + match = TclStringFirst(OBJ_UNDER_TOS, OBJ_AT_TOS, 0); TRACE(("%.20s %.20s => %d\n", O2S(OBJ_UNDER_TOS), O2S(OBJ_AT_TOS), match)); |