diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-08-28 22:28:50 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-08-28 22:28:50 (GMT) |
| commit | 63c0ae01dc5272d7822137ac686e5dda942195ca (patch) | |
| tree | ea416fa24f5b4a7afd20e3e8a9718c4f82fdd59c /generic/tclCompCmdsSZ.c | |
| parent | bd5904e73dad5fafc121e942d495dbdeecb498cf (diff) | |
| download | tcl-63c0ae01dc5272d7822137ac686e5dda942195ca.zip tcl-63c0ae01dc5272d7822137ac686e5dda942195ca.tar.gz tcl-63c0ae01dc5272d7822137ac686e5dda942195ca.tar.bz2 | |
Now, restore wide(), but make int() the same as entier(). Add new utility function.
Diffstat (limited to 'generic/tclCompCmdsSZ.c')
| -rw-r--r-- | generic/tclCompCmdsSZ.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompCmdsSZ.c b/generic/tclCompCmdsSZ.c index 8ab1ffa..243f8a9 100644 --- a/generic/tclCompCmdsSZ.c +++ b/generic/tclCompCmdsSZ.c @@ -691,11 +691,11 @@ TclCompileStringIsCmd( } switch (t) { - case STR_IS_INT: case STR_IS_WIDE: PUSH( "2"); OP( LE); break; + case STR_IS_INT: case STR_IS_ENTIER: PUSH( "3"); OP( LE); |