From 31593d262714fa16ce955bf9068d88c869233616 Mon Sep 17 00:00:00 2001 From: Piotr Trojanek Date: Mon, 29 Nov 2021 15:08:02 +0100 Subject: [PATCH] [Ada] Remove explicit "in" in internal parameter association gcc/ada/ * exp_attr.adb (Build_Array_VS_Func): Remove explicit "IN" in spec of the generated array validation function; it was redundant, just like it would be in a user-written code. --- gcc/ada/exp_attr.adb | 2 -- 1 file changed, 2 deletions(-) diff --git a/gcc/ada/exp_attr.adb b/gcc/ada/exp_attr.adb index 33ac8bde6355..c040051fd611 100644 --- a/gcc/ada/exp_attr.adb +++ b/gcc/ada/exp_attr.adb @@ -404,8 +404,6 @@ package body Exp_Attr is Parameter_Specifications => New_List ( Make_Parameter_Specification (Loc, Defining_Identifier => Obj_Id, - In_Present => True, - Out_Present => False, Parameter_Type => New_Occurrence_Of (Formal_Typ, Loc))), Result_Definition => New_Occurrence_Of (Standard_Boolean, Loc)), -- 2.47.2