re PR tree-optimization/40233 (Test failures with "alignment of array elements…

re PR tree-optimization/40233 (Test failures with "alignment of array elements is greater than element size")

2009-05-24  Richard Guenther  <rguenther@suse.de>

	PR middle-end/40233
	* tree.c (make_vector_type): Build the TYPE_DEBUG_REPRESENTATION_TYPEs
	array type from the main variant of the inner type.

	* gcc.c-torture/compile/pr40233.c: New testcase.

From-SVN: r147835

gcc/ChangeLog

+2009-05-24  Richard Guenther  <rguenther@suse.de>
+
+	PR middle-end/40233
+	* tree.c (make_vector_type): Build the TYPE_DEBUG_REPRESENTATION_TYPEs
+	array type from the main variant of the inner type.
+
 2009-05-24  Jan-Benedict Glaw  <jbglaw@lug-owl.de>
 
 	* config/vax/vax-protos.h (legitimate_constant_address_p): Change

gcc/testsuite/ChangeLog

+2009-05-24  Richard Guenther  <rguenther@suse.de>
+
+	PR middle-end/40233
+	* gcc.c-torture/compile/pr40233.c: New testcase.
+
 2009-05-24  Uros Bizjak  <ubizjak@gmail.com>
 
 	* gfortran.dg/erf_2.F90 (dg-options): Add -mieee

gcc/testsuite/gcc.c-torture/compile/pr40233.c

+typedef int aligned __attribute__((aligned(64)));
+struct Frame {
+  aligned i;
+};
+
+void foo(struct Frame *p)
+{
+  aligned *q = &p->i;
+  *q = 0;
+}

gcc/tree.c

@@ -7446,7 +7446,8 @@ make_vector_type (tree innertype, int nunits, enum machine_mode mode)
 
   {
     tree index = build_int_cst (NULL_TREE, nunits - 1);
-    tree array = build_array_type (innertype, build_index_type (index));
+    tree array = build_array_type (TYPE_MAIN_VARIANT (innertype),
+				   build_index_type (index));
     tree rt = make_node (RECORD_TYPE);
 
     TYPE_FIELDS (rt) = build_decl (FIELD_DECL, get_identifier ("f"), array);