aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/gcc-interface/decl.c
diff options
context:
space:
mode:
authorEric Botcazou <ebotcazou@adacore.com>2013-08-13 19:58:24 +0000
committerEric Botcazou <ebotcazou@gcc.gnu.org>2013-08-13 19:58:24 +0000
commit5ff3a1f733a09412023e5d8d7c9d79d988d9b310 (patch)
treece70a305ab8ebb800bd44e189a1a93f79c9a5e22 /gcc/ada/gcc-interface/decl.c
parent78df6221f9530b27251f81a3ec7c8052c92fb059 (diff)
downloadgcc-5ff3a1f733a09412023e5d8d7c9d79d988d9b310.zip
gcc-5ff3a1f733a09412023e5d8d7c9d79d988d9b310.tar.gz
gcc-5ff3a1f733a09412023e5d8d7c9d79d988d9b310.tar.bz2
decl.c (gnat_to_gnu_entity): Do not bother about alias sets of derived types in ASIS mode.
* gcc-interface/decl.c (gnat_to_gnu_entity): Do not bother about alias sets of derived types in ASIS mode. From-SVN: r201705
Diffstat (limited to 'gcc/ada/gcc-interface/decl.c')
-rw-r--r--gcc/ada/gcc-interface/decl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c
index 551ab44..26342e2 100644
--- a/gcc/ada/gcc-interface/decl.c
+++ b/gcc/ada/gcc-interface/decl.c
@@ -5153,7 +5153,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition)
to conflict with Comp2 and an alias set copy is required.
The language rules ensure the parent type is already frozen here. */
- if (Is_Derived_Type (gnat_entity))
+ if (Is_Derived_Type (gnat_entity) && !type_annotate_only)
{
tree gnu_parent_type = gnat_to_gnu_type (Etype (gnat_entity));
relate_alias_sets (gnu_type, gnu_parent_type,