Posted to tcl by Bradipo at Fri Sep 23 21:01:11 GMT 2016view pretty
% proc foo {x y x} { expr {$x + $y} } % foo 3 4 7 7 % info args foo x y x % info body foo expr {$x + $y}
% proc foo {x y x} { expr {$x + $y} } % foo 3 4 7 7 % info args foo x y x % info body foo expr {$x + $y}