From: Piotr Trojanek <trojanek@adacore.com>
Date: Mon, 7 Dec 2020 22:47:12 +0000 (+0100)
Subject: [Ada] Update reference with description of type resolution
X-Git-Tag: basepoints/gcc-13~8122
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ef1acd3f18b8d16db139cbab96d27abe0a81d7e0;p=thirdparty%2Fgcc.git

[Ada] Update reference with description of type resolution

gcc/ada/

	* sem_res.ads: Update reference in comment.
	* sem_type.ads: Fix casing in a name of a unit.
---

diff --git a/gcc/ada/sem_res.ads b/gcc/ada/sem_res.ads
index 44a848796488..d53856647afd 100644
--- a/gcc/ada/sem_res.ads
+++ b/gcc/ada/sem_res.ads
@@ -31,7 +31,7 @@ with Types; use Types;
 
 package Sem_Res is
 
-   --  As described in Sem_Ch4, the type resolution proceeds in two phases.
+   --  As described in Sem_Type, the type resolution proceeds in two phases.
    --  The first phase is a bottom up pass that is achieved during the
    --  recursive traversal performed by the Analyze procedures. This phase
    --  determines unambiguous types, and collects sets of possible types
diff --git a/gcc/ada/sem_type.ads b/gcc/ada/sem_type.ads
index 6c6d5eb7fb55..4dea6e2076d0 100644
--- a/gcc/ada/sem_type.ads
+++ b/gcc/ada/sem_type.ads
@@ -85,7 +85,7 @@ package Sem_Type is
    --  with the appropriate use clause. The global variable Candidate_Type is
    --  set in Add_One_Interp whenever an interpretation might be legal for an
    --  operator if the type were directly visible. This variable is used in
-   --  sem_ch4 when no legal interpretation is found.
+   --  Sem_Ch4 when no legal interpretation is found.
 
    Candidate_Type : Entity_Id;