From: ebotcazou Date: Mon, 6 Jun 2016 09:55:44 +0000 (+0000) Subject: * gcc-interface/trans.c (elaborate_all_entities_for_package): Also do X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=73a52f58a55f31cf3fe883aee73f28c71ea8d124;p=thirdparty%2Fgcc.git * gcc-interface/trans.c (elaborate_all_entities_for_package): Also do not elaborate Itypes. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@237129 138bc75d-0d04-0410-961f-82ee72b054a4 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 92292bea0585..5ffc2486a384 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2016-06-06 Eric Botcazou + + * gcc-interface/trans.c (elaborate_all_entities_for_package): Also do + not elaborate Itypes. + 2016-06-06 Eric Botcazou * gcc-interface/utils.c (gnat_internal_attribute_table): Add support diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index c08be5454ae0..fb17cb2c3812 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -8460,6 +8460,8 @@ elaborate_all_entities_for_package (Entity_Id gnat_package) continue; if (IN (kind, Subprogram_Kind) && Is_Intrinsic_Subprogram (gnat_entity)) continue; + if (Is_Itype (gnat_entity)) + continue; /* Skip named numbers. */ if (IN (kind, Named_Kind))