[Ada] Fix assertion failure on (in-)out function parameter
authorYannick Moy <moy@adacore.com>
Wed, 27 May 2020 15:30:23 +0000 (17:30 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 10 Jul 2020 09:16:19 +0000 (05:16 -0400)
commit5f43e7893006c3cc78d196ec1e7579216c177161
treeb5bf9e52179c62cb7189141e49edbe38c082d021
parent8248cf4b7006af19298f0b944c212fe2b4b66bef
[Ada] Fix assertion failure on (in-)out function parameter

gcc/ada/

* sem_res.adb (Resolve_Actuals): Protect call to
Is_Valued_Procedure.
gcc/ada/sem_res.adb