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
|
##############################################################################
# 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: whatis
# 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, averssort
# Sub-Command:
#
# Comment: %C{
# Check the module 'whatis' command for a module with
# multiple versions to check these versions are
# correctly sorted.
# }C%
#
##############################################################################
set wissep ": module version sort test"
set header "$modlin $modpathre $modlin\n"
#
# tests on regular modulefiles
#
set ts_sh "$header\\s*$module/$version1$wissep\n\\s*$module/$version2$wissep\n\\s*$module/$version3$wissep\n\\s*$module/$version4$wissep\n\\s*$module/$version5$wissep\n\\s*$module/$version6$wissep"
testouterr_cmd_re "sh" "whatis $module" "OK" "$ts_sh"
#
# tests on module aliases
#
set ts_sh "$header\\s*$module/$version1$wissep\n\\s*$module/$version3$wissep\n\\s*$module/$version6$wissep"
testouterr_cmd_re "sh" "whatis $aliasmod" "OK" "$ts_sh"
#
# Cleanup
#
reset_test_env
|
