From: ebotcazou Date: Tue, 13 Aug 2013 19:58:24 +0000 (+0000) Subject: * gcc-interface/decl.c (gnat_to_gnu_entity): Do not bother about alias X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=10037e0c38107125b7260eee06aaea376e470259;p=thirdparty%2Fgcc.git * gcc-interface/decl.c (gnat_to_gnu_entity): Do not bother about alias sets of derived types in ASIS mode. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@201705 138bc75d-0d04-0410-961f-82ee72b054a4 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 17774187dc89..840dadf19376 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 551ab4454b11..26342e2a012a 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,