[Ada] Unnesting: avoid unnecessary loads of System
commitbcd6b924d91e958d66c46adcbb79ecc62ade6390
authorpmderodat <pmderodat@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 9 Oct 2018 15:05:29 +0000 (9 15:05 +0000)
committerpmderodat <pmderodat@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 9 Oct 2018 15:05:29 +0000 (9 15:05 +0000)
tree3d49d245b0a425b412cf9bcec11d0e8041a3e26c
parentcb3f6e9f97124328704e1c081e1ffb74c7b46745
[Ada] Unnesting: avoid unnecessary loads of System

2018-10-09  Ed Schonberg  <schonberg@adacore.com>

gcc/ada/

* exp_unst.adb (Unnest_Subprogram): Do not load System to obtain
the Address entity unless an activation record is being built.
Removes useless with_clauses for System when nested subprograms
do not have uplevel references, and therefore do not need
activation records.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@264967 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/ChangeLog
gcc/ada/exp_unst.adb