diff options
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/ada/gcc-interface/trans.c | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 7594e9e..c1a0d24 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,10 @@ 2019-02-08 Eric Botcazou <ebotcazou@adacore.com> + * gcc-interface/trans.c (elaborate_all_entities): Do not elaborate the + entities of a package renaming another one. + +2019-02-08 Eric Botcazou <ebotcazou@adacore.com> + * gcc-interface/trans.c (Regular_Loop_to_gnu): Replace tests on individual flag_unswitch_loops and flag_tree_loop_vectorize switches with test on global optimize switch. diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index 3ea7964..71b626b 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -9425,7 +9425,8 @@ elaborate_all_entities (Node_Id gnat_node) elaborate_all_entities (gnat_unit); - if (Ekind (gnat_entity) == E_Package) + if (Ekind (gnat_entity) == E_Package + && No (Renamed_Entity (gnat_entity))) elaborate_all_entities_for_package (gnat_entity); else if (Ekind (gnat_entity) == E_Generic_Package) |