einfo.adb
326 KB
-
[Ada] Spurious error on synchronous refinement · bcc093dc
This patch ensures that an abstract state declared with simple option "synchronous" is automatically considered "external". 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com> gcc/ada/ * einfo.adb (Is_External_State): An abstract state is also external when it is declared with option "synchronous". * einfo.ads: Update the documentation of synthesized attribute Is_External_State. * sem_util.adb (Find_Simple_Properties): New routine. (Is_Enabled_External_Property): New routine. (State_Has_Enabled_Property): Reimplemented. The two flavors of option External have precedence over option Synchronous when determining whether a property is in effect. gcc/testsuite/ * gnat.dg/sync2.adb, gnat.dg/sync2.ads: New testcase. From-SVN: r260453
Hristian Kirtchev committed