Browse Source

getexpress(), fix lvalues

pre-master-46
rlar 8 years ago
parent
commit
ec68ee7b94
  1. 8
      src/frontend/numparam/xpressn.c

8
src/frontend/numparam/xpressn.c

@ -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;

Loading…
Cancel
Save