aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_ch6.ads
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-04-20 10:35:16 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-04-20 10:35:16 +0200
commit26a43556c88b96c608246b39023bc698be3b751d (patch)
tree03a933a49c26da19f666673002ba00e9d63f427c /gcc/ada/sem_ch6.ads
parent3f25c54d814c705750dc1535dd935b39afc7b779 (diff)
downloadgcc-26a43556c88b96c608246b39023bc698be3b751d.zip
gcc-26a43556c88b96c608246b39023bc698be3b751d.tar.gz
gcc-26a43556c88b96c608246b39023bc698be3b751d.tar.bz2
[multiple changes]
2009-04-20 Arnaud Charlet <charlet@adacore.com> * switch-c.adb (Scan_Front_End_Switches): Disable front-end inlining in inspector mode. 2009-04-20 Javier Miranda <miranda@adacore.com> * sem_ch6.adb (New_Overloaded_Entity): Minor reformating. * sem_ch6.ads (Subtype_Conformant, Type_Conformant): Add missing documentation. * exp_aggr.adb (Build_Record_Aggr_Code): Code cleanup. * sem_disp.adb (Check_Dispatching_Operation): Set attribute Is_Dispatching_Operation in internally built overriding subprograms. 2009-04-20 Doug Rupp <rupp@adacore.com> * s-auxdec-vms_64.ads (Integer_{8,16,32,64}_Array): New array types. * s-auxdec.ads: Likewise 2009-04-20 Ed Schonberg <schonberg@adacore.com> * sem_ch3.adb (Find_Type_Name): Reject the completion of a private type by an interface. * exp_ch6.adb (Expand_Call): Inline To_Address unconditionally, to minimze difference in expanded tree when compiled as spec of the main unit, or as a spec in the context of another unit. From-SVN: r146370
Diffstat (limited to 'gcc/ada/sem_ch6.ads')
-rw-r--r--gcc/ada/sem_ch6.ads26
1 files changed, 16 insertions, 10 deletions
diff --git a/gcc/ada/sem_ch6.ads b/gcc/ada/sem_ch6.ads
index 543f01b..5752c21 100644
--- a/gcc/ada/sem_ch6.ads
+++ b/gcc/ada/sem_ch6.ads
@@ -57,8 +57,8 @@ package Sem_Ch6 is
procedure Check_Conventions (Typ : Entity_Id);
-- Ada 2005 (AI-430): Check that the conventions of all inherited and
- -- overridden dispatching operations of type Typ are consistent with
- -- their respective counterparts.
+ -- overridden dispatching operations of type Typ are consistent with their
+ -- respective counterparts.
procedure Check_Delayed_Subprogram (Designator : Entity_Id);
-- Designator can be a E_Subprogram_Type, E_Procedure or E_Function. If a
@@ -69,10 +69,10 @@ package Sem_Ch6 is
(N : Node_Id;
Prev : Entity_Id;
Prev_Loc : Node_Id);
- -- Check that the discriminants of a full type N fully conform to
- -- the discriminants of the corresponding partial view Prev.
- -- Prev_Loc indicates the source location of the partial view,
- -- which may be different than Prev in the case of private types.
+ -- Check that the discriminants of a full type N fully conform to the
+ -- discriminants of the corresponding partial view Prev. Prev_Loc indicates
+ -- the source location of the partial view, which may be different than
+ -- Prev in the case of private types.
procedure Check_Fully_Conformant
(New_Id : Entity_Id;
@@ -230,15 +230,21 @@ package Sem_Ch6 is
(New_Id : Entity_Id;
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)).
+ -- Determine whether two callable entities (subprograms, entries, literals)
+ -- are subtype conformant (RM6.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.
function Type_Conformant
(New_Id : Entity_Id;
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)).
+ -- 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.
procedure Valid_Operator_Definition (Designator : Entity_Id);
-- Verify that an operator definition has the proper number of formals