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

getword(), pass s_end instead of s

This commit is contained in:
rlar 2017-11-12 21:15:34 +01:00
parent 3f24aa4ea0
commit 6ca0c74cbf
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1317,11 +1317,9 @@ nupa_substitute(dico_t *dico, const char *s, char *r)
static const char * static const char *
getword(char * const s, SPICE_DSTRINGPTR tstr_p, const char *iptr) getword(const char * const ls_ptr, SPICE_DSTRINGPTR tstr_p, const char *iptr)
/* isolate a word from s after position "after". return i= last read+1 */ /* isolate a word from s after position "after". return i= last read+1 */
{ {
char *ls_ptr = s + (int) strlen(s);
do do
iptr++; iptr++;
while ((iptr < ls_ptr) && !alfa(iptr[-1])); while ((iptr < ls_ptr) && !alfa(iptr[-1]));
@ -1460,7 +1458,7 @@ nupa_assignment(dico_t *dico, char *s, char mode)
while ((i < ls) && !error) { while ((i < ls) && !error) {
i = (int) (getword(s, &tstr, s + i) - s); i = (int) (getword(s + strlen(s), &tstr, s + i) - s);
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");