From c5d91669f305eb83adb2ef982b05ee19a15fbf47 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Fri, 17 Apr 2009 15:31:42 +0200 Subject: [multiple changes] 2009-04-17 Robert Dewar * exp_disp.adb: Minor reformatting Minor code reorganization (use Nkind_In) * prepcomp.adb: Minor reformatting * sem_ch3.adb: Minor reformatting * sem_res.adb: Minor comment addition * exp_ch5.adb (Expand_Assign_Array): Use Has_Address_Clause to test for address clause * lib-xref.adb (Generate_Reference): Exclude recursive calls from setting Is_Referenced * types.ads: Minor reformatting 2009-04-17 Arnaud Charlet * gnat_ugn.texi: Initial documentation on binding generator. From-SVN: r146266 --- gcc/ada/prepcomp.adb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'gcc/ada/prepcomp.adb') diff --git a/gcc/ada/prepcomp.adb b/gcc/ada/prepcomp.adb index 63d64e7..18c2686 100644 --- a/gcc/ada/prepcomp.adb +++ b/gcc/ada/prepcomp.adb @@ -47,9 +47,9 @@ package body Prepcomp is -- The following variable should be a constant, but this is not possible -- because its type GNAT.Dynamic_Tables.Instance has a component P of - -- unitialized private type GNAT.Dynamic_Tables.Table_Private and there are - -- no exported values for this private type. - -- Warnings are Off because it is never assigned a value. + -- unitialized private type GNAT.Dynamic_Tables.Table_Private and there + -- are no exported values for this private type. Warnings are Off because + -- it is never assigned a value. pragma Warnings (Off); No_Mapping : Prep.Symbol_Table.Instance; -- cgit v1.1