luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

enable node names containing '-' in .ic and .nodeset statements

This commit is contained in:
Holger Vogt 2019-01-19 11:04:03 +01:00
parent 0bd3bbd333
commit 2d8b30aebe
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/spicelib/parser/inppas3.c
View File

@ -89,7 +89,7 @@ INPpas3(CKTcircuit *ckt, struct card *data, INPtables *tab, TSKtask *task,
if( (*name == 'V' || *name == 'v') && !name[1] ) { if( (*name == 'V' || *name == 'v') && !name[1] ) {
/* looks like V - must be V(xx) - get xx now*/ /* looks like V - must be V(xx) - get xx now*/
char *nodename; char *nodename;
INPgetTok(&line,&nodename,1); INPgetNetTok(&line,&nodename,1);
if (INPtermInsert(ckt,&nodename,tab,&node1)!=E_EXISTS) if (INPtermInsert(ckt,&nodename,tab,&node1)!=E_EXISTS)
fprintf(stderr, fprintf(stderr,
"Warning : Nodeset on non-existant node - %s\n", nodename); "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] ) { if( (*name == 'V' || *name == 'v') && !name[1] ) {
/* looks like V - must be V(xx) - get xx now*/ /* looks like V - must be V(xx) - get xx now*/
char *nodename; char *nodename;
INPgetTok(&line,&nodename,1); INPgetNetTok(&line,&nodename,1);
if (INPtermInsert(ckt,&nodename,tab,&node1)!=E_EXISTS) if (INPtermInsert(ckt,&nodename,tab,&node1)!=E_EXISTS)
fprintf(stderr, fprintf(stderr,
"Warning : IC on non-existant node - %s\n", nodename); "Warning : IC on non-existant node - %s\n", nodename);