gm300の日記: VIF のデバッグ
日記 by
gm300
細かい点で bug が多い。clip_annotate を横目で見ながら net 構造を track する tcl 書く。Tcl コード量は期待の倍くらい。Tcl 側で書き方を考え直せばそれなりに減りそう。
今は pin/net 名が flis4/a4cnfg_l4/port08/c442.{a[16]} になる問題対応中。
proc track { hinst hpin type } {
puts "$hinst.$hpin"
hs net $type --merge --exclude-self l $hinst $hpin
set upin ""
foreach lm $l {
if { [lindex $lm 3] == "c" } {
puts "[lindex $lm 0].[lindex $lm 1]"
} elseif { [lindex $lm 3] == "p" } {
if { [lindex $lm 4] == 0 } {
lappend upin [bonet $lm]
set hinst [lindex $lm 0]
} else {
lappend spin([lindex $lm 0]) [bonet $lm]
}
}
}
if { $upin != "" } {
track $hinst $upin --instance
}
foreach lm [array name spin] {
track $lm $spin($lm) --module
}
}
今は pin/net 名が flis4/a4cnfg_l4/port08/c442.{a[16]} になる問題対応中。
proc track { hinst hpin type } {
puts "$hinst.$hpin"
hs net $type --merge --exclude-self l $hinst $hpin
set upin ""
foreach lm $l {
if { [lindex $lm 3] == "c" } {
puts "[lindex $lm 0].[lindex $lm 1]"
} elseif { [lindex $lm 3] == "p" } {
if { [lindex $lm 4] == 0 } {
lappend upin [bonet $lm]
set hinst [lindex $lm 0]
} else {
lappend spin([lindex $lm 0]) [bonet $lm]
}
}
}
if { $upin != "" } {
track $hinst $upin --instance
}
foreach lm [array name spin] {
track $lm $spin($lm) --module
}
}
VIF のデバッグ More ログイン