tcl: don't use 'set' to retrieve the value of a variable