From: Piotr Trojanek <trojanek@adacore.com>
Date: Mon, 8 Nov 2021 13:19:39 +0000 (+0100)
Subject: [Ada] Sync whitespace between variants of Indefinite_Holders unit
X-Git-Tag: basepoints/gcc-13~2650
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a41a9107459625a800cb424805a22991b3e038a4;p=thirdparty%2Fgcc.git

[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.
---

diff --git a/gcc/ada/libgnat/a-coinho.ads b/gcc/ada/libgnat/a-coinho.ads
index b64883681486..d09f7cf7d6ef 100644
--- a/gcc/ada/libgnat/a-coinho.ads
+++ b/gcc/ada/libgnat/a-coinho.ads
@@ -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;
 
diff --git a/gcc/ada/libgnat/a-coinho__shared.ads b/gcc/ada/libgnat/a-coinho__shared.ads
index 97f796dcfd5c..27a0ca8fd1eb 100644
--- a/gcc/ada/libgnat/a-coinho__shared.ads
+++ b/gcc/ada/libgnat/a-coinho__shared.ads
@@ -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