diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-11-06 11:20:41 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-11-06 11:20:41 +0100 |
| commit | 150ac76e0e29ec57850fca545b0e26530adf9adc (patch) | |
| tree | 44faecf9685467f3cfe0c70f98f98c4a7e9d1616 /gcc/ada/exp_ch2.adb | |
| parent | fa1ed65806ea3231c762c342de286f9efecd011d (diff) | |
| download | gcc-150ac76e0e29ec57850fca545b0e26530adf9adc.zip gcc-150ac76e0e29ec57850fca545b0e26530adf9adc.tar.gz gcc-150ac76e0e29ec57850fca545b0e26530adf9adc.tar.bz2 | |
[multiple changes]
2012-11-06 Robert Dewar <dewar@adacore.com>
* par_sco.adb, bindgen.adb, exp_vfpt.adb, exp_vfpt.ads, exp_ch2.adb,
errout.adb, sem_ch8.adb: Minor reformatting.
2012-11-06 Hristian Kirtchev <kirtchev@adacore.com>
* einfo.adb: Include Loop_Entry_Attributes to the list of
Node/List/Elist10 usage.
(Loop_Entry_Attributes): New routine.
(Set_Loop_Entry_Attributes): New routine.
(Write_Field10_Name): Add an output string for Loop_Entry_Attributes.
* einfo.ads: Define new attribute Loop_Entry_Attributes along
with its usage in nodes.
(Loop_Entry_Attributes): New routine and dedicated pragma Inline.
(Set_Loop_Entry_Attributes): New routine and dedicated pragma Inline.
* exp_attr.adb (Expand_N_Attribute_Reference): Do not expand
Attribute_Loop_Entry here.
* exp_ch5.adb: Add with and use clause for Elists;
(Expand_Loop_Entry_Attributes): New routine.
(Expand_N_Loop_Statement): Add a call to Expand_Loop_Entry_Attributes.
* exp_prag.adb (Expand_Pragma_Loop_Assertion): Specialize the
search to include multiple nested loops produced by the expansion
of Ada 2012 array iterator.
* sem_attr.adb: Add with and use clause for Elists.
(Analyze_Attribute): Check the legality of attribute Loop_Entry.
(Resolve_Attribute): Nothing to do for Loop_Entry.
(S14_Attribute): New routine.
* snames.ads-tmpl: Add a comment on entries marked with
HiLite. Add new name Name_Loop_Entry. Add new attribute
Attribute_Loop_Entry.
From-SVN: r193227
Diffstat (limited to 'gcc/ada/exp_ch2.adb')
| -rw-r--r-- | gcc/ada/exp_ch2.adb | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch2.adb b/gcc/ada/exp_ch2.adb index bbd23ba..64e561c 100644 --- a/gcc/ada/exp_ch2.adb +++ b/gcc/ada/exp_ch2.adb @@ -635,8 +635,13 @@ package body Exp_Ch2 is --------------------------- procedure Expand_N_Real_Literal (N : Node_Id) is + pragma Unreferenced (N); + begin - -- Vax real literal are now allowed by gigi + -- Historically, this routine existed because there were expansion + -- requirements for Vax real literals, but now Vax real literals + -- are now handled by gigi, so this routine no longer does anything. + null; end Expand_N_Real_Literal; |