luke
/
xschem
mirror of https://github.com/StefanSchippers/xschem.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

correctly translate ngspice diode current ->xyce diode current in ngspice::get_current

This commit is contained in:
Stefan Frederik 2022-11-02 11:59:48 +01:00
parent 98d59cd8e9
commit 0b863993b1
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/xschem.tcl
View File

@ -721,7 +721,7 @@ proc ngspice::get_current {n} {
# puts "ngspice::get_current: path=$path n=$n prefix=$prefix" # puts "ngspice::get_current: path=$path n=$n prefix=$prefix"
set n $path$n set n $path$n
set currname i set currname i
if { ![sim_is_xyce] } { if { ![sim_is_xyce] } { ;# ngspice
if {$path ne {} } { if {$path ne {} } {
set n $prefix.$n set n $prefix.$n
} }
@ -729,9 +729,10 @@ proc ngspice::get_current {n} {
set n @$n set n @$n
} }
set n i($n) set n i($n)
} else { } else { ;# xyce
if { [regexp {\[i[bcedgsb]\]$} $n] } { if { [regexp {\[i[bcedgsb]\]$} $n] } {
regexp {\[(i[bcesdgb])\]$} $n curr1 currname regexp {\[(i[bcesdgb])\]$} $n curr1 currname
if { $prefix == {d} } {set currname i}
regsub {\[(i[bcesdgb])\]$} $n {} n regsub {\[(i[bcesdgb])\]$} $n {} n
} }
regsub {\[i\]} $n {} n regsub {\[i\]} $n {} n