aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/par_sco.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2012-08-06 09:58:49 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2012-08-06 09:58:49 +0200
commit5eeeed5e1a9ee8ea9fbff247c9cc6fd093fa5dcd (patch)
treec4b0667b7b66db54d5d049e343e45682c37df54a /gcc/ada/par_sco.adb
parentb5ee491c7bf77f6355ae205dfd5779ac7ed6a00d (diff)
downloadgcc-5eeeed5e1a9ee8ea9fbff247c9cc6fd093fa5dcd.zip
gcc-5eeeed5e1a9ee8ea9fbff247c9cc6fd093fa5dcd.tar.gz
gcc-5eeeed5e1a9ee8ea9fbff247c9cc6fd093fa5dcd.tar.bz2
[multiple changes]
2012-08-06 Hristian Kirtchev <kirtchev@adacore.com> * exp_ch7.adb (Process_Transient_Objects): Remove obsolete loop processing related to array initialization. The expansion of loops already contains a mechanism to detect controlled objects generated by expansion and introduce a block around the loop statements for finalization purposes. 2012-08-06 Vincent Pucci <pucci@adacore.com> * sem_ch13.adb: Current scope must be within or same as the scope of the entity while analysing aspect specifications at freeze point. 2012-08-06 Thomas Quinot <quinot@adacore.com> * par_sco.adb: Add note about dubious SCO for TERMINATE alternative. * sem_ch8.adb, exp_ch11.adb: Minor reformatting. 2012-08-06 Ed Schonberg <schonberg@adacore.com> * exp_aggr.adb (Two_Dim_Packed_Array_Handled): New procedure to transform an aggregate for a packed two-dimensional array into a one-dimensional array of constant values, in order to avoid the generation of component-by-component assignments. 2012-08-06 Thomas Quinot <quinot@adacore.com> * frontend.adb: Do not attempt to process deferred configuration pragmas if the main unit failed to load, to avoid cascaded inconsistencies that can lead to a compiler crash. From-SVN: r190161
Diffstat (limited to 'gcc/ada/par_sco.adb')
-rw-r--r--gcc/ada/par_sco.adb6
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/ada/par_sco.adb b/gcc/ada/par_sco.adb
index 73b00c2..78ff71b 100644
--- a/gcc/ada/par_sco.adb
+++ b/gcc/ada/par_sco.adb
@@ -1556,6 +1556,12 @@ package body Par_SCO is
P => Triggering_Statement (N));
when N_Terminate_Alternative =>
+
+ -- It is dubious to emit a statement SCO for a TERMINATE
+ -- alternative, since no code is actually executed if the
+ -- alternative is selected -- the tasking runtime call just
+ -- never returns???
+
Extend_Statement_Sequence (N, ' ');
Set_Statement_Entry;