Browse Source

nupa_subcktcall(), simplify

pre-master-46
rlar 10 years ago
parent
commit
07112d62fb
  1. 4
      src/frontend/numparam/xpressn.c

4
src/frontend/numparam/xpressn.c

@ -1654,13 +1654,13 @@ nupa_subcktcall(dico_t *dico, char *s, char * const x, char * const inst_name)
} }
char * const u_p = spice_dstring_value(&ustr); char * const u_p = spice_dstring_value(&ustr);
if (u_p[0]) {
if (*u_p) {
char * const idlist_p = spice_dstring_value(&idlist); char * const idlist_p = spice_dstring_value(&idlist);
char *dollar = strchr(idlist_p, '$'); char *dollar = strchr(idlist_p, '$');
if (dollar) { if (dollar) {
/* replace dollar with expression string u */ /* replace dollar with expression string u */
pscopy(&vstr, idlist_p, 0, (int) (dollar - idlist_p)); pscopy(&vstr, idlist_p, 0, (int) (dollar - idlist_p));
sadd(&vstr, spice_dstring_value(&ustr));
sadd(&vstr, u_p);
sadd(&vstr, dollar + 1); sadd(&vstr, dollar + 1);
scopyd(&idlist, &vstr); scopyd(&idlist, &vstr);
} }

Loading…
Cancel
Save