]> git.ipfire.org Git - thirdparty/gcc.git/commit
[Ada] Fix missing error on actual for In/Out parameter
authorEric Botcazou <ebotcazou@adacore.com>
Fri, 14 Jan 2022 21:36:13 +0000 (22:36 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Mon, 9 May 2022 09:27:36 +0000 (09:27 +0000)
commitf920ab029d9a742b5be4a52d5b9be19142c814ce
treea03a36326a53630a7816878d12c225cb907d4ec1
parent00b21aa982e71575f2a403c94e8086eb2a6264d2
[Ada] Fix missing error on actual for In/Out parameter

The compiler was failing to give an error on the result of a call to the
Input attribute passed as actual for an In/Out parameter.

gcc/ada/

* sem_util.adb (Is_OK_Variable_For_Out_Formal): Remove test on
Comes_From_Source in the condition dealing with the expression
of an N_Unchecked_Type_Conversion node.
gcc/ada/sem_util.adb