diff options
-rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/ada/errout.ads | 5 |
2 files changed, 6 insertions, 3 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 88ecf6b..55e38dd 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2011-09-19 Robert Dewar <dewar@adacore.com> + + * errout.ads: Minor reformatting. + 2011-09-19 Ed Schonberg <schonberg@adacore.com> * sem_ch6.adb (Analyze_Expression_Function): When the expression diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads index ddf34f7..fd2d616 100644 --- a/gcc/ada/errout.ads +++ b/gcc/ada/errout.ads @@ -261,8 +261,7 @@ package Errout is -- it, since it makes it clear that the continuation is part of an -- unconditional message. - -- Insertion character !! (unconditional warning) - + -- Insertion character !! (Double exclamation: unconditional warning) -- Normally warning messages issued in other than the main unit are -- suppressed. If the message ends with !! then this suppression is -- avoided. This is currently used by the Compile_Time_Warning pragma @@ -452,7 +451,7 @@ package Errout is Error_Msg_Warn : Boolean renames Err_Vars.Error_Msg_Warn; -- Used if current message contains a < insertion character to indicate - -- if the current message is a warning message. + -- if the current message is a warning message. ??? who turns this off??? Error_Msg_String : String renames Err_Vars.Error_Msg_String; Error_Msg_Strlen : Natural renames Err_Vars.Error_Msg_Strlen; |