From 9a58d4d27c50e04b08d5e5d9f39da489403f0987 Mon Sep 17 00:00:00 2001
From: Eric Botcazou <ebotcazou@adacore.com>
Date: Sun, 8 Feb 2009 23:10:00 +0000
Subject: tree-ssa-loop-ivopts.c (may_be_nonaddressable_p): Make case
 self-contained.

	* tree-ssa-loop-ivopts.c (may_be_nonaddressable_p) <VIEW_CONVERT_EXPR>:
	Make case self-contained.
	<ARRAY_REF>: Test TYPE_NONALIASED_COMPONENT flag.
ada/
	* gcc-interface/decl.c (gnat_to_gnu_entity) <E_String_Literal_Subtype>:
	Set TYPE_NONALIASED_COMPONENT on the array type.

From-SVN: r144021
---
 gcc/ada/gcc-interface/decl.c | 1 +
 1 file changed, 1 insertion(+)

(limited to 'gcc/ada/gcc-interface')

diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c
index 25c4d81..874b1cc 100644
--- a/gcc/ada/gcc-interface/decl.c
+++ b/gcc/ada/gcc-interface/decl.c
@@ -2615,6 +2615,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition)
 	gnu_type
 	  = build_array_type (gnat_to_gnu_type (Component_Type (gnat_entity)),
 			      gnu_index_type);
+	TYPE_NONALIASED_COMPONENT (gnu_type) = 1;
 	copy_alias_set (gnu_type,  gnu_string_type);
       }
       break;
-- 
cgit v1.1