[Ada] Rewrite Sem_Ch4.Find_Boolean_Types
commita4f6f9f1769ab691d28da4579c61c13d5d1c2bda
authorEric Botcazou <ebotcazou@adacore.com>
Fri, 4 Feb 2022 17:53:43 +0000 (4 18:53 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 12 May 2022 12:38:35 +0000 (12 12:38 +0000)
tree141e85db0e06555dfe68415798390906b6a7e8ef
parentd4fc83c642213b4362533ef548c8fffe208ea59a
[Ada] Rewrite Sem_Ch4.Find_Boolean_Types

Using a straight implementation like the one in Find_Arithmetic_Types.

gcc/ada/

* sem_ch4.adb (Find_Arithmetic_Types): Use local variables.
(Find_Boolean_Types): Rewrite modeled on Find_Arithmetic_Types.
gcc/ada/sem_ch4.adb