Index: tests/varresolutiontest.tcl =================================================================== diff -u -r8651e9f7d6d526196cfe4dad14d08b857a66f5d8 -r5ebe07f669899129e692d36bcb2016d27ef421b8 --- tests/varresolutiontest.tcl (.../varresolutiontest.tcl) (revision 8651e9f7d6d526196cfe4dad14d08b857a66f5d8) +++ tests/varresolutiontest.tcl (.../varresolutiontest.tcl) (revision 5ebe07f669899129e692d36bcb2016d27ef421b8) @@ -766,13 +766,13 @@ } } - ? {o bar} d + ? {o bar} "" ? {o ? a} 0 ? {o ? b} 0 ? {o ? c} 0 - ? {o ? d} 1 - ? {lsort [o info vars]} d + ? {o ? d} 0 + ? {lsort [o info vars]} "" o eval {set :a 1} ? {o ? a} 1 - ? {lsort [o info vars]} "a d" + ? {lsort [o info vars]} a }