1 2013-10-10 Thomas Quinot <quinot@adacore.com>
3 * exp_ch4.adb (Process_Transient_Object): For any context other
4 than a simple return statement, insert the finalization action
5 after the context, not as an action on the context (which will
6 get evaluated before it).
8 2013-10-10 Hristian Kirtchev <kirtchev@adacore.com>
10 * einfo.adb (Write_Field19_Name): Correct the
11 string name of attribute Default_Aspect_Value.
13 2013-10-10 Ed Schonberg <schonberg@adacore.com>
15 * sem_type.adb (Interface_Present_In_Ancestor): The progenitor
16 in a type declaration may be an interface subtype.
18 2013-10-10 Robert Dewar <dewar@adacore.com>
20 * sinfo.ads (Do_Range_Check): Add special note on handling of
21 range checks for Succ and Pred.
23 2013-10-10 Robert Dewar <dewar@adacore.com>
25 * erroutc.adb (Output_Msg_Text): Remove VMS special handling.
27 2013-10-10 Robert Dewar <dewar@adacore.com>
29 * a-chahan.ads, a-chahan.adb (Is_Line_Terminator): New function
30 (Is_Mark): New function.
31 (Is_Other_Format): New function.
32 (Is_Punctuation_Connector): New function.
33 (Is_Space): New function.
35 2013-10-10 Robert Dewar <dewar@adacore.com>
37 * sem_aggr.adb (Resolve_Array_Aggregate): Redo duplicate/missing
38 choice circuit. Was not quite right in some cases, which showed
39 up in ACATS test B43201C.
40 * sem_attr.adb (Address_Checks): Make sure name is set right
41 for some messages issued.
42 * mlib-prj.adb: Minor code reorganization.
43 * gnat_ugn.texi: Remove special VMS doc for tagging of warning msgs.
44 * exp_ch9.adb: Minor reformatting.
46 2013-10-10 Tristan Gingold <gingold@adacore.com>
48 * lib-writ.adb (Write_Unit_Information): Adjust previous patch.
50 2013-10-10 Robert Dewar <dewar@adacore.com>
52 * sem_ch5.adb (Analyze_If_Statement): Warn on redundant if
54 * sem_util.ads, sem_util.adb (Has_No_Obvious_Side_Effects): New
57 2013-10-10 Ed Schonberg <schonberg@adacore.com>
59 * exp_ch9.adb (Expand_N_Timed_Entry_Call): Simplify expansion
60 for the case of a dispatching trigger: there is no need to
61 duplicate the code or create a subprogram to encapsulate the
62 triggering statements. This allows exit statements in the
63 triggering statements, that refer to enclosing loops.
65 2013-10-10 Robert Dewar <dewar@adacore.com>
67 * freeze.adb: Minor reformatting.
68 * sem_ch13.adb (Freeze_Entity_Checks): New procedure
69 (Analyze_Freeze_Entity): Call Freeze_Entity_Checks
70 (Analyze_Freeze_Generic_Entity): Call Freeze_Entity_Checks.
71 * sinfo.ads: Add syntax for sprint for Freeze_Generic_Entity.
72 * sprint.ads: Add syntax for freeze generic entity node.
74 2013-10-10 Robert Dewar <dewar@adacore.com>
76 * einfo.adb, einfo.ads: Minor comment updates.
78 2013-10-10 Robert Dewar <dewar@adacore.com>
80 * lib-writ.adb (Write_Unit_Information): Fatal error if linker
81 options are detected in a predefined generic unit.
83 2013-10-10 Thomas Quinot <quinot@adacore.com>
85 * s-oscons-tmplt.c (CLOCK_REALTIME): Always define, possibly using
86 a dummy placeholder value.
87 (NEED_PTHREAD_CONDATTR_SETCLOCK): Remove, not needed anymore.
88 * thread.c: Adjust #if test accordingly.
90 2013-10-10 Hristian Kirtchev <kirtchev@adacore.com>
92 * exp_ch6.adb (Consequence_Error): Generate an
93 implicit if statement.
94 (Expand_Contract_Cases): Generate an implicit if statement.
95 (Process_Contract_Cases): Do not expand Contract_Cases when no code
98 2013-10-10 Robert Dewar <dewar@adacore.com>
100 * sem_attr.adb (Address_Checks): New procedure.
102 2013-10-10 Ed Schonberg <schonberg@adacore.com>
104 * sinfo.ads, sinfo.adb: New Node Freeze_Generic_Entity, to trigger
105 semantic actions at the proper point for entities that previously
106 had no explicit freeze point.
107 * freeze.adb (Freeze_Generic_Entities): generate new nodes to
108 indicate the point at which semantic checks can be performed on
109 entities declared in generic packages.
110 * sem_ch13.ads, sem_ch13.adb: New procedure
111 Analyze_Freeze_Generic_Entity.
112 * exp_util.adb (Insert_Actions): Treat new node like Freeze_Entity.
113 * sem.adb (Analyze): Call Analyze_Freeze_Generic_Entity.
114 * sprint.adb (Sprint_Node): display Analyze_Freeze_Generic_Entity.
115 * gcc-interface/trans.c: Ignore Analyze_Freeze_Generic_Entity.
116 * gcc-interface/Make-lang.in: Update dependencies.
118 2013-10-10 Robert Dewar <dewar@adacore.com>
120 * sem_aggr.adb (Resolve_Array_Aggregate): Identify duplicated
123 2013-10-10 Robert Dewar <dewar@adacore.com>
125 * sem_ch9.adb (Analyze_Task_Body): Aspects are illegal
126 (Analyze_Protected_Body): Aspects are illegal.
128 2013-10-10 Robert Dewar <dewar@adacore.com>
130 * sem_ch6.adb, sem_ch13.adb: Minor reformatting.
131 * sem_case.adb (Check_Choices): Fix bad listing of missing
132 values from predicated subtype case (Check_Choices): List
134 * errout.adb (Set_Msg_Text): Process warning tags in VMS mode
135 * erroutc.adb (Output_Msg_Text): Handle VMS warning tags
136 * gnat_ugn.texi: Document /WARNINGS=TAG_WARNINGS for VMS
137 * ug_words: Add entries for -gnatw.d and -gnatw.D
138 * vms_data.ads: Add [NO]TAG_WARNINGS for -gnatw.D/-gnatw.d
139 * lib-writ.ads: Documentation fixes
141 2013-10-10 Robert Dewar <dewar@adacore.com>
143 * a-wichha.adb, a-wichha.ads, a-zchhan.adb, a-zchhan.ads
144 (Is_Other_Format): New name for Is_Other.
145 (Is_Punctuation_Connector): New name for Is_Punctuation
147 2013-10-10 Hristian Kirtchev <kirtchev@adacore.com>
149 * aspects.adb: Add entries in table Canonical_Aspects for aspects
150 Refined_Depends and Refined_Global.
151 * aspects.ads: Add entries in tables Aspect_Id, Aspect_Argument,
152 Aspect_Names, Aspect_Declay, Aspect_On_Body_Or_Stub_OK for
153 aspects Refined_Depends and Refined_Global.
154 * einfo.adb (Contract): Subprogram bodies are now valid owners
156 (Set_Contract): Subprogram bodies are now valid
158 (Write_Field24_Name): Output the contract
159 attribute for subprogram bodies.
160 * exp_ch6.adb (Expand_Subprogram_Contract): New routine.
161 * exp_ch6.ads (Expand_Subprogram_Contract): New routine.
162 * par-prag.adb: Pragmas Refined_Depends and Refined_Global do
163 not require any special processing by the parser.
164 * sem_ch3.adb (Adjust_D): Renamed to Adjust_Decl.
165 (Analyze_Declarations): Code reformatting. Analyze the contract
166 of a subprogram body at the end of the declarative region.
167 * sem_ch6.adb (Analyze_Generic_Subprogram_Body):
168 Subprogram bodies can now have contracts. Use
169 Expand_Subprogram_Contract to handle the various contract
171 (Analyze_Subprogram_Body_Contract): New null routine.
172 (Analyze_Subprogram_Body_Helper): Subprogram bodies can now have
173 contracts. Use Expand_Subprogram_Contract to handle the various
175 (Analyze_Subprogram_Contract): Add local
176 variable Nam. Update the call to Analyze_PPC_In_Decl_Part. Capture
177 the pragma name in Nam.
178 (Process_PPCs): Removed.
179 * sem_ch6.ads (Analyze_Subprogram_Body_Contract): New routine.
180 (Analyze_Subprogram_Contract): Update the comment on usage.
181 * sem_ch13.adb (Analyze_Aspect_Specifications): Add null
182 implementations for aspects Refined_Depends and Refined_Global.
183 (Check_Aspect_At_Freeze_Point): Aspects Refined_Depends and
184 Refined_Global do not need to be checked at the freeze point.
185 * sem_prag.adb: Add entries in table Sig_Flags
186 for pragmas Refined_Depends and Refined_Global.
187 (Analyze_Contract_Cases_In_Decl_Part): Add local
188 variable Restore. Use Restore to pop the scope.
189 (Analyze_Depends_In_Decl_Part): Add local variable Restore. Use
190 Restore to pop the scope.
191 (Analyze_Global_In_Decl_List): Add local variable Restore. Use Restore
193 (Analyze_PPC_In_Decl_Part): Renamed to
194 Analyze_Pre_Post_Condition_In_Decl_Part.
196 Add null implementations for pragmas Refined_Depends and
197 Refined_Global. Refined_Pre and Refined_Post are now
198 handled by routine Analyze_Refined_Pre_Post_Condition
200 (Analyze_Refined_Depends_In_Decl_Part): New
202 (Analyze_Refined_Global_In_Decl_Part):
204 (Analyze_Refined_Pre_Post):
205 Renamed to Analyze_Refined_Pre_Post_Condition.
206 (Analyze_Refined_Pre_Post_Condition): Analyze the boolean
208 (Check_Precondition_Postcondition): Update the call
209 to Analyze_PPC_In_Decl_Part.
210 * sem_prag.ads: Add entries in table
211 Pragma_On_Body_Or_Stub_OK for pragmas Refined_Depends
213 (Analyze_PPC_In_Decl_Part): Renamed
214 to Analyze_Pre_Post_Condition_In_Decl_Part. Update the
216 (Analyze_Refined_Depends_In_Decl_Part): New routine.
217 (Analyze_Refined_Global_In_Decl_Part): New routine.
218 (Analyze_Test_Case_In_Decl_Part): Update the comment on usage.
219 * sem_util.adb (Add_Contract_Item): Rename formal Item to Prag
220 and update all occurrences. Subprogram body contracts can now
221 contain pragmas Refined_Depends and Refined_Global.
222 * sem_util.ads (Add_Contract_Item): Rename formal Item to
223 Prag. Update the comment on usage.
224 * sinfo.ads: Update the comment on structure and usage of
226 * snames.ads-tmpl: Add new predefined names for Refined_Depends
227 and Refined_Global. Add entries in table Pragma_Id for
228 Refined_Depends and Refined_Global.
230 2013-10-10 Robert Dewar <dewar@adacore.com>
232 * types.ads: Minor reformatting.
234 2013-10-10 Thomas Quinot <quinot@adacore.com>
236 * s-taprop-posix.adb: Add missing comment.
238 2013-10-10 Robert Dewar <dewar@adacore.com>
240 * freeze.adb (Freeze_Record_Type): Move choice checking to
241 Analyze_Freeze_Entity (Freeze_Record_Type): Make sure all choices
243 * sem_case.adb (Check_Choices): Remove misguided attempt to
244 freeze choices (this is now done in Freeze_Record_Type where
246 (Check_Choices): Remove some analyze/resolve calls
247 that are redundant since they are done in Analyze_Choices.
248 * sem_ch13.adb (Analyze_Freeze_Entity): Do the error
249 checking for choices in variant records here (moved here from
250 Freeze.Freeze_Record_Type)
252 2013-10-10 Thomas Quinot <quinot@adacore.com>
254 * s-oscons-tmplt.c, s-taprop-posix.adb (CLOCK_REALTIME): Always define,
255 possibly using a dummy placeholder value.
256 (Compute_Deadline): For the case of an
257 Absolute_Calendar deadline, if the target uses another clock
258 than CLOCK_REALTIME as CLOCK_RT_Ada, compensate for possible
261 2013-10-10 Ed Schonberg <schonberg@adacore.com>
263 * sem_ch8.adb (Find_Expanded_Name): Handle properly a fully
264 qualified reference to a generic child unit within itself,
267 2013-10-10 Pascal Obry <obry@adacore.com>
269 * prj-conf.adb: Minor typo fixes in comment.
271 2013-10-10 Thomas Quinot <quinot@adacore.com>
273 * s-taprop-posix.adb (Compute_Deadline): New local subprogram,
274 factors common code between Timed_Sleep and Timed_Delay.
276 2013-10-10 Robert Dewar <dewar@adacore.com>
278 * freeze.adb (Freeze_Record_Type): Don't replace others if
279 expander inactive. This avoids clobbering the ASIS tree in
282 2013-10-10 Robert Dewar <dewar@adacore.com>
284 * sem_res.adb (Resolve_Op_Expon): Avoid crash testing for
285 fixed-point case in preanalysis mode (error will be caught during
288 2013-10-10 Robert Dewar <dewar@adacore.com>
290 * gnat_rm.texi: Refined_Pre and Refined_Post are now allowed as
291 assertion identifiers for pragma Assertion_Policy.
292 * sem_prag.adb (Is_Valid_Assertion_Kind): Add Refined_Pre/Refined_Post
293 * sem_ch13.adb: Minor reformatting.
295 2013-10-10 Pascal Obry <obry@adacore.com>
297 * prj-conf.adb: Code refactoring.
299 2013-10-10 Hristian Kirtchev <kirtchev@adacore.com>
301 * einfo.adb: Remove Integrity_Level from the node usage list.
302 (Has_Option): Update the implementation to match
304 (Has_Property): Renamed to Has_Option.
305 (Integrity_Level): Removed.
306 (Is_External_State): New routine.
307 (Is_Input_Only_State): Use Has_Option to determine whether a state
308 is Input_Only. (Is_Input_State): Renamed to Is_Input_Only_State.
309 (Is_Output_Only_State): Use Has_Option to determine whether
310 a state is Output_Only.
311 (Is_Output_State): Renamed to
312 Is_Output_Only_State.
313 (Is_Volatile_State): Use Has_Option to determine whether a state is
315 (Set_Integrity_Level): Removed.
316 (Write_Field8): Remove the entry for Integrity_Level.
317 * einfo.ads: Remove Integrity_Level along with its documentation
318 and usage in nodes. Rename Is_Input_State to Is_Input_Only_State.
319 Rename Is_Output_State to Is_Output_Only_State. Update the
320 documentation of Is_Volatile_State. Update the node structure of
322 (Integrity_Level): Removed along with pragma Inline.
323 (Is_External_State): New routine.
324 (Is_Input_State): Renamed to Is_Input_Only_State.
325 (Is_Output_State): Renamed to Is_Output_Only_State.
326 (Set_Integrity_Level): Removed along with pragma Inline.
327 * sem_prag.adb (Analyze_Pragma): Update the checks regarding
328 global items and abstract state modes. Update the implementation
329 of pragma Abstract_State to reflect the new rules and terminology.
330 * snames.ads-tmpl: Remove the predefined name for Integrity
331 level. Add new predefined names for Input_Only, Non_Volatile,
332 Output_Only and Part_Of.
334 2013-10-10 Ed Schonberg <schonberg@adacore.com>
336 * lib-xref.adb (Generate_Reference): Do not generate a reference
337 within a _postcondition procedure: a proper source reference has
338 already been generated when pre- analyzing the original aspect
339 specification, and the use of a formal in a pre/postcondition
340 should not count as a proper use in a subprogram body.
342 2013-10-10 Robert Dewar <dewar@adacore.com>
344 * sem_eval.adb (Why_Non_Static): Fix bomb for deferred constant
347 2013-10-10 Hristian Kirtchev <kirtchev@adacore.com>
349 * aspects.adb: Add an entry for Aspect_Refined_Post in table
351 * aspects.ads: Add an entry for Aspect_Refined_Post in tables
352 Aspect_Id, Aspect_Argument, Aspect_Names, Aspect_Delay,
353 Aspect_On_Body_Or_Stub_OK. Update the comment on the use of
354 table Aspect_On_Body_Or_Stub_OK.
355 * par-prag.adb: Add pragma Refined_Post to the list of pragmas
356 that do not require special processing by the parser.
357 * sem_attr.adb (Analyze_Attribute): Add special analysis for
358 attributes 'Old and 'Result when code generation is disabled and
359 they appear in aspect/pragma Refined_Post.
360 (In_Refined_Post): New routine.
361 * sem_ch6.adb (Analyze_Expression_Function): Move various
362 aspects and/or pragmas that apply to an expression function to the
363 corresponding spec or body.
364 (Collect_Body_Postconditions): New routine.
365 (Process_PPCs): Use routine Collect_Body_Postconditions
366 to gather all postcondition pragmas.
367 * sem_ch10.adb (Analyze_Proper_Body): Use routine
368 Relocate_Pragmas_To_Body to move all source pragmas that follow
369 a body stub to the proper body.
370 (Move_Stub_Pragmas_To_Body): Removed.
371 * sem_ch13.adb (Analyze_Aspect_Specifications): Add processing
372 for aspect Refined_Post.
373 (Check_Aspect_At_Freeze_Point): Aspect
374 Refined_Post does not need delayed processing at the freeze point.
375 * sem_prag.adb: Add an entry for pragma Refined_Post in
377 (Analyze_Pragma): Add processing for pragma
378 Refined_Post. Update the processing of pragma Refined_Pre
379 to use common routine Analyze_Refined_Pre_Post.
380 (Analyze_Refined_Pre_Post): New routine.
381 (Relocate_Pragmas_To_Body): New routine.
382 * sem_prag.ads: Table Pragma_On_Stub_OK is now known as
383 Pragma_On_Body_Or_Stub_OK. Update the comment on usage of
384 table Pragma_On_Body_Or_Stub_OK.
385 (Relocate_Pragmas_To_Body): New routine.
386 * snames.ads-tmpl: Add new predefined name for Refined_Post. Add
387 new Pragma_Id for Refined_Post.
389 2013-10-10 Robert Dewar <dewar@adacore.com>
391 * exp_ch3.adb (Expand_N_Variant_Part): Now null, expansion of
392 last choice to others is moved to Freeze_Record_Type.
393 * freeze.adb (Freeze_Record_Type): Expand last variant to others
394 if necessary (moved here from Expand_N_Variant_Part
396 2013-10-10 Robert Dewar <dewar@adacore.com>
398 * lib-xref-spark_specific.adb, par-ch13.adb, sem_prag.adb, sem_prag.ads,
399 sem_ch12.adb, sem_attr.adb, sem_ch6.adb, sem_ch13.adb, a-sequio.adb,
400 s-atocou-builtin.adb: Minor reformatting.
402 2013-10-10 Thomas Quinot <quinot@adacore.com>
404 * s-oscons-tmplt.c (NEED_PTHREAD_CONDATTR_SETCLOCK): This
405 constant needs to be output to s-oscons.h, as it is tested
408 2013-10-10 Robert Dewar <dewar@adacore.com>
410 * exp_ch3.adb (Expand_N_Variant_Part): Don't expand choices, too early
411 * exp_ch5.adb (Expand_N_Case_Statement): Use new Has_SP_Choice
412 flag to avoid expanding choices when not necessary.
413 * exp_util.adb: Minor reformatting
414 * freeze.adb (Freeze_Record_Type): Redo expansion of variants
415 * sem_aggr.adb: Minor reformatting
416 * sem_case.ads, sem_case.adb: Major rewrite, separating Analysis and
418 * sem_ch3.adb (Analyze_Variant_Part): Rewrite to call new
420 * sem_ch4.adb (Analyze_Case_Expression): Call Analyze_Choices
422 * sem_ch5.adb (Analyze_Case_Statement): Call Analyze_Choices
424 * sem_util.adb: Minor reformatting
425 * sinfo.ads, sinfo.adb (Has_SP_Choice): New flag.
427 2013-10-10 Vincent Celier <celier@adacore.com>
429 * mlib-prj.adb (Build_Library): Do not issue link dynamic
430 libraries with an Rpath, if switch -R was used.
432 2013-10-10 Tristan Gingold <gingold@adacore.com>
434 * s-stalib.ads (Image_Index_Table_8, Image_Index_Table_16,
435 Image_Index_Table_32): Remove as not used.
436 * s-imgint.adb (Image_Integer): Call Set_Image_Integer and
437 remove duplicated code.
439 2013-10-10 Hristian Kirtchev <kirtchev@adacore.com>
441 * sem_prag.adb (Analyze_Pragma): Provide a
442 more precise error message when pragma Refined_Pre applies to
443 an expression function that is not a completion.
445 2013-10-10 Thomas Quinot <quinot@adacore.com>
447 * sem_attr.adb (Analyse_Attribute, case
448 Attribute_Scalar_Storage_Order): a 'Scalar_Storage_Order attribute
449 reference for a generic type is permitted in GNAT runtime mode.
450 * a-sequio.adb (Read, Write): Use the endianness of the actual
451 type to encode length information written to the file.
453 2013-10-10 Ed Schonberg <schonberg@adacore.com>
455 * par-ch13.adb (Aspect_Specifications_Present)): In earlier than
456 Ada2012 mode, assume that a legal aspect name following "with"
457 keyword is an older gnat switch and not a misplaced with_clause.
459 2013-10-10 Hristian Kirtchev <kirtchev@adacore.com>
461 * aspects.adb: Add an entry for Aspect_Refined_Pre in
462 table Canonical_Aspect.
463 (Aspects_On_Body_OK): Renamed to
464 Aspects_On_Body_Or_Stub_OK.
465 (Aspects_On_Body_Or_Stub_OK):
466 Update the query in table Aspect_On_Body_OK.
467 * aspects.ads: Add an entry for Aspect_Refined_Pre in tables
468 Aspect_Id, Aspect_Argument, Aspect_Names, Aspect_Delay,
469 Aspect_On_Body_Or_Stub_OK. Table Aspect_On_Body_OK is now known as
470 Aspect_On_Body_Or_Stub_OK. Add a section of aspect specifications
471 that apply to body stubs.
472 (Aspects_On_Body_OK): Renamed to Aspects_On_Body_Or_Stub_OK.
473 (Aspects_On_Body_Or_Stub_OK): Update the comment on usage.
474 * par-prag.adb: Add pragma Refined_Pre to the list of pragmas
475 that do not require special processing by the parser.
476 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Delay the
477 analysis of aspect specifications that apply to a body stub
478 until the proper body is analyzed.
479 * sem_ch10.adb: Add with and use clause for Sem_Ch13.
480 (Analyze_Package_Body_Stub): Set the corresponding spec of the stub.
481 (Analyze_Proper_Body): Relocate all pragmas that apply
482 to a subprogram body stub to the declarations of the proper
483 body. Analyze the aspect specifications of the stub when the
484 proper body is not present.
485 (Analyze_Protected_Body_Stub): Set the corresponding spec of the stub.
486 (Analyze_Task_Body_Stub): Set the corresponding spec of the stub.
487 (Move_Stub_Pragmas_To_Body): New routine.
488 * sem_ch13.adb (Analyze_Aspect_Specifications): Add processing
489 for aspect Refined_Pre.
490 (Check_Aspect_At_Freeze_Point): Aspect
491 Refined_Pre does not need delayed processing at the freeze point.
492 * sem_prag.adb: Remove with and use clause for Snames. Add
493 an entry for Pragma_Refined_Pre in table Sig_Flags.
494 (Analyze_Pragma): Add processing for pragma Refined_Pre.
495 * sem_prag.ads: Add with and use clause for Snames. Add table
497 * sinfo.adb (Corresponding_Spec_Of_Stub): New routine.
498 (Set_Corresponding_Spec_Of_Stub): New routine.
499 * sinfo.ads: Add new attribute Corresponding_Spec_Of_Stub
500 along with comment on usage and occurrences in nodes.
501 (Corresponding_Spec_Of_Stub): New routine along with pragma
503 (Set_Corresponding_Spec_Of_Stub): New routine along
505 * snames.ads-tmpl: Add new predefined name for Refined_Pre. Add
506 new Pragma_Id for Refined_Pre.
508 2013-10-10 Ed Schonberg <schonberg@adacore.com>
510 * sem_ch12.adb (Analyze_Package_Instantiation,
511 Analyze_Subprogram_Instantiation): Improve error message when
512 name in instantiation does not designate a generic unit of the
515 2013-10-10 Robert Dewar <dewar@adacore.com>
517 * exp_ch3.adb (Expand_N_Variant_Part): Expand statically
518 predicated subtype which appears in Discrete_Choices list.
519 * exp_ch5.adb (Expand_N_Case_Statement): Expand statically
520 predicated subtype which appears in Discrete_Choices list of
521 case statement alternative.
522 * exp_util.ads, exp_util.adb (Expand_Static_Predicates_In_Choices): New
524 * sem_case.adb: Minor reformatting (Analyze_Choices): Don't
525 expand out Discrete_Choices that are names of subtypes with
526 static predicates. This is now done in the analyzer so that the
527 -gnatct tree is properly formed for ASIS.
528 * sem_case.ads (Generic_Choices_Processing): Does not apply
529 to aggregates any more, so change doc accordingly, and remove
530 unneeded Get_Choices argument.
531 * sem_ch3.adb (Analyze_Variant_Part): Remove no
532 longer used Get_Choices argument in instantiation of
533 Generic_Choices_Processing.
534 * sem_ch4.adb (Analyze_Case_Expression): Remove no
535 longer used Get_Choices argument in instantiation of
536 Generic_Choices_Processing.
537 * sem_ch5.adb (Analyze_Case_Statement): Remove no
538 longer used Get_Choices argument in instantiation of
539 Generic_Choices_Processing.
540 * sinfo.ads: For N_Variant_Part, and N_Case_Statement_Alternative,
541 document that choices that are names of statically predicated
542 subtypes are expanded in the code generation tree passed to the
543 back end, but not in the ASIS tree generated for -gnatct.
545 2013-10-10 Ed Schonberg <schonberg@adacore.com>
547 * sem_ch7.adb: Revert previous change.
549 2013-10-10 Gary Dismukes <dismukes@adacore.com>
551 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): In the case where
552 the Storage_Pool aspect is specified by an aspect clause and a
553 renaming is used to capture the evaluation of the pool name,
554 insert the renaming in front of the aspect's associated entity
555 declaration rather than in front of the corresponding attribute
556 definition (which hasn't been appended to the declaration
559 2013-10-10 Ed Schonberg <schonberg@adacore.com>
561 * sem_ch6.adb (Is_Interface_Conformant): The controlling type
562 of the interface operation is obtained from the ultimate alias
563 of the interface primitive parameter, because that may be in
564 fact an implicit inherited operation whose signature involves
565 the type extension and not the desired interface.
567 2013-10-10 Ed Schonberg <schonberg@adacore.com>
569 * par-ch13.adb (Aspect_Specifications_Present): In Ada 2012,
570 recognize an aspect specification with a misspelled name if it
571 is followed by a a comma or semicolon.
573 2013-10-10 Vadim Godunko <godunko@adacore.com>
575 * s-atocou.adb, s-atocou.ads, s-atocou-x86.adb, s-atocou-builtin.adb:
576 Fix copyright notice.
578 2013-10-10 Yannick Moy <moy@adacore.com>
580 * lib-xref-spark_specific.adb (Enclosing_Subprogram_Or_Package): Get
581 enclosing subprogram for precondition/postcondition/contract cases.
583 2013-10-10 Robert Dewar <dewar@adacore.com>
585 * gnat_rm.texi: Minor fix.
587 2013-10-10 Robert Dewar <dewar@adacore.com>
589 * sem_ch13.adb (Analyze_Attribute_Definition_Clause, case
590 Address): Remove the Comes_From_Source test for the overlap
593 2013-10-10 Robert Dewar <dewar@adacore.com>
595 * sem_util.adb: Minor code reorganization (use Nkind_In).
596 * sem_warn.adb: Minor code reorganization (optimization in
597 Check_Unset_Reference).
598 * exp_ch9.adb, exp_ch4.adb, sinfo.ads: Minor reformatting.
600 2013-10-10 Ed Schonberg <schonberg@adacore.com>
602 * sem_ch7.adb (Install_Parent_Private_Declarations): When
603 instantiating a child unit, do not install private declaration of
604 a non-generic ancestor of the generic that is also an ancestor
605 of the current unit: its private part will be installed when
606 private part of ancestor itself is analyzed.
608 2013-10-10 Thomas Quinot <quinot@adacore.com>
610 * freeze.adb (Check_Component_Storage_Order): Retrieve component
611 aliased status from type entities directly instead of going back
612 to original component definition.
613 * sem_ch7.adb: Minor reformatting.
615 2013-10-10 Robert Dewar <dewar@adacore.com>
617 * sem_ch13.adb (Analyze_Aspect_Specifications): For Address
618 attribute, consider it to be set in source, because of aliasing
620 (Analyze_Attribute_Definition_Clause): For the
621 purpose of warning on overlays, take into account the aspect case.
623 2013-10-10 Robert Dewar <dewar@adacore.com>
625 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads, a-cforse.ads,
626 a-cofove.ads: Minor reformatting.
628 2013-10-10 Arnaud Charlet <charlet@adacore.com>
630 * gnat_ugn.texi: Remove obsolete mention to -laddr2line.
632 2013-10-10 Ed Schonberg <schonberg@adacore.com>
634 * exp_ch4.adb (Expand_N_Case_Expression): Indicate that the
635 generated variable used as a target of the expression needs
638 2013-10-10 Jose Ruiz <ruiz@adacore.com>
640 * exp_util.adb (Corresponding_Runtime_Package): Remove the condition
641 related to No_Dynamic_Attachment which was wrong. Protected types
642 with interrupt handlers (when not using a restricted profile)
643 are always treated as protected types with entries, regardless
644 of the No_Dynamic_Attachment restriction.
645 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Simplify the code
646 using the result of Corresponding_Runtime_Package.
647 (Install_Private_Data_Declarations): When having
648 static handlers and a non restricted profile, we use the
649 type Static_Interrupt_Protection always, so we removed an
650 extra wrong condition looking at the No_Dynamic_Attachment
651 restriction. Simplify the code using the result of
652 Corresponding_Runtime_Package.
653 (Make_Initialize_Protection): Simplify the code using
654 the result of Corresponding_Runtime_Package.
655 (Install_Private_Data_Declaration): The No_Dynamic_Attachment
656 restriction has nothing to do with static handlers. Remove the extra
657 erroneous condition that was creating the wrong data type.
659 2013-10-10 Hristian Kirtchev <kirtchev@adacore.com>
661 * sem_util.adb (Is_Object_Reference): Attribute
662 'Old produces an object reference.
663 * gnat_rm.texi: Define accessibility level of
664 X'Update(...) result.
666 2013-10-10 Yannick Moy <moy@adacore.com>
668 * gnat_rm.texi, a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
669 a-cforse.ads, a-cofove.ads: Update comment and doc of formal containers
671 2013-10-10 Ed Schonberg <schonberg@adacore.com>
673 * sem_ch13.adb (Analyze_Aspect_Specifications): For Pre/Post
674 conditions that apply to a subprogram body, preserve the placement
675 and order of the generated pragmas, which must appear before
676 other declarations in the body.
678 2013-10-10 Bob Duff <duff@adacore.com>
680 * gnat_ugn.texi: Add gnat2xml doc.
682 2013-10-10 Doug Rupp <rupp@adacore.com>
684 * s-vxwork-arm.ads: Fix interface to FP_CONTEXT.
686 2013-10-10 Ed Schonberg <schonberg@adacore.com>
688 * sem_ch13.adb (Analyze_Aspect_Specification): An aspect Import
689 on a variable need not have a convention specified, as long as
690 the implicit convention of the object, obtained from its type,
691 is Ada or Ada-related.
693 2013-10-10 Robert Dewar <dewar@adacore.com>
695 * cstand.adb (Standard_Unsigned_64): New internal type.
696 * gnat_rm.texi: Update documentation on To_Address.
697 * sem_attr.adb (Analyze_Attribute, case To_Address): Fix
698 problem with out of range static values given as literals or
700 * stand.ads (Standard_Unsigned_64): New internal type.
701 * stand.adb: Minor reformatting.
703 2013-10-10 Ed Schonberg <schonberg@adacore.com>
705 * sem_ch4.adb (Analyze_Selected_Component,
706 Has_Mode_Conformant_Spec): If selected component may be an
707 indexing of a parameterless call to a protected function, and
708 expansion is disabled, this is a valid candidate interpretation.
710 2013-10-10 Arnaud Charlet <charlet@adacore.com>
712 * gnat_ugn.texi: Minor editing.
714 2013-10-10 Robert Dewar <dewar@adacore.com>
716 * gnatlink.adb: Minor reformatting.
718 2013-10-10 Yannick Moy <moy@adacore.com>
720 * debug.adb: Free flag d.E and change doc for flag d.K.
722 2013-10-10 Ed Schonberg <schonberg@adacore.com>
724 * sem_prag.adb (Check_Precondition_Postcondition): If the
725 pragma comes from an aspect spec, and the subprogram is a
726 library unit, treat as a ppc in a declarative part in ASIS mode,
727 so that expression in aspect is properly analyzed. In this case
728 there is no later point at which the aspect specification would
731 2013-10-10 Bob Duff <duff@adacore.com>
733 * opt.ads: Minor comment fix.
735 2013-10-10 Vadim Godunko <godunko@adacore.com>
737 * a-coinho-shared.ads, a-coinho-shared.adb: New file.
738 * s-atocou.ads: Add procedure to initialize counter.
739 * s-atocou.adb: Likewise.
740 * s-atocou-builtin.adb: Likewise.
741 * s-atocou-x86.adb: Likewise.
742 * gcc-interface/Makefile.in: Select special version of
743 Indefinite_Holders package on platforms where atomic built-ins
744 are supported. Update tools target pairs for PikeOS.
746 2013-10-10 Robert Dewar <dewar@adacore.com>
748 * sem_ch3.adb: Minor reformatting.
750 2013-10-10 Robert Dewar <dewar@adacore.com>
752 * sinput-c.adb (Load_File): Ensure Source_Align alignment.
753 * sinput-d.adb (Create_Debug_Source): Ensure Source_Align alignment.
754 * sinput-l.adb (Create_Instantiation_Source): Ensure Source_Align
757 * sinput.ads, sinput.adb (Get_Source_File_Index): New optimized (single
759 * types.ads (Source_Align): New definition.
760 (Source_Buffer): Document new alignment requirement.
762 2013-10-10 Robert Dewar <dewar@adacore.com>
764 * sem_prag.adb (Analyze_Pragma, case Linker_Section): Allow
767 2013-10-10 Robert Dewar <dewar@adacore.com>
769 * gnat_rm.texi: Minor adjustment to doc for To_Address attribute.
771 2013-10-10 Vadim Godunko <godunko@adacore.com>
773 * s-stopoo.ads (Root_Storage_Pool): Add pragma
774 Preelaborable_Initialization.
776 2013-09-25 Tom Tromey <tromey@redhat.com>
778 * gcc-interface/Makefile.in (OUTPUT_OPTION): Define as "-o $@".
780 2013-09-18 Eric Botcazou <ebotcazou@adacore.com>
783 * gcc-interface/trans.c (Attribute_to_gnu): Define GNAT_PREFIX local
784 variable and use it throughout.
785 <Attr_Length>: Note whether the prefix is the dereference of a pointer
786 to unconstrained array and, in this case, capture the result for both
787 Attr_First and Attr_Last.
789 2013-09-18 Eric Botcazou <ebotcazou@adacore.com>
791 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Abstract_State>: New.
793 2013-09-18 Eric Botcazou <ebotcazou@adacore.com>
795 * gcc-interface/trans.c (gigi): Remove dead code.
797 2013-09-18 Eric Botcazou <ebotcazou@adacore.com>
799 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Pop the stack of
800 return variables for subprograms using the CICO mechanism.
802 2013-09-13 Dominique Dhumieres <dominiq@lps.ens.fr>
804 * gcc-interface/Makefile.in: Fix darwin Filter to match on $target_os,
807 2013-09-11 Thomas Schwinge <thomas@codesourcery.com>
808 Olivier Hainque <hainque@adacore.com>
810 * gcc-interface/Makefile.in: Import target_cpu, target_vendor,
811 target_os and their host_ counterparts. Remove host_canonical and
812 target_cpu_default, unused. Remove local ad-hoc computations of
813 "host", "targ", "arch", "osys" and "manu". Replace uses of these by
814 uses of the now imported family, hence back to filters against
815 canonical values. Remove filters on e500 for target_cpu, expected to
816 be canonicalized into powerpc. Invert the logic filtering on 64bit
817 sparc for VxWorks. Simplify the filtering logic for bareboard tools
818 target pairs, now using straight elf/eabi filters on the target_os
821 2013-09-10 Ed Schonberg <schonberg@adacore.com>
823 * sem_ch3.adb (Replace_Anonymoous_Access_To_Protected_Subprogram): If
824 the return type is itself an access to function, recurse to emit
825 another anonymous type.
826 * gcc-interface/Make-lang.in: Update dependencies.
828 2013-09-10 Robert Dewar <dewar@adacore.com>
830 * err_vars.ads (Warning_Doc_Switch): Ignored in VMS mode.
831 * errout.adb (Warning_Doc_Switch): Ignored in VMS mode.
832 * errout.ads (Warning_Doc_Switch): Ignored in VMS mode.
833 * inline.ads (Warnings): New component in Pending_Body_Info.
834 * sem_ch12.adb (Pending_Body_Info): Save and restore warnings
835 at instantiation point.
836 * warnsw.adb (Save_Warnings): New function (Restore_Warnings):
837 New procedure Remove special handling of Warning_Doc_Switch,
838 cleaner to handle the VMS case in errout, than to introduce
839 undocumented oddities here.
840 * warnsw.ads (Warning_Record) : New type.
841 (Save_Warnings): New function.
842 (Restore_Warnings): New procedure.
844 2013-09-10 Robert Dewar <dewar@adacore.com>
846 * sinput.adb (Check_For_BOM): Avoid reading past end of file.
848 2013-09-10 Robert Dewar <dewar@adacore.com>
850 * errout.adb (Error_Msg_Ada_2012_Feature): New procedure.
851 * errout.ads (Error_Msg_Ada_2012_Feature): New procedure.
852 * inline.ads: Save/Restore Ada_Version_Pragma.
853 * opt.adb: Save/Restore Ada_Version_Pragma.
854 * opt.ads (Ada_Version_Pragma): New variable.
855 * par-ch11.adb, par-ch12.adb, par-ch13.adb, par-ch4.adb, par-ch5.adb,
856 par-ch6.adb, par-ch8.adb, par-prag.adb: Use Error_Msg_Ada_2012_Feature.
857 * prj.adb: Initialize Ada_Version_Pragma.
858 * sem_attr.adb: Use Error_Msg_Ada_2012_Feature.
859 * sem_ch12.adb, sem_ch8.adb: Save/restore Ada_Version_Pragma.
860 * sem_prag.adb (Analyze_Pragma, cases Ada_xx): Set Ada_Version_Pragma.
861 * switch-c.adb: Initialize Ada_Version_Pragma.
862 * sem_ch12.adb: Minor reformatting.
864 2013-09-10 Ed Schonberg <schonberg@adacore.com>
866 * sem_ch3.adb (Process_Subtype): Discard constraint on access
867 to class-wide type. Such constraints are not supported and are
868 considered a language pathology.
870 2013-09-10 Robert Dewar <dewar@adacore.com>
872 * gnatbind.adb: Correct starting date in --version string.
873 * gnatdll.adb: Use Check_Version_And_Help_G to implement --help
875 * gnatkr.adb: Use Check_Version_And_Help_G to implement --help
877 * gnatlink.adb: Correct starting date in --version string.
878 * gnatls.adb: Correct starting date in --version string.
879 * make.adb: Correct starting date in --version string.
881 2013-09-10 Robert Dewar <dewar@adacore.com>
883 * switch-c.adb: Minor reformatting.
884 * atree.ads (Original_Nodes): Add documentation on ASIS usage.
885 * sinfo.ads: Add section on ASIS mode (documentation only).
887 2013-09-10 Robert Dewar <dewar@adacore.com>
889 * sem_prag.adb (Analyze_Pragma, case Warnings): Don't allow
890 REASON parameter in compiler units (bootstrap issues).
892 2013-09-10 Robert Dewar <dewar@adacore.com>
894 * gnat1drv.adb (Adjust_Global_Switches): Output warning if
895 -gnateE specified for a target that does not support it.
897 2013-09-10 Ed Schonberg <schonberg@adacore.com>
899 * sem_prag.adb (Analyze_Pragma, case SPARK_Mode): Handle properly
900 a subprogram body without previous spec.
902 2013-09-10 Gary Dismukes <dismukes@adacore.com>
904 * sem_ch4.adb: Minor typo fixes.
906 2013-09-10 Hristian Kirtchev <kirtchev@adacore.com>
908 * aspects.adb (Aspects_On_Body_OK): New routine.
909 * aspects.ads: Modify type Aspect_Expression to include
910 the Optional_XXX variants. Update the contents of
911 table Aspect_Argument. Add table Aspect_On_Body_OK.
912 (Aspects_On_Body_OK): New routine.
913 * par-ch13.adb (Get_Aspect_Specifications): Account for optional
914 names and expressions when parsing an aspect.
915 * sem_ch6.adb: Add with and use clause for Aspects.
916 (Analyze_Subprogram_Body_Helper): Do not emit an error when
917 analyzing a body with aspects that can be applied simultaneously
918 to both spec and body.
919 * sem_ch13.adb (Analyze_Aspect_Specifications): Insert the
920 corresponding pragma of an aspect that applies to a subprogram
921 body in the declarative part.
922 (Make_Aitem_Pragma): Do not generate a pragma with an empty argument
925 2013-09-10 Robert Dewar <dewar@adacore.com>
927 * switch-c.adb: Diagnose -gnatc given after -gnatRm.
928 * gnat_ugn.texi: Add documentation for -gnatRm.
929 * usage.adb: Minor reorganization (put style entries in proper
930 order) Document -gnatRm switch.
931 * sinfo.ads: Minor comment fix.
933 2013-09-10 Sergey Rybin <rybin@adacore.com frybin>
935 * tree_io.ads: Update ASIS_Version_Number.
937 2013-09-10 Ed Schonberg <schonberg@adacore.com>
939 * sem_ch3.adb (Access_Subprogram_Declaration): Check whether the
940 designated type can appear in a parameterless call.
941 * sem_ch4.adb (Analyze_Call): Do not insert an explicit dereference
942 in the case of an indirect call through an access function that
943 returns an array type.
944 (Analyze_One_Call): Handle properly legal parameterless calls
945 whose result is indexed, in constructs of the for F.all (I)
946 * sem_ch6.ads (May_Need_Actuals): Make public, for use on access
948 * sem_res.adb (Resolve_Call): If the call is indirect, there is
949 no entity to set on the name in the call.
951 2013-09-10 Hristian Kirtchev <kirtchev@adacore.com>
953 * aspects.adb: Add entries in the Has_Aspect_Specifications_Flag
954 table for package body and body stubs.
955 (Move_Or_Merge_Aspects): New routine.
956 (Remove_Aspects): New routine.
957 * aspects.ads (Move_Aspects): Update comment on usage.
958 (Move_Or_Merge_Aspects): New routine.
959 (Remove_Aspects): New routine.
960 * par-ch3.adb: Update the grammar of private_type_declaration,
961 private_extension_declaration, object_renaming_declaration,
962 and exception_renaming_declaration.
963 (P_Subprogram): Parse the
964 aspect specifications that apply to a body stub.
965 * par-ch6.adb: Update the grammar of subprogram_body_stub and
966 generic_instantiation.
967 * par-ch7.adb: Update the grammar of package_declaration,
968 package_specification, package_body, package_renaming_declaration,
970 (P_Package): Parse the aspect specifications
971 that apply to a body, a body stub and package renaming.
972 * par-ch9.adb: Update the grammar of entry_declaration,
973 protected_body, protected_body_stub, task_body,
975 (P_Protected): Add local variable
976 Aspect_Sloc. Add local constant Dummy_Node. Parse the aspect
977 specifications that apply to a protected body and a protected
979 (P_Task): Add local variable Aspect_Sloc. Add local
980 constant Dummy_Node. Parse the aspect specifications that apply
981 to a task body and a task body stub.
982 * par-ch12.adb: Update the grammar of
983 generic_renaming_declaration.
984 (P_Generic): Parse the aspect
985 specifications that apply to a generic renaming.
986 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Do not emit
987 an error when analyzing aspects that apply to a body stub. Such
988 aspects are relocated to the proper body.
989 * sem_ch7.adb (Analyze_Package_Body_Helper): Analyze the aspect
990 specifications that apply to a body.
991 * sem_ch9.adb (Analyze_Protected_Body): Warn about user-defined
992 aspects not being supported on protected bodies. Remove the
993 aspect specifications. (Analyze_Single_Protected_Declaration):
994 Analyze the aspects that apply to a single protected declaration.
995 (Analyze_Task_Body): Warn about user-defined aspects not being
996 supported on task bodies. Remove the aspect specifications.
997 * sem_ch10.adb: Add with and use clause for Aspects.
998 (Analyze_Package_Body_Stub): Propagate the aspect specifications
999 from the stub to the proper body.
1000 * sem_ch13.adb (Analyze_Aspect_Specifications): Insert the
1001 corresponding pragma of an aspect that applies to a body in the
1002 declarations of the body.
1003 * sinfo.ads: Update the gramma of expression_function,
1004 private_type_declaration, private_extension_declaration,
1005 object_renaming_declaration, exception_renaming_declaration,
1006 package_renaming_declaration, subprogram_renaming_declaration,
1007 generic_renaming_declaration, entry_declaration,
1008 subprogram_body_stub, package_body_stub, task_body_stub,
1009 generic_subprogram_declaration.
1011 2013-09-10 Hristian Kirtchev <kirtchev@adacore.com>
1013 * sem_prag.adb (Analyze_Pragma): Add processing
1014 for aspect/pragma SPARK_Mode when it applies to a [library-level]
1015 subprogram or package [body].
1017 2013-09-10 Robert Dewar <dewar@adacore.com>
1019 * gnat_ugn.texi: Document that -gnatc and -gnatR cannot be
1021 * switch-c.adb (Scan_Front_End_Switches): Give error if both
1022 -gnatR and -gnatc given.
1024 2013-09-10 Robert Dewar <dewar@adacore.com>
1026 * g-table.ads, g-table.adb (For_Each): New generic procedure
1027 (Sort_Table): New generic procedure.
1029 2013-09-10 Thomas Quinot <quinot@adacore.com>
1031 * adaint.c (__gnat_is_executable_file_attr): Should be true
1032 for an executable regular file only only (not for a directory
1033 that has the executable permission).
1035 2013-09-10 Ed Schonberg <schonberg@adacore.com>
1037 * sem_res.adb: Further work on operator calls in ASIS.
1039 2013-09-10 Yannick Moy <moy@adacore.com>
1041 * sinfo.ads, sem_prag.ads, sem_ch13.adb: Minor correction and comment
1044 2013-09-10 Thomas Quinot <quinot@adacore.com>
1046 * aspects.ads, sem_ch13.adb: Minor reformatting.
1047 * adaint.c (__gnat_set_close_on_exec): Add comment documenting
1048 that this routine is shared between OS_Lib and Sockets.
1050 2013-09-10 Robert Dewar <dewar@adacore.com>
1052 * exp_prag.adb (Expand_Pragma_Check): Ignore pragma if Is_Ignored set.
1053 * sem_ch13.adb (Make_Aitem_Pragma): Set Is_Checked if needed.
1054 * sem_prag.adb (Check_Kind): Moved from spec (Analyze_Pragma):
1055 Make sure Is_Ignored/Is_Checked are set right (Analyze_Pragma,
1056 case Check): Ditto (Check_Applicable_Policy): Handle
1057 Statement_Assertion case Throughout, set and check the Is_Checked
1058 flag as appropriate.
1059 * sem_prag.ads (Check_Kind): Moved to body.
1060 * sinfo.ads, sinfo.adb (Is_Checked): New flag.
1062 2013-09-10 Robert Dewar <dewar@adacore.com>
1064 * aspects.ads (Delay_Type): New type (Aspect_Delay): New table.
1065 * einfo.adb (Has_Delayed_Rep_Aspects): New flag
1066 (May_Inherit_Delayed_Rep_Aspects): New flag (Rep_Clause): Removed
1067 (use Get_Attribute_Representation_Clause).
1068 * einfo.ads (Has_Delayed_Rep_Aspects): New flag
1069 (May_Inherit_Delayed_Rep_Aspects): New flag
1070 * freeze.adb: Minor reformatting
1071 * sem_ch13.adb (Analyze_Aspect_Speficifications): Redo
1072 handling of delayed evaluation, including optimizing some cases
1073 and avoiding delays.
1074 (Analyze_Aspects_At_Freeze_Point): Now
1075 handled inheriting delayed rep aspects for type derivation case.
1076 (Inherit_Delayed_Rep_Aspects): New procedure
1077 * sem_ch13.ads (Analyze_Aspects_At_Freeze_Point): Now handled
1078 inheriting delayed rep aspects for type derivation case.
1079 * sem_ch3.adb (Build_Derived_Type): Set
1080 May_Inherit_Derived_Rep_Aspects if parent type flag
1081 Has_Delayed_Rep_Aspects is set
1083 2013-09-10 Robert Dewar <dewar@adacore.com>
1085 * errout.adb (Finalize): Don't delete real errors with specific
1088 2013-09-10 Ed Schonberg <schonberg@adacore.com>
1090 * exp_ch9.adb (Expand_N_Timed_Entry_Call,
1091 Expand_N_Conditional_Entry_Call, Expand_N_Asynchronous_Select):
1092 Handle properly a trigger that is a call to a primitive operation
1093 of a type that implements a limited interface, if the type itself
1096 2013-09-10 Robert Dewar <dewar@adacore.com>
1098 * sem_ch3.adb, sinfo.ads, exp_ch9.adb, sem_prag.adb, sem_ch12.adb,
1099 exp_ch4.adb, sprint.adb: Minor reformatting.
1101 2013-09-10 Yannick Moy <moy@adacore.com>
1103 * sinfo.ads: Document splitting of pre/post in N_Contract description.
1105 2013-09-10 Ed Schonberg <schonberg@adacore.com>
1107 * exp_ch4.adb (Expand_N_Op_Multiply): If the operation is of the
1108 form X * 2 ** N and it has been marked Is_Power_Of_2_For_Shift,
1109 add a mod operation if the result type is a binary modular type.
1111 2013-09-10 Hristian Kirtchev <kirtchev@adacore.com>
1113 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Add local
1114 variable Context. Remove local variable Subp_Id. Start the
1115 context traversal from the current subprogram rather than the
1116 current scope. Update the scope traversal and error reporting.
1118 2013-09-10 Ed Schonberg <schonberg@adacore.com>
1120 * exp_ch9.adb (Expand_N_Timed_Entry_Call): New procedure
1121 Rewrite_Triggering_Statements, to encapsulate the statements that
1122 follow the trigger of the entry call. This procedure is needed
1123 when the trigger is a dispatching call, because the expansion
1124 requires several copies of those statements. The procedure is
1125 more efficient, and preserves non-local references when the
1126 construct is within an instance.
1128 2013-09-10 Ed Schonberg <schonberg@adacore.com>
1130 * sem_ch12.adb (Analyze_Package_Instantiation): If the
1131 instantiation is a compilation unit, analyze aspects before
1132 analyzing the package declaration for the instance.
1133 * sem_ch13.adb (Analyze_Aspect_Specifications): If the
1134 corresponding node is a package instantiation, insert generated
1135 pragmas at the head of visible declarations.
1136 * sem_prag.adb (Analyze_Pragma, case Preelaborate): In an instance
1137 do not ignore the pragma if it comes from an aspect specification
1138 in the instance, and not from the generic unit.
1139 * sprint.adb (Sprint_Node_Actual): For a package declaration that
1140 is an instantiation, print aspects after declaration.
1142 2013-09-10 Robert Dewar <dewar@adacore.com>
1144 * einfo.adb, sem_prag.adb, rtsfind.ads: Minor reformatting.
1146 2013-09-10 Hristian Kirtchev <kirtchev@adacore.com>
1148 * sem_prag.adb (Get_SPARK_Mode_Id): Handle the
1149 case where the pragma may appear without an argument.
1150 (Analyze_Global_List): Add expanded_name to the list of constructs
1151 that denote a single item.
1152 (Collect_Global_List): Add expanded_name to the list of constructs
1153 that denote a single item.
1155 2013-09-10 Hristian Kirtchev <kirtchev@adacore.com>
1157 * exp_ch4.adb (Apply_Accessibility_Check): Add local constant
1158 Pool_Id and local variables Fin_Call and Free_Stmt. Finalize
1159 and deallocate a heap-allocated class-wide object after it
1160 has been determined that it violates the accessibility rules.
1161 * rtsfind.ads: Add new RTU_Id for System.Memory. Add new RE_Id
1162 and entry in RE_Unit_Table for RE_Free.
1164 2013-09-01 Eric Botcazou <ebotcazou@adacore.com>
1165 Iain Sandoe <iain@codesourcery.com>
1168 * gcc-interface/Makefile.in (GCC_LINK_FLAGS): Add -static-libstdc++.
1169 (GCC_LINK): Use CXX instead of CC.
1170 * gcc-interface/Make-lang.in (CXX_LFLAGS): New.
1171 (ADA_TOOLS_FLAGS_TO_PASS): Pass CXX, and CXX_LFLAGS for native.
1173 2013-08-13 Eric Botcazou <ebotcazou@adacore.com>
1175 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not bother about alias
1176 sets of derived types in ASIS mode.
1178 2013-08-13 Eric Botcazou <ebotcazou@adacore.com>
1180 * gcc-interface/decl.c (gnat_to_gnu_entity): Replace True with true.
1181 (is_cplusplus_method): Likewise, and False with false.
1182 (components_need_strict_alignment): Likewise.
1183 * gcc-interface/misc.c (gnat_init_gcc_fp): Likewise.
1184 * gcc-interface/trans.c (Loop_Statement_to_gnu): Likewise.
1185 (Handled_Sequence_Of_Statements_to_gnu): Likewise.
1186 (add_cleanup): Likewise.
1187 (Sloc_to_locus1): Likewise.
1188 (Sloc_to_locus): Likewise.
1189 (set_expr_location_from_node): Likewise.
1190 * gcc-interface/utils.c (potential_alignment_gap): Likewise.
1192 2013-08-13 Thomas Quinot <quinot@adacore.com>
1194 * gcc-interface/trans.c (set_end_locus_from_node): Clear column info
1195 for the end_locus of a block if it does not come from an End_Label.
1197 2013-08-13 Thomas Quinot <quinot@adacore.com>
1199 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu): If
1200 there is no End_Label, attach cleanup actions to the sloc of the HSS
1202 (Exception_Handler_to_gnu_zcx): Associate cleanup actions with the sloc
1203 of the handler itself.
1204 (add_cleanup): Clear column information in sloc of cleanup actions.
1205 (Sloc_to_locus1): New static function.
1206 (Sloc_to_locus): Call it.
1207 (set_expr_location_from_node1): New static function.
1208 (set_expr_location_from_node): Call it.
1210 2013-08-13 Eric Botcazou <ebotcazou@adacore.com>
1212 * gcc-interface/trans.c (Call_to_gnu): Deal with specific conditional
1213 expressions for misaligned actual parameters.
1215 2013-08-13 Eric Botcazou <ebotcazou@adacore.com>
1217 * gcc-interface/trans.c (can_equal_min_or_max_val_p): Be prepared for
1218 values outside of the range of the type.
1220 2013-08-13 Eric Botcazou <ebotcazou@adacore.com>
1222 * gcc-interface/utils2.c (build_atomic_load): Do a mere view-conversion
1223 to the original type before converting to the result type.
1224 (build_atomic_store): First do a conversion to the original type before
1225 view-converting to the effective type, but deal with a padded type
1228 2013-08-08 Eric Botcazou <ebotcazou@adacore.com>
1230 * gcc-interface/Makefile.in (TOOLS_LIBS): Pick C object files from the
1231 compiler build and use standard library variables.
1232 (../../vxaddr2line$(exeext): Do not depend on targext.o and adjust.
1233 (gnatmake-re): Do not depend on targext.o.
1234 (gnatlink-re): Do not depend on link.o and targext.o.
1235 (../../gnatmake$(exeext): Likewise.
1236 (../../gnatlink$(exeext): Likewise.
1238 2013-07-21 OndÃ…
\99ej BÃÂlka <neleai@seznam.cz>
1240 * gcc-interface/gigi.h: Fix typos.
1241 * gcc-interface/trans.c: Likewise.
1242 * gcc-interface/utils2.c: Likewise.
1243 * gnat_rm.texi: Likewise.
1244 * gnat_ugn.texi: Likewise.
1245 * raise-gcc.c: Likewise.
1246 * sigtramp-ppcvxw.c: Likewise.
1247 * sysdep.c: Likewise.
1248 * terminals.c: Likewise.
1250 2013-07-20 Eric Botcazou <ebotcazou@adacore.com>
1253 * gcc-interface/ada.h (CAT): Fix typo.
1255 2013-07-08 Hristian Kirtchev <kirtchev@adacore.com>
1257 * einfo.adb (Get_Pragma): Handle the retrieval of delayed
1258 pragmas stored in N_Contract nodes.
1259 * einfo.ads (Get_Pragma): Update the comment on usage.
1260 * sem_prag.adb (Check_Precondition_Postcondition): Retain a copy
1261 of the pragma when it applies to a body that acts as a spec. The
1262 copy is preanalyzed and chained on the contract of the body.
1264 2013-07-08 Robert Dewar <dewar@adacore.com>
1266 * rtsfind.adb: Minor comment fix.
1268 2013-07-08 Hristian Kirtchev <kirtchev@adacore.com>
1270 * sem_ch4.adb (Check_Ghost_Subprogram_Call): Do not check the placement
1271 of a Ghost function call when the enclosing context is being
1274 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1276 * exp_ch6.adb (Expand_Inlined_Call, Process_Formals): If the
1277 expression in a return statement is a numeric literal, qualify
1278 it with the return type for proper resolution.
1280 2013-07-08 Robert Dewar <dewar@adacore.com>
1282 * sem.ads: Minor comment updates.
1283 * s-restri.ads, exp_ch6.adb, lib-load.ads, exp_ch3.adb, sem_ch10.adb:
1286 2013-07-08 Robert Dewar <dewar@adacore.com>
1288 * exp_attr.adb (Expand_N_Attribute_Reference): Add dummy entry
1289 for Restriction_Set.
1290 * gnat_rm.texi: Add missing menu entry for Attribute Ref Add
1291 documentation for attribute Restriction_Set.
1292 * lib-writ.adb (Write_With_Lines): Generate special W lines
1293 for Restriction_Set.
1294 * lib-writ.ads: Document special use of W lines for
1296 * lib.ads (Restriction_Set_Dependences): New table.
1297 * par-ch4.adb (Is_Parameterless_Attribute): Add Loop_Entry to
1298 list (Scan_Name_Extension_Apostrophe): Remove kludge test for
1299 Loop_Entry (Scan_Name_Extension_Apostrophe): Handle No_Dependence
1301 * restrict.adb (Check_SPARK_Restriction): Put in Alfa order
1302 (OK_No_Dependence_Unit_Name): New function.
1303 * restrict.ads (OK_No_Dependence_Unit_Name): New function.
1304 * rtsfind.adb: Minor reformatting Minor code reorganization.
1305 * sem_attr.adb (Analyze_Attribute): Add processing for
1307 * sem_prag.adb (Process_Restrictions_Or_Restriction_Warnings):
1308 Remove Check_Unit_Name and use new function
1309 OK_No_Dependence_Unit_Name instead.
1310 * sinfo.ads: Minor comment updates.
1311 * snames.ads-tmpl: Add entry for Restriction_Set attribute.
1313 2013-07-08 Hristian Kirtchev <kirtchev@adacore.com>
1315 * exp_ch4.adb (Apply_Accessibility_Check): Remove local constant
1316 Pool_Id and local variable Free_Stmt. Do not deallocate the faulty
1317 object as "free" is not available on all targets/profiles.
1319 2013-07-08 Robert Dewar <dewar@adacore.com>
1321 * sem_ch13.adb (Analyze_Aspect_Specifications): Handle
1322 Storage_Size aspect for task type in case discriminant is
1324 (Analyze_Attribute_Definition_Clause): Do not flag Storage_Size
1325 attribute definition clause as obsolescent if from aspect.
1327 2013-07-08 Robert Dewar <dewar@adacore.com>
1329 * gnat_rm.texi: Add documentation for Img returning a function.
1330 * par-prag.adb: Minor reformatting.
1331 * restrict.adb: Minor reformatting and code reorganization.
1333 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1335 * sem_res.adb: add guard to ASIS transform.
1337 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1339 * exp_ch9.adb (Expand_N_Asynchronous_Select): If the trigger
1340 of the asynchronous select is a dispatching call, transform the
1341 abortable part into a procedure, to avoid duplication of local
1342 loop variables that may appear within.
1344 2013-07-08 Vincent Celier <celier@adacore.com>
1346 * projects.texi: Update the documentation of suffixes in package
1349 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1351 * sem_ch6.adb (Conforming_Types): Anonymous_access_to_subprograsm
1352 types are type conformant if the designated type of one is
1353 protected and the other is not. Convention only matters when
1354 checking subtype conformance.
1356 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1358 * sem_res.adb (Make_Call_Into_Operator): In ASIS mode, propagate
1359 back the fully resolved operands to the original function call
1360 so that all semantic information remains available to ASIS.
1362 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1364 * sem_ch4.adb: minor reformatting (remove obsolete comment).
1365 * sem_ch9.adb: improve error message on illegal trigger.
1367 2013-07-08 Robert Dewar <dewar@adacore.com>
1369 * sem_prag.adb: Minor reformatting.
1371 2013-07-08 Robert Dewar <dewar@adacore.com>
1373 * gnatcmd.adb: Minor reformatting.
1375 2013-07-08 Robert Dewar <dewar@adacore.com>
1377 * targparm.adb (Get_Target_Parameters): Recognize pragma
1378 Partition_Elaboration_Policy.
1380 2013-07-08 Robert Dewar <dewar@adacore.com>
1382 * gnat_ugn.texi: Minor update to mention partition elaboration policy.
1384 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1386 * sem_ch4.adb (Comple_Object_Operation): Revert previous change.
1387 (Analyze_Indexed_Component_Form): In ASIS mode, if node has been
1388 transformed but not rewritten as a function call (as is the case
1389 in a generic), analyze it as such.
1391 2013-07-08 Thomas Quinot <quinot@adacore.com>
1393 * gnat_rm.texi: Minor rewording: add missing word "operators"
1394 in documentation for restriction No_Direct_Boolean_Operator.
1396 2013-07-08 Robert Dewar <dewar@adacore.com>
1398 * errout.adb (Set_Msg_Txt): No longer sets Is_Style_Msg,
1399 Is_Warning_Msg, or Is_Unconditional_Msg (all are set elsewhere
1401 * errout.ads: Insertions ! and !! no longer have to be at the
1402 end of the message, they can be anywhere in the message.
1403 * erroutc.adb (Test_Style_Warning_Serious_Unconditional_Msg):
1404 Replaces Test_Style_Warning_Serious_Msg
1405 * erroutc.ads (Has_Double_Exclam): New flag New comments for
1406 existing flags (Test_Style_Warning_Serious_Unconditional_Msg):
1407 Replaces Test_Style_Warning_Serious_Msg
1408 * errutil.adb (Test_Style_Warning_Serious_Unconditional_Msg):
1409 Replaces Test_Style_Warning_Serious_Msg
1411 2013-07-08 Robert Dewar <dewar@adacore.com>
1413 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings):
1414 Recognize SPARK_05 as synonym for SPARK in restrictions pragma.
1415 * restrict.ads, restrict.adb (SPARK_Hides): Table moved to body, only
1417 * scng.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb, sem_ch8.adb,
1418 sem_res.adb, sem_util.adb: Use restriction SPARK_05 instead of SPARK.
1419 * snames.ads-tmpl (Name_No_Obsolescent_Features): New entry.
1421 2013-07-08 Vincent Celier <celier@adacore.com>
1423 * gnatcmd.adb (Check_Files): Use a response file for gnatls
1426 2013-07-08 Gary Dismukes <dismukes@adacore.com>
1428 * freeze.adb: Minor typo fixes.
1430 2013-07-08 Robert Dewar <dewar@adacore.com>
1432 * gnat_rm.texi: Document SPARK_05 (replaces SPARK) Document
1433 obsolete recognition of SPARK Document all other obsolete synonyms
1434 for old restrictions.
1435 * restrict.adb (Check_SPARK_Restriction): SPARK_05 replaces
1436 SPARK (Process_Restriction_Synonyms): Handle SPARK as synonym
1438 * restrict.ads: Restriction SPARK_05 replaces SPARK.
1439 * s-rident.ads: Replace restriction SPARK by SPARK_05 Add SPARK
1440 as synonym for SPARK_05.
1441 * sem_prag.adb: Minor reformatting.
1442 * snames.ads-tmpl: Add entries for Name_SPARK and Name_SPARK_05.
1444 2013-07-08 Robert Dewar <dewar@adacore.com>
1446 * sem_dim.adb: Minor error message change.
1447 * freeze.adb (Freeze_Entity, array type case): Extend handling
1448 of Implicit_Packing to handle multi-dimensional array case.
1449 * gnat_rm.texi: Update doc on Implicit_Packing.
1451 2013-07-08 Robert Dewar <dewar@adacore.com>
1453 * exp_ch4.adb: Minor reformatting.
1455 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1457 * sem_ch4.adb (Complete_Object_Operation): In ASIS mode, if
1458 the parent node is a selected component and the analysis as a
1459 call is successful, set the type of the selector in the parent
1460 node for subsequent checks, because the rewriting of the node
1461 does not take place during pre-analysis.
1463 2013-07-08 Robert Dewar <dewar@adacore.com>
1465 * sem_ch8.adb, exp_ch3.adb: Minor reformatting.
1467 2013-07-08 Hristian Kirtchev <kirtchev@adacore.com>
1469 * exp_ch4.adb (Expand_N_Op_Eq): When comparing two
1470 Bounded_Strings, use the predefined equality function of the
1471 root Super_String type.
1473 2013-07-08 Hristian Kirtchev <kirtchev@adacore.com>
1475 * exp_ch4.adb (Create_Alternative): Removed.
1476 (Expand_N_If_Expression): Remove constant
1477 In_Case_Or_If_Expression. Add local variable
1478 Ptr_Typ. Inspect the "then" and "else" action lists
1479 for transient controlled objects and generate code to
1480 finalize them. (Is_Controlled_Function_Call): Removed.
1481 (Process_Action): Update the comment on usage. Update the call
1482 to Process_Transient_Object. There is no need to continue the
1483 traversal of the object itself.
1484 (Process_Actions): New routine.
1485 (Process_Transient_Object): Moved to the top level of Exp_Ch4. Add
1486 a new formal and update the related comment on usage.
1487 * exp_util.adb (Within_Case_Or_If_Expression): Start the search
1488 from the parent of the node.
1490 2013-07-08 Robert Dewar <dewar@adacore.com>
1492 * a-cusyqu.ads, a-cbprqu.ads, s-interr.ads, a-cuprqu.ads,
1493 a-cbsyqu.ads: Minor reformatting (proper formatting of overriding).
1495 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1497 * sem_ch8.adb (Attribute_Renaming): Treat 'Img as an attribute
1498 that can be renamed as a function.
1500 2013-07-08 Thomas Quinot <quinot@adacore.com>
1502 * g-socket.ads: Document target dependency: FIONBIO may or may not
1503 be inherited from listening socket by accepted socket.
1505 2013-07-08 Hristian Kirtchev <kirtchev@adacore.com>
1507 * exp_ch4.adb (Apply_Accessibility_Check): Do not deallocate the object
1508 on targets that can't deallocate.
1510 2013-07-08 Hristian Kirtchev <kirtchev@adacore.com>
1512 * exp_ch3.adb (Freeze_Type): Generate a
1513 subpools-related accessibility check only on profiles that
1514 include the corresponding library unit.
1516 2013-07-08 Gary Dismukes <dismukes@adacore.com>
1518 * sem_ch8.adb: Minor typo fixes.
1520 2013-07-08 Javier Miranda <miranda@adacore.com>
1522 * sem_ch8.adb (Save_Scope_Stack): Adding documentation.
1523 (Restore_Scope_Stack): Remove the elements of the list when the
1524 visibility of each entity is restored.
1526 2013-07-08 Robert Dewar <dewar@adacore.com>
1528 * exp_ch9.adb, sem.ads, sem_util.adb: Minor reformatting.
1530 2013-07-08 Robert Dewar <dewar@adacore.com>
1532 * sem_ch8.adb, sem_ch8.ads: Minor reformatting.
1534 2013-07-08 Gary Dismukes <dismukes@adacore.com>
1536 * gnat_rm.texi: Minor reformatting and rewording for consistency.
1538 2013-07-08 Bob Duff <duff@adacore.com>
1540 * exp_ch3.adb (Build_Master): If Desig_Type is an incomplete
1541 view coming from a limited-with'ed package, use the nonlimited
1542 view in case it has tasks.
1544 2013-07-08 Javier Miranda <miranda@adacore.com>
1546 * sem_ch8.ad[sb] (Save_Scope_Stack): Modified to return the list
1547 of entities which have been temporarily removed from immediate
1549 (Restore_Scope_Stack): Modified to receive an
1550 additional parameter with the list of entities whose immediate
1551 visibility must be restored.
1552 * sem.adb (Do_Analyze): Use new version of
1553 Save_Scope_Stack/Restore_Scope_Stack
1554 * sem_ch12.adb (Inline_Instance_Body): Use new version of
1555 Save_Scope_Stack and Restore_Scope_Stack
1557 2013-07-08 Hristian Kirtchev <kirtchev@adacore.com>
1559 * sem_prag.adb (Analyze_Pragma): Remove
1560 variable Unit_Prag. Remove the check on duplicate mode for the
1561 configuration form of the pragma.
1562 (Redefinition_Error): Removed.
1564 2013-07-08 Robert Dewar <dewar@adacore.com>
1566 * lib.ads, gnat_rm.texi, einfo.ads, sem_ch13.adb: Minor reformatting
1569 2013-07-08 Ed Schonberg <schonberg@adacore.com>
1571 * sem_prag.adb (Analyze_PPC_In_Decl_Part): In ASIS mode,
1572 pre-analyze only the original expression attached to the source
1573 aspect, not the relocated expression of the pragma, to prevent
1574 malformed trees in ASIS mode.
1575 * sem_ch13.adb (Analyze_Aspect_Specifications): Revert previous
1576 patch: the expression in the aspect for pre/post must be relocated
1577 to the pragma for proper analysis.
1579 2013-07-05 Hristian Kirtchev <kirtchev@adacore.com>
1581 * aspects.adb: Add an entry for SPARK_Mode in table Canonical_Aspect.
1582 * aspects.ads: Add an entry for SPARK_Mode in tables Aspect_Id,
1583 Aspect_Argument, Aspect_Names.
1584 * atree.adb (Node32): New routine.
1585 (Set_Node32): New routine.
1586 * atree.ads (Node32): New routine.
1587 (Set_Node32): New routine.
1588 * einfo.adb: Node32 is now used as SPARK_Mode_Pragmas.
1589 (Set_SPARK_Mode_Pragmas): New routine.
1590 (SPARK_Mode_Pragmas): New routine.
1591 (Write_Field32_Name): Add and entry for SPARK_Modes.
1592 * einfo.ads: Add attribute SPARK_Mode_Pragmas along with usage
1593 in various entities.
1594 (Set_SPARK_Mode_Pragmas): New routine and
1596 (SPARK_Mode_Pragmas): New routine and pragma Inline.
1597 * gnat_rm.texi: Add sections explaining the syntax and semantics
1598 of aspect/pragma SPARK_Mode.
1599 * gnat_ugn.texi: Add pragma SPARK_Mode to the list of
1600 configuration pragmas.
1601 * lib.adb (Set_SPARK_Mode_Pragma): New routine.
1602 (SPARK_Mode_Pragma): New routine.
1603 * lib.ads: Alphabetize the comments on fields of record
1604 Unit_Record. Add new field SPARK_Mode_Pragma along with
1605 comment on its usage. Update the layout of record Unit_Record.
1606 (Set_SPARK_Mode_Pragma): New routine and pragma Inline.
1607 (SPARK_Mode_Pragma): New routine and pragma Inline.
1608 * lib-load.adb (Create_Dummy_Package_Unit): Initialize
1609 field SPARK_Mode_Pragma.
1610 (Load_Main_Source): Initialize field SPARK_Mode_Pragma.
1611 (Load_Unit): Initialize field SPARK_Mode_Pragma.
1612 * lib-writ.adb (Add_Preprocessing_Dependency): Initialize field
1614 (Ensure_System_Dependency): Initialize field SPARK_Mode_Pragma.
1615 * opt.ads: Alphabetize verification flags. Store the
1616 compilation-wide SPARK mode in variable Global_SPARK_Mode.
1617 * par-prag.adb: Pragma SPARK_Mode does not need special processing
1619 * sem_ch13.adb (Analyze_Aspect_Specifications): Convert aspect
1620 SPARK_Mode into a pragma.
1621 (Check_Aspect_At_Freeze_Point): Aspect SPARK_Mode does not need
1623 * sem_prag.adb: Add an entry for SPARK_Mode in table Sig_Flags.
1624 (Analyze_Pragma): Add processing for pragma SPARK_Mode.
1625 (Get_SPARK_Mode_Id): New routine.
1626 (Is_Elaboration_SPARK_Mode): New routine.
1627 (Is_Private_SPARK_Mode): New routine.
1628 * sem_prag.ads (Get_SPARK_Mode_Id): New routine.
1629 (Is_Elaboration_SPARK_Mode): New routine.
1630 (Is_Private_SPARK_Mode): New routine.
1631 * sinfo.ads: Update the comment on the usage of field Next_Pragma.
1632 * snames.ads-tmpl: Add new predefined name for SPARK_Mode and
1633 Auto. Add new pragma Id for SPARK_Mode.
1634 * types.ads: Add new type SPARK_Mode_Id.
1636 2013-07-05 Ed Schonberg <schonberg@adacore.com>
1638 * sem_ch13.adb (Analyze_Aspect_Specifications): For
1639 pre/postconditions copy the expression to the generated pragma,
1640 to avoid sharing between the original aspect and the pragma node,
1641 because in ASIS_Mode both will be independently analyzed.
1643 2013-07-05 Ed Schonberg <schonberg@adacore.com>
1645 * exp_ch3.adb (Build_Variant_Record_Equality): Add pairs of
1646 formals for each discriminant of an unchecked union.
1647 (Make_Eq_Case): Suprogram accepts a list of discriminants. Nested
1648 variants are supported. New helper function Corresponding_Formal.
1649 * exp_ch4.adb (Build_Equality_Call): For unchecked unions,
1650 loop through discriminants to create list of inferred values,
1651 and modify call to equality routine accordingly.
1653 2013-07-05 Claire Dross <dross@adacore.com>
1655 * a-cfdlli.ads, a-cfhama.ads, a-cfhase.ads, a-cforma.ads,
1656 a-cforse.ads, a-cofove.ads: Add preconditions when needed +
1657 container types are not tagged any more.
1659 2013-07-05 Thomas Quinot <quinot@adacore.com>
1661 * freeze.adb (Freeze_Entity): For an object with captured
1662 initialization statements, do not remove Init_Stmts from the
1663 enclosing list, as Freeze_All might rely on it to know where to
1666 2013-07-05 Robert Dewar <dewar@adacore.com>
1668 * exp_ch4.adb, a-cfdlli.ads, a-ngelfu.ads, s-bignum.adb: Minor
1671 2013-07-05 Hristian Kirtchev <kirtchev@adacore.com>
1673 * exp_ch4.adb (Expand_Composite_Equality): Use the full view
1674 when the base type is private.
1676 2013-07-05 Claire Dross <dross@adacore.com>
1678 * a-cfdlli.ads: Add preconditions when needed.
1680 2013-07-05 Robert Dewar <dewar@adacore.com>
1682 * sem_ch8.adb: Minor reformatting.
1684 2013-07-05 Ed Schonberg <schonberg@adacore.com>
1686 * sem_ch3.adb (Access_Subprogram_Declaration): Use
1687 Generate_Reference_To_Formals.
1688 * lib-xref.adb (Generate_Reference_To_Formals): In the case of
1689 access to subprograms, the formals are found in the designated
1692 2013-07-05 Robert Dewar <dewar@adacore.com>
1694 * gnat_ugn.texi: Document that comments can be lined up with
1695 previous non-blank line.
1696 * styleg.adb (Check_Comment): Allow indentation to match previous
1697 non-blank line (Same_Column_As_Previous_Line): New function
1699 2013-07-05 Robert Dewar <dewar@adacore.com>
1701 * gnat_rm.texi: Update doc on missing pragmas.
1702 * sem_ch12.adb: Minor comment additions.
1704 2013-07-05 Hristian Kirtchev <kirtchev@adacore.com>
1706 * sem_prag.adb (Analyze_Pragma): Ensure that
1707 Contract_Cases, Depends and Global are analyzed when they apply
1708 to a subprogram compilation unit. The pragmas are all added
1709 unconditionally to the construct's contract. This ensures that
1710 proof tools can locate the pragmas.
1712 2013-07-05 Ed Schonberg <schonberg@adacore.com>
1714 * sem_ch8.adb (Freeze_Actual_Profile): An instance within
1715 a generic unit does not freeze a generic private type of the
1716 enclosing generic. This rule must also apply to a type derived
1717 from a generic private type.
1719 2013-07-05 Arnaud Charlet <charlet@adacore.com>
1721 * gnat_rm.texi: Add missing documentation for pragmas.
1723 2013-07-05 Yannick Moy <moy@adacore.com>
1725 * sem_ch12.adb: Minor comment.
1727 2013-07-05 Robert Dewar <dewar@adacore.com>
1729 * gnat_rm.texi: Document that -gnatR and -gnatD cannot be used
1731 * switch-c.adb: Do not allow -gnatD and -gnatR to both be
1734 2013-07-05 Robert Dewar <dewar@adacore.com>
1736 * gnat_rm.texi: Add missing documentation for pragmas.
1737 * sem_ch8.adb: Minor reformatting.
1738 * gnat_ugn.texi: Document that -gnatR and -gnatD cannot be used
1741 2013-07-05 Yannick Moy <moy@adacore.com>
1743 * sem_ch12.ads, sem_ch12.adb (Need_Subprogram_Instance_Body): Force
1744 instance of subprogram body in SPARK mode, by testing Expander_Active
1745 (set in SPARK mode) instead of Full_Expander_Active (not set in
1747 * sem_ch8.adb: Minor reformatting.
1749 2013-07-05 Robert Dewar <dewar@adacore.com>
1751 * freeze.adb (Freeze_Entity): Remove test of obsolete flag
1752 Propagate_Exceptions, and associated useless code that did
1754 * gnat_rm.texi: Add documentation for obsolete pragma
1755 Propagate_Exceptions.
1756 * opt.ads (Propagate_Exceptions): Obsolete flag removed.
1757 * sem_prag.adb (Analyze_Pragma, case Propagate_Exceptions):
1758 Remove useless and obsolete setting of Propagate_Exceptions flag.
1760 2013-07-05 Robert Dewar <dewar@adacore.com>
1762 * gnat_rm.texi, sem_prag.adb: Minor comment/text fixes.
1764 2013-07-05 Robert Dewar <dewar@adacore.com>
1766 * gnat_rm.texi: Add missing doc for various pragmas.
1768 2013-07-05 Robert Dewar <dewar@adacore.com>
1770 * par_sco.adb, sem_ch12.adb, par-ch5.adb: Minor reformatting.
1771 * gnat_rm.texi: Document pragma Profile_Warnings.
1772 * restrict.ads, sem_prag.adb: Minor reformatting.
1774 2013-07-05 Ed Schonberg <schonberg@adacore.com>
1776 * sem_ch12.adb (Check_Formal_Package_Instance): Handle properly
1777 a formal subprogram that was defaulted in the formal package.
1779 2013-07-05 Thomas Quinot <quinot@adacore.com>
1781 * par_sco.adb (Traverse_Declarations_Or_Statements): Ignore
1782 N_Implicit_Label_Declaration nodes.
1784 2013-07-05 Robert Dewar <dewar@adacore.com>
1786 * a-cfhase.adb, sem_prag.adb, a-cfhama.adb: Minor reformatting.
1788 2013-07-05 Ed Schonberg <schonberg@adacore.com>
1790 * sem_ch12.adb (Copy_Generic_Node): Check that name in function
1791 call is a valid entity name before preserving entity in generic
1794 2013-07-05 Thomas Quinot <quinot@adacore.com>
1796 * par-ch5.adb: Minor reformatting.
1798 2013-07-05 Thomas Quinot <quinot@adacore.com>
1800 * sinfo.ads: Minor clarification to documentation for
1801 N_Implicit_Label_Declaration.
1803 2013-07-05 Hristian Kirtchev <kirtchev@adacore.com>
1805 * a-except-2005.adb, a-except.adb: Add constant Rmsg_17. Correct the
1806 values of all remaining constants.
1807 (Rcheck_35): New routine along with pragmas Export and No_Return.
1808 (Rcheck_PE_Aliased_Parameters): New routine along with pragmas
1809 Export and No_Return.
1810 (Rcheck_PE_All_Guards_Closed,
1811 Rcheck_PE_Bad_Predicated_Generic_Type,
1812 Rcheck_PE_Current_Task_In_Entry_Body,
1813 Rcheck_PE_Duplicated_Entry_Address, Rcheck_PE_Explicit_Raise,
1814 Rcheck_PE_Implicit_Return, Rcheck_PE_Misaligned_Address_Value,
1815 Rcheck_PE_Missing_Return, Rcheck_PE_Overlaid_Controlled_Object,
1816 Rcheck_PE_Potentially_Blocking_Operation
1817 Rcheck_PE_Stubbed_Subprogram_Called,
1818 Rcheck_PE_Unchecked_Union_Restriction,
1819 Rcheck_PE_Non_Transportable_Actual, Rcheck_SE_Empty_Storage_Pool,
1820 Rcheck_SE_Explicit_Raise, Rcheck_SE_Infinite_Recursion,
1821 Rcheck_SE_Object_Too_Large, Rcheck_PE_Finalize_Raised_Exception):
1822 Update the use of Rmsg_XX.
1823 (Rcheck_17, Rcheck_18, Rcheck_19,
1824 Rcheck_20, Rcheck_21, Rcheck_22, Rcheck_23, Rcheck_24, Rcheck_25,
1825 Rcheck_26, Rcheck_27, Rcheck_28, Rcheck_29, Rcheck_30, Rcheck_31,
1826 Rcheck_32, Rcheck_33, Rcheck_34, Rcheck_35): Update corresponding
1827 renamed subprograms.
1828 * checks.adb: Add with and use clause for Stringt.
1829 (Apply_Parameter_Aliasing_Checks): Make constant Loc visible in
1830 all subprograms of Apply_Parameter_Aliasing_Checks. Remove local
1831 variable Cond. Initialize Check at the start of the routine. Use
1832 routine Overlap_Check to construct a simple or a detailed run-time
1833 check. Update the creation of the simple check.
1834 (Overlap_Check): New routine.
1835 * exp_ch11.adb (Get_RT_Exception_Name): Add a value for
1836 PE_Aliased_Parameters.
1837 * types.ads: Add new enumeration literal
1838 PE_Aliased_Parameters. Update the corresponding integer values
1839 of all RT_Exception_Code literals.
1840 * types.h: Add new constant PE_Aliased_Parameters. Correct the
1841 values of all remaining constants.
1843 2013-07-05 Yannick Moy <moy@adacore.com>
1845 * gnat_rm.texi: Minor renaming of SPARK into SPARK 2005 in
1848 2013-07-05 Ed Schonberg <schonberg@adacore.com>
1850 * sem_prag.adb (Analyze_PPC_In_Decl_Part): For a class-wide
1851 condition, when replacing the name of a formal by a conversion
1852 to the class-wide type, exempt selector names that appear in
1853 parameter associations.
1855 2013-06-13 Eric Botcazou <ebotcazou@adacore.com>
1857 * gcc-interface/ada-tree.h (DECL_BY_DOUBLE_REF_P): Delete.
1858 * gcc-interface/gigi.h (annotate_object): Adjust prototype.
1859 (convert_vms_descriptor): Likewise.
1860 * gcc-interface/decl.c (gnat_to_gnu_param): Do not pass fat pointer
1861 types by double dereference.
1862 (annotate_object): Remove BY_DOUBLE_REF parameter and adjust.
1863 (gnat_to_gnu_entity): Adjust calls to annotate_object.
1864 * gcc-interface/trans.c (Identifier_to_gnu): Do not deal with double
1866 (Call_to_gnu): Likewise.
1867 (build_function_stub): Adjust call to convert_vms_descriptor.
1868 (Subprogram_Body_to_gnu): Adjust call to annotate_object.
1869 * gcc-interface/utils.c (convert_vms_descriptor): Remove BY_REF
1870 parameter and adjust.
1872 2013-05-30 Eric Botcazou <ebotcazou@adacore.com>
1874 * gcc-interface/Makefile.in (arm% androideabi): Robustify.
1876 2013-05-26 Eric Botcazou <ebotcazou@adacore.com>
1878 * gcc-interface/decl.c: (gnat_to_gnu_entity): In ASIS mode, do not
1879 check that access types have a set size.
1881 2013-05-26 Eric Botcazou <ebotcazou@adacore.com>
1883 * gcc-interface/decl.c (vinfo_t): New type and associated vector.
1884 (components_to_record): Change return type to bool.
1885 Lay out the variants in two passes. Do not force a specific layout for
1886 the variant part if the variants do not have a representation clause.
1887 Take the alignment of the variant part into account when laying out
1888 variants without rep clause in a record type with a partial rep clause.
1889 (create_rep_part): Do not set the position of the field.
1891 2013-05-26 Eric Botcazou <ebotcazou@adacore.com>
1893 * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Last_Bit>: Add kludge
1894 to avoid generating an overflow for -1.
1896 2013-05-26 Eric Botcazou <ebotcazou@adacore.com>
1898 * gcc-interface/gigi.h (create_type_decl): Adjust prototype.
1899 (create_label_decl): Complete prototype.
1900 (process_attributes): Declare.
1901 * gcc-interface/decl.c (gnat_to_gnu_entity): Adjust multiple calls to
1902 create_type_decl throughout.
1903 <E_Enumeration_Type>: Do the layout of the type manually and call
1904 process_attributes on it. Reindent.
1905 <E_Enumeration_Subtype>: Minor tweak.
1906 <E_Floating_Point_Subtype>: Reindent.
1907 <E_Array_Subtype>: Call process_attributes on the array type built
1908 for a packed array type.
1909 <E_Record_Type>: Call process_attributes on the type.
1910 <E_Record_Subtype>: Likewise.
1911 <E_Access_Type>: Likewise.
1912 <E_Subprogram_Type>: Likewise.
1913 Likewise for all types at the end of the processing.
1914 * gcc-interface/utils.c (make_aligning_type): Adjust call to
1916 (maybe_pad_type): Likewise.
1917 (create_index_type): Likewise.
1918 (create_type_decl): Remove attr_list parameter and associated code.
1919 (create_var_decl_1): Call process_attributes on the variable.
1920 (process_attributes): Take a pointer to the object and add in_place
1921 and gnat_node parameters and adjust throughout.
1922 <ATTR_MACHINE_ATTRIBUTE>: Pass ATTR_FLAG_TYPE_IN_PLACE only on demand
1923 and set the input location.
1924 Zap the attribute list at the end.
1925 (create_subprog_decl): Call process_attributes on the subprogram.
1926 (build_unc_object_type): Adjust call to create_type_decl.
1927 (handle_vector_type_attribute): Remove dead code.
1929 2013-05-26 Eric Botcazou <ebotcazou@adacore.com>
1931 * gcc-interface/gigi.h (make_aligning_type): Adjust prototype.
1932 * gcc-interface/utils.c (make_aligning_type): Take GNAT_NODE parameter
1933 for the position of the associated TYPE_DECL.
1934 * gcc-interface/decl.c (gnat_to_gnu_entity): Adjust call to above.
1935 * gcc-interface/utils2.c (maybe_wrap_malloc): Likewise.
1937 2013-05-26 Eric Botcazou <ebotcazou@adacore.com>
1939 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not prematurely
1940 elaborate the full view of a type with a freeze node.
1941 * gcc-interface/trans.c (process_type): Add explicit predicate.
1943 2013-05-26 Eric Botcazou <ebotcazou@adacore.com>
1945 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Always build the
1946 UNC variable for aliased objects with unconstrained nominal subtype.
1948 2013-05-24 Eric Botcazou <ebotcazou@adacore.com>
1950 * gcc-interface/gigi.h (gnat_init_gcc_fp): Declare.
1951 * gcc-interface/trans.c (gigi): Call it.
1952 * gcc-interface/misc.c (gnat_init_gcc_fp): New function.
1954 2013-05-24 Eric Botcazou <ebotcazou@adacore.com>
1956 * gcc-interface/gigi.h (enum inline_status_t): New type.
1957 (create_subprog_decl): Adjust prototype.
1958 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Procedure>: Adjust
1959 calls to create_subprog_decl.
1960 (get_minimal_subprog_decl): Likewise.
1961 * gcc-interface/trans.c (gigi): Likewise.
1962 (build_raise_check): Likewise.
1963 (establish_gnat_vms_condition_handler): Likewise.
1964 (Compilation_Unit_to_gnu): Likewise.
1965 (gnat_to_gnu): Likewise.
1966 * gcc-interface/utils.c (create_subprog_decl): Change inline_flag
1967 parameter to inline_status and implement for suppressed inlining.
1969 2013-05-24 Eric Botcazou <ebotcazou@adacore.com>
1971 * gcc-interface/ada-tree.h (LOOP_STMT_NO_UNROLL): New define.
1972 (LOOP_STMT_UNROLL): Likewise.
1973 (LOOP_STMT_NO_VECTOR): Likewise.
1974 (LOOP_STMT_VECTOR): Likewise.
1975 * gcc-interface/trans.c (struct loop_info_d): Replace label field
1977 (Pragma_to_gnu) <Pragma_Loop_Optimize>: New case.
1978 (Loop_Statement_to_gnu): Save the loop statement onto the stack
1979 instead of the label.
1980 (gnat_to_gnu) <N_Exit_Statement>: Retrieve the loop label.
1982 2013-05-24 Eric Botcazou <ebotcazou@adacore.com>
1984 * gcc-interface/trans.c: Include diagnostic.h and opts.h.
1985 (Pragma_to_gnu) <Pragma_Warnings>: New case.
1987 2013-05-24 Eric Botcazou <ebotcazou@adacore.com>
1989 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Constify
1990 a handful of local variables.
1991 For a derived untagged type that renames discriminants, change the type
1992 of the stored discriminants to a subtype with the bounds of the type
1993 of the visible discriminants.
1994 (build_subst_list): Rename local variable.
1996 2013-05-16 Jason Merrill <jason@redhat.com>
1998 * gcc-interface/Make-lang.in (gnat1$(exeext)): Use link mutex.
2000 2013-05-13 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
2003 * gcc-interface/Makefile.in: Allow for amd64 solaris2.
2005 2013-05-07 Eric Botcazou <ebotcazou@adacore.com>
2008 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Subtype>: Use
2009 int_const_binop to shift bounds by 1 when they are integer constants.
2011 2013-04-25 Arnaud Charlet <charlet@adacore.com>>
2013 * gcc-interface/Makefile.in (ADA_EXCLUDE_SRCS): Exclude s-init.ad{s,b}
2015 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2017 * checks.adb (Apply_Predicate_Check): Update the comment associated
2018 with the call to Check_Expression_Against_Static_Predicate.
2019 * sem_ch3.adb (Analyze_Object_Declaration): Update the comment
2020 associated with the call to Check_Expression_Against_Static_Predicate.
2021 * sem_util.adb (Check_Expression_Against_Static_Predicate):
2022 Broaden the check from a static expression to an expression with
2023 a known value at compile time.
2024 * sem_util.ads (Check_Expression_Against_Static_Predicate): Update
2027 2013-04-25 Thomas Quinot <quinot@adacore.com>
2029 * exp_attr.adb (Expand_N_Attribute_Reference, cases Position,
2030 First_Bit, and Last_Bit): Fix incorrect test in implementation of
2031 RM 2005 13.5.2(3/2).
2033 2013-04-25 Claire Dross <dross@adacore.com>
2035 * a-cfhase.adb, a-cfhase.ads, a-cforma.adb, a-cforma.ads, a-cfhama.adb,
2036 a-cfhama.ads, a-cforse.adb, a-cforse.ads, a-cofove.adb, a-cofove.ads
2037 (Query_Element): Removed.
2038 (Update_Element): Removed.
2039 (Insert): The version with no New_Item specified is removed.
2043 Every check of fields Busy and Lock has been removed.
2045 2013-04-25 Robert Dewar <dewar@adacore.com>
2047 * sem_prag.adb (Analyze_Pragma, case Contract_Cases): Remove
2048 call to S14_Pragma (Find_Related_Subprogram): Require proper
2049 placement in subprogram body (Find_Related_Subprogram): Detect
2050 duplicates for all cases (Find_Related_Subprogram): Handle case
2051 of spec nested inside body.
2053 2013-04-25 Arnaud Charlet <charlet@adacore.com>
2055 * par-prag.adb: Fix typo.
2057 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2059 * checks.adb (Apply_Predicate_Check): If the type has a static
2060 predicate and the expression is also static, check whether the
2061 expression satisfies the predicate.
2062 * sem_ch3.adb (Analyze_Object_Declaration): If the type has a
2063 static predicate and the expression is also static, see if the
2064 expression satisfies the predicate.
2065 * sem_util.adb: Alphabetize several routines.
2066 (Check_Expression_Against_Static_Predicate): New routine.
2067 * sem_util.ads (Check_Expression_Against_Static_Predicate): New routine.
2069 2013-04-25 Robert Dewar <dewar@adacore.com>
2071 * gnat_rm.texi: Document Reason argument for pragma Warnings.
2072 * par-prag.adb: Handle Reason parameter for pragma Warnings.
2073 * sem_prag.adb (Analyze_Pragma, case Warnings): Allow Reason argument.
2074 * snames.ads-tmpl (Name_Reason): New name entry.
2076 2013-04-25 Yannick Moy <moy@adacore.com>
2078 * exp_spark.adb (Expand_SPARK_N_In): Remove procedure.
2079 (Expand_SPARK): Remove special expansion for membership tests.
2081 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2083 * exp_ch3.adb (Expand_N_Object_Declaration): Update all places
2084 that should use constant Base_Typ. When building an invariant
2085 check, account for invariants coming from the base type. Prevent
2086 the creation of a junk invariant check when the related object
2087 is of an array type and it is initialized with an aggregate.
2088 * exp_util.adb (Make_Invariant_Call): Typ is now a variable. Use
2089 the base type to create an invariant call when the type of the
2090 expression is a composite subtype.
2092 2013-04-25 Vasiliy Fofanov <fofanov@adacore.com>
2094 * a-cborse.adb: Fix minor typo.
2096 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2098 * sem_ch6.adb (Different_Generic_Profile): A spec and body
2099 match in an instance if a subtype declaration that renames a
2100 generic actual with the same name appears between spec and body.
2102 2013-04-25 Robert Dewar <dewar@adacore.com>
2104 * sem_util.adb: Minor reformatting.
2106 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2108 * exp_aggr.adb (Expand_N_Aggregate): Use special circuitry to
2109 fold strings with a single others choice only if there are no
2110 expressions in the aggregate.
2112 2013-04-25 Arnaud Charlet <charlet@adacore.com>
2114 * gnat_ugn.texi: Update doc on Ada 2012 default mode.
2116 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2118 * exp_ch6.adb: Add with and use clause for Stringt.
2119 (Expand_Contract_Cases): Moved from sem_ch6. Add formal parameters
2120 Decls and Stmts along with comments on their usage.
2121 * exp_ch6.ads (Expand_Contract_Cases): Moved from sem_ch6.
2122 * sem_ch6.adb (Expand_Contract_Cases): Moved to exp_ch6.
2123 (Process_Contract_Cases): Update the call to Expand_Contract_Cases.
2125 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2127 * gnat_rm.texi: Minor editing, to clarify use of dimension aspects.
2128 * sem_util.adb (Is_OK_Variable_For_Out_Formal): Reject an
2129 aggregate for a packed type, which may be converted into an
2130 unchecked conversion of an object.
2132 2013-04-25 Robert Dewar <dewar@adacore.com>
2134 * sem_prag.adb: Minor code reorganization (correct misspelling
2136 * sem_util.adb, aspects.ads, sem_ch6.adb: Minor reformatting.
2137 * gnat_rm.texi: Document impl-defined aspects.
2138 * sem_dim.adb, sem_dim.ads, gnat_ugn.texi, s-dimmks.ads: Minor
2141 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2143 * einfo.adb (Set_Abstract_States): The attribute now applies
2144 to generic packages.
2145 * sem_ch4.adb (Referenced): Moved to sem_util.
2146 * sem_ch7.adb (Unit_Requires_Body): A [generic] package with
2147 a non-null abstract state needs a body.
2148 * sem_prag.adb (Analyze_Depends_In_Decl_Part): Update the calls
2149 to Collect_Subprogram_Inputs_Outputs.
2150 (Analyze_Global_Item): Verify the proper usage of an item with mode
2151 In_Out or Output relative to the enclosing context.
2152 (Analyze_Pragma): Abstract_State can now be applied to a generic
2153 package. Do not reset the Analyzed flag for pragmas Depends and Global
2154 as this is not needed.
2155 (Appears_In): Moved to library level.
2156 (Check_Mode_Restiction_In_Enclosing_Context): New routine.
2157 (Collect_Subprogram_Inputs_Outputs): Moved to library level. Add
2158 formal parameters Subp_Id, Subp_Inputs, Subp_Outputs and Global
2159 seen along with comments on usage.
2160 * sem_util.ads, sem_util.adb (Referenced): New routine.
2162 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2164 * sem_ch6.adb (Expand_Contract_Cases): Generate
2165 detailed error messages only when switch -gnateE is in effect.
2167 2013-04-25 Yannick Moy <moy@adacore.com>
2169 * sem_attr.adb (Analyze_Attribute): Do not issue
2170 an error for a possibly misplaced 'Result or 'Old attribute when
2171 analyzing the aspect.
2173 2013-04-25 Robert Dewar <dewar@adacore.com>
2175 * sem_ch12.adb, sem_util.adb, sem_ch4.adb: Minor reformatting.
2177 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2179 * sem_ch4.adb (Analyze_Quantified_Expression):
2180 Add local variable Loop_Id. Verify that the loop variable
2181 is used within the condition of the quantified expression.
2182 (Referenced): New routine.
2184 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2186 * sem_case.adb (Analyze_Choices): Enhance the error message
2187 given on a bad use of subtype predicate.
2188 * sem_ch5.adb (Analyze_Loop_Parameter_Specification): Enhance
2189 the error message given on a bad use of subtype predicate.
2190 * sem_util.adb (Bad_Predicated_Subtype_Use): Add formal parameter
2191 Suggest_Static. Emit an extra error message advising how to
2192 remedy the bad use of the predicate if the context warrants it.
2193 * sem_util.ads (Bad_Predicated_Subtype_Use): Add formal parameter
2194 Suggest_Static along with a comment explaining its usage.
2196 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2198 * sem_disp.adb (Check_Dispatching_Operation): Further refinement
2199 to checks for AI05-0125: the check for a hidden primitive that
2200 may be overridden by the new declaration only applies if the
2201 hidden operation is never declared. This is not the case if the
2202 operation is declared in a parent unit.
2204 2013-04-25 Robert Dewar <dewar@adacore.com>
2206 * debug.adb: Remove d.X and d.Y entries and documentation.
2207 * exp_ch4.adb (Expand_N_If_Expression): Remove special code used
2208 if expression with actions not available (now always available).
2209 (Expand_Short_Circuit_Operator): Same change.
2210 * gnat1drv.adb (Adjust_Global_Switches) Remove setting
2211 Use_Expression_With_Actions flag, since this is now obsolete.
2212 * opt.ads (Use_Expression_Actions): Removed (always True now).
2213 * sinfo.ads: Minor comment updates.
2215 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2217 * sem_ch12.adb (Check_Generic_Actuals): If an actual is an array
2218 subtype whose base type is currently private, install full view
2219 when compiling instance body.
2221 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2223 * sem_disp.adb (Check_Dispatching_Operation): Refine checks for
2224 AI05-0125: the check for a hidden primitive that may be overridden
2225 by the new declaration is only performed if the declaration comes
2226 from source, and it must carry an explicit overriding indicator.
2228 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2230 * einfo.adb (Abstract_States): The attribute now applies to
2232 * sem_ch3.adb (Analyze_Object_Declaration): Check whether an
2233 object declaration introduces an illegal hidden state.
2234 * sem_prag.adb (Analyze_Abstract_State): Check whether a state
2235 declaration introduces an illegal hidden state.
2236 * sem_util.ads, sem_util.adb (Check_No_Hidden_State): New routine.
2238 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2240 * exp_ch6.adb (Is_Build_In_Place_Function_Call): The call may
2241 be to a protected function, in which case the name in the call
2242 is a selected component.
2244 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2246 * sem_ch4.adb (Analyze_Quantified_Expression):
2247 Warn on a suspicious use of quantifier "some" when "all" was meant.
2248 (No_Else_Or_Trivial_True): New routine.
2250 2013-04-25 Robert Dewar <dewar@adacore.com>
2252 * einfo.ads, einfo.adb: Put back with/use for Namet.
2253 (Get_Pragma): New name (wi new spec) for Find_Pragma.
2254 * sem_ch6.adb: Change name Find_Pragma to Get_Pragma with
2255 different interface.
2257 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2259 * sem_ch3.adb (Is_Visible_Component): In an instance all
2260 components are visible.
2262 2013-04-25 Matthew Heaney <heaney@adacore.com>
2264 * a-rbtgbo.adb, a-crbtgo.adb (Generic_Equal): do not test for
2265 tampering when container empty.
2266 * a-crbtgk.adb (Ceiling, Find, Floor): ditto.
2267 (Generic_Conditional_Insert, Generic_Conditional_Insert_With_Hint):
2270 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2272 * par-ch12.adb: Move aspects from package specification to
2273 generic package declaration.
2274 * sem_ch12.adb: Analyze aspect specifications before building
2275 and analyzing the generic copy, so that the generated pragmas
2276 are properly taken into account.
2277 * sem_ch13.adb: For compilation unit aspects that apply to a
2278 generic package declaration, insert corresponding pragmas ahead
2279 of visible declarations.
2280 * sprint.adb: Display properly the aspects of a generic type
2283 2013-04-25 Robert Dewar <dewar@adacore.com>
2285 * frontend.adb: Minor reformatting.
2287 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2289 * einfo.ads: Extend documentation on use of Is_Private_Ancestor
2291 * sem_ch3.adb (Is_Visible_Component): Refine predicate for the
2292 case of untagged types derived from private types, to reject
2293 illegal selected components.
2295 2013-04-25 Gary Dismukes <dismukes@adacore.com>
2297 * sem_util.adb (Is_Dependent_Component_Of_Mutable_Object): Test
2298 for case of selecting from an unexpanded implicit dereference
2299 and do not make a recursive call on such a prefix.
2301 2013-04-25 Doug Rupp <rupp@adacore.com>
2303 * targparm.adb (VXF{_Str}): New tag for vaxfloat.
2304 (Get_Target_Parameters): Handle VXF tag.
2305 * targparm.ads (VAX_Float_On_Target): New boolean.
2306 * system-vms-ia64.ads (VAX_Float): New boolean.
2307 * frontend.adb (Frontend): Handle VAX float boolean.
2309 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2311 * einfo.ads, einfo.adb: Remove with and use clauses for Namet.
2312 (Find_Pragma): New routine.
2313 * sem_util.ads, sem_util.adb (Find_Pragma): Moved to einfo.
2315 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2317 * sem_ch13.adb (Add_Call): Do not capture the nature of the inherited
2319 (Add_Predicates): Save the static predicate for diagnostics and error
2321 (Process_PPCs): Remove local variables Dynamic_Predicate_Present and
2322 Static_Predicate_Present. Add local variable Static_Pred. Ensure that
2323 the expression of a static predicate is static.
2325 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2327 * einfo.adb (Is_Ghost_Subprogram): Remove useless code.
2329 2013-04-25 Robert Dewar <dewar@adacore.com>
2331 * gnat_rm.texi: Minor addition of index entry.
2333 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2335 * sem_ch6.adb (Check_Access_Invariants): Test whether an
2336 invariant procedure is empty before generating a call to it.
2337 (Has_Enabled_Predicate): New routine.
2338 (Has_Null_Body): New routine.
2339 (Process_PPCs): Test whether an invariant procedure is
2340 empty before generating a call to it. Test whether predicates are
2341 enabled for a particular type before generating a predicate call.
2342 * sem_util.ads, sem_util.adb (Find_Pragma): New routine.
2344 2013-04-25 Robert Dewar <dewar@adacore.com>
2346 * sem_ch7.adb, einfo.adb, repinfo.adb, snames.adb-tmpl,
2347 snames.ads-tmpl: Minor reformatting.
2349 2013-04-25 Thomas Quinot <quinot@adacore.com>
2351 * sem_ch7.adb: Minor reformatting.
2353 2013-04-25 Robert Dewar <dewar@adacore.com>
2355 * gnat_rm.texi: Minor fix to Loop_Variant doc (Loop_Entry allowed).
2356 * s-tarest.adb: Minor reformatting.
2358 2013-04-25 Hristian Kirtchev <kirtchev@adacore.com>
2360 * aspects.ads, aspects.adb: Remove aspect Ghost from all relevant
2362 * einfo.adb: Remove with and use clause for Aspects.
2363 (Is_Ghost_Function): Removed.
2364 (Is_Ghost_Entity): New routine.
2365 (Is_Ghost_Subprogram): New routine.
2366 * einfo.ads: Remove synthesized attribute Is_Ghost_Function
2367 along with its uses in entities. Add synthesized attributes
2368 Is_Ghost_Entity and Is_Ghost_Subprogram along with uses in related
2370 (Is_Ghost_Function): Removed.
2371 (Is_Ghost_Entity): New routine.
2372 (Is_Ghost_Subprogram): New routine.
2373 * par-prag.adb: Remove pragma Ghost from the processing machinery.
2374 * repinfo.adb (List_Mechanisms): Add a value for convention Ghost.
2375 * sem_attr.adb (Analyze_Access_Attribute): Update the check
2376 for ghost subprograms.
2377 * sem_ch4.adb (Analyze_Call): Update the check for calls
2378 to ghost subprograms.
2379 (Check_Ghost_Function_Call): Removed.
2380 (Check_Ghost_Subprogram_Call): New routine.
2381 * sem_ch6.adb (Check_Convention): Rewritten.
2382 (Check_Overriding_Indicator): Remove the check for overriding
2384 (Convention_Of): New routine.
2385 * sem_ch12.adb (Preanalyze_Actuals): Update the check for ghost
2386 generic actual subprograms.
2387 * sem_mech.adb (Set_Mechanisms): Add an entry for convention Ghost.
2388 * sem_prag.adb: Remove the value for pragma Ghost from
2390 (Analyze_Pragma): Remove the processing for pragma Ghost.
2391 (Process_Convention): Emit an error when a ghost
2392 subprogram attempts to override.
2393 (Set_Convention_From_Pragma): Emit an error when a ghost subprogram
2394 attempts to override.
2395 * sinfo.ads: Clarify the usage of field Label_Construct.
2396 * snames.adb-tmpl (Get_Convention_Id): Add an entry for
2397 predefined name Ghost.
2398 (Get_Convention_Name): Add an entry for convention Ghost.
2399 * snames.ads-tmpl: Move predefined name Ghost to the sublist
2400 denoting conventions. Add convention id Ghost. Remove pragma
2403 2013-04-25 Ed Schonberg <schonberg@adacore.com>
2405 * sem_ch7.adb (Swap_Private_Dependents): Do no recurse on child
2406 units if within a generic hierarchy.
2408 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2410 * exp_ch6.adb (Expand_Actuals): Add a predicate check on an
2411 actual the related type has a predicate function.
2412 * sem_ch3.adb (Constant_Redeclaration): Ensure that the related
2413 type has an invariant procedure before building a call to it.
2414 * sem_ch6.adb (Append_Enabled_Item): New routine.
2415 (Check_Access_Invariants): Use routine
2416 Append_Enabled_Item to chain onto the list of postconditions.
2417 (Contains_Enabled_Pragmas): Removed.
2418 (Expand_Contract_Cases): Use routine Append_Enabled_Item to chain onto
2419 the list of postconditions.
2420 (Invariants_Or_Predicates_Present): Removed.
2421 (Process_PPCs): Partially reimplemented.
2423 2013-04-24 Sergey Rybin <rybin@adacore.com frybin>
2425 * tree_io.ads: Update ASIS_Version_Number because of changes
2426 in the way how entities are chained in a scope by means of
2429 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2431 * exp_ch13.adb (Expand_N_Attribute_Definition_Clause, case
2432 Storage_Size): If the clause is not from an aspect, insert
2433 assignment to size variable of task type at the point of the
2434 clause, not after the task definition, to prevent access before
2435 elaboration in the back-end.
2437 2013-04-24 Yannick Moy <moy@adacore.com>
2439 * sem_prag.adb (Sig_Flags): Set correct value for Pragma_Assume.
2441 2013-04-24 Yannick Moy <moy@adacore.com>
2443 * gnat_rm.texi: Document 'Loop_Entry.
2445 2013-04-24 Jose Ruiz <ruiz@adacore.com>
2447 * s-tassta.adb, s-tarest.adb (Task_Wrapper): Start looking for
2448 fall-back termination handlers from the parents, because they apply
2449 only to dependent tasks.
2450 * s-solita.adb (Task_Termination_Handler_T): Do not look for fall-back
2451 termination handlers because the environment task has no parent,
2452 and if it defines one of these handlers it does not apply to
2453 itself because they apply only to dependent tasks.
2455 2013-04-24 Robert Dewar <dewar@adacore.com>
2457 * sem_type.adb, exp_attr.adb, exp_ch4.adb: Minor reformatting.
2459 2013-04-24 Robert Dewar <dewar@adacore.com>
2461 * gnat_rm.texi: Document 'Update attribute.
2462 * sem_attr.adb (Analyze_Attribute, case Update): Remove call
2463 to S14_Attribute (S14_Attribute): removed.
2465 2013-04-24 Robert Dewar <dewar@adacore.com>
2467 * interfac.ads: Add size clauses for IEEE_Float_32/64
2469 2013-04-24 Claire Dross <dross@adacore.com>
2471 * gnat1drv.adb (Adjust_Global_Switches): Remove
2472 special assignment of Use_Expression_With_Actions for SPARK_Mode.
2474 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2476 * checks.adb (Apply_Predicate_Check): Check for the presence
2477 of the dynamic predicate aspect when trying to determine if the
2478 predicate of a type is non-static.
2479 * sem_ch5.adb (Analyze_Loop_Parameter_Specification): Check
2480 for the presence of the dynamic predicate aspect when trying to
2481 determine if the predicate of a type is non- static.
2482 * sem_ch13.adb (Add_Call): Capture the nature of the
2483 inherited ancestor predicate.
2484 (Build_Predicate_Functions): Update comments. Rewrite the checks on
2485 static predicate application. Complain about the form of a non-static
2486 expression only when the type is static.
2488 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2490 * sem_prag.adb: Add guard to tree traversal.
2492 2013-04-24 Vincent Celier <celier@adacore.com>
2494 * clean.adb (Clean): Remove local variable Root_Environment,
2495 use Makeutl.Root_Environment instead.
2496 * gnatcmd.adb: Remove local variable Root_Environment, use
2497 Makeutl.Root_Environment instead.
2498 * make.adb (Gnatmake): Remove local variable Root_Environment,
2499 use Makeutl.Root_Environment instead.
2500 * prj-makr.adb: Remove local variable Root_Environment, use
2501 Makeutl.Root_Environment instead.
2503 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2505 * exp_attr.adb (Expand_Loop_Entry_Attribute): Clarify the
2506 extraction of the declarative part of the conditional block. Move
2507 the processing of simple infinite loops to the start of the
2508 expansion logic. Correct the check which determines whether the
2509 proper scope is installed in visibility.
2510 * sem_attr.adb (Analyze_Attribute): Add local variable Attr
2511 to keep track of the attribute in case the enclosing indexed
2512 component has to be rewritten. When searching for the enclosing
2513 loop, start from the proper attribute reference in case of a
2514 rewriting. Do not allow for 'Loop_Entry to appear in pragma
2515 Assert. Replace loop variable J with Index. Set the type of the
2517 * sem_ch5.adb (Check_Unreachable_Code): Detect a specialized
2518 block that services a loop statement subject to at least one
2519 'Loop_Entry attribute.
2521 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2523 * sem_type.adb (Disambiguate): In Ada 2012 mode, when trying to
2524 resolve a fixed point operation, use first subtype to determine
2525 whether type and operator are declared in the same list of
2528 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2530 * par-ch6.adb (P_Subprogram): Detect an illegal
2531 placement of the aspect specification list in the context of
2532 expression functions.
2534 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2536 * exp_ch4.adb (Expand_N_Allocator): If the designated object
2537 has tasks, and the pointer type is an itype that has no master
2538 id, create a master renaming in the current context, which can
2539 only be an init_proc.
2541 2013-04-24 Robert Dewar <dewar@adacore.com>
2543 * sem_ch3.adb, sem_ch7.adb: Minor reformatting.
2544 * gnat_rm.texi: Document pragma Loop_Invariant.
2545 * sem_attr.adb (Analyze_Attribute, case Loop_Entry): This is
2546 no longer an S14_Attribute.
2547 * sem_prag.adb (Analyze_Pragma, case Loop_Invariant): Combine
2548 processing with Assert, allow message parameter, remove call
2551 2013-04-24 Thomas Quinot <quinot@adacore.com>
2553 * exp_ch4.adb: Minor reformatting.
2555 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2557 * sem_ch7.adb (Swap_Private_Dependents): New internal routine
2558 to Install_Private_Declarations, to make the installation of
2559 private dependents recursive in the presence of child units.
2560 * sem_ch3.adb (Build_Discriminated_Subtype): Initialize properly
2561 the Private_Dependents of a private subtype.
2563 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2565 * exp_attr.adb (Expand_Loop_Entry_Attribute): Update the
2566 retrieval of the block declarations.
2567 * par-ch4.adb (P_Name): Let the name parsing machinery create
2568 a sequence of nested indexed components for attribute Loop_Entry.
2569 * sem_attr.adb (Analyze_Attribute): Add local constant
2570 Context. Reimplement part of the analysis of attribute Loop_Entry.
2571 (Convert_To_Indexed_Component): Removed.
2572 * sem_ch4.adb (Analyze_Indexed_Component_Form): Do not analyze
2573 an indexed component after it has been rewritten into attribute
2576 2013-04-24 Yannick Moy <moy@adacore.com>
2578 * snames.ads-tmpl: Minor change to list
2579 Loop_(In)variant not in configuration pragma.
2580 * sem_ch3.adb (Analyze_Declarations): Do not look at the original node
2581 for analyzing the expressions in pre/postconditions.
2583 2013-04-24 Robert Dewar <dewar@adacore.com>
2585 * gnatcmd.adb, xref_lib.adb, gnatls.adb, sem_ch13.adb: Minor
2588 2013-04-24 Yannick Moy <moy@adacore.com>
2590 * sem_ch6.adb (Analyze_Generic_Subprogram_Body,
2591 Analyze_Subprogram_Body_Helper): Reset contract node to Empty
2592 before setting entity to E_Subprogram_Body.
2593 * sem_ch8.adb (Analyze_Subprogram_Renaming): Reset contract node to
2594 Empty before setting entity to E_Subprogram_Body.
2596 2013-04-24 Vincent Celier <celier@adacore.com>
2598 * gnat_ugn.texi: Document new gnatls switch -aPdir.
2599 * gnatcmd.adb: Pass switch -aP<dir> to gnatls.
2600 * gnatls.adb (Scan_Ls_Arg): Process new switch -aP<dir>. Issue
2601 a warning for unknown switches.
2602 (Usage): Add line for new switch -aPdir.
2604 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2606 * sem_util.adb, sem_util.ads (Is_Limited_Class_Wide_Type): Return true
2607 if the type comes from a limited view, so that task attributes can be
2610 2013-04-24 Yannick Moy <moy@adacore.com>
2612 * checks.adb (Apply_Float_Conversion_Check): Do not apply checks if
2613 full expansion is not enabled.
2615 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2617 * sem_ch6.adb (Create_Extra_Formals): In Ada 2012, create extra
2618 formals if the type does not yet have a completion, and thus
2619 has no underlying view.
2621 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2623 * sem_ch13.adb (Analyze_Aspect_Specifications): Treat an aspect
2624 specification for Address as a reference, to suppress warnings
2625 on entities that may be read by an external device.
2627 2013-04-24 Sergey Rybin <rybin@adacore.com frybin>
2629 * gnat_ugn.texi: Add description of '--help' and '--version'
2630 options for ASIS tools: gnatelim, gnatmetric, gnatstub, gnatpp.
2632 2013-04-24 Arnaud Charlet <charlet@adacore.com>
2634 * gnat_rm.texi: Minor syntax fix.
2636 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2638 * exp_attr.adb (Expand_Loop_Entry_Attribute): Add extra comments on
2639 what and why is being analyzed. Remove the decoration of renamings as
2640 this simply falls out of the general analysis mechanism.
2642 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2644 * sem_res.adb (Explain_Redundancy): New routine.
2645 (Resolve_Equality_Op): Place the error concerning a redundant
2646 comparison to True at the "=". Try to explain the nature of the
2649 2013-04-24 Javier Miranda <miranda@adacore.com>
2652 * checks.adb, exp_ch6.adb (Install_Null_Excluding_Check): No
2653 check in interface thunks since it is performed at the caller
2655 (Expand_Simple_Function_Return): No accessibility check
2656 needed in thunks since the check is done by the target routine.
2658 2013-04-24 Vincent Celier <celier@adacore.com>
2660 * xref_lib.adb (Add_Entity): Use the canonical file names
2661 so that source file names with capital letters are found on
2662 platforms where file names are case insensitive.
2664 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2666 * par-ch4.adb (P_Name): Continue to parse the name extension when the
2667 construct is attribute Loop_Entry. Do not convert the attribute
2668 reference into an indexed component when there is at least one
2669 expression / range following 'Loop_Entry.
2671 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2673 * sem_ch6.adb (Contains_Enabled_Pragmas): New routine.
2674 (Process_PPCs): Generate procedure _Postconditions
2675 only when the context has invariants or predicates or enabled
2678 2013-04-24 Thomas Quinot <quinot@adacore.com>
2680 * g-socket.adb (Host_Entry): Introduce intermediate copy of
2681 memory location pointed to by Hostent_H_Addr, as it might not
2682 have sufficient alignment.
2684 2013-04-24 Yannick Moy <moy@adacore.com>
2686 * repinfo.adb (List_Rep_Info): Set the value of Unit_Casing before
2687 calling subprograms which may read it.
2689 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2691 * einfo.adb: Remove Loop_Entry_Attributes from the usage of
2692 nodes. Flag 260 is now used.
2693 (Has_Loop_Entry_Attributes): New routine.
2694 (Loop_Entry_Attributes): Removed.
2695 (Set_Has_Loop_Entry_Attributes): New routine.
2696 (Set_Loop_Entry_Attributes): Removed.
2697 (Write_Entity_Flags): Write out Flag 260.
2698 (Write_Field10_Name): Remove the output for Loop_Entry_Attributes.
2699 * einfo.ads: Remove attribute Loop_Entry_Attributes,
2700 its related comment and uses in nodes. Add new attribute
2701 Has_Loop_Entry_Attributes, related comment and uses in loop nodes.
2702 (Has_Loop_Entry_Attributes): New routine and pragma Inline.
2703 (Loop_Entry_Attributes): Removed along with pragma Inline.
2704 (Set_Has_Loop_Entry_Attributes): New routine and pragma Inline.
2705 (Set_Loop_Entry_Attributes): Removed along with pragma Inline.
2706 * exp_attr.adb (Expand_Loop_Entry_Attribute): New routine.
2707 (Expand_N_Attribute_Reference): Expand attribute 'Loop_Entry.
2708 * exp_ch5.adb: Remove with and use clause for Elists.
2709 (Expand_Loop_Entry_Attributes): Removed.
2710 (Expand_N_Loop_Statement): Add local variable Stmt. Rename local
2711 constant Isc to Scheme. When a loop is subject to attribute
2712 'Loop_Entry, retrieve the nested loop from the conditional
2713 block. Move the processing of controlled object at the end of
2715 * sem_attr.adb (Analyze_Attribute): Do not chain attribute
2716 'Loop_Entry to its related loop.
2717 * sem_ch5.adb (Analyze_Loop_Statement): Add local variable
2718 Stmt. When the iteration scheme mentions attribute 'Loop_Entry,
2719 the entire loop is rewritten into a block. Retrieve the nested
2720 loop in such cases to complete the analysis.
2721 * sem_util.ads, sem_util.adb (Find_Loop_In_Conditional_Block): New
2723 (Subject_To_Loop_Entry_Attributes): New routine.
2725 2013-04-24 Robert Dewar <dewar@adacore.com>
2727 * exp_prag.adb (Expand_Loop_Variant): Generate pragma Check
2728 (Loop_Variant, xxx) rather than Assert (xxx).
2729 * gnat_rm.texi: Document pragma Loop_Variant.
2730 * sem_prag.adb (Analyze_Pragma, case Loop_Variant): Remove call
2733 2013-04-24 Yannick Moy <moy@adacore.com>
2735 * adabkend.adb, ali-util.adb, ali.adb, debug.adb,
2736 errout.adb, errout.ads, erroutc.adb, exp_ch3.adb, exp_ch4.adb,
2737 exp_ch6.adb, exp_ch7.adb, exp_dbug.adb, exp_util.adb,
2738 expander.adb, freeze.adb, gnat1drv.adb, lib-writ.adb,
2739 lib-writ.ads, lib-xref.adb, lib-xref.ads, opt.adb, opt.ads,
2740 restrict.adb, sem_aggr.adb, sem_attr.adb, sem_ch3.adb,
2741 sem_ch4.adb, sem_ch5.adb, sem_ch6.adb, sem_eval.adb, sem_prag.adb,
2742 sem_res.adb, sem_util.adb: Everything with name
2743 'Alfa' renamed in 'SPARK'. Update comments.
2744 Renaming of units with name 'Alfa', renamed with 'SPARK' instead.
2745 * exp_alfa.adb: renamed exp_spark.adb.
2746 * exp_alfa.ads: renamed exp_spark.ads.
2747 * get_alfa.adb: renamed get_spark_xrefs.adb.
2748 * get_alfa.ads: renamed get_spark_xrefs.ads.
2749 * lib-xref-alfa.adb: renamed lib-xref-spark_specific.adb.
2750 * put_alfa.adb: renamed put_spark_xrefs.adb.
2751 * put_alfa.ads: renamed put_spark_xrefs.ads.
2752 * alfa.adb: renamed spark_xrefs.adb.
2753 * alfa.ads: renamed spark_xrefs.ads.
2754 * alfa_test.adb: renamed spark_xrefs_test.adb.
2755 * gcc-interface/Make-lang.in: Update dependencies.
2757 2013-04-24 Robert Dewar <dewar@adacore.com>
2759 * gnat_rm.texi: Document pragma Assume.
2760 * sem_prag.adb (Analyze_Pragma, case Assume): Now processed as
2761 part of Assert, and no longer requires -gnatd.F
2763 2013-04-24 Robert Dewar <dewar@adacore.com>
2765 * gnat_rm.texi: Document pragma Assert_And_Cut.
2766 * sem_prag.adb (Analyze_Pragma, case Assert_And_Cut): Remove
2769 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2771 * sem_aux.adb: Add guard in Available_View.
2773 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2775 * sem_prag.adb (Analyze_Depends_In_Decl_Part): Use
2776 Find_Related_Subprogram to find the associated subprogram.
2777 (Analyze_Global_In_Decl_List): Use Find_Related_Subprogram
2778 to find the associated subprogram.
2779 (Analyze_Pragma): Use Find_Related_Subprogram to find the associated
2782 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2784 * exp_ch6.adb: Remove with and use clause for Sem_Prag.
2785 (Freeze_Subprogram): Call Analyze_Subprogram_Contract to analyze
2786 the contract of a subprogram.
2787 * sem_ch3.adb: Remove with and use clause for Sem_Prag.
2788 (Analyze_Declarations): Call Analyze_Subprogram_Contract to
2789 analyze the contract of a subprogram.
2790 * sem_ch6.adb (Analyze_Subprogram_Contract): New routine.
2791 (Check_Subprogram_Contract): Removed.
2792 * sem_ch6.ads (Analyze_Subprogram_Contract): New routine.
2793 (Check_Subprogram_Contract): Removed.
2794 (Expand_Contract_Cases): Add a guard against malformed contract cases.
2795 * sem_ch13.adb (Analyze_Aspect_Specifications): Call
2796 Decorate_Delayed_Aspect_And_Pragma to decorate aspects
2797 Contract_Cases, Depends and Global. Reimplement the analysis of
2798 aspect Contract_Cases.
2799 (Decorate_Delayed_Aspect_And_Pragma): New routine.
2800 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part): New routine.
2801 (Analyze_CTC_In_Decl_Part): Removed.
2802 (Analyze_Pragma): Reimplement the analysis of pragma Contract_Cases.
2803 (Analyze_Test_Case_In_Decl_Part): New routine.
2804 (Find_Related_Subprogram): New routine.
2805 (Requires_Profile_Installation): Add new formal Prag. Update
2806 the logic to take into account the origin of the pragma.
2807 * sem_prag.ads (Analyze_Contract_Cases_In_Decl_Part): New routine.
2808 (Analyze_CTC_In_Decl_Part): Removed.
2809 (Analyze_Test_Case_In_Decl_Part): New routine.
2811 2013-04-24 Robert Dewar <dewar@adacore.com>
2813 * sem_prag.adb (Process_Convention): Move Stdcall tests to
2814 Set_Convention_From_Pragma so that they are applied to each
2815 entry of a homonym set.
2816 (Process_Convention): Don't try to set convention if already set.
2818 2013-04-24 Robert Dewar <dewar@adacore.com>
2820 * gnatbind.adb: Minor reformatting.
2822 2013-04-24 Vincent Celier <celier@adacore.com>
2824 * clean.adb (Gnatclean): Add the default project search
2825 directories in the project search path after scanning the
2826 switches on the command line.
2827 (Initialize): Do not put the default project search directories in the
2828 project search path.
2829 * gnatcmd.adb (GNATcmd): Add the default project search
2830 directories in the project search path after scanning the switches
2831 on the command line.
2832 * make.adb (Initialize): Add the default project search
2833 directories in the project search path after scanning the switches
2834 on the command line.
2836 2013-04-24 Yannick Moy <moy@adacore.com>
2838 * restrict.ads (Restriction_Warnings): Initialize with all False value.
2840 2013-04-24 Robert Dewar <dewar@adacore.com>
2842 * checks.ads, checks.adb (Predicate_Checks_Suppressed): New function.
2843 * exp_util.ads, exp_util.adb (Make_Predicate_Check): Check setting of
2845 * snames.ads-tmpl (Name_Predicate_Check): New check name.
2846 * types.ads (Predicate_Check): New definition.
2847 * gnat_rm.texi: Add documentation for Predicate_Check.
2849 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2851 * exp_ch8.adb (Expand_N_Subprogram_Renaming_Declaration): If this
2852 is a renaming of predefined equality for an untagged record,
2853 add generated body to the freeze actions for the subprogram, to
2854 prevent freezing issues when the record has incomplete components.
2855 * exp_ch4.adb (Expand_Composite_Equality): If the type is a type
2856 without completion, return a predefined comparison instead of
2857 just False. This may happen when building the expression for
2858 record equality, when some component has a type whose completion
2859 has not been seen yet. The operation will be analyzed an expanded
2860 after the type has been frozen, at which point all component
2861 types will have been completed, or an error reported.
2863 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2865 * sem_ch13.adb (Analyze_Aspect_Specifications): Do not delay
2866 analysis of a Convention aspect.
2868 2013-04-24 Eric Botcazou <ebotcazou@adacore.com>
2870 * fe.h (Machine_Overflows_On_Target): New macro and declaration.
2871 (Signed_Zeros_On_Target): Likewise.
2873 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2875 * exp_ch6.adb: Add with and use clause for Sem_Prag.
2876 (Freeze_Subprogram): Analyze all delayed aspects for a null
2877 procedure so that they are available when analyzing the
2878 internally-generated _Postconditions routine.
2879 * exp_ch13.adb: Remove with and use clause for Sem_Prag.
2880 (Expand_N_Freeze_Entity): Move the code that analyzes delayed
2881 aspects of null procedures to exp_ch6.Freeze_Subprogram.
2882 * sem_prag.adb (Analyze_Abstract_State): Update the check on
2883 volatile requirements.
2885 2013-04-24 Bob Duff <duff@adacore.com>
2887 * ali-util.ads (Source_Record): New component Stamp_File
2888 to record from whence the Stamp came.
2889 * ali-util.adb (Set_Source_Table): Set Stamp_File component.
2890 * bcheck.adb (Check_Consistency): Print additional information in
2892 * gnatbind.adb (Gnatbind): Print additional information in
2895 2013-04-24 Robert Dewar <dewar@adacore.com>
2897 * exp_ch13.adb, sem_prag.adb: Update comments.
2898 * sem_ch3.adb, exp_ch9.adb, g-socket.adb, sem_ch13.adb: Minor
2901 2013-04-24 Doug Rupp <rupp@adacore.com>
2903 * vms_data.ads (/{NO}INHIBIT-EXEC): Document new default behavior.
2905 2013-04-24 Yannick Moy <moy@adacore.com>
2907 * sinfo.ads: Minor correction of typo.
2909 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2911 * sem_ch3.adb: Create packed array only when expander is
2914 2013-04-24 Hristian Kirtchev <kirtchev@adacore.com>
2916 * sem_prag.adb (Analyze_Depends_In_Decl_Part): Install the formals only
2917 when the context warrants it.
2918 (Analyze_Global_In_Decl_List): Install the formals only when
2919 the context warrants it.
2920 (Requires_Profile_Installation): New routine.
2922 2013-04-24 Ed Schonberg <schonberg@adacore.com>
2924 * exp_ch6.adb (Expand_N_Simple_Return_Statement): When the return
2925 type is a discriminated private type that does not require use
2926 of the secondary stack, a constrained subtype of the underlying
2927 type is created to convey the proper object size to the backend.
2928 If the return type is originally a private type, the return
2929 expression is wrapped in an unchecked_conversion. If the return
2930 expression is used subsequently in a call to the postcondition
2931 function, this conversion must be undone to prevent a spurious
2932 error on the analysis of that call.
2934 2013-04-23 Kai Tietz <ktietz@redhat.com>
2937 * raise-gcc.c (__SEH__): Additional check that SjLj isn't active.
2939 2013-04-23 Eric Botcazou <ebotcazou@adacore.com>
2940 Pascal Obry <obry@adacore.com>
2942 * gcc-interface/Makefile.in (targ): Fix target name check.
2943 (../../gnatmake$(exeext)): Add '+' for LTO.
2944 (../../gnatlink$(exeext)): Likewise.
2946 2013-04-23 Hristian Kirtchev <kirtchev@adacore.com>
2948 * exp_ch9.adb (Build_PPC_Wrapper): Correct the traversal of
2949 pre- and post-conditions.
2950 (Expand_N_Task_Type_Declaration):
2951 Use the correct attribute to check for pre- and post-conditions.
2952 * exp_ch13.adb (Expand_N_Freeze_Entity): Correct the traversal of
2953 pre- and post-conditions. Analyze delayed classification items.
2954 * freeze.adb (Freeze_Entity): Use the correct attribute to
2955 check for pre- and post- conditions.
2956 * sem_ch3.adb (Analyze_Declarations): Correct the traversal
2957 of pre- and post-conditions as well as contract- and
2958 test-cases. Analyze delayed pragmas Depends and Global.
2959 * sem_ch6.adb (Check_Subprogram_Contract): Use the correct
2960 attribute to check for pre- and post-conditions, as well as
2961 contract-cases and test-cases. (List_Inherited_Pre_Post_Aspects):
2962 Correct the traversal of pre- and post- conditions.
2963 (Process_Contract_Cases): Update the comment on usage. Correct
2964 the traversal of contract-cases.
2965 (Process_Post_Conditions): Update the comment on usage. Correct the
2966 traversal of pre- and post-conditions.
2967 (Process_PPCs): Correct the traversal of pre- and post-conditions.
2968 (Spec_Postconditions): Use the correct
2969 attribute to check for pre- and post- conditions, as well as
2970 contract-cases and test-cases.
2971 * sem_ch13.adb (Analyze_Aspect_Specifications): Reimplement the
2972 actions related to aspects Depends and Global. Code refactoring
2973 for pre- and post-conditions.
2974 (Insert_Delayed_Pragma): New routine.
2975 * sem_prag.adb (Add_Item): New routine.
2976 (Analyze_Depends_In_Decl_Part): New routine.
2977 (Analyze_Global_In_Decl_Part): New routine.
2978 (Analyze_Pragma): Reimplement the actions related to aspects Depends and
2979 Global. Verify that a body acts as a spec for pragma Contract_Cases.
2980 (Chain_PPC): Use Add_Contract_Item to chain a pragma.
2981 (Chain_CTC): Correct the traversal of contract-
2982 and test-cases. Use Add_Contract_Item to chain a pragma.
2983 (Chain_Contract_Cases): Correct the traversal of contract-
2984 and test-cases. Use Add_Contract_Item to chain a pragma.
2985 (Check_Precondition_Postcondition): Update the comment on usage.
2986 (Check_Test_Case): Update the comment on usage.
2987 * sem_prag.ads (Analyze_Depends_In_Decl_Part): New routine.
2988 (Analyze_Global_In_Decl_Part): New routine.
2989 * sem_util.ads, sem_util.adb (Add_Contract_Item): New routine.
2990 * sinfo.adb (Classifications): New routine.
2991 (Contract_Test_Cases): New routine.
2992 (Pre_Post_Conditions): New routine.
2993 (Set_Classifications): New routine.
2994 (Set_Contract_Test_Cases): New routine.
2995 (Set_Pre_Post_Conditions): New routine.
2996 (Set_Spec_CTC_List): Removed.
2997 (Set_Spec_PPC_List): Removed.
2998 (Spec_CTC_List): Removed.
2999 (Spec_PPC_List): Removed.
3000 * sinfo.ads: Update the structure of N_Contruct along with all
3002 (Classifications): New routine and pragma Inline.
3003 (Contract_Test_Cases): New routine and pragma Inline.
3004 (Pre_Post_Conditions): New routine and pragma Inline.
3005 (Set_Classifications): New routine and pragma Inline.
3006 (Set_Contract_Test_Cases): New routine and pragma Inline.
3007 (Set_Pre_Post_Conditions): New routine and pragma Inline.
3008 (Set_Spec_CTC_List): Removed.
3009 (Set_Spec_PPC_List): Removed.
3010 (Spec_CTC_List): Removed.
3011 (Spec_PPC_List): Removed.
3013 2013-04-23 Doug Rupp <rupp@adacore.com>
3015 * init.c (GNAT$STOP) [VMS]: Bump sigargs[0] count by 2
3016 to account for LIB$STOP not having the chance to add the PC and
3019 2013-04-23 Robert Dewar <dewar@adacore.com>
3021 * sem_ch13.adb: Minor code reorganization (remove some redundant
3023 * sem_ch3.adb, sem_prag.adb: Minor reformatting.
3025 2013-04-23 Yannick Moy <moy@adacore.com>
3027 * einfo.ads: Minor typo fix.
3028 * sem_ch13.adb (Build_Predicate_Functions): Reject cases where
3029 Static_Predicate is applied to a non-scalar or non-static type.
3030 * sem_prag.adb: Minor typo fix.
3032 2013-04-23 Doug Rupp <rupp@adacore.com>
3034 * init.c (GNAT$STOP) [VMS]: New function.
3036 2013-04-23 Ed Schonberg <schonberg@adacore.com>
3038 * sem_ch3.adb: Add exp_pakd to context.
3039 (Constrain_Component_Type): If the component of the parent is
3040 packed, and the record subtype being built is already frozen,
3041 as is the case for an itype, the component type itself will not
3042 be frozen, and the packed array type for it must be constructed
3045 2013-04-23 Thomas Quinot <quinot@adacore.com>
3047 * g-socket.adb, g-socket.ads (Set_Close_On_Exec): New subprogram.
3049 2013-04-23 Yannick Moy <moy@adacore.com>
3051 * err_vars.ads (Error_Msg_Qual_Level): Set variable to zero
3053 * opt.ads (Multiple_Unit_Index): Set variable to zero at declaration.
3054 * sem_util.adb (NCT_Table_Entries): Set variable to zero at declaration.
3055 * set_targ.ads (Num_FPT_Modes): Set variable to zero at declaration.
3056 * stylesw.adb (Save_Style_Check_Options): Protect testing the
3057 value of Style_Check_Comments_Spacing by a previous test that
3058 Style_Check_Comments is True.
3060 2013-04-23 Thomas Quinot <quinot@adacore.com>
3062 * sem_prag.adb, sem_prag.ads (Effective_Name): Rename to
3063 Original_Name, and move declaration to package body as this
3064 subprogram is not used from outside. Also clarify documentation.
3066 2013-04-23 Ed Schonberg <schonberg@adacore.com>
3068 * exp_ch6.adb (Expand_N_Subprogram_Body): When compiling with
3069 initialize_scalars, disable predicate checks on the generated
3070 assignment to an out scalar parameter.
3072 2013-04-23 Gary Dismukes <dismukes@adacore.com>
3074 * sem_ch4.adb (Analyze_Allocator): Remove error
3075 check for "constrained in partial view" constraints entirely.
3077 2013-04-23 Robert Dewar <dewar@adacore.com>
3079 * einfo.ads, sem_prag.ads: Minor reformatting.
3080 * errout.ads: Comment update.
3082 2013-04-23 Yannick Moy <moy@adacore.com>
3084 * exp_ch5.adb: Minor typo.
3086 2013-04-23 Thomas Quinot <quinot@adacore.com>
3088 * gnat_ugn.texi: Fix typo.
3090 2013-04-23 Ed Schonberg <schonberg@adacore.com>
3092 * einfo.ads: Minor documentation clarification.
3094 2013-04-23 Bob Duff <duff@adacore.com>
3096 * types.ads: Fix incorrect comment.
3098 2013-04-23 Ed Schonberg <schonberg@adacore.com>
3100 * sem_aux.adb sem_aux.ads (Effectively_has_Constrained_Partial_View):
3101 Rename subprogram as Object_Type_Has_Constrained_Partial_View, better
3102 description of purpose.
3103 * checks.adb (Apply_Discriminant_Check): Use above renaming.
3104 * sem_ch4.adb (Analyze_Allocator): Check Has_Constrained_Partial_View
3105 of the base type, rather than using the Object_Type predicate.
3106 * sem_attr.adb (Analyze_Attribute, case 'Access): Use above renaming.
3107 * sem_util.adb (Is_Dependent_Component_Of_Mutable_Object): ditto.
3108 * exp_attr.adb (Expand_N_Attribute_Reference, case 'Constrained): Ditto.
3109 * exp_ch4.adb (Expand_N_Allocator): Ditto.
3111 2013-04-23 Robert Dewar <dewar@adacore.com>
3113 * exp_prag.adb (Expand_Pragma_Check): Check for Assert rather
3115 * sem_prag.adb (Is_Valid_Assertion_Kind): Moved to spec
3116 (Effective_Name): New function (Analyze_Pragma, case Check):
3117 Disallow [Statement_]Assertions (Check_Kind): Implement
3118 Statement_Assertions (Check_Applicable_Policy): Use Effective_Name
3119 (Is_Valid_Assertion_Kind): Allow Statement_Assertions.
3120 * sem_prag.ads (Is_Valid_Assertion_Kind): Moved here from body
3121 (Effective_Name): New function.
3122 * sem_res.adb: Minor reformatting.
3123 * snames.ads-tmpl (Name_Statement_Assertions): New entry.
3124 * gnat_rm.texi: Add documentation of new assertion kind
3125 Statement_Assertions.
3127 2013-04-23 Robert Dewar <dewar@adacore.com>
3129 * sinfo.ads, einfo.adb, sem_res.adb, exp_ch6.adb, aspects.adb: Minor
3130 reformatting and code clean up.
3132 2013-04-23 Vincent Celier <celier@adacore.com>
3134 * prj-part.ads, prj-conf.ads: Minor comment updates.
3136 2013-04-23 Ed Schonberg <schonberg@adacore.com>
3138 * einfo.adb (Predicate_Function): For a private type, retrieve
3139 predicate function from full view.
3140 * aspects.adb (Find_Aspect): Ditto.
3141 * exp_ch6.adb (Expand_Actuals): If the formal is class-wide and
3142 the actual is a definite type, apply predicate check after call.
3143 * sem_res.adb: Do not apply a predicate check before the call to
3144 a generated Init_Proc.
3146 2013-04-23 Robert Dewar <dewar@adacore.com>
3148 * sem_ch13.adb (Analyze_Aspect_Specifications): Significant
3149 rewrite to make sure Is_Ignore is properly captured when aspect
3151 * sem_ch6.adb: Minor reformatting.
3152 * sem_prag.adb (Analyze_Pragma): Do not test policy at time of
3153 pragma for the case of a pragma coming from an aspect (already
3154 tested when we analyzed the aspect).
3156 2013-04-23 Vincent Celier <celier@adacore.com>
3158 * prj-conf.adb (Parse_Project_And_Apply_Config): New
3159 Boolean parameter Implicit_Project, defaulted to False. Call
3160 Prj.Part.Parse with Implicit_Project.
3161 * prj-conf.ads (Parse_Project_And_Apply_Config): New Boolean
3162 parameter Implicit_Project, defaulted to False.
3163 * prj-part.adb (Parse_Single_Project): New Boolean parameter
3164 Implicit_Project, defaulted to False. When Implicit_Project is
3165 True, change the Directory of the project node to the Current_Dir.
3166 * prj-part.ads (Parse): New Boolean parameter, defaulted to False
3168 2013-04-23 Robert Dewar <dewar@adacore.com>
3170 * exp_util.adb: Minor reformatting.
3172 2013-04-23 Robert Dewar <dewar@adacore.com>
3174 * xoscons.adb: Minor reformatting.
3176 2013-04-23 Hristian Kirtchev <kirtchev@adacore.com>
3178 * sem_prag.adb (Check_Mode): Ensure that a
3179 self-referential output appears in both input and output lists of
3180 the subprogram as categorized by aspect Global.
3181 (Check_Usage): Rename formal parameters to better illustrate their
3182 function. Update all uses of the said formals.
3184 2013-04-23 Thomas Quinot <quinot@adacore.com>
3186 * exp_util.adb, exp_util.ads (Fully_Qualified_Name_String): New
3187 parameter Append_NUL to make NUL-termination optional.
3188 * exp_dist.adb: Consistently use the above throughout instead of
3189 Get_Library_Unit_Name_String.
3191 2013-04-23 Robert Dewar <dewar@adacore.com>
3193 * sem_util.adb, sem_res.adb, prj-tree.adb, prj-tree.ads: Minor
3196 2013-04-23 Pascal Obry <obry@adacore.com>
3198 * xoscons.adb: Remove unused use clause, minor code clean-up.
3200 2013-04-23 Ed Schonberg <schonberg@adacore.com>
3202 * sem_util.ads, sem_util.adb: Code cleanup for Is_Expression_Function
3203 (can apply to any scope entity).
3204 * sem_res.adb (Resolve_Call): If the call is within another
3205 expression function it does not constitute a freeze point.
3207 2013-04-23 Yannick Moy <moy@adacore.com>
3209 * exp_ch6.adb (Expand_Actuals): Test that Subp
3210 is overloadable before testing if it's an inherited operation.
3212 2013-04-23 Robert Dewar <dewar@adacore.com>
3214 * a-envvar.adb, a-envvar.ads, exp_util.adb, sem_ch12.adb: Minor
3217 2013-04-23 Ed Schonberg <schonberg@adacore.com>
3219 * sem_ch3.adb (Analyze_Object_Declarations): Undo previous patch.
3220 * exp_util.adb (Expand_Subtype_From_Expr): If the expression
3221 is a source entity and the declaration is for an aliased
3222 unconstrained array, create a new subtype so that the flag
3223 Is_Constr_Subt_For_UN_Aliased does not pollute other entities.
3225 2013-04-23 Hristian Kirtchev <kirtchev@adacore.com>
3227 * aspects.adb: Move tables Base_Aspect and Inherited_Aspect
3228 from the spec to the body.
3229 (Find_Aspect): Update the call to Get_Aspect_Id.
3230 (Get_Aspect_Id): New version that takes an aspect specification.
3231 * aspects.ads: Reorganize all aspect related tables.
3232 (Get_Aspect_Id): New version that takes an aspect specification.
3233 * par_sco.adb (Traverse_Aspects): Update the call to Get_Aspect_Id.
3234 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration): Update
3235 the call to Get_Aspect_Id.
3236 * sem_ch13.adb (Analyze_Aspect_At_Freeze_Point): Update the
3237 call to Get_Aspect_Id. (Analyze_Aspect_Specifications): Update
3238 the call to Get_Aspect_Id. Update the call to Impl_Defined_Aspect.
3240 2013-04-23 Robert Dewar <dewar@adacore.com>
3242 * sem_prag.adb (Fix_Error): Rewrite to do more accurate job
3243 of getting proper name in the case where pragma comes from
3245 * sem_ch3.adb, sinfo.ads, par-ch6.adb, exp_ch6.adb: Minor reformatting.
3247 2013-04-23 Yannick Moy <moy@adacore.com>
3249 * sem_ch6.adb (Process_PPCs): Do not filter postconditions based on
3252 2013-04-23 Thomas Quinot <quinot@adacore.com>
3254 * par_sco.adb (Traverse_Aux_Decls): Minor code reorganization.
3256 2013-04-23 Doug Rupp <rupp@adacore.com>
3258 * init.c: Move facility macros outside IN_RTS.
3260 2013-04-23 Thomas Quinot <quinot@adacore.com>
3262 * freeze.adb (Freeze_Entity): For the case of a bit-packed
3263 array time that is known at compile time to have more that
3264 Integer'Last+1 elements, issue an error, since such arrays are
3267 2013-04-23 Hristian Kirtchev <kirtchev@adacore.com>
3269 * sem_prag.adb (Analyze_Dependency_Clause): Update all calls to
3270 Analyze_Input_Output.
3271 (Analyze_Input_List): Update all calls to Analyze_Input_Output.
3272 (Analyze_Input_Output): Add formal parameter Self_Ref along with
3273 comment on its usage. Update all calls to Analyze_Input_Output.
3274 (Analyze_Pragma): Add new local variable Self_Ref to capture
3275 the presence of a self-referential dependency clause. Update
3276 all calls to Analyze_Input_Output.
3277 (Check_Mode): Add formal parameter Self_Ref along with comment on its
3278 usage. Verify the legality of a self-referential output.
3280 2013-04-23 Ed Schonberg <schonberg@adacore.com>
3282 * exp_ch6.adb: Add predicate checks on by-copy parameter.
3284 2013-04-23 Vincent Celier <celier@adacore.com>
3286 * a-envvar.adb, a-envvar.ads (Value): New.
3288 2013-04-22 Yannick Moy <moy@adacore.com>
3290 * exp_prag.adb (Expand_Pragma_Loop_Variant): Rewrite pragma as
3291 null statement if ignored.
3292 * sem_ch6.adb (Expand_Contract_Cases): Do nothing if pragma is ignored.
3293 * sem_prag.adb (Analyze_Pragma): Keep analyzing ignored pragmas.
3295 2013-04-22 Hristian Kirtchev <kirtchev@adacore.com>
3297 * sem_prag.adb (Analyze_Contract_Case): New routine.
3298 (Analyze_Pragma): Aspect/pragma Contract_Cases can
3299 now be associated with a library level subprogram.
3300 Add circuitry to detect illegal uses of aspect/pragma Contract_Cases
3301 in a subprogram body.
3302 (Chain_Contract_Cases): Rename formal parameter Subp_Decl to
3303 Subp_Id. Remove local constant Subp. The entity of the subprogram
3304 is now obtained via the formal paramter.
3306 2013-04-22 Ed Schonberg <schonberg@adacore.com>
3308 * sem_ch3.adb (Analyze_Object_Declaration): Do not set
3309 Is_Constr_Subt_For_Unc_Aliased on the subtype of the expression,
3310 if the expression is a source entity.
3312 2013-04-22 Yannick Moy <moy@adacore.com>
3314 * exp_prag.adb, sinfo.ads, sem_prag.ads: Minor correction of typos in
3316 * sem_ch6.adb (Expand_Contract_Cases): Add location to message.
3318 2013-04-22 Thomas Quinot <quinot@adacore.com>
3320 * sem_prag.adb (Fix_Error): For a pragma rewritten from another
3321 pragma, fix up error message to include original pragma name.
3322 * par_sco.adb: Minor reformatting.
3324 2013-04-22 Robert Dewar <dewar@adacore.com>
3326 * sem_prag.adb, sem_util.adb, sem_util.ads, sem_res.adb, exp_ch6.adb,
3327 sem_ch6.adb, opt.ads: Minor reformatting.
3329 2013-04-22 Pascal Obry <obry@adacore.com>
3331 * gnat_ugn.texi, prj-nmsc.adb, projects.texi: Add check for
3332 Library_Standalone and Library_Kind.
3334 2013-04-22 Ed Schonberg <schonberg@adacore.com>
3336 * exp_ch6.adb (Expand_Actuals): If the call is to an
3337 inherited operation and the actual is a by-reference type with
3338 predicates, add predicate call to post-call actions.
3339 * sem_util.adb (Is_Inherited_Operation_For_Type): Fix coding
3340 error: a type declaration has a defining identifier, not an Etype.
3341 * sem_res.adb: Restore code removed because of above error.
3343 2013-04-22 Doug Rupp <rupp@adacore.com>
3345 * init.c (__gnat_handle_vms_condition): Also match C$_SIGINT.
3347 2013-04-22 Yannick Moy <moy@adacore.com>
3349 * gnat_rm.texi, exp_util.adb, sem_prag.adb, sem_prag.ads, par-ch2.adb,
3350 opt.ads, sem_ch13.adb: Minor correction of typos in comments/doc.
3352 2013-04-22 Vincent Celier <celier@adacore.com>
3354 * prj-nmsc.adb (Check_Library_Attributes): Set Library_Dir to
3355 No_Path_Information only when Directories_Must_Exist_In_Projects
3357 (Get_Directories): Set Object_Directory
3358 or Exec_Directory to No_Path_Information only when
3359 Directories_Must_Exist_In_Projects is False.
3361 2013-04-22 Yannick Moy <moy@adacore.com>
3363 * par-prag.adb, sem_attr.adb, sem_ch6.adb, sem_prag.adb, sem_warn.adb,
3364 snames.ads-tmpl, sinfo.ads, sem_util.ads: Remove all references to
3365 Pragma_Contract_Case and Name_Contract_Case.
3367 2013-04-22 Yannick Moy <moy@adacore.com>
3369 * aspects.ads, aspects.adb, sem_ch13.adb: Removal of references to
3371 * gnat_ugn.texi, gnat_rm.texi Description of Contract_Case replaced by
3372 description of Contract_Cases.
3374 2013-04-12 Robert Dewar <dewar@adacore.com>
3376 * makeutl.adb, prj-nmsc.adb: Minor reformatting.
3378 2013-04-12 Robert Dewar <dewar@adacore.com>
3380 * exp_util.adb (Make_Invariant_Call): Use Check_Kind instead
3382 * gnat_rm.texi (Check_Policy): Update documentation for new
3383 Check_Policy syntax.
3384 * sem_prag.adb (Check_Kind): Replaces Check_Enabled
3385 (Analyze_Pragma, case Check_Policy): Rework to accomodate new
3386 syntax (like Assertion_Policy).
3387 * sem_prag.ads (Check_Kind): Replaces Check_Enabled.
3389 2013-04-12 Doug Rupp <rupp@adacore.com>
3391 * init.c (SS$_CONTROLC, SS$_CONTINUE) [VMS]: New macros.
3392 (__gnat_handle_vms_condition) [VMS]: Dispatch on the Crtl/C user
3393 handler if installed.
3394 * ctrl_c.c (__gnat_install_int_handler)
3395 [VMS]: Install a dummy sigaction handler to trigger the real
3396 user handler dispatch in init.c/__gnat_handle_vms_condition.
3397 (__gnat_uninstall_int_handler) [VMS]: Likewise.
3399 2013-04-12 Vincent Celier <celier@adacore.com>
3401 * clean.adb (Parse_Cmd_Line): Set Directories_Must_Exist_In_Projects
3402 to False if switch is specified.
3403 * makeutl.adb (Initialize_Source_Record): Do not look for the
3404 object file if there is no object directory.
3405 * opt.ads (Directories_Must_Exist_In_Projects): New Boolean
3406 variable, defaulted to True.
3407 * prj-nmsc.adb (Check_Library_Attributes): Do not fail if library
3408 directory does not exist when Directories_Must_Exist_In_Projects is
3410 (Get_Directories): Do not fail when the object or the exec directory
3411 do not exist when Directories_Must_Exist_In_Projects is False.
3413 2013-04-12 Robert Dewar <dewar@adacore.com>
3415 * namet.adb, namet.ads: Minor addition (7 arg version of Nam_In).
3416 * exp_prag.adb, sem_ch3.adb, sem_intr.adb, sem_type.adb, exp_util.adb,
3417 sem_aux.adb, exp_ch9.adb, sem_ch7.adb, sem_ch10.adb, sem_prag.adb,
3418 par-ch2.adb, tbuild.adb, rtsfind.adb, freeze.adb, sem_util.adb,
3419 sem_res.adb, sem_attr.adb, exp_ch2.adb, prj-makr.adb, sem_elab.adb,
3420 exp_ch4.adb, sem_ch4.adb, sem_mech.adb, sem_ch6.adb, par-prag.adb,
3421 prj-nmsc.adb, exp_disp.adb, sem_ch8.adb, sem_warn.adb, par-util.adb,
3422 sem_eval.adb, exp_intr.adb, sem_ch13.adb, exp_cg.adb, lib-xref.adb,
3423 sem_disp.adb, exp_ch3.adb: Minor code reorganization (use Nam_In).
3425 2013-04-12 Doug Rupp <rupp@adacore.com>
3427 * init.c: Don't clobber condition code on VMS.
3429 2013-04-12 Robert Dewar <dewar@adacore.com>
3431 * exp_aggr.adb: Minor reformatting.
3432 * namet.ads, namet.adb (Nam_In): New functions.
3434 2013-04-12 Robert Dewar <dewar@adacore.com>
3436 * einfo.adb (Has_Dynamic_Predicate_Aspect): New flag.
3437 (Has_Static_Predicate_Aspect): New flag.
3438 * einfo.ads (Has_Dynamic_Predicate_Aspect): New flag.
3439 (Has_Static_Predicate_Aspect): New flag.
3440 * exp_ch9.adb: Minor reformatting.
3441 * exp_util.adb (Make_Invariant_Call): Check_Enabled now handles
3443 * gnat1drv.adb: Remove setting of Debug_Pragmas_Enabled,
3444 since this switch is gone and control of Debug is done with
3446 * gnat_rm.texi: Update documentation for Assertion_Policy and
3447 Check_Policy pragmas.
3448 * opt.adb (Debug_Pragmas_Disabled[_Config]): Removed
3449 (Debug_Pragmas_Enabled[_Config]): Removed Since debug now
3450 controlled by Assertion_Enabled.
3451 * opt.ads (Debug_Pragmas_Disabled[_Config]): Removed
3452 (Debug_Pragmas_Enabled[_Config]): Removed Since debug now
3453 controlled by Assertion_Enabled.
3454 * par-ch2.adb (Scan_Pragma_Argument_Association): Allow new
3456 * sem_attr.adb: Minor reformatting.
3457 * sem_ch13.adb (Analyze_Aspect_Specification): Disable aspect
3458 if DISABLE policy applies.
3459 * sem_ch6.adb (Grab_PPC): Check original name of aspect for
3460 aspect from pragma (Process_PPCs): Properly check assertion policy.
3461 * sem_prag.adb (Check_Enabled): Rewritten for new Assertion_Policy
3462 (Check_Appicable_Policy): New procedure.
3463 (Is_Valid_Assertion_Kind): New function.
3464 (Rewrite_Assertion_Kind): New procedure.
3465 (Analyze_Pragma): Handle case of disabled assertion pragma.
3466 (Analyze_Pragma, case Assertion_Policy): Rewritten for Ada 2012.
3467 (Analyze_Pragma, case Check): Deal with 'Class possibilities.
3468 (Analyze_Pragma, case Check_Policy): Deal with 'Class possibilities.
3469 (Analyze_Pragma, case Contract_Class): New handling of ignored pragma.
3470 (Analyze_Pragma, case Debug): New control with Assertion_Policy.
3471 (Analyze_Pragma, case Debug_Policy): Now consistent with
3473 (Analyze_Pragma, case Loop_Invariant): New handling of ignored
3475 (Analyze_Pragma, case Loop_Variant): New handling of ignored pragma.
3476 (Analyze_Pragma, case Precondition): Use proper name for Check pragma.
3477 (Analyze_Pragma, case Check_Enabled): Rewritten for new policy stuff.
3478 * sem_prag.ads (Check_Enabled): Rewritten for new
3479 Assertion_Policy stuff.
3480 (Check_Appicable_Policy): New procedure.
3481 * sinfo.adb (Is_Disabled): New flag.
3482 (Is_Ignored): New flag.
3483 * sinfo.ads (Is_Disabled): New flag.
3484 (Is_Ignored): New flag.
3485 (N_Pragma_Argument_Association): New 'Class forms.
3486 * snames.ads-tmpl: New names Name_uPre, Name_uPost,
3487 Name_uType_Invariant, Name_uInvariant.
3488 * switch-c.adb: Remove setting of Debug_Pragmas_Enabled for -gnata.
3489 * tree_io.ads (ASIS_Version_Number): Updated (remove
3490 read write of obsolete flags Debug_Pragmas_Disabled and
3491 Debug_Pragmas_Enabled.
3493 2013-04-12 Ed Schonberg <schonberg@adacore.com>
3495 * exp_aggr.adb (Get_Explicit_Discriminant_Value): Subsidiary
3496 of Build_Record_Aggr_Code, used to retrieve explicit values
3497 for inherited discriminants in an extension aggregate, when the
3498 ancestor type is unconstrained.
3500 2013-04-12 Ed Schonberg <schonberg@adacore.com>
3502 * sem_attr.adb (Check_Stream_Attribute): If restriction
3503 No_Default_Stream_Attributes is active, it is illegal to use a
3504 predefined elementary type stream attribute either by itself,
3505 or more importantly as part of the attribute subprogram for a
3506 composite type. However, if the broader restriction No_Streams
3507 is active, then stream operations are not generated, and there
3510 2013-04-12 Robert Dewar <dewar@adacore.com>
3512 * gnatbind.adb: Minor reformatting.
3514 2013-04-12 Bob Duff <duff@adacore.com>
3516 * sem_attr.adb (Analyze_Access_Attribute): Treat P'Access like a
3517 call only in the static elaboration model.
3519 2013-04-12 Hristian Kirtchev <kirtchev@adacore.com>
3521 * sem_prag.adb (Analyze_Input_List): Detect an illegal dependency
3522 clause where both input and output lists are null.
3523 (Analyze_Pragma): Update the grammar of pragma Depends.
3525 2013-04-12 Vincent Celier <celier@adacore.com>
3527 * gnatbind.adb (No_Restriction_List): Exclude restrictions that
3528 take a parameter value, not a count.
3529 * prj.ads, prj.adb (Remove_All_Restricted_Languages): New procedure.
3530 * projects.texi: Complete documentation of attribute Roots.
3532 2013-04-12 Thomas Quinot <quinot@adacore.com>
3534 * exp_ch3.adb, exp_util.ads, checks.adb, freeze.adb, sem_attr.adb,
3535 sem_ch3.adb: Minor reformatting.
3536 * exp_ch4.adb (Size_In_Storage_Elements): Minor documentation
3537 improvement: note that the computation is pessimistic for bit
3539 * gnat_rm.texi (Range_Length): Fix minor error in description
3542 2013-04-12 Hristian Kirtchev <kirtchev@adacore.com>
3544 * aspects.adb (Find_Aspect): New routine.
3545 (Find_Value_Of_Aspect): New routine.
3546 (Has_Aspect): Reimplemented.
3547 * aspects.ads (Find_Aspect): New routine.
3548 (Find_Value_Of_Aspect): New routine, previously known as Find_Aspect.
3549 * exp_ch5.adb (Expand_Iterator_Loop): Update the call to Find_Aspect.
3550 * exp_util.adb (Is_Iterated_Container): Update the call to Find_Aspect.
3551 * sem_ch4.adb (Try_Container_Indexing): Update calls to Find_Aspect.
3552 * sem_ch5.adb (Analyze_Iterator_Specification): Update
3553 the call to Find_Aspect. Use function Has_Aspect for better
3555 (Preanalyze_Range): Use function Has_Aspect for better readability.
3556 * sem_ch13.adb (Check_One_Function): Update the call to Find_Aspect.
3557 * sem_prag.adb (Analyze_Pragma): There is no longer need to
3558 look at the parent to extract the corresponding pragma for
3561 2013-04-12 Robert Dewar <dewar@adacore.com>
3563 * checks.adb, sem_elab.adb, repinfo.adb, sem_ch4.adb, restrict.adb,
3564 restrict.ads: Minor reformatting.
3566 2013-04-12 Ed Schonberg <schonberg@adacore.com>
3568 * lib-xref.adb: Retrieve original name of classwide type if any.
3570 2013-04-12 Thomas Quinot <quinot@adacore.com>
3572 * exp_ch11.ads: Minor reformatting.
3574 2013-04-12 Hristian Kirtchev <kirtchev@adacore.com>
3576 * aspects.adb: Alphabetize subprogram bodies in this unit. Add
3577 an entry for Aspect_Ghost in the table of canonical aspects.
3578 (Has_Aspect): New routine.
3579 * aspects.ads: Add Aspect_Ghost to all relevant
3580 tables. Alphabetize subprograms in this unit.
3581 (Has_Aspect): New routine.
3582 * einfo.adb: Add with and use clauses for Aspects.
3583 (Is_Ghost_Function): New routine.
3584 * einfo.ads: Add new synthesized attribute Is_Ghost_Function and
3585 update the structure of the related nodes.
3586 (Is_Ghost_Function): New routine.
3587 * exp_ch4.adb (Find_Enclosing_Context): Use routine
3588 Is_Body_Or_Package_Declaration to terminate a search.
3589 (Is_Body_Or_Unit): Removed.
3590 * exp_util.adb (Within_Case_Or_If_Expression): Use routine
3591 Is_Body_Or_Package_Declaration to terminate a search.
3592 * par-prag.adb: Add pragma Ghost to the list of pragmas that do
3593 not need special processing by the parser.
3594 * sem_attr.adb (Analyze_Access_Attribute): Detect an
3595 illegal use of 'Access where the prefix is a ghost function.
3596 (Analyze_Attribute): Use routine Is_Body_Or_Package_Declaration
3597 to terminate a search. (Check_References_In_Prefix): Use routine
3598 Is_Body_Or_Package_Declaration to terminate a search.
3599 * sem_ch4.adb (Analyze_Call): Mark a function when it appears
3600 inside an assertion expression. Verify the legality of a call
3601 to a ghost function.
3602 (Check_Ghost_Function_Call): New routine.
3603 * sem_ch6.adb (Analyze_Function_Call): Code reformatting. Move
3604 the setting of attribute In_Assertion_Expression to Analyze_Call.
3605 (Check_Overriding_Indicator): Detect an illegal attempt to
3606 override a function with a ghost function.
3607 * sem_ch12.adb (Preanalyze_Actuals): Detect an illegal use of
3608 a ghost function as a generic actual.
3609 * sem_elab.adb (Check_Internal_Call_Continue): Update the call
3611 * sem_prag.adb: Add an entry for pragma Ghost in the table
3612 of significant arguments.
3613 (Analyze_Pragma): Do not analyze
3614 an "others" case guard. Add processing for pragma Ghost. Use
3615 Preanalyze_Assert_Expression when analyzing the expression of
3616 pragmas Loop_Invariant and Loop_Variant.
3617 * sem_util.adb (Get_Subprogram_Entity): Reimplemented.
3618 (Is_Body_Or_Package_Declaration): New routine.
3619 * sem_util.ads: Alphabetize subprotrams in this unit.
3620 (Is_Body_Or_Package_Declaration): New routine.
3621 * sinfo.adb (In_Assertion): Rename to In_Assertion_Expression.
3622 (Set_In_Assertion): Rename to Set_In_Assertion_Expression.
3623 * sinfo.ads: Rename flag In_Assertion to In_Assertion_Expression
3624 to better reflect its use. Update all places that mention the flag.
3625 (In_Assertion): Rename to In_Assertion_Expression. Update
3626 related pragma Inline. (Set_In_Assertion): Rename to
3627 Set_In_Assertion_Expression. Update related pragma Inline.
3628 * snames.ads-tmpl: Add new predefined name Ghost. Add new pragma
3631 2013-04-12 Arnaud Charlet <charlet@adacore.com>
3633 * sem_prag.adb (Set_Imported): Do not generate error for multiple
3634 Import in CodePeer mode.
3635 * s-rident.ads: Fix minor typo.
3637 2013-04-12 Ed Schonberg <schonberg@adacore.com>
3639 * checks.adb (Insert_Valid_Check): Do not insert validity check
3640 in the body of the generated predicate function, to prevent
3643 2013-04-12 Ed Schonberg <schonberg@adacore.com>
3645 * s-rident.ads: Add various missing Ada 2012 restrictions:
3646 No_Access_Parameter_Allocators, No_Coextensions,
3647 No_Use_Of_Attribute, No_Use_Of_Pragma.
3648 * snames.ads-tmpl: Add corresponding names.
3649 * restrict.ads restrict.adb: Subprograms and data structures to
3650 handle aspects No_Use_Of_Attribute and No_Use_Of_Pragma.
3651 * sem_ch4.adb: Correct name of restrictions is
3652 No_Standard_Allocators_After_Elaboration.
3653 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Check
3654 violation of restriction No_Use_Of_Attribute.
3655 * sem_prag.adb (Process_Restrictions_Or_Restriction_Warnings):
3656 Set restrictions No_Use_Of_Pragma and No_Use_Of_Attribute.
3657 (Analyze_Pragma): Check violation of restriction No_Use_Of_Pragma.
3658 * sem_res.adb: Check restrictions No_Access_Parameter_Allocators
3659 and No_Coextensions.
3660 * bcheck.adb: Correct name of restrictions is
3661 No_Standard_Allocators_After_Elaboration.
3662 * gnatbind.adb: Correct name of restrictions is
3663 No_Standard_Allocators_After_Elaboration.
3665 2013-04-12 Hristian Kirtchev <kirtchev@adacore.com>
3667 * sem_prag.adb (Analyze_Pragma, (Check_Mode_Restriction_In_Function):
3668 Correct error message format.
3670 2013-04-12 Robert Dewar <dewar@adacore.com>
3672 * sem_attr.adb: Minor reformatting.
3674 2013-04-12 Ed Schonberg <schonberg@adacore.com>
3676 * sem_elab.adb (Within_Elaborate_All): Do not examine a context
3677 item that has not been analyzed, because the unit may have errors,
3678 or the context item may come from a proper unit inserted at the
3679 point of a stub and not analyzed yet.
3681 2013-04-12 Thomas Quinot <quinot@adacore.com>
3683 * gnat1drv.adb, repinfo.adb, repinfo.ads (Repinfo.List_Array_Info,
3684 List_Record_Info): Also include scalar storage order information in
3687 2013-04-12 Yannick Moy <moy@adacore.com>
3689 * sem_ch6.adb (Process_Contract_Cases): Update code to apply to
3690 Contract_Cases instead of Contract_Case pragma.
3692 2013-04-12 Robert Dewar <dewar@adacore.com>
3694 * a-cfdlli.ads, g-socket.adb, s-fileio.adb: Minor reformatting.
3696 2013-04-12 Yannick Moy <moy@adacore.com>
3698 * sem_attr.adb (Analyze_Attribute): Update analyse of
3699 Attribute_Old and Attribute_Result so they are allowed in the
3700 right-hand-side of an association in a Contract_Cases pragma.
3701 * sem_prag.adb (Analyze_CTC_In_Decl_Part): Add pre-analysis of
3702 the expressions in a Contract_Cases pragma.
3704 2013-04-12 Robert Dewar <dewar@adacore.com>
3706 * sem.ads, opt.ads: Minor comment edits.
3707 * sem_warn.adb, sem_ch6.adb: Minor reformatting.
3709 2013-04-12 Claire Dross <dross@adacore.com>
3711 * a-cfdlli.adb a-cfdlli.ads (List, Not_No_Element, Iterate,
3712 Reverse_Iterate, Query_Element, Update_Element, Read, Write): Removed,
3713 not suitable for formal analysis.
3715 2013-04-12 Ed Schonberg <schonberg@adacore.com>
3717 * sem_prag.adb (Analyze_Abstract_State): Use Defining entity
3718 to locate package entity, which may be a child unit.
3720 2013-04-12 Thomas Quinot <quinot@adacore.com>
3722 * g-socket.adb, g-socket.ads (Connect_Socket, version with timeout): If
3723 the specified timeout is 0, do not attempt to determine whether the
3724 connection succeeded.
3726 2013-04-12 Doug Rupp <rupp@adacore.com>
3728 * s-fileio.adb (Form_RMS Context_Key): Fix some thinkos.
3730 2013-04-12 Doug Rupp <rupp@adacore.com>
3732 * s-fileio.adb: Minor reformatting.
3734 2013-04-12 Ed Schonberg <schonberg@adacore.com>
3736 * sem_warn.adb (Check_Infinite_Loop_Warning): Do not warn if
3737 the last statement in the analyzed loop is an unconditional
3740 2013-04-12 Robert Dewar <dewar@adacore.com>
3742 * opt.ads (Style_Check_Main): New switch.
3743 * sem.adb (Semantics): Set Style_Check flag properly for new
3744 unit to be analyzed.
3745 * sem_ch10.adb (Analyze_With_Clause): Don't reset Style_Check,
3746 the proper setting of this flag is now part of the Semantics
3748 * switch-c.adb (Scan_Front_End_Switches): Set Style_Check_Main
3749 for -gnatg and -gnaty
3751 2013-04-12 Doug Rupp <rupp@adacore.com>
3753 * s-crtl.ads (fopen, freopen): Add vms_form parameter
3754 * i-cstrea.ads (fopen, freopen): Likewise.
3755 * adaint.h (__gnat_fopen, __gnat_freopen): Likewise.
3756 * adaint.c (__gnat_fopen, __gnat_freopen): Likewise.
3757 [VMS]: Split out RMS keys and call CRTL function appropriately.
3758 * s-fileio.adb (Form_VMS_RMS_Keys, Form_RMS_Context_Key): New
3760 (Open, Reset): Call Form_VMS_RMS_Keys. Call fopen,freopen with
3762 * gnat_rm.texi: Document implemented RMS keys.
3764 2013-04-12 Hristian Kirtchev <kirtchev@adacore.com>
3766 * sem_ch13.adb (Analyze_Aspect_Specifications):
3767 Insert the corresponding pragma for aspect Abstract_State at
3768 the top of the visible declarations of the related package.
3769 Previously this was only done when the package is a compilation
3772 2013-04-12 Arnaud Charlet <charlet@adacore.com>
3774 * gnat_ugn.texi: Further menu clean ups.
3775 * sem_prag.adb, opt.ads: Minor reformatting.
3776 * sem_util.ads: Minor comment fix.
3778 2013-04-12 Hristian Kirtchev <kirtchev@adacore.com>
3780 * sem_ch13.adb (Analyze_Aspect_Specifications): Aspect
3781 Depends is now a delayed aspect. The delay is required
3782 due to the interplay between aspects Depends and Global.
3783 (Check_Aspect_At_Freeze_Point): Add an entry for aspect Depends.
3784 * sem_prag.adb: Reformat various error messages.
3785 (Add_Item): New subsidiary routine.
3786 (Analyze_Pragma): Add new variables
3787 Global_Seen, Result_Seen, Subp_Inputs and Subp_Outputs. The
3788 analysis of pragma Depends now has the capability to check
3789 the proper mode and usage of subprogram inputs and outputs.
3790 (Appears_In): New routine.
3791 (Check_Function_Return): New routine.
3792 (Check_Mode): New routine.
3793 (Check_Usage): New routine.
3794 (Collect_Subprogram_Inputs_Outputs): New routine.
3796 2013-04-12 Bob Duff <duff@adacore.com>
3798 * par-ch7.adb (P_Package): Initialize Sloc in the newly-pushed scope
3801 2013-04-12 Robert Dewar <dewar@adacore.com>
3803 * switch-c.adb: Minor fix to wording of error message for
3806 2013-04-12 Robert Dewar <dewar@adacore.com>
3808 * impunit.adb: Add s-multip and s-mudido to list of impl defined
3810 * gnat_rm.texi: Add documentation for
3811 System.Multiprocessors[.Dispatching_Domains].
3813 2013-04-12 Ben Brosgol <brosgol@adacore.com>
3815 * gnat_ugn.texi: Completion of menu cleanups.
3817 2013-04-12 Arnaud Charlet <charlet@adacore.com>
3819 * sem_prag.adb (Diagnose_Multiple_Pragmas): Relax the rules
3820 in Relaxed_RM_Semantics.
3822 2013-04-12 Arnaud Charlet <charlet@adacore.com>
3824 * set_targ.adb (elab code): Add support for non gcc back-ends
3825 where save_argv is null.
3827 2013-04-12 Robert Dewar <dewar@adacore.com>
3829 * gnat1drv.adb (Gnat1drv): Test Target_Dependent_Info_Write_Name.
3830 * opt.ads (Target_Dependent_Info_Read): Add _Name, now an access
3831 type (Target_Dependent_Info_Write): Add _Name, now an access type.
3832 * set_targ.adb (Write_Target_Dependent_Values): Use name
3833 from -gnatet switch stored in Target_Dependent_Info_Write_Name
3834 (Read_Target_Dependent_Values): Use name from -gnateT switch
3835 stored in Target_Dependent_Info_Read_Name.
3836 * switch-c.adb: New form of -gnatet and -gnateT switches.
3837 * usage.adb: New form of -gnatet and -gnateT switches with
3840 2013-04-11 Eric Botcazou <ebotcazou@adacore.com>
3842 * gcc-interface/decl.c (elaborate_expression_1): Skip only constant
3843 arithmetics when looking for a read-only variable in the expression.
3845 2013-04-11 Javier Miranda <miranda@adacore.com>
3847 * check.ads, exp_ch6.adb (Install_Null_Excluding_Check): No check in
3848 interface thunks since it is performed at the caller side.
3849 (Expand_Simple_Function_Return): No accessibility check needed in thunks
3850 since the check is done by the target routine.
3852 2013-04-11 Ed Schonberg <schonberg@adacore.com>
3854 * sem_prag.adb (Analyze_Pragma, case Priority): pre-analyze
3855 expression with type Any_Priority.
3856 * exp_ch9.adb (Initialize_Protection): Check that the value
3857 of the priority expression is within the bounds of the proper
3860 2013-04-11 Robert Dewar <dewar@adacore.com>
3862 * sem_prag.adb, prj-env.adb: Minor reformatting.
3864 2013-04-11 Ben Brosgol <brosgol@adacore.com>
3866 * gnat_ugn.texi: Clean ups.
3868 2013-04-11 Yannick Moy <moy@adacore.com>
3870 * set_targ.adb: Minor comment update.
3872 2013-04-11 Pascal Obry <obry@adacore.com>
3874 * gnat_ugn.texi: Remove obsolete comment about DLL calling
3877 2013-04-11 Javier Miranda <miranda@adacore.com>
3879 * exp_ch6.adb (Expand_Call): For the call to the target primitive
3880 of an interface thunks do not compute the extra actuals; just
3881 propagate the extra actuals received by the thunk.
3882 * exp_disp.adb (Expand_Interface_Thunk): Decorate new attribute
3884 * sem_ch6.adb (Create_Extra_Formals): Do not generate extra
3885 formals in interface thunks whose target primitive has no extra
3888 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
3890 * sem_prag.adb (Analyze_Pragma): Detect
3891 a renaming by looking at the Renamed_Object attribute.
3892 (Is_Renaming): Removed.
3894 2013-04-11 Vincent Celier <celier@adacore.com>
3896 * prj-env.adb (Initialize_Default_Project_Path): Take
3897 into account a project path file, specified by environment
3898 variable GPR_PROJECT_PATH_FILE, before taking into account
3900 * projects.texi: Add documentation for GPR_PROJECT_PATH_FILE
3902 2013-04-11 Ed Schonberg <schonberg@adacore.com>
3904 * a-cdlili.adb, a-cdlili.ads, a-cihama.adb, a-cihama.ads, a-coinve.adb,
3905 a-coinve.ads, a-ciorse.adb, a-ciorse.ads, a-coorma.adb, a-coorma.ads,
3906 a-cfdlli.adb, a-cfdlli.ads, a-cborma.adb, a-cborma.ads, a-cidlli.adb,
3907 a-cidlli.ads, a-ciormu.adb, a-ciormu.ads, a-cihase.adb, a-cihase.ads,
3908 a-cohama.adb, a-cohama.ads, a-coorse.adb, a-coorse.ads, a-cbhama.adb,
3909 a-cbhama.ads, a-cborse.adb, a-cborse.ads, a-ciorma.adb, a-cobove.adb,
3910 a-ciorma.ads, a-cobove.ads, a-coormu.adb, a-coormu.ads, a-cohase.adb,
3911 a-cohase.ads, a-cbdlli.adb, a-cbdlli.ads, a-cbhase.adb, a-cbhase.ads:
3912 Move Iterator operations from body to private part of spec.
3914 2013-04-11 Eric Botcazou <ebotcazou@adacore.com>
3916 * ttypes.ads, get_targ.ads: More minor rewording of comments.
3918 2013-04-11 Johannes Kanig <kanig@adacore.com>
3920 * debug.adb: Document use of switch -gnatd.Z.
3922 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
3924 * sem_prag.adb (Analyze_Pragma): Both pragma Depends and Global can now
3925 support renamings of entire objects. Legal renamings are replaced by
3926 the object they rename.
3927 (Is_Renaming): New routine.
3929 2013-04-11 Yannick Moy <moy@adacore.com>
3931 * set_targ.adb, opt.ads: Minor changes in comments.
3933 2013-04-11 Ben Brosgol <brosgol@adacore.com>
3935 * gnat_ugn.texi: Minor clean ups.
3937 2013-04-11 Robert Dewar <dewar@adacore.com>
3939 * nlists.ads, nlists.adb, treepr.adb, treepr.ads: Move debugging
3940 function p from Nlists to Treepr.
3942 2013-04-11 Ed Schonberg <schonberg@adacore.com>
3944 * sem_disp.adb (Check_Dispatching_Context): If the context is
3945 a contract for a null procedure defer error reporting until
3946 postcondition body is created.
3947 * exp_ch13.adb (Expand_N_Freeze_Entity): If the entity is a
3948 null procedure, complete the analysis of its contracts so that
3949 calls within classwide conditions are properly rewritten as
3952 2013-04-11 Thomas Quinot <quinot@adacore.com>
3954 * sem_ch10.adb, sem_ch12.adb: Minor reformatting.
3956 2013-04-11 Robert Dewar <dewar@adacore.com>
3958 * exp_attr.adb, sem_res.adb, sem_attr.adb: Minor reformatting.
3960 2013-04-11 Robert Dewar <dewar@adacore.com>
3962 * atree.adb, atree.ads (Node31): New function.
3963 (Set_Node31): New procedure.
3965 2013-04-11 Robert Dewar <dewar@adacore.com>
3967 * errout.ads: Minor typo correction.
3969 2013-04-11 Javier Miranda <miranda@adacore.com>
3971 * einfo.ad[sb] (Thunk_Entity/Set_Thunk_Entity): New attribute.
3973 2013-04-11 Robert Dewar <dewar@adacore.com>
3975 * back_end.adb (Register_Back_End_Types): Moved to Get_Targ
3976 * back_end.ads (C_String): Moved to Get_Targ
3977 (Register_Type_Proc): Moved to Get_Targ (Register_Back_End_Types):
3979 * cstand.adb (Register_Float_Type): New interface
3980 (Create_Back_End_Float_Types): Use entries in FPT_Mode_Table.
3981 * get_targ.adb (Register_Back_End_Types): Moved here from
3983 * get_targ.ads (C_String): Moved here from Back_End
3984 (Register_Type_Proc): Moved here from Back_End
3985 (Register_Back_End_Types): here from Back_End.
3986 * gnat1drv.adb (GGnat11drv): Add call to
3987 Write_Target_Dependent_Values;
3988 * lib-writ.ads, lib-writ.adb (Write_ALI): Remove section writing
3989 obsolete target dependent info.
3990 * opt.ads (Generate_Target_Dependent_Info):
3991 Removed (Target_Dependent_Info_Read): New flag
3992 (Target_Dependent_Info_Write): New flag
3993 * output.adb: Minor comment change
3994 * s-os_lib.ads: Minor reformatting
3995 * set_targ.ads, set_targ.adb: Minor reformatting.
3996 * switch-c.adb (Scan_Switches.First_Ptr): New variable
3997 (Scan_Front_End_Switches): Check -gnatd.b, -gnateT come first
3998 (Scan_Front_End_Switches): Handle -gnatet, -gnateT
3999 * ttypes.ads: Remove documentation section on target dependent
4000 info in ali file Remove four letter codes, no longer used Instead
4001 of using Get_Targ.Get_xxx, we use Set_Targ.xxx
4002 * usage.adb: Add usage lines for -gnatet/-gnateT
4003 * gcc-interface/Make-lang.in: Update dependencies.
4005 2013-04-11 Thomas Quinot <quinot@adacore.com>
4007 * sem_ch4.adb: Update documentation.
4008 * sinfo.ads (N_Expression_With_Actions): Ditto.
4010 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
4012 * sem_ch13.adb (Analyze_Aspect_Specifications):
4013 Add a guard to prevent the double insertion of the same aspect
4014 into a rep item list. This previously led to a circularity.
4016 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4018 * sem_attr.adb (Eval_Attribute, case 'Access): Reject attribute
4019 reference if the prefix is the dereference of an anonymous access
4021 * exp_attr.adb (Expand_N_Attribute_Reference, Access_Cases): Handle
4022 properly a reference to the current instance of a protected type
4023 from within a protected subprogram.
4024 * sem_res.adb (Find_Unique_Access_Type): Treat
4025 Attribute_Access_Type like Allocator_Type when resolving an
4028 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4030 * xgnatugn.adb: Remove obsolete comments.
4032 2013-04-11 Robert Dewar <dewar@adacore.com>
4034 * back_end.ads, back_end.adb: Minor reformatting.
4035 * set_targ.ads, set_targ.adb: New files.
4037 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
4039 * sem_case.adb (Check_Against_Predicate): New routine.
4040 (Check_Choices): When the type covered by the list of choices
4041 is a static subtype with a static predicate, check all choices
4042 agains the predicate.
4043 (Issue_Msg): All versions removed.
4044 (Missing_Choice): New routines.
4045 * sem_ch4.adb: Code and comment reformatting.
4046 (Analyze_Case_Expression): Do not check the choices when the case
4047 expression is being preanalyzed and the type of the expression
4048 is a subtype with a static predicate.
4049 (Has_Static_Predicate): New routine.
4050 * sem_ch13.adb: Code and comment reformatting. (Build_Range):
4051 Always build a range even if the low and hi bounds denote the
4052 same value. This is needed by the machinery in Check_Choices.
4053 (Build_Static_Predicate): Always build a range even if the low and
4054 hi bounds denote the same value. This is needed by the machinery
4057 2013-04-11 Robert Dewar <dewar@adacore.com>
4059 * einfo.ads, sem_util.adb, exp_ch6.adb, xgnatugn.adb: Minor
4062 2013-04-11 Doug Rupp <rupp@adacore.com>
4064 * gnatlink.adb: Fold program basename to lower case on VMS for
4067 2013-04-11 Matthew Heaney <heaney@adacore.com>
4069 * a-rbtgbo.adb (Generic_Equal): Initialize Result variable before
4072 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4074 * xgnatugn.adb: Remove dead code (handling of @ifset/@ifclear).
4076 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4078 * gnat_ugn.texi: Remove some use of ifset in menus. Not strictly
4079 needed, and seems to confuse some versions of makeinfo.
4081 2013-04-11 Javier Miranda <miranda@adacore.com>
4083 * einfo.adb (Is_Thunk): Remove assertion.
4084 (Set_Is_Thunk): Add assertion.
4085 * einfo.ads (Is_Thunk): Complete documentation.
4086 * exp_ch11.adb (Expand_N_Handled_Sequence_Of_Statements): Code cleanup.
4087 * exp_ch3.ad[sb] (Is_Variable_Size_Array): Moved to sem_util
4088 (Is_Variable_Size_Record): Moved to sem_util
4089 * exp_ch6.adb (Expand_Call): Code cleanup.
4090 (Expand_N_Extended_Return_Statement): Code cleanup.
4091 (Expand_Simple_Function_Return): Code cleanup.
4092 * exp_disp.adb Remove dependency on exp_ch3
4093 (Expand_Interface_Thunk): Add minimum decoration needed to set
4095 * sem_ch3.ad[sb] (Is_Constant_Bound): moved to sem_util
4096 * sem_util.ad[sb] (Is_Constant_Bound): Moved from
4097 sem_ch3 (Is_Variable_Size_Array): Moved from exp_ch3
4098 (Is_Variable_Size_Record): Moved from exp_ch3
4100 2013-04-11 Javier Miranda <miranda@adacore.com>
4102 * exp_ch11.adb (Expand_N_Handled_Sequence_Of_Statements): Do
4103 not add cleanup actions in thunks associated with interface types.
4104 * exp_ch3.ad[sb] (Is_Variable_Size_Record): Move declaration to
4106 * exp_ch4.adb (Tagged_Conversion): Update call to
4107 Expand_Interface_Conversion since the parameter Is_Static is no
4109 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Adding
4110 assertion to ensure that interface thunks are never handled by
4112 (Expand_N_Simple_Function_Return): Do not rewrite this statement
4113 as an extended return statement in interface thunks, and do not
4114 perform copy in the secondary stack if the return statement is
4116 * exp_disp.adb (Expand_Dispatching_Call): No longer displace
4117 the pointer to the returned object in functions returning interface
4119 (Expand_Interface_Thunk): For functions returning interface types
4120 displace the pointer to the returned object.
4121 (Expand_Interface_Conversion): Remove formal
4122 Is_Static since this subprogram can now evaluate it locally.
4123 * sem_ch3.adb (Add_Internal_Interface_Entities): For functions
4124 propagate the type returned by the covered interface primitive to
4125 the internal interface entity. Needed by the thunk to generate
4126 the code which displaces "this" to reference the corresponding
4127 secondary dispatch table.
4128 * sem_disp.adb (Propagate_Tag): Update call to
4129 Expand_Interface_Conversion since the parameter Is_Static is no
4131 * sem_res.adb (Resolve_Type_Conversion): Update calls to
4132 Expand_Interface_Conversion since the parameter Is_Static is no
4133 longer needed plus code cleanup.
4135 2013-04-11 Eric Botcazou <ebotcazou@adacore.com>
4137 * init.c (RETURN_ADDR_OFFSET): Delete as unused.
4139 2013-04-11 Robert Dewar <dewar@adacore.com>
4141 * a-crbtgk.adb, a-ciorse.adb, a-crbtgo.adb, a-coorse.adb, a-rbtgbo.adb,
4142 a-cborse.adb, a-rbtgso.adb, exp_ch3.adb: Minor reformatting.
4144 2013-04-11 Yannick Moy <moy@adacore.com>
4146 * exp_ch4.adb (Expand_N_Selected_Component): Do not expand
4147 discriminant check for Unchecked_Union.
4148 * sem_res.adb (Resolve_Selected_Component): Set flag
4149 Do_Discriminant_Check even when expansion is not performed.
4150 * sinfo.ads (Do_Discriminant_Check): Update documentation for the case
4153 2013-04-11 Thomas Quinot <quinot@adacore.com>
4155 * sem_ch13.adb (Same_Representation): Two types with different scalar
4156 storage order never have the same representation.
4158 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4160 * xgnatugn.adb (Push_Conditional): Simplify handling,
4161 no longer need to keep track of "excluding" sections.
4162 (Currently_Excluding): Removed.
4163 (Process_Source_File):
4164 Set unw/vms flag so that texinfo can do the whole handling of
4165 @ifset/@ifclear sections. Fix handling of nested @ifset/@ifclear
4167 * gnat_ugn.texi: Add a section on performing unassisted install
4170 2013-04-11 Johannes Kanig <kanig@adacore.com>
4172 * debug.adb: Document usage of -gnatd.Q switch.
4174 2013-04-11 Matthew Heaney <heaney@adacore.com>
4176 * a-crbtgk.adb (Ceiling, Find, Floor): Adjust locks
4177 before element comparisons.
4178 (Generic_Conditional_Insert, Generic_Conditional_Insert_With_Hint):
4180 * a-crbtgo.adb, a-rbtgbo.adb (Generic_Equal): Adjust locks before
4181 element comparisons.
4182 * a-rbtgso.adb (Difference, Intersection): Adjust locks
4183 before element comparisons.
4184 (Is_Subset, Overlap): Ditto
4185 (Symmetric_Difference, Union): Ditto
4186 * a-btgbso.adb (Set_Difference, Set_Intersection): Adjust locks
4187 before element comparisons.
4188 (Set_Subset, Set_Overlap): Ditto
4189 (Set_Symmetric_Difference, Set_Union): Ditto
4190 * a-coorse.adb, a-ciorse.adb, a-cborse.adb
4191 (Update_Element_Preserving_Key): Adjust locks before element
4192 comparisons (Replace_Element): Ditto
4194 2013-04-11 Pascal Obry <obry@adacore.com>
4196 * prj-attr.adb, projects.texi, snames.ads-tmpl: Remove Build_Slaves
4199 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4201 * exp_ch3.adb (Build_Equivalent_Aggregate): Subsidiary of
4202 Expand_N_Object_Declaration, used to construct an aggregate
4203 with static components whenever possible, so that objects of a
4204 discriminated type can be initialized without calling the init.
4207 2013-04-11 Vincent Celier <celier@adacore.com>
4209 * prj-makr.adb (Process_Directory): On VMS, always delete,
4210 then recreate the temporary file with Create_Output_Text_File,
4211 otherwise the output redirection does not work properly.
4213 2013-04-11 Eric Botcazou <ebotcazou@adacore.com>
4215 * urealp.ads: Fix minor typo.
4217 2013-04-11 Fabien Chouteau <chouteau@adacore.com>
4219 * cio.c (mktemp): Don't use tmpnam function from the
4220 system on VxWorks in kernel mode.
4222 2013-04-11 Vincent Celier <celier@adacore.com>
4224 * make.adb (Compile): Clarify the error message reported
4225 when gnatmake refuses to compile a runtime source.
4226 (Start_Compile_If_Possible): Ditto.
4228 2013-04-11 Vincent Celier <celier@adacore.com>
4230 * gnat_ugn.texi: Add documentation about -gnatc and gnatmake.
4232 2013-04-11 Vincent Celier <celier@adacore.com>
4234 * switch-c.adb: Document internal switches.
4235 * usage.adb: Remove lines for internal switches: -gnatea, -gnateO,
4236 -gnatez and -gnateO.
4238 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4240 * par-ch6.adb (P_Subprogram): Attach aspects to subprogram stub.
4241 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Allow aspects on
4243 * sem_ch13.adb (Analyze_Aspect_Specifications): Analyze generated
4244 pre/post pragmas at once before analyzing the proper body.
4245 * sem_prag.adb (Chain_PPC): Handle pragma that comes from an
4246 aspect on a subprogram stub.
4247 * aspects.adb: Aspect specifications can appear on a
4248 subprogram_Body_Stub.
4250 2013-04-11 Vincent Celier <celier@adacore.com>
4252 * gnatname.adb: Minor comment fix.
4254 2013-04-11 Vincent Celier <celier@adacore.com>
4256 * prj-makr.adb (Process_Directory): Create a new temporary
4257 file for each invocation of the compiler, in directory pointed
4258 by environment variable TMPDIR if it exists.
4260 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4262 * gnat_ugn.texi: Minor editing/clean ups.
4264 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4266 * sem_ch6.adb (Analyze_Null_Procedure): New subprogram, mostly
4267 extracted from Analyze_Subprogram_Declaration, to handle null
4268 procedure declarations that in ada 2012 can be completions of
4269 previous declarations.
4271 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
4273 * sem_prag.adb (Entity_Of): Moved to Exp_Util.
4274 * exp_util.ads, exp_util.adb (Entity_Of): New routine.
4276 2013-04-11 Robert Dewar <dewar@adacore.com>
4278 * g-spipat.ads: Minor comment fix.
4280 2013-04-11 Robert Dewar <dewar@adacore.com>
4282 * sem_prag.adb, sem_util.adb, sem_res.adb, exp_ch4.adb: Minor
4285 2013-04-11 Thomas Quinot <quinot@adacore.com>
4287 * exp_util.ads (Fully_Qualified_Name_String): Document that the
4288 constructed literal is the entity name in all upper case.
4290 2013-04-11 Thomas Quinot <quinot@adacore.com>
4292 * sem_util.adb (Set_Entity_With_Style_Check): Fix logic of
4293 check for implementation defined identifiers.
4295 2013-04-11 Yannick Moy <moy@adacore.com>
4297 * checks.adb (Apply_Type_Conversion_Checks): Add an explanation
4298 of why range check and length are put on different nodes.
4299 * exp_ch4.adb (Apply_Type_Conversion_Checks): Remove check marks
4300 when doing their expansion.
4302 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4304 * sem_util.ads, sem_util.adb (Get_Incomplete_View_Of_Ancestor):
4305 New function to implement the notion introduced in RM 7.3.1
4306 (5.2/3): in a child unit, a derived type is within the derivation
4307 class of an ancestor declared in a parent unit, even if there
4308 is an intermediate derivation that does not see the full view
4310 * sem_res.adb (Valid_Conversion): if all else fails, examine if an
4311 incomplete view of an ancestor makes a numeric conversion legal.
4313 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4315 * sem_ch6.adb: in Ada2012 operators can only have in
4318 2013-04-11 Vincent Celier <celier@adacore.com>
4320 * makeutl.adb (Create_Binder_Mapping_File): Do not put into
4321 the mapping file ALI files of sources that have been replaced.
4323 2013-04-11 Vincent Celier <celier@adacore.com>
4325 * projects.texi: Add subsection Duplicate Sources in Projects.
4327 2013-04-11 Vincent Celier <celier@adacore.com>
4329 * gnat_ugn.texi: Add documentation for gnatmake switch -droot_dir/**
4331 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4333 * init.c (__gnat_install_handler): Only set up an alternate
4334 stack when installing a signal handler for SIGSEGV.
4336 2013-04-11 Thomas Quinot <quinot@adacore.com>
4338 * g-socket.adb (Connect_Socket, timeout version): Call
4339 underlying connect operation directly, not through the 2-argument
4340 Connect_Socket thick binding, in order to avoid raising a junk
4341 exception for the EINPROGRESS return.
4343 2013-04-11 Robert Dewar <dewar@adacore.com>
4345 * a-cdlili.adb: Minor addition of pragma Warnings (Off).
4347 2013-04-11 Robert Dewar <dewar@adacore.com>
4349 * hostparm.ads: Minor reformatting.
4351 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
4353 * aspects.ads, aspects.adb: Add Aspect_Depends to all the relevant
4355 * elists.ads, elists.adb (Contains): New routine.
4356 * par-prag.adb: Pragma Depends does not need any special treatment
4358 * sem_ch13.adb (Analyze_Aspect_Specifications):
4359 Transform aspect Depends into a corresponding pragma.
4360 (Check_Aspect_At_Freeze_Point): Aspect Depends does not need
4361 inspection at its freeze point.
4362 * sem_prag.adb (Analyze_Pragma): Perform analysis and
4363 normalization of pragma Depends. Remove the use of function
4364 Is_Duplicate_Item. Use End_Scope to uninstalle the formal
4365 parameters of a subprogram. Add a value for pragma Depends in
4367 (Is_Duplicate_Item): Removed.
4368 * snames.ads-tmpl: Add predefined name for Depends as well as
4369 a pragma identifier.
4371 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4373 * gnat1drv.adb: Minor code clean up.
4375 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4377 * debug.adb, sem_ch13.adb (Analyze_Enumeration_Representation_Clause):
4378 Ignore enumeration rep clauses by default in CodePeer mode, unless
4379 -gnatd.I is specified.
4381 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4383 * sem_util.adb (Safe_To_Capture_Value): If the node belongs to
4384 an expression that has been attached to the else_actions of an
4385 if-expression, the capture is not safe.
4387 2013-04-11 Yannick Moy <moy@adacore.com>
4389 * checks.adb (Apply_Type_Conversion_Checks): Put check mark on type
4390 conversion for arrays.
4392 2013-04-11 Robert Dewar <dewar@adacore.com>
4394 * a-cdlili.adb, a-cidlli.adb, a-cbdlli.adb: Minor reformatting.
4396 2013-04-11 Johannes Kanig <kanig@adacore.com>
4398 * adabkend.adb: Minor comment addition.
4400 2013-04-11 Matthew Heaney <heaney@adacore.com>
4402 * a-cdlili.adb, a-cidlli.adb, a-cbdlli.adb ("="): Increment
4403 lock counts before entering loop.
4405 (Is_Sorted, Merge, Sort): Ditto.
4406 (Reverse_Find): Ditto.
4407 (Splice_Internal): Internal operation to refactor splicing logic.
4408 (Splice): Some logic moved into Splice_Internal.
4410 2013-04-11 Johannes Kanig <kanig@adacore.com>
4412 * adabkend.adb (Scan_Compiler_Arguments): Do not call
4413 Set_Output_Object_File_Name in Alfa_Mode
4414 * gnat1drv.adb (Adjust_Global_Switches): Take Alfa_Mode into account.
4415 * opt.ads: Fix documentation.
4417 2013-04-11 Robert Dewar <dewar@adacore.com>
4419 * sem_res.adb: Minor code reorganization and comment fixes.
4420 * sem_type.adb: Minor reformatting.
4422 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
4424 * exp_ch4.adb (Process_Transient_Object): Add new
4425 local variable Fin_Call. Remove and explain ??? comment. Use the
4426 Actions of logical operators "and then" and "or else" to insert
4427 the generated finalization call.
4429 2013-04-11 Eric Botcazou <ebotcazou@adacore.com>
4431 * gnat_rm.texi: Fix typo.
4433 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4435 * sem_res.adb: Minor reformatting.
4437 2013-04-11 Robert Dewar <dewar@adacore.com>
4439 * atree.h: Add declarations for Flag255-Flag289 Fix declaration
4440 of Field30 (was wrong, but no effect, since not yet referenced by
4441 back end) Add declarations for Field31-Field35 Add declarations
4443 * einfo.ads, einfo.adb (Has_Invariants): No longer applies to
4445 (Has_Predicates): No longer applies to functions.
4446 (Is_Predicate_Function): New flag.
4447 (Is_Predicate_Function_M): New flag.
4448 (Is_Invariant_Procedure): New flag.
4449 (Predicate_Function_M): New function.
4450 (Set_Predicate_Function_M): New procedure.
4451 * exp_ch11.adb (Expand_N_Raise_Expression): Take care of special
4452 case of appearing in predicate used for membership test.
4453 * exp_ch3.adb (Insert_Component_Invariant_Checks): Set
4454 Is_Invariant_Procedure flag.
4455 * exp_ch4.adb (Expand_Op_In): Call special predicate function
4456 that takes care of raise_expression nodes in the predicate.
4457 * exp_util.ads, exp_util.adb (Make_Predicate_Call): Add argument Mem for
4459 * sem_ch13.adb (Build_Predicate_Functions): New name for
4460 Build_Predicate_Function. Major rewrite to take care of raise
4461 expression in predicate for membership tests.
4462 * sem_res.adb (Resolve_Actuals): Include both predicate functions
4463 in defense against infinite predicate function loops.
4464 * sinfo.ads, sinfo.adb (Convert_To_Return_False): New flag.
4466 2013-04-11 Robert Dewar <dewar@adacore.com>
4468 * sem_prag.adb: Minor reformatting.
4470 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4472 * lib-xref.adb: Generate reference for component of anonymous
4475 2013-04-11 Robert Dewar <dewar@adacore.com>
4477 * stand.ads: Minor reformatting.
4479 2013-04-11 Matthew Heaney <heaney@adacore.com>
4481 * a-convec.adb, a-coinve.adb, a-cobove.adb ("="): Increment lock
4482 counts before entering loop.
4483 (Find, Find_Index): Ditto.
4484 (Is_Sorted, Merge, Sort): Ditto.
4485 (Reverse_Find, Reverse_Find_Index): Ditto.
4487 2013-04-11 Robert Dewar <dewar@adacore.com>
4489 * exp_ch11.ads, exp_ch11.adb (Expand_N_Raise_Expression): New procedure.
4490 * exp_util.adb (Insert_Actions): Add entry for N_Raise_Expression.
4491 * expander.adb: Add call to Expand_N_Raise_Expression.
4492 * par-ch11.adb (P_Raise_Expression): New procedure.
4493 * par-ch4.adb (P_Relation): Handle Raise_Expression.
4494 * par.adb (P_Raise_Expression): New procedure.
4495 * sem.adb: Add handling for N_Raise_Expression.
4496 * sem_ch11.ads, sem_ch11.adb (Analyze_Raise_Expression): New procedure.
4497 * sem_res.adb (Resolve): Add handling for N_Raise_Expression.
4498 * sinfo.ads, sinfo.adb (N_Raise_Expression): New node.
4499 * sprint.adb (Sprint_Node_Actual): Add handling for N_Raise_Expression.
4500 * stand.ads (Any_Type): Document use with N_Raise_Expression.
4502 2013-04-11 Vincent Celier <celier@adacore.com>
4504 * gnat_ugn.texi: Remove section "The Development Environments"
4505 now that all predefined attributes are documented, including
4506 those in package IDE.
4508 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4510 * sem_ch6.adb: Preserve parent link in copy of expression.
4512 2013-04-11 Vincent Celier <celier@adacore.com>
4514 * projects.texi: Complete rewrite of the subsection Attributes
4515 in section "Project file Reference".
4517 2013-04-11 Robert Dewar <dewar@adacore.com>
4519 * exp_ch4.adb: Minor reformatting.
4521 2013-04-11 Robert Dewar <dewar@adacore.com>
4523 * exp_ch4.adb (Expand_Concatenate): Remove wrapping in
4524 expression-with-actions node. No longer needed given fix to
4525 sem_prag and caused loss of some useful warnings.
4526 * sem.ads: Minor reformatting.
4527 * sem_prag.adb (Check_Disabled): Removed, to be replaced by not
4528 Check_Enabled. These two routines were curiously incompatible
4530 (Analyze_Pragma, case Check): Make sure we do
4531 not expand the string argument if the check is disabled. Avoid
4532 use of Check_Disabled, which resulted in missing analysis in
4534 * sem_prag.ads (Check_Disabled): Removed, to be replaced by not
4535 Check_Enabled. These two routines were curiously incompatible
4538 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
4540 * exp_ch4.adb (Process_Transient_Object): Use
4541 an unchecked conversion when associating a transient controlled
4542 object with its "hook".
4544 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4546 * sem_prag.adb (Analyze_Pragma, case
4547 Preelaborable_Initialization): The pragma is legal if it comes
4548 from an aspect on the private view of the type, even though its
4549 analysis point takes place later at the freeze point.
4551 2013-04-11 Robert Dewar <dewar@adacore.com>
4553 * sem_ch6.adb: Minor reformatting.
4555 2013-04-11 Yannick Moy <moy@adacore.com>
4557 * ali-util.adb (Read_Withed_ALIs): Do not consider it an error to
4558 read ALI files with No_Object=True in Alfa mode.
4559 * gnat1drv.adb: Set appropriately Back_End_Mode in Alfa mode, whether
4560 this is during frame condition generation of translation to Why.
4562 2013-04-11 Robert Dewar <dewar@adacore.com>
4564 * exp_ch4.adb: Minor code reorganization
4565 * types.ads: Minor reformatting.
4567 2013-04-11 Johannes Kanig <kanig@adacore.com>
4569 * opt.ads New global boolean Frame_Condition_Mode to avoid
4570 referring to command line switch.
4571 * gnat1drv.adb (Gnat1drv) set frame condition mode when -gnatd.G
4572 is present, and disable Code generation in that case. Disable
4573 ALI file generation when switch is *not* present.
4575 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4577 * sem_ch6.adb (Analyze_Expression_Function): Perform the
4578 pre-analysis on a copy of the expression, to prevent downstream
4579 visbility issues involving operators and instantiations.
4581 2013-04-11 Johannes Kanig <kanig@adacore.com>
4583 * debug.adb: Reservation and documentation for -gnatd.G switch.
4584 * gnat1drv.adb (Adjust_Global_Switches) Take into account -gnatd.G
4585 switch, and set ALI file generation accordingly.
4587 2013-04-11 Robert Dewar <dewar@adacore.com>
4589 * exp_ch4.adb, exp_dist.adb: Minor reformatting.
4590 * gnat_rm.texi, gnat_ugn.texi: -020 Add documentation clarifying that
4591 check names introduced with pragma Check_Name are suppressed by -gnatp.
4593 2013-04-11 Vincent Celier <celier@adacore.com>
4595 * gnat_ugn.texi, projects.texi: Move chapter "Tools Supporting Project
4596 Files" from projects.texi to gnat_ugn.texi.
4598 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4600 * gcc-interface/Make-lang.in: Update dependencies.
4602 2013-04-11 Yannick Moy <moy@adacore.com>
4604 * gnat1drv.adb (Adjust_Global_Switches): Allow missing body in Alfa
4607 2013-04-11 Hristian Kirtchev <kirtchev@adacore.com>
4609 * exp_ch4.adb (Expand_N_Allocator): Detect the
4610 allocation of an anonymous controlled object where the type of
4611 the context is named. Use the pool and finalization master of
4612 the named access type to allocate the object.
4614 2013-04-11 Vincent Celier <celier@adacore.com>
4616 * gnat_ugn.texi: Remove most mentions of gprbuild.
4617 * projects.texi: Remove all mentions of asociative array
4620 2013-04-11 Robert Dewar <dewar@adacore.com>
4622 * sem_prag.adb, sem_attr.adb, gnat1drv.adb, prj-makr.adb,
4623 opt.ads, sem_ch13.adb: Minor reformatting.
4624 * debug.adb: Minor comment fix (remove junk .I doc).
4626 2013-04-11 Thomas Quinot <quinot@adacore.com>
4628 * rtsfind.ads, exp_dist.adb, exp_dist.ads (Rtsfind.PCS_Version, case
4629 PolyORB): Bump to 6.
4630 (Exp_Dist.PolyORB_Support): Replace TC_Build with
4633 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4635 * debug.adb, sem_prag.adb, par-ch2.adb, sem_attr.adb, gnat1drv.adb,
4636 exp_disp.adb, opt.ads, sem_ch13.adb (Relaxed_RM_Semantics): New flag.
4637 Enable this flag in CodePeer mode, and also via -gnatd.M.
4638 Replace some uses of CodePeer_Mode by Relaxed_RM_Semantics.
4640 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4642 * sem_ch8.adb (Check_Constrained_Object): If a subtype is created
4643 from the renamed object in an object renaming declaration with
4644 an unconstrained nominal subtype, freeze the created subtype at
4645 once, to prevent order of elaboration issues in the backend.
4647 2013-04-11 Arnaud Charlet <charlet@adacore.com>
4649 * exp_aggr.adb (Aggr_Size_OK): Refine setting of Max_Aggr_Size
4650 in particular in CodePeer mode.
4652 2013-04-11 Vincent Celier <celier@adacore.com>
4654 * gnat_ugn.texi: Add documentation for backup copies of project
4657 2013-04-11 Tristan Gingold <gingold@adacore.com>
4659 * gnat_rm.texi: Add Detect_BLocking in the ravenscar profile
4662 2013-04-11 Vincent Celier <celier@adacore.com>
4664 * gnatname.adb (Scan_Args): Recognize new switch --no-backup
4665 (Usage): Add line for --no-backup.
4666 * opt.ads (No_Backup): New Boolean variable, initialized to False.
4667 (Ada_Version_Default): Switch to Ada 2012 by default.
4668 * prj-makr.adb (Initialize): Create a backup for an existing
4669 project file if gnatname is not invoked with --no-backup.
4671 2013-04-11 Thomas Quinot <quinot@adacore.com>
4673 * exp_ch4.adb: Minor code improvement: replace various calls to
4674 Make_If_Statement in expansion with Make_Implicit_If_Statement.
4676 2013-04-11 Eric Botcazou <ebotcazou@adacore.com>
4678 * ali.adb: Fix minor typo.
4680 2013-04-11 Thomas Quinot <quinot@adacore.com>
4682 * exp_ch4.adb (Find_Enclosing_Context): Add missing case of
4683 N_Procedure_Call_Statement.
4685 2013-04-11 Robert Dewar <dewar@adacore.com>
4687 * debug.adb: Minor comment fix.
4689 2013-04-11 Johannes Kanig <kanig@adacore.com>
4691 * debug.adb: Remove comment for -gnatd.G.
4693 2013-04-11 Thomas Quinot <quinot@adacore.com>
4695 * exp_ch4.adb (Expand_Record_Equality.Suitable_Element):
4696 Remove recursive routine, replace with...
4697 (Expand_Record_Equality.Element_To_Compare): New subroutine,
4698 implement iterative search for next element to compare.
4699 Add explanatory comment in the tagged case.
4701 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4703 * sem_ch5.adb: remove spurious warning from non-empty loop.
4704 * sem_ch8.adb (Enclosing_Instance): Make public to other routines
4705 in the package, in order to suppress redundant semantic checks
4706 on subprogram renamings in nested instantiations.
4708 2013-04-11 Robert Dewar <dewar@adacore.com>
4710 * errout.ads: Minor reformatting.
4711 * sem_eval.adb (Why_Not_Static): Now issues continuation messages
4712 (Why_Not_Static): Test for aggregates behind string literals.
4713 * sem_eval.ads (Why_Not_Static): Now issues continuation messages.
4715 2013-04-11 Robert Dewar <dewar@adacore.com>
4717 * exp_ch4.adb (Expand_Concatenation): Wrap expansion in
4718 Expressions_With_Actions.
4720 2013-04-11 Ed Schonberg <schonberg@adacore.com>
4722 * sem_ch6.adb (Base_Types_Match): For an actual type in an
4723 instance, the base type may itself be a subtype, so find true
4724 base type to determine compatibility.
4726 2013-04-11 Robert Dewar <dewar@adacore.com>
4728 * s-osprim-mingw.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb.
4729 makeutl.adb, sem_ch8.adb: Minor reformatting.
4731 2013-04-11 Vincent Celier <celier@adacore.com>
4733 * gnat_ugn.texi: Minor fixes for VMS.
4734 * ug_words: Minor addition: -gnato? => /OVERFLOW_CHECKS=?.
4736 2013-04-11 Robert Dewar <dewar@adacore.com>
4738 * usage.adb (Usage): Minor edit to -gnatW message
4740 2013-04-11 Robert Dewar <dewar@adacore.com>
4742 * exp_aggr.adb (Expand_N_Aggregate): Add circuit for handling
4743 others for string literal case. Also add big ??? comment about
4744 this new code, which should be redundant, but is not.
4745 * sem_eval.adb (Eval_Concatenation): Handle non-static case
4746 properly (Eval_String_Literal): Handle non-static literal properly
4748 2013-03-20 Tobias Burnus <burnus@net-b.de>
4750 * i-fortra.ads: Update comment, add Ada 2012's optional
4751 Star and Kind data types for enhanced interoperability.
4753 2013-03-16 Eric Botcazou <ebotcazou@adacore.com>
4755 * gnatvsn.ads (Library_Version): Bump to 4.9.
4757 2013-03-08 Cesar Strauss <cestrauss@gmail.com>
4760 * seh_init.c (Raise_From_Signal_Handler): Declare as no-return.
4761 (__gnat_SEH_error_handler): Likewise. Remove final return.
4763 2013-03-06 Eric Botcazou <ebotcazou@adacore.com>
4765 * gcc-interface/trans.c (Attribute_to_gnu): Abort instead of erroring
4766 out for an unimplemented attribute.
4768 2013-03-06 Eric Botcazou <ebotcazou@adacore.com>
4770 * gcc-interface/decl.c (gnat_to_gnu_field): Remove the wrapper around
4771 a misaligned integral type if a size is specified for the field.
4773 2013-03-06 Eric Botcazou <ebotcazou@adacore.com>
4775 * gcc-interface/trans.c (Raise_Error_to_gnu) <CE_Index_Check_Failed>:
4776 Record the unpadded type of the index type on the RCI stack.
4778 2013-03-06 Eric Botcazou <ebotcazou@adacore.com>
4780 * gcc-interface/trans.c (emit_range_check): Assert that the range type
4781 is a numerical type and remove useless local variables.
4783 2013-02-25 Eric Botcazou <ebotcazou@adacore.com>
4785 * gcc-interface/ada-tree.h: Back out change accidentally committed.
4787 2013-02-21 Jakub Jelinek <jakub@redhat.com>
4790 * gnat-style.texi (@title): Remove @hfill.
4791 * projects.texi: Avoid line wrapping inside of @pxref or @xref.
4793 2013-02-14 Rainer Emrich <rainer@emrich-ebersheim.de>
4796 * tracebak.c: Cast from pointer via FARPROC.
4798 2013-02-07 Simon Wright <simon@pushface.org>
4801 * init.c (__darwin_major_version): New function for x86-64/Darwin.
4802 (__gnat_adjust_context_for_raise) [Darwin]: Disable the workaround
4803 on Darwin 12 and above.
4805 2013-02-06 Rainer Emrich <rainer@emrich-ebersheim.de>
4808 * adaint.c (__gnat_check_OWNER_ACL): Cast from pointer via
4809 SECURITY_DESCRIPTOR *
4810 (__gnat_set_OWNER_ACL): Cast from DWORD to ACCESS_MODE
4811 (__gnat_portable_spawn): Fix cast to char* const*
4812 (add_handle): Cast from pointer via void **
4813 (add_handle): Cast from pointer via int *
4814 (__gnat_locate_exec_on_path): Cast from pointer via TCHAR *
4815 (__gnat_locate_exec_on_path): Cast from pointer via char *
4816 * initialize.c (append_arg): Cast from pointer via LPWSTR
4817 (__gnat_initialize): Cast from pointer via LPWSTR
4818 * seh_init.c (__gnat_map_SEH): Cast from pointer via FARPROC
4820 2013-02-06 Hristian Kirtchev <kirtchev@adacore.com>
4822 * gcc-interface/Make-lang.in: Enable System.Stack_Checking.Operations
4823 target pairs on VxWorks 5 only.
4825 2013-02-06 Arnaud Charlet <charlet@adacore.com>
4827 * gcc-interface/Make-lang.in: Update dependencies.
4829 2013-02-06 Vincent Celier <celier@adacore.com>
4831 * prj-proc.adb (Process_Aggregated_Projects): Use a new project
4832 node tree for each project tree rooted at an aggregated project.
4834 2013-02-06 Hristian Kirtchev <kirtchev@adacore.com>
4836 * sem_util.adb (Is_Interface_Conversion): New routine.
4837 (Object_Access_Level): Detect an interface conversion
4838 that has been rewritten into a different construct. Use the
4839 original form of the conversion to find the access level of
4842 2013-02-06 Eric Botcazou <ebotcazou@adacore.com>
4844 * einfo.ads (Has_Pragma_No_Inline): New flag using Flag201.
4845 (Has_Pragma_No_Inline): Declare and mark as inline.
4846 (Set_Has_Pragma_No_Inline): Likewise.
4847 * einfo.adb (Has_Pragma_No_Inline): New function.
4848 (Set_Has_Pragma_No_Inline): New procedure.
4849 (Write_Entity_Flags): Handle Has_Pragma_No_Inline.
4850 * snames.ads-tmpl (Name_No_Inline): New pragma-related name.
4851 (Pragma_Id): Add Pragma_No_Inline value.
4852 * par-prag.adb (Prag): Handle Pragma_Inline.
4853 * sem_prag.adb (Inline_Status): New enumeration type.
4854 (Process_Inline): Change Active parameter
4855 to Inline_Status and add support for suppressed inlining.
4856 (Analyze_Pragma) <Pragma_Inline>: Adjust to above change.
4857 <Pragma_Inline_Always>: Likewise.
4858 <Pragma_No_Inline>: Implement new pragma No_Inline.
4859 (Sig_Flags): Add Pragma_No_Inline.
4860 * gnat_rm.texi (Implementation Defined Pragmas): Add No_Inline.
4861 * gnat_ugn.texi (Switches for gcc): Mention Pragma No_Inline.
4863 2013-02-06 Pascal Obry <obry@adacore.com>
4865 * s-osprim-mingw.adb (Clock): Make sure we copy all data locally
4866 to avoid interleaved modifications that could happen from another
4867 task calling Get_Base_Data.
4868 (Get_Base_Data): Make it a critical section. Avoid updating if another
4869 task has already done it.
4871 2013-02-06 Eric Botcazou <ebotcazou@adacore.com>
4873 * sem_prag.adb: Minor reformatting.
4875 2013-02-06 Pascal Obry <obry@adacore.com>
4877 * s-tasloc.ads: Set System.Task_Lock to preelaborate.
4879 2013-02-06 Eric Botcazou <ebotcazou@adacore.com>
4881 * snames.ads-tmpl (Name_Loop_Optimize, Name_No_Unroll,
4882 Name_Unroll, Name_No_Vector, Name_Vector): New pragma-related
4884 (Pragma_Id): Add Pragma_Loop_Optimize value.
4885 * par-prag.adb (Prag): Handle Pragma_Loop_Optimize.
4886 * sem_prag.adb (Check_Loop_Invariant_Variant_Placement): Rename to...
4887 (Check_Loop_Pragma_Placement): ...this.
4889 <Pragma_Loop_Invariant>: Adjust to above renaming.
4890 <Loop_Variant>: Likewise.
4891 <Pragma_Loop_Optimize>: Implement new pragma Loop_Optimize.
4892 (Sig_Flags): Add Pragma_Loop_Optimize.
4893 * gnat_rm.texi (Implementation Defined Pragmas): Add Loop_Optimize.
4894 * gnat_ugn.texi (Vectorization of loops): Mention Loop_Optimize.
4896 2013-02-06 Robert Dewar <dewar@adacore.com>
4898 * osint.ads: Minor fix of typo.
4900 2013-02-06 Sergey Rybin <rybin@adacore.com frybin>
4902 * gnat_ugn.texi: gnatmetric: update the documentation of
4903 complexity metrics for Ada 2012.
4905 2013-02-06 Javier Miranda <miranda@adacore.com>
4907 * exp_disp.adb (Make_Secondary_DT): Code cleanup:
4908 remove useless initialization.
4910 2013-02-06 Ed Schonberg <schonberg@adacore.com>
4912 * sem_ch3.adb (Build_Discriminant_Constraints): Do not
4913 generate overflow checks on a discriminant expression if the
4914 discriminant constraint is applied to a private type that has
4915 a full view, because the check will be applied when the full
4916 view is elaborated. Removing the redundant check is not just
4917 an optimization, but it prevents spurious assembler errors,
4918 because of the way the backend generates names for expressions
4919 that require overflow checking.
4921 2013-02-06 Pascal Obry <obry@adacore.com>
4923 * s-osprim-mingw.adb: Removes workaround for an old GNU/Linker
4924 limitation on Windows.
4934 (Clock): Use variable corresponding to access.
4935 (Get_Base_Time): Likewise.
4936 (Monotonic_Clock): Likewise.
4938 2013-02-06 Vincent Celier <celier@adacore.com>
4940 * make.adb (Gnatmake): When gnatmake is called with a project
4941 file, do not invoke gnatbind with -I-.
4942 * makeutl.adb (Create_Binder_Mapping_File): Rewrite function. Get
4943 the infos from all the sources.
4945 2013-02-06 Ed Schonberg <schonberg@adacore.com>
4947 * snames.ads-tmpl: Add Name_Overriding_Renamings and pragma
4948 Overriding_Renamings.
4949 * par-prag.adb: Recognize pragma Overriding_Renamings.
4950 * opt.ads (Overriding_Renamings): flag to control compatibility
4951 mode with Rational compiler, replaces Rational_Profile flag.
4952 * sem_ch8.adb (Analyze_Subprogram_Renaming): When
4953 Overriding_Renamings is enabled, accept renaming declarations
4954 where the new subprogram renames and overrides a locally inherited
4955 operation. Improve error message for some illegal renamings.
4956 * sem_prag.adb (Analyze_Pragma): Add case for Overriding_Renamings.
4957 (Set_Rational_Profile): The Rational_Profile enables
4958 Overriding_Renamings, Implicit_Packing, and Use_Vads_Size.
4960 2013-02-06 Ed Schonberg <schonberg@adacore.com>
4962 * sem_util.adb: Set parent of copied aggregate component, to
4963 prevent infinite loop.
4965 2013-02-06 Robert Dewar <dewar@adacore.com>
4967 * sem_ch3.adb, sem_ch10.adb: Minor reformatting.
4968 * exp_disp.adb: Minor comment update.
4969 * comperr.ads, osint.ads, rtsfind.adb, sem_prag.adb: Minor addition of
4972 2013-02-06 Thomas Quinot <quinot@adacore.com>
4974 * targparm.ads, sem_ch13.adb (Support_Nondefault_SSO): New target
4975 parameter, defaulted to False for now, indicates targets where
4976 non-default scalar storage order may be specified.
4978 2013-02-06 Thomas Quinot <quinot@adacore.com>
4980 * sprint.adb (Write_Itype): Treat E_Record_Subtype_With_Private
4981 same as E_Record_Subtype. Display E_Class_Wide_Subtype as
4984 2013-02-06 Hristian Kirtchev <kirtchev@adacore.com>
4986 * sem_ch3.adb (Complete_Private_Subtype): Inherit the
4987 Has_Unknown_Discriminants from the full view of the base type.
4989 2013-02-06 Tristan Gingold <gingold@adacore.com>
4991 * raise-gcc.c: Remove useless includes (sys/stat.h, adaint.h)
4992 Enclosing debugging functions within #ifndef inhibit_libc to
4993 support builds without full C headers.
4995 2013-02-06 Thomas Quinot <quinot@adacore.com>
4997 * gnat_rm.texi: Add a minimal example of Scalar_Storage_Order.
4999 2013-02-06 Hristian Kirtchev <kirtchev@adacore.com>
5001 * sem_ch10.adb (Install_Limited_Withed_Unit): Add a missing
5002 check to detect a parent-child relationship between two units in
5003 order to correctly bypass the installation of a limited view. In
5004 other words, the comment on the intended usage of the check was
5005 correct, but the code itself did not reflect the behavior.
5007 2013-02-06 Javier Miranda <miranda@adacore.com>
5009 * exp_ch5.adb (Expand_N_Assignment_Statement): Do not generate the
5010 runtime check on assignment to tagged types if compiling with checks
5013 2013-02-06 Robert Dewar <dewar@adacore.com>
5015 * exp_util.adb, checks.adb, sem_ch12.adb, sem_res.adb, prj-conf.adb,
5016 s-os_lib.adb: Minor reformatting
5018 2013-02-06 Vincent Celier <celier@adacore.com>
5020 * ug_words: Add -gnateY = /IGNORE_STYLE_CHECKS_PRAGMAS.
5022 2013-02-06 Ed Schonberg <schonberg@adacore.com>
5024 * snames.ads-tmpl: Add Name_Rational and pragma Rational.
5025 * par-prag.adb: Recognize pragma Rational.
5026 * opt.ads (Rational_Profile): flag to control compatibility mode
5027 with Rational compiler.
5028 * sem_ch8.adb (Analyze_Subprogram_Renaming): When Rational profile
5029 is enable, accept renaming declarations where the new subprogram
5030 and the renamed entity have the same name.
5031 * sem_prag.adb (analyze_pragma): Add pragma Rational, and recognize
5032 Rational as a profile.
5034 2013-02-06 Hristian Kirtchev <kirtchev@adacore.com>
5036 * exp_ch5.adb (Expand_Loop_Entry_Attributes): When
5037 dealing with a for loop that iterates over a subtype indication
5038 with a range, use the low and high bounds of the subtype.
5040 2013-02-06 Nicolas Roche <roche@adacore.com>
5042 * s-os_lib.adb (Normalize_Arguments): Arguments containing tabs should
5045 2013-02-06 Vincent Celier <celier@adacore.com>
5047 * prj-conf.adb (Process_Project_And_Apply_Config): New variable
5048 Conf_Project. New recursive procedure Check_Project to find a non
5049 aggregate project and put its Project_Id in Conf_Project. Fails if
5050 no such project can be found.
5051 (Get_Or_Create_Configuration_File): New parameter Conf_Project.
5052 (Do_Autoconf): Use project directory of project Conf_Project to store
5053 the generated configuration project file.
5054 * prj-conf.ads (Get_Or_Create_Configuration_File): New parameter
5057 2013-02-06 Javier Miranda <miranda@adacore.com>
5059 * sem_res.adb (Resolve_Actuals): Generate a read
5060 reference for out-mode parameters in the cases specified by
5063 2013-02-06 Hristian Kirtchev <kirtchev@adacore.com>
5065 * sem_attr.adb (Resolve_Attribute): Do not resolve the prefix of
5066 Loop_Entry, instead wait until the attribute has been expanded. The
5067 delay ensures that any generated checks or temporaries are inserted
5068 before the relocated prefix.
5070 2013-02-06 Ed Schonberg <schonberg@adacore.com>
5072 * sem_ch12.adb: Code clean up.
5074 2013-02-06 Ed Schonberg <schonberg@adacore.com>
5076 * checks.adb (Apply_Discriminant_Check): Look for discriminant
5077 constraint in full view of private type when needed.
5078 * sem_ch12.adb (Validate_Array_Type_Instance): Specialize
5079 previous patch to components types that are private and without
5082 2013-02-06 Hristian Kirtchev <kirtchev@adacore.com>
5084 * exp_ch4.adb (Find_Enclosing_Context): Recognize
5085 a simple return statement as one of the cases that require special
5086 processing with respect to temporary controlled function results.
5087 (Process_Transient_Object): Do attempt to finalize a temporary
5088 controlled function result when the associated context is
5089 a simple return statement. Instead, leave this task to the
5090 general finalization mechanism.
5092 2013-02-06 Thomas Quinot <quinot@adacore.com>
5094 * einfo.ads: Minor reformatting.
5095 (Status_Flag_Or_Transient_Decl): Add ??? comment.
5097 2013-02-06 Hristian Kirtchev <kirtchev@adacore.com>
5099 * exp_ch4.adb (Expand_N_Expression_With_Actions): Rewritten. This
5100 routine should be able to properly detect controlled transient
5101 objects in its actions and generate the appropriate finalization
5103 * exp_ch6.adb (Enclosing_Context): Removed.
5104 (Expand_Ctrl_Function_Call): Remove local subprogram and
5105 constant. Use routine Within_Case_Or_If_Expression to determine
5106 whether the lifetime of the function result must be extended to
5107 match that of the context.
5108 * exp_util.ads, exp_util.adb (Within_Case_Or_If_Expression): New
5111 2013-02-06 Ed Schonberg <schonberg@adacore.com>
5113 * sem_ch12.adb (Validate_Array_Type_Instance): Extend check
5114 for subtype matching of component type of formal array type,
5115 to avoid spurious error when component type is a separate actual
5116 in the instance, and there may be a discrepancy between private
5117 and full view of component type.
5119 2013-02-06 Robert Dewar <dewar@adacore.com>
5121 * s-dim.ads, clean.adb: Minor reformatting.
5123 2013-02-06 Javier Miranda <miranda@adacore.com>
5125 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Undo previous patch.
5126 (Can_Split_Unconstrained_Function): Only split the inlined function if
5127 the compiler generates the code of its body.
5129 2013-02-06 Robert Dewar <dewar@adacore.com>
5131 * exp_prag.adb, sem_ch3.adb, exp_attr.adb, sem_prag.adb, sem_ch6.adb,
5132 exp_intr.adb, exp_dist.adb, sem_ch13.adb: Internal clean up for
5135 2013-02-06 Robert Dewar <dewar@adacore.com>
5137 * gnat_rm.texi: Minor text updates for pragma Warning.
5139 2013-02-06 Geert Bosch <bosch@adacore.com>
5141 * s-multip.adb (Number_Of_CPUs): Short-circuit in case of
5144 2013-02-06 Vincent Celier <celier@adacore.com>
5146 * clean.adb (Delete): On VMS use host notation to delete all files.
5148 2013-02-06 Robert Dewar <dewar@adacore.com>
5150 * sem_prag.adb, sem_ch6.adb, prj-conf.adb, erroutc.adb: Minor
5153 2013-02-06 Gary Dismukes <dismukes@adacore.com>
5155 * sem_ch6.adb (Check_For_Primitive_Subprogram): Test for
5156 the special case of a user-defined equality that overrides
5157 the predefined equality of a nonderived type declared in a
5159 * sem_util.adb (Collect_Primitive_Operations): Add test for
5160 Is_Primitive when looping over the subprograms following a type,
5161 to catch the case of primitives such as a user-defined equality,
5162 which otherwise won't be found when the type is not a derived
5163 type and is declared in a declarative part.
5165 2013-02-06 Vincent Celier <celier@adacore.com>
5167 * prj-conf.adb (Check_Target): Always return True when Target
5168 is empty (Get_Or_Create_Configuration_File.Get_Project_Target):
5169 New procedure to get the value of attribute Target in the main
5171 (Get_Or_Create_Configuration_File.Do_Autoconf): No
5172 need to get the value of attribute Target in the main project.
5173 (Get_Or_Create_Configuration_File): Call Get_Project_Target and
5174 use the target fom this call.
5176 2013-02-06 Eric Botcazou <ebotcazou@adacore.com>
5178 * erroutc.adb (Validate_Specific_Warning): Do not issue the
5179 warning about an ineffective Pragma Warnings for -Wxxx warnings.
5180 * sem_prag.adb (Analyze_Pragma) <Warnings>: Accept -Wxxx warnings.
5181 * gnat_rm.texi (Pragma Warnings): Document coordination with
5182 warnings of the GCC back-end.
5184 2013-02-06 Javier Miranda <miranda@adacore.com>
5186 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Do not build the body
5187 of an inlined function if we do not generate code for the function.
5189 2013-02-06 Pascal Obry <obry@adacore.com>
5191 * s-os_lib.adb (Locate_Exec_On_Path): Call Normalize_Pathname
5192 with Resolve_Links set to False.
5194 2013-02-03 Eric Botcazou <ebotcazou@adacore.com>
5196 * gcc-interface/decl.c: Include diagnostic-core.h.
5197 (gnat_to_gnu_entity) <E_Array_Type>: Sorry if Reverse_Storage_Order
5198 is set on the entity.
5199 <E_Record_Type>: Likewise.
5200 * gcc-interface/Make-lang.in (ada/decl.o): Add $(DIAGNOSTIC_CORE_H).
5202 2013-01-29 Ben Brosgol <brosgol@adacore.com>
5204 * gnat_rm.texi: Fixed typos. Minor edits.
5206 2013-01-29 Bob Duff <duff@adacore.com>
5208 * a-convec.adb: Minor reformatting.
5210 2013-01-29 Pascal Obry <obry@adacore.com>
5212 * tempdir.adb, tempdir.ads (Use_Temp_Dir): Set wether to use the temp
5215 2013-01-29 Ed Schonberg <schonberg@adacore.com>
5217 * exp_ch5.adb (Expand_Iterator_Loop_Over_Array): Preserve loop
5218 identifier only if it comes from source.
5219 (Expand_N_Loop_Statement): If the domain of iteration is an
5220 enumeration type with a representation clause, remove from
5221 visibility the loop identifier before rewriting the loop as a
5222 block with a declaration for said identifier.
5223 * sem_util.adb (Remove_Homonym): Handle properly the default case.
5225 2013-01-29 Vincent Celier <celier@adacore.com>
5227 * prj-proc.adb: Minor comment spelling fix.
5229 2013-01-29 Pascal Obry <obry@adacore.com>
5231 * prj-proc.adb (Process_Expression_Variable_Decl): Prepend
5232 Project_Path to current environment.
5234 2013-01-29 Thomas Quinot <quinot@adacore.com>
5236 * sprint.adb (Sprint_Node_Actual): Output freeze nodes for
5237 itypes even if Dump_Freeze_Null is not set.
5239 2013-01-29 Robert Dewar <dewar@adacore.com>
5241 * sem_util.adb: Minor reformatting.
5242 * s-rident.ads: Minor comment fixes.
5244 2013-01-29 Pascal Obry <obry@adacore.com>
5246 * prj-env.ads, prj-env.adb (Add_Directories): Add parameter to
5247 control if the path is prepended or appended.
5249 2013-01-29 Ed Schonberg <schonberg@adacore.com>
5251 * sem_ch6.adb (Analyze_Expression_Function): An expression
5252 function declaration is not a subprogram declaration, and thus
5253 cannot appear in a protected definition.
5255 2013-01-29 Hristian Kirtchev <kirtchev@adacore.com>
5257 * exp_util.adb (Insert_Actions): When new
5258 actions come from the expression of the expression with actions,
5259 then they must be added to the list of existing actions.
5261 2013-01-29 Eric Botcazou <ebotcazou@adacore.com>
5263 * sem_ch3.adb (Analyze_Subtype_Declaration) <Private_Kind>: For
5264 the subtype of a constrained private type with discriminants
5265 that has got a full view, show that the completion is a clone
5268 2013-01-29 Javier Miranda <miranda@adacore.com>
5270 * errout.ads, errout.adb (Get_Ignore_Errors): New subprogram.
5271 * opt.ads (Warn_On_Overlap): Update documentation.
5272 * sem_aggr.adb (Resolve_Aggregate, Resolve_Extension_Aggregate):
5273 Check function writable actuals.
5274 * sem_ch3.adb (Build_Derived_Record_Type,
5275 Record_Type_Declaration): Check function writable actuals.
5276 * sem_ch4.adb (Analyze_Range): Check function writable actuals.
5277 * sem_ch5.adb (Analyze_Assignment): Remove code of the initial
5278 implementation of AI05-0144.
5279 * sem_ch6.adb (Analyze_Function_Return,
5280 (Analyze_Procedure_Call.Analyze_Call_And_Resolve): Remove code
5281 of the initial implementation of AI05-0144.
5282 * sem_res.adb (Resolve): Remove code of the initial implementation.
5283 (Resolve_Actuals): Call Check_Function_Writable_Actuals and remove call
5284 of the initial implementation.
5285 (Resolve_Arithmetic_Op, Resolve_Logical_Op,
5286 Resolve_Membership_Op): Check function writable actuals.
5287 * sem_util.ad[sb] (Actuals_In_Call): Removed
5288 (Check_Order_Dependence): Removed (Save_Actual): Removed
5289 (Check_Function_Writable_Actuals): New subprogram.
5290 * usage.adb (Usage): Update documentation.
5291 * warnsw.adb (Set_Warning_Switch): Enable warn_on_overlap when
5292 setting all warnings.
5294 2013-01-29 Robert Dewar <dewar@adacore.com>
5296 * a-calend-vms.adb: Minor comment fix.
5298 2013-01-29 Robert Dewar <dewar@adacore.com>
5300 * mlib-utl.adb, gnatlink.adb: Avoid reference to ASCII.Back_Slash
5301 because of casing issues.
5302 * sem_util.ads: Minor comment fix.
5303 * style.adb (Check_Identifier): Set proper casing for entities
5305 * styleg.adb: Minor comment improvement.
5306 * stylesw.ads (Style_Check_Standard): Fix bad comments.
5308 2013-01-29 Hristian Kirtchev <kirtchev@adacore.com>
5310 * sem_prag.adb: Add the grammar for pragmas Abstract_State and Global.
5311 (Analyze_Pragma): Push the scope of the related subprogram and install
5312 its formals once before starting the analysis of the [moded] global
5315 2013-01-29 Pascal Obry <obry@adacore.com>
5317 * prj-proc.adb (Process_Expression_Variable_Decl): Always handle
5318 relative paths in Project_Path as relative to the aggregate
5319 project location. Note that this was what was documented.
5321 2013-01-29 Vincent Celier <celier@adacore.com>
5323 * gnatcmd.adb: For "gnat stub -P ...", do not check the naming
5324 scheme for Ada, when Ada is not a language for the project.
5326 2013-01-29 Ed Schonberg <schonberg@adacore.com>
5328 * sem_ch3.adb (Analyze_Subtype_Declaration): Inherit
5329 Is_Generic_Actual_Type flag in a nested instance.
5330 * sem_ch12.adb (Restore_Private_Views): Preserve
5331 Is_Generic_Actual_Type flag if actual is a Generic_Actual_Type
5332 of an enclosing instance.
5333 * sem_util.adb (Corresponding_Generic_Type): Handle generic actual
5334 which is an actual of an enclosing instance.
5335 * sem_type.adb (Real_Actual): If a generic_actual_type is the
5336 formal of an enclosing generic and thus renames the corresponding
5337 actual, use the actual of the enclosing instance to resolve
5338 spurious ambiguities in instantiations when two formals are
5339 instantiated with the same actual.
5341 2013-01-29 Robert Dewar <dewar@adacore.com>
5343 * gnat_rm.texi: Document all Ada 2005 and Ada 2012 pragmas as
5344 being available as implementation-defined pragmas in earlier
5347 2013-01-29 Vincent Celier <celier@adacore.com>
5349 * clean.adb (Delete): On VMS, delete all versions of the file.
5351 2013-01-29 Robert Dewar <dewar@adacore.com>
5353 * par-ch6.adb (No_Constraint_Maybe_Expr_Func): New procedure.
5354 * par-util.adb (No_Constraint): Undo special handling, moved
5357 2013-01-29 Robert Dewar <dewar@adacore.com>
5359 * aspects.ads: Aspect Warnings is implementation defined Add
5360 some other missing entries to impl-defined list Mark Warnings
5361 as GNAT pragma in main list.
5362 * sem_ch8.adb: Process aspects for all cases of renaming
5365 2013-01-29 Robert Dewar <dewar@adacore.com>
5367 * sem_ch6.adb (Analyze_Function_Call): Set In_Assertion flag.
5368 * sem_elab.adb (Check_Internal_Call_Continue): Do not issue
5369 warnings about possible elaboration error if call is within
5371 * sinfo.ads, sinfo.adb (In_Assertion): New flag in N_Function_Call node.
5373 2013-01-29 Robert Dewar <dewar@adacore.com>
5375 * a-calend-vms.adb, g-eacodu-vms.adb, g-trasym-vms-alpha.adb,
5376 * s-auxdec-vms-ia64.adb, s-mastop-vms.adb, s-osprim-vms.adb,
5377 s-tasdeb-vms.adb: Replace pragma Interface by pragma Import.
5379 2013-01-29 Robert Dewar <dewar@adacore.com>
5381 * opt.ads (Ignore_Style_Checks_Pragmas): New flag.
5382 * par-prag.adb (Par, case Style_Checks): Recognize
5383 Ignore_Style_Checks_Pragmas.
5384 * sem_prag.adb (Analyze_Pragma, case Style_Checks): Recognize
5385 Ignore_Style_Checks_Pragmas.
5386 * switch-c.adb: Recognize -gnateY switch.
5387 * usage.adb: Add documentation for "-gnateY".
5388 * vms_data.ads: Add IGNORE_STYLE_CHECKS_PRAGMAS (-gnateY).
5390 2013-01-29 Vincent Celier <celier@adacore.com>
5392 * clean.adb (Clean_Executables): Add Sid component when calling
5394 * make.adb: When inserting in the Queue, add the Source_Id
5395 (Sid) when it is known (Start_Compile_If_Possible): When the
5396 Source_Id is known (Sid), get the path name of the ALI file
5397 (Full_Lib_File) from it, to avoid finding old ALI files in other
5399 * makeutl.ads (Source_Info): New Source_Id component Sid in
5400 Format_Gnatmake variant.
5402 2013-01-29 Robert Dewar <dewar@adacore.com>
5404 * gnat_ugn.texi: Document -gnateY.
5406 2013-01-29 Doug Rupp <rupp@adacore.com>
5408 * s-osinte-vms.ads, s-taprop-vms.adb, system-vms_64.ads,
5409 system-vms-ia64.ads: Replace pragma Interface by pragma Import.
5411 2013-01-29 Robert Dewar <dewar@adacore.com>
5413 * atree.ads, atree.adb (Node30): New function.
5414 (Set_Node30): New procedure.
5415 (Num_Extension_Nodes): Change to 5 (activate new fields/flags).
5416 * atree.h: Add macros for Field30 and Node30.
5417 * einfo.ads, einfo.adb: Move some fields to avoid duplexing.
5418 * treepr.adb (Print_Entity_Information): Print fields 30-35.
5420 2013-01-29 Robert Dewar <dewar@adacore.com>
5422 * sem_prag.adb (Analyze_Pragma, case Interface): Consider to
5423 be a violation of No_Obsolescent_Features even in Ada 95. Also
5424 generates a warning in -gnatwj mode.
5425 (Analyze_Pragma, case Interface_Name): Generates a warning in -gnatwj
5427 * gnat_ugn.texi: Additional documentation on -gnatwj and pragma
5430 2013-01-29 Vincent Celier <celier@adacore.com>
5432 * snames.ads-tmpl: Add new standard name Trailing_Switches.
5434 2013-01-29 Ed Schonberg <schonberg@adacore.com>
5436 * sem_disp.adb (Check_Controlling_Type): If a designated type T
5437 of an anonymous access type is a limited view of a tagged type,
5438 it can be a controlling type only if the subprogram is in the
5441 2013-01-29 Vincent Celier <celier@adacore.com>
5443 * gnatcmd.adb: Use the project where the config pragmas file is
5444 declared to get its path.
5446 2013-01-29 Vincent Celier <celier@adacore.com>
5448 * prj-attr.adb: New attribute Linker'Trailing_Switches.
5450 2013-01-22 Eric Botcazou <ebotcazou@adacore.com>
5452 * gcc-interface/trans.c (gnat_to_gnu) <N_Expression_With_Actions>: Do
5453 not translate the Etype of the node before translating the Actions.
5455 2013-01-22 Eric Botcazou <ebotcazou@adacore.com>
5457 * gcc-interface/trans.c (Pragma_to_gnu) <Name_Space>: Use optimize_size
5458 instead of optimize and adjust warning message.
5459 (Compilation_Unit_to_gnu): Process pragmas preceding the unit.
5461 2013-01-22 Tristan Gingold <gingold@adacore.com>
5463 * gcc-interface/gigi.h (ADT_unhandled_except_decl,
5464 ADT_unhandled_others_decl): New.
5465 (unhandled_others_decl, unhandled_except_decl): Define.
5466 * gcc-interface/trans.c: Include common/common-target.h.
5467 (gigi): Initialize them.
5468 (Subprogram_Body_to_gnu): On SEH targets, wrap the body of the main
5469 function in a try/catch clause.
5471 2013-01-11 Eric Botcazou <ebotcazou@adacore.com>
5473 * gcc-interface/Make-lang.in (COMMON_ADAFLAGS): Remove -gnata.
5474 (CHECKING_ADAFLAGS): New.
5475 (ALL_ADAFLAGS): Include CHECKING_ADAFLAGS.
5477 2013-01-10 Eric Botcazou <ebotcazou@adacore.com>
5479 * gcc-interface/config-lang.in (boot_language_boot_flags): Delete.
5480 * gcc-interface/Make-lang.in (BOOT_ADAFLAGS): Likewise.
5482 2013-01-07 Eric Botcazou <ebotcazou@adacore.com>
5484 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Adjust
5485 comment about type extension with discriminants.
5486 <E_Record_Subtype>: Remove useless test and reorder conditions.
5487 (elaborate_entity) <E_Record_Subtype>: Likewise.
5489 2013-01-07 Richard Biener <rguenther@suse.de>
5492 * gcc-interface/Make-lang.in (ada.install-common): Always apply
5493 program_transform_name.
5495 2013-01-06 Eric Botcazou <ebotcazou@adacore.com>
5497 * gnatvsn.ads (Current_Year): Bump to 2013.
5499 2013-01-06 Olivier Hainque <hainque@adacore.com>
5501 * gcc-interface/decl.c (gnat_to_gnu_field): Emit a specialized
5502 diagnostic for component size mismatch wrt volatile requirements.
5503 Add a gcc_unreachable() at the end of the checks for size. Split
5504 the check on volatile for positions into one check on atomic and
5505 a subsequent one on volatile.
5507 2013-01-06 Eric Botcazou <ebotcazou@adacore.com>
5509 * gcc-interface/decl.c (elaborate_entity) <E_Record_Type>: Delete.
5511 2013-01-06 Eric Botcazou <ebotcazou@adacore.com>
5513 * gcc-interface/decl.c (gnat_to_gnu_entity) <discrete_type>: Do not
5514 pack the field of the record type made for a misaligned type.
5516 2013-01-06 Eric Botcazou <ebotcazou@adacore.com>
5518 * gcc-interface/decl.c (annotate_value) <COMPONENT_REF>: Be prepared
5519 for discriminants inherited from parent record types.
5521 2013-01-04 Robert Dewar <dewar@adacore.com>
5523 * warnsw.adb: Minor fixes to -gnatw.d handling.
5525 2013-01-04 Robert Dewar <dewar@adacore.com>
5527 * einfo.adb, atree.adb: Enlarge entities to make 63 more flags, 6 more
5530 2013-01-04 Joel Brobecker <brobecker@adacore.com>
5532 * gnat_ugn.texi: Fix typo.
5534 2013-01-04 Robert Dewar <dewar@adacore.com>
5536 * gnat_rm.texi: Document alignment choice for subtypes.
5538 2013-01-04 Robert Dewar <dewar@adacore.com>
5540 * validsw.ads: Minor fix to comment.
5542 2013-01-04 Doug Rupp <rupp@adacore.com>
5544 * Makefile.rtl (GNATRTL_NONTASKING_OBJS,
5545 GNATRTL_ALTIVEC_OBJS): Factor g-al* objects.
5546 * gcc-interface/Makefile.in (ADA_EXCLUDE_SRCS): Add g-al* sources.
5547 (GNATRTL_ALTIVEC_OBJS): Override to null for VMS.
5548 Rename leon vxworks toolchain as leon-wrs-vxworks.
5549 * gcc-interface/Make-lang.in: Update dependencies
5551 2013-01-04 Pascal Obry <obry@adacore.com>
5553 * prj.ads (For_Each_Source): Add Locally_Removed parameter.
5554 (Source_Iterator): Add Locally_Removed field.
5555 * prj.adb (For_Each_Source): Ignore Locally_Removed files if needed.
5558 2013-01-04 Robert Dewar <dewar@adacore.com>
5560 * exp_attr.adb: Minor reformatting.
5562 2013-01-04 Robert Dewar <dewar@adacore.com>
5564 * checks.adb (Insert_Valid_Check): Fix handling of renamed
5565 packed array element.
5566 * exp_ch4.adb (Expand_Concatenate): Fix some missing parent
5567 fields in generated code.
5568 * exp_util.adb (Side_Effect_Free): Improve detection of cases
5571 2013-01-04 Robert Dewar <dewar@adacore.com>
5573 * sinfo.ads: Clean up order of N_xxx subtypes
5575 2013-01-04 Vincent Celier <celier@adacore.com>
5577 * prj-conf.adb (Check_Target): Allow --autoconf= with no target.
5579 2013-01-04 Robert Dewar <dewar@adacore.com>
5581 * types.ads, prj-conf.adb, par-tchk.adb: Minor reformatting.
5583 2013-01-04 Robert Dewar <dewar@adacore.com>
5585 * par-ch6.adb (P_Subprogram): Better handling of missing IS
5586 after expression function.
5587 * par-util.adb (No_Constraint): Improve handling to avoid bad warnings.
5589 2013-01-04 Robert Dewar <dewar@adacore.com>
5591 * exp_util.ads, exp_util.adb (Insert_Actions): In expression with
5592 actions case, new actions are appended to the sequence rather than
5595 2013-01-04 Robert Dewar <dewar@adacore.com>
5597 * gnat_ugn.texi: Document -gnatw.d/w.D (does no apply in VMS mode).
5598 * usage.adb: Add lines for -gnatw.d/w.D switches.
5599 * warnsw.adb: Minor fixes (some missing cases of setting
5600 Warning_Doc_Switch). Reject -gnatw.d and -gnatw.D in VMS mode.
5602 2013-01-04 Robert Dewar <dewar@adacore.com>
5604 * exp_util.adb (Remove_Side_Effects): Make sure scope suppress
5605 is restored on exit.
5607 2013-01-04 Robert Dewar <dewar@adacore.com>
5609 * usage.adb: Document -gnateF (check overflow for predefined Float).
5611 2013-01-04 Robert Dewar <dewar@adacore.com>
5613 * sem_res.adb (Resolve_Type_Conversion): Remove incorrect
5614 prevention of call to Apply_Type_Conversion_Checks, which resulted
5615 in missing check flags in formal mode.
5617 2013-01-04 Vincent Celier <celier@adacore.com>
5619 * makeutl.ads (Db_Switch_Args): New table used by gprbuild.
5620 * prj-conf.adb (Check_Builder_Switches): Check for switches
5621 --config= (Get_Db_Switches): New procedure to get the --db
5622 switches so that they are used when invoking gprconfig in
5624 (Do_Autoconf): When invoking gprconfig, use the --db switches, if any.
5626 2013-01-04 Pascal Obry <obry@adacore.com>
5628 * prj-nmsc.adb: Minor reformatting.
5630 2013-01-04 Vincent Celier <celier@adacore.com>
5632 * makeutl.ads (Root_Environment): New variable, moved rom
5633 gprbuild (Load_Standard_Base): New Boolean variable, moved
5635 * prj-conf.adb (Check_Builder_Switches): New procedure to check
5636 for switch --RTS in package Builder. If a runtime specified
5637 by --RTS is a relative path name, but not a base name, then
5638 find the path on the Project Search Path.
5639 (Do_Autoconf): Call Check_Builder_Switches.
5640 (Locate_Runtime): New procedure, moved from gprbuild, to get the
5641 absolute paths of runtimes when they are not specified as a base name.
5642 * prj-conf.ads (Locate_Runtime): New procedure, moved from gprbuild.
5644 2013-01-04 Ed Schonberg <schonberg@adacore.com>
5646 * sem_ch3.adb (Build_Private_Derived_Type): Set
5647 Has_Private_Ancestor on type derived from an untagged private
5648 type whose full view has discriminants
5649 * sem_aggr.adb (Resolve_Record_Aggregate): Reject non-extension
5650 aggregate for untagged record type with private ancestor.
5652 2013-01-04 Thomas Quinot <quinot@adacore.com>
5654 * sem_elab.adb, sem_ch3.adb: Minor reformatting.
5656 2013-01-04 Robert Dewar <dewar@adacore.com>
5658 * table.adb: Minor reformatting.
5660 2013-01-04 Ed Schonberg <schonberg@adacore.com>
5662 * sem_ch10.adb (Check_Redundant_Withs): A with_clause that does
5663 not come from source does not generate a warning for redundant
5666 2013-01-04 Hristian Kirtchev <kirtchev@adacore.com>
5668 * aspects.adb, aspects.ads: Add Aspect_Global to all relevant tables.
5669 * par-prag.adb: Add pragma Global to the list of pragmas that
5670 do not need special processing by the parser.
5671 * sem_ch13.adb (Analyze_Aspect_Specifications): Convert aspect
5672 Global into a pragma without any form of legality checks. The
5673 work is done by Analyze_Pragma. The aspect and pragma are both
5674 marked as needing delayed processing. Insert the corresponding
5675 pragma of aspect Abstract_State in the visible declarations of the
5677 (Check_Aspect_At_Freeze_Point): Aspect Global
5678 does not need processing even though it is marked as delayed.
5679 Alphabetize the list on aspect names.
5680 * sem_prag.adb: Add a value for pragma Global in table Sig_Flags.
5681 (Analyze_Pragma): Add ??? comment about the grammar of pragma
5682 Abstract_State. Move the error location from the pragma to the
5683 state to improve the quality of error placement. Add legality
5684 checks for pragma Global.
5685 * snames.ads-tmpl Add the following specially recognized names
5687 2013-01-04 Eric Botcazou <ebotcazou@adacore.com>
5689 * sem_ch3.adb: Fix minor typo.
5691 2013-01-04 Ed Schonberg <schonberg@adacore.com>
5693 * par-ch13.adb (Aspect_Specifications_Present): In Strict mode,
5694 accept an aspect name followed by a comma, indicating a defaulted
5697 2013-01-04 Joel Brobecker <brobecker@adacore.com brobecker>
5699 * gnat_ugn.texi: Document procedure to codesign GDB on Darwin.
5700 Update doc on gnattest --separates switch.
5702 2013-01-04 Thomas Quinot <quinot@adacore.com>
5704 * s-chepoo.ads: Minor reformatting.
5706 2013-01-04 Arnaud Charlet <charlet@adacore.com>
5708 * usage.adb: Remove mention of -gnatN in usage.
5710 2013-01-04 Robert Dewar <dewar@adacore.com>
5712 * exp_prag.adb, gnatcmd.adb, exp_util.adb, table.adb, sem_prag.adb,
5713 freeze.adb, sem_ch4.adb, sem_warn.adb, opt.ads, exp_aggr.adb,
5714 prj-conf.adb, sem_ch13.adb: Minor reformatting.
5716 2013-01-04 Thomas Quinot <quinot@adacore.com>
5718 * sinfo.ads: Minor documentation update.
5720 2013-01-04 Thomas Quinot <quinot@adacore.com>
5722 * sem_ch3.adb, einfo.adb (Analyze_Object_Declaration): Do not set Ekind
5723 before resolving initialization expression.
5725 2013-01-04 Hristian Kirtchev <kirtchev@adacore.com>
5727 * checks.adb (Generate_Index_Checks): Delay the generation of
5728 the check for an indexed component where the prefix mentions
5729 Loop_Entry until the attribute has been properly expanded.
5730 * exp_ch5.adb (Expand_Loop_Entry_Attributes): Perform minor
5731 decoration of the constant that captures the value of Loop_Entry's
5732 prefix at the entry point into a loop. Generate index checks
5733 for an attribute reference that has been transformed into an
5736 2013-01-04 Thomas Quinot <quinot@adacore.com>
5738 * exp_prag.adb, exp_util.adb, exp_util.ads, freeze.adb, exp_aggr.adb,
5739 sem_ch13.adb (Exp_Aggr.Collect_Initialization_Statements): Nothing to
5740 do if Obj is already frozen.
5741 (Exp_Util.Find_Init_Call): Rename to...
5742 (Exp_Util.Remove_Init_Call): New subprogram, renamed from
5743 Find_Init_Call. Remove the initialization call from the enclosing
5744 list if found, and if it is from an Initialization_Statements
5745 attribute, reset it.
5746 (Exp_Util.Append_Freeze_Action): Minor code reorganization.
5747 (Exp_Util.Append_Freeze_Actions): Ensure a freeze node has been
5748 allocated (as is already done in Append_Freeze_Action).
5749 (Freeze.Freeze_Entity): For an object with captured
5750 Initialization_Statements and non-delayed freezeing, unwrap the
5751 initialization statements and insert and them directly in the
5753 (Sem_Ch13.Check_Address_Clause): For an object
5754 with Initialization_Statements and an address clause, unwrap the
5755 initialization statements when moving them to the freeze actions.
5757 2013-01-03 Pascal Obry <obry@adacore.com>
5759 * prj-attr.adb, projects.texi, snames.ads-tmpl: Add package remote and
5760 corresponding attibutes.
5762 2013-01-03 Thomas Quinot <quinot@adacore.com>
5764 * exp_aggr.adb: Minor comment improvement.
5766 2013-01-03 Hristian Kirtchev <kirtchev@adacore.com>
5768 * aspects.adb, aspects.ads: Add Aspect_Abstract_State to all the
5770 * einfo.ads, einfo.adb: Add Integrity_Level and Refined_State to
5771 the description of fields (Abstract_States): New routine.
5772 (Integrity_Level): New routine.
5773 (Has_Property): New routine.
5774 (Is_Input_State): New routine.
5775 (Is_Null_State): New routine.
5776 (Is_Output_State): New routine.
5777 (Is_Volatile_State): New routine.
5778 (Refined_State): New routine.
5779 (Set_Abstract_States): New routine.
5780 (Set_Integrity_Level): New routine.
5781 (Set_Refined_State): New routine.
5782 (Write_Field8_Name): Add proper output for E_Abstract_State.
5783 (Write_Field9_Name): Add proper output for E_Abstract_State.
5784 (Write_Field25_Name): Add proper output for E_Package.
5785 * lib-xref.ads: Add new letter for an abstract state.
5786 * par-prag.adb: Add pragma Abstract_State to the list of pragma
5787 that do not need special processing by the parser.
5788 * sem_ch13.adb (Analyze_Aspect_Specifications): Convert
5789 aspect Abstract_State into a pragma without any form
5790 of legality checks. The work is done by Analyze_Pragma.
5791 (Check_Aspect_At_Freeze_Point): Aspect Abstract_State does not
5792 require delayed analysis.
5793 * sem_prag.adb: Add a value for pragma Abstract_State in table
5795 (Analyze_Pragma): Add legality checks for pragma
5796 Abstract_State. Analysis of individual states introduces a state
5797 abstraction entity into the visibility chain.
5798 * snames.ads-tmpl: Add new names for abstract state and
5799 integrity. Add new pragma id for abstract state.
5801 2013-01-03 Bob Duff <duff@adacore.com>
5803 * table.adb (Reallocate): Calculate new Length in
5804 Long_Integer to avoid overflow.
5806 2013-01-03 Thomas Quinot <quinot@adacore.com>
5808 * sem_ch3.adb, sinfo.ads, freeze.adb, sem_ch4.adb, exp_aggr.adb
5809 (Sem_Ch3.Analyze_Object_Declaration): Set Ekind early so that
5810 it is set properly when expanding the initialization expression.
5811 (Freeze.Check_Address_Clause): Transfer initialization expression
5812 to an assignment in the freeze actions, so that the object is
5813 initialized only after being elaborated by GIGI.
5814 (Sinfo (comments), Sem_Ch4.Analyze_Expression_With_Actions): Allow
5815 a Null_Statement as the expression in an Expression_With_Actions.
5816 (Exp_Aggr.Collect_Initialization_Statements): New subprogram
5817 shared by expansion of record and array aggregates, used to
5818 capture statements for an aggregate used to initalize an object
5819 into an Expression_With_Actions (which acts as a container for
5821 (Exp_Aggr.Convert_Aggr_In_Obj_Decl): Use the above to
5822 capture initialization statements, instead of the previously
5823 existing loop which left freeze nodes out of the capturing
5824 construct (causing out of order elaboration crashes in GIGI).
5825 (Exp_Aggr.Expand_Array_Aggregate): Use the above to capture
5826 initialization statements (this was previously not done for
5827 arrays). Also do not unconditionally prevent in place expansion
5828 for an object with address clause.
5830 2013-01-03 Thomas Quinot <quinot@adacore.com>
5832 * gnat_rm.texi, freeze.adb (Check_Component_Storage_Order): Check that
5833 a record extension has the same scalar storage order as the parent type.
5835 2013-01-03 Thomas Quinot <quinot@adacore.com>
5837 * exp_ch4.adb: Add comment.
5839 2013-01-03 Vincent Celier <celier@adacore.com>
5841 * prj.adb: Minor spelling error correction in comment.
5843 2013-01-03 Vincent Celier <celier@adacore.com>
5845 * gnatcmd.adb (GNATCmd): If a single main has been specified
5846 as an absolute path, use its simple file name to find specific
5847 switches, instead of the absolute path.
5849 2013-01-03 Javier Miranda <miranda@adacore.com>
5851 * sem_warn.adb (Warn_On_Overlapping_Actuals): For overlapping
5852 parameters that are record types or array types generate warnings
5853 only compiling under -gnatw.i
5854 * opt.ads (Extensions_Allowed): Restore previous documentation.
5856 2013-01-03 Vincent Celier <celier@adacore.com>
5858 * prj-conf.adb (Do_Autoconf): If Target is specified in the
5859 main project, but not on the command line, use the Target in
5860 the project to invoke gprconfig in auto-configuration.
5861 * makeutl.ads (Default_Config_Name): New constant String.
5863 2013-01-03 Arnaud Charlet <charlet@adacore.com>
5865 * usage.adb: Minor: fix typo in usage.
5867 2013-01-03 Thomas Quinot <quinot@adacore.com>
5869 * sem_ch13.adb (Analyze_Record_Representation_Clause): Reject
5870 an illegal component clause for an inherited component in a
5873 2013-01-03 Emmanuel Briot <briot@adacore.com>
5875 * xref_lib.adb (Parse_Identifier_Info): Fix handling of arrays, which
5876 have information in the ALI file for both the index and the component
5879 2013-01-03 Emmanuel Briot <briot@adacore.com>
5881 * projects.texi: Fix error in documenting the project path
5882 computed for an aggregate project.
5884 2013-01-03 Javier Miranda <miranda@adacore.com>
5886 * sem_warn.adb (Warn_On_Overlapping_Actuals): Adding documentation
5887 plus restricting the functionality of this routine to cover the
5888 cases described in the Ada 2012 reference manual. The previous
5889 extended support is now available under -gnatX.
5890 * s-tassta.adb (Finalize_Global_Tasks): Addition of a dummy
5891 variable to call Timed_Sleep. Required to avoid warning on
5892 overlapping out-mode actuals.
5893 * opt.ads (Extensions_Allowed): Update documentation.
5895 2013-01-03 Tristan Gingold <gingold@adacore.com>
5897 * s-arit64.ads: Use Multiply_With_Ovflo_Check as __gnat_mulv64.
5899 * gcc-interface/Makefile.in: Remove reference to arit64.c.
5901 2013-01-03 Thomas Quinot <quinot@adacore.com>
5903 * checks.adb, checks.ads (Apply_Address_Clause_Check): The check must
5904 be generated at the start of the freeze actions for the entity, not
5905 before (or after) the freeze node.
5907 2013-01-03 Thomas Quinot <quinot@adacore.com>
5909 * exp_aggr.adb (Exp_Aggr.Convert_Aggregate_In_Obj_Decl):
5910 Reorganize code to capture initialization statements in a block,
5911 so that freeze nodes are excluded from the captured block.
5913 2013-01-03 Thomas Quinot <quinot@adacore.com>
5915 * exp_ch11.adb: Minor reformatting.
5917 2013-01-03 Thomas Quinot <quinot@adacore.com>
5919 * exp_util.adb, einfo.adb, einfo.ads, freeze.adb, exp_aggr.adb,
5920 sem_ch13.adb (Einfo.Initialization_Statements,
5921 Einfo.Set_Initialization_Statements): New entity attribute
5923 (Exp_Util.Find_Init_Call): Handle case of an object initialized
5924 by an aggregate converted to a block of assignment statements.
5925 (Freeze.Check_Address_Clause): Do not clear Has_Delayed_Freeze
5926 even for objects that require a constant address, because the
5927 address expression might involve entities that have yet to be
5928 elaborated at the point of the object declaration.
5929 (Exp_Aggr.Convert_Aggregate_In_Obj_Decl): For a type that does
5930 not require a transient scope, capture the assignment statements
5931 in a block so that they can be moved down after elaboration of
5932 an address clause if needed.
5933 (Sem_Ch13.Check_Constant_Address_Clause.Check_Expr_Constants,
5934 case N_Unchecked_Conversion): Do not replace operand subtype with
5935 its base type as this violates a GIGI invariant if the operand
5936 is an identifier (in which case the etype of the identifier
5937 is expected to be equal to that of the denoted entity).
5939 2013-01-03 Javier Miranda <miranda@adacore.com>
5941 * sem_util.ads, sem_util.adb (Denotes_Same_Object): Extend the
5942 functionality of this routine to cover cases described in the Ada 2012
5945 2013-01-03 Ed Schonberg <schonberg@adacore.com>
5947 * sem_elab.adb (Set_Elaboration_Constraint): Handle properly
5948 a 'Access attribute reference when the subprogram is called
5951 2013-01-03 Arnaud Charlet <charlet@adacore.com>
5953 * s-tpobop.adb (PO_Do_Or_Queue): Refine assertion, since a
5954 select statement may be called from a controlled (e.g. Initialize)
5955 operation and have abort always deferred.
5957 2013-01-03 Robert Dewar <dewar@adacore.com>
5959 * sem_ch8.adb, einfo.ads, einfo.adb: Minor code reorganization.
5961 2013-01-03 Javier Miranda <miranda@adacore.com>
5963 * exp_ch3.adb (Make_Controlling_Function_Wrappers): Exclude
5964 internal entities associated with interfaces and add minimum
5965 decoration to the defining entity of the generated wrapper to
5966 allow overriding interface primitives.
5967 * sem_disp.ads (Override_Dispatching_Operation): Addition of a
5968 new formal (Is_Wrapper).
5969 * sem_disp.adb (Override_Dispatching_Operation): When overriding
5970 interface primitives the new formal helps identifying that the
5971 new operation is not fully decorated.
5973 2013-01-03 Thomas Quinot <quinot@adacore.com>
5975 * sem_ch7.adb, sem_ch10.adb, einfo.adb, einfo.ads, sem_ch12.adb,
5976 rtsfind.adb, sem_elab.adb, sem_ch4.adb, sem_ch8.adb
5977 (Einfo.Is_Visible_Child_Unit, Einfo.Set_Is_Visible_Child_Unit):
5978 Rename to Is_Visible_Lib_Unit, Set_Is_Visible_Lib_Unit, and
5979 update spec accordingly (now also applies to root library units).
5980 (Sem_Ch10.Analyze_Subunit.Analyze_Subunit_Context): Toggle above flag
5981 on root library units, not only child units.
5982 (Sem_Ch10.Install[_Limited]_Withed_Unit): Same.
5983 (Sem_Ch10.Remove_Unit_From_Visibility): Reset Is_Visible_Lib_Unit
5984 even for root library units.
5985 (Sem_Ch8.Find_Expanded_Name): A selected component form whose prefix is
5986 Standard is an expanded name for a root library unit.
5988 2013-01-03 Thomas Quinot <quinot@adacore.com>
5990 * exp_ch3.adb: Minor reformatting.
5992 2013-01-03 Olivier Hainque <hainque@adacore.com>
5994 * tracebak.c: Reinstate changes to support ppc-lynx178.
5996 2013-01-03 Ed Schonberg <schonberg@adacore.com>
5998 * atree.ads: Minor reformatting and documentation enhancement.
6000 2013-01-03 Ed Schonberg <schonberg@adacore.com>
6002 * exp_ch3.adb (Expand_N_Object_Declaration): If the object has
6003 a class-wide type and a renaming declaration is created for it,
6004 preserve entity chain, which already contains generated internal
6005 types. This ensures that freezing actions are properly generated
6006 for all objects declared subsequently in the same scope, and
6007 that debugging information is generated for them.
6008 * sem_util.adb, sem_util.ads (we): New debugging routine, to
6009 display entity chain of a given scope.
6011 2013-01-03 Robert Dewar <dewar@adacore.com>
6013 * exp_intr.adb: Minor reformatting.
6015 2013-01-03 Robert Dewar <dewar@adacore.com>
6017 * einfo.adb: Minor reformatting.
6019 2013-01-03 Pascal Obry <obry@adacore.com>
6021 * adaint.c, adaint.h (__gnat_get_module_name): Removed.
6022 (__gnat_is_module_name_supported): Removed.
6023 * s-win32.ads: Add some needed definitions.
6024 * g-trasym.ads: Update comments.
6026 2013-01-03 Robert Dewar <dewar@adacore.com>
6028 * layout.adb (Set_Composite_Alignment): Fix problems of
6029 interactions with Optimize_Alignment set to Space.
6031 2013-01-03 Thomas Quinot <quinot@adacore.com>
6033 * exp_disp.adb: Minor reformatting.
6035 2013-01-02 Richard Biener <rguenther@suse.de>
6038 * gcc-interface/Makefile.in: Add $(GMPINC) to includes.
6040 2013-01-02 Thomas Quinot <quinot@adacore.com>
6042 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Remove
6043 side effects from Tag_Arg early, doing it too late may cause a
6044 crash due to inconsistent Parent link.
6045 * sem_ch8.adb, einfo.ads: Minor reformatting.
6047 2013-01-02 Robert Dewar <dewar@adacore.com>
6049 * einfo.ads, einfo.adb (Has_Independent_Components): New flag.
6050 * freeze.adb (Size_Known): We do not know the size of a packed
6051 record if it has atomic components, by reference type components,
6052 or independent components.
6053 * sem_prag.adb (Analyze_Pragma, case Independent_Components): Set new
6054 flag Has_Independent_Components.
6056 2013-01-02 Yannick Moy <moy@adacore.com>
6058 * opt.ads (Warn_On_Suspicious_Contract): Set to True by default.
6059 * usage.adb (Usage): Update usage message.
6061 2013-01-02 Pascal Obry <obry@adacore.com>
6063 * adaint.c (__gnat_is_module_name_supported): New constant.
6065 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6067 * sem_attr.adb (Check_Array_Type): Reject an attribute reference on an
6068 array whose component type does not have a completion.
6070 2013-01-02 Geert Bosch <bosch@adacore.com>
6072 * a-nllcef.ads, a-nlcefu.ads, a-nscefu.ads: Make Pure.
6074 2013-01-02 Robert Dewar <dewar@adacore.com>
6076 * par_sco.adb: Minor reformatting.
6078 2013-01-02 Javier Miranda <miranda@adacore.com>
6080 * sem_aggr.adb (Resolve_Array_Aggregate): Remove dead code.
6082 2013-01-02 Olivier Hainque <hainque@adacore.com>
6084 * a-exctra.ads (Get_PC): New function.
6086 2013-01-02 Thomas Quinot <quinot@adacore.com>
6088 * sem_ch8.adb: Minor reformatting.
6090 2013-01-02 Thomas Quinot <quinot@adacore.com>
6092 * sem_ch7.adb: Minor reformatting.
6094 2013-01-02 Thomas Quinot <quinot@adacore.com>
6096 * freeze.adb (Check_Component_Storage_Order): Do not crash on
6099 2013-01-02 Robert Dewar <dewar@adacore.com>
6101 * gnat1drv.adb, targparm.adb, targparm.ads: Minor name change: add
6102 On_Target to Atomic_Sync_Default.
6104 2013-01-02 Robert Dewar <dewar@adacore.com>
6106 * sem_warn.adb (Warn_On_Known_Condition): Suppress warning for
6107 comparison of attribute result with constant
6108 * a-ststio.adb, s-direio.adb, s-rannum.adb: Remove unnecessary pragma
6109 Warnings (Off, "..");
6111 2013-01-02 Yannick Moy <moy@adacore.com>
6113 * sem_prag.ads: Minor correction of comment.
6115 2013-01-02 Thomas Quinot <quinot@adacore.com>
6117 * par_sco.adb (Traverse_Package_Declaration): The first
6118 declaration in a nested package is dominated by the preceding
6119 declaration in the enclosing scope.
6121 2013-01-02 Pascal Obry <obry@adacore.com>
6123 * adaint.c, adaint.h (__gnat_get_module_name): Return the actual
6124 module containing a given address.
6126 2013-01-02 Thomas Quinot <quinot@adacore.com>
6128 * sem_ch3.adb: Minor reformatting.
6130 2013-01-02 Pascal Obry <obry@adacore.com>
6132 * cstreams.c (__gnat_ftell64): New routine. Use _ftelli64 on
6133 Win64 and default to ftell on other platforms.
6134 (__gnat_fsek64): Likewise.
6135 * i-cstrea.ads: Add fssek64 and ftell64 specs.
6136 * s-crtl.ads: Likewise.
6137 * a-ststio.adb, s-direio.adb (Size): Use 64 bits version when required.
6138 (Set_Position): Likewise.
6140 2013-01-02 Thomas Quinot <quinot@adacore.com>
6142 * par_sco.adb: Generate X SCOs for default expressions in
6143 subprogram body stubs. Do not generate any SCO for package,
6144 task, or protected body stubs.
6146 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6148 * sem_ch3.adb: Further improvement to ASIS mode for anonymous
6149 access to protected subprograms.
6151 2013-01-02 Robert Dewar <dewar@adacore.com>
6153 * par_sco.adb, vms_data.ads: Minor reformatting.
6155 2013-01-02 Thomas Quinot <quinot@adacore.com>
6157 * par_sco.adb (Traverse_Declarations_Or_Statement): Function
6158 form, returning value of Current_Dominant upon exit, for chaining
6160 (Traverse_Declarations_Or_Statement.Traverse_One, case
6161 N_Block_Statement): First statement is dominated by last declaration.
6162 (Traverse_Subprogram_Or_Task_Body): Ditto.
6163 (Traverse_Package_Declaration): First private
6164 declaration is dominated by last visible declaration.
6165 (Traverse_Sync_Definition): Ditto.
6167 2013-01-02 Thomas Quinot <quinot@adacore.com>
6169 * gnat_rm.texi: Restrict the requirement for Scalar_Storage_Order
6170 matching Bit_Order to record types only, since array types do not
6173 2013-01-02 Vincent Celier <celier@adacore.com>
6175 * gnat_ugn.texi: Remove documentation of -gnateO, which is an
6177 * usage.adb: Indicate that -gnateO is an internal switch.
6179 2013-01-02 Thomas Quinot <quinot@adacore.com>
6181 * par_sco.adb: Add SCO generation for task types and single
6183 * get_scos.adb: When adding an instance table entry for a
6184 non-nested instantiation, make sure the Enclosing_Instance is
6187 2013-01-02 Hristian Kirtchev <kirtchev@adacore.com>
6189 * sem_attr.adb (Analyze_Attribute): Skip the special _Parent
6190 scope generated for subprogram inlining purposes while trying
6191 to locate the enclosing function.
6192 * sem_prag.adb (Analyze_Pragma): Preanalyze the boolean
6193 expression of pragma Postcondition when the pragma comes from
6194 source and appears inside a subprogram body.
6196 2013-01-02 Thomas Quinot <quinot@adacore.com>
6198 * switch-c.adb, fe.h, back_end.adb: Enable generation of instantiation
6199 information in debug info unconditionally when using -fdump-scos,
6200 instead of relying on a separate command line switch -fdebug-instances.
6201 * gcc-interface/Make-lang.in: Update dependencies.
6203 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6205 * sem_ch12.adb: Additional refinement of predicate.
6207 2013-01-02 Vincent Celier <celier@adacore.com>
6209 * vms_data.ads: Remove incorrect spaces at end of descriptions
6210 of qualifiers for single switch.
6212 2013-01-02 Ben Brosgol <brosgol@adacore.com>
6214 * gnat_rm.texi: Minor edits / wordsmithing in section on pragma
6215 Check_Float_Overflow.
6217 2013-01-02 Thomas Quinot <quinot@adacore.com>
6219 * sprint.adb (Sprint_Node_Actual): Do not add extra parens for
6220 a conditional expression (CASE or IF expression) that already
6221 has parens. Also omit ELSE keyword for an IF expression without
6224 2013-01-02 Thomas Quinot <quinot@adacore.com>
6226 * gnat1drv.adb (Adjust_Global_Switches): Adjust back-end
6227 flag_debug_instances here, after front-end switches have been
6230 2013-01-02 Vincent Celier <celier@adacore.com>
6232 * usage.adb: Minor reformatting.
6234 2013-01-02 Arnaud Charlet <charlet@adacore.com>
6236 * opt.ads: Fix typo.
6238 2013-01-02 Thomas Quinot <quinot@adacore.com>
6240 * par_sco.adb: Generate P decision SCOs for SPARK pragmas
6241 Assume and Loop_Invariant.
6243 2013-01-02 Robert Dewar <dewar@adacore.com>
6245 * vms_data.ads: Add entry for Float_Check_Valid (-gnateF).
6246 * ug_words: Add entry for Float_Check_Overflow.
6247 * usage.adb: Minor reformatting.
6248 * gnat_ugn.texi: Add documentation for -gnateF (Check_Float_Overflow).
6250 2013-01-02 Vincent Celier <celier@adacore.com>
6252 * gnat_ugn.texi: Add documentation for switches -gnateA, -gnated,
6253 -gnateO=, -gnatet and -gnateV.
6254 * ug_words: Add qualifiers equivalent to -gnateA, -gnated,
6255 -gnatet and -gnateV.
6256 * usage.adb: Add lines for -gnatea, -gnateO and -gnatez.
6257 * vms_data.ads: Add new compiler qualifiers /ALIASING_CHECK
6258 (-gnateA), /DISABLE_ATOMIC_SYNCHRONIZATION (-gnated),
6259 /PARAMETER_VALIDITY_CHECK (-gnateV) and /TARGET_DEPENDENT_INFO
6262 2013-01-02 Robert Dewar <dewar@adacore.com>
6264 * checks.adb (Apply_Scalar_Range_Check): Implement Check_Float_Overflow.
6265 * opt.ads, opt.adb: Handle flags Check_Float_Overflow[_Config].
6266 * par-prag.adb: Add dummy entry for pragma Check_Float_Overflow.
6267 * sem_prag.adb: Implement pragma Check_Float_Overflow.
6268 * snames.ads-tmpl: Add entries for pragma Check_Float_Overflow.
6269 * switch-c.adb: Recognize -gnateF switch.
6270 * tree_io.ads: Update ASIS version number.
6271 * gnat_rm.texi: Add documentation of pragma Check_Float_Overflow.
6273 2013-01-02 Robert Dewar <dewar@adacore.com>
6275 * checks.adb, exp_ch4.adb, exp_ch6.adb, exp_ch7.adb, exp_ch9.adb,
6276 exp_disp.adb, exp_dist.adb, exp_intr.adb, exp_prag.adb, exp_util.adb,
6277 freeze.adb, gnat1drv.adb, inline.adb, layout.adb, lib-xref.adb,
6278 par-ch10.adb, par-labl.adb, par-load.adb, par-util.adb, restrict.adb,
6279 sem_ch13.adb, sem_ch4.adb, sem_ch6.adb, sem_dim.adb, sem_elab.adb,
6280 sem_res.adb, sem_warn.adb, sinput-l.adb: Add tags to warning messages.
6281 * sem_ch6.ads, warnsw.ads, opt.ads: Minor comment updates.
6283 2013-01-02 Robert Dewar <dewar@adacore.com>
6285 * err_vars.ads: Minor comment fix.
6287 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6289 * sem_ch12.adb: Refine predicate.
6291 2013-01-02 Robert Dewar <dewar@adacore.com>
6293 * errout.ads: Minor comment fixes.
6294 * opt.ads: Minor comment additions.
6295 * exp_aggr.adb: Add tags to warning messages
6296 * exp_ch11.adb, exp_ch3.adb, exp_ch4.adb, exp_util.adb, sem_aggr.adb,
6297 sem_attr.adb, sem_case.adb, sem_cat.adb, sem_ch3.adb, sem_ch4.adb,
6298 sem_ch5.adb, sem_disp.adb, sem_dist.adb, sem_elab.adb, sem_eval.adb,
6299 sem_intr.adb, sem_mech.adb, sem_prag.adb, sem_res.adb, sem_util.adb,
6300 sem_warn.adb: Add tags to warning messages
6302 2013-01-02 Doug Rupp <rupp@adacore.com>
6304 * init.c [VMS] Remove subtest on reason mask for ACCVIO that is a C_E.
6306 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6308 * sem_ch12.adb: Recover source name for renamed packagea.
6310 2013-01-02 Robert Dewar <dewar@adacore.com>
6312 * errout.adb (Set_Msg_Insertion_Warning): Correct typo causing
6313 tests to fail if insertion sequence is at end of message string.
6314 * opt.ads: Minor comment fixes and additions.
6315 * sem_ch7.adb, sem_ch8.adb, sem_ch9.adb, sem_ch10.adb, sem_ch11.adb,
6316 sem_ch12.adb, sem_ch13.adb: Add tags to warning messages.
6317 * sem_ch6.ads, sem_ch6.adb (Cannot_Inline): Deal with warning message
6318 tags. Add tags to warning messages.
6320 2013-01-02 Robert Dewar <dewar@adacore.com>
6322 * err_vars.ads (Warning_Doc_Switch): New flag.
6323 * errout.adb (Error_Msg_Internal): Implement new warning flag
6324 doc tag stuff (Set_Msg_Insertion_Warning): New procedure.
6325 * errout.ads: Document new insertion sequences ?? ?x? ?.x?
6326 * erroutc.adb (Output_Msg_Text): Handle ?? and ?x? warning doc
6328 * erroutc.ads (Warning_Msg_Char): New variable.
6329 (Warn_Chr): New field in error message object.
6330 * errutil.adb (Error_Msg): Set Warn_Chr in error message object.
6331 * sem_ch13.adb: Minor reformatting.
6332 * warnsw.adb: Add handling for -gnatw.d and -gnatw.D
6333 (Warning_Doc_Switch).
6334 * warnsw.ads: Add handling of -gnatw.d/.D switches (warning
6337 2013-01-02 Robert Dewar <dewar@adacore.com>
6339 * opt.ads: Minor reformatting.
6341 2013-01-02 Doug Rupp <rupp@adacore.com>
6343 * init.c: Reorganize VMS section.
6344 (scan_condtions): New function for scanning condition tables.
6345 (__gnat_handle_vms_condtion): Use actual exception name for imported
6346 exceptions vice IMPORTED_EXCEPTION.
6347 Move condition table scanning into separate function. Move formerly
6348 special handled conditions to system condition table. Use SYS$PUTMSG
6349 output to fill exception message field for formally special handled
6350 condtions, in particular HPARITH to provide more clues about cause and
6351 location then raised from the translated image.
6353 2013-01-02 Thomas Quinot <quinot@adacore.com>
6355 * sem_ch13.adb (Analyze_Aspect_Specifications): For a Pre/Post
6356 aspect that applies to a library subprogram, prepend corresponding
6357 pragma to the Pragmas_After list, in order for split AND THEN
6358 sections to be processed in the expected order.
6360 2013-01-02 Thomas Quinot <quinot@adacore.com>
6362 * exp_prag.adb (Expand_Pragma_Check): The statements generated
6363 for the pragma must have the sloc of the pragma, not the
6364 sloc of the condition, otherwise this creates anomalies in the
6365 generated debug information that confuse coverage analysis tools.
6367 2013-01-02 Thomas Quinot <quinot@adacore.com>
6369 * sem_ch13.adb: Minor reformatting.
6371 2013-01-02 Arnaud Charlet <charlet@adacore.com>
6373 * g-excact.ads (Core_Dump): Clarify that this subprogram does
6374 not dump cores under Windows.
6376 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6378 * sem_ch8.adb (Analyze_Primitive_Renamed_Operation): The prefixed
6379 view of a subprogram has convention Intrnnsic, and a renaming
6380 of a prefixed view cannot be the prefix of an Access attribute.
6382 2013-01-02 Robert Dewar <dewar@adacore.com>
6384 * restrict.adb: Minor reformatting.
6386 2013-01-02 Thomas Quinot <quinot@adacore.com>
6388 * exp_prag.adb: Minor reformatting.
6390 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6392 * sem_ch12.adb (Get_Associated_Node): If the node is an
6393 identifier that denotes an unconstrained array in an object
6394 declaration, it is rewritten as the name of an anonymous
6395 subtype whose bounds are given by the initial expression in the
6396 declaration. When checking whether that identifier is global
6397 reference, use the original node, not the local generated subtype.
6399 2013-01-02 Olivier Hainque <hainque@adacore.com>
6401 * tracebak.c: Revert previous change, incomplete.
6403 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6405 * sem_ch13.adb (Analyze_Aspect_Specifications): If the aspect
6406 appears on a subprogram body that acts as a spec, place the
6407 corresponding pragma in the declarations of the body, so that
6408 e.g. pre/postcondition checks can be generated appropriately.
6410 2013-01-02 Robert Dewar <dewar@adacore.com>
6412 * sem_ch3.adb: Minor reformatting and code reorganization.
6414 2013-01-02 Vincent Celier <celier@adacore.com>
6416 * switch-m.adb (Normalize_Compiler_Switches): Record the
6417 complete switch -fstack-check=specific instead of its shorter
6418 alias -fstack-check.
6420 2013-01-02 Ed Schonberg <schonberg@adacore.com>
6422 * sem_ch3.adb (Derive_Subprogram): Enforce RM 6.3.1 (8):
6423 if the derived type is a tagged generic formal type with
6424 unknown discriminants, the inherited operation has convention
6425 Intrinsic. As such, the 'Access attribute cannot be applied to it.
6427 2013-01-02 Thomas Quinot <quinot@adacore.com>
6429 * sem_attr.adb: Minor reformatting.
6431 2013-01-02 Thomas Quinot <quinot@adacore.com>
6433 * par_sco.adb: Add SCO generation for S of protected types and
6434 single protected object declarations.
6436 2013-01-02 Robert Dewar <dewar@adacore.com>
6438 * sem_eval.adb, osint.ads: Minor reformatting.
6440 2013-01-02 Hristian Kirtchev <kirtchev@adacore.com>
6442 * sem_prag.adb (Analyze_Pragma): Check the legality of pragma Assume.
6444 2013-01-02 Thomas Quinot <quinot@adacore.com>
6446 * sem_eval.adb (Compile_Time_Compare): For static operands, we
6447 can perform a compile time comparison even if in preanalysis mode.
6449 2013-01-02 Thomas Quinot <quinot@adacore.com>
6451 * par_sco.adb (SCO_Record): Always use
6452 Traverse_Declarations_Or_Statements to process the library level
6453 declaration, so that SCOs are properly generated for its aspects.
6455 2013-01-02 Thomas Quinot <quinot@adacore.com>
6457 * scos.ads (In_Decision): Add missing entry for 'a'.
6458 * sem_prag.adb (Analyze_Pragma, case pragma Check): Omit
6459 call to Set_SCO_Pragma_Enabled for Invariant and Predicate.
6460 * sem_ch13.adb: Minor comment update.
6462 Copyright (C) 2013 Free Software Foundation, Inc.
6464 Copying and distribution of this file, with or without modification,
6465 are permitted in any medium without royalty provided the copyright
6466 notice and this notice are preserved.