diff options
author | Robert Dewar <dewar@adacore.com> | 2010-06-17 15:58:10 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-06-17 17:58:10 +0200 |
commit | 92252980733eb21a87c8c96dc55814cd17616174 (patch) | |
tree | 17e04a6cfb1782832e4258daf2be9a5dc664d8da /gcc/ada/einfo.ads | |
parent | 955871d37fc3f6022ac6bd19dfd8a7134cbcdfac (diff) | |
download | gcc-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.ads | 7 |
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; |