* src/spicelib/parser/inp2dot.c:

Fix .noise statements by reverting Brorson's INPgetNetTok lines
This commit is contained in:
stefanjones 2004-05-03 16:15:39 +00:00
parent 0f4685be21
commit a2f5c5e234
2 changed files with 11 additions and 6 deletions

View File

@ -1,3 +1,8 @@
2004-05-03 Stefan Jones <stefan.jones@multigig.com>
* src/spicelib/parser/inp2dot.c:
Fix .noise statements by reverting Brorson's INPgetNetTok lines
2003-12-24 Stefan Jones <stefan.jones@multigig.com>
* configure.in:

View File

@ -57,13 +57,13 @@ dot_noise(char *line, void *ckt, INPtables *tab, card *current,
length = strlen(name);
if (((*name == 'V') || (*name == 'v')) && (length == 1)) {
INPgetNetTok(&line, &nname1, 0);
INPgetTok(&line, &nname1, 0);
INPtermInsert(ckt, &nname1, tab, &node1);
ptemp.nValue = (IFnode) node1;
GCA(INPapName, (ckt, which, foo, "output", &ptemp))
if (*line != ')') {
INPgetNetTok(&line, &nname2, 1);
INPgetTok(&line, &nname2, 1);
INPtermInsert(ckt, &nname2, tab, &node2);
ptemp.nValue = (IFnode) node2;
} else {
@ -352,12 +352,12 @@ dot_tf(char *line, void *ckt, INPtables *tab, card *current,
if (*line != '(' ) {
/* error, bad input format */
}
INPgetNetTok(&line, &nname1, 0);
INPgetTok(&line, &nname1, 0);
INPtermInsert(ckt, &nname1, tab, &node1);
ptemp.nValue = (IFnode) node1;
GCA(INPapName, (ckt, which, foo, "outpos", &ptemp));
if (*line != ')') {
INPgetNetTok(&line, &nname2, 1);
INPgetTok(&line, &nname2, 1);
INPtermInsert(ckt, &nname2, tab, &node2);
ptemp.nValue = (IFnode) node2;
GCA(INPapName, (ckt, which, foo, "outneg", &ptemp));
@ -487,13 +487,13 @@ dot_sens(char *line, void *ckt, INPtables *tab, card *current,
LITERR("Syntax error: '(' expected after 'v'\n");
return 0;
}
INPgetNetTok(&line, &nname1, 0);
INPgetTok(&line, &nname1, 0);
INPtermInsert(ckt, &nname1, tab, &node1);
ptemp.nValue = (IFnode) node1;
GCA(INPapName, (ckt, which, foo, "outpos", &ptemp))
if (*line != ')') {
INPgetNetTok(&line, &nname2, 1);
INPgetTok(&line, &nname2, 1);
INPtermInsert(ckt, &nname2, tab, &node2);
ptemp.nValue = (IFnode) node2;
GCA(INPapName, (ckt, which, foo, "outneg", &ptemp));