Corrected the readspice script to treat the input line as a string
and not a character list when checking the first character of a SPICE netlist for a comment or continuation character.
This commit is contained in:
parent
b36d5cce3c
commit
eab0fe770d
|
|
@ -57,8 +57,8 @@ proc readspice {netfile} {
|
||||||
set fdata {}
|
set fdata {}
|
||||||
set lastline ""
|
set lastline ""
|
||||||
while {[gets $fnet line] >= 0} {
|
while {[gets $fnet line] >= 0} {
|
||||||
if {[lindex $line 0] != "*"} {
|
if {[string index $line 0] != "*"} {
|
||||||
if {[lindex $line 0] == "+"} {
|
if {[string index $line 0] == "+"} {
|
||||||
if {[string range $line end end] != " "} {
|
if {[string range $line end end] != " "} {
|
||||||
append lastline " "
|
append lastline " "
|
||||||
}
|
}
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue