Home › Tcl Built-In Commands Tcl
tclvars
Variables used by Tcl
Also documents argc, argv, argv0, auto_path, env, errorCode, errorInfo, tcl_interactive, tcl_library, tcl_patchLevel, tcl_pkgPath, tcl_platform, and 4 more
literal type exactly as shown
argument replace with your value
?optional? may be omitted
Description#
The following global variables are created and managed automatically by the Tcl library. Except where noted below, these variables should normally be treated as read-only by application-specific code and by users.
auto_path#-
If set, then it must contain a valid Tcl list giving directories to search during auto-load operations (including for package index files when using the default
package unknownhandler). This variable is initialized during startup to contain, in order: the directories listed in theTCLLIBPATHenvironment variable, the directory named by thetcl_libraryglobal variable, the parent directory oftcl_library,[file dirname [file dirname [info nameofexecutable]]]/lib, the directories listed in thetcl_pkgPathvariable. Additional locations to look for files and package indices should normally be added to this variable usinglappend. Initialization of auto_path from the TCLLIBPATH environment variable undergoes tilde substitution (seefilename) on each path. Any tilde substitution that fails because the user is unknown will be omitted from auto_path.Additional variables relating to package management exist. More details are listed in the
VARIABLESsection of thelibrarymanual page. env#-
This variable is maintained by Tcl as an array whose elements are the environment variables for the process. Reading an element will return the value of the corresponding environment variable. Setting an element of the array will modify the corresponding environment variable or create a new one if it does not already exist. Unsetting an element of
envwill remove the corresponding environment variable. Changes to theenvarray will affect the environment passed to children by commands likeexec. If the entireenvarray is unset then Tcl will stop monitoringenvaccesses and will not update environment variables.Under Windows, the environment variables PATH and COMSPEC in any capitalization are converted automatically to upper case. For instance, the PATH variable could be exported by the operating system as “path”, “Path”, “PaTh”, etc., causing otherwise simple Tcl code to have to support many special cases. All other environment variables inherited by Tcl are left unmodified. Setting an env array variable to blank is the same as unsetting it as this is the behavior of the underlying Windows OS. It should be noted that relying on an existing and empty environment variable will not work on Windows and is discouraged for cross-platform usage.
The following elements of
envare special to Tcl:env(HOME)#-
This environment variable, if set, gives the location of the directory considered to be the current user's home directory. The value of this variable is returned by the
file homecommand. Most platforms set this correctly by default; it does not normally need to be set by user code. On Windows, if not already set, it is set to the value of theUSERPROFILEenvironment variable. env(TCL_LIBRARY)#-
If set, then it specifies the location of the directory containing library scripts (the value of this variable will be assigned to the
tcl_libraryvariable and therefore returned by the commandinfo library). If this variable is not set then a default value is used.Note that this environment variable should not normally be set.
env(TCLLIBPATH)#-
If set, then it must contain a valid Tcl list giving directories to search during auto-load operations. Directories must be specified in Tcl format, using “/” as the path separator, regardless of platform. This variable is only used when initializing the
auto_pathvariable. env(TCL_TZ),env(TZ)#-
These specify the default timezone used for parsing and formatting times and dates in the
clockcommand. On many platforms, the TZ environment variable is set up by the operating system. env(LC_ALL),env(LC_MESSAGES),env(LANG)#-
These environment variables are used by the
msgcatpackage to determine what locale to format messages using. env(TCL_INTERP_DEBUG_FRAME)#-
If existing, it has the same effect as running
interp debug{} -frame 1as the very first command of each new Tcl interpreter.
errorCode#-
This variable holds the value of the
-errorcodereturn option set by the most recent error that occurred in this interpreter. This list value represents additional information about the error in a form that is easy to process with programs. The first element of the list identifies a general class of errors, and determines the format of the rest of the list. The following formats for-errorcodereturn options are used by the Tcl core; individual applications may define additional formats.ARITHcode msg#-
This format is used when an arithmetic error occurs (e.g. an attempt to divide zero by zero in the
exprcommand). Code identifies the precise error and msg provides a human-readable description of the error. Code will be either DIVZERO (for an attempt to divide by zero), DOMAIN (if an argument is outside the domain of a function, such as acos(-3)), IOVERFLOW (for integer overflow), OVERFLOW (for a floating-point overflow), or UNKNOWN (if the cause of the error cannot be determined).Detection of these errors depends in part on the underlying hardware and system libraries.
CHILDKILLEDpid sigName msg#-
This format is used when a child process has been killed because of a signal. The pid element will be the process's identifier (in decimal). The sigName element will be the symbolic name of the signal that caused the process to terminate; it will be one of the names from the include file signal.h, such as
SIGPIPE. The msg element will be a short human-readable message describing the signal, such as “write on pipe with no readers” forSIGPIPE. CHILDSTATUSpid code#-
This format is used when a child process has exited with a non-zero exit status. The pid element will be the process's identifier (in decimal) and the code element will be the exit code returned by the process (also in decimal).
CHILDSUSPpid sigName msg#-
This format is used when a child process has been suspended because of a signal. The pid element will be the process's identifier, in decimal. The sigName element will be the symbolic name of the signal that caused the process to suspend; this will be one of the names from the include file signal.h, such as
SIGTTIN. The msg element will be a short human-readable message describing the signal, such as “background tty read” forSIGTTIN. NONE#-
This format is used for errors where no additional information is available for an error besides the message returned with the error. In these cases the
-errorcodereturn option will consist of a list containing a single element whose contents areNONE. POSIXerrName msg#-
If the first element is
POSIX, then the error occurred during a POSIX kernel call. The errName element will contain the symbolic name of the error that occurred, such asENOENT; this will be one of the values defined in the include file errno.h. The msg element will be a human-readable message corresponding to errName, such as “no such file or directory” for theENOENTcase. TCL ...#-
Indicates some sort of problem generated in relation to Tcl itself, e.g. a failure to look up a channel or variable.
To set the
-errorcodereturn option, applications should use library procedures such asTcl_SetObjErrorCode,Tcl_SetReturnOptions, andTcl_PosixError, or they may invoke the-errorcodeoption of thereturncommand. If none of these methods for setting the error code has been used, the Tcl interpreter will reset the variable toNONEafter the next error.
errorInfo#-
This variable holds the value of the
-errorinforeturn option set by the most recent error that occurred in this interpreter. This string value will contain one or more lines identifying the Tcl commands and procedures that were being executed when the most recent error occurred. Its contents take the form of a stack trace showing the various nested Tcl commands that had been invoked at the time of the error. tcl_library#-
This variable holds the name of a directory containing the system library of Tcl scripts, such as those used for auto-loading. The value of this variable is returned by the
info librarycommand. See thelibrarymanual entry for details of the facilities provided by the Tcl script library. Normally each application or package will have its own application-specific script library in addition to the Tcl script library; each application should set a global variable with a name like$app_library(where app is the application's name) to hold the network file name for that application's library directory. The initial value oftcl_libraryis set when an interpreter is created by searching several different directories until one is found that contains an appropriate Tcl startup script. If theTCL_LIBRARYenvironment variable exists, then the directory it names is checked first. IfTCL_LIBRARYis not set or doesn't refer to an appropriate directory, then Tcl checks several other directories based on a compiled-in default location, the location of the binary containing the application, and the current working directory. tcl_patchLevel#-
When an interpreter is created Tcl initializes this variable to hold a string giving the current patch level for Tcl, such as
8.4.16for Tcl 8.4 with the first sixteen official patches, or8.5b3for the third beta release of Tcl 8.5. The value of this variable is returned by theinfo patchlevelcommand. tcl_pkgPath#-
This variable holds a list of directories indicating where packages are normally installed. It is not used on Windows. It typically contains either one or two entries; if it contains two entries, the first is normally a directory for platform-dependent packages (e.g., shared library binaries) and the second is normally a directory for platform-independent packages (e.g., script files). Typically a package is installed as a subdirectory of one of the entries in the
tcl_pkgPathvariable. The directories in thetcl_pkgPathvariable are included by default in theauto_pathvariable, so they and their immediate subdirectories are automatically searched for packages duringpackage requirecommands. Note:tcl_pkgPathis not intended to be modified by the application. Its value is added toauto_pathat startup; changes totcl_pkgPathare not reflected inauto_path. If you want Tcl to search additional directories for packages you should add the names of those directories toauto_path, nottcl_pkgPath. tcl_platform#-
This is an associative array whose elements contain information about the platform on which the application is running, such as the name of the operating system, its current release number, and the machine's instruction set. The elements listed below will always be defined, but they may have empty strings as values if Tcl could not retrieve any relevant information. In addition, extensions and applications may add additional values to the array. The predefined elements are:
byteOrder#-
The native byte order of this machine: either
littleEndianorbigEndian. debug#-
If this variable exists, then the interpreter was compiled with and linked to a debug-enabled C run-time. This variable will only exist on Windows, so extension writers can specify which package to load depending on the C run-time library that is in use. This is not an indication that this core contains symbols.
engine#-
The name of the Tcl language implementation. When the interpreter is first created, this is always set to the string
Tcl. machine#-
The instruction set executed by this machine, such as
intel,PPC,68k, orsun4m. On UNIX machines, this is the value returned byuname -m. os#-
The name of the operating system running on this machine, such as
Windows NTorSunOS. On UNIX machines, this is the value returned byuname -s. osVersion#-
The version number for the operating system running on this machine. On UNIX machines, this is the value returned by
uname -r. pathSeparator#-
The character that should be used to
splitPATH-like environment variables into their corresponding list of directory names. platform#-
Either
windows, orunix. This identifies the general operating environment of the machine. pointerSize#-
This gives the size of the native-machine pointer in bytes (strictly, it is same as the result of evaluating sizeof(void*) in C.)
user#-
This identifies the current user based on the login information available on the platform. This value comes from the getuid() and getpwuid() system calls on Unix, and the value from the GetUserName() system call on Windows.
wordSize#-
This gives the size of the native-machine word in bytes (strictly, it is same as the result of evaluating sizeof(long) in C.)
tcl_rcFileName#-
This variable is used during initialization to indicate the name of a user-specific startup file. If it is set by application-specific initialization, then the Tcl startup code will check for the existence of this file and
sourceit if it exists. For example, forwishthe variable is set to~/.wishrcfor Unix and~/wishrc.tclfor Windows. tcl_traceCompile#-
The value of this variable can be set to control how much tracing information is displayed during bytecode compilation. By default,
tcl_traceCompileis zero and no information is displayed. Settingtcl_traceCompileto 1 generates a one-line summary instdoutwhenever a procedure or top-level command is compiled. Setting it to 2 generates a detailed listing instdoutof the bytecode instructions emitted during every compilation. This variable is useful in tracking down suspected problems with the Tcl compiler.This variable and functionality only exist if
TCL_COMPILE_DEBUGwas defined during Tcl's compilation. tcl_traceExec#-
The value of this variable can be set to control how much tracing information is displayed during bytecode execution. By default,
tcl_traceExecis zero and no information is displayed. Settingtcl_traceExecto 1 generates a one-line trace instdouton each call to a Tcl procedure. Setting it to 2 generates a line of output whenever any Tcl command is invoked that contains the name of the command and its arguments. Setting it to 3 produces a detailed trace showing the result of executing each bytecode instruction. Note that whentcl_traceExecis 2 or 3, commands such assetandincrthat have been entirely replaced by a sequence of bytecode instructions are not shown. Setting this variable is useful in tracking down suspected problems with the bytecode compiler and interpreter.This variable and functionality only exist if
TCL_COMPILE_DEBUGwas defined during Tcl's compilation. tcl_version#-
When an interpreter is created Tcl initializes this variable to hold the version number for this version of Tcl in the form x.y. Changes to x represent major changes with probable incompatibilities and changes to y represent small enhancements and bug fixes that retain backward compatibility. The value of this variable is returned by the
info tclversioncommand.
Other global variables#
The following variables are only guaranteed to exist in tclsh and wish executables; the Tcl library does not define them itself but many Tcl environments do.
argc#argv#argv0#-
The script that
tclshorwishstarted executing (if it was specified) or otherwise the name by whichtclshorwishwas invoked. tcl_interactive#-
Contains 1 if
tclshorwishis running interactively (no script was specified and standard input is a terminal-like device), 0 otherwise.
Examples#
To add a directory to the collection of locations searched by package require, e.g., because of some application-specific packages that are used, the auto_path variable needs to be updated:
lappend ::auto_path [file join [pwd] "theLibDir"]
A simple though not very robust way to handle command line arguments of the form “-foo 1 -bar 2” is to load them into an array having first loaded in the default settings:
array set arguments {-foo 0 -bar 0 -grill 0}
array set arguments $::argv
puts "foo is $arguments(-foo)"
puts "bar is $arguments(-bar)"
puts "grill is $arguments(-grill)"
The argv0 global variable can be used (in conjunction with the info script command) to determine whether the current script is being executed as the main script or loaded as a library. This is useful because it allows a single script to be used as both a library and a demonstration of that library:
if {$::argv0 eq [info script]} {
# running as: tclsh example.tcl
} else {
package provide Example 1.0
}
Keywords#
arithmetic · bytecode · compiler · error · environment · POSIX · precision · subprocess · user · variables
Copyright#
- Copyright © 1993 The Regents of the University of California
- Copyright © 1994-1997 Sun Microsystems, Inc