diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2019-06-05 20:42:32 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2019-06-05 20:42:32 (GMT) |
| commit | 9843b108c921e3c97a2e0d0d317f65ed1f144382 (patch) | |
| tree | 4952c7bf1cce0419ccb8f739cf045ea234b0688c | |
| parent | 89aeb7f43db3b0ab020b6be8f3ce354daa06121e (diff) | |
| download | tcl-9843b108c921e3c97a2e0d0d317f65ed1f144382.zip tcl-9843b108c921e3c97a2e0d0d317f65ed1f144382.tar.gz tcl-9843b108c921e3c97a2e0d0d317f65ed1f144382.tar.bz2 | |
And fix the silly error
| -rw-r--r-- | generic/tclCompExpr.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompExpr.c b/generic/tclCompExpr.c index 2169a88..dec9600 100644 --- a/generic/tclCompExpr.c +++ b/generic/tclCompExpr.c @@ -423,8 +423,8 @@ static const unsigned char instruction[] = { 0, /* CLOSE_PAREN */ INST_STR_LT, /* STR_LT */ INST_STR_GT, /* STR_GT */ - INST_STR_LEQ, /* STR_LEQ */ - INST_STR_GEQ, /* STR_GEQ */ + INST_STR_LE, /* STR_LEQ */ + INST_STR_GE, /* STR_GEQ */ 0, /* END */ /* Expansion room for more binary operators */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |