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

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

From-SVN: r53058

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 5a53e6d..90a8859 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+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.

diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c
index 70e2dc7..292efd3 100644 (file)
--- a/gcc/ada/utils.c
+++ b/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));