summaryrefslogtreecommitdiffstats
path: root/generic/tclBasic.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-30 22:22:32 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-30 22:22:32 (GMT)
commitfeac96c8b3c738ef7cb8e3e89e076aa4f23f13b0 (patch)
tree196f438c5ba746829c249ad28e10c94a4a44ee0c /generic/tclBasic.c
parent67ced520761d9c2dff0022dafbebdb996e20b551 (diff)
parented24f448c79bc5af4c0f6fd77826a6552271dd9c (diff)
downloadtcl-feac96c8b3c738ef7cb8e3e89e076aa4f23f13b0.zip
tcl-feac96c8b3c738ef7cb8e3e89e076aa4f23f13b0.tar.gz
tcl-feac96c8b3c738ef7cb8e3e89e076aa4f23f13b0.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclBasic.c')
-rw-r--r--generic/tclBasic.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index 9b1b5a5..1d78e7e 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -1499,7 +1499,7 @@ Tcl_CallWhenDeleted(
AssocData *dPtr = (AssocData *)Tcl_Alloc(sizeof(AssocData));
Tcl_HashEntry *hPtr;
- sprintf(buffer, "Assoc Data Key #%d", *assocDataCounterPtr);
+ snprintf(buffer, sizeof(buffer), "Assoc Data Key #%d", *assocDataCounterPtr);
(*assocDataCounterPtr)++;
if (iPtr->assocData == NULL) {
@@ -6369,7 +6369,7 @@ ProcessUnexpectedResult(
Tcl_SetObjResult(interp, Tcl_ObjPrintf(
"command returned bad code: %d", returnCode));
}
- sprintf(buf, "%d", returnCode);
+ snprintf(buf, sizeof(buf), "%d", returnCode);
Tcl_SetErrorCode(interp, "TCL", "UNEXPECTED_RESULT_CODE", buf, NULL);
}