Fix four more lint extension warnings.

4 files changed, 13 insertions, 6 deletions

diff --git a/ChangeLog b/ChangeLog
index 3aa5b12e..871e0486 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2019-06-30         Arnold D. Robbins     <arnold@skeeve.com>
+
+	* interpret.h (r_interpret): Fix two more cases of warning
+	about gawk extensions.
+	* awkgram.y [GRAMMAR]: And two more cases here. Thanks to
+	Mark Krauze <daburashka@ya.ru> for making me look for them.
+
 2019-06-26         Arnold D. Robbins     <arnold@skeeve.com>
 
 	* symbol.c (install): Strip off any leading `awk::' before
diff --git a/awkgram.c b/awkgram.c
index 061d2975..a1b4173e 100644
--- a/awkgram.c
+++ b/awkgram.c
@@ -4200,7 +4200,7 @@ regular_print:
 
 		if (do_traditional || do_posix)
 			yyerror("%s", msg);
-		else if (do_lint && ! warned) {
+		else if (do_lint_extensions && ! warned) {
 			warned = true;
 			lintwarn("%s", msg);
 		}
@@ -6354,7 +6354,7 @@ retry:
 		if (c == '[') {
 			if (do_traditional)
 				fatal(_("multidimensional arrays are a gawk extension"));
-			if (do_lint)
+			if (do_lint_extensions)
 				lintwarn(_("multidimensional arrays are a gawk extension"));
 			yylval = GET_INSTRUCTION(Op_sub_array);
 			lasttok = ']';
diff --git a/awkgram.y b/awkgram.y
index a940ac9d..beb775d9 100644
--- a/awkgram.y
+++ b/awkgram.y
@@ -1994,7 +1994,7 @@ func_call
 
 		if (do_traditional || do_posix)
 			yyerror("%s", msg);
-		else if (do_lint && ! warned) {
+		else if (do_lint_extensions && ! warned) {
 			warned = true;
 			lintwarn("%s", msg);
 		}
@@ -3857,7 +3857,7 @@ retry:
 		if (c == '[') {
 			if (do_traditional)
 				fatal(_("multidimensional arrays are a gawk extension"));
-			if (do_lint)
+			if (do_lint_extensions)
 				lintwarn(_("multidimensional arrays are a gawk extension"));
 			yylval = GET_INSTRUCTION(Op_sub_array);
 			lasttok = ']';
diff --git a/interpret.h b/interpret.h
index 478dc82a..3215833e 100644
--- a/interpret.h
+++ b/interpret.h
@@ -264,7 +264,7 @@ uninitialized_scalar:
 			if (t1 == func_table) {
 				static bool warned = false;
 
-				if (do_lint && ! warned) {
+				if (do_lint_extensions && ! warned) {
 					warned = true;
 					lintwarn(_("FUNCTAB is a gawk extension"));
 				}
@@ -282,7 +282,7 @@ uninitialized_scalar:
 			if (t1 == symbol_table) {
 				static bool warned = false;
 
-				if (do_lint && ! warned) {
+				if (do_lint_extensions && ! warned) {
 					warned = true;
 					lintwarn(_("SYMTAB is a gawk extension"));
 				}