ts: add tests to check info_extension

Signed-off-by: Xavier Delaruelle <xavier.delaruelle@cea.fr>

Author: xdelaruelle

testsuite/modules.50-cmds/512-extensions.exp

@@ -133,6 +133,26 @@ set tserr "$modlin $mpre $modlin
 testouterr_cmd_re sh "whatis $mod" OK $tserr
 
 
+# info_extension tests
+set mp $modpath.4
+setenv_var MODULEPATH $mp
+
+setenv_var TESTSUITE_PROVIDE extensions
+
+setenv_var MODULES_INFO_EXTENSION 0
+set ans [list]
+lappend ans [list set __MODULES_LMALTNAME provide/1&al|foo/1&al|bar/1&al|baz/1&al|qux/1&al|quux/1]
+lappend ans [list set _LMFILES_ $mp/provide/1]
+lappend ans [list set LOADEDMODULES provide/1]
+testouterr_cmd bash {load provide/1} $ans {}
+
+setenv_var MODULES_INFO_EXTENSION 1
+set ans [list]
+lappend ans [list set _LMFILES_ $mp/provide/1]
+lappend ans [list set LOADEDMODULES provide/1]
+testouterr_cmd bash {load provide/1} $ans {}
+
+
 #
 #  Cleanup
 #

testsuite/modules.50-cmds/720-provide.exp

@@ -52,6 +52,12 @@ lappend ans [list set _LMFILES_ $mp/provide/1]
 lappend ans [list set LOADEDMODULES provide/1]
 testouterr_cmd bash {load provide/1} $ans {}
 
+# info_extension tests
+setenv_var MODULES_INFO_EXTENSION 1
+testouterr_cmd bash {load provide/1} $ans {}
+
+setenv_var MODULES_INFO_EXTENSION 0
+
 skip_if_quick_mode
 
 

testsuite/modules.51-scan/046-extra_spec-provide.exp

@@ -103,6 +103,24 @@ testouterr_cmd sh {avail -t provide:foo} OK $tserr
 testouterr_cmd sh {avail -t provided-alias:foo} OK $tserr
 
 
+#
+# info_extension tests
+#
+
+setenv_var MODULES_INFO_EXTENSION 1
+
+setenv_var TESTSUITE_PROVIDE multiple
+
+set tserr provide/1
+testouterr_cmd sh {avail -t provide provide:foo/1} OK $tserr
+testouterr_cmd sh {avail -t provide provided-alias:qux/1} OK $tserr
+
+setenv_var TESTSUITE_PROVIDE extensions
+
+testouterr_cmd sh {avail -t provide provide:foo/1} OK $tserr
+testouterr_cmd sh {avail -t provide provided-alias:qux/1} OK {}
+
+
 #
 #  Cleanup
 #