aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/expander.adb
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2014-02-18 11:52:58 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2014-02-18 12:52:58 +0100
commit365c849669a60a5b940ff12df8dcb7ac2868d921 (patch)
treea937c244223d54363a5eb3caa31abe41c55442f9 /gcc/ada/expander.adb
parent20afe6403b216d1f0a2cc9e119efbac514acb533 (diff)
downloadgcc-365c849669a60a5b940ff12df8dcb7ac2868d921.zip
gcc-365c849669a60a5b940ff12df8dcb7ac2868d921.tar.gz
gcc-365c849669a60a5b940ff12df8dcb7ac2868d921.tar.bz2
exp_attr.adb: Minor reformatting.
2014-02-18 Robert Dewar <dewar@adacore.com> * exp_attr.adb: Minor reformatting. * exp_ch4.ads, exp_ch4.adb (Expand_N_Reference): New procedure. * exp_util.adb (Remove_Side_Effects): Add conditional expressions as another case where we don't generate N_Reference nodes for primitive types. * expander.adb (Expand): Add call to Expand_N_Reference. From-SVN: r207841
Diffstat (limited to 'gcc/ada/expander.adb')
-rw-r--r--gcc/ada/expander.adb3
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/expander.adb b/gcc/ada/expander.adb
index 9f57cda..2afa4b5 100644
--- a/gcc/ada/expander.adb
+++ b/gcc/ada/expander.adb
@@ -411,6 +411,9 @@ package body Expander is
when N_Record_Representation_Clause =>
Expand_N_Record_Representation_Clause (N);
+ when N_Reference =>
+ Expand_N_Reference (N);
+
when N_Requeue_Statement =>
Expand_N_Requeue_Statement (N);