Posted to tcl by Bradipo at Fri Sep 23 21:01:11 GMT 2016view raw

  1. % proc foo {x y x} {
  2. expr {$x + $y}
  3. }
  4. % foo 3 4 7
  5. 7
  6. % info args foo
  7. x y x
  8. % info body foo
  9.  
  10. expr {$x + $y}
  11.  
  12.