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:
Tim Edwards 2020-06-27 21:46:53 -04:00
parent b36d5cce3c
commit eab0fe770d
1 changed files with 2 additions and 2 deletions

View File

@ -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 " "
} }