Browse Source

nupa_assignment(), postpone p++

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

8
src/frontend/numparam/xpressn.c

@ -1446,7 +1446,7 @@ nupa_assignment(dico_t *dico, const char * const s, char mode)
while (p < s_end) { while (p < s_end) {
p = getword(p, &tstr) + 1;
p = getword(p, &tstr);
t_p = spice_dstring_value(&tstr); t_p = spice_dstring_value(&tstr);
if (t_p[0] == '\0') { if (t_p[0] == '\0') {
error = message(dico, " Identifier expected\n"); error = message(dico, " Identifier expected\n");
@ -1454,15 +1454,15 @@ nupa_assignment(dico_t *dico, const char * const s, char mode)
} }
/* assignment expressions */ /* assignment expressions */
while ((p <= s_end) && (p[-1] != '='))
while ((p < s_end) && (*p != '='))
p++; p++;
if (p > s_end) {
if (p >= s_end) {
error = message(dico, " = sign expected.\n"); error = message(dico, " = sign expected.\n");
break; break;
} }
p = getexpress(&dtype, &ustr, p) + 1;
p = getexpress(&dtype, &ustr, p + 1) + 1;
if (dtype == NUPA_REAL) { if (dtype == NUPA_REAL) {
const char *tmp = spice_dstring_value(&ustr); const char *tmp = spice_dstring_value(&ustr);

Loading…
Cancel
Save