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 5a53e6dd8189d2586fb3131b57a38c4db78bb870..90a8859626cd4170dff309a940197ed79ae93736 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 70e2dc7f7cb39f5d5f23035d6ab745a8a9f0a097..292efd33650c9549186edc3cf472d7e2659b3c0d 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));