diff options
| author | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-02-08 23:10:00 +0000 |
|---|---|---|
| committer | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-02-08 23:10:00 +0000 |
| commit | 34e9b3c70d0cdc0b9ef1344a49110ebf4337aed5 (patch) | |
| tree | 6a2ee53b314ca031061181f3fc11e2218d380be3 /gcc/ada/gcc-interface/decl.c | |
| parent | 3f8217c21938bc1d867bd2a0c4dbb41e836aaf70 (diff) | |
| download | ppe42-gcc-34e9b3c70d0cdc0b9ef1344a49110ebf4337aed5.tar.gz ppe42-gcc-34e9b3c70d0cdc0b9ef1344a49110ebf4337aed5.zip | |
* 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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@144021 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gcc-interface/decl.c')
| -rw-r--r-- | gcc/ada/gcc-interface/decl.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index 25c4d816b43..874b1ccb035 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; |
