Lines Matching refs:instname

119 proc magic::move_forward_by_width {instname} {  argument
120 select cell $instname
138 proc magic::get_and_move_inst {cellname instname {anum 1}} {
142 identify $instname
244 set instname [lindex $pinlist 0]
270 lappend outparts "magic::gencell $libdev $instname"
283 magic::get_and_move_inst $devtype $instname $mult
286 magic::move_forward_by_width $instname
378 valid instname rest]} {
381 valid instname rest]} {
393 valid instname rest]} {
396 valid instname rest]} {
447 proc magic::gencell {gencell_name {instname {}} args} {
495 if {$instname == {}} {
507 set cellname [instance list celldef $instname]
511 select cell $instname
525 magic::gencell_dialog $instname $gencell_type $library $parameters
532 magic::gencell_change $instname $gencell_type $library $parameters
544 identify $instname
652 proc magic::gencell_change {instname gencell_type library parameters} {
656 set newinstname $instname
663 if {$newinstname == "(default)"} {set newinstname $instname}
664 if {$newinstname == $instname} {set newinstname $instname}
665 if {[instance list exists $newinstname] != ""} {set newinstname $instname}
680 set old_gname [instance list celldef $instname]
698 select cell $instname
710 select cell $instname
723 if {[string first $old_gname $instname] != 0} {
724 set newinstname $instname
734 select cell $instname
746 if {[string first $old_gname $instname] != 0} {
747 set newinstname $instname
766 if {$instname != $newinstname} {
782 proc magic::gencell_change_orig {instname gencell_type library parameters} {
786 set newinstname $instname
793 if {$newinstname == "(default)"} {set newinstname $instname}
794 if {$newinstname == $instname} {set newinstname $instname}
795 if {[instance list exists $newinstname] != ""} {set newinstname $instname}
810 set gname [instance list celldef $instname]
824 select cell $instname
843 select cell $instname
976 if {[catch {set instname [${library}::${gencell_type}_draw $parameters]} \ drawerr]} {
979 set gname [instance list celldef $instname]
994 set instname [getcell $gname $orient]
999 set instname $newinstname
1004 return $instname
1251 set instname [lindex [lindex [lindex [what -list] 2] 0] 0]
1252 magic::gencell_dialog $instname {} {} {}
1283 proc magic::gencell_dialog {instname gencell_type library parameters} {
1288 if {$instname == {}} {
1300 if {$instname != {}} {
1302 set instname [string map {\\ ""} $instname]
1303 if {[regexp {^(.*)\[[0-9,]+\]$} $instname valid instroot]} {
1304 set instname $instroot
1306 set gname [instance list celldef [subst $instname]]
1323 select cell $instname
1333 set itext $instname
1390 if {$instname == {}} {
1402 "magic::gencell_change $instname $gencell_type $library {}"
1404 "magic::gencell_change $instname $gencell_type $library {} ;\