[Ada] Synchronized object definition in SPARK updated
authorYannick Moy <moy@adacore.com>
Thu, 4 Jul 2019 08:06:05 +0000 (08:06 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Thu, 4 Jul 2019 08:06:05 +0000 (08:06 +0000)
commit9193307b56ea03321bb66e2f7e30c6e98d724efc
treef038f265f2ff93ef80d3a25c023c227bcd700b88
parent194dc648e4b40ac705103cfc92dff0c11b82fb5a
[Ada] Synchronized object definition in SPARK updated

The definition of what types yield synchronized objected in SPARK has
been updated to see through the privacy boundary.

2019-07-04  Yannick Moy  <moy@adacore.com>

gcc/ada/

* sem_util.adb (Yields_Synchronized_Object): Adapt to new SPARK
rule.

gcc/testsuite/

* gnat.dg/synchronized2.adb, gnat.dg/synchronized2.ads,
gnat.dg/synchronized2_pkg.ads: New testcase.

From-SVN: r273056
gcc/ada/ChangeLog
gcc/ada/sem_util.adb
gcc/testsuite/ChangeLog
gcc/testsuite/gnat.dg/synchronized2.adb [new file with mode: 0644]
gcc/testsuite/gnat.dg/synchronized2.ads [new file with mode: 0644]
gcc/testsuite/gnat.dg/synchronized2_pkg.ads [new file with mode: 0644]