diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-11-20 16:50:29 +0100 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-11-20 16:50:29 +0100 |
commit | d7d99211f9001bd2c1c5874e1bcf8bbb460aa2dc (patch) | |
tree | ccd228e8d08e9b13241e8a9753c53f579862e463 /gcc/ada/a-cofove.ads | |
parent | de4899bb19823f4865b060823eab2bdeba9c6fee (diff) | |
download | gcc-d7d99211f9001bd2c1c5874e1bcf8bbb460aa2dc.zip gcc-d7d99211f9001bd2c1c5874e1bcf8bbb460aa2dc.tar.gz gcc-d7d99211f9001bd2c1c5874e1bcf8bbb460aa2dc.tar.bz2 |
[multiple changes]
2014-11-20 Arnaud Charlet <charlet@adacore.com>
* s-parame-ae653.ads: Update comments.
2014-11-20 Robert Dewar <dewar@adacore.com>
* types.ads, einfo.ads: Minor reformatting.
* sem_elab.adb (Check_A_Call): Add guard for reference to Alias
for variable case.
2014-11-20 Bob Duff <duff@adacore.com>
* a-cofove.adb (Elems,Elemsc): Use access-to-constrained arrays
instead of access-to-unconstrained, because the latter doesn't
work with 'Unrestricted_Access when the result is returned from
a function.
* a-cofove.ads (Vector): Move the discriminant-dependent array
after the other components for efficiency. Otherwise the compiler
will generate a lot of code to calculate the offset of the other
components every time they're accessed.
2014-11-20 Olivier Hainque <hainque@adacore.com>
* opt.ads: Fix comment on Generate_SCO_Instance_Table wrt when
it is set to true.
From-SVN: r217879
Diffstat (limited to 'gcc/ada/a-cofove.ads')
-rw-r--r-- | gcc/ada/a-cofove.ads | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/a-cofove.ads b/gcc/ada/a-cofove.ads index 6ddd24b..0f02017 100644 --- a/gcc/ada/a-cofove.ads +++ b/gcc/ada/a-cofove.ads @@ -255,9 +255,9 @@ private -- In the bounded case, the elements are stored in Elements. In the -- unbounded case, the elements are initially stored in Elements, until -- we run out of room, then we switch to Elements_Ptr. - Elements : aliased Elements_Array (1 .. Capacity); Last : Extended_Index := No_Index; Elements_Ptr : Elements_Array_Ptr := null; + Elements : aliased Elements_Array (1 .. Capacity); end record; -- The primary reason Vector is limited is that in the unbounded case, once |