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

numparam/xpressn.c, nupa_subcktcall(), drop unused `err' argument

This commit is contained in:
rlar 2016-04-27 18:28:32 +02:00
parent 979175fbc6
commit 495eef349d
3 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/frontend/numparam/numparam.h
View File

@ -72,7 +72,7 @@ bool defsubckt(dico_t *, struct card *, nupa_type categ);
int findsubckt(dico_t *, char *s); int findsubckt(dico_t *, char *s);
bool nupa_substitute(dico_t *, char *s, char *r, bool err); bool nupa_substitute(dico_t *, char *s, char *r, bool err);
bool nupa_assignment(dico_t *, char *s, char mode); bool nupa_assignment(dico_t *, char *s, char mode);
bool nupa_subcktcall(dico_t *, char *s, char *x, bool err); bool nupa_subcktcall(dico_t *, char *s, char *x);
void nupa_subcktexit(dico_t *); void nupa_subcktexit(dico_t *);
dico_t *nupa_fetchinstance(void); dico_t *nupa_fetchinstance(void);
nupa_type getidtype(dico_t *, char *s); nupa_type getidtype(dico_t *, char *s);

2
src/frontend/numparam/spicenum.c
View File

@ -841,7 +841,7 @@ nupa_eval(struct card *card)
idef = findsubckt(dicoS, s); idef = findsubckt(dicoS, s);
if (idef > 0) if (idef > 0)
nupa_subcktcall(dicoS, dicoS->dynrefptr[idef], dicoS->dynrefptr[linenum], 0); nupa_subcktcall(dicoS, dicoS->dynrefptr[idef], dicoS->dynrefptr[linenum]);
else else
putlogfile('?', linenum, " illegal subckt call."); putlogfile('?', linenum, " illegal subckt call.");
} else if (c == 'U') { /* release local symbols = parameters */ } else if (c == 'U') { /* release local symbols = parameters */

3
src/frontend/numparam/xpressn.c
View File

@ -1534,7 +1534,7 @@ nupa_assignment(dico_t *dico, char *s, char mode)
bool bool
nupa_subcktcall(dico_t *dico, char *s, char *x, bool err) nupa_subcktcall(dico_t *dico, char *s, char *x)
/* s= a subckt define line, with formal params. /* s= a subckt define line, with formal params.
x= a matching subckt call line, with actual params x= a matching subckt call line, with actual params
*/ */
@ -1550,6 +1550,7 @@ nupa_subcktcall(dico_t *dico, char *s, char *x, bool err)
char *t_p; char *t_p;
char *u_p; char *u_p;
bool found; bool found;
bool err = 0;
spice_dstring_init(&subname); spice_dstring_init(&subname);
spice_dstring_init(&tstr); spice_dstring_init(&tstr);