OSDN Git Service

Fix i960-rtems Ada build failure reported by Joel Sherrill.
authorwilson <wilson@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 2 May 2002 19:27:42 +0000 (19:27 +0000)
committerwilson <wilson@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 2 May 2002 19:27:42 +0000 (19:27 +0000)
* utils.c (finish_record_type): Change record_size to record_type.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@53058 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ada/ChangeLog
gcc/ada/utils.c

index 5a53e6d..90a8859 100644 (file)
@@ -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.
index 70e2dc7..292efd3 100644 (file)
@@ -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));