[Ada] Avoid repeated computing of type of expression functions
authorPiotr Trojanek <trojanek@adacore.com>
Fri, 28 May 2021 13:01:18 +0000 (15:01 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 9 Jul 2021 12:35:25 +0000 (12:35 +0000)
commit640ba4c1a33cb7e4ad854985f7d95882f8ed2260
treedf309e7b1eadb704fdae908e5021d26cdf475609
parente437dd45e78c810b4ebf6bab1e5f3751a59338e3
[Ada] Avoid repeated computing of type of expression functions

gcc/ada/

* sem_ch6.adb (Analyze_Expression_Function): Add variable to
avoid repeated calls to Etype.
gcc/ada/sem_ch6.adb