From: Arnaud Charlet Date: Tue, 6 Jan 2015 09:39:03 +0000 (+0100) Subject: Minor reformatting. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=7665df2248b579883409aa636b08c99325c9810e;p=gcc.git Minor reformatting. From-SVN: r219237 --- diff --git a/gcc/ada/a-stwiun-shared.ads b/gcc/ada/a-stwiun-shared.ads index 20c2d426c1f..e37b1c23181 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 3c9e016c07b..d84c86becc7 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 a93139e3d1a..b8e22ea8be2 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;