diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-15 21:29:44 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-15 21:29:44 (GMT) |
| commit | 05e8116a113dacb7f65143b3f6eeb98f8ced9249 (patch) | |
| tree | fda84aceefbbc08504e9723682eebbeb435c8c7f /generic/tclAssembly.c | |
| parent | 9bbe0b94a0e868bf486a8c0fbbe78136a0610486 (diff) | |
| parent | aa443ce8d55f84fa49eb9c6272005383df882681 (diff) | |
| download | tcl-05e8116a113dacb7f65143b3f6eeb98f8ced9249.zip tcl-05e8116a113dacb7f65143b3f6eeb98f8ced9249.tar.gz tcl-05e8116a113dacb7f65143b3f6eeb98f8ced9249.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclAssembly.c')
| -rw-r--r-- | generic/tclAssembly.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/generic/tclAssembly.c b/generic/tclAssembly.c index d99948e..b6ff191 100644 --- a/generic/tclAssembly.c +++ b/generic/tclAssembly.c @@ -472,8 +472,12 @@ static const TalInstDesc TalInstructionTable[] = { {"strcat", ASSEM_CONCAT1, INST_STR_CONCAT1, INT_MIN,1}, {"streq", ASSEM_1BYTE, INST_STR_EQ, 2, 1}, {"strfind", ASSEM_1BYTE, INST_STR_FIND, 2, 1}, + {"strge", ASSEM_1BYTE, INST_STR_GE, 2, 1}, + {"strgt", ASSEM_1BYTE, INST_STR_GT, 2, 1}, {"strindex", ASSEM_1BYTE, INST_STR_INDEX, 2, 1}, + {"strle", ASSEM_1BYTE, INST_STR_LE, 2, 1}, {"strlen", ASSEM_1BYTE, INST_STR_LEN, 1, 1}, + {"strlt", ASSEM_1BYTE, INST_STR_LT, 2, 1}, {"strmap", ASSEM_1BYTE, INST_STR_MAP, 3, 1}, {"strmatch", ASSEM_BOOL, INST_STR_MATCH, 2, 1}, {"strneq", ASSEM_1BYTE, INST_STR_NEQ, 2, 1}, @@ -530,7 +534,8 @@ static const unsigned char NonThrowingByteCodes[] = { INST_STR_TRIM, INST_STR_TRIM_LEFT, INST_STR_TRIM_RIGHT, /* 166-168 */ INST_CONCAT_STK, /* 169 */ INST_STR_UPPER, INST_STR_LOWER, INST_STR_TITLE, /* 170-172 */ - INST_NUM_TYPE /* 180 */ + INST_NUM_TYPE, /* 180 */ + INST_STR_LT, INST_STR_GT, INST_STR_LE, INST_STR_GE /* 191-194 */ }; /* |