[Ada] Reuse Is_Formal_Object where convenient
authorPiotr Trojanek <trojanek@adacore.com>
Wed, 6 Jan 2021 11:04:56 +0000 (12:04 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Tue, 4 May 2021 09:17:32 +0000 (05:17 -0400)
commit86a9605014f424c556032c2c1586cbfbc4b72131
tree24632c344b8f3828ec2dfdc60b45ba5d5b8f7c5d
parent2d5e5d89add24b9f987646c83db4639c77132be2
[Ada] Reuse Is_Formal_Object where convenient

gcc/ada/

* exp_prag.adb, sem_prag.adb: Replace low-level Ekind membership
tests with a high-level call to Is_Formal_Object.
gcc/ada/exp_prag.adb
gcc/ada/sem_prag.adb