From: Eric Botcazou <ebotcazou@adacore.com>
Date: Fri, 16 Oct 2009 06:56:34 +0000 (+0000)
Subject: * tree-sra.c (build_ref_for_offset_1): Update comment.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=d7c79c4daa148400da0969fa970a54b80cd87bda;p=gcc.git

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

From-SVN: r152893
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index aed8f325ffb..b51f64818d7 100644
--- 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 3922c22d824..dd3f6807b83 100644
--- 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;