%PDF- %PDF-
Direktori : /usr/share/Modules/modulefiles/ |
Current File : //usr/share/Modules/modulefiles/module-info |
#%Module1.0##################################################################### ## ## module-info modulefile ## ## modulefiles/module-info. Generated from module-info.in by configure. ## proc ModulesHelp { } { global version puts stderr "\tThis module returns all the various module-info values" puts stderr "\tin whatever mode you use (except in `whatis' mode)" puts stderr "\n\tVersion $version\n" InfoOut } # for Tcl script use only set version 3.2.10 module-whatis "returns all various module-info values" proc InfoOut { } { puts stderr "+++ module-info +++++++++++++++++++++++++++++++" puts stderr [ concat "flags = " [module-info flags]] puts stderr [ concat "mode = " [module-info mode]] puts stderr [ concat "name = " [module-info name]] puts stderr [ concat "specified = " [module-info specified]] puts stderr [ concat "shell = " [module-info shell]] puts stderr [ concat "shelltype = " [module-info shelltype]] #puts stderr [ concat "alias = " [module-info alias]] puts stderr [ concat "version = " [module-info version [module-info name]]] puts stderr [ concat "user = " [module-info user]] puts stderr [ concat "trace = " [module-info trace load]] puts stderr [ concat "tracepat = " [module-info tracepat]] puts stderr [ concat "symbols = " [module-info symbols]] puts stderr "+++ info ++++++++++++++++++++++++++++++++++++++" puts stderr [ concat "hostname = " [info hostname ]] puts stderr [ concat "level = " [info level ]] puts stderr [ concat "loaded null = " [is-loaded null ]] puts stderr [ concat "library = " [info library ]] puts stderr [ concat "nameofexecutable = " [info nameofexecutable ]] puts stderr [ concat "sharedlibextension = " [info sharedlibextension ]] puts stderr [ concat "tclversion = " [info tclversion ]] puts stderr [ concat "patchlevel = " [info patchlevel ]] puts stderr "+++++++++++++++++++++++++++++++++++++++++++++++" } if {! [ module-info mode whatis ] } {InfoOut}