From: Arnaud Charlet Date: Fri, 14 Nov 2003 11:49:34 +0000 (+0100) Subject: * nmake.ads, nmake.adb: Regenerated. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=95a6aaf9c876cb9680c5df1d87dd92991ef74ac6;p=gcc.git * nmake.ads, nmake.adb: Regenerated. From-SVN: r73600 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index ffad8f3a2bd..900f8751b0b 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2003-11-14 Arnaud Charlet + + * nmake.ads, nmake.adb: Regenerated. + 2003-11-13 Vincent Celier * 5bml-tgt.adb (Build_Dynamic_Library): Use diff --git a/gcc/ada/nmake.adb b/gcc/ada/nmake.adb index 9b199faa0d0..a873763de68 100644 --- a/gcc/ada/nmake.adb +++ b/gcc/ada/nmake.adb @@ -692,7 +692,8 @@ package body Nmake is 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 := @@ -700,6 +701,7 @@ package body Nmake is begin Set_Choices (N, Choices); Set_Expression (N, Expression); + Set_Box_Present (N, Box_Present); return N; end Make_Component_Association; diff --git a/gcc/ada/nmake.ads b/gcc/ada/nmake.ads index be05e7940b3..c8746ecdad7 100644 --- a/gcc/ada/nmake.ads +++ b/gcc/ada/nmake.ads @@ -371,7 +371,8 @@ package Nmake is 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);