From 47532f255ef58d9e0e5bd6c909b3a7008e35ee43 Mon Sep 17 00:00:00 2001 From: Bart Schaefer Date: Sat, 27 May 2000 08:32:58 +0000 Subject: 11606: Propagate parse errors out of parse_list() and parse_event(), and test that it worked. --- Src/init.c | 2 +- Src/parse.c | 7 +++---- 2 files changed, 4 insertions(+), 5 deletions(-) (limited to 'Src') diff --git a/Src/init.c b/Src/init.c index 131b50606..5f0c98ca0 100644 --- a/Src/init.c +++ b/Src/init.c @@ -944,7 +944,7 @@ source(char *s) execode(prog, 1, 0); popheap(); } else - loop(0, 0); /* loop through the file to be sourced */ + loop(0, 0); /* loop through the file to be sourced */ sourcelevel--; /* restore the current shell state */ diff --git a/Src/parse.c b/Src/parse.c index 453e45ad0..5e90984ac 100644 --- a/Src/parse.c +++ b/Src/parse.c @@ -459,6 +459,7 @@ par_event(void) } } if (!r) { + tok = LEXERR; if (errflag) { yyerror(0); ecused--; @@ -491,10 +492,8 @@ parse_list(void) yylex(); init_parse(); par_list(&c); -#if 0 - if (tok == LEXERR) -#endif - if (tok != ENDINPUT) { + if (tok != ENDINPUT) { + tok = LEXERR; yyerror(0); return NULL; } -- cgit 1.4.1