diff src/parse.y @ 4452:f3c21a1d1c62

[project @ 2003-07-09 23:20:18 by jwe]
author jwe
date Wed, 09 Jul 2003 23:20:19 +0000
parents 51a0dcde8778
children 322453495d75
line wrap: on
line diff
--- a/src/parse.y	Wed Jul 09 19:09:09 2003 +0000
+++ b/src/parse.y	Wed Jul 09 23:20:19 2003 +0000
@@ -1734,9 +1734,13 @@
   unwind_protect::begin_frame ("fold_binary_expression");
 
   unwind_protect_int (error_state);
+  unwind_protect_int (warning_state);
 
   unwind_protect_bool (discard_error_messages);
+  unwind_protect_bool (discard_warning_messages);
+
   discard_error_messages = true;
+  discard_warning_messages = true;
 
   tree_expression *op1 = e->lhs ();
   tree_expression *op2 = e->rhs ();
@@ -1780,9 +1784,13 @@
   unwind_protect::begin_frame ("fold_unary_expression");
 
   unwind_protect_int (error_state);
+  unwind_protect_int (warning_state);
 
   unwind_protect_bool (discard_error_messages);
+  unwind_protect_bool (discard_warning_messages);
+
   discard_error_messages = true;
+  discard_warning_messages = true;
 
   tree_expression *op = e->operand ();
 
@@ -1827,9 +1835,13 @@
   unwind_protect::begin_frame ("finish_colon_expression");
 
   unwind_protect_int (error_state);
+  unwind_protect_int (warning_state);
 
   unwind_protect_bool (discard_error_messages);
+  unwind_protect_bool (discard_warning_messages);
+
   discard_error_messages = true;
+  discard_warning_messages = true;
 
   tree_expression *base = e->base ();
   tree_expression *limit = e->limit ();
@@ -2803,9 +2815,13 @@
   unwind_protect::begin_frame ("finish_matrix");
 
   unwind_protect_int (error_state);
+  unwind_protect_int (warning_state);
 
   unwind_protect_bool (discard_error_messages);
+  unwind_protect_bool (discard_warning_messages);
+
   discard_error_messages = true;
+  discard_warning_messages = true;
 
   if (m->all_elements_are_constant ())
     {