From: charlet Date: Wed, 20 Aug 2008 13:15:11 +0000 (+0000) Subject: 2008-08-20 Robert Dewar X-Git-Tag: upstream/4.9.2~40284 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=9abcce8948cd44b2c72ac918e571fc784b0f457e;p=platform%2Fupstream%2Flinaro-gcc.git 2008-08-20 Robert Dewar * freeze.adb (Freeze_Record_Type): Improve msg for non-contiguous field * sem_ch13.adb: (Adjust_Record_For_Reverse_Bit_Order): Messages about layout are now labeled as info msgs, not warnings. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@139287 138bc75d-0d04-0410-961f-82ee72b054a4 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 4d5aae9..d23dc16 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,43 @@ 2008-08-20 Robert Dewar + * freeze.adb (Freeze_Record_Type): Improve msg for non-contiguous field + + * sem_ch13.adb: + (Adjust_Record_For_Reverse_Bit_Order): Messages about layout are + now labeled as info msgs, not warnings. + + * tbuild.ads: Clarify documentation of Make_Implicit_Exception_Handler + + * usage.adb: Minor change to avoid overlong line for -gnatwz/Z + + * a-textio.adb: Remove redundant test. + + * a-witeio.adb: Minor code reorganization + Remove redundant test found working on another issue + + * a-ztexio.adb: Minor code reorganization + Remove redundant test found working on another issue + +2008-08-20 Thomas Quinot + + * s-fileio.adb (Open) Use C helper function to determine whether a + given errno value corresponds to a "file not found" error. + + * sysdep.c (__gnat_is_file_not_found_error): New C helper function. + +2008-08-20 Jose Ruiz + + * errno.c (__get_errno for MaRTE): Use the MaRTE function pthread_errno + to get access to the per-task errno variable. + (__set_errno for MaRTE): Do not redefine this function here since it is + already defined in MaRTE. + +2008-08-20 Tristan Gingold + + * gnat_ugn.texi: Gcov is not supported on static library on AIX. + +2008-08-20 Robert Dewar + * freeze.adb: Minor reformatting * g-comlin.adb: Minor reformatting diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb index c533449..dee40df 100644 --- a/gcc/ada/freeze.adb +++ b/gcc/ada/freeze.adb @@ -1795,18 +1795,21 @@ package body Freeze is & "(component is little-endian)?", CLC); end if; - -- Do not allow non-contiguous field + -- Do not allow non-contiguous field else Error_Msg_N - ("attempt to specify non-contiguous field" - & " not permitted", CLC); + ("attempt to specify non-contiguous field " + & "not permitted", CLC); Error_Msg_N - ("\(caused by non-standard Bit_Order " - & "specified)", CLC); + ("\caused by non-standard Bit_Order " + & "specified", CLC); + Error_Msg_N + ("\consider possibility of using " + & "Ada 2005 mode here", CLC); end if; - -- Case where field fits in one storage unit + -- Case where field fits in one storage unit else -- Give warning if suspicious component clause diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb index fe5305f..a0154d2 100644 --- a/gcc/ada/sem_ch13.adb +++ b/gcc/ada/sem_ch13.adb @@ -433,18 +433,20 @@ package body Sem_Ch13 is if Warn_On_Reverse_Bit_Order then Error_Msg_Uint_1 := MSS; Error_Msg_N - ("?reverse bit order in machine " & - "scalar of length^", First_Bit (CC)); + ("info: reverse bit order in machine " & + "scalar of length^?", First_Bit (CC)); Error_Msg_Uint_1 := NFB; Error_Msg_Uint_2 := NLB; if Bytes_Big_Endian then Error_Msg_NE - ("?\big-endian range for component & is ^ .. ^", + ("?\info: big-endian range for " + & "component & is ^ .. ^", First_Bit (CC), Comp); else Error_Msg_NE - ("?\little-endian range for component & is ^ .. ^", + ("?\info: little-endian range " + & "for component & is ^ .. ^", First_Bit (CC), Comp); end if; end if;