Fix i960-rtems Ada build failure reported by Joel Sherrill.

	* utils.c (finish_record_type): Change record_size to record_type.

From-SVN: r53058

gcc/ada/ChangeLog

+2002-05-02  Jim Wilson  <wilson@redhat.com>
+
+	* utils.c (finish_record_type): Change record_size to record_type.
+
 2001-05-02  John David Anglin  <dave@hiauly1.hia.nrc.ca>
 
 	* ada/Makefile.in (X_ADA_CFLAGS, T_ADA_CFLAGS): New fragment overrides.

gcc/ada/utils.c

@@ -853,7 +853,7 @@ finish_record_type (record_type, fieldlist, has_rep, defer_debug)
 
 #ifdef ROUND_TYPE_SIZE
   size = ROUND_TYPE_SIZE (record_type, size, TYPE_ALIGN (record_type));
-  size_unit = ROUND_TYPE_SIZE_UNIT (record_size, size_unit,
+  size_unit = ROUND_TYPE_SIZE_UNIT (record_type, size_unit,
 				    TYPE_ALIGN (record_type) / BITS_PER_UNIT);
 #else
   size = round_up (size, TYPE_ALIGN (record_type));