get_cells -of_objects ports
This commit is contained in:
parent
2b30d90555
commit
535a09edcc
11
tcl/Sdc.tcl
11
tcl/Sdc.tcl
|
|
@ -502,9 +502,16 @@ proc get_cells { args } {
|
|||
if { $args != {} } {
|
||||
sta_warn "patterns argument not supported with -of_objects."
|
||||
}
|
||||
parse_pin_net_args $keys(-of_objects) pins nets
|
||||
parse_port_pin_net_arg $keys(-of_objects) pins nets
|
||||
foreach pin $pins {
|
||||
lappend insts [$pin instance]
|
||||
if { [$pin is_top_level_port] } {
|
||||
set net [get_nets [get_name $pin]]
|
||||
if { $net != "NULL" } {
|
||||
lappend nets $net
|
||||
}
|
||||
} else {
|
||||
lappend insts [$pin instance]
|
||||
}
|
||||
}
|
||||
foreach net $nets {
|
||||
set pin_iter [$net pin_iterator]
|
||||
|
|
|
|||
Loading…
Reference in New Issue