r213265 - in /trunk/gcc/ada: ChangeLog a-tasatt...

[charlet@gcc.gnu.org]

Author: charlet
Date: Wed Jul 30 13:43:32 2014
New Revision: 213265

URL: https://gcc.gnu.org/viewcvs?rev=213265&root=gcc&view=rev
Log:
2014-07-30  Thomas Quinot  <quinot@adacore.com>

	* sem.ads (Scope_Table_Entry): New component Locked_Shared_Objects.
	* sem_ch8.adb (Push_Scope): Initialize Locked_Shared_Objects.
	* exp_smem.adb (Add_Shared_Var_Lock_Procs): Handle the case where
	the call returns an unconstrained type: in this case there is
	already a transient scope, and we should not establish a new one.
	* exp_ch7.adb (Insert_Actions_In_Scope_Around): New formal Clean. If
	True, also insert cleanup actions in the tree.
	(Wrap_Transient_Declaration): Call Insert_Actions_In_Scope_Around
	with Clean set True.

2014-07-30  Arnaud Charlet  <charlet@adacore.com>

	* s-taskin.ads (Direct_Index, Direct_Index_Range,
	Direct_Attribute_Element, Direct_Attribute_Array,
	Direct_Index_Vector, Direct_Attributes, Is_Defined,
	Indirect_Attributes): Removed.	(Atomic_Address,
	Attribute_Array, Attributes): New.
	* s-tasini.ads, s-tasini.adb (Proc_T, Initialize_Attributes,
	Finalize_Attributes_Link, Initialize_Attributes_Link): Removed.
	(Finalize_Attributes): Reimplement.
	* s-tassta.adb (Create_Task): Remove call to
	Initialize_Attributes_Link (Free_Task, Vulnerable_Free_Task):
	Replace Finalize_Attributes_Link by Finalize_Attributes.
	* a-tasatt.ads, a-tasatt.adb, s-tataat.ads, s-tataat.adb:
	Reimplement from scratch, using a simpler and more efficient
	implementation.
	* s-tporft.adb (Register_Foreign_Thread): Remove now obsolete comment.
	* s-parame.ads, s-parame-hpux.ads,
	* s-parame-vms-alpha.ads, s-parame-vms-ia64.ads,
	* s-parame-vxworks.ads (Max_Attribute_Count): New, replace
	Default_Attribute_Count.


Modified:
    trunk/gcc/ada/ChangeLog
    trunk/gcc/ada/a-tasatt.adb
    trunk/gcc/ada/exp_ch7.adb
    trunk/gcc/ada/exp_smem.adb
    trunk/gcc/ada/s-parame-hpux.ads
    trunk/gcc/ada/s-parame-vms-alpha.ads
    trunk/gcc/ada/s-parame-vms-ia64.ads
    trunk/gcc/ada/s-parame-vxworks.ads
    trunk/gcc/ada/s-parame.ads
    trunk/gcc/ada/s-tasini.adb
    trunk/gcc/ada/s-tasini.ads
    trunk/gcc/ada/s-taskin.ads
    trunk/gcc/ada/s-tassta.adb
    trunk/gcc/ada/s-tataat.adb
    trunk/gcc/ada/s-tataat.ads
    trunk/gcc/ada/s-tporft.adb
    trunk/gcc/ada/sem.ads
    trunk/gcc/ada/sem_ch8.adb