aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/einfo.ads
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2010-06-17 15:58:10 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2010-06-17 17:58:10 +0200
commit92252980733eb21a87c8c96dc55814cd17616174 (patch)
tree17e04a6cfb1782832e4258daf2be9a5dc664d8da /gcc/ada/einfo.ads
parent955871d37fc3f6022ac6bd19dfd8a7134cbcdfac (diff)
downloadgcc-92252980733eb21a87c8c96dc55814cd17616174.zip
gcc-92252980733eb21a87c8c96dc55814cd17616174.tar.gz
gcc-92252980733eb21a87c8c96dc55814cd17616174.tar.bz2
exp_intr.adb: Minor code reorganization (use UI_Max)
2010-06-17 Robert Dewar <dewar@adacore.com> * exp_intr.adb: Minor code reorganization (use UI_Max) * sem_intr.adb: use underlying type to check legality. * einfo.adb (Known_Static_Esize): False for generic types (Known_Static_RM_Size): False for generic types * einfo.ads (Known_Static_Esize): False for generic types (Known_Static_RM_Size): False for generic types From-SVN: r160930
Diffstat (limited to 'gcc/ada/einfo.ads')
-rw-r--r--gcc/ada/einfo.ads7
1 files changed, 7 insertions, 0 deletions
diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads
index 99c7141..12a770f 100644
--- a/gcc/ada/einfo.ads
+++ b/gcc/ada/einfo.ads
@@ -6188,6 +6188,13 @@ package Einfo is
-- value is always known static for discrete types (and no other types can
-- have an RM_Size value of zero).
+ -- In two cases, Known_Static_Esize and Known_Static_RM_Size, there is one
+ -- more consideration, which is that we always return false for generic
+ -- types. Within a template, the size can look known, because of the fake
+ -- size values we put in template types, but they are not really known and
+ -- anyone testing if they are known within the template should get False as
+ -- a result to prevent incorrect assumptions.
+
function Known_Alignment (E : Entity_Id) return B;
function Known_Component_Bit_Offset (E : Entity_Id) return B;
function Known_Component_Size (E : Entity_Id) return B;