From: Eric Botcazou Date: Tue, 13 Aug 2013 19:58:24 +0000 (+0000) Subject: decl.c (gnat_to_gnu_entity): Do not bother about alias sets of derived types in ASIS... X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=5ff3a1f733a09412023e5d8d7c9d79d988d9b310;p=gcc.git 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 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 17774187dc8..840dadf1937 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2013-08-13 Eric Botcazou + + * gcc-interface/decl.c (gnat_to_gnu_entity): Do not bother about alias + sets of derived types in ASIS mode. + 2013-08-13 Eric Botcazou * gcc-interface/decl.c (gnat_to_gnu_entity): Replace True with true. diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index 551ab4454b1..26342e2a012 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,