1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
##############################################################################
# Modules Release Tcl
# Providing a flexible user environment
#
# File: modules.91-sort/%M%
# Revision: %I%
# First Edition: 2016/02/06
# Last Mod.: %U%, %G%
#
# Authors: Xavier Delaruelle, xavier.delaruelle@cea.fr
#
# Description: Testuite testsequence
# Command: load
# Modulefiles: verssort/1, verssort/1.2.1, verssort/1.2.4,
# verssort/1.8-2015-12-01, verssort/1.8-2016-02-01,
# verssort/1.10
# Sub-Command:
#
# Comment: %C{
# Check multiple versions of a module are correctly
# sorted when loading default version (greatest) of
# this module.
# }C%
#
##############################################################################
# skip tests if implicit_default option could not be overridden
if {[is_config_locked implicit_default]} {
send_user "\tskipping tests as implicit_default could not be overridden\n"
} else {
# ensure avail tests have implicit default enabled
setenv_var MODULES_IMPLICIT_DEFAULT 1
#
# For the different shells ...
#
if {[is_conf_enabled advversspec]} {
lappend ans [list set __MODULES_LMALTNAME $module6&as|verssort/default&as|verssort/latest]
}
lappend ans [list set _LMFILES_ $modulefile6]
lappend ans [list set LOADEDMODULES $module6]
lappend ans [list set MODULE_VERSION $version6]
#
# The tests
#
# load
test_cmd "ALL" "load $module" $ans
#
# Cleanup
#
reset_test_env
}
|
