[Ada] Replace repeated calls by references to a local object
commit69558e562c0605e1e13d069c3bdbadedf7d72016
authorPiotr Trojanek <trojanek@adacore.com>
Wed, 3 Feb 2021 08:19:20 +0000 (3 09:19 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Tue, 15 Jun 2021 10:19:19 +0000 (15 06:19 -0400)
tree520849052db7313579b961e134d7866c7f8dea3c
parent5fdd694a74ca51b6f4fa2317c7527a1eaf1e7f57
[Ada] Replace repeated calls by references to a local object

gcc/ada/

* sem_res.adb (Resolve_Actual): Replace repeated calls to
"Etype (F)" with references to "F_Typ", which keeps the results
of exactly that call.
gcc/ada/sem_res.adb