diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-07 10:22:09 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-07 10:22:09 (GMT) |
| commit | a01643e73b5c590d77038e45206e8ee124a75dec (patch) | |
| tree | 345ba78287d3a5939c0863554b3ebb1144b5538d /generic/tclIOUtil.c | |
| parent | 52005c65befb5b8e6ebfdf0076ce6721d75ec145 (diff) | |
| parent | 06813163a831a73bcdd74a5341bbc547fbb3e342 (diff) | |
| download | tcl-a01643e73b5c590d77038e45206e8ee124a75dec.zip tcl-a01643e73b5c590d77038e45206e8ee124a75dec.tar.gz tcl-a01643e73b5c590d77038e45206e8ee124a75dec.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index df94367..f433781 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -3010,7 +3010,7 @@ Tcl_FSLoadFile( const char *sym1, const char *sym2, /* Names of two functions to find in the * dynamic shared object. */ - Tcl_PackageInitProc **proc1Ptr, Tcl_PackageInitProc **proc2Ptr, + Tcl_LibraryInitProc **proc1Ptr, Tcl_LibraryInitProc **proc2Ptr, /* Places to store pointers to the functions * named by sym1 and sym2. */ Tcl_LoadHandle *handlePtr, /* A place to store the token for the loaded @@ -3028,8 +3028,8 @@ Tcl_FSLoadFile( res = Tcl_LoadFile(interp, pathPtr, symbols, 0, procPtrs, handlePtr); if (res == TCL_OK) { - *proc1Ptr = (Tcl_PackageInitProc *) procPtrs[0]; - *proc2Ptr = (Tcl_PackageInitProc *) procPtrs[1]; + *proc1Ptr = (Tcl_LibraryInitProc *) procPtrs[0]; + *proc2Ptr = (Tcl_LibraryInitProc *) procPtrs[1]; } else { *proc1Ptr = *proc2Ptr = NULL; } |