diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-01-06 10:39:03 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-01-06 10:39:03 +0100 |
| commit | 7665df2248b579883409aa636b08c99325c9810e (patch) | |
| tree | 9e942cc5ad4d2bb39a57b6119969c0e5b5f0bf2f /gcc | |
| parent | 4199e8c6fbc5ac6de95d50181c0b6083d0b6f0ad (diff) | |
| download | gcc-7665df2248b579883409aa636b08c99325c9810e.zip gcc-7665df2248b579883409aa636b08c99325c9810e.tar.gz gcc-7665df2248b579883409aa636b08c99325c9810e.tar.bz2 | |
Minor reformatting.
From-SVN: r219237
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/a-stwiun-shared.ads | 2 | ||||
| -rw-r--r-- | gcc/ada/a-stzunb-shared.ads | 2 | ||||
| -rw-r--r-- | gcc/ada/sem_util.adb | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/a-stwiun-shared.ads b/gcc/ada/a-stwiun-shared.ads index 20c2d42..e37b1c2 100644 --- a/gcc/ada/a-stwiun-shared.ads +++ b/gcc/ada/a-stwiun-shared.ads @@ -415,7 +415,7 @@ private Last : Natural := 0; Data : Wide_String (1 .. Max_Length); -- Last is the index of last significant element of the Data. All - -- elements with larger indices are just an extra room. + -- elements with larger indexes are just extra room for expansion. end record; type Shared_Wide_String_Access is access all Shared_Wide_String; diff --git a/gcc/ada/a-stzunb-shared.ads b/gcc/ada/a-stzunb-shared.ads index 3c9e016..d84c86b 100644 --- a/gcc/ada/a-stzunb-shared.ads +++ b/gcc/ada/a-stzunb-shared.ads @@ -424,7 +424,7 @@ private Last : Natural := 0; Data : Wide_Wide_String (1 .. Max_Length); -- Last is the index of last significant element of the Data. All - -- elements with larger indices are just an extra room. + -- elements with larger indexes are just extra room for expansion. end record; type Shared_Wide_Wide_String_Access is access all Shared_Wide_Wide_String; diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index a93139e..b8e22ea 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -2133,7 +2133,7 @@ package body Sem_Util is begin Id := Get_Function_Id (Call); - -- In case of previous error, no check is posible. + -- In case of previous error, no check is possible if No (Id) then return Abandon; |