diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-10-14 13:51:45 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-10-14 13:51:45 +0000 |
| commit | b429233f50ae2d6790d4058950df913ed577d68b (patch) | |
| tree | 1e0f6f1b4814386ec9abd973594d83471f7f95f3 /gcc/ada/erroutc.ads | |
| parent | febc4e2e5a10d689fc81f7a18450a11cb550c48c (diff) | |
| download | gcc-b429233f50ae2d6790d4058950df913ed577d68b.tar.gz | |
2013-10-14 Robert Dewar <dewar@adacore.com>
* sem_res.adb: Minor fix to error message text.
* errout.ads, erroutc.ads: Minor reformatting.
* s-ststop.ads, s-stratt.ads: Clean up documentation of block IO
mode for streams.
* s-stratt-xdr.adb: Minor comment update.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@203559 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/erroutc.ads')
| -rw-r--r-- | gcc/ada/erroutc.ads | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/erroutc.ads b/gcc/ada/erroutc.ads index 02101852d44..647e58bafdd 100644 --- a/gcc/ada/erroutc.ads +++ b/gcc/ada/erroutc.ads @@ -427,7 +427,8 @@ package Erroutc is -- Handle reserved word insertion (upper case letters). The Text argument -- is the current error message input text, and J is an index which on -- entry points to the first character of the reserved word, and on exit - -- points past the last character of the reserved word. + -- points past the last character of the reserved word. Note that RM and + -- SPARK are treated specially and not considered to be keywords. procedure Set_Msg_Insertion_Run_Time_Name; -- If package System contains a definition for Run_Time_Name (see package |