ada: Cannot requeue to a procedure implemented by an entry
commit8f987210930e53e6f729d0a84a5fe682aeb74b19
authorJavier Miranda <miranda@adacore.com>
Fri, 8 Dec 2023 18:27:18 +0000 (8 18:27 +0000)
committerMarc Poulhiès <poulhies@adacore.com>
Tue, 9 Jan 2024 13:13:31 +0000 (9 14:13 +0100)
treef29ca7ca94b5b0cadc23b9c53d4796acbff4a8b0
parentda75ce88bde06bfcef2d454054f43ed430d96b00
ada: Cannot requeue to a procedure implemented by an entry

Add missing support for RM 9.5.4(5.6/4): the target of a requeue
statement may be a procedure when its name denotes a renaming of
an entry.

gcc/ada/

* sem_ch6.adb (Analyze_Subprogram_Specification): Do not replace
the type of the formals with its corresponding record in
init-procs.
* sem_ch9.adb (Analyze_Requeue): Add missing support to requeue to
a procedure that denotes a renaming of an entry.
gcc/ada/sem_ch6.adb
gcc/ada/sem_ch9.adb