Update flow/scripts/util.tcl

oharboe · maliberty · oharboe · commit 68c540a166bb · 2024-09-06T15:27:18.000+02:00
fix scoping

Co-authored-by: Matt Liberty &lt;matt.liberty@gmail.com&gt;
Signed-off-by: Øyvind Harboe &lt;oyvind.harboe@zylin.com&gt;
diff --git a/flow/scripts/util.tcl b/flow/scripts/util.tcl
@@ -4,12 +4,12 @@ proc log_cmd {cmd args} {
 }
 
 proc fast_route {} {
-  if {[info exist env(FASTROUTE_TCL)]} {
+  if {[info exist ::env(FASTROUTE_TCL)]} {
     source $::env(FASTROUTE_TCL)
   } else {
     set_global_routing_layer_adjustment $::env(MIN_ROUTING_LAYER)-$::env(MAX_ROUTING_LAYER) $::env(ROUTING_LAYER_ADJUSTMENT)
     set_routing_layers -signal $::env(MIN_ROUTING_LAYER)-$::env(MAX_ROUTING_LAYER)
-    if {[info exist env(MACRO_EXTENSION)]} {
+    if {[info exist ::env(MACRO_EXTENSION)]} {
       set_macro_extension $::env(MACRO_EXTENSION)
     }
   }

Original file line number	Diff line number	Diff line change
`@@ -4,12 +4,12 @@ proc log_cmd {cmd args} {`
`4`	`4`	`}`
`5`	`5`
`6`	`6`	`proc fast_route {} {`
`7`		`- if {[info exist env(FASTROUTE_TCL)]} {`
	`7`	`+ if {[info exist ::env(FASTROUTE_TCL)]} {`
`8`	`8`	`source $::env(FASTROUTE_TCL)`
`9`	`9`	`} else {`
`10`	`10`	`set_global_routing_layer_adjustment $::env(MIN_ROUTING_LAYER)-$::env(MAX_ROUTING_LAYER) $::env(ROUTING_LAYER_ADJUSTMENT)`
`11`	`11`	`set_routing_layers -signal $::env(MIN_ROUTING_LAYER)-$::env(MAX_ROUTING_LAYER)`
`12`		`- if {[info exist env(MACRO_EXTENSION)]} {`
	`12`	`+ if {[info exist ::env(MACRO_EXTENSION)]} {`
`13`	`13`	`set_macro_extension $::env(MACRO_EXTENSION)`
`14`	`14`	`}`
`15`	`15`	`}`