]> git.ipfire.org Git - thirdparty/gcc.git/commit
projects / thirdparty / gcc.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: af739c8) | patch
Fix wrong assignment of aggregate to full-access component
authorEric Botcazou <ebotcazou@adacore.com>
Mon, 29 Mar 2021 22:41:46 +0000 (00:41 +0200)
committerEric Botcazou <ebotcazou@adacore.com>
Mon, 29 Mar 2021 22:45:38 +0000 (00:45 +0200)
commit471babd88668dbe4f9ff4dba6d2036ecef09653b
tree73aa1b5e7865a9a15caa7b9818f4a51278628f48tree
parentaf739c8797d4cdf550366d0ef48136e0073df5c9commit | diff
Fix wrong assignment of aggregate to full-access component

This is a regression present on the mainline: the compiler (front-end) fails
to assign an aggregate to a full-access component (i.e. Atomic or VFA) as a
whole if the type of the component is not full access itself.

gcc/ada/
PR ada/99802
* freeze.adb (Is_Full_Access_Aggregate): Call Is_Full_Access_Object
on the name of an N_Assignment_Statement to spot full access.
gcc/ada/freeze.adb diff | blob | blame | history
Mirror of https://gcc.gnu.org/git/gcc.git