diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-06-22 07:26:02 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-06-22 07:26:02 +0000 |
| commit | ddc0df64d2f602d1768de32361e717714e53f882 (patch) | |
| tree | 622fd4753d7fcd2fe9b6e230fa034027b2f43b97 /gcc/ada/sem_util.ads | |
| parent | d5df73f051434942ee9a4a2150a16e91e45b27cd (diff) | |
| download | gcc-ddc0df64d2f602d1768de32361e717714e53f882.tar.gz | |
2010-06-22 Robert Dewar <dewar@adacore.com>
* g-expect-vms.adb, sem_res.adb: Minor reformatting.
* exp_aggr.adb: Minor comment changes and reformatting.
* sem_eval.adb (Find_Universal_Operator_Type): Put in proper alpha order
* sem_util.ads: Add some missing pragma Inline's (efficiency issue only)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@161139 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_util.ads')
| -rw-r--r-- | gcc/ada/sem_util.ads | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/sem_util.ads b/gcc/ada/sem_util.ads index 1df648d43b2..2720b4e1232 100644 --- a/gcc/ada/sem_util.ads +++ b/gcc/ada/sem_util.ads @@ -801,6 +801,7 @@ package Sem_Util is -- function simply tests if it is True (i.e. non-zero) function Is_Universal_Numeric_Type (T : Entity_Id) return Boolean; + pragma Inline (Is_Universal_Numeric_Type); -- True if T is Universal_Integer or Universal_Real function Is_Value_Type (T : Entity_Id) return Boolean; |