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(), fix lvalue

This commit is contained in:
rlar 2017-11-17 21:18:44 +01:00
parent 0a149819a5
commit 3267bf8d63
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1640,7 +1640,7 @@ nupa_subcktcall(dico_t *dico, char *s, char * const x, char * const inst_name)
if (alfanum(t_p[(kp - t_p)]) || t_p[(kp - t_p)] == '.') { if (alfanum(t_p[(kp - t_p)]) || t_p[(kp - t_p)] == '.') {
/* number, identifier */ /* number, identifier */
int (hp - t_p) = (int) (kp - t_p); char *hp = t_p + (int) (kp - t_p);
while (t_p[(kp - t_p)] > ' ') while (t_p[(kp - t_p)] > ' ')
kp++; kp++;
pscopy(&ustr, t_p, (int) (hp - t_p), (int) (kp - t_p) - (int) (hp - t_p)); pscopy(&ustr, t_p, (int) (hp - t_p), (int) (kp - t_p) - (int) (hp - t_p));