+2003-11-14 Arnaud Charlet <charlet@act-europe.fr>
+
+ * nmake.ads, nmake.adb: Regenerated.
+
2003-11-13 Vincent Celier <celier@gnat.com>
* 5bml-tgt.adb (Build_Dynamic_Library): Use
function Make_Component_Association (Sloc : Source_Ptr;
Choices : List_Id;
- Expression : Node_Id)
+ Expression : Node_Id;
+ Box_Present : Boolean := False)
return Node_Id
is
N : constant Node_Id :=
begin
Set_Choices (N, Choices);
Set_Expression (N, Expression);
+ Set_Box_Present (N, Box_Present);
return N;
end Make_Component_Association;
function Make_Component_Association (Sloc : Source_Ptr;
Choices : List_Id;
- Expression : Node_Id)
+ Expression : Node_Id;
+ Box_Present : Boolean := False)
return Node_Id;
pragma Inline (Make_Component_Association);