This commit is contained in:
rlar 2017-07-29 19:19:45 +02:00
parent aede5f0b63
commit d7bf7df8e9
2 changed files with 2 additions and 2 deletions

View File

@ -270,7 +270,7 @@ sub processTestSpec {
next; next;
} }
if (/^biases\s+/i) { if (/^biases\s+/i) {
s%V\s*\(\s*%V(%;s%\s*\)%)%; s/V\s*\(\s*/V(/;s/\s*\)/)/;
s/V\(([a-zA-Z0-9]+),([a-zA-Z0-9]+)\)/V($1_$2)/; # convert V(n1,n2) to V(n1_n2) s/V\(([a-zA-Z0-9]+),([a-zA-Z0-9]+)\)/V($1_$2)/; # convert V(n1,n2) to V(n1_n2)
@Field=split(/[\s,]+/,$_); @Field=split(/[\s,]+/,$_);
for ($i=1;$i<=$#Field;++$i) { for ($i=1;$i<=$#Field;++$i) {

View File

@ -41,7 +41,7 @@ sub version {
chomp; chomp;
# Check whether this line is the one we are looking for. # Check whether this line is the one we are looking for.
# Also the term in parenthesis "()" stores the number to $1 which we can reuse later. # Also the term in parenthesis "()" stores the number to $1 which we can reuse later.
if (s/.+ngspice-([0-9]+)//) { if (m/.+ngspice-([0-9]+)/) {
# Simple read the stored group from the matching in the if clause # Simple read the stored group from the matching in the if clause
$version=$1; $version=$1;
last; last;