diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-30 22:27:40 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-30 22:27:40 (GMT) |
| commit | 0758324455f7cd805291c1062b6c7fb70fd13647 (patch) | |
| tree | d71c67987bcd3070c793c82e843fd8aedc8032ca /generic/tclOO.c | |
| parent | 812c3e3103658db7d4e360b9203097c339a3a204 (diff) | |
| parent | feac96c8b3c738ef7cb8e3e89e076aa4f23f13b0 (diff) | |
| download | tcl-0758324455f7cd805291c1062b6c7fb70fd13647.zip tcl-0758324455f7cd805291c1062b6c7fb70fd13647.tar.gz tcl-0758324455f7cd805291c1062b6c7fb70fd13647.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'generic/tclOO.c')
| -rw-r--r-- | generic/tclOO.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclOO.c b/generic/tclOO.c index bee06e2..6afa06b 100644 --- a/generic/tclOO.c +++ b/generic/tclOO.c @@ -654,7 +654,7 @@ AllocObject( while (1) { char objName[10 + TCL_INTEGER_SPACE]; - sprintf(objName, "::oo::Obj%" TCL_Z_MODIFIER "u", ++fPtr->tsdPtr->nsCount); + snprintf(objName, sizeof(objName), "::oo::Obj%" TCL_Z_MODIFIER "u", ++fPtr->tsdPtr->nsCount); oPtr->namespacePtr = Tcl_CreateNamespace(interp, objName, oPtr, NULL); if (oPtr->namespacePtr != NULL) { creationEpoch = fPtr->tsdPtr->nsCount; |