summaryrefslogtreecommitdiffstats
path: root/generic/tclCompCmdsSZ.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-08-28 22:28:50 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-08-28 22:28:50 (GMT)
commiteeebae7172a523bec78bf30c81cccc2947918d96 (patch)
treeea416fa24f5b4a7afd20e3e8a9718c4f82fdd59c /generic/tclCompCmdsSZ.c
parent80d62f05475d6f7a0b3093a0ee583905d3b390c9 (diff)
downloadtcl-eeebae7172a523bec78bf30c81cccc2947918d96.zip
tcl-eeebae7172a523bec78bf30c81cccc2947918d96.tar.gz
tcl-eeebae7172a523bec78bf30c81cccc2947918d96.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.c2
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);