[Ada] Fix wrong call to protected function returning VFA type

Eric Botcazou ebotcazou@adacore.com
Sat Mar 10 10:16:00 GMT 2018


This is a small regression present on the mainline and 7 branch: the call to a 
protected function returning a composite type with Volatile_Full_Access aspect 
or pragma yields a segfault at run time.

Tested on x86-64/Linux, applied on the mainline and 7 branch.


2018-03-10  Eric Botcazou  <ebotcazou@adacore.com>

	* gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
	Consider only entities for objects.


2018-03-10  Eric Botcazou  <ebotcazou@adacore.com>

	* gnat.dg/prot3.adb: New test.
	* gnat.dg/prot3_pkg.ad[sb]: New helper.

-- 
Eric Botcazou
-------------- next part --------------
A non-text attachment was scrubbed...
Name: p.diff
Type: text/x-patch
Size: 494 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20180310/cb9cfecd/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: prot3_pkg.adb
Type: text/x-adasrc
Size: 295 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20180310/cb9cfecd/attachment-0001.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: prot3_pkg.ads
Type: text/x-adasrc
Size: 288 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20180310/cb9cfecd/attachment-0002.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: prot3.adb
Type: text/x-adasrc
Size: 95 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20180310/cb9cfecd/attachment-0003.bin>


More information about the Gcc-patches mailing list