1. 02 Aug, 2011 40 commits
    • [multiple changes] · 052e0603
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* exp_ch9.adb, exp_sel.adb, restrict.ads, exp_disp.adb, erroutc.ads,
      	exp_ch3.adb: Minor reformatting.
      
      2011-08-02  Emmanuel Briot  <briot@adacore.com>
      
      	* adaint.c (__gnat_locate_exec_on_path): only returns executable
      	files, not any regular file.
      	(__gnat_locate_file_with_predicate): new subprogram.
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* sinfo.adb, sinfo.ads: Restrict the use of flags
      	Has_Dynamic_Length_Check and Has_Dynamic_Range_Check to expression
      	nodes, plus N_Subtype_Declaration for the 2nd one.
      
      From-SVN: r177180
      Arnaud Charlet committed
    • [multiple changes] · 4fbad0ba
      2011-08-02  Sergey Rybin  <rybin@adacore.com>
      
      	* gnat_rm.texi: Ramification of pragma Eliminate documentation
      	 - fix bugs in the description of Source_Trace;
      	 - get rid of UNIT_NAME;
      
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_ch9.adb
      	(Build_Dispatching_Requeue): Adding support for VM targets
      	since we cannot directly reference the Tag entity.
      	* exp_sel.adb (Build_K): Adding support for VM targets.
      	(Build_S_Assignment): Adding support for VM targets.
      	* exp_disp.adb
      	(Default_Prim_Op_Position): In VM targets do not restrict availability
      	of predefined interface primitives to compiling in Ada 2005 mode.
      	(Is_Predefined_Interface_Primitive): In VM targets this service is not
      	restricted to compiling in Ada 2005 mode.
      	(Make_VM_TSD): Generate code that declares and initializes the OSD
      	record. Needed to support dispatching calls through synchronized
      	interfaces.
      	* exp_ch3.adb
      	(Make_Predefined_Primitive_Specs): Enable generation of predefined
      	primitives associated with synchronized interfaces.
      	(Make_Predefined_Primitive_Bodies): Enable generation of predefined
      	primitives associated with synchronized interfaces.
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* par-ch11.adb (P_Handled_Sequence_Of_Statements): mark a sequence of
      	statements hidden in SPARK if preceded by the HIDE directive
      	(Parse_Exception_Handlers): mark each exception handler in a sequence of
      	exception handlers as hidden in SPARK if preceded by the HIDE directive
      	* par-ch6.adb (P_Subprogram): mark a subprogram body hidden in SPARK
      	if starting with the HIDE directive
      	* par-ch7.adb (P_Package): mark a package body hidden in SPARK if
      	starting with the HIDE directive; mark the declarations in a private
      	part as hidden in SPARK if the private part starts with the HIDE
      	directive
      	* restrict.adb, restrict.ads
      	(Set_Hidden_Part_In_SPARK): record a range of slocs as hidden in SPARK
      	(Is_In_Hidden_Part_In_SPARK): new function which returns whether its
      	argument node belongs to a part which is hidden in SPARK
      	(Check_SPARK_Restriction): do not issue violations on nodes in hidden
      	parts in SPARK; protect the possibly costly call to
      	Is_In_Hidden_Part_In_SPARK by a check that the SPARK restriction is on
      	* scans.ads (Token_Type): new value Tok_SPARK_Hide in enumeration
      	* scng.adb (Accumulate_Token_Checksum_GNAT_6_3,
      	Accumulate_Token_Checksum_GNAT_5_03): add case for new token
      	Tok_SPARK_Hide.
      	(Scan): recognize special comment starting with '#' and followed by
      	SPARK keyword "hide" as a HIDE directive.
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* types.ads, erroutc.ads: Minor reformatting.
      
      2011-08-02  Vincent Celier  <celier@adacore.com>
      
      	* link.c: Add response file support for cross platforms.
      
      From-SVN: r177179
      Arnaud Charlet committed
    • sem_aggr.adb (Resolve_Array_Aggregate): when copying the expression in an association... · 6ff6152d
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_aggr.adb (Resolve_Array_Aggregate): when copying the expression
      	in an association, set parent field of copy before partial analysis.
      	* sem_res.adb (Resolve_Slice): create reference to itype only when
      	expansion is enabled.
      
      From-SVN: r177178
      Ed Schonberg committed
    • einfo.adb, einfo.ads (Body_Is_In_ALFA, [...]): get/set for new flag denoting… · 975c6896
      einfo.adb, einfo.ads (Body_Is_In_ALFA, [...]): get/set for new flag denoting which subprogram bodies are in ALFA
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* einfo.adb, einfo.ads (Body_Is_In_ALFA, Set_Body_Is_In_ALFA): get/set
      	for new flag denoting which subprogram bodies are in ALFA
      	* restrict.adb, sem_ch7.adb: Update comment
      	* sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb,
      	sem_ch9.adb, sem_res.adb: Add calls to
      	Current_Subprogram_Body_Is_Not_In_ALFA on unsupported constructs.
      	* sem_ch6.adb (Analyze_Function_Return): add calls to
      	Current_Subprogram_Body_Is_Not_In_ALFA on return statement in the
      	middle of the body, and extended return.
      	(Check_Missing_Return): add calls to Set_Body_Is_In_ALFA with argument
      	False when missing return.
      	(Analyze_Subprogram_Body_Helper): initialize the flag Body_Is_In_ALFA
      	to True for subprograms whose spec is in ALFA. Remove later on the flag
      	on the entity used for a subprogram body when there exists a separate
      	declaration.
      	* sem_util.adb, sem_util.ads (Current_Subprogram_Body_Is_Not_In_ALFA):
      	if Current_Subprogram is not Empty, set its flag Body_Is_In_ALFA to
      	False, otherwise do nothing.
      
      From-SVN: r177177
      Yannick Moy committed
    • [multiple changes] · afc8324d
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* inline.adb, stand.ads, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* sem_ch4.ads: minor formatting.
      
      From-SVN: r177176
      Arnaud Charlet committed
    • sem_aggr.adb, [...]: cleanup of SPARK mode · 2ba431e5
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* sem_aggr.adb, err_vars.ads, sem_ch3.adb, sem_ch5.adb, sem_ch9.adb,
      	debug.adb, sem_util.adb, sem_res.adb, sem_attr.adb, gnat1drv.adb,
      	errout.adb, errout.ads, exp_ch6.adb, sem_ch4.adb, restrict.adb,
      	restrict.ads, sem_ch6.adb, sem_ch8.adb, sem_ch11.adb,
      	opt.ads: cleanup of SPARK mode
      
      From-SVN: r177175
      Yannick Moy committed
    • cstand.adb (Create_Standard): sets Is_In_ALFA component of standard types. · 0f853035
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* cstand.adb (Create_Standard): sets Is_In_ALFA component of standard
      	types.
      	* einfo.adb, einfo.ads (Is_In_ALFA): add flag for all entities
      	(Is_In_ALFA, Set_Is_In_ALFA): new subprograms to access flag Is_In_ALFA
      	* sem_ch3.adb
      	(Analyze_Object_Declaration): set Is_In_ALFA flag for objects
      	(Constrain_Enumeration): set Is_In_ALFA flag for enumeration subtypes
      	(Constrain_Integer): set Is_In_ALFA flag for integer subtypes
      	(Enumeration_Type_Declaration): set Is_In_ALFA flag for enumeration
      	types.
      	(Set_Scalar_Range_For_Subtype): unset Is_In_ALFA flag for subtypes with
      	non-static range.
      	* sem_ch6.adb (Analyze_Return_Type): unset Is_In_ALFA flag for
      	functions whose return type is not in ALFA.
      	(Analyze_Subprogram_Specification): set Is_In_ALFA flag for subprogram
      	specifications.
      	(Process_Formals): unset Is_In_ALFA flag for subprograms if a
      	parameter's type is not in ALFA.
      	* stand.ads (Standard_Type_Is_In_ALFA): array defines which standard
      	types are in ALFA.
      
      From-SVN: r177174
      Yannick Moy committed
    • sem_ch6 (Analyze_Expression_Function): treat the function as Inline_Always... · d2b10647
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_ch6 (Analyze_Expression_Function): treat the function as
      	Inline_Always, and introduce a subprogram declaration for it when it is
      	not a completion.
      	* inline.adb (Add_Inlined_Body): recognize bodies that come from
      	expression functions, so that the back-end can determine whether they
      	can in fact be inlined.
      	* sem_util.adb (Is_Expression_Function): predicate to determine whether
      	a function body comes from an expression function.
      
      From-SVN: r177173
      Ed Schonberg committed
    • [multiple changes] · c7b9d548
      2011-08-02  Gary Dismukes  <dismukes@adacore.com>
      
      	* sem_ch6.adb (Check_Conformance): Revise the check for nonconforming
      	null exclusions to test Can_Never_Be_Null on the anonymous access types
      	of the formals rather than testing the formals themselves. Exclude this
      	check in cases where the Old_Formal is marked as a controlling formal,
      	to avoid issuing spurious errors for bodies completing dispatching
      	operations (due to the flag not getting set on controlling access
      	formals in body specs).
      	(Find_Corresponding_Spec): When checking full and subtype conformance of
      	subprogram bodies in instances, pass Designated and E in that order, for
      	consistency with the expected order of the formals (New_Id followed by
      	Old_Id).
      
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* sem_ch8.adb: Minor reformatting.
      
      From-SVN: r177172
      Arnaud Charlet committed
    • [multiple changes] · 1138cf59
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_ch8.adb (Analyze_Subprogram_Renaming): new procedure
      	Check_Class_Wide_Actual, to implement AI05-0071, on defaulted
      	primitive operations of class-wide actuals.
      
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_atag.ads, exp_atag.adb
      	(Build_Common_Dispatching_Select_Statements): Remove argument Loc
      	since its value is implicitly passed in argument Typ.
      	* exp_disp.adb (Make_Disp_Conditional_Select_Body,
      	Make_Disp_Timed_Select_Body): Remove Loc in calls to routine
      	Build_Common_Dispatching_Select_Statements.
      
      From-SVN: r177171
      Arnaud Charlet committed
    • gimple.c (canonicalize_cond_expr_cond): Handle cast from boolean-type. · 9b80d091
      	* gimple.c (canonicalize_cond_expr_cond): Handle cast from
      	boolean-type.
      	(ssa_forward_propagate_and_combine): Interprete result of
      	forward_propagate_comparison.
      	* gcc/gimple-fold.c (fold_gimple_assign): Add canonicalization for
      	boolean-typed operands for comparisons.
      
      	* gcc.dg/tree-ssa/forwprop-15.c: New testcase.
      
      From-SVN: r177170
      Kai Tietz committed
    • sem_ch3.adb, [...]: Update comments. · 7b9db926
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* sem_ch3.adb, exp_atag.ads, get_scos.adb, get_scos.ads,
      	exp_disp.adb, lib-xref.adb, lib-xref.ads: Update comments.
      	Minor reformatting.
      
      From-SVN: r177169
      Robert Dewar committed
    • [multiple changes] · e8374e7a
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* sem_res.adb: Minor reformatting.
      	* sem_prag.adb: Minor reformatting.
      
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_atag.adb, exp_atags.ads
      	(Build_Common_Dispatching_Select_Statement): Replace argument DT_Ptr
      	by the tagged type Entity. Required to use this routine in the VM
      	targets since we do not have available the Tag entity in the VM
      	platforms.
      	* exp_ch6.adb
      	(Expand_N_Subprogram_Body): Do not invoke Build_VM_TSDs if package
      	Ada.Tags has not been previously loaded.
      	* exp_ch7.adb
      	(Expand_N_Package_Declaration, Expand_N_Package_Body): Do not invoke
      	Build_VM_TSDs if package Ada.Tags has not been previously loaded.
      	* sem_aux.adb
      	(Enclosing_Dynamic_Scope): Add missing support to handle the full
      	view of enclosing scopes. Required to handle enclosing scopes that
      	are synchronized types whose full view is a task type.
      	* exp_disp.adb
      	(Build_VM_TSDs): Minor code improvement to avoid generating and
      	analyzing lists with empty nodes.
      	(Make_Disp_Asynchronous_Select_Body): Add support for VM targets.
      	(Make_Disp_Conditional_Select_Body): Add support for VM targets.
      	(Make_Disp_Get_Prim_Op_Kind): Add support for VM targets.
      	(Make_Disp_Timed_Select_Body): Add support for VM targets.
      	(Make_Select_Specific_Data_Table): Add support for VM targets.
      	(Make_VM_TSD): Generate code to initialize the SSD structure of
      	the TSD.
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* lib-writ.adb (Write_ALI): when ALFA mode is set, write local
      	cross-references section in ALI.
      	* lib-xref.adb, lib-xref.ads (Xref_Entry): add components Sub
      	(enclosing subprogram), Slc (location of Sub) and Sun (unit number of
      	Sub).
      	(Enclosing_Subprogram_Or_Package): new function to return the enclosing
      	subprogram or package entity of a node
      	(Is_Local_Reference_Type): new function returns True for references
      	selected in local cross-references.
      	(Lt): function extracted from Lt in Output_References
      	(Write_Entity_Name): function extracted from Output_References
      	(Generate_Definition): generate reference with type 'D' for definition
      	of objects (object declaration and parameter specification), with
      	appropriate locations and units, for use in local cross-references.
      	(Generate_Reference): update fields Sub, Slc and Sun. Keep newly created
      	references of type 'I' for initialization in object definition.
      	(Output_References): move part of function Lt and procedure
      	Write_Entity_Name outside of the body. Ignore references of types 'D'
      	and 'I' introduced for local cross-references.
      	(Output_Local_References): new procedure to output the local
      	cross-references sections.
      	(Lref_Entity_Status): new array defining whether an entity is a local
      	* sem_ch3.adb (Analyze_Object_Declaration): call Generate_Reference
      	with 'I' type when initialization expression is present.
      	* get_scos.adb, get_scos.ads: Correct comments and typos
      
      From-SVN: r177168
      Arnaud Charlet committed
    • [multiple changes] · 1f6439e3
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_ch6.adb (Expand_N_Subprogram_Body): Enable generation of TSDs in
      	the JVM target.
      	* exp_ch7.adb (Expand_N_Package_Body): Enable generation of TSDs in
      	the JVM target.
      	* exp_disp.adb (Build_VM_TSDs): No action needed if the runtime has no
      	TSD support.
      
      2011-08-02  Vincent Celier  <celier@adacore.com>
      
      	* prj-nmsc.adb (File_Found): New components Excl_File and Excl_Line
      	(No_Space_Img): New function
      	(Find_Excluded_Sources): When reading from a file, record the file name
      	and the line number for each excluded source.
      	(Mark_Excluded_Sources): When reporting an error, if the excluded
      	sources were read from a file, include file name and line number in
      	the error message.
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_res.adb (Resolve_Call): implement rule in RM 12.5.1 (23.3/2).
      
      From-SVN: r177167
      Arnaud Charlet committed
    • Check __x86_64__ instead of __LP64__ for x86 futex. · c01ecafc
      2011-08-02  H.J. Lu  <hongjiu.lu@intel.com>
      
      	* config/linux/x86/futex.h: Check __x86_64__ instead of
      	__LP64__.
      
      From-SVN: r177166
      H.J. Lu committed
    • exp_ch7.adb [...]: Minor reformatting · ab027d28
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* exp_ch7.adb exp_ch6.adb, exp_disp.adb: Minor reformatting
      
      From-SVN: r177165
      Robert Dewar committed
    • exp_ch6.adb (Expand_N_Subprogram_Body): Temporarily restrict the generation of… · b3b28b0c
      exp_ch6.adb (Expand_N_Subprogram_Body): Temporarily restrict the generation of TSDs to the DOTNET compiler.
      
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_ch6.adb (Expand_N_Subprogram_Body): Temporarily restrict the
      	generation of TSDs to the DOTNET compiler.
      	* exp_ch7.adb (Expand_N_Package_Body): Temporarily restrict the
      	generation of TSDs to the DOTNET compiler.
      
      From-SVN: r177164
      Javier Miranda committed
    • exp_disp.ads (Build_VM_TSDs): Build the runtime Type Specific Data record of all… · 9732e886
      exp_disp.ads (Build_VM_TSDs): Build the runtime Type Specific Data record of all the tagged types declared...
      
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_disp.ads (Build_VM_TSDs): Build the runtime Type Specific Data
      	record of all the tagged types declared inside library level package
      	declarations, library level package bodies or library level subprograms.
      	* exp_disp.adb (Make_VM_TSD): New subprogram that builds the TSD
      	associated with a given tagged type.
      	(Build_VM_TSDs): New subprogram.
      	* exp_ch6.adb (Expand_N_Subprogram_Body): Generate TSDs records of main
      	compilation units that are subprograms.
      	* exp_ch7.adb (Expand_N_Package_Body): Generate TSDs of main
      	compilation units that are package bodies.
      	(Expand_N_Package_Declaration): Generate TSDs of the main compilation
      	units that are a package declaration or a package instantiation.
      	* exp_intr.adb (Expand_Dispatching_Constructor_Call): Minor code
      	reorganization to improve the error generated by the frontend when the
      	function Ada.Tags.Secondary_Tag is not available.
      	* rtsfind.ads (RE_Register_TSD): New runtime entity.
      	* exp_ch4.adb (Expand_N_Type_Conversion): Minor code cleanup.
      
      From-SVN: r177163
      Javier Miranda committed
    • [multiple changes] · e526d0c7
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_disp.adb (Make_DT): Generate call to Check_TSD in Ada 2005 mode.
      
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* s-imenne.ads: Minor reformatting.
      
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* a-stunau.ads: Add pragma Suppress_Initialization for Big_String
      	* freeze.adb (Warn_Overlay): Don't warn if initialization suppressed
      	* s-stalib.ads: Add pragma Suppress_Initialization for Big_String
      
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* einfo.ads (Materialize_Entity): Document this is only for renamings
      	* exp_ch3.adb (Expand_N_Object_Declaration): Make sure we generate
      	required debug information in the case where we transform the object
      	declaration into a renaming declaration.
      	* exp_ch4.adb (Expand_Concatenate): Generate debug info for result
      	object
      	* exp_dbug.ads (Debug_Renaming_Declaration): Document setting of
      	Materialize_Entity.
      
      From-SVN: r177162
      Arnaud Charlet committed
    • einfo.ads, einfo.adb (Suppress_Initialization): Replaces Suppress_Init_Procs. · 5b1e6aca
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* einfo.ads, einfo.adb (Suppress_Initialization): Replaces
      	Suppress_Init_Procs.
      	* exp_ch3.adb, exp_disp.adb, freeze.adb: Use
      	Suppress_Initialization/Initialization_Suppressed.
      	* gnat_rm.texi: New documentation for pragma Suppress_Initialization
      	* sem_aux.ads, sem_aux.adb (Initialization_Suppressed): New function
      	* sem_dist.adb: Use Suppress_Initialization/Initialization_Suppressed
      	* sem_prag.adb: New processing for pragma Suppress_Initialization.
      
      From-SVN: r177161
      Robert Dewar committed
    • gnat_rm.texi, [...]: Minor reformatting. · 5ad4969d
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* gnat_rm.texi, a-tags.ads, sem_prag.adb, sem_ch12.adb, exp_disp.adb:
      	Minor reformatting.
      
      From-SVN: r177160
      Robert Dewar committed
    • [multiple changes] · 8c4ee6f5
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_prag.adb (Chain_PPC): Implement AI04-0230: null procedures can
      	only have inheritable classwide pre/postconditions.
      
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* a-tags.ads, a-tags.adb (Check_TSD): New subprogram.
      	* rtsfind.ads (RE_Check_TSD): New runtime entity.
      	* exp_disp.adb (Make_DT): Generate call to the new runtime routine that
      	checks if the external tag of a type is the same as the external tag
      	of some other declaration.
      
      From-SVN: r177159
      Arnaud Charlet committed
    • [multiple changes] · 0b3d16c0
      2011-08-02  Thomas Quinot  <quinot@adacore.com>
      
      	* s-taskin.ads: Minor reformatting.
      
      2011-08-02  Emmanuel Briot  <briot@adacore.com>
      
      	* g-comlin.adb (Display_Help): swap the order in which it prints the
      	short help and the general usage.
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_ch12.adb (Analyze_Generic_Subprogram_Declaration): copy properly
      	the aspect declarations and attach them to the generic copy for
      	subsequent analysis.
      	(Analyze_Subprogram_Instantiation): copy explicitly the aspect
      	declarations of the generic tree to the new subprogram declarations.
      	* sem_attr.adb (Check_Precondition_Postcondition): recognize
      	conditions that apply to a subprogram instance.
      
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* gnat_rm.texi: Clarify doc on pragma Source_File_Name[_Project].
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_ch3.adb (Derived_Type_Declaration): When checking that a untagged
      	private type with a tagged full view is not derived in the immediate
      	scope of the partial view, (RM 7.3 (7)) use the scope of the base type.
      
      From-SVN: r177157
      Arnaud Charlet committed
    • [multiple changes] · 4637729f
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* exp_ch4.adb: Minor reformatting.
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_ch5.adb (Analyze_Loop_Statement):  If the iteration scheme is an
      	Ada2012 iterator, the loop will be rewritten during expansion into a
      	while loop with a cursor and an element declaration. Do not analyze the
      	body in this case, because if the container is for indefinite types the
      	actual subtype of the elements will only be determined when the cursor
      	declaration is analyzed.
      
      2011-08-02  Arnaud Charlet  <charlet@adacore.com>
      
      	* sem_ch13.adb (Analyze_Attribute_Definition_Clause): Ignore
      	size/alignment related attributes in CodePeer_Mode.
      
      2011-08-02  Gary Dismukes  <dismukes@adacore.com>
      
      	* sem_ch3.adb (Check_Ops_From_Incomplete_Type): Remove call to
      	Prepend_Element, since this can result in the operation getting the
      	wrong slot in the full type's dispatch table if the full type has
      	inherited operations. The incomplete type's operation will get added
      	to the proper position in the full type's primitives
      	list later in Sem_Disp.Check_Operation_From_Incomplete_Type.
      	(Process_Incomplete_Dependents): Add Is_Primitive test when checking for
      	dispatching operations, since there are cases where nonprimitive
      	subprograms can get added to the list of incomplete dependents (such
      	as subprograms in nested packages).
      	* sem_ch6.adb (Process_Formals): First, remove test for being in a
      	private part when determining whether to add a primitive with a
      	parameter of a tagged incomplete type to the Private_Dependents list.
      	Such primitives can also occur in the visible part, and should not have
      	been excluded from being private dependents.
      	* sem_ch7.adb (Uninstall_Declarations): When checking the rule of
      	RM05-3.10.1(9.3/2), test that a subprogram in the Private_Dependents
      	list of a Taft-amendment incomplete type is a primitive before issuing
      	an error that the full type must appear in the same unit. There are
      	cases where nonprimitives can be in the list (such as subprograms in
      	nested packages).
      	* sem_disp.adb (Derives_From): Use correct condition for checking that
      	a formal's type is derived from the type of the corresponding formal in
      	the parent subprogram (the condition was completely wrong). Add
      	checking that was missing for controlling result types being derived
      	from the result type of the parent operation.
      
      From-SVN: r177156
      Arnaud Charlet committed
    • errout.adb (First_Node): minor renaming · 4c60de0c
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* errout.adb (First_Node): minor renaming
      	* restrict.adb (Check_Formal_Restriction): put restriction warning on
      	first node.
      
      From-SVN: r177155
      Yannick Moy committed
    • [multiple changes] · f5afb270
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* sem_res.adb (Resolve_Logical_Op): ensure N is a binary operator
      	before accessing operands.
      	* sem_util.adb (Is_SPARK_Initialization_Expr): follow original nodes to
      	decide whether an initialization expression respects SPARK rules, as
      	the plain node is the expanded one. This allows for more valid warnings
      	to be issued.
      	* gnat_rm.texi: Minor update.
      
      2011-08-02  Arnaud Charlet  <charlet@adacore.com>
      
      	* sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Revert
      	previous change.
      
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* sem_ch3.adb, sem_ch4.adb: Minor reformatting.
      
      2011-08-02  Hristian Kirtchev  <kirtchev@adacore.com>
      
      	* exp_ch5.adb (Expand_Iterator_Loop): Reformatting. Wrap the original
      	loop statements and the element renaming declaration with a block when
      	the element type is controlled.
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* sinfo.ads: Minor formatting.
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_aggr.adb (Add_Association): if the association has a box and no
      	expression, use the Sloc of the aggregate itself for the new
      	association.
      	* errout.adb (First_Node): Exclude nodes with no Sloc, and always use
      	the Original_Node.
      
      From-SVN: r177153
      Arnaud Charlet committed
    • [multiple changes] · db72f10a
      2011-08-02  Hristian Kirtchev  <kirtchev@adacore.com>
      
      	* exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and refactoring.
      	When a container is provided via a function call, generate a renaming
      	of the function result. This avoids the creation of a transient scope
      	and the premature finalization of the container.
      	* exp_ch7.adb (Is_Container_Cursor): Removed.
      	(Wrap_Transient_Declaration): Remove the supression of the finalization
      	of the list controller when the declaration denotes a container cursor,
      	it is not needed.
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* restrict.adb (Check_Formal_Restriction): only issue a warning if the
      	node is from source, instead of the original node being from source.
      	* sem_aggr.adb
      	(Resolve_Array_Aggregate): refine the check for a static expression, to
      	recognize also static ranges
      	* sem_ch3.adb, sem_ch3.ads (Analyze_Component_Declaration,
      	Array_Type_Declaration): postpone the test for the type being a subtype
      	mark after the type has been resolved, so that component-selection and
      	expanded-name are discriminated.
      	(Make_Index, Process_Range_Expr_In_Decl): add a parameter In_Iter_Schm
      	to distinguish the case of an iteration scheme, so that an error is
      	issed on a non-static range in SPARK except in an iteration scheme.
      	* sem_ch5.adb (Analyze_Iteration_Scheme): call Make_Index with
      	In_Iter_Schm = True.
      	* sem_ch6.adb (Analyze_Subprogram_Specification): refine the check for
      	user-defined operators so that they are allowed in renaming
      	* sem_ch8.adb
      	(Find_Selected_Component): refine the check for prefixing of operators
      	so that they are allowed in renaming. Move the checks for restrictions
      	on selector name after analysis discriminated between
      	component-selection and expanded-name.
      	* sem_res.adb (Resolve_Op_Concat_Arg): do not issue a warning on
      	concatenation argument of string type if it is static.
      	* sem_util.adb, sem_util.ads
      	(Check_Later_Vs_Basic_Declarations): add a new function
      	Is_Later_Declarative_Item to decice which declarations are allowed as
      	later items, in the two different modes Ada 83 and SPARK. In the SPARK
      	mode, add that renamings are considered as later items.
      	(Enclosing_Package): new function to return the enclosing package
      	(Enter_Name): correct the rule for homonyms in SPARK
      	(Is_SPARK_Initialization_Expr): default to returning True on nodes not
      	from source (result of expansion) to avoid issuing wrong warnings.
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* errout.adb: On anything but an expression First_Node returns its
      	argument.
      
      From-SVN: r177152
      Arnaud Charlet committed
    • [multiple changes] · 23685ae6
      2011-08-02  Pascal Obry  <obry@adacore.com>
      
      	* prj-proc.adb, make.adb, makeutl.adb: Minor reformatting.
      
      2011-08-02  Hristian Kirtchev  <kirtchev@adacore.com>
      
      	* exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and reorganization.
      	Set the associated loop as the related expression of internally
      	generated cursors.
      	* exp_ch7.adb (Is_Container_Cursor): New routine.
      	(Wrap_Transient_Declaration): Supress the finalization of the list
      	controller when the declaration denotes a container cursor.
      
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* opt.ads (SPARK_Mode): update comment, SPARK_Mode only set through
      	command line now.
      	* par-ch3.adb (P_Delta_Constraint): remove check in SPARK mode that the
      	expression is a simple expression. This check cannot be performed in
      	the semantics, so just drop it.
      	(P_Index_Or_Discriminant_Constraint): move check that the index or
      	discriminant is a subtype mark to Analyze_Subtype_Declaration in the
      	semantics. Other cases were previously checked in the semantics.
      	* par-ch4.adb (P_Name): move checks that a selector name is not
      	character literal or an operator symbol to Find_Selected_Component in
      	the semantics
      	* par-ch5.adb (Parse_Decls_Begin_End): move check that basic
      	declarations are not placed after later declarations in a separate
      	procedure in Sem_Util (possibly not the best choice?), to be used both
      	during parsing, for Ada 83 mode, and during semantic analysis, for
      	SPARK mode.
      	* par-endh.adb (Check_End): move check that end label is not missing
      	to Process_End_Label in the semantics
      	* par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): remove
      	the special case for SPARK restriction
      	* par.adb: use and with Sem_Util, for use in Parse_Decls_Begin_End
      	* restrict.adb, restrict.ads (Check_Formal_Restriction): add a
      	parameter Force to issue the error message even on internal node (used
      	for generated end label). Call Check_Restriction to check when an error
      	must be issued. In SPARK mode, issue an error message even if the
      	restriction is not set.
      	(Check_Restriction): new procedure with an additional out parameter to
      	inform the caller that a message has been issued
      	* sem_aggr.adb: Minor modification of message
      	* sem_attr.adb (Analyze_Attribute): call Check_Formal_Restriction
      	instead of issuing an error message directly
      	* sem_ch3.adb (Analyze_Declarations): move here the check that basic
      	declarations are not placed after later declarations, by calling
      	Check_Later_Vs_Basic_Declarations
      	(Analyze_Subtype_Declaration): move here the check that an index or
      	discriminant constraint must be a subtype mark. Change the check that
      	a subtype of String must start at one so that it works on subtype marks.
      	* sem_ch4.adb (Analyze_Call): move here the check that a named
      	association cannot follow a positional one in a call
      	* sem_ch5.adb (Check_Unreachable_Code): call Check_Formal_Restriction
      	instead of issuing an error message directly
      	* sem_ch8.adb (Find_Selected_Component): move here the check that a
      	selector name is not a character literal or an operator symbol. Move
      	here the check that the prefix of an expanded name cannot be a
      	subprogram or a loop statement.
      	* sem_util.adb, sem_util.ads (Check_Later_Vs_Basic_Declarations): new
      	procedure called from parsing and semantics to check that basic
      	declarations are not placed after later declarations
      	(Process_End_Label): move here the check that end label is not missing
      
      2011-08-02  Arnaud Charlet  <charlet@adacore.com>
      
      	* sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Ignore enum
      	representation clause in codepeer mode, since it confuses CodePeer and
      	does not bring useful info.
      
      2011-08-02  Ed Falis  <falis@adacore.com>
      
      	* init.c: initialize fp hw on MILS.
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* errout.adb (First_Node): for bodies, return the node itself (small
      	optimization). For other nodes, do not check source_unit if the node
      	comes from Standard.
      
      From-SVN: r177151
      Arnaud Charlet committed
    • [multiple changes] · d2d9cc22
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* exp_ch3.adb: Minor comment additions.
      	* sem_ch13.adb: Minor reformatting.
      
      2011-08-02  Arnaud Charlet  <charlet@adacore.com>
      
      	* exp_pakd.adb (Expand_Packed_Element_Reference): Revert previous change
      
      2011-08-02  Pascal Obry  <obry@adacore.com>
      
      	* make.adb, makeutl.adb: Removes some superfluous directory separator.
      
      From-SVN: r177150
      Arnaud Charlet committed
    • Refine previous change. · c32d4bcf
      From-SVN: r177149
      Arnaud Charlet committed
    • Fix bootstrap with g++ · 76e5271b
      From-SVN: r177148
      Arnaud Charlet committed
    • [multiple changes] · a01b9df6
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* sem_attr.adb: Minor reformatting.
      
      2011-08-02  Ed Falis  <falis@adacore.com>
      
      	* init.c: Revert previous change.
      
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* einfo.adb (Has_Default_Aspect): Replaces Has_Default_Value
      	(Has_Default_Component_Value): Removed
      	* einfo.ads Comment updates
      	(Has_Default_Aspect): Replaces Has_Default_Value
      	(Has_Default_Component_Value): Removed
      	* exp_ch13.adb
      	(Expand_N_Freeze_Entity): Handle Default[_Component]_Value aspects
      	* exp_ch3.adb
      	(Build_Array_Init_Proc): Handle Default_[Component_]Value aspects
      	(Get_Simple_Init_Val): Handle Default_Value aspect
      	(Needs_Simple_Initialization): Handle Default_Value aspect
      	* exp_ch3.ads: Needs_Simple_Initialization
      	* freeze.adb (Freeze_Entity): Handle Default_[Component_]Value aspect
      	* par-prag.adb (Pragma_Default[_Component]Value) Removed
      	* sem_ch13.adb
      	(Analyze_Aspect_Specifications): Fix Default[_Component]_Value aspects
      	* sem_prag.adb (Pragma_Default[_Component]Value) Removed
      	* snames.ads-tmpl (Pragma_Default[_Component]Value) Removed
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_ch5.adb (Analyze_Iterator_Specification): use base type to locate
      	package containing iteration primitives.
      	exp_ch5.adb (Expand_Iterator_Loop): ditto.
      
      From-SVN: r177147
      Arnaud Charlet committed
    • [multiple changes] · 75c90775
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_ch5.adb (Analyze_Iteration_Scheme): For an Ada2012 iterator with
      	"of", pre-analyze expression in case it is a function call with
      	finalization actions that must be placed ahead of the loop.
      	* exp_ch5.adb (Expand_Iterator_Loop): If condition_actions are present
      	on an Ada2012 iterator, insert them ahead of the rewritten loop.
      
      2011-08-02  Geert Bosch  <bosch@adacore.com>
      
      	* cstand.adb (Create_Float_Types): Only consider C's long double for
      	Long_Long_Float, in addition to double.
      
      From-SVN: r177146
      Arnaud Charlet committed
    • [multiple changes] · ded8909b
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* sem_ch3.adb, sem_ch5.adb, sem_type.adb, switch-c.adb, switch-c.ads,
      	sem_prag.adb, sem_util.adb, sem_util.ads, sem_res.adb, warnsw.ads,
      	prepcomp.ads, cstand.adb, stand.ads, a-calfor.adb, s-stusta.adb:
      	Minor reformatting.
      
      2011-08-02  Ed Schonberg  <schonberg@adacore.com>
      
      	* sem_attr.adb: handle properly 'Result when it is a prefix of an
      	indexed component.
      
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* einfo.ads, einfo.adb
      	(Original_Access_Type): Move this attribute to Node26 since there was
      	an undocumented use of Node21 in E_Access_Subprogram_Type entities
      	which causes conflicts and breaks the generation of the .NET compiler.
      	(Interface_Name): Add missing documentation on JGNAT only uses of
      	this attribute.
      
      From-SVN: r177145
      Arnaud Charlet committed
    • [multiple changes] · 70c34e1c
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_pakd.adb (Expand_Packed_Element_Reference): Disable this routine
      	in CodePeer mode.
      
      2011-08-02  Geert Bosch  <bosch@adacore.com>
      
      	* cstand.adb (Back_End_Float_Types): Use Elist instead of Nlist
      	(Find_Back_End_Float_Type): Likewise
      	(Create_Back_End_Float_Types): Likewise
      	(Create_Float_Types): Likewise
      	(Register_Float_Type): Likewise
      	* sem_ch3.adb (Floating_Point_Type_Declaration): Use Elist instead of
      	Nlist and split out type selection in new local Find_Base_Type function.
      	* sem_prag.adb (Process_Import_Predefined_Type): Use Elist instead of
      	Nlist
      	* stand.ads (Predefined_Float_Types): Use Elist instead of Nlist
      
      2011-08-02  Robert Dewar  <dewar@adacore.com>
      
      	* inline.adb: Minor code reorganization (put Get_Code_Unit_Entity in
      	alpha order).
      	* opt.ads: Minor comment change.
      	* sem_ch12.adb: Minor code reorganization.
      
      From-SVN: r177144
      Arnaud Charlet committed
    • Update dependencies. · 0f1af881
      From-SVN: r177143
      Arnaud Charlet committed
    • [multiple changes] · b715bc59
      2011-08-02  Gary Dismukes  <dismukes@adacore.com>
      
      	* sem_ch3.adb (Complete_Private_Subtype): Don't append the private
      	subtype's list of rep items to the list on the full subtype in the case
      	where the lists are the same.
      
      2011-08-02  Geert Bosch  <bosch@adacore.com>
      
      	* switch-c.adb (Free): New deallocation procedure to avoid implicitly
      	using the one from System.Strings, which also deallocates all strings.
      
      From-SVN: r177142
      Arnaud Charlet committed
    • [multiple changes] · 002bdd68
      2011-08-02  Geert Bosch  <bosch@adacore.com>
      
      	* gcc-interface/gigi.h, gcc-interface/misc.c (enumerate_modes): New
      	function.
      	* gcc-interface/Make-lang.in: Update dependencies.
      
      2011-08-02  Olivier Hainque  <hainque@adacore.com>
      
      	* gcc-interface/trans.c (Subprogram_Body_to_gnu): Set the function
      	end_locus.
      
      From-SVN: r177141
      Arnaud Charlet committed
    • [multiple changes] · 499769ec
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* sem_ch3.adb (Check_Anonymous_Access_Components): Create extra formals
      	associated with anonymous access to subprograms.
      
      2011-08-02  Geert Bosch  <bosch@adacore.com>
      
      	* opt.ads
      	(Preprocessing_Symbol_Defs): Move from Prepcomp.Symbol_Definitions.
      	(Preprocessing_Symbol_Last): Move from Prepcomp.Last_Definition.
      	* prepcomp.adb (Symbol_Definitions, Last_Definition): Move to opt.ads
      	(Add_Symbol_Definition): Move to switch-c.adb
      	(Process_Command_Line_Symbol_Definitions): Adjust references to above.
      	* prepcomp.ads: Remove dependency on Ada.Unchecked_Deallocation.
      	(Add_Symbol_Definition): Move to switch-c.adb.
      	* sem_ch13.adb, sem_prag.adb: Add dependency on Warnsw.
      	* sem_warn.adb
      	(Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
      	Move to warnsw.adb.
      	* sem_warn.ads (Warn_On_Record_Holes, Warn_On_Overridden_Size,
      	Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
      	Move to warnsw.adb.
      	* switch-c.adb: Replace dependency on Prepcomp and Sem_Warn by Warnsw.
      	(Add_Symbol_Definition): Moved from Prepcomp.
      	* switch-c.ads: Update copyright notice. Use String_List instead of
      	Argument_List, removing dependency on System.OS_Lib.
      
      From-SVN: r177140
      Arnaud Charlet committed
    • [multiple changes] · aa1e353a
      2011-08-02  Yannick Moy  <moy@adacore.com>
      
      	* sem_ch3.adb (Analyze_Object_Declaration): issue an error in formal
      	mode on initialization expression which does not respect SPARK
      	restrictions.
      	* sem_util.adb, sem_util.ads (Is_SPARK_Initialization_Expr): determines
      	if the tree referenced by its argument represents an initialization
      	expression in SPARK, suitable for initializing an object in an object
      	declaration.
      
      2011-08-02  Javier Miranda  <miranda@adacore.com>
      
      	* exp_ch9.adb (Expand_Access_Protected_Subprogram_Type): Link the
      	internally generated access to subprogram with its associated protected
      	subprogram type.
      	* einfo.ads, einfo.adb (Original_Access_Type): New attribute.
      
      From-SVN: r177139
      Arnaud Charlet committed