diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-28 10:13:51 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-28 10:13:51 (GMT) |
commit | f6bf85fb67eb15e637ecf7c7de4f661dc0557b43 (patch) | |
tree | 60462ca1b3918744f06fa3526fb19a09b1b6507b /generic/tclIOUtil.c | |
parent | 866a79313bc49a69a821448e49bc9a67c97393bb (diff) | |
download | tcl-f6bf85fb67eb15e637ecf7c7de4f661dc0557b43.zip tcl-f6bf85fb67eb15e637ecf7c7de4f661dc0557b43.tar.gz tcl-f6bf85fb67eb15e637ecf7c7de4f661dc0557b43.tar.bz2 |
Make Tcl compile warning-free using -Wshadow
Diffstat (limited to 'generic/tclIOUtil.c')
-rw-r--r-- | generic/tclIOUtil.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index 6e1cb1f..513f1fb 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -3244,7 +3244,7 @@ Tcl_LoadFile( } if (fsPtr->loadFileProc != NULL) { - int retVal = ((Tcl_FSLoadFileProc2 *)(void *)(fsPtr->loadFileProc)) + retVal = ((Tcl_FSLoadFileProc2 *)(void *)(fsPtr->loadFileProc)) (interp, pathPtr, handlePtr, &unloadProcPtr, flags); if (retVal == TCL_OK) { |