diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-20 13:15:11 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-20 13:15:11 +0000 |
commit | 9abcce8948cd44b2c72ac918e571fc784b0f457e (patch) | |
tree | 76bfd7d4b74cc7542dee8954841ef74e9ec33533 /gcc/ada/sem_ch13.adb | |
parent | ac4b41a417ecc6f542d3b2bc10333f5a4c892a1a (diff) | |
download | gcc-9abcce8948cd44b2c72ac918e571fc784b0f457e.tar.gz |
2008-08-20 Robert Dewar <dewar@adacore.com>
* 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
Diffstat (limited to 'gcc/ada/sem_ch13.adb')
-rw-r--r-- | gcc/ada/sem_ch13.adb | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb index fe5305fa40f..a0154d25da2 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; |