Merge pull request #3315 from Pinata-Consulting/scripts-consistency

Scripts consistency

Author: maliberty

flow/scripts/cts.tcl

@@ -75,9 +75,7 @@ if { ![env_var_equals SKIP_CTS_REPAIR_TIMING 1] } {
 
 report_metrics 4 "cts final"
 
-if { [env_var_exists_and_non_empty POST_CTS_TCL] } {
-  source $::env(POST_CTS_TCL)
-}
+source_env_var_if_exists POST_CTS_TCL
 
 write_db $::env(RESULTS_DIR)/4_1_cts.odb
 write_sdc -no_timestamp $::env(RESULTS_DIR)/4_cts.sdc

flow/scripts/detail_route.tcl

@@ -62,9 +62,7 @@ if { ![env_var_equals SKIP_ANTENNA_REPAIR_POST_DRT 1] } {
   utl::metric_int "antenna_diodes_count" -1
 }
 
-if { [env_var_exists_and_non_empty POST_DETAIL_ROUTE_TCL] } {
-  source $::env(POST_DETAIL_ROUTE_TCL)
-}
+source_env_var_if_exists POST_DETAIL_ROUTE_TCL
 
 check_antennas -report_file $env(REPORTS_DIR)/drt_antennas.log
 

flow/scripts/global_route.tcl

@@ -6,9 +6,7 @@ load_design 4_cts.odb 4_cts.sdc
 # This proc is here to allow us to use 'return' to return early from this
 # file which is sourced
 proc global_route_helper { } {
-  if { [env_var_exists_and_non_empty PRE_GLOBAL_ROUTE] } {
-    source $::env(PRE_GLOBAL_ROUTE)
-  }
+  source_env_var_if_exists PRE_GLOBAL_ROUTE
 
   proc do_global_route { } {
     set all_args [concat [list \

flow/scripts/pdn.tcl

@@ -5,9 +5,7 @@ load_design 2_3_floorplan_tapcell.odb 2_1_floorplan.sdc
 source $::env(PDN_TCL)
 pdngen
 
-if { [env_var_exists_and_non_empty POST_PDN_TCL] } {
-  source $::env(POST_PDN_TCL)
-}
+source_env_var_if_exists POST_PDN_TCL
 
 # Check all supply nets
 set block [ord::get_db_block]