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 /unix/tclUnixInit.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 'unix/tclUnixInit.c')
| -rw-r--r-- | unix/tclUnixInit.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tclUnixInit.c b/unix/tclUnixInit.c index 955609e..376e72b 100644 --- a/unix/tclUnixInit.c +++ b/unix/tclUnixInit.c @@ -490,7 +490,7 @@ TclpInitLibraryPath( * installed. */ - sprintf(installLib, "lib/tcl%s", TCL_VERSION); + snprintf(installLib, sizeof(installLib), "lib/tcl%s", TCL_VERSION); /* * If TCL_LIBRARY is set, search there. @@ -901,7 +901,7 @@ TclpSetVariables( osInfo.dwMajorVersion = 11; } Tcl_SetVar2(interp, "tcl_platform", "os", "Windows NT", TCL_GLOBAL_ONLY); - sprintf(buffer, "%d.%d", osInfo.dwMajorVersion, osInfo.dwMinorVersion); + snprintf(buffer, sizeof(buffer), "%d.%d", osInfo.dwMajorVersion, osInfo.dwMinorVersion); Tcl_SetVar2(interp, "tcl_platform", "osVersion", buffer, TCL_GLOBAL_ONLY); if (sysInfo.wProcessorArchitecture < NUMPROCESSORS) { Tcl_SetVar2(interp, "tcl_platform", "machine", |