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

ts: test ModuleVersion in 20/120

Browse Source
This commit is contained in:
Xavier Delaruelle
2021-11-27 21:29:46 +01:00
parent 8c9e8ad12f
commit 8ce2c0bf69
2 changed files with 91 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
testsuite/modulefiles.3/lcompat/.version Normal file
View File

@@ -0,0 +1,18 @@
#%Module
if {[info exists env(TESTSUITE_LCOMPAT)]} {
switch -- $env(TESTSUITE_LCOMPAT) {
modvers1 {
set ModuleVersion 1.0
}
modvers2 {
set ModulesVersion 2.0
set ModuleVersion 1.0
}
modvers3 {
set ModuleVersion 2.0
set ModulesVersion 1.0
}
}
}

73
testsuite/modules.20-locate/120-moduleversion.exp Normal file
View File

@@ -0,0 +1,73 @@
##############################################################################
# Modules Revision 3.0
# Providing a flexible user environment
#
# File: modules.50-cmds/%M%
# Revision: %I%
# First Edition: 2021/11/27
# Last Mod.: %U%, %G%
#
# Authors: Xavier Delaruelle, xavier.delaruelle@cea.fr
#
# Description: Testuite testsequence
# Command: load, unload, display, help, test, whatis, refresh, avail
# Modulefiles: lcompat
# Sub-Command:
#
# Comment: %C{
# Test ModuleVersion modulefile variable
# }C%
#
##############################################################################
skip_if_quick_mode
set mp $modpath.3
set mpre $modpathre.3
setenv_path_var MODULEPATH $mp
set mod lcompat/1.0
set modfile $mp/$mod
set modfilere $mpre/$mod
setenv_var TESTSUITE_LCOMPAT modvers1
set tserr "$mp:\n$mod\(default\)"
testouterr_cmd sh "avail -t $mod" OK $tserr
set ans [list]
lappend ans [list set __MODULES_LMALTNAME $mod&lcompat/default&lcompat]
lappend ans [list set _LMFILES_ $modfile]
lappend ans [list set LOADEDMODULES $mod]
testouterr_cmd sh "load lcompat" $ans {}
setenv_var TESTSUITE_LCOMPAT modvers2
set tserr "$mp:\n$mod\(default\)"
testouterr_cmd sh "avail -t $mod" OK $tserr
set ans [list]
lappend ans [list set __MODULES_LMALTNAME $mod&lcompat/default&lcompat]
lappend ans [list set _LMFILES_ $modfile]
lappend ans [list set LOADEDMODULES $mod]
testouterr_cmd sh "load lcompat" $ans {}
setenv_var TESTSUITE_LCOMPAT modvers3
set tserr "$mp:\n$mod\(default\)"
testouterr_cmd sh "avail -t $mod" OK $tserr
set ans [list]
lappend ans [list set __MODULES_LMALTNAME $mod&lcompat/default&lcompat]
lappend ans [list set _LMFILES_ $modfile]
lappend ans [list set LOADEDMODULES $mod]
testouterr_cmd sh "load lcompat" $ans {}
#
# Cleanup
#
reset_test_env