@@ -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
@@ -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;