1############################################################################## 2# Modules Revision 3.0 3# Providing a flexible user environment 4# 5# File: modules.35-trace/%M% 6# Revision: %I% 7# First Edition: 1995/12/06 8# Last Mod.: %U%, %G% 9# 10# Authors: Jens Hamisch, Jens.Hamisch@Strawberry.COM 11# 12# Description: Testuite testsequence 13# Command: load 14# Modulefiles: trace/load_onoff, trace/disptrac 15# Sub-Command: 16# 17# Comment: %C{ 18# Changes tracing onl for the module command load' in 19# a way, that tracing is turned on for a subset of all 20# modulefiles and turned of for another. The trace- 21# pattern resulting in this is checked here. 22# }C% 23# 24############################################################################## 25 26# 27# Variables. This test forces a module load command. It will result in the 28# environment variables "_LMFILES_", "LOADEDMODULES" and "testsuite" to 29# be set up 30# 31 32set module "trace/load_onoff" 33set modulefile "$env(MODULEPATH)/$module" 34 35set disp_module "trace/disptrac" 36set disp_modulefile "$env(MODULEPATH)/$disp_module" 37 38# 39# setenv commands we expect to see 40# 41 42set tr_ap "setenv trace_apropos $trace_apropos ;" 43set tr_av "setenv trace_avail $trace_avail ;" 44set tr_cl "setenv trace_clear $trace_clear ;" 45set tr_di "setenv trace_display $trace_disp ;" 46set tr_he "setenv trace_help $trace_help ;" 47set tr_in "setenv trace_init $trace_init ;" 48set tr_li "setenv trace_list $trace_list ;" 49set tr_ld "setenv trace_load -\[\\^/\]\\*/3\\\\.4:+\[\\^/\]\\*/2\\\\.0:$trace_load ;" 50set tr_pu "setenv trace_purge $trace_purge ;" 51set tr_sw "setenv trace_switch $trace_switch ;" 52set tr_ul "setenv trace_unload $trace_unload ;" 53set tr_un "setenv trace_unuse $trace_unuse ;" 54set tr_up "setenv trace_update $trace_update ;" 55set tr_us "setenv trace_use $trace_use ;" 56set tr_wi "setenv trace_whatis $trace_whatis ;" 57 58# 59# We only do check the csh ... 60# 61 62set lmf "setenv _LMFILES_ $modulefile:$disp_modulefile ;" 63set lm "setenv LOADEDMODULES $module:$disp_module ;" 64 65set exp "$lm$lmf$tr_ap$tr_av$tr_cl$tr_di$tr_he$tr_in$tr_li" 66set exp "$exp$tr_ld$tr_pu$tr_sw$tr_ul$tr_un$tr_up$tr_us$tr_wi" 67 68# 69# The tests 70# 71 72test_cmd "csh" "load $module trace/disptrac" "$exp" 73 74# 75# Cleanup 76# 77 78unset lm 79unset lmf 80unset exp 81 82unset disp_modulefile 83unset disp_module 84 85unset modulefile 86unset module 87