enable node names containing '-' in .ic and .nodeset statements
This commit is contained in:
parent
c6fae9ccfd
commit
43e185a3cc
|
|
@ -89,7 +89,7 @@ INPpas3(CKTcircuit *ckt, struct card *data, INPtables *tab, TSKtask *task,
|
|||
if( (*name == 'V' || *name == 'v') && !name[1] ) {
|
||||
/* looks like V - must be V(xx) - get xx now*/
|
||||
char *nodename;
|
||||
INPgetTok(&line,&nodename,1);
|
||||
INPgetNetTok(&line,&nodename,1);
|
||||
if (INPtermInsert(ckt,&nodename,tab,&node1)!=E_EXISTS)
|
||||
fprintf(stderr,
|
||||
"Warning : Nodeset on non-existant node - %s\n", nodename);
|
||||
|
|
@ -130,7 +130,7 @@ INPpas3(CKTcircuit *ckt, struct card *data, INPtables *tab, TSKtask *task,
|
|||
if( (*name == 'V' || *name == 'v') && !name[1] ) {
|
||||
/* looks like V - must be V(xx) - get xx now*/
|
||||
char *nodename;
|
||||
INPgetTok(&line,&nodename,1);
|
||||
INPgetNetTok(&line,&nodename,1);
|
||||
if (INPtermInsert(ckt,&nodename,tab,&node1)!=E_EXISTS)
|
||||
fprintf(stderr,
|
||||
"Warning : IC on non-existant node - %s\n", nodename);
|
||||
|
|
|
|||
Loading…
Reference in New Issue