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

nupa_subcktcall(), drop `parsebuf' and `buf'

This commit is contained in:
rlar 2017-11-25 17:22:19 +01:00
parent 8b1e4fc32c
commit bb9689139b
1 changed files with 2 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1520,7 +1520,6 @@ nupa_subcktcall(dico_t *dico, char *s, char * const x, char * const inst_name)
SPICE_DSTRING ustr;
SPICE_DSTRING vstr;
SPICE_DSTRING idlist;
SPICE_DSTRING parsebuf;
bool err = 0;
spice_dstring_init(&subname);
@ -1605,16 +1604,10 @@ nupa_subcktcall(dico_t *dico, char *s, char * const x, char * const inst_name)
char * const t_p = spice_dstring_value(&tstr);
char * const ls_ptr = t_p + spice_dstring_length(&tstr);
spice_dstring_init(&parsebuf);
scopyd(&parsebuf, &tstr);
char * const buf = spice_dstring_value(&parsebuf);
const char *p_subname = search_isolated_identifier(buf, spice_dstring_value(&subname));
spice_dstring_free(&parsebuf);
char *p_subname = search_isolated_identifier(t_p, spice_dstring_value(&subname));
if (p_subname) {
char *jp = t_p + (int)(p_subname - buf) + spice_dstring_length(&subname) + 1; /* 1st position of arglist: jp */
char *jp = p_subname + spice_dstring_length(&subname) + 1; /* 1st position of arglist */
while ((jp < ls_ptr) && ((*jp <= ' ') || (*jp == ',')))
jp++;