summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorsebres <sebres@users.sourceforge.net>2024-03-22 20:07:26 (GMT)
committersebres <sebres@users.sourceforge.net>2024-03-22 20:07:26 (GMT)
commitf6bc0e3bf58345986684a7f8c43bbb7aa5e06e2d (patch)
tree34803c3ff3b608c7c832fd1a1a5ecc48d7606c6c
parent730f68f30c3a5c0d8d52ee40de257338c657d927 (diff)
downloadtcl-f6bc0e3bf58345986684a7f8c43bbb7aa5e06e2d.zip
tcl-f6bc0e3bf58345986684a7f8c43bbb7aa5e06e2d.tar.gz
tcl-f6bc0e3bf58345986684a7f8c43bbb7aa5e06e2d.tar.bz2
small amend (unsaved change)
-rw-r--r--generic/tclClockFmt.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclClockFmt.c b/generic/tclClockFmt.c
index d36b4a8..76af74c 100644
--- a/generic/tclClockFmt.c
+++ b/generic/tclClockFmt.c
@@ -79,22 +79,22 @@ _str2int(
val = val * 10 + (*p++ - '0');
}
while (p < e) { /* check for overflow */
+ prev = val;
val = val * 10 + (*p++ - '0');
if (val / 10 < prev) {
return TCL_ERROR;
}
- prev = val;
}
} else {
while (p < eNO) { /* never overflows */
val = val * 10 - (*p++ - '0');
}
while (p < e) { /* check for overflow */
+ prev = val;
val = val * 10 - (*p++ - '0');
if (val / 10 > prev) {
return TCL_ERROR;
}
- prev = val;
}
}
*out = val;
@@ -119,22 +119,22 @@ _str2wideInt(
val = val * 10 + (*p++ - '0');
}
while (p < e) { /* check for overflow */
+ prev = val;
val = val * 10 + (*p++ - '0');
if (val / 10 < prev) {
return TCL_ERROR;
}
- prev = val;
}
} else {
while (p < eNO) { /* never overflows */
val = val * 10 - (*p++ - '0');
}
while (p < e) { /* check for overflow */
+ prev = val;
val = val * 10 - (*p++ - '0');
if (val / 10 > prev) {
return TCL_ERROR;
}
- prev = val;
}
}
*out = val;