aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_ch13.ads
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2014-07-18 09:34:17 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2014-07-18 11:34:17 +0200
commitcf28c974d4868d94b6a5cee2c36c5dc617a7444d (patch)
treed7fb80a81af0997f5b112651970b927c9f5380b4 /gcc/ada/sem_ch13.ads
parentc3d01e19a33b26764c40d67e6f3f86efbd86b203 (diff)
downloadgcc-cf28c974d4868d94b6a5cee2c36c5dc617a7444d.zip
gcc-cf28c974d4868d94b6a5cee2c36c5dc617a7444d.tar.gz
gcc-cf28c974d4868d94b6a5cee2c36c5dc617a7444d.tar.bz2
sem_attr.adb, [...]: Minor reformatting.
2014-07-18 Robert Dewar <dewar@adacore.com> * sem_attr.adb, s-os_lib.ads, prj-tree.adb: Minor reformatting. * types.h: Fix typo. 2014-07-18 Robert Dewar <dewar@adacore.com> * freeze.adb (Check_Address_Clause): Use Kill_Rep_Clause (no functional change). * gnat_ugn.texi: Document that -gnatI removes rep clauses from ASIS trees. * sem_ch13.adb (Kill_Rep_Clause): New procedure (Analyze_Attribute_Definition_Clause): Use Kill_Rep_Clause. This is just a cleanup, no functional effect. (Analyze_Enumeration_Representation_Clause): Use Kill_Rep_Clause. This means that enum rep clauses are now properly removed from -gnatct trees. (Analyze_Record_Representation_Clause): Same change. * sem_ch13.ads (Kill_Rep_Clause): New procedure. From-SVN: r212789
Diffstat (limited to 'gcc/ada/sem_ch13.ads')
-rw-r--r--gcc/ada/sem_ch13.ads5
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/sem_ch13.ads b/gcc/ada/sem_ch13.ads
index 0f31265..9bef91c 100644
--- a/gcc/ada/sem_ch13.ads
+++ b/gcc/ada/sem_ch13.ads
@@ -79,6 +79,11 @@ package Sem_Ch13 is
procedure Initialize;
-- Initialize internal tables for new compilation
+ procedure Kill_Rep_Clause (N : Node_Id);
+ -- This procedure is called for a rep clause N when we are in -gnatI mode
+ -- (Ignore_Rep_Clauses). It rewrites the node N to a null statement. This
+ -- is only called if Ignore_Rep_Clauses is True.
+
procedure Set_Enum_Esize (T : Entity_Id);
-- This routine sets the Esize field for an enumeration type T, based
-- on the current representation information available for T. Note that