summaryrefslogtreecommitdiffstats
path: root/generic/tclStringObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-30 22:02:55 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-30 22:02:55 (GMT)
commitdc5930bc812a27e31bf8a0aa2fcf564ed7306a26 (patch)
treecfdd8df6ed6eeb844e46e1d630692a8a6137fbb9 /generic/tclStringObj.c
parentf8b9e919c954be237c906a708530111607f88081 (diff)
parent186145578675341deb63fd53e6080896695c3574 (diff)
downloadtcl-dc5930bc812a27e31bf8a0aa2fcf564ed7306a26.zip
tcl-dc5930bc812a27e31bf8a0aa2fcf564ed7306a26.tar.gz
tcl-dc5930bc812a27e31bf8a0aa2fcf564ed7306a26.tar.bz2
Merge 8.6
Diffstat (limited to 'generic/tclStringObj.c')
-rw-r--r--generic/tclStringObj.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index e1f5160..de6dc2f 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -2887,14 +2887,14 @@ Tcl_AppendFormatToObj(
*p++ = '+';
}
if (width) {
- p += sprintf(p, "%d", width);
+ p += snprintf(p, TCL_INTEGER_SPACE, "%d", width);
if (width > length) {
length = width;
}
}
if (gotPrecision) {
*p++ = '.';
- p += sprintf(p, "%d", precision);
+ p += snprintf(p, TCL_INTEGER_SPACE, "%d", precision);
if (precision > INT_MAX - length) {
msg = overflow;
errCode = "OVERFLOW";
@@ -2918,7 +2918,7 @@ Tcl_AppendFormatToObj(
goto errorMsg;
}
bytes = TclGetString(segment);
- if (!Tcl_AttemptSetObjLength(segment, sprintf(bytes, spec, d))) {
+ if (!Tcl_AttemptSetObjLength(segment, snprintf(bytes, segment->length, spec, d))) {
msg = overflow;
errCode = "OVERFLOW";
goto errorMsg;