]> git.ipfire.org Git - thirdparty/gcc.git/commit
freeze.adb (Freeze_Record_Type): Update the use of Is_SPARK_Volatile.
authorHristian Kirtchev <kirtchev@adacore.com>
Wed, 21 May 2014 13:21:38 +0000 (13:21 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 21 May 2014 13:21:38 +0000 (15:21 +0200)
commitea26c8e414ff21cc2dccf2a65476931c636c8147
tree5b82d2db5e38871b2e7859f7f8efd1b514974e81
parent65529f748184741575136af3aab497059ff2aa10
freeze.adb (Freeze_Record_Type): Update the use of Is_SPARK_Volatile.

2014-05-21  Hristian Kirtchev  <kirtchev@adacore.com>

* freeze.adb (Freeze_Record_Type): Update the use of
Is_SPARK_Volatile.
* sem_ch3.adb (Analyze_Object_Contract): Update the use of
Is_SPARK_Volatile.
(Process_Discriminants): Update the use of Is_SPARK_Volatile.
* sem_ch5.adb (Analyze_Iterator_Specification): Update the use
of Is_SPARK_Volatile.
(Analyze_Loop_Parameter_Specification):
Update the use of Is_SPARK_Volatile.
* sem_ch6.adb (Process_Formals): Catch an illegal use of an IN
formal parameter when its type is volatile.
* sem_prag.adb (Analyze_Global_Item): Update the use of
Is_SPARK_Volatile.
* sem_res.adb (Resolve_Entity_Name): Correct the guard which
determines whether an entity is a volatile source SPARK object.
* sem_util.adb (Has_Enabled_Property): Accout for external
properties being set on objects other than abstract states
and variables. An example would be a formal parameter.
(Is_SPARK_Volatile): New routine.
(Is_SPARK_Volatile_Object):
Remove the entity-specific tests. Call routine Is_SPARK_Volatile
when checking entities and/or types.
* sem_util.ads (Is_SPARK_Volatile): New routine.

From-SVN: r210708
gcc/ada/ChangeLog
gcc/ada/freeze.adb
gcc/ada/sem_ch3.adb
gcc/ada/sem_ch5.adb
gcc/ada/sem_ch6.adb
gcc/ada/sem_prag.adb
gcc/ada/sem_res.adb
gcc/ada/sem_util.adb
gcc/ada/sem_util.ads