diff options
| author | pooryorick <com.digitalsmarties@pooryorick.com> | 2018-05-07 07:43:00 (GMT) |
|---|---|---|
| committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2018-05-07 07:43:00 (GMT) |
| commit | 5f0cf291f513b75b00ea3d59842b83dc24047c1c (patch) | |
| tree | ef94a987d49542ad8de8301668d1bdb02e450b13 /generic/tclExecute.c | |
| parent | db133f014426110646fe9631bab793e01cee6129 (diff) | |
| download | tcl-5f0cf291f513b75b00ea3d59842b83dc24047c1c.zip tcl-5f0cf291f513b75b00ea3d59842b83dc24047c1c.tar.gz tcl-5f0cf291f513b75b00ea3d59842b83dc24047c1c.tar.bz2 | |
Deduplicate code in INST_STR_CMP, StringCmpCmd, and StringEqualCmd.
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 a76e686..4c14514 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -5387,7 +5387,7 @@ TEBCresume( { int checkEq = ((*pc == INST_EQ) || (*pc == INST_NEQ) || (*pc == INST_STR_EQ) || (*pc == INST_STR_NEQ)); - match = TclStringCmp(valuePtr, value2Ptr, checkEq); + match = TclStringCmp(valuePtr, value2Ptr, checkEq, 0, -1); } /* |