[Ada] Sync whitespace between variants of Indefinite_Holders unit

gcc/ada/

	* libgnat/a-coinho.ads: Sync whitespace with
	a-coinho__shared.ads.
	* libgnat/a-coinho__shared.ads: Sync whitespace with
	a-coinho.ads.
This commit is contained in:
Piotr Trojanek 2021-11-08 14:19:39 +01:00 committed by Pierre-Marie de Rodat
parent ef520c0baf
commit a41a910745
2 changed files with 3 additions and 2 deletions

View file

@ -127,8 +127,7 @@ private
overriding procedure Adjust (Container : in out Holder);
overriding procedure Finalize (Container : in out Holder);
type Reference_Control_Type is new Controlled with
record
type Reference_Control_Type is new Controlled with record
Container : Holder_Access;
end record;

View file

@ -69,6 +69,7 @@ package Ada.Containers.Indefinite_Holders is
procedure Query_Element
(Container : Holder;
Process : not null access procedure (Element : Element_Type));
procedure Update_Element
(Container : in out Holder;
Process : not null access procedure (Element : in out Element_Type));
@ -105,6 +106,7 @@ private
use Ada.Streams;
type Element_Access is access all Element_Type;
type Holder_Access is access all Holder;
type Shared_Holder is record