diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-01 10:27:54 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-01 10:27:54 (GMT) |
| commit | baa549af6a4cd6b4caf71c2f0861ee682cc151d3 (patch) | |
| tree | 9c50f937fbf7d90f1fc7f249e2581d798d958bfc /generic/tclEncoding.c | |
| parent | a30f4dce67cdc3e8e8da693579f8abd90ea22f43 (diff) | |
| parent | ce04b407d9ed313df659f9d292b91ca65f3e82c4 (diff) | |
| download | tcl-baa549af6a4cd6b4caf71c2f0861ee682cc151d3.zip tcl-baa549af6a4cd6b4caf71c2f0861ee682cc151d3.tar.gz tcl-baa549af6a4cd6b4caf71c2f0861ee682cc151d3.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'generic/tclEncoding.c')
| -rw-r--r-- | generic/tclEncoding.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 7deed75..37e8638 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -1299,7 +1299,7 @@ Tcl_ExternalToUtfDStringEx( /* Caller wants error message on failure */ if (result != TCL_OK && interp != NULL) { char buf[TCL_INTEGER_SPACE]; - sprintf(buf, "%" TCL_Z_MODIFIER "u", nBytesProcessed); + snprintf(buf, sizeof(buf), "%" TCL_Z_MODIFIER "u", nBytesProcessed); Tcl_SetObjResult( interp, Tcl_ObjPrintf("unexpected byte sequence starting at index %" @@ -1630,7 +1630,7 @@ Tcl_UtfToExternalDStringEx( int ucs4; char buf[TCL_INTEGER_SPACE]; TclUtfToUCS4(&srcStart[nBytesProcessed], &ucs4); - sprintf(buf, "%" TCL_Z_MODIFIER "u", nBytesProcessed); + snprintf(buf, sizeof(buf), "%" TCL_Z_MODIFIER "u", nBytesProcessed); Tcl_SetObjResult( interp, Tcl_ObjPrintf( |