exp_ch3.adb (Expand_N_Object_Declaration): Rewrite an object declaration of the form...
commit24d2fbbeacb37a9a07ae7b038ce331630141aa10
authorBob Duff <duff@adacore.com>
Wed, 27 Apr 2016 12:20:54 +0000 (27 12:20 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 27 Apr 2016 12:20:54 +0000 (27 14:20 +0200)
tree7e1e1d662f59df187bb4e829a8f6ff36d75a78fb
parent45e206963a226dc93046a671951f8cc5bcce52cf
exp_ch3.adb (Expand_N_Object_Declaration): Rewrite an object declaration of the form "X ...

2016-04-27  Bob Duff  <duff@adacore.com>

* exp_ch3.adb (Expand_N_Object_Declaration): Rewrite an object
declaration of the form "X : T := Func (...);", where T is
controlled, as a renaming.
* a-strunb-shared.adb (Finalize): Set the Unbounded_String Object
to be an empty string, instead of null-ing out the Reference.
* exp_util.adb (Needs_Finalization): Remove redundant code.

From-SVN: r235488
gcc/ada/ChangeLog
gcc/ada/a-strunb-shared.adb
gcc/ada/exp_ch3.adb
gcc/ada/exp_util.adb