]> git.ipfire.org Git - thirdparty/gcc.git/commit - gcc/ada/exp_ch4.adb
sem_prag.adb (Get_SPARK_Mode_Id): Handle the case where the pragma may appear without...
authorHristian Kirtchev <kirtchev@adacore.com>
Tue, 10 Sep 2013 14:43:06 +0000 (14:43 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Tue, 10 Sep 2013 14:43:06 +0000 (16:43 +0200)
commita98838ff82af79fcb85e2b7eafa029267a91cd1f
tree28fba3b9d88978185757af88a48b88c326736655
parentc9b1c957b1de8d3f3754b4069ad17bae9d182943
sem_prag.adb (Get_SPARK_Mode_Id): Handle the case where the pragma may appear without an argument.

2013-09-10  Hristian Kirtchev  <kirtchev@adacore.com>

* sem_prag.adb (Get_SPARK_Mode_Id): Handle the
case where the pragma may appear without an argument.
(Analyze_Global_List): Add expanded_name to the list of constructs
that denote a single item.
(Collect_Global_List): Add expanded_name to the list of constructs
that denote a single item.

2013-09-10  Hristian Kirtchev  <kirtchev@adacore.com>

* exp_ch4.adb (Apply_Accessibility_Check): Add local constant
Pool_Id and local variables Fin_Call and Free_Stmt. Finalize
and deallocate a heap-allocated class-wide object after it
has been determined that it violates the accessibility rules.
* rtsfind.ads: Add new RTU_Id for System.Memory. Add new RE_Id
and entry in RE_Unit_Table for RE_Free.

From-SVN: r202451
gcc/ada/ChangeLog
gcc/ada/exp_ch4.adb
gcc/ada/rtsfind.ads
gcc/ada/sem_prag.adb