diff --git a/doc/ChangeLog.txt b/doc/ChangeLog.txt index 6b57282c..90938895 100644 --- a/doc/ChangeLog.txt +++ b/doc/ChangeLog.txt @@ -82,18 +82,31 @@ supports the SPF format. .... +The make_instance command now takes a single instance name argument +and returns the instance. + + make_instance instance_name + The make_net command now takes a single net name argument and returns the net. + make_net net_name + The delete_instance command deletes a single instance instead of a list of instances. + delete_instance instance + The delete_net command deletes a single net instead of a list of nets. + delete_net net + The disconnect_pins command is renamed disconnect_pin and disconnects a single pin. + disconnect_pin net pin + Release 1.11.0 2017/08/18 ------------------------- diff --git a/doc/OpenSTA.odt b/doc/OpenSTA.odt index 42842e08..14c08383 100644 Binary files a/doc/OpenSTA.odt and b/doc/OpenSTA.odt differ diff --git a/tcl/NetworkEdit.tcl b/tcl/NetworkEdit.tcl index e46b5a45..14453455 100644 --- a/tcl/NetworkEdit.tcl +++ b/tcl/NetworkEdit.tcl @@ -202,37 +202,34 @@ proc make_instance { inst_path lib_cell } { ################################################################ -proc make_net { net_name } { +proc make_net { net_path } { # Copy backslashes that will be removed by foreach. - set net_name [string map {\\ \\\\} $net_name] + set net_path [string map {\\ \\\\} $net_path] set path_regexp [path_regexp] - if {[regexp $path_regexp $net_name ignore path_name net_name]} { + if {[regexp $path_regexp $net_path ignore path_name net_name]} { set parent [find_instance $path_name] if { $parent == "NULL" } { return 0 } } else { set parent [top_instance] + set net_name $net_path } return [make_net_cmd $net_name $parent] } ################################################################ -proc replace_cell { instances lib_cell } { +proc replace_cell { instance lib_cell } { set cell [get_lib_cell_warn "lib_cell" $lib_cell] if { $cell != "NULL" } { - set insts [get_instances_error "instances" $instances] - foreach inst $insts { - set inst_cell [$inst liberty_cell] - if { $inst_cell == "NULL" \ - || ![equiv_cell_ports $inst_cell $cell] } { - return 0 - } - } - foreach inst $insts { - replace_cell_cmd $inst $cell + set inst [get_instance_error "instance" $instance] + set inst_cell [$inst liberty_cell] + if { $inst_cell == "NULL" \ + || ![equiv_cell_ports $inst_cell $cell] } { + return 0 } + replace_cell_cmd $inst $cell return 1 } else { return 0 diff --git a/tcl/Sta.tcl b/tcl/Sta.tcl index 993f5f22..c4968078 100644 --- a/tcl/Sta.tcl +++ b/tcl/Sta.tcl @@ -677,23 +677,23 @@ proc unset_timing_derate { args } { # ################################################################ -define_sta_cmd_args "connect_pin" {net pins} +define_sta_cmd_args "connect_pin" {net pin} # deprecated 2.0.16 05/02/2019 define_sta_cmd_args "connect_pins" {net pins} -define_sta_cmd_args "delete_instance" {cell_list} +define_sta_cmd_args "delete_instance" {inst} -define_sta_cmd_args "delete_net" {net_list} +define_sta_cmd_args "delete_net" {net} define_sta_cmd_args "disconnect_pin" {net -all|pin} # deprecated 2.0.16 05/02/2019 define_sta_cmd_args "disconnect_pins" {net -all|pins} -define_sta_cmd_args "make_instance" {inst_names lib_cell} +define_sta_cmd_args "make_instance" {inst_path lib_cell} define_sta_cmd_args "make_net" {} -define_sta_cmd_args "replace_cell" {instances lib_cell} +define_sta_cmd_args "replace_cell" {instance lib_cell} define_sta_cmd_args "insert_buffer" {buffer_name buffer_cell net load_pins\ buffer_out_net_name}