ローカル変数の一覧を取得
Posted feedbacks - Tcl
Tcl にも info locals というずばりなコマンドがありますが Python と違って返されるのは名前のリストのみなので記述量は若干増えます。
1 2 3 4 5 6 7 8 9 10 11 12 | proc foo {} {
set x 1
set y hello
set locals [info locals]
set result {}
foreach k $locals { lappend result $k [set $k] }
return $result
}
# % foo
# x 1 y hello
|


にしお
#3391()
Rating0/0=0.00
Pythonで表現すると、下のコードの???部分を埋めることになります。
>>> def foo(): x = 1 y = "hello" ??? return result >>> foo() {'y': 'hello', 'x': 1}[ reply ]