From c23ec5daacf6b48a2112c3d7b2ea07844fda6eed Mon Sep 17 00:00:00 2001 From: charlet Date: Mon, 13 Jul 2009 12:24:23 +0000 Subject: 2009-07-13 Robert Dewar * prj.ads, prj-dect.adb, prj-err.ads, prj-err.adb, prj-nmsc.adb, prj-strt.ads: Minor reformatting 2009-07-13 Thomas Quinot * exp_dist.adb (Build_From_Any_Call): For the case of a generic type, set the type of the From_Any call to the base type. 2009-07-13 Doug Rupp * symbols-processing-vms-ia64.adb (Process): Add variables and constants to retrieve and check for symbol visibility. 2009-07-13 Javier Miranda * exp_ch4.adb (Expand_N_Unchecked_Type_Conversion): If conversion is to the identical type we remove the conversion completely because it is useless. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149575 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/prj-err.ads | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'gcc/ada/prj-err.ads') diff --git a/gcc/ada/prj-err.ads b/gcc/ada/prj-err.ads index e697e194b7f..d07285ecb2d 100644 --- a/gcc/ada/prj-err.ads +++ b/gcc/ada/prj-err.ads @@ -73,11 +73,10 @@ package Prj.Err is Location : Source_Ptr := No_Location; Project : Project_Id := null); -- Output an error message, either through Flags.Error_Report or through - -- Errutil. The location defaults to the project's location ("project" in - -- the source code). - -- If Msg starts with "?", this is a warning, and Warning: is added at the - -- beginning. If Msg starts with "<", see comment for - -- Err_Vars.Error_Msg_Warn + -- Errutil. The location defaults to the project's location ("project" + -- in the source code). If Msg starts with "?", this is a warning, and + -- Warning: is added at the beginning. If Msg starts with "<", see comment + -- for Err_Vars.Error_Msg_Warn. ------------- -- Scanner -- -- cgit v1.2.1