[gcc r13-397] [Ada] Fix code example on representation clause

[gcc r13-397] [Ada] Fix code example on representation clause

[Pierre-Marie de Rodat]

https://gcc.gnu.org/g:9e5b1b076a57feee4057460aac8aae451b42431e

commit r13-397-g9e5b1b076a57feee4057460aac8aae451b42431e
Author: Etienne Servais <servais@adacore.com>
Date:   Wed Feb 23 11:44:42 2022 +0100

    [Ada] Fix code example on representation clause
    
    The column is superfluous, component names are missing.
    
    gcc/ada/
    
            * doc/gnat_rm/representation_clauses_and_pragmas.rst: Fix code
            snippet.
            * gnat_rm.texi: Regenerate.

Diff:
---
 gcc/ada/doc/gnat_rm/representation_clauses_and_pragmas.rst | 6 +++---
 gcc/ada/gnat_rm.texi                                       | 6 +++---
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/gcc/ada/doc/gnat_rm/representation_clauses_and_pragmas.rst b/gcc/ada/doc/gnat_rm/representation_clauses_and_pragmas.rst
index a30ad5f7589..b0e131fe4ab 100644
--- a/gcc/ada/doc/gnat_rm/representation_clauses_and_pragmas.rst
+++ b/gcc/ada/doc/gnat_rm/representation_clauses_and_pragmas.rst
@@ -457,14 +457,14 @@ from Ada 83 to Ada 95 or Ada 2005.  For example, consider:
 
 .. code-block:: ada
 
-     type Rec is record;
+     type Rec is record
         A : Natural;
         B : Natural;
      end record;
 
      for Rec use record
-        at 0  range 0 .. Natural'Size - 1;
-        at 0  range Natural'Size .. 2 * Natural'Size - 1;
+        A at 0 range 0 .. Natural'Size - 1;
+        B at 0 range Natural'Size .. 2 * Natural'Size - 1;
      end record;
 
 In the above code, since the typical size of ``Natural`` objects
diff --git a/gcc/ada/gnat_rm.texi b/gcc/ada/gnat_rm.texi
index f7828cab93d..8997f6352db 100644
--- a/gcc/ada/gnat_rm.texi
+++ b/gcc/ada/gnat_rm.texi
@@ -18913,14 +18913,14 @@ typically 31.  This means that code may change in behavior when moving
 from Ada 83 to Ada 95 or Ada 2005.  For example, consider:
 
 @example
-type Rec is record;
+type Rec is record
    A : Natural;
    B : Natural;
 end record;
 
 for Rec use record
-   at 0  range 0 .. Natural'Size - 1;
-   at 0  range Natural'Size .. 2 * Natural'Size - 1;
+   A at 0 range 0 .. Natural'Size - 1;
+   B at 0 range Natural'Size .. 2 * Natural'Size - 1;
 end record;
 @end example