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

nupa_substitute(), fix lvalue and cleanup

This commit is contained in:
rlar 2016-05-14 16:43:34 +02:00
parent ac59410602
commit cc02b9ae2d
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1182,7 +1182,7 @@ nupa_substitute(dico_t *dico, const char *s, char * const r)
bug: wont flag overflow!
*/
{
int (r_ - r) = 0;
char *r_ = r;
bool err = 0;
SPICE_DSTRING qstr; /* temp result dynamic string */
@ -1230,7 +1230,7 @@ nupa_substitute(dico_t *dico, const char *s, char * const r)
}
s = kptr + 1;
(r_ - r) = (r_ - r) + (int) (insertnumber(dico, r + (r_ - r), &qstr) - (r + (r_ - r)));
r_ = r_ + (int) (insertnumber(dico, r_, &qstr) - r_);
} else if (c == Intro) {
/* skip "&&" which may occur in B source */
@ -1290,7 +1290,7 @@ nupa_substitute(dico_t *dico, const char *s, char * const r)
s = kptr;
}
(r_ - r) = (r_ - r) + (int) (insertnumber(dico, r + (r_ - r), &qstr) - (r + (r_ - r)));
r_ = r_ + (int) (insertnumber(dico, r_, &qstr) - r_);
}
}