expr.c (compare_records): Delete maximum_field_alignment declaration.

	* expr.c (compare_records): Delete maximum_field_alignment declaration.
	* inout.c (inout_init): Likewise.
	(build_chill_gettextaccess): Likewise.
	(build_enum_tables): Likewise.
	* lang.c: Likewise.
	* satisfy.c (satisfy): Likewise.
	* tasking.c (build_tasking_struct): Likewise.
	(build_tasking_message_type): Likewise.
	* typeck.c (build_init_struct): Likewise.

	* except.c (emit_setup_handler): Make save_maximum_field_alignment
	unsigned int to match maximum_field_alignment.
	* inout.c (inout_init): Likewise.
	(build_chill_gettextaccess): Likewise.
	(build_enum_tables): Likewise.
	* tasking.c (build_tasking_struct): Likewise.
	(build_tasking_message_type): Likewise.
	* typeck.c (build_init_struct): Likewise.

From-SVN: r31920

gcc/ch/ChangeLog

+2000-02-11  Franz Sirl  <Franz.Sirl-kernel@lauterbach.com>
+
+	* expr.c (compare_records): Delete maximum_field_alignment declaration.
+	* inout.c (inout_init): Likewise.
+	(build_chill_gettextaccess): Likewise.
+	(build_enum_tables): Likewise.
+	* lang.c: Likewise.
+	* satisfy.c (satisfy): Likewise.
+	* tasking.c (build_tasking_struct): Likewise.
+	(build_tasking_message_type): Likewise.
+	* typeck.c (build_init_struct): Likewise.
+
+	* except.c (emit_setup_handler): Make save_maximum_field_alignment
+	unsigned int to match maximum_field_alignment.
+	* inout.c (inout_init): Likewise.
+	(build_chill_gettextaccess): Likewise.
+	(build_enum_tables): Likewise.
+	* tasking.c (build_tasking_struct): Likewise.
+	(build_tasking_message_type): Likewise.
+	* typeck.c (build_init_struct): Likewise.
+
 2000-02-10  Franz Sirl  <Franz.Sirl-kernel@lauterbach.com>
 
 	* except.c (maximum_field_alignment): Remove duplicate declaration.

gcc/ch/except.c

@@ -396,7 +396,7 @@ emit_setup_handler ()
       /* We temporarily reset the maximum_field_alignment to zero so the
 	 compiler's exception data structures can be compatible with the
 	 run-time system, even when we're compiling with -fpack. */
-      int save_maximum_field_alignment = maximum_field_alignment;
+      unsigned int save_maximum_field_alignment = maximum_field_alignment;
       maximum_field_alignment = 0;
       push_obstacks_nochange ();
       end_temporary_allocation ();

gcc/ch/expr.c

@@ -3469,7 +3469,6 @@ compare_records (exp0, exp1)
   int have_variants = 0;
 
   tree result = boolean_true_node;
-  extern int maximum_field_alignment;
 
   if (TREE_CODE (type) != RECORD_TYPE)
     abort ();

gcc/ch/inout.c

@@ -1088,8 +1088,7 @@ inout_init ()
   /* We temporarily reset the maximum_field_alignment to zero so the
      compiler's init data structures can be compatible with the
      run-time system, even when we're compiling with -fpack. */
-  extern int maximum_field_alignment;
-  int save_maximum_field_alignment = maximum_field_alignment;
+  unsigned int save_maximum_field_alignment = maximum_field_alignment;
 
   extern tree chill_predefined_function_type;
   tree endlink = void_list_node;
@@ -2821,8 +2820,7 @@ build_chill_gettextaccess (text)
   tree access, refaccess, acc, decl, listbase;
   tree tlocmode, indexmode, dynamic;
   tree result;
-  extern int maximum_field_alignment;
-  int save_maximum_field_alignment = maximum_field_alignment;
+  unsigned int save_maximum_field_alignment = maximum_field_alignment;
 
   if (! check_text (text, 1, "GETTEXTACCESS"))
     return error_mark_node;
@@ -4590,8 +4588,7 @@ void build_enum_tables ()
   /* We temporarily reset the maximum_field_alignment to zero so the
      compiler's init data structures can be compatible with the
      run-time system, even when we're compiling with -fpack. */
-  extern int maximum_field_alignment;
-  int save_maximum_field_alignment;
+  unsigned int save_maximum_field_alignment;
     
   if (pass == 1)
     return;

gcc/ch/lang.c

@@ -50,8 +50,6 @@ int special_UC = 0;
 char* chill_real_input_filename;
 extern FILE* finput;
 
-extern int maximum_field_alignment;
-
 static int deep_const_expr			PARAMS ((tree));
 static void chill_print_error_function		PARAMS ((const char *));
 

gcc/ch/satisfy.c

@@ -533,8 +533,7 @@ satisfy (exp, chain)
 	    /* if we have an ACCESS or TEXT mode we have to set
 	       maximum_field_alignment to 0 to fit with runtime
 	       system, even when we compile with -fpack. */
-	    extern int maximum_field_alignment;
-	    int save_maximum_field_alignment = maximum_field_alignment;
+	    unsigned int save_maximum_field_alignment = maximum_field_alignment;
 
 	    if (CH_IS_ACCESS_MODE (exp) || CH_IS_TEXT_MODE (exp))
 	      maximum_field_alignment = 0;

gcc/ch/tasking.c

@@ -763,8 +763,7 @@ build_tasking_struct ()
   /* We temporarily reset the maximum_field_alignment to zero so the
      compiler's init data structures can be compatible with the
      run-time system, even when we're compiling with -fpack. */
-  extern int maximum_field_alignment;
-  int save_maximum_field_alignment = maximum_field_alignment;
+  unsigned int save_maximum_field_alignment = maximum_field_alignment;
   maximum_field_alignment = 0;
 
   decl1 = build_decl (FIELD_DECL, get_identifier ("TaskName"),
@@ -1239,8 +1238,7 @@ build_tasking_message_type ()
   tree temp;
   /* We temporarily reset maximum_field_alignment to deal with
      the runtime system. */
-  extern int maximum_field_alignment;
-  int save_maximum_field_alignment = maximum_field_alignment;
+  unsigned int save_maximum_field_alignment = maximum_field_alignment;
   tree field1, field2, field3;
 
   maximum_field_alignment = 0;

gcc/ch/typeck.c

@@ -2168,8 +2168,7 @@ build_init_struct ()
   /* We temporarily reset the maximum_field_alignment to zero so the
      compiler's init data structures can be compatible with the
      run-time system, even when we're compiling with -fpack. */
-  extern int maximum_field_alignment;
-  int save_maximum_field_alignment = maximum_field_alignment;
+  unsigned int save_maximum_field_alignment = maximum_field_alignment;
   maximum_field_alignment = 0;
 
   decl1 = build_decl (FIELD_DECL, get_identifier ("__INIT_ENTRY"),