Provided by: manpages-zh_1.5.1-2_all bug

NAME

       upvar - 建立到在不同栈桢上的变量的连接

 SYNOPSIS
       upvar ?level? otherVar myVar ?otherVar myVar ...?
_________________________________________________________________

 DESCRIPTION
       这个命令安排在当前过程中的一个或多个局部变量去引用位于包围它的过程调用中的变量或引用全局变量。
       Level  可以用   uplevel   命令允许的任何形式,并且如果第一个   otherVar
       的第一个字母不是     #    或一个数字,则可以被省略(它缺省为1)。对于每个
       otherVar  参数,upvar  使由  level  给出的过程桢中(如果  level#0
       则在全局层次)的叫这个名字的变量在当前过程中可以用由相应的         myVar
       参数给出名字来访问。在调用它的时候叫做                         otherVar
       的变量不需要存在;可以在第一次引用 myVar 时象普通变量那样建立它。在调用
       upvar        的时候一定不能存在一个叫        myVar        的变量。MyVar
       总是被作为一个变量的名字来对待,而不是一个数组的元素。即使这个名字看起来象一个数组元素,比如
       a(b),仍建立一个正规的变量。OtherVar
       可以引用一个标量变量,或一个数组元素。Upvar 返回一个空串。

       upvar  命令简化了传名调用(call-by-name)过程的实现并使它易于建立如同 Tcl
       过程的新控制结构。例如,考虑下列过程:
              proc add2 name {
                upvar $name x
                set x [expr $x+2]
              }
       调用 Add2  时加上给出一个变量名字的一个参数,它向这个变量的值加二。尽管
       add2   可以使用   uplevel   替代   upvar   来实现,upvar   简便了  add2
       访问在调用者过程桢中的变量。

       namespace                eval                是改变                 Tcl
       命令上下文的另一种方式(除了过程调用之外)。它向栈增加一个调用桢来表示名字空间上下文。这意味着每个
       namespace      eval      命令被视为给      uplevelupvar
       命令的另一个调用层次。例如,info                 level                1
       将返回描述一个命令的列表,它要么是最外的过程要么是最外的 namespace eval
       命令。还有,uplevel                                                  #0
       在最外面的名字空间(全局名字空间)中的顶层求值一个脚本。

       如果删除(unset)一个 upvar 变量(比如,上面的 add2  中的  x  ),则  unset |
       操作影响它所连接到的变量,而不是                                  upvar |
       变量。除了退出在其中定义它的那个过程之外,没有方法删除一个        upvar |
       变量。但是,可以通过执行另一个       upvar      命令来为一个      upvar |
       变量重定目标(retarget)。                                                |

Traces upvar                                                                |
       upvar  以一种直接但可能不是预期的方式与  trace  交互。如果在   otherVar |
       上定义了一个变量跟踪,涉及                                        myVar |
       的动作将触发这个追踪。但是,传递给跟踪过程将是   myVar   的名字,而不是 |
       otherVar 的名字。 所以,下列代码的输出将是 localVar 而不是 originalVar: |
              proc traceproc { name index op } {                               |
                puts $name                                                     |
              }                                                                |
              proc setByUpvar { name value } {                                 |
                upvar $name localVar                                           |
                set localVar $value                                            |
              }                                                                |
              set originalVar 1                                                |
              trace variable originalVar w traceproc                           |
              setByUpvar originalVar 2                                         |
              }                                                                |

       如果  otherVar  引用一个数组的元素,则为整个数组设置的变量跟踪在  myVar |
       被访问的时候将不被调用(但在特定元素上的跟踪仍将被调用)。特别的,如果这个数组是|
       env,则对 myVar 的变动将不被正确的传递给子进程。                        |

 SEE ALSO
       global(n), namespace(n), uplevel(n), variable(n)

 KEYWORDS
       context, frame, global, level, namespace, procedure, variable

[[2001/11/21

 Linux man:
       http://cmpp.linuxforum.net