首页 > 代码库 > Tcl/Tk 中 upvar 函数简介

Tcl/Tk 中 upvar 函数简介


Upvar 函数类似于C中的传参,形如

  • upvar level otherVar myVar    对于myVar的操作都相当于操作otherVar

作用1 调用someproc函数时,不能直接使用varname。

proc someproc varname {    upvar 1 $varname var        set var 5    }someproc a

作用2 声明一个全局变量,全局变量命名空间的level是0

upvar #0 foo foo  ;# equivalent to: global foo

关于level,就是函数调用的层次

proc test_2 {b} {
puts [info level]
}

proc test_1 {a} {
puts [info level]
test_2 b
}

test_1 a

输出1 和 2 , 分别对应test_1和test_2的层级

此时如果在test_2 中调用0级变量,应该使用upvar 2 $varname var? 关于level讲解后续再做介绍

Tcl/Tk 中 upvar 函数简介