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

getexpress(), fix lvalues

This commit is contained in:
rlar 2017-11-18 12:13:47 +01:00
parent 9ff93246b6
commit ec68ee7b94
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1348,14 +1348,14 @@ getexpress(const char * const s, SPICE_DSTRINGPTR tstr_p, const char **pi)
nupa_type tpe;
ls_ptr = s + strlen(s);
(xia_ptr + 1) = (p + 1) + 1;
xia_ptr = (p + 1) + 1 - 1;
while (((xia_ptr + 1) < ls_ptr) && ((xia_ptr + 1)[-1] <= ' '))
(xia_ptr + 1)++; /*white space ? */
xia_ptr++; /*white space ? */
if ((xia_ptr + 1)[-1] == '"') {
/* string constant */
(xia_ptr + 1)++;
xia_ptr++;
p = (xia_ptr + 1) - 1;
while (((p + 1) < ls_ptr) && (*p != '"'))
@ -1370,7 +1370,7 @@ getexpress(const char * const s, SPICE_DSTRINGPTR tstr_p, const char **pi)
} else {
if ((xia_ptr + 1)[-1] == '{')
(xia_ptr + 1)++;
xia_ptr++;
p = (xia_ptr + 1) - 1 - 1;