Minor reformatting.

From-SVN: r219237
This commit is contained in:
Arnaud Charlet 2015-01-06 10:39:03 +01:00
parent 4199e8c6fb
commit 7665df2248
3 changed files with 3 additions and 3 deletions

View File

@ -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;

View File

@ -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;

View File

@ -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;