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

ts: improve coverage of getLoadedPrereqPath proc

Browse Source
This commit is contained in:
Xavier Delaruelle
2024-11-10 18:39:51 +01:00
parent d63bc0e18e
commit b145e02f7d
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

@@ -660,6 +660,11 @@ if {[info exists env(TESTSUITE_ENABLE_SITECONFIG_CHANGECONTEXTOFMODULEEVAL)]} {
}
}
# specific tests to improve getLoadedPrereqPath coverage
if {[info exists env(TESTSUITE_ENABLE_SITECONFIG_GETLOADEDPREREQPATH)]} {
set ::g_loadedModulePrereqPath(foo) {bar mp}
report [string length [getLoadedPrereqPath foo qux]]
}
}

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

@@ -727,6 +727,13 @@ lappend ans $vers_reportre
testouterr_cmd_re sh -V OK [join $ans \n]
unsetenv_var TESTSUITE_ENABLE_SITECONFIG_CHANGECONTEXTOFMODULEEVAL
setenv_var TESTSUITE_ENABLE_SITECONFIG_GETLOADEDPREREQPATH 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_GETLOADEDPREREQPATH
} elseif {$verbose} {
send_user "\tSkip tests relying on an excepted siteconfig file installed\n"