[gcc r13-1658] [Ada] Add cross-references between Integer_Type_For and Small_Integer_Type_For

[gcc r13-1658] [Ada] Add cross-references between Integer_Type_For and Small_Integer_Type_For

[Pierre-Marie de Rodat]

https://gcc.gnu.org/g:94425248c769d45b5932079321311392e4d8e952

commit r13-1658-g94425248c769d45b5932079321311392e4d8e952
Author: Eric Botcazou <ebotcazou@adacore.com>
Date:   Fri Jul 1 15:24:48 2022 +0200

    [Ada] Add cross-references between Integer_Type_For and Small_Integer_Type_For
    
    gcc/ada/
    
            * exp_util.ads (Integer_Type_For): Mention Small_Integer_Type_For.
            (Small_Integer_Type_For): Mention Integer_Type_For.

Diff:
---
 gcc/ada/exp_util.ads | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gcc/ada/exp_util.ads b/gcc/ada/exp_util.ads
index e812ca06a7f..1b7be3a2831 100644
--- a/gcc/ada/exp_util.ads
+++ b/gcc/ada/exp_util.ads
@@ -758,7 +758,7 @@ package Exp_Util is
 
    function Integer_Type_For (S : Uint; Uns : Boolean) return Entity_Id;
    --  Return a suitable standard integer type containing at least S bits and
-   --  of the signedness given by Uns.
+   --  of the signedness given by Uns. See also Small_Integer_Type_For.
 
    function Is_Displacement_Of_Object_Or_Function_Result
      (Obj_Id : Entity_Id) return Boolean;
@@ -1193,7 +1193,7 @@ package Exp_Util is
 
    function Small_Integer_Type_For (S : Uint; Uns : Boolean) return Entity_Id;
    --  Return the smallest standard integer type containing at least S bits and
-   --  of the signedness given by Uns.
+   --  of the signedness given by Uns. See also Integer_Type_For.
 
    function Thunk_Target (Thunk : Entity_Id) return Entity_Id;
    --  Return the entity ultimately called by the thunk, that is to say return