diff --git a/utils/coverage-log.tcl b/utils/coverage-log.tcl index 1f2825b40..d50b09b03 100755 --- a/utils/coverage-log.tcl +++ b/utils/coverage-log.tcl @@ -9,8 +9,8 @@ proc ev {name {var ""}} { return 0 } else { if {$var ne ""} { - upvar $var var - set var $val + upvar $var vv + set vv $val } return 1 }