summaryrefslogtreecommitdiffstats
path: root/win/tclWinLoad.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-07-12 09:03:38 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-07-12 09:03:38 (GMT)
commita6ed76df7c2b1d8c8f3296a99023f88fc76c3f04 (patch)
tree955ddc69de09c5f08e526db3e20e07c84f86b103 /win/tclWinLoad.c
parent91982ba7527160c9c64c671e494999b3dbf54490 (diff)
parent505c18d593b11fa682694a7653b17b325c1aac0e (diff)
downloadtcl-a6ed76df7c2b1d8c8f3296a99023f88fc76c3f04.zip
tcl-a6ed76df7c2b1d8c8f3296a99023f88fc76c3f04.tar.gz
tcl-a6ed76df7c2b1d8c8f3296a99023f88fc76c3f04.tar.bz2
Merge 8.7. Clean-up tclWinConsole.c the same way
Diffstat (limited to 'win/tclWinLoad.c')
-rw-r--r--win/tclWinLoad.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/win/tclWinLoad.c b/win/tclWinLoad.c
index e262595..1134e12 100644
--- a/win/tclWinLoad.c
+++ b/win/tclWinLoad.c
@@ -114,10 +114,11 @@ TclpDlopen(
* first error for reporting purposes.
*/
if (firstError == ERROR_MOD_NOT_FOUND ||
- firstError == ERROR_DLL_NOT_FOUND)
+ firstError == ERROR_DLL_NOT_FOUND) {
lastError = GetLastError();
- else
+ } else {
lastError = firstError;
+ }
errMsg = Tcl_ObjPrintf("couldn't load library \"%s\": ",
Tcl_GetString(pathPtr));