* tree-sra.c (build_ref_for_offset_1): Update comment.

From-SVN: r152893

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index aed8f325ffbb9f547d2481ac52a6ae8cd424759a..b51f64818d7a99c40676fdbc852ced4372f5da72 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2009-10-16  Eric Botcazou  <ebotcazou@adacore.com>
+
+       * tree-sra.c (build_ref_for_offset_1): Update comment.
+
 2009-10-16  Wolfgang Gellerich  <gellerich@de.ibm.com>
 
        * config/s390/s390.md (atype): Added missing values.

diff --git a/gcc/tree-sra.c b/gcc/tree-sra.c
index 3922c22d824b8bb2a7899d7788a81c4413f4a1f3..dd3f6807b83abf6dfeeee24a5bae1d287f579ffd 100644 (file)
--- a/gcc/tree-sra.c
+++ b/gcc/tree-sra.c
@@ -1231,7 +1231,8 @@ build_ref_for_offset_1 (tree *res, tree type, HOST_WIDE_INT offset,
        case UNION_TYPE:
        case QUAL_UNION_TYPE:
        case RECORD_TYPE:
-         /* Some ADA records are half-unions, treat all of them the same.  */
+         /* ??? Some records used to be half-unions in Ada so the code treats
+            the 3 container types the same.  This has been fixed in Ada.  */
          for (fld = TYPE_FIELDS (type); fld; fld = TREE_CHAIN (fld))
            {
              HOST_WIDE_INT pos, size;