ts: check autoinit loop safeguard mechanism in 70/120

Author: xdelaruelle

testsuite/example/initrc.in

@@ -25,6 +25,11 @@ if {[info exists env(TESTSUITE_INITRC)]} {
         silentdbg1 {
             module config silent_shell_debug 1
         }
+        inprogress1 {
+            module config set_shell_startup 1
+            module use [getenv TESTSUITEDIR]/modulefiles.3
+            module load refresh/5.0
+        }
     }
 }
 catch {module load unk}

testsuite/modulefiles.3/refresh/5.0

@@ -0,0 +1,4 @@
+#%Module
+
+# run Bash script to get value for variable
+setenv FOO [exec $env(TESTSUITEDIR)/systest2 foo]

testsuite/modulefiles.3/refresh/6.0

@@ -0,0 +1 @@
+#%Module