Merge pull request #9052 from gadfort/place_inst

maliberty · web-flow · commit 95dd84cfedbf · 2025-12-16T17:09:02.000Z
ord: dont index into name
diff --git a/src/OpenRoad.tcl b/src/OpenRoad.tcl
@@ -430,7 +430,7 @@ proc place_inst { args } {
   }
 
   if { [info exists keys(-name)] } {
-    set inst_name [lindex $keys(-name) 0]
+    set inst_name $keys(-name)
   } else {
     utl::error ORD 57 "-name is a required argument to the place_cell command."
   }

Original file line number	Diff line number	Diff line change
`@@ -430,7 +430,7 @@ proc place_inst { args } {`
`430`	`430`	`}`
`431`	`431`
`432`	`432`	`if { [info exists keys(-name)] } {`
`433`		`- set inst_name [lindex $keys(-name) 0]`
	`433`	`+ set inst_name $keys(-name)`
`434`	`434`	`} else {`
`435`	`435`	`utl::error ORD 57 "-name is a required argument to the place_cell command."`
`436`	`436`	`}`