diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-01-13 10:44:25 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-01-13 10:44:25 (GMT) |
| commit | f468073bd58f767b9bb06328e889f32297a7da71 (patch) | |
| tree | ba50ed26977f71912fb0085559bce34165b7f3f2 /generic/tclIOUtil.c | |
| parent | 2d27c96b7eebdceae93e88adf3ca88ebbc6efab5 (diff) | |
| parent | 997e0f35053f350509dbfe16b32af27264622c5e (diff) | |
| download | tcl-f468073bd58f767b9bb06328e889f32297a7da71.zip tcl-f468073bd58f767b9bb06328e889f32297a7da71.tar.gz tcl-f468073bd58f767b9bb06328e889f32297a7da71.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index 28e1df5..622fec6 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -171,7 +171,7 @@ const Tcl_Filesystem tclNativeFilesystem = { TclpObjCopyDirectory, TclpObjLstat, /* Needs casts since we're using version_2. */ - (Tcl_FSLoadFileProc *) TclpDlopen, + (Tcl_FSLoadFileProc *)(void *) TclpDlopen, (Tcl_FSGetCwdProc *) TclpGetNativeCwd, TclpObjChdir }; @@ -3176,7 +3176,7 @@ Tcl_LoadFile( } if (fsPtr->loadFileProc != NULL) { - int retVal = ((Tcl_FSLoadFileProc2 *)(fsPtr->loadFileProc)) + int retVal = ((Tcl_FSLoadFileProc2 *)(void *)(fsPtr->loadFileProc)) (interp, pathPtr, handlePtr, &unloadProcPtr, flags); if (retVal == TCL_OK) { |