c-parse.in (SAVE_WARN_FLAGS): Save warn_traditional.

        * c-parse.in (SAVE_WARN_FLAGS): Save warn_traditional.
        (RESTORE_WARN_FLAGS): Restore it.
        (extension): Zero warn_traditional.

From-SVN: r48247

gcc/ChangeLog

+2001-12-21  Richard Henderson  <rth@redhat.com>
+
+	* c-parse.in (SAVE_WARN_FLAGS): Save warn_traditional.
+	(RESTORE_WARN_FLAGS): Restore it.
+	(extension): Zero warn_traditional.
+
 2001-12-21  Kazu Hirata  <kazu@hxi.com>
 
 	* doc/passes.texi: Fix a typo.

gcc/c-parse.in

@@ -261,13 +261,17 @@ static tree declspec_stack;
 
 /* For __extension__, save/restore the warning flags which are
    controlled by __extension__.  */
-#define SAVE_WARN_FLAGS()	\
-	size_int (pedantic | (warn_pointer_arith << 1))
-#define RESTORE_WARN_FLAGS(tval) \
-  do {                                     \
-    int val = tree_low_cst (tval, 0);      \
-    pedantic = val & 1;                    \
-    warn_pointer_arith = (val >> 1) & 1;   \
+#define SAVE_WARN_FLAGS()			\
+	size_int (pedantic			\
+		  | (warn_pointer_arith << 1)	\
+		  | (warn_traditional << 2))
+
+#define RESTORE_WARN_FLAGS(tval)		\
+  do {						\
+    int val = tree_low_cst (tval, 0);		\
+    pedantic = val & 1;				\
+    warn_pointer_arith = (val >> 1) & 1;	\
+    warn_traditional = (val >> 2) & 1;		\
   } while (0)
 
 ifobjc
@@ -2620,7 +2624,8 @@ extension:
 	EXTENSION
 		{ $$ = SAVE_WARN_FLAGS();
 		  pedantic = 0;
-		  warn_pointer_arith = 0; }
+		  warn_pointer_arith = 0;
+		  warn_traditional = 0; }
 	;
 
 ifobjc