]> git.ipfire.org Git - thirdparty/gcc.git/commit
[Ada] Improve support for casing on types with controlled parts
authorSteve Baird <baird@adacore.com>
Wed, 1 Dec 2021 19:02:52 +0000 (11:02 -0800)
committerPierre-Marie de Rodat <derodat@adacore.com>
Wed, 5 Jan 2022 11:32:38 +0000 (11:32 +0000)
commit5e51d85e2e739cbe8a0c7081d300c12c5b5447b2
treefe9d06f1a26da58591eac58dadb580c8e68c576c
parenta7b4fbd9b4c2c24bac956125068d2540976bf90e
[Ada] Improve support for casing on types with controlled parts

gcc/ada/

* exp_ch5.adb (Finish_Binding_Object_Declaration): Fix a bug
that was introduced in the previous commit.  The previous
version initialized a Boolean constant Declare_Copy before the
variable Decl had been initialized properly.
gcc/ada/exp_ch5.adb