diff options
author | pooryorick <com.digitalsmarties@pooryorick.com> | 2022-03-22 00:46:17 (GMT) |
---|---|---|
committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2022-03-22 00:46:17 (GMT) |
commit | f18c5e4638cd2246475e9fabb96410e8696bea81 (patch) | |
tree | 6920500d784396d13ee4a579191970d95e5401e6 /tests | |
parent | 04234b55afe944221c2b003572689431778c7c88 (diff) | |
download | tcl-f18c5e4638cd2246475e9fabb96410e8696bea81.zip tcl-f18c5e4638cd2246475e9fabb96410e8696bea81.tar.gz tcl-f18c5e4638cd2246475e9fabb96410e8696bea81.tar.bz2 |
Fix [ac601b59bab7] by making only unloading a library from the process if it
has an Unload functions.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/pkgMkIndex.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/pkgMkIndex.test b/tests/pkgMkIndex.test index 62bd3d4..25840c6 100644 --- a/tests/pkgMkIndex.test +++ b/tests/pkgMkIndex.test @@ -591,7 +591,7 @@ test pkgMkIndex-10.2 {package in DLL hidden by -load} [list exec $dll] { "[list pkg_mkIndex -lazy -load Pkg* $fullPkgPath [file tail $x]]" exec [interpreter] << $script pkgtest::runCreatedIndex {0 {}} -lazy -load Pkg* -- $fullPkgPath pkga[info sharedlibextension] -} "0 {{pkga:1.0 {tclPkgSetup {pkga[info sharedlibextension] load {pkga_eq pkga_quote}}}}}" +} "0 {}" if {[testConstraint $dll]} { file delete -force [file join $fullPkgPath [file tail $x]] |