envmodules/modules
1
0
Fork 0
mirror of https://github.com/envmodules/modules.git synced 2026-05-30 00:12:31 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

ts: improve coverage of getModulefileFromLoadingModule proc

Browse Source
This commit is contained in:
Xavier Delaruelle
2024-11-10 18:40:03 +01:00
parent b145e02f7d
commit c6f72912ef
2 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
testsuite/example/siteconfig.tcl-1
View File

@@ -666,5 +666,10 @@ if {[info exists env(TESTSUITE_ENABLE_SITECONFIG_GETLOADEDPREREQPATH)]} {
report [string length [getLoadedPrereqPath foo qux]]
}
# specific tests to improve getModulefileFromLoadingModule coverage
if {[info exists env(TESTSUITE_ENABLE_SITECONFIG_GETMODULEFILEFROMLOADINGMODULE)]} {
report [string length [getModulefileFromLoadingModule foo]]
}
}

7
testsuite/modules.00-init/120-siteconfig.exp
View File

@@ -734,6 +734,13 @@ lappend ans $vers_reportre
testouterr_cmd_re sh -V OK [join $ans \n]
unsetenv_var TESTSUITE_ENABLE_SITECONFIG_GETLOADEDPREREQPATH
setenv_var TESTSUITE_ENABLE_SITECONFIG_GETMODULEFILEFROMLOADINGMODULE 1
set ans [list]
lappend ans 0
lappend ans $vers_reportre
testouterr_cmd_re sh -V OK [join $ans \n]
unsetenv_var TESTSUITE_ENABLE_SITECONFIG_GETMODULEFILEFROMLOADINGMODULE
} elseif {$verbose} {
send_user "\tSkip tests relying on an excepted siteconfig file installed\n"