[Ada] Reuse collective subtype for comparison operators where possible
authorPiotr Trojanek <trojanek@adacore.com>
Wed, 16 Feb 2022 09:00:02 +0000 (10:00 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 12 May 2022 12:38:41 +0000 (12:38 +0000)
commite28064111c3c42e7b75c79c941c9fc339901f0dd
tree59148f94c64666c6b4fad097312570faf09c367e
parent0c1ec8ae18b57131f62c31e0144dd0d8aa3a92eb
[Ada] Reuse collective subtype for comparison operators where possible

Replace membership alternatives with N_Op_Compare. Code cleanup;
semantics is unaffected.

gcc/ada/

* sem_res.adb (Resolve_Actuals): Simplify with N_Op_Compare.
* sem_util.adb (Replace_Null_Operand,
Null_To_Null_Address_Convert_OK): Likewise.
gcc/ada/sem_res.adb
gcc/ada/sem_util.adb