diff options
Diffstat (limited to 'gcc/ada/sem_ch6.ads')
| -rw-r--r-- | gcc/ada/sem_ch6.ads | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/gcc/ada/sem_ch6.ads b/gcc/ada/sem_ch6.ads index 2fc59b43652..90fd520a71b 100644 --- a/gcc/ada/sem_ch6.ads +++ b/gcc/ada/sem_ch6.ads @@ -204,8 +204,8 @@ package Sem_Ch6 is Derived_Type : Entity_Id := Empty); -- Process new overloaded entity. Overloaded entities are created by -- enumeration type declarations, subprogram specifications, entry - -- declarations, and (implicitly) by type derivations. Derived_Type non- - -- Empty indicates that this is a subprogram derived for that type. + -- declarations, and (implicitly) by type derivations. If Derived_Type + -- is non-empty then this is a subprogram derived for that type. procedure Process_Formals (T : List_Id; Related_Nod : Node_Id); -- Enter the formals in the scope of the subprogram or entry, and @@ -239,7 +239,7 @@ package Sem_Ch6 is Old_Id : Entity_Id; Skip_Controlling_Formals : Boolean := False) return Boolean; -- Determine whether two callable entities (subprograms, entries, literals) - -- are subtype conformant (RM6.3.1(16)). Skip_Controlling_Formals is True + -- are subtype conformant (RM 6.3.1(16)). Skip_Controlling_Formals is True -- when checking the conformance of a subprogram that implements an -- interface operation. In that case, only the non-controlling formals -- can (and must) be examined. @@ -249,10 +249,10 @@ package Sem_Ch6 is Old_Id : Entity_Id; Skip_Controlling_Formals : Boolean := False) return Boolean; -- Determine whether two callable entities (subprograms, entries, literals) - -- are type conformant (RM6.3.1(14)). Skip_Controlling_Formals is True when - -- checking the conformance of a subprogram that implements an interface - -- operation. In that case, only the non-controlling formals can (and must) - -- be examined. + -- are type conformant (RM 6.3.1(14)). Skip_Controlling_Formals is True + -- when checking the conformance of a subprogram that implements an + -- interface operation. In that case, only the non-controlling formals + -- can (and must) be examined. procedure Valid_Operator_Definition (Designator : Entity_Id); -- Verify that an operator definition has the proper number of formals |