Posted to tcl by Napier at Fri Oct 17 19:19:48 GMT 2014view raw

  1.  
  2. proc 1 {tempDict} {
  3. set varName [dict get $tempDict test]
  4. puts "The var is $varName"
  5. puts "This is another call to $varName"
  6. puts "And another call to $varName"
  7. }
  8.  
  9. proc 2 {tempDict} {
  10. puts "The var is [dict get $tempDict test]"
  11. puts "This is another call to [dict get $tempDict test]"
  12. puts "And another call to [dict get $tempDict test]"
  13. }