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

parser/lexical.c, #2/10, move the `wlist' and `cw' resetting 

nearer to the `goto nloop'
This commit is contained in:
rlar 2016-03-11 22:37:25 +01:00
parent a2af93685f
commit a0f5111436
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/frontend/parser/lexical.c
View File

@ -124,7 +124,7 @@ cp_lexer(char *string)
{
int c, d;
int i, j;
wordlist *wlist = NULL, *cw = NULL;
wordlist *wlist, *cw;
char buf[NEW_BSIZE_SP], linebuf[NEW_BSIZE_SP];
int paren;
@ -137,6 +137,7 @@ cp_lexer(char *string)
prompt();
}
wlist = cw = NULL;
nloop:
wlist = cw = NULL;
i = 0;
@ -188,12 +189,14 @@ nloop:
c = '\n';
if ((c == cp_hash) && !cp_interactive && (j == 1)) {
wl_free(wlist);
wlist = cw = NULL;
if (string)
if (string) {
wl_free(wlist);
return NULL;
}
while (((c = cp_readchar(&string, cp_inp_cur)) != '\n') && (c != EOF))
;
wl_free(wlist);
wlist = cw = NULL;
goto nloop;
}
@ -271,7 +274,6 @@ nloop:
// cp_ccom doesn't mess wlist, read only access to wlist->wl_word
cp_ccom(wlist, buf, FALSE);
wl_free(wlist);
(void) fputc('\r', cp_out);
prompt();
for (j = 0; linebuf[j]; j++)
@ -280,6 +282,7 @@ nloop:
#else
fputc(linebuf[j], cp_out); /* But you can't edit */
#endif
wl_free(wlist);
wlist = cw = NULL;
goto nloop;
}