Browse Source

nupa_subcktcall(), simplify

pre-master-46
rlar 10 years ago
parent
commit
e4a2106cfe
  1. 5
      src/frontend/numparam/xpressn.c

5
src/frontend/numparam/xpressn.c

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

Loading…
Cancel
Save