小编Xof*_*ofo的帖子

给出一个简单的tcl proc

proc foo {a b} {puts "$a $b"}

我可以使用什么tcl命令打印出程序foo...这就是我想要proc 的文本回来...

例如:

% proc foo {a b} {puts "$a $b"}
% foo a b
  a b

% puts $foo
  can't read "foo": no such variable

我怎么foo {a b} {puts "$a $b"}回来？