]> git.ipfire.org Git - thirdparty/gcc.git/commit
[Ada] Simplify iteration over record components
authorPiotr Trojanek <trojanek@adacore.com>
Mon, 22 Nov 2021 11:53:15 +0000 (12:53 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 2 Dec 2021 16:26:22 +0000 (16:26 +0000)
commitea7f9e0530251152b5e6a99f36515032f318c4d1
tree136880688f957a4c2ca257f802f7d5b4b4ff6230
parent1fde9333dc31007083ac792896820ca29837c342
[Ada] Simplify iteration over record components

gcc/ada/

* freeze.adb (Freeze_Entity): Replace First_Entity/Next_Entity
with First_Component/Next_Component; remove condition with Ekind
equal to E_Component.
* sem_ch13.adb (Check_Record_Representation_Clause): Likewise
for component-or-discriminant.
* sem_util.adb (Is_Fully_Initialized_Type): Likewise; rename Ent
to a more specific Comp.
* sem_warn.adb (Check_References): Likewise.
gcc/ada/freeze.adb
gcc/ada/sem_ch13.adb
gcc/ada/sem_util.adb
gcc/ada/sem_warn.adb