Fixed Tcl lint issues

Signed-off-by: Jaehyun Kim <jhkim@precisioninno.com>

Author: jhkim-pii

src/odb/test/replace_hier_mod6.tcl

@@ -55,9 +55,8 @@ set alus [list \
   "ALU_16_BRENT_KUNG" \
   "ALU_16_KOGGE_STONE" \
   "ALU_16_SKLANSKY" \
-  "ALU_16_HAN_CARLSON" \
-]
+  "ALU_16_HAN_CARLSON"]
 
-for {set i 0} {$i < [llength $alus] - 1} {incr i} {
-  do_swap [lindex $alus $i] [lindex $alus [expr {$i + 1}]]
+for { set i 0 } { $i < [llength $alus] - 1 } { incr i } {
+  do_swap [lindex $alus $i] [lindex $alus [expr { $i + 1 }]]
 }

test/helpers.tcl

@@ -98,10 +98,8 @@ proc run_equivalence_test { test lib remove_cells } {
     catch { exec eqy -d $run_dir $test_script > /dev/null }
     set count 0
     catch {
-      set count [ \
-        exec grep -c "Successfully proved designs equivalent" \
-        $run_dir/logfile.txt \
-      ]
+      set count [exec grep -c "Successfully proved designs equivalent" \
+        $run_dir/logfile.txt]
     }
     if { $count == 0 } {
       puts "Repair timing output failed equivalence test"