1 2011-08-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
3 * gcc-interface/Makefile.in (PICFLAG_FOR_TARGET): New.
4 (GNATLIBCFLAGS_FOR_C): Replace
5 TARGET_LIBGCC2_CFLAGS by PICFLAG_FOR_TARGET.
6 (gnatlib-shared-default, gnatlib-shared-dual-win32)
7 (gnatlib-shared-win32, gnatlib-shared-darwin, gnatlib-shared)
8 (gnatlib-sjlj, gnatlib-zcx): Likewise.
10 2011-08-07 Eric Botcazou <ebotcazou@adacore.com>
12 * gcc-interface/Makefile.in (raise-gcc.o): Fix previous change.
14 * gcc-interface/gigi.h (enumerate_modes): Fix formatting.
16 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Revert latest change.
18 2011-08-05 Nicolas Roche <roche@adacore.com>
20 * gcc-interface/Makefile.in: Don't use directly ../xgcc to build shared
21 libgnat. Use rather the value of GCC_FOR_TARGET. Fix issue with
23 * gcc-interface/Make-lang.in: Add support for canadian cross setting.
25 2011-08-05 Matthew Heaney <heaney@adacore.com>
27 * a-comutr.adb, a-cimutr.adb, a-cbmutr.adb (Child_Count, Child_Depth):
28 subprogram bodies declared out-of-order.
30 2011-08-05 Yannick Moy <moy@adacore.com>
32 * sem_util.adb (Unique_Name): only prefix with "standard" the names of
33 entities directly in package Standard, otherwise skip the standard
36 2011-08-05 Robert Dewar <dewar@adacore.com>
38 * a-cbmutr.adb: Minor reformatting
39 (Allocate_Node): refactor node allocation algorithm
41 2011-08-05 Robert Dewar <dewar@adacore.com>
43 * opt.ads, opt.adb (Debug_Pragmas_Disabled): New switch.
44 * sem_prag.adb (Analyze_Pragma, case Debug_Policy): Implement Disable
46 (Analyze_Pragma, case Check_Policy): Ditto.
47 * sem_prag.ads (Check_Disabled): New function
48 * snames.ads-tmpl: Add Name_Disable.
50 2011-08-05 Robert Dewar <dewar@adacore.com>
52 * gnat_rm.texi: Document implementation-defined policy DISABLE for
53 pragmas Assertion_Policy, Check_Policy, Debug_Policy.
55 2011-08-05 Ed Schonberg <schonberg@adacore.com>
57 * sem_prag.adb (Analyze_Pragma, case Inline): reject an Inline pragma
58 that appears in a generic formal part and applies to a formal
61 2011-08-05 Robert Dewar <dewar@adacore.com>
63 * a-cbmutr.ads: Minor reformatting.
65 2011-08-05 Matthew Heaney <heaney@adacore.com>
67 * a-comutr.adb, a-cimutr.adb, a-cbmutr.adb (Read): do not use T'Valid
68 to check count, check sign of value instead.
69 * a-comutr.adb, a-cimutr.adb (Write): return immediately if tree empty
70 (Copy_Subtree): allocate copy of source element
71 (Equal_Subtree): compare elements, not access objects
73 2011-08-05 Vincent Celier <celier@adacore.com>
75 * gnat_ugn.texi: Fix VMS alternative.
77 2011-08-05 Thomas Quinot <quinot@adacore.com>
79 * sem_ch11.adb: Add comment.
81 2011-08-05 Robert Dewar <dewar@adacore.com>
83 * exp_util.adb: Minor comment fix.
85 2011-08-05 Robert Dewar <dewar@adacore.com>
87 * scng.adb (Error_Unterminated_String): Improve flag position when
90 2011-08-05 Matthew Heaney <heaney@adacore.com>
92 * Makefile.rtl, impunit.adb: Added a-cbmutr.ad[sb] (bounded multiway
94 * a-cbmutr.ads, a-cbmutr.adb: This is the new Ada 2012 unit for bounded
95 multiway tree containers.
97 2011-08-05 Robert Dewar <dewar@adacore.com>
99 * styleg.adb (Check_Comment): Implement comment spacing of 1 or 2
100 * stylesw.adb: Implement -gnatyC to control comment spacing
101 * stylesw.ads (Style_Check_Comments_Spacing): New switch (set by
103 * usage.adb: Add line for -gnatyC.
105 2011-08-05 Robert Dewar <dewar@adacore.com>
107 * gnat_ugn.texi: Document -gnatyC.
108 * vms_data.ads: Implement COMMENTS1/COMMENTS2 (retaining COMMENTS as a
109 synonym for COMMENTS2).
111 2011-08-05 Robert Dewar <dewar@adacore.com>
113 * par_sco.adb, sem_ch3.adb, scos.ads, a-iteint.ads, sem_ch12.adb,
114 a-cimutr.adb, a-cimutr.ads, sem_util.ads, sem_res.adb, a-fihema.adb,
115 sem_ch4.adb, lib-xref-alfa.adb, exp_disp.adb, a-comutr.adb,
116 a-comutr.ads, lib-xref.adb: Minor reformatting.
118 2011-08-05 Robert Dewar <dewar@adacore.com>
120 * sem_ch11.adb (Analyze_Raise_Statement): Kill assignment to formal
121 warning if there is an exception handler present.
123 2011-08-05 Pascal Obry <obry@adacore.com>
125 * a-iteint.ads: Fix copyright year.
127 2011-08-05 Thomas Quinot <quinot@adacore.com>
129 * par_sco.adb (Traverse_Declarations_Or_Statements): Do not generate a
130 statement SCO for a USE clause or a representation clause.
132 2011-08-05 Yannick Moy <moy@adacore.com>
134 * lib-xref-alfa.adb (Collect_ALFA): generate the proper relation
135 between body and spec for stub.
136 (Detect_And_Add_ALFA_Scope): take into account subprogram stub
137 * lib-xref.adb (Enclosing_Subprogram_Or_Package): in the case of a
138 pragma precondition or postcondition, for which the enclosing
139 subprogram or package in the AST is not the desired one, return empty.
141 2011-08-05 Thomas Quinot <quinot@adacore.com>
143 * g-expect.adb: Minor reformatting.
145 2011-08-05 Bob Duff <duff@adacore.com>
147 * a-fihema.adb: Comment out OS_Lib.
149 2011-08-05 Matthew Heaney <heaney@adacore.com>
151 * Makefile.rtl, impunit.adb: Added a-c[oi]mutr.ad[sb]
152 (unbounded multiway tree containers) and a-iteint.ads.
153 * a-comutr.ads, a-comutr.adb:
154 This is the new Ada 2012 unit for unbounded multiway tree containers
155 * a-cimutr.ads, a-cimutr.adb
156 This is the new Ada 2012 unit for indefinite multiway tree containers
157 * a-iteint.ads: New file.
159 2011-08-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
161 * gcc-interface/Makefile.in (raise-gcc.o): Search $(srcdir)/../libgcc.
163 2011-08-05 Bob Duff <duff@adacore.com>
165 * sinfo.ads, sinfo.adb (Subpool_Handle_Name): New attribute for
167 * par-ch4.adb (P_Allocator): Parse new subpool specification syntax.
169 2011-08-05 Ed Schonberg <schonberg@adacore.com>
171 * sem_ch4.adb (Try_Container_Indexing): New procedure to implement the
172 general indexing aspects of Ada2012. Called when analyzing indexed
173 components when other interpretations fail.
174 * sem_ch8.adb (Find_Direct_Name): check for implicit dereference only
175 in an expression context where overloading is meaningful. This excludes
176 the occurrence in an aspect specification (efficiency only).
177 * sem_attr.adb (Analyze_Attribute): indicate that the attributes
178 related to iterators can be set by an attribute specification, but
180 * sem_ch13.adb (Analyze_Aspect_Specifications): handle
181 Constant_Indexing and Variable_Indexing.
182 (Check_Indexing_Functions): New procedure to perform legality checks.
183 Additional semantic checks at end of declarations.
185 2011-08-05 Sergey Rybin <rybin@adacore.com>
187 * tree_io.ads: Update ASIS_Version_Number because of the change of the
188 order of calling Tree_Write/Tree_Read routines made for aspects.
190 2011-08-05 Bob Duff <duff@adacore.com>
192 * a-fihema.adb (Finalize): Fix race condition.
194 2011-08-05 Yannick Moy <moy@adacore.com>
196 * sem_ch12.adb (Analyze_Package_Instantiation,
197 Need_Subprogram_Instance_Body): do not generate instance bodies in ALFA
200 2011-08-05 Ed Schonberg <schonberg@adacore.com>
202 * sem_type.adb (Specific_Type): in an instance, the type-specific
203 operand of an equality check that involves null may have a private
204 type. Use full view to determine legality of construct.
206 2011-08-05 Vincent Celier <celier@adacore.com>
208 * gnatcmd.adb (Get_Closure): Do not crash when it is not possible to
209 delete or close the file when the call to gnatmake was successful.
211 2011-08-05 Yannick Moy <moy@adacore.com>
213 * gnat1drv.adb (Adjust_Global_Switches): in ALFA mode, set
214 Global_Discard_Names.
216 2011-08-05 Ed Schonberg <schonberg@adacore.com>
218 * sinfo.ads: comments on use of entity field for aspect specifications.
220 2011-08-05 Ed Schonberg <schonberg@adacore.com>
222 * sem_ch12.adb (Reset_Entity): If the entity field of the associated
223 node is not itself an entity but a selected component, it is a
224 rewritten parameterless call to an en enclosing synchronized operation,
225 and this expansion will be performed again in the instance, so there is
226 no global information to preserve.
228 2011-08-05 Javier Miranda <miranda@adacore.com>
230 * exp_disp.adb (Set_All_DT_Position): Cleanup code and improve support
231 for renamings of predefined primitives.
232 (In_Predef_Prims_DT): New subprogram.
234 2011-08-05 Ed Schonberg <schonberg@adacore.com>
236 * sem_util.adb, sem_util.ads (Check_Implicit_Dereference): If a
237 possible interpretation of name is a reference type, add an
238 interpretation that is the designated type of the reference
239 discriminant of that type.
240 * sem_res.adb (resolve): If the interpretation imposed by context is an
241 implicit dereference, rewrite the node as the deference of the
242 reference discriminant.
243 * sem_ch3.adb (Analyze_Subtype_Declaration, Build_Derived_Record_Type,
244 Build_Discriminated_Subtype): Inherit Has_Implicit_Dereference from
245 parent type or base type.
246 * sem_ch4.adb (Process_Indexed_Component,
247 Process_Overloaded_Indexed_Component, Indicate_Name_And_Type,
248 Analyze_Overloaded_Selected_Component, Analyze_Selected_Component):
249 Check for implicit dereference.
250 (List_Operand_Interps): Indicate when an implicit dereference is
252 * sem_ch8.adb (Find_Direct_Name): Check for implicit dereference.
254 2011-08-05 Thomas Quinot <quinot@adacore.com>
256 * scos.ads: Update documentation of SCO table. Pragma statements can now
257 be marked as disabled (using 'p' instead of 'P' as the statement kind).
258 * par_sco.ads, par_sco.adb: Implement the above change.
259 (Process_Decisions_Defer): Generate a P decision for the first parameter
260 of a dyadic pragma Debug.
261 * sem_prag.adb (Analyze_Pragma, case Debug): Mark pragma as enabled if
263 * put_scos.adb: Code simplification based on above change.
265 2011-08-05 Robert Dewar <dewar@adacore.com>
267 * sem_ch3.adb, gnatcmd.adb, switch-c.adb, exp_attr.adb, make.adb,
268 bindgen.adb, einfo.adb, sem_ch12.adb, sem_attr.adb, a-fihema.adb,
269 a-fihema.ads, sem_elab.adb, sem_elab.ads, aspects.adb, opt.ads,
270 prj-conf.adb, sem_ch13.adb, s-ficobl.ads: Minor reformatting
272 2011-08-05 Bob Duff <duff@adacore.com>
274 * a-stunau.ads, g-spipat.adb: Update comments.
276 2011-08-05 Bob Duff <duff@adacore.com>
278 * a-fihema.ads: Minor comment fix.
279 * a-fihema.adb (Allocate, Deallocate): Assert that the alignment is
281 (Attach, Detach): Remove some unnecessary code.
282 (Finalize): Remove Node_Ptr_To_Address, replace with a constant.
284 2011-08-05 Bob Duff <duff@adacore.com>
286 * a-fihema.ads, a-fihema.adb (Finalization_Collection): Avoid heap
287 allocation for Objects component. This simplifies the code somewhat. It
288 is also a little more efficient in the not-so-unusual case where there
289 are no controlled objects allocated.
290 Make Finalization_Started flag atomic.
291 (Finalize): Avoid unnecessary detachment of items from the list.
292 (pcol): Minor cleanup.
294 2011-08-05 Ed Schonberg <schonberg@adacore.com>
296 * sem_ch12.adb (Analyze_Formal_Package_Declaration): reject a formal
297 package whose name is the same as that of the generic unit, or its
300 2011-08-05 Bob Duff <duff@adacore.com>
302 * a-fihema.adb, a-fihema.ads: Minor comment improvements.
303 * sem_ch3.adb, exp_ch5.adb, exp_ch7.adb, exp_ch7.ads, exp_util.adb:
306 2011-08-05 Arnaud Charlet <charlet@adacore.com>
308 * make.adb (Linking_Phase): No longer need to set source search path
309 before calling gnatlink in CodePeer mode.
310 * gnatlink.adb (Gnatlink): No longer pass -gnat83/95/05/12 switch to
311 gcc in CodePeer mode, since the binder generated file no longer has a
313 * switch.ads, switch.adb (Is_Language_Switch): Removed.
314 * switch-c.adb: Update comment.
316 2011-08-05 Thomas Quinot <quinot@adacore.com>
318 * exp_strm.adb, bindgen.adb, s-ficobl.ads: Minor reformatting.
320 2011-08-05 Nicolas Roche <roche@adacore.com>
322 * gnat_ugn.texi: Fix minor syntax error issue.
324 2011-08-05 Vincent Celier <celier@adacore.com>
326 * gnatcmd.adb (Get_Closure): Do not crash when it is not possible to
327 delete or close the file when the call to gnatmake returns a non
328 successful return code.
330 2011-08-05 Ed Schonberg <schonberg@adacore.com>
332 * exp_ch4.adb (Expand_N_Type_Conversion): When expanding a predicate
333 check, indicate that the copy of the original node does not come from
334 source, to prevent an infinite recursion of the expansion.
336 2011-08-05 Johannes Kanig <kanig@adacore.com>
338 * debug.adb: document switch -gnatd.G for gnat2why, which deactivates
339 VC generation for subprogram bodies.
341 2011-08-05 Yannick Moy <moy@adacore.com>
344 * sem_ch3.adb (Signed_Integer_Type_Declaration): in ALFA mode, define
345 the base type with the smallest allowed base type.
347 2011-08-05 Sergey Rybin <rybin@adacore.com>
349 * tree_gen.adb, tree_in.adb, aspects.adb: Fix tree read-write for
352 2011-08-05 Ed Schonberg <schonberg@adacore.com>
354 * sem_ch12.ads: minor comment updates.
356 2011-08-05 Ed Schonberg <schonberg@adacore.com>
358 * sem_ch12.adb (Analyze_Formal_Package_Declaration): in an
359 instantiation and a formal package the compiler generates a package
360 renaming declaration so that the generic name within the declaration
361 is interpreted as a renaming of the instance. At the end of a formal
362 package declaration, this renaming must become invisible.
364 2011-08-05 Hristian Kirtchev <kirtchev@adacore.com>
366 * exp_ch7.adb (Is_Init_Call): Reimplemented to avoid character
367 comparison and rely on concrete entities instead.
369 2011-08-05 Ed Schonberg <schonberg@adacore.com>
371 * einfo.ads, einfo.adb (Has_Implicit_Dereference): new flag on types
372 and discriminants, to indicate that the type has an access discriminant
373 that supports implicit dereference.
374 * snames.ads-tmpl: Add names of aspects and attributes related to
375 Ada2012 iterators: constant_indexing, default_iterator,
376 iterator_element, implicit_dereference, variable_indexing.
377 * aspects.ads, aspects.adb: entries for iterator-related aspects.
378 * sem_ch13.adb (Analyze_aspect_specifications): dummy entries for
379 iterator-related aspects.
380 * sem_attr.adb, exp_attr.adb Dummy entries for iterator-related aspects.
382 2011-08-05 Sergey Rybin <rybin@adacore.com>
384 * gnat_ugn.texi, vms_data.ads: Extend the subsection about coupling
385 metrics in gnatmetric to cover new kinds of coupling mentrics.
387 2011-08-05 Steve Baird <baird@adacore.com>
389 * bindgen.adb (Gen_CodePeer_Wrapper): Call Ada_Main_Program instead
390 of calling the user-defined main subprogram.
391 (Gen_Main): Declare Ada_Main_Program and (if CodePeer_Mode
392 is set) Call_Main_Subprogram ahead of, as opposed to
394 (Gen_Output_File_Ada): Remove CodePeer_Mode-conditional
395 generation of a "with" of the user-defined main subprogram.
396 Remove CodePeer_Mode-conditional call to Gen_CodePeer_Wrapper
397 (which is now called from Gen_Main instead).
399 2011-08-05 Emmanuel Briot <briot@adacore.com>
401 * projects.texi: Added reference to the Makefile package.
403 2011-08-05 Thomas Quinot <quinot@adacore.com>
405 * exp_ch7.adb: Minor comment rewording.
407 2011-08-05 Ed Falis <falis@adacore.com>
409 * env.c: Fix comment.
411 2011-08-05 Hristian Kirtchev <kirtchev@adacore.com>
413 * sem_elab.adb (Is_Finalization_Procedure): Reimplemented to avoid
414 character comparison and rely on concrete entities instead.
416 2011-08-05 Ed Schonberg <schonberg@adacore.com>
418 * sem_ch3.adb: (Check_Private_Overriding): better error message,
419 suggested by AI95-0068.
421 2011-08-05 Hristian Kirtchev <kirtchev@adacore.com>
423 * exp_ch7.adb (Find_Last_Init): Use Next_Suitable_Statement to retrieve
424 the two potential initialization calls. This accounts for any
425 access-before-elaboration checks which may precede the initialization
427 (Next_Suitable_Statement): New routine. Returns the next real statement
428 after the input node while skipping generated checks.
429 * sem_elab.adb (Check_A_Call): New formal parameter In_Init_Proc along
430 with comment on usage.
431 Do not generate Elaborate_All when the trigger is a finalization call
432 coming from a type init proc.
433 (Check_Elab_Call): Propagate the initialization procedure context to
434 subsequent calls to Check_A_Call.
435 (Check_Internal_Call_Continue): Propagate the initialization procedure
436 context to subsequent calls to Check_Elab_Call.
437 (Is_Finalization_Procedure): New routine. Returns True if the input
438 entity denotes a [Deep_]Finalize routine.
439 * sem_elab.ads (Check_Elab_Call): New formal parameter In_Init_Proc
440 along with comment on usage.
442 2011-08-05 Vadim Godunko <godunko@adacore.com>
444 * s-atocou.ads: Add list of supported platforms.
446 2011-08-05 Yannick Moy <moy@adacore.com>
448 * sem_prag.adb, restrict.adb: Correct style for or'ing Boolean variables
450 * opt.ads (Disable_ALI_File): new Boolean flag
451 * lib-writ.adb (Write_ALI): when Disable_ALI_File is set, do nothing
453 2011-08-05 Ed Falis <falis@adacore.com>
455 * env.c (__gnat_environ): Fix includes for RTPs and VTHREADS so that
456 environ is properly defined.
458 2011-08-05 Vincent Celier <celier@adacore.com>
460 * make.adb (Compilation_Phase): Exit immediately when all objects have
461 been found up to date, to avoid multiple exit messages.
462 * prj-nmsc.adb (Add_Source): Allow duplicate source file names in the
463 same project for languages with no compiler.
464 * gnat_ugn.texi: Document compiler switch -gnateI and gnatmake switch
466 2011-08-05 Robert Dewar <dewar@adacore.com>
468 * exp_ch7.ads, sem_type.adb, make.adb, sem_prag.adb, sem_util.adb,
469 sem_util.ads, sem_attr.adb, restrict.ads, sem_ch6.adb, prj-conf.adb,
470 prj-conf.ads, s-atocou.ads, s-atocou.adb, s-atocou-x86.adb,
471 s-atocou-builtin.adb: Minor reformatting.
473 2011-08-05 Yannick Moy <moy@adacore.com>
475 * exp_ch7.adb (Establish_Transient_Scope): in formal verification mode,
476 if the node to wrap is a pragma check, this node and enclosed
477 expression are not expanded, so do not apply any transformations here.
478 * exp_prag.adb (Expand_Pragma_Check): document the need to avoid
479 introducing transient scopes.
481 2011-08-05 Jose Ruiz <ruiz@adacore.com>
483 * adaint.c (__gnat_set_writable, __gnat_set_readable,
484 __gnat_set_executable, __gnat_set_non_writable, __gnat_set_non_readable,
485 __gnat_copy_attribs): On VxWorks 6.x and later, the required chmod
486 routine is available, so we use the default implementation of these
488 * s-os_lib.ads (Copy_File, Copy_Time_Stamps): Document that there is
489 support for copying attributes on VxWorks 6.
491 2011-08-05 Yannick Moy <moy@adacore.com>
493 * debug.adb: Remove use of -gnatd.D.
494 * gnat1drv.adb (Adjust_Global_Switches): adjust switches for ALFA mode
495 * opt.ads: Simplify variables for ALFA mode, to keep one only
496 * restrict.adb, sem_prag.adb: Adapt treatment done for CodePeer mode
499 2011-08-05 Vincent Celier <celier@adacore.com>
501 * prj-conf.adb (Do_Autoconf): Look also for --RTS in
502 Builder'Default_Switches.
504 2011-08-05 Vincent Celier <celier@adacore.com>
506 * makeusg.adb: Add lines for --create-map-file switches.
508 2011-08-05 Ed Schonberg <schonberg@adacore.com>
510 * freeze.adb (Freeze_Entity): For a subprogram, if a type in the
511 profile is incomplete and the full view is available, replace it with
513 * sem_ch6.adb (Possible_Freeze): if a type in the profile is
514 incomplete, freezing the subprogram is delayed until the full view is
516 * sem_type.adb (Disambiguate): an ambiguity between a user-defined
517 fixed-point multiplication operator and the predefined operator is
518 resolved in favor of the user-defined one.
520 2011-08-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
522 * init.c [__alpha__ && __osf__] (__gnat_error_handler): Use
525 2011-08-04 Ed Schonberg <schonberg@adacore.com>
527 * sem_util.ads, sem_unit.adb (Type_Without_Stream_Operation): determine
528 whether a type lacks user-defined Read or Write operations, or has a
529 component that lacks them.
530 * sem_attr.adb (Check_Stream_Attribute): if restriction
531 No_Default_Stream_Attributes is active, verify that all subcomponent
532 types of the target have user-defined stream operations, and report
534 * exp_ch3.adb (Stream_Operqtion_OK): use Type_Without_Stream_Operation.
535 * exp_strm.adb: Build_Elementary_Input_Call,
536 Build_Elementary_Write_Call): remove checks for restriction
537 No_Default_Stream_Attributes, now checked in semantics.
539 2011-08-04 Vincent Celier <celier@adacore.com>
541 * prj-conf.ads, prj-conf.adb (Do_Autoconf): If there is no --RTS
542 switches on the command line, look for all valid --RTS switches in the
543 Builder switches and for each language use the first runtime name found
545 (Get_Or_Create_Configuration_File): Warn if --RTS is specified on the
546 command line and there is no auto-configuration.
547 (Runtime_Name_Set_For): New function.
549 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
551 * exp_ch7.adb (Build_Object_Declarations): Do not generate the
552 elaborate initialization expression for variable Abort when processing
553 a package body or a declaration.
554 (Create_Finalizer): Propagate the package context when creating the
555 exception-related variables.
556 * exp_ch7.ads (Build_Object_Declarations): New formal parameter
557 For_Package along with usage comment.
559 2011-08-04 Arnaud Charlet <charlet@adacore.com>
561 * gcc-interface/Makefile.in: Clean up targets.
562 Enable new package for atomic counters and copy-on-write implementation
563 of unbounded strings on x86 platforms.
564 * gcc-interface/Make-lang.in: Update dependencies.
566 2011-08-04 Robert Dewar <dewar@adacore.com>
568 * exp_ch7.adb: Minor reformatting.
570 2011-08-04 Robert Dewar <dewar@adacore.com>
572 * exp_strm.adb: Minor reformatting.
574 2011-08-04 Vadim Godunko <godunko@adacore.com>
576 * s-atocou.adb: Replace by dummy version and use on targets where atomic
577 operations are not supported.
578 * s-atocou-builtin.adb: Renamed from s-atocou.adb.
579 * s-atocou-x86.adb: New file.
580 * Makefile.rtl: Add s-atocou.o file
582 2011-08-04 Arnaud Charlet <charlet@adacore.com>
584 * make.adb (Compile): Move setting of CodePeer_Mode to ...
585 (Compilation_Phase): ... here.
586 (Scan_Make_Arg): Now bind and link by default in CodePeer mode.
588 2011-08-04 Thomas Quinot <quinot@adacore.com>
590 * Make-generated.in: Fix minor typo in comment.
592 2011-08-04 Thomas Quinot <quinot@adacore.com>
594 * gnatls.adb: Use Prj.Env.Initialize_Default_Project_Path to retrieve
597 2011-08-04 Robert Dewar <dewar@adacore.com>
599 * a-coinho.adb: Minor reformatting.
601 2011-08-04 Robert Dewar <dewar@adacore.com>
603 * a-coinho.ads: Minor reformatting.
605 2011-08-04 Vadim Godunko <godunko@adacore.com>
607 * s-atocou.ads, s-atocou.adb: New files.
608 * a-strunb-shared.ads, a-strunb-shared.adb, a-stwiun-shared.ads,
609 a-stwiun-shared.adb, a-stzunb-shared.ads, a-stzunb-shared.adb: Remove
610 direct use of GCC's atomic builtins and replace them by use of new
611 atomic counter package.
613 2011-08-04 Ed Schonberg <schonberg@adacore.com>
615 * exp_strm.adb: better error message for No_Default_Stream_Attributes.
617 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
619 * a-tags.adb (Unregister_Tag): Replace the complex address arithmetic
620 with a call to Get_External_Tag.
621 * exp_ch7.adb (Build_Cleanup_Statements): Update the comment on
622 subprogram usage. Remove the guard against package declarations and
623 bodies since Build_Cleanup_Statements is no longer invoked in that
625 (Build_Components): Initialize Tagged_Type_Stmts when the context
626 contains at least one library-level tagged type.
627 (Build_Finalizer): New local variables Has_Tagged_Types and
628 Tagged_Type_Stmts along with associated comments on usage. Update the
629 logic to include tagged type processing.
630 (Create_Finalizer): Insert all library-level tagged type unregistration
631 code before the jump block circuitry.
632 (Expand_N_Package_Body): Remove the call to Build_Cleanup_Statements.
633 (Expand_N_Package_Declaration): Remove the call to
634 Build_Cleanup_Statements.
635 (Process_Tagged_Type_Declaration): New routine. Generate a call to
636 unregister the external tag of a tagged type.
637 (Processing_Actions): Reimplemented to handle tagged types.
638 (Process_Declarations): Detect the declaration of a library-level
639 tagged type and carry out the appropriate actions.
640 (Unregister_Tagged_Types): Removed. The machinery has been directly
641 merged with Build_Finalizer.
643 2011-08-04 Robert Dewar <dewar@adacore.com>
645 * bindgen.ads, gnatlink.adb, sem_ch4.adb, gnatbind.adb, put_alfa.adb,
646 gnatls.adb, exp_ch3.adb: Minor reformatting.
648 2011-08-04 Marc Sango <sango@adacore.com>
650 * sem_attr.adb (Analyze_Attribute): Replace the message
651 "invisible attribute of}" of the spark restriction violation in
652 attribute reference by the simple message "invisible attribute of type".
653 Indeed, the node value Error_Msg_Node_1 used is in conflit with the
654 two insertion characters: '&' and '}'.
656 2011-08-04 Vadim Godunko <godunko@adacore.com>
658 * impunit.adb (Non_Imp_File_Names_12): Add "a-coinho".
659 * a-coinho.ads, a-coinho.adb: New file.
660 * Makefile.rtl: Add Ada.Containers.Indefinite_Holders.
662 2011-08-04 Nicolas Roche <roche@adacore.com>
664 * alfa_test.adb: Not all ali files are containing alfa information even
665 if compiled with -gnatd.F. So suppress warning about missing ALFA
668 2011-08-04 Yannick Moy <moy@adacore.com>
670 * lib-xref-alfa.adb (Add_ALFA_Scope): use non-empty unique name for
672 * put_alfa.adb: Check that scope name is not empty.
674 2011-08-04 Ed Schonberg <schonberg@adacore.com>
676 * exp_ch3.adb (Stream_Operation_Ok): new predicate
677 Needs_Elementary_Stream_Operation, to determine whether user-defined
678 Read and Write attributes are available for the elementary components
679 of the given type. If only the predefined attributes are available,
680 then when restriction No_Default_Stream_Attributes is active the
681 predefined stream attributes for the composite type cannot be created.
683 2011-08-04 Robert Dewar <dewar@adacore.com>
685 * bindgen.adb: Fix obsolete comments and names from Ada/C days.
686 Put routines in alpha order
688 2011-08-04 Jose Ruiz <ruiz@adacore.com>
690 * gcc-interface/Makefile.in: Remove xenomai specific versions of system.
691 * gcc-interface/Make-lang.in: Update dependencies.
693 2011-08-04 Arnaud Charlet <charlet@adacore.com>
695 * gcc-interface/lang.opt: Add AdaWhy language, simimlar to Ada.
696 * gcc-interface/lang-specs.h: Add handling of AdaWhy specs (calls
699 2011-08-04 Robert Dewar <dewar@adacore.com>
701 * sem_ch3.adb, make.adb, a-cohata.ads, sem_prag.adb, makeutl.adb,
702 lib-xref-alfa.adb: Minor reformatting.
704 2011-08-04 Marc Sango <sango@adacore.com>
706 * sem_ch12.adb (Analyze_Generic_Package_Declaration,
707 Analyze_Generic_Subprogram_Declaration, Analyze_Package_Instantiation,
708 Analyze_Subprogram_Instantiation): Check absence of generic in SPARK
711 2011-08-04 Tristan Gingold <gingold@adacore.com>
713 * bindgen.adb (Gen_Adainit_C): Remove.
714 (Gen_Adafinal_C): Ditto.
715 (Gen_Elab_Externals_C): Ditto.
716 (Gen_Elab_Calls_C): Ditto.
717 (Gen_Elab_Order_C): Ditto.
718 (Gen_Elab_Defs_C): Ditto.
719 (Gen_Finalize_Library_C): Ditto.
720 (Gen_Finalize_Library_Defs_C): Ditto.
722 (Gen_Output_File_C): Ditto.
723 (Gen_Restrictions_C): Ditto.
724 (Gen_Versions_C): Ditto.
725 (Write_Info_Ada_C): Ditto.
726 (Gen_Object_Files_Options): Call WBI instead of Write_Info_Ada_C
727 (Gen_Output_File): Do not force Ada_Bind_File anymore.
728 Always call Gen_Output_File_Ada.
729 * gnatlink.adb (Begin_Info): Now a constant.
731 (Ada_Bind_File): Remove
732 (Process_Args): Do not handle -A/-C. Remove not Ada_Bind_File cases.
733 * switch-b.adb (Scan_Binder_Switches): Do not handle -C.
734 * gnatbind.adb (Gnatbind): Remove not Ada_Bind_File cases.
735 * opt.ads (Ada_Bind_File): Remove.
737 2011-08-04 Thomas Quinot <quinot@adacore.com>
739 * projects.texi: Document target-specific directory in default project
742 2011-08-04 Thomas Quinot <quinot@adacore.com>
744 * gnatls.adb, prj-env.adb: Add $prefix/share/gpr to default project
747 2011-08-04 Yannick Moy <moy@adacore.com>
749 * sem_ch3.adb, sem_ch5.adb, sem_util.adb, sem_ch4.adb, sem_ch8.adb,
750 opt.ads, lib-xref.ads: Code clean up.
752 2011-08-04 Yannick Moy <moy@adacore.com>
754 * gnat_rm.texi: Update description of Test_Case
755 * gnat_ugn.texi: Typo.
757 2011-08-04 Ed Falis <falis@adacore.com>
759 * adaint.c (__gnat_get_number_of_cpus): fix typo in last checkin.
761 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
763 * exp_ch4.adb (Suitable_Element): Skip field _parent on .NET/JVM when
764 it is of type Root_Controlled. This action eliminates fields Prev and
765 Next from type equality.
767 2011-08-04 Yannick Moy <moy@adacore.com>
769 * lib-xref-alfa.adb: Correct typo.
771 2011-08-04 Matthew Heaney <heaney@adacore.com>
773 * a-cohata.ads (Hash_Table_Type): default-initialize the Nodes
776 2011-08-04 Yannick Moy <moy@adacore.com>
778 * sem_prag.adb (Check_Arg_Is_String_Literal): remove useless procedure
779 (Analyze_Pragma): allow static string expression for name of Test_Case,
780 instead of simply string literals.
781 * sem_util.adb (Get_Name_From_Test_Case_Pragma): adapt to static string
784 2011-08-04 Vincent Celier <celier@adacore.com>
786 * makeutl.adb (Complete_Mains.Find_File_Add_Extension): Use canonical
787 case suffixes to find truncated main sources.
789 2011-08-04 Tristan Gingold <gingold@adacore.com>
791 * impunit.adb (Non_Imp_File_Names_95): Add g-tastus.
792 s-stusta.adb (Compute_All_Task): Use Put_Line instead of Put.
793 (Compute_Current_Task): Ditto.
795 2011-08-04 Tristan Gingold <gingold@adacore.com>
797 * gnat_ugn.texi: Mention GNAT.Task_Stack_Usage.
799 2011-08-04 Yannick Moy <moy@adacore.com>
801 * lib-xref-alfa.adb (Is_Global_Constant): new function that detects
802 library-level constant.
803 (Add_ALFA_Xrefs): ignore global constants in ALFA xref.
804 * sem_res.adb (Resolve_Actuals): do not add cross-reference to Formal
805 used as selector of parameter association, in ALFA mode.
807 2011-08-04 Robert Dewar <dewar@adacore.com>
809 * exp_ch5.adb, exp_ch7.adb, exp_util.adb, bindgen.adb, sem_prag.adb,
810 s-tassta.adb, exp_ch4.adb, exp_disp.adb, s-stausa.adb: Minor
813 2011-08-04 Arnaud Charlet <charlet@adacore.com>
815 * make.adb (Linking_Phase): Set source search path before calling
816 gnatlink in CodePeer mode.
818 2011-08-04 Javier Miranda <miranda@adacore.com>
820 * exp_ch7.adb (Expand_N_Package_Body, Expand_N_Package_Declaration):
821 Remove code which takes care of building TSDs.
822 * rtsfind.ads (RE_Check_Interface_Conversion): New entity.
823 * exp_ch4.adb (Apply_Accessibility_Check): Add support for generating
824 the accessibility check in VM targets.
825 * exp_disp.adb (Make_VM_TSD): Spec moved to exp_disp.ads
826 (Building_Static_DT): Now returns false for VM targets.
827 (Build_VM_TSDs): Removed.
828 (Expand_Interface_Conversion): Generate missing runtime check for
829 conversions to interface types whose target type is unknown at compile
831 (Make_VM_TSD): Add missing code to disable the generation of calls to
832 Check_TSD if the tagged type is not defined at library level, or not
833 has a representation clause specifying its external tag, or -gnatdQ is
835 * exp_disp.ads (Build_VM_TSDs): Removed.
836 (Make_VM_TSDs): Spec relocated from exp_disp.adb
837 * sem_disp.adb (Check_Dispatching_Operation): No code required to
838 register primitives in the dispatch tables in VM targets.
839 * exp_ch3.adb (Expand_N_Object_Declaration): Remove wrong expansion of
840 initialization of class-wide interface objects in VM targets.
841 (Expand_Freeze_Record_Type): For VM targets call Make_VM_TSD (instead
844 2011-08-04 Jerome Lambourg <lambourg@adacore.com>
846 * gnatlink.adb (Gnatlink): Correct missleading error message displayed
847 when dotnet-ld cannot be found.
849 2011-08-04 Arnaud Charlet <charlet@adacore.com>
851 * bindgen.adb: Simplify significantly generation of binder body file in
853 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Prevent assert failure
854 when compiling binder generated file in CodePeer mode (xxx'Elab_Spec
857 2011-08-04 Yannick Moy <moy@adacore.com>
859 * sem_prag.adb, sem.ads: Code cleanup.
861 2011-08-04 Tristan Gingold <gingold@adacore.com>
863 * s-tassta.adb (Task_Wrapper): Rewrite the dynamic stack usage part.
864 * s-stausa.adb, s-stausa.ads: Major rewrite. Now provides accurate
866 * s-stusta.adb (Print): Adjust after changes in s-stausa.
867 * gnat_ugn.texi: Update dynamic stack usage section.
869 2011-08-04 Steve Baird <baird@adacore.com>
871 * bindgen.adb (Gen_CodePeer_Wrapper): new procedure.
872 Generate (if CodePeer_Mode is set) a "wrapper" subprogram which
873 contains only a call to the user-defined main subprogram.
874 (Gen_Main_Ada) - If CodePeer_Mode is set, then
875 call the "wrapper" subprogram instead of directly
876 calling the user-defined main subprogram.
878 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
880 * exp_ch5.adb (Expand_N_Case_Statement): Check the statements of all
881 alternatives of a case statement for controlled objects. Rename local
882 variable A to Dead_Alt.
883 (Expand_N_If_Statement): Check the then and else statements of an if
884 statement for controlled objects. Check the then statements of all
885 elsif parts of an if statement for controlled objects.
886 (Expand_N_Loop_Statement): Check the statements of a loop for controlled
888 * exp_ch7.adb (Process_Transient_Objects): Rewrite the condition which
889 detects a loop associated with the expansion of an array object.
890 Augment the processing of the loop statements to account for a possible
891 wrap done by Process_Statements_For_Controlled_Objects.
892 * exp_ch9.adb (Expand_N_Asynchronous_Select): Check the triggering
893 statements and abortable part of an asynchronous select for controlled
895 (Expand_N_Conditional_Entry_Call): Check the else statements of a
896 conditional entry call for controlled objects.
897 (Expand_N_Selective_Accept): Check the alternatives of a selective
898 accept for controlled objects.
899 (Expand_N_Timed_Entry_Call): Check the entry call and delay
900 alternatives of a timed entry call for controlled objects.
901 * exp_ch11.adb (Expand_Exception_Handlers): Check the statements of an
902 exception handler for controlled objects.
903 * exp_util.adb (Requires_Cleanup_Actions (List_Id, Boolean, Boolean)):
904 Add formal parameter Nested_Constructs along with its associated
906 (Requires_Cleanup_Actions (Node_Id)): Update all calls to
907 Requires_Cleanup_Actions.
908 (Process_Statements_For_Controlled_Objects): New routine.
909 * exp_util.ads (Process_Statements_For_Controlled_Objects): New
910 routine. Inspect a node which contains a non-handled sequence of
911 statements for controlled objects. If such an object is found, the
912 statements are wrapped in a block.
914 2011-08-04 Bob Duff <duff@adacore.com>
916 * sem_type.adb (Covers): If T2 is a subtype of a class-wide type, we
917 need to compare with Class_Wide_Type (T2), in order to get at the
918 original class-wide type node.
919 * sem_type.ads (Covers): Improve the comment.
920 * einfo.ads (Class_Wide_Type): Improve the comment.
921 * exp_intr.adb (Expand_Unc_Deallocation): Remove unnecessary setting of
922 the type of the Deref.
924 2011-08-04 Yannick Moy <moy@adacore.com>
926 * gnat_rm.texi: Document that Test_Case pragma can only appear on
927 separate declarations.
928 * sem_prag.adb (procedure Check_Identifier_Is_One_Of): new procedure to
929 check identifier of pragma argument.
930 (Chain_TC): check that no other test case associated to the same entity
932 (Check_Test_Case): disallow test case inside subprogram body
933 (Analyze_Pragma): correct call to check identifier and not argument
934 * sem_util.adb, sem_util.ads (Get_Name_From_Test_Case_Pragma): new
935 function gets name from test case pragma.
937 2011-08-04 Yannick Moy <moy@adacore.com>
939 * gnat_rm.texi: Document new pragma and aspect.
940 * aspects.adb, aspects.ads (Aspect_Id): new value Aspect_Test_Case
941 (No_Duplicates_Allowed): new constant array defining whether duplicates
942 aspects of each kind can appear on the same declaration.
943 * einfo.adb, einfo.ads (Spec_PPC_List): replace field with Contract
944 field, which points to a node holding the previous Spec_PPC_List.
945 * exp_ch9.adb, sem_ch6.adb, sem_prag.adb: Reach to Spec_PPC_List
946 through the indirection with Contract.
947 * exp_util.adb (Insert_Actions): raise Program_Error on N_Contract node
948 * par-prag.adb (Prag): do nothing on Test_Case pragma
949 * sem.adb (Analyze): abort on N_Contract, on which Analyze should not
951 * sem_attr.adb (Analyze_Attribute): allow attribute 'Result in
952 component Ensures of Test_Case.
953 * sem_ch12.adb, sem_ch6.adb, sem_ch9.adb
954 (Analyze_Generic_Subprogram_Declaration,
955 Analyze_Subprogram_Instantiation,
956 Analyze_Abstract_Subprogram_Declaration,
957 Analyze_Subprogram_Body_Helper,
958 Analyze_Subprogram_Specification, Analyze_Entry_Declaration):
959 insert contract in subprogram node at point of definition
961 (Aspect_Loop): do not raise error on duplicate Test_Case aspect
962 (Analyze_Aspect_Specifications): analyze Test_Case aspect and create
964 (Check_Aspect_At_Freeze_Point): raise Program_Error on Test_Case aspect
965 * sem_ch3.adb (Analyze_Declarations): insert analysis of test-cases,
966 similar to the analysis of pre/post
967 (Derive_Subprogram): insert contract in subprogram node at point of
969 * sem_prag.adb, sem_prag.ads
970 (Check_Arg_Is_String_Literal, Check_Identifier):
971 new checking procedures to be called in treatment of pragmas
972 (Check_Test_Case): new procedure to check that a Test_Case aspect or
973 pragma is well-formed. This does not check currently that 'Result is
974 used only in the Ensures component of a Test_Case.
975 (Analyze_Pragma): add case for Test_Case
976 (Analyze_TC_In_Decl_Part): pre-analyze the Requires and Ensures
977 components of a Test_Case.
978 (Preanalyze_TC_Args): new procedure to preanalyze the boolean
979 expressions in the 3rd (and 4th if present) arguments of a Test_Case
980 pragma, treated as spec expressions.
981 (Sig_Flags): add value -1 for Test_Case.
982 * sem_util.adb, sem_util.ads (Get_Ensures_From_Test_Case_Pragma,
983 Get_Requires_From_Test_Case_Pragma): getters for both expression
984 components of a Test_Case.
985 * sinfo.adb, sinfo.ads (N_Contract): new kind of node used as
986 indirection between an entry or [generic] subprogram entity and its
987 pre/post + test-cases.
988 (Spec_PPC_List, Spec_TC_List, Set_Spec_PPC_List, Set_Spec_TC_List):
989 get/set for fields of an N_Contract node.
990 * snames.ads-tmpl (Name_Test_Case, Name_Ensures, Name_Mode,
991 Name_Normal, Name_Requires, Name_Robustness, Pragma_Test_Case): new
992 names and pragma for Test_Case.
993 * sprint.adb (Sprint_Node): raise Program_Error on N_Contract node
995 2011-08-04 Vincent Celier <celier@adacore.com>
997 * gnat_ugn.texi: Improve documentation of gnatmake switch
1000 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1002 * exp_ch7.adb (Make_Final_Call): Add local variable Atyp (assertion
1003 type). Initialize Atyp to the appropriate type which is later checked
1004 for completion. Rewrite the assertion associated with private type
1007 2011-08-04 Ed Falis <falis@adacore.com>
1009 * adaint.c: Add call to vxCpuConfiguredGet for VxWorks SMP to
1010 initialize the number of CPUs.
1012 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1014 * sem_type.adb (Disambiguate): New subsidiary routine
1015 In_Same_Declaration_List, to implement AI05-0020: a user-defined
1016 equality on an anonymous access type whose designated type is private
1017 does not lead to an ambiguity with the universal access equality
1018 operator in the body or child units of the defining package. The same
1019 is true for a multiplication operator on a private type completed with
1022 2011-08-04 Javier Miranda <miranda@adacore.com>
1024 * opt.ads (Init_Or_Norm_Scalars_Config): Removed.
1025 (Normalize_Scalars_Config): Removed.
1027 (Register_Opt_Config_Switches): Remove registering config values of
1028 Init_Or_Norm_Scalars_Config and Normalize_Scalars_Config.
1029 (Restore_Opt_Config_Switches): Remove code which restores the values of
1030 Init_Or_Norm_Scalars and Normalize_Scalars. Recalculate value of
1031 Init_Or_Norm_Scalars.
1032 (Save_Opt_Config_Switches): Remove code which saves values of
1033 Init_Or_Norm_Scalars and Normalize_Scalars.
1034 (Set_Opt_Config_Switches): Remove code which restores config values of
1035 Init_Or_Norm_Scalars and Normalize_Scalars. Recalculate value of
1036 Init_Or_Norm_Scalars.
1038 2011-08-04 Yannick Moy <moy@adacore.com>
1040 * frontend.adb (Frontend): remove previous patch to avoid full
1041 qualification in ALFA mode.
1042 * lib-xref-alfa.adb (Add_ALFA_Xrefs): use unique name for variables.
1043 * sem_util.adb, sem_util.ads (Unique_Name): new function to define a
1044 unique name for an entity, which could be used to identify the entity
1045 across compilation units.
1047 2011-08-04 Thomas Quinot <quinot@adacore.com>
1050 (Initialize_Default_Project_Path): Add target specific directory
1051 ($prefix/$target/lib/gnat) in front of project path in all cases
1052 (making gnatmake's behaviour consistent with gprbuild).
1053 * gnatcmd.adb, make.adb, prj-makr.adb, clean.adb:
1054 Pass target name from Sdefault to project subsystem.
1055 * gnatls.adb: Show new target specific default project directory.
1057 2011-08-04 Johannes Kanig <kanig@adacore.com>
1059 * cstand.adb: Add Information to Identifier in Standard
1060 (Identifer_For): Set Entity to the corresponding entity
1062 2011-08-04 Sergey Rybin <rybin@adacore.com>
1064 * gnat_ugn.texi: Update doc on gnatcheck.
1066 2011-08-04 Yannick Moy <moy@adacore.com>
1068 * lib-xref-alfa.adb (Add_ALFA_Xrefs): correct definition of ranges of
1071 2011-08-04 Yannick Moy <moy@adacore.com>
1073 * exp_prag.adb (Expand_Pragma_Check): in ALFA mode, return without
1074 performing expansion.
1075 * sem_ch6.adb (Analyze_Subprogram_Body_Helper,
1076 Analyze_Generic_Subprogram_Body): protect call to Process_PCCs so that
1077 it is not called in ALFA mode.
1079 2011-08-04 Emmanuel Briot <briot@adacore.com>
1081 * make.adb, osint.adb, osint.ads (Reset_Command_Line_Files): not used
1082 after all, so removed.
1084 2011-08-04 Sergey Rybin <rybin@adacore.com>
1086 * vms_data.ads: Add missing VMS qualifiers.
1088 2011-08-04 Emmanuel Briot <briot@adacore.com>
1090 * make.adb, makeutl.adb, osint.adb, osint.ads (Check_Mains): rebuild
1091 the list of files on the command line after processing it through
1094 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1096 * exp_ch7.adb (Build_Raise_Statement): Remove the specialized
1097 processing for .NET/JVM. These targets can now benefit from
1098 Raise_From_Controlled_Operation and they share the same processing with
1100 (Establish_Transient_Scope): Remove the restriction for .NET/JVM.
1101 These targets need transient scopes in order to properly finalize short
1102 lived controlled objects.
1103 (Make_Handler_For_Ctrl_Operation): Remove the specialized processing for
1104 NET/JVM. These targets can now benefit from
1105 Raise_From_Controlled_Operation and they share the same processing with
1108 2011-08-04 Geert Bosch <bosch@adacore.com>
1110 * tracebak.c (STOP_FRAME): Stop at any next pointer outside the stack
1112 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1114 * exp_aggr.adb (Has_Visible_Private_Ancestor): subsidiary routine to
1115 Expand_Record_Aggregate, to determine whether aggregate must be
1116 expanded into assignments. This is the case if the ancestor part is
1117 private, regarless of the setting of the flag Has_Private_Ancestor.
1119 2011-08-04 Ed Falis <falis@adacore.com>
1121 * vxaddr2line.adb: Add support for e500v2 and for Linux hosts
1123 2011-08-04 Bob Duff <duff@adacore.com>
1125 * sinfo.ads: Fix comment.
1127 2011-08-04 Steve Baird <baird@adacore.com>
1129 * bindgen.adb (Get_Ada_Main_Name): If CodePeer_Mode is set, then
1130 choose a package name in much the same way as is
1131 done for JGNAT when VM_Target /= No_VM, except that
1132 a slightly more distinctive prefix string is used.
1134 2011-08-04 Emmanuel Briot <briot@adacore.com>
1136 * makeutl.adb (Complete_Mains): no longer accept unit names on the
1137 gnatmake command line.
1138 This behavior was never documented (and was supported only because of
1139 an early bug in the code). This case might lead to ambiguous cases
1140 (between unit names and truncated base names without suffixes).
1142 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1144 * a-tags.ads, a-tags.adb (Unregister_Tag): New routine.
1145 Remove the external tag of a tagged type from the internal hash table.
1146 * exp_ch7.adb (Build_Cleanup_Statements): Update the comment on the
1147 expanded usage of the routine. Strenghten the check for Is_Master. Add
1148 processing for tagged types.
1149 (Build_Finalizer): Create all the necessary lists used in finalizer
1150 creation when the processed context is a package that may contain
1152 (Expand_Cleanup_Actions): Rename the call to Has_Controlled_Objects to
1153 Requires_Cleanup_Actions.
1154 (Expand_N_Package_Body): Package bodies may need clean up code
1155 depending on whether they contain tagged types.
1156 (Expand_N_Package_Declaration): Package declarations may need clean up
1157 code depending on whether they contain tagged types.
1158 (Unregister_Tagged_Types): New routine. Search through a list of
1159 declarations or statements, looking for non-abstract Ada tagged types.
1160 For each such type, generate code to unregister the external tag.
1161 * exp_util.adb (Has_Controlled_Objects (Node_Id)): Renamed to
1162 Requires_Cleanup_Actions.
1163 (Requires_Cleanup_Actions (List_Id, Boolean)): New routine. Search
1164 through a list of declarations or statements looking for non-abstract
1165 Ada tagged types or controlled objects.
1166 * exp_util.ads (Has_Controlled_Objects (Node_Id)): Renamed to
1167 Requires_Cleanup_Actions.
1168 (Has_Controlled_Objects (List_Id, Boolean)): Removed.
1169 * rtsfind.ads: Add entry RE_Unregister_Tag to tables RE_Id and
1172 2011-08-04 Vincent Celier <celier@adacore.com>
1174 * prj-env.adb (For_All_Source_Dirs.For_Project): Check if project Prj
1175 has Ada sources, not project Project, because if the root project
1176 Project has no sources of its own, all projects will be deemed without
1179 2011-08-04 Gary Dismukes <dismukes@adacore.com>
1181 * bindgen.adb (Gen_Adainit_Ada): Move the generation of the declaration
1182 of the No_Param_Proc acc-to-subp type used for initialization of
1183 __gnat_finalize_library_objects so that it's declared at library level
1184 rather than nested inside of the adainit routine.
1186 2011-08-04 Javier Miranda <miranda@adacore.com>
1188 * exp_disp.adb (Make_DT): Generate code to check the external tag ONLY
1189 if the tagged type has a representation clause which specifies its
1192 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1194 * einfo.ads, einfo.adb (Has_Private_Ancestor): now a flag on types.
1195 Remove previous procedure with that name.
1196 * sem_ch3.adb (Build_Derived_Record_Type): set Has_Private_Ancestor
1198 * sem_aggr.adb (Resolve_Extension_Aggregate): if the ancestor part is a
1199 subtype mark, the ancestor cannot have unknown discriminants.
1200 (Resolve_Record_Aggregate): if the type has invisible components
1201 because of a private ancestor, the aggregate is illegal.
1203 2011-08-04 Vincent Celier <celier@adacore.com>
1205 * switch-m.adb (Normalize_Compiler_Switches): Recognize and take into
1206 account switches -gnat2005, -gnat12 and -gnat2012.
1208 2011-08-04 Bob Duff <duff@adacore.com>
1210 * s-tasdeb.ads: Minor comment fix.
1212 2011-08-04 Arnaud Charlet <charlet@adacore.com>
1214 * gnatlink.adb (Gnatlink): Pass -gnat83/95/05/12 switch to gcc in
1216 * switch.ads, switch.adb (Is_Language_Switch): New function.
1218 2011-08-04 Vincent Celier <celier@adacore.com>
1220 * switch-c.adb: Minor comment addition.
1222 2011-08-04 Vincent Celier <celier@adacore.com>
1224 * vms_conv.adb (Process_Argument): Fail graciously when qualifier
1225 ending with '=' is followed by a space (missing file name).
1227 2011-08-04 Pascal Obry <obry@adacore.com>
1229 * g-regist.ads: Fix size of HKEY on x86_64-windows.
1231 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1233 * sem_ch12.adb (Analyze_Associations): New routine
1234 Check_Overloaded_Formal_Subprogram to reject a formal package when
1235 there is a named association or a box initialisation for an overloaded
1236 formal subprogram of the corresponding generic.
1238 2011-08-04 Yannick Moy <moy@adacore.com>
1240 * alfa.ads (ALFA_Xref_Record): add component for type of entity
1241 * get_alfa.adb, put_alfa.adb: Read and write new component of
1243 * lib-xref-alfa.adb (Collect_ALFA): generate new component.
1245 2011-08-04 Pascal Obry <obry@adacore.com>
1247 * urealp.adb: Minor reformatting.
1249 2011-08-04 Tristan Gingold <gingold@adacore.com>
1251 * exp_ch7.adb (build_finalizer.process_declarations.processing_actions):
1252 Handle the case when Cleanup_Protected_Object returns Empty.
1254 2011-08-04 Yannick Moy <moy@adacore.com>
1256 * frontend.adb (Frontend): only qualify names in non-ALFA mode
1258 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1260 * sem_ch4.adb (Try_Class_Wide_Operation): if the context is a procedure
1261 call, ignore functions.
1263 2011-08-04 Geert Bosch <bosch@adacore.com>
1265 * urealp.adb (Equivalent_Decimal_Exponent): Avoid the use of floating
1268 2011-08-04 Emmanuel Briot <briot@adacore.com>
1270 * makeutl.adb (Compute_Builder_Switches): no longer accept a unit name
1271 as an index for Builder'Switches. This conforms to the documentation.
1272 * make.adb (Insert_Project_Sources): avoid duplicate code
1274 2011-08-04 Emmanuel Briot <briot@adacore.com>
1276 * makeutl.adb (Complete_Mains): if the user has passed a relative file
1277 name on the command line (for instance "../dummy"), never assume it can
1280 2011-08-04 Tristan Gingold <gingold@adacore.com>
1282 * bindgen.adb: Remove code the reference or create the
1283 Break_Start/__gnat_break_start procedure.
1284 * s-stalib.adb (Break_Start): Removed.
1286 2011-08-04 Emmanuel Briot <briot@adacore.com>
1288 * make.adb, makeutl.adb, makeutl.ads (Compute_Builder_Switches): now
1289 shared with gprbuild.
1291 2011-08-04 Yannick Moy <moy@adacore.com>
1293 * par-ch4.adb (P_Primary): preferentially issue an error message about
1294 a missing parenthesis arount a conditional or case expression in Ada
1295 2012 mode, if we detect that the alignment is not correct for a
1298 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1300 * exp_ch7.adb (Process_Declarations): Do not consider the result of a
1301 tag-to-class-wide conversion as needing finalization actions.
1302 * exp_util.adb (Has_Controlled_Objects): Do not consider the result of
1303 a tag-to-class-wide conversion as needing finalization actions.
1304 (Is_Finalizable_Transient): The result of a tag-to-class-wide
1305 conversion does not need finalization actions.
1306 (Is_Tag_To_CW_Conversion): New routine.
1307 * exp_util.ads (Is_Tag_To_CW_Conversion): New routine. Determines
1308 whether an object is the result of a tag-to-class-wide conversion.
1310 2011-08-04 Yannick Moy <moy@adacore.com>
1312 * sem_ch13.adb (Analyze_Aspect_Specifications): correct order in which
1313 the left-hand-side and right-hand-side of a conjunct are inserted when
1314 translating a pre- or postcondition
1315 * sem_ch6.adb: Correct typo in comment
1317 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1319 * gnat_rm.texi: Ravenscar does not prohibit dependence on
1320 Unchecked_Conversion and Unchecked_Deallocation.
1322 2011-08-04 Thomas Quinot <quinot@adacore.com>
1324 * make.adb: Minor reformatting.
1326 2011-08-04 Emmanuel Briot <briot@adacore.com>
1328 * prj.adb, prj.ads, makeutl.adb (Complete_Mains): search for the
1329 sources in the project and its imported projects, but not in the whole
1332 2011-08-04 Emmanuel Briot <briot@adacore.com>
1334 * make.adb: Remove debug trace.
1336 2011-08-04 Vincent Celier <celier@adacore.com>
1338 * makeutl.adb (Do_Complete): Get the absolute path name of a relative
1339 path in canonical form, to be able to compare path names on platforms
1340 such as Windows or Darwin.
1342 2011-08-04 Thomas Quinot <quinot@adacore.com>
1344 * par_sco.adb (Traverse_Declarations_Or_Statements.Set_Statement_Entry):
1345 For a pragma (statement with C1 = 'P'), record the sloc of the pragma.
1346 * scos.ads: Update documentation accordingly.
1347 * put_scos.adb (Output_SCO_Line): Omit statement SCOs for disabled
1350 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1352 * sem_attr.adb (Bad_Attribute_For_Predicate): flag illegal use of
1353 attribute only if prefix type is scalar.
1355 2011-08-04 Emmanuel Briot <briot@adacore.com>
1357 * make.adb, makeutl.adb, prj-env.adb (Check_Mains): put back support
1358 in gnatmake for specifying mains on the command line that do not belong
1359 to the main project. These mains must currently all belong to the same
1361 (Ultimate_Extension_Of): removed, since duplicated
1362 Ultimate_Extending_Project.
1364 2011-08-04 Arnaud Charlet <charlet@adacore.com>
1366 * make.adb (Do_Codepeer_Globalize_Step): Removed. Use CodePeer_Mode
1368 (CodePeer_Mode_String): New.
1369 (Linking_Phase, Binding_Phase): Call gnatlink with -P switch in
1371 (Scan_Make_Arg): Do not disable binding/linking phase in CodePeer mode.
1372 * bindgen.adb (Gen_Elab_Calls_Ada): Ignore subprograms in CodePeer
1373 mode, since no useful elaboration subprogram is needed by CodePeer.
1374 * gnatlink.adb (Gnatlink): Add support for -P switch (CodePeer mode).
1375 In this mode, compile binder file with -gnatC and do stop after this
1378 2011-08-04 Vincent Celier <celier@adacore.com>
1380 * exp_ch7.adb: Minor comment fix.
1382 2011-08-04 Robert Dewar <dewar@adacore.com>
1384 * exp_ch7.adb, make.adb, sem_ch10.adb, bindgen.adb, sem_res.adb,
1385 exp_ch4.adb, makeutl.adb: Minor reformatting.
1387 2011-08-04 Emmanuel Briot <briot@adacore.com>
1389 * make.adb, makeutl.adb, makeutl.ads (Make): major refactoring.
1390 Create several new subprograms to move code out of Make. This makes the
1391 code more readable, removes code duplication, and is a preparation work
1392 for adding support for aggregate projects.
1394 2011-08-04 Tristan Gingold <gingold@adacore.com>
1396 * s-po32gl.ads, s-po32gl.adb: New files.
1397 * exp_ch7.ads (Get_Global_Pool_For_Access_Type): New function.
1398 * exp_ch7.adb (Get_Global_Pool_For_Access_Type): New function.
1399 (Build_Finalization_Collection): Use it.
1400 * exp_ch4.adb (Complete_Controlled_Allocation): Ditto.
1401 * rtsfind.ads: System_Pool_32_Global, Re_Global_Pool_32_Object: New
1403 * gcc-interface/Makefile.in: Use s-po32gl.o on VMS.
1404 * gcc-interface/Make-lang.in: Update dependencies.
1406 2011-08-04 Emmanuel Briot <briot@adacore.com>
1408 * makeutl.adb (Complete_Mains): add support for specs with no suffix on
1411 2011-08-04 Emmanuel Briot <briot@adacore.com>
1413 * make.adb, makeutl.adb (Complete_Mains): if a main specified on the
1414 command line is not a file name, also check whether it could be a unit
1417 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
1419 * bindgen.adb (Gen_Finalize_Library_Ada): Factor out code to generate
1420 the header of the finalization routine.
1421 If the unit has no finalizer but is a body whose spec has one, then
1422 generate the decrement of the elaboration entity only.
1423 If the unit has a finalizer and is a spec, then do not generate the
1424 decrement of the elaboration entity.
1425 (Gen_Finalize_Library_C): Likewise.
1427 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1429 * exp_ch7.adb (Alignment_Of): New subsidiary routine.
1430 (Bounds_Size_Expression): Removed.
1431 (Double_Alignment_Of): New subsidiary routine.
1432 (Make_Finalize_Address_Stmts): New local variable Index_Typ. Account
1433 for a hole in the dope vector of unconstrained arrays due to different
1434 index and element alignments.
1436 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1438 * sem_res.adb (Resolve_Allocator): diagnose task allocator that will
1439 raise program_error because body has not been seen yet.
1441 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1443 * sem_ch10.adb (Analyze_With_Clause): Protect against child unit with
1446 2011-08-04 Vincent Celier <celier@adacore.com>
1448 * makeutl.adb (Do_Complete): Check absolute paths in canonical forms
1450 2011-08-04 Yannick Moy <moy@adacore.com>
1452 * alfa.adb, alfa.ads (Unique_Defining_Entity): move function from here
1453 * sem_util.adb, sem_util.ads (Unique_Defining_Entity): ...to here
1455 2011-08-04 Thomas Quinot <quinot@adacore.com>
1457 * sem_ch12.adb (Analyze_Package_Instantiation): Do not omit body for
1458 instantiation in RCI.
1460 2011-08-04 Emmanuel Briot <briot@adacore.com>
1462 * make.adb: Share more code with gprbuild
1464 2011-08-04 Emmanuel Briot <briot@adacore.com>
1466 * projects.texi: Added documentation for the IDE'Gnat project file
1469 2011-08-04 Nicolas Roche <roche@adacore.com>
1471 * gnat_rm.texi: Minor editing.
1473 2011-08-04 Javier Miranda <miranda@adacore.com>
1475 * bindgen.adb (Gen_Adafinal_Ada): Do not differentiate the main case
1476 and the library case for VM targets.
1477 (Gen_Adainit_Ada): Likewise.
1479 2011-08-04 Robert Dewar <dewar@adacore.com>
1481 * g-altive.ads: Minor comment updates.
1482 * prj-nmsc.adb: Minor reformatting.
1484 2011-08-04 Javier Miranda <miranda@adacore.com>
1487 (Normalize_Scalars_Config): Value of the configuration switch set by
1488 pragma Normalize_Scalars when it appears in the gnat.adc file.
1489 (Normalize_Scalars): New field for record Config_Switches_Type. Used
1490 to save and restore settings of this pragma.
1492 (Register_Opt_Config_Switches, Save_Opt_Config_Switches,
1493 Restore_Opt_Config_Switches): Add missing support for Normalize_Scalars.
1495 2011-08-04 Vincent Celier <celier@adacore.com>
1497 * gnat_ugn.texi: Document gnatlink options -M and -M=mapfile
1499 2011-08-04 Arnaud Charlet <charlet@adacore.com>
1501 * makeutl.adb: Minor reformatting.
1503 2011-08-04 Olivier Hainque <hainque@adacore.com>
1505 * g-altive.ads: Update comments to reflect that only the soft
1506 binding is available today.
1508 2011-08-04 Robert Dewar <dewar@adacore.com>
1510 * bindgen.adb, einfo.adb, sem_ch12.adb, s-tasren.adb, sem_res.adb,
1511 makeutl.adb, prj-nmsc.adb, opt.ads, prj-env.adb: Minor reformatting
1512 * gcc-interface/Make-lang.in: Update dependencies.
1514 2011-08-04 Arnaud Charlet <charlet@adacore.com>
1516 * prj-env.adb: Remove local debug traces.
1518 2011-08-04 Yannick Moy <moy@adacore.com>
1520 * checks.adb (Apply_Float_Conversion_Check): correct a typo where Lo_OK
1521 was used instead of Hi_OK, which could cause a read of an uninitialized
1522 value later on. Detected while working on the new warning.
1523 * exp_ch9.adb (Expand_N_Entry_Declaration): remove useless assignment
1525 * sem_ch5.adb (Analyze_Assignment): set the last assignment component
1526 in more cases, in order to detect more unreferenced values.
1527 * sem_util.adb, sem_util.ads (Get_Enclosing_Object): return enclosing
1528 object for expression, if any.
1530 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
1532 * exp_intr.adb (Expand_Binary_Operator_Call): Look at the RM size of
1533 the operand types instead of the Esize.
1535 2011-08-04 Steve Baird <baird@adacore.com>
1537 * switch-b.adb (Scan_Binder_Switches): Add -P binder switch, used to
1538 enable CodePeer_Mode.
1539 * bindusg.adb (Display): Add help message describing -P binder switch.
1540 * gnat_ugn.texi: Document -P binder switch.
1541 * bindgen.adb (Gen_Main_Ada): If CodePeer_Mode is set, then call the
1542 user-defined main program directly.
1543 (Gen_Output_File_Ada): If CodePeer_Mode is set, generate a with of the
1544 user-defined main program in the context clause of the package body.
1546 2011-08-04 Yannick Moy <moy@adacore.com>
1548 * alfa.adb, alfa.ads (Get_Entity_For_Decl): remove function, partial
1549 duplicate of Defining_Entity
1550 (Get_Unique_Entity_For_Decl): rename function into
1551 Unique_Defining_Entity
1552 * einfo.adb, einfo.ads (Is_In_ALFA, Body_Is_In_ALFA): remove flags
1553 (Formal_Proof_On): remove synthesized flag
1554 * cstand.adb, sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb,
1555 sem_ch5.adb, sem_ch6.adb, sem_ch9.adb, sem_res.adb, sem_util.adb,
1556 sem_util.ads, stand.ads: Remove treatment associated to entities in ALFA
1557 * sem_prag.adb (Analyze_Pragma): remove special treatment for pragma
1558 Annotate (Formal_Proof)
1560 2011-08-04 Emmanuel Briot <briot@adacore.com>
1562 * prj-env.adb (Create_Config_Pragmas_File): fix handling of multi-unit
1563 source files with non-standard naming schemes, in imported projects
1565 2011-08-04 Emmanuel Briot <briot@adacore.com>
1567 * makeutl.adb (Complete_Mains): when a multi-unit source file is
1568 specified on the gprbuild command line, we need to compile all units
1569 within that file, not just the first one we find
1570 Fix error message for mains that are not found.
1572 2011-08-04 Thomas Quinot <quinot@adacore.com>
1574 * sem_ch6.adb: Update comment.
1575 * sem_ch12.adb: Minor reformatting.
1577 2011-08-04 Bob Duff <duff@adacore.com>
1579 * s-tasren.adb (Task_Do_Or_Queue): Previous code was reading
1580 Acceptor.Terminate_Alternative without locking Acceptor, which causes a
1581 race condition whose symptom is to fail to lock Parent. That, in turn,
1582 causes Parent.Awake_Count to be accessed without locking Parent, which
1583 causes another race condition whose symptom is that Parent.Awake_Count
1584 can be off by 1 (either too high or too low). The solution is to lock
1585 Parent unconditionally, and then lock Acceptor, before reading
1586 Acceptor.Terminate_Alternative.
1588 2011-08-04 Arnaud Charlet <charlet@adacore.com>
1590 * debug.adb: Update comment.
1592 2011-08-04 Robert Dewar <dewar@adacore.com>
1594 * par_sco.adb, exp_util.adb, make.adb, a-tags.adb, sem_prag.adb,
1595 sem_util.adb, sem_attr.adb, exp_ch4.adb, g-comlin.adb, g-comlin.ads,
1596 exp_ch6.adb: Minor reformatting.
1598 2011-08-04 Gary Dismukes <dismukes@adacore.com>
1600 * gnat_ugn.texi: Add sentence about the case of compile-time-detected
1603 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1605 * gnat_rm.texi: update Ravenscar desription to reflect Ada2012 RM.
1607 2011-08-04 Thomas Quinot <quinot@adacore.com>
1609 * sinfo.ads: Minor reformatting.
1611 2011-08-04 Emmanuel Briot <briot@adacore.com>
1613 * makeutl.adb, makeutl.ads, prj-nmsc.adb (Complete_Mains): report error
1614 even if there is no location.
1616 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1618 * sem_res.adb, sem_ch4.adb: move check for restriction
1619 No_Task_Hierarchy to resolve_allocator.
1621 2011-08-04 Thomas Quinot <quinot@adacore.com>
1623 * sinfo.adb, sinfo.ads, sem_prag.adb, sem_ch12.adb (Pragma_Enabled):
1624 This flag of N_Pragma nodes is not used, remove it as well as all of
1625 the associated circuitry.
1627 2011-08-04 Javier Miranda <miranda@adacore.com>
1629 * exp_disp.adb (Make_DT): Switch -gnatdQ disables the generation of the
1630 runtime check on duplicated externa tags
1631 * debug.adb Document switch -gnatdQ.
1633 2011-08-04 Gary Dismukes <dismukes@adacore.com>
1635 * a-fihema.ads: Minor typo fix.
1637 2011-08-04 Yannick Moy <moy@adacore.com>
1639 * sem_ch10.adb: Minor comment update.
1641 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1643 * einfo.adb: Update the node field usage to reflect the renaming of
1644 Return_Flag to Return_ Flag_Or_Transient_Decl.
1645 (Return_Flag): Renamed to Return_Flag_Or_Transient_Decl.
1646 (Set_Return_Flag): Renamed to Set_Return_Flag_Or_Transient_Decl.
1647 (Write_Field15_Name): Change Return_Flag to
1648 Return_Flag_Or_Transient_Decl.
1649 * einfo.ads: Rename node field Return_Flag to
1650 Return_Flag_Or_Transient_Decl. Update the associated comment and all
1651 occurrences in entities.
1652 (Return_Flag): Renamed to Return_Flag_Or_Transient_Decl. Update
1653 associated Inline pragma.
1654 (Set_Return_Flag): Renamed to Set_Return_Flag_Or_Transient_Decl. Update
1655 associated Inline pragma.
1656 * exp_ch4.ads, exp_ch4.adb (Expand_N_Expression_With_Actions): New
1658 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Update the calls to
1659 Return_Flag and Set_Return_Flag.
1660 * exp_ch7.adb (Process_Declarations): Add code to recognize hook
1661 objects generated for controlled transients declared inside an
1662 Exception_With_Actions. Update the calls to Return_Flag.
1663 (Process_Object_Declaration): Add code to add a null guard for hook
1664 objects generated for controlled transients declared inside an
1665 Exception_With_Actions. Update related comment.
1666 * exp_util.adb (Has_Controlled_Objects): Add code to recognize hook
1667 objects generated for controlled transients declared inside an
1668 Exception_With_Actions. Update the calls to Return_Flag.
1669 * expander.adb (Expand): Add new case for N_Expression_With_Actions.
1671 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1673 * sem_util.adb:(Wrong_Type): Improve error message on a one-element
1674 positional aggregate.
1676 2011-08-04 Vincent Celier <celier@adacore.com>
1678 * par_sco.adb (Process_Decisions.Output_Header): Check and record pragma
1679 SLOC only for pragmas.
1681 2011-08-04 Emmanuel Briot <briot@adacore.com>
1683 * projects.texi: Minor typo fix.
1685 2011-08-04 Emmanuel Briot <briot@adacore.com>
1687 * prj-nmsc.adb (Check_File): Minor change to traces, to help debugging
1688 on case-sensitive file systems.
1690 2011-08-04 Thomas Quinot <quinot@adacore.com>
1692 * put_scos.adb (Put_SCOs): Do not emit decision SCO for an X decision
1693 nested in a disabled pragma.
1694 * scos.ads, scos.adb, par_sco.ads, par_sco.adb: Record sloc of
1695 enclosing pragma, if any, for X decisions.
1697 2011-08-04 Thomas Quinot <quinot@adacore.com>
1699 * sem_prag.adb: Minor reformatting.
1701 2011-08-04 Vincent Celier <celier@adacore.com>
1703 * a-tags.adb (Check_TSD): Avoid concatenation of strings, as it is not
1704 allowed in no run time mode.
1706 2011-08-04 Vincent Celier <celier@adacore.com>
1708 * make.adb (Check): When -gnatc is used, check for the source file
1709 inside the ALI file with a canonical case file name.
1711 2011-08-04 Emmanuel Briot <briot@adacore.com>
1713 * g-comlin.adb, g-comlin.ads (Add_Switch): Put back support for
1714 overriding the separator.
1716 2011-08-04 Robert Dewar <dewar@adacore.com>
1718 * sem_aggr.adb, par_sco.adb, sem_type.adb, exp_util.adb, exp_ch9.adb,
1719 prj-nmsc.adb, sem_ch13.adb, exp_strm.adb: Minor reformatting.
1721 2011-08-04 Robert Dewar <dewar@adacore.com>
1723 * gnat_rm.texi: Minor documentation fix for pragma Annotate.
1725 2011-08-04 Yannick Moy <moy@adacore.com>
1727 * sem_attr.adb (Analyze_Attribute): add check during pre-analysis that
1728 'Result only appears in postcondition of function.
1730 2011-08-04 Thomas Quinot <quinot@adacore.com>
1732 * a-tags.adb (Check_TSD): When raising PROGRAM_ERROR for a duplicated
1733 external tag, include the value of the external tag in the exception
1736 2011-08-04 Yannick Moy <moy@adacore.com>
1738 * sem_attr.adb (Result): modify error message for misplaced 'Result
1740 2011-08-04 Sergey Rybin <rybin@adacore.com>
1742 * gnat_rm.texi (pragma Annotate): Fix syntax description to make it
1743 clear that the second argument must be an identifier.
1745 2011-08-04 Thomas Quinot <quinot@adacore.com>
1747 * exp_ch9.adb (Build_Barrier_Function): When compiling with
1748 -fpreserve-control-flow, insert an IF statement on the barrier
1749 condition to ensure that a conditional branch instruction is generated.
1751 2011-08-04 Emmanuel Briot <briot@adacore.com>
1753 * prj-part.adb, prj.adb, prj.ads, prj-tree.ads
1754 (Processing_Flags.Ignore_Missing_With): new flag.
1756 2011-08-04 Emmanuel Briot <briot@adacore.com>
1758 * prj-nmsc.adb (Find_Sources, Path_Name_Of): Fix handling of
1759 Source_List_File on case-insensitive systems where the file is actually
1760 on a case-sensitive file system (NFS,...).
1762 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1764 * sem_ch6.adb (Analyze_Function_Return): In a rare case where a
1765 function return contains a controlled [extension] aggregate and the
1766 return statement is not part of a handled sequence of statements, wrap
1767 the return in a block. This ensures that all controlled temporaries
1768 generated during aggregate resolution will be picked up by the
1769 finalization machinery.
1771 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1773 * sem_aggr.adb (Resolve_Aggregate): If aggregate has box-initialized
1774 components, freeze type before resolution, to ensure that default
1775 initializations are present for all components.
1776 * sem_res.adb (Resolve_Actuals): the designated object of an
1777 accces-to-constant type is a legal actual in a call to an
1778 initialization procedure.
1780 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1782 * exp_util.adb (Extract_Renamed_Object): Add N_Type_Conversion and
1783 N_Unchecked_Type_Conversion to the possible containers of a renamed
1786 2011-08-04 Yannick Moy <moy@adacore.com>
1788 * par-ch13.adb (Aspect_Specifications_Present): recognize
1789 "with Identifier'Class =>" as an aspect, so that a meaningful warning
1790 is issued in Strict mode.
1791 * par.adb: Fix typos in comments.
1793 2011-08-04 Yannick Moy <moy@adacore.com>
1795 * sem_attr.adb (Result): modify error message to take into account Post
1796 aspect when compiling Ada 2012 (or newer) code.
1798 2011-08-04 Nicolas Roche <roche@adacore.com>
1800 * env.c (__gnat_clearenv): Avoid use of dynamic size array in order to
1801 remove need for GCC exceptions.
1803 2011-08-04 Vincent Celier <celier@adacore.com>
1805 * makeutl.adb (Do_Complete): Call Debug_Output with the name of the
1806 project, not the source file name.
1807 * prj.adb (Find_Sources.Look_For_Sources): If the source has been
1808 excluded, continue looking. This excluded source will only be returned
1809 if there is no other source with the same base name that is not locally
1812 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1814 * sem_res.adb (Resolve_Intrinsic_Operator): if the result type is
1815 private and one of the operands is a real literal, use a qualified
1816 expression rather than a conversion which is not meaningful to the
1819 2011-08-04 Yannick Moy <moy@adacore.com>
1821 * sem_ch13.adb (Aspect_Loop): when an aspect X and its classwise
1822 corresponding aspect X'Class are allowed, proceed with analysis of the
1823 aspect instead of skipping it.
1825 2011-08-04 Tristan Gingold <gingold@adacore.com>
1827 * s-flocon.adb, s-flocon.ads: Add a body for s-flocon.ads
1828 This will allow to have an Ada implementation for the subprogram.
1830 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1832 * sem_ch3.adb (Analyze_Full_Type_Declaration): If the declaration is a
1833 completion and aspects are present, apply them to the entity for the
1834 type which is currently the partial view, but which is the one that
1836 * sem_ch13.adb (Analyze_Aspect_Specifications): if the predicate
1837 applies to a partial view, indicate that the full view has predicates
1838 and delayed aspects.
1839 (Replace_Type_Reference): Handle properly predicates that apply to the
1840 full view of a private completion.
1842 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
1844 * layout.adb (Layout_Type): For composite types, do not set Esize.
1845 * freeze.adb (Set_Small_Size): Remove test on alignment and do not
1847 (Size_Known): Look at the RM size of components instead of the Esize.
1848 (Freeze_Record_Type): Look at the RM size instead of the Esize to
1849 issue warning and activate Implicit_Packing.
1850 (Freeze_Entity): Likewise. Do not issue a warning for alias/atomic
1851 if the Esize is not known.
1852 * sem_ch13.adb (Analyze_Attribute_Definition_Clause) <Size>: Set Esize
1853 for elementary types only.
1854 (Analyze_Record_Representation_Clause): Look at the RM size instead
1855 of the Esize to issue errors.
1856 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not set Esize if it
1858 <E_Record_Type>: Look at the RM size instead of the Esize. Remove
1860 Look at the RM size instead of the Esize for types if the latter is
1862 (gnat_to_gnu_field): Use Known_Esize instead of Known_Static_Esize.
1864 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1866 * sem_type.adb: proper handling of equality not involving anonymous
1869 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1871 * exp_ch7.adb (Create_Finalizer): Remove local variables Spec_Nod and
1872 Vis_Decls. When creating a library-level finalizer for a package spec,
1873 both the declaration and body of the finalizer are inserted either in
1874 the visible or private declarations of the package spec.
1876 2011-08-04 Javier Miranda <miranda@adacore.com>
1878 * sem_ch3.adb (Derive_Subprograms): Complete assertion to request the
1879 use of the full-view of a type when invoking Is_Ancestor.
1880 * sem_type.adb (Is_Ancestor): For consistency, when the traversal of
1881 the full-view of private parents is requested, then use also the
1882 full-view of the parent of the first derivation.
1884 2011-08-04 Tristan Gingold <gingold@adacore.com>
1886 * s-taprop-vxworks.adb (Enter_Task): Use System.Float_Control.Reset
1887 instead of the locally imported procedure.
1888 * s-taprop-mingw.adb (Enter_Task): Ditto.
1889 * s-valrea.adb (Scan_Real): Ditto.
1890 * s-imgrea.adb (Set_Image_Real): Ditto.
1891 * s-flocon.ads: Make the package pure.
1893 2011-08-04 Thomas Quinot <quinot@adacore.com>
1895 * sinfo.ads, sinfo.adb (Debug_Statement, Set_Debug_Statement): Remove.
1896 * tbuild.ads, tbuild.adb (Make_Pragma): Adjust accordingly.
1897 * sinfo-cn.ads, sinfo-cn.adb (Change_Name_To_Procedure_Call_Statement):
1898 New subprogram, moved here from...
1899 * par.adb, par-ch5.adb (P_Statement_Name): ... here.
1900 * par-prag.adb (Par.Prag, case Pragma_Debug): Do not perform any
1901 rewriting of the last argument into a procedure call statement here...
1902 * sem_prag.adb (Analyze_Pragma, case Pragma_Debug): ...do it there
1905 2011-08-04 Thomas Quinot <quinot@adacore.com>
1907 * par_sco.adb: Minor reformatting.
1909 2011-08-04 Robert Dewar <dewar@adacore.com>
1911 * erroutc.adb: Minor reformatting.
1913 2011-08-04 Thomas Quinot <quinot@adacore.com>
1915 * par_sco.adb: Comment update.
1917 2011-08-04 Tristan Gingold <gingold@adacore.com>
1919 * s-flocon.ads: New file.
1920 * g-flocon.ads: Now a renaming of s-flocon.
1921 * Makefile.rtl: Add s-flocon.o
1923 2011-08-04 Javier Miranda <miranda@adacore.com>
1925 * exp_strm.adb (Build_Array_Input_Function): if the array type is
1926 constrained, do not attempt to build a subtype of it.
1928 2011-08-04 Yannick Moy <moy@adacore.com>
1930 * errout.ads Change comments: remove 'R'M as an example where quotes
1931 are needed; add ALFA as another case where quotes are not needed
1932 * erroutc.adb (Set_Msg_Insertion_Reserved_Word): add ALFA as another
1933 case where quotes are not needed.
1934 * sem_ch11.adb, sem_ch13.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb,
1935 sem_ch5.adb, sem_ch6.adb, sem_ch9.adb, sem_prag.adb, sem_res.adb:
1936 Remove all occurrences of 'A'L'F'A
1938 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1940 * sem_ch13.adb: check legality of invariant pragma.
1942 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
1944 * bindgen.adb: Add comments.
1946 2011-08-04 Yannick Moy <moy@adacore.com>
1948 * einfo.adb, einfo.ads: Free Flag254 and make Formal_Proof_On a
1950 * sem_prag.adb (Analyze_Pragma): record the pragma Annotate
1951 (Formal_Proof, On/Off) in the Rep_Item list of the current subprogram.
1953 2011-08-04 Robert Dewar <dewar@adacore.com>
1955 * exp_ch7.adb, exp_ch6.adb, sem_ch3.adb, layout.adb, sem_ch5.adb,
1956 osint-c.ads, sem_util.ads, gnat1drv.adb, targparm.ads, sem_ch6.adb,
1957 sem_ch13.adb, s-pooloc.adb: Minor reformatting.
1959 2011-08-04 Thomas Quinot <quinot@adacore.com>
1961 * s-pooloc.ads, s-pooglo.ads: Minor reformatting
1963 2011-08-04 Thomas Quinot <quinot@adacore.com>
1966 * s-pooloc.adb (Deallocate): Fix the case of deallocating the only
1969 2011-08-04 Robert Dewar <dewar@adacore.com>
1971 * einfo.ads, exp_ch4.adb: Minor reformatting.
1973 2011-08-04 Jerome Lambourg <lambourg@adacore.com>
1975 * back_end.ads (Gen_Or_Update_Object_File): Add more comments.
1977 2011-08-04 Ed Schonberg <schonberg@adacore.com>
1979 * exp_ch4.adb (Expand_Composite_Equality): code cleanup: use component
1980 type in all cases to compute list of primitive operations, because full
1981 view may be an itype that is not attached to the list of declarations.
1983 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
1985 * bindgen.adb (Gen_Adafinal_Ada): Generate an early return if the
1986 library has already been finalized.
1987 (Gen_Adafinal_C): Likewise.
1988 (Gen_Adainit_Ada): Generate an early return if the library has
1989 already been elaborated.
1990 (Gen_Adainit_C): Likewise.
1991 (Gen_Output_File_Ada): Generate an elaboration flag.
1992 (Gen_Output_File_C): Likewise.
1994 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
1996 * exp_ch4.adb (Expand_Allocator_Expression): Disable the generation of
1997 Set_Finalize_Address_Ptr for CodePeer because Finalize_Address was not
1998 built in the first place.
1999 (Expand_N_Allocator): Disable the generation of Set_Finalize_Address_Ptr
2000 for CodePeer because Finalize_Address was not built to begin with.
2001 * exp_ch6.adb (Make_Build_In_Place_Call_In_Allocator): Ditto.
2003 2011-08-04 Pascal Obry <obry@adacore.com>
2005 * adaint.c (__gnat_tmp_name): Use current process id to create temp
2006 filenames, this ensures unicity of filenames across processes.
2008 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2010 * bindgen.adb (Gen_Finalize_Library_Ada): Rename generated routine
2011 Raise_Controlled to Raise_From_Controlled_Operation. Update the
2012 signature of Raise_From_Controlled_Operation by adding flag From_Abort.
2013 Add False as the actual to From_Abort in the generated call to
2014 Raise_From_Controlled_Operation.
2016 2011-08-04 Jerome Lambourg <lambourg@adacore.com>
2018 * osint-c.ads, osint-c.adb (Set_Library_Info_Name): Move to declaration
2019 so that the ali file name can be retrieved from outside of this package.
2020 * back_end.ads, back_end.adb (Gen_Or_Update_Object_File): New method
2021 doing nothing in the general case, but used to update the object file
2022 timestamp if directly generated by the backend.
2023 * gnat1drv.adb (Gnat1drv): Make sure the object file's timestamp is set
2024 to a later time than the ali file one.
2026 2011-08-04 Yannick Moy <moy@adacore.com>
2028 * einfo.adb, einfo.ads (Formal_Proof_On): new flag set on subprogram
2029 entities whose body contains an Annotate pragma which forces formal
2031 * sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb,
2032 sem_ch6.adb, sem_ch9.adb, sem_res.adb: Adapt call to
2033 Mark_Non_ALFA_Subprogram to pass in a message and node.
2034 * sem_prag.adb (Analyze_Pragma): add treatment of pragma Annotate
2035 (Forma_Proof, On) which sets the flag Formal_Proof_On in the
2036 surrounding subprogram.
2037 * sem_util.adb, sem_util.ads (Mark_Non_ALFA_Subprogram,
2038 Mark_Non_ALFA_Subprogram_Unconditional): if the subprogram being marked
2039 as not in ALFA is annotated with Formal_Proof being On, then an error
2040 is issued based on the additional parameters for message and node.
2041 * snames.ads-tmpl (Name_Formal_Proof): new name for annotation.
2042 * gcc-interface/Make-lang.in: Update dependencies.
2044 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2046 * exp_ch3.adb (Expand_Freeze_Class_Wide_Type): Do not generate
2047 Finalize_Address when CodePeer is enabled.
2049 2011-08-04 Pascal Obry <obry@adacore.com>
2051 * adaint.c (__gnat_tmp_name): Use _tempnam() instead of tempnam() as
2052 the latter returns a pointer to a static buffer which is deallocated
2053 at the end of the routine.
2055 2011-08-04 Yannick Moy <moy@adacore.com>
2057 * sem_ch3.adb (Array_Type_Declaration): move test for type in ALFA
2058 after index creation; mark unconstrained base array type generated as
2059 being in/not in ALFA as well
2060 (Make_Index): mark subtype created as in/not in ALFA
2061 * sem_ch5.adb (Analyze_Iteration_Scheme): mark entity for iterating
2062 over a loop as in/not in ALFA, depending on its type and form of loop
2065 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2067 * exp_ch7.adb (Build_Object_Declarations): Initialize flag Abort
2068 directly to False on .NET and JVM.
2070 2011-08-04 Yannick Moy <moy@adacore.com>
2072 * sem_ch3.adb (Constrain_Enumeration, Constrain_Integer): remove
2073 constraint that subtype must come from source code to be in ALFA, so
2074 that anonymous subtypes can be in ALFA too.
2076 2011-08-04 Yannick Moy <moy@adacore.com>
2078 * sem_ch3.adb (Analyze_Object_Declaration): remove obsolete addition of
2079 reference for ALFA mode.
2080 * lib-xref-alfa.adb, lib-xref.ads (Traverse_Compilation_Unit): make
2081 procedure public so as to use it from formal verification back-end.
2083 2011-08-04 Jerome Lambourg <lambourg@adacore.com>
2085 * g-comlin.adb (For_Each_Simple_Switch.Is_In_Config): Remove the
2086 invalid checks of the Parameter, making Remove_Switch not working
2089 2011-08-04 Arnaud Charlet <charlet@adacore.com>
2091 * targparm.ads: Update header: no run-time exception is needed on this
2094 2011-08-04 Vincent Celier <celier@adacore.com>
2096 * a-fihema.adb: Use System.IO instead of GNAT.IO
2098 2011-08-04 Thomas Quinot <quinot@adacore.com>
2100 * sem_ch3.adb (Access_Definition): Anonymous access to subprogram types
2101 are forbidden in Compiler_Unit mode.
2103 2011-08-04 Robert Dewar <dewar@adacore.com>
2105 * sem_util.adb: Minor reformatting.
2107 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2109 * bindgen.adb (Gen_Finalize_Library_Ada): Update the import string for
2110 library-level finalizers.
2111 (Gen_Finalize_Library_C): Update the import string for library-level
2113 (Gen_Finalize_Library_Defs_C): Update the definition name of a
2114 library-level finalizer.
2115 * exp_ch7.adb: Remove with and use clauses for Stringt.
2116 (Create_Finalizer): Remove local variables Conv_Name, Prag_Decl,
2117 Spec_Decl. Add local variable Body_Id. The names of library-level
2118 finalizers are now manually fully qualified and are no longer external.
2119 A single name is now capable of servicing .NET, JVM and non-VM targets.
2120 Pragma Export is no longer required to provide visibility for the name.
2121 (Create_Finalizer_String): Removed.
2122 (New_Finalizer_Name): New routine which mimics New_..._Name.
2124 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
2126 * sem_elab.adb (Check_Internal_Call_Continue): Change the type of the
2127 elaboration counter to Standard_Short_Integer.
2128 * sem_util.adb (Build_Elaboration_Entity): Likewise.
2129 * bindgen.adb (Gen_Elab_Externals_Ada): Adjust to above change.
2130 (Gen_Elab_Externals_C): Likewise.
2132 2011-08-04 Ed Falis <falis@adacore.com>
2134 * system-vxworks-arm.ads, system-vxworks-sparcv9.ads,
2135 system-vxworks-ppc.ads, system-vxworks-m68k.ads,
2136 system-vxworks-mips.ads, system-vxworks-x86.ads
2137 (Always_Compatible_Rep): set to False for all VxWorks targets.
2139 2011-08-04 Robert Dewar <dewar@adacore.com>
2141 * par_sco.adb, prj-proc.adb, make.adb, bindgen.adb, prj.adb, prj.ads,
2142 makeutl.adb, makeutl.ads, prj-nmsc.adb, exp_ch5.adb, exp_ch12.adb,
2143 exp_ch7.ads, exp_util.ads, sem_util.ads, g-comlin.ads, exp_ch6.adb,
2144 exp_ch6.ads, lib-xref.ads, exp_ch7.adb, exp_util.adb, exp_dist.adb,
2145 exp_strm.adb, gnatcmd.adb, freeze.adb, g-comlin.adb, lib-xref-alfa.adb,
2146 sem_attr.adb, sem_prag.adb, sem_util.adb, sem_elab.adb, sem_ch8.adb,
2147 sem_ch11.adb, sem_eval.adb, sem_ch13.adb, sem_disp.adb, a-fihema.adb:
2148 Minor reformatting and code reorganization.
2150 2011-08-04 Emmanuel Briot <briot@adacore.com>
2152 * projects.texi: Added doc for aggregate projects.
2154 2011-08-04 Emmanuel Briot <briot@adacore.com>
2156 * prj-proc.adb, prj-nmsc.adb, prj-env.adb (Process_Declarative_Items):
2157 Add support for overriding the Project_Path in aggregate projects.
2159 2011-08-04 Robert Dewar <dewar@adacore.com>
2161 * a-cofove.ads: Minor reformatting.
2163 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2165 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Update the comment
2166 on the generated code.
2167 (Build_Finalize_Statements): Update the comment on the generated code.
2168 (Build_Initialize_Statements): Update the comment on the generated code.
2169 (Build_Object_Declarations): Add local variable Result. The object
2170 declarations are now built in sequence.
2171 * rtsfind.ads: Add RE_Exception_Occurrence_Access to tables RE_Id and
2174 2011-08-04 Robert Dewar <dewar@adacore.com>
2176 * checks.adb, alfa.adb, alfa.ads: Minor reformatting.
2178 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
2180 * einfo.ads (Elaboration_Entity): Document new definition and use.
2181 (Elaboration_Entity_Required): Adjust to above change.
2182 * exp_attr.adb (Expand_N_Attribute_Reference): Likewise.
2183 * exp_ch12.adb: And with and use for Snames.
2184 (Expand_N_Generic_Instantiation): Test 'Elaborated attribute.
2185 * exp_util.adb (Set_Elaboration_Flag): Likewise.
2186 * sem_attr.adb (Analyze_Attribute) <Check_Library_Unit>: Delete.
2187 <Check_Unit_Name>: Deal with N_Expanded_Name.
2188 <Attribute_Elaborated>: Extend to all unit names.
2189 * sem_elab.adb: And with and use for Uintp.
2190 (Check_Internal_Call_Continue): Adjust to Elaboration_Entity change.
2191 * sem_util.ads (Build_Elaboration_Entity): Adjust comment.
2192 * sem_util.adb (Build_Elaboration_Entity): Change type to Integer.
2193 * bindgen.adb (Gen_Elab_Externals_Ada): New local subprogram taken
2194 from Gen_Adainit_Ada.
2195 (Gen_Elab_Externals_C): Likewise, but taken from Gen_Adainit_C.
2196 (Gen_Adafinal_Ada): Remove redundant test. In the non-main program
2197 case, do not call System.Standard_Library.Adafinal; instead call
2198 finalize_library if needed.
2199 (Gen_Adafinal_C): Likewise.
2200 (Gen_Adainit_Ada): Do not set SSL.Finalize_Library_Objects in the
2201 non-main program case.
2202 (Gen_Adainit_C): Generate a couple of external declarations here.
2203 In the main program case, set SSL.Finalize_Library_Objects.
2204 (Gen_Elab_Calls_Ada): Adjust to Elaboration_Entity change.
2205 (Gen_Elab_Calls_C): Likewise.
2206 (Gen_Finalize_Library_Ada): Likewise. Skip SAL interface units.
2207 (Gen_Finalize_Library_C): Likewise. Generate a full function.
2208 (Gen_Main_C): Put back call to Ada_Final and don't finalize library
2210 (Gen_Output_File_Ada): Generate pragma Linker_Destructor for Ada_Final
2211 if -a is specified. Call Gen_Elab_Externals_Ada. Move around call to
2213 (Gen_Output_File_C): Generate __attribute__((destructor)) for Ada_Final
2214 if -a is specified. Call Gen_Elab_Externals_C. Remove useless couple
2215 of external declarations. Call Gen_Finalize_Library_C.
2217 2011-08-04 Emmanuel Briot <briot@adacore.com>
2219 * prj.adb, prj.ads, makeutl.adb, makeutl.ads (Complete_Mains,
2220 Compute_Compilation_Phases): new subprogram.
2221 (Builder_Data, Builder_Project_Tree_Data): new subprogram and type
2222 The number of mains as well as the various compilation phases that
2223 need to be run are now project tree specific, since various
2224 aggregated trees might have different requirements. In particular,
2225 they do not all require bind or link phases.
2227 2011-08-04 Emmanuel Briot <briot@adacore.com>
2229 * prj.adb, prj.ads, makeutl.adb, makeutl.ads, prj-env.adb
2230 (Project_Tree_Appdata): New type.
2231 It is now possible to associate application-specific data to a project
2232 tree. In particular, this is used in the gprbuild builder to avoid a
2233 number of global tables and htables, especially now that there can be
2234 several project trees loaded at once because of aggregate projects.
2235 (Debug_Name): new procedure.
2236 * projects.texi: Clarify syntax of "**" for Source_Dirs
2238 2011-08-03 Emmanuel Briot <briot@adacore.com>
2240 * prj.ads, makeutl.adb, makeutl.ads (Queue.Insert): now also inserts
2241 the "roots" for a main.
2242 (Fill_From_Project): add support for aggregate projects. Main units
2243 in aggregated projects are now automatically added in the list of
2244 files to build (although this fails later on in gprbuild, because
2245 these files are not using the root proejct tree, so this needs
2247 * gcc-interface/Make-lang.in: Update dependencies.
2249 2011-08-03 Yannick Moy <moy@adacore.com>
2251 * sem_ch4.adb (Analyze_Conditional_Expression): only allow boolean
2252 conditional expression in ALFA.
2253 * sem_res.adb (Resolve_Conditional_Expression): mark non-boolean
2254 expressions as not in ALFA.
2256 2011-08-03 Robert Dewar <dewar@adacore.com>
2258 * a-cofove.adb: Minor reformatting.
2260 2011-08-03 Emmanuel Briot <briot@adacore.com>
2262 * make.adb, prj.adb, prj.ads, makeutl.adb, makeutl.ads
2263 (Insert_Project_Sources, Insert_withed_Sources_For): moved from the
2265 These packages are more logically placed in the Queue package, since
2266 they manipulate the queue. It is also likely that they can be adapted
2267 for gnatmake, thus sharing more code.
2268 (Finish_Program, Fail_Program): moved from the gprbuild sources, so
2269 that we could move the above.
2271 2011-08-03 Emmanuel Briot <briot@adacore.com>
2273 * errutil.adb (Finalize): clean up the list of error messages on exit.
2274 Calling this subprogram multiple times will no longer show duplicate
2275 error messages on stderr.
2277 2011-08-03 Emmanuel Briot <briot@adacore.com>
2279 * g-comlin.adb, g-comlin.ads (Set_Command_Line): ignore the parameter
2280 Getopt_Switches when we have already define a command line
2283 2011-08-03 Yannick Moy <moy@adacore.com>
2285 * sem_ch11.adb (Analyze_Raise_xxx_Error): do not mark such nodes as not
2286 in ALFA. Instead, they are considered as assertions to prove.
2287 * sem_ch4.adb (Analyze_Conditional_Expression): do not always mark such
2288 nodes as not in ALFA. Instead, include conditional expressions in ALFA
2289 if they have no ELSE part, or if they occur in pre- and postconditions,
2290 where the Condition cannot have side-effects in ALFA
2291 (Analyze_Membership_Op): do not mark such nodes as not in ALFA
2292 (Analyze_Type_Conversion): do not always mark such nodes as not in ALFA.
2293 Instead, include type conversion between scalar types in ALFA.
2294 * sem_ch6.adb (Process_Formals): correctly mark a parameter in ALFA
2295 if-and-only-if its type is in ALFA.
2297 2011-08-03 Thomas Quinot <quinot@adacore.com>
2299 * scos.adb, get_scos.adb, put_scos.adb
2300 New code letter for decisions: G (entry guard)
2302 (Traverse_Subprogram_Body): Rename to...
2303 (Traverse_Subprogram_Or_Task_Body): New subrpogram.
2304 (Traverse_Protected_Body): New subprogram
2305 (Traverse_Declarations_Or_Statements): Add traversal of task bodies,
2306 protected bodies and entry bodies.
2308 2011-08-03 Yannick Moy <moy@adacore.com>
2310 * einfo.adb, einfo.ads (Is_Postcondition_Proc): new flag for procedure
2311 entities with get/set subprograms, which is set on procedure entities
2312 generated by the compiler for a postcondition.
2313 * sem_ch6.adb (Process_PPCs): set new flag on postcondition procedures
2314 * alfa.adb, alfa.ads (Get_Entity_For_Decl): new function returning the
2315 entity for a declaration
2316 (Get_Unique_Entity_For_Decl): new function returning an entity which
2317 represents a declaration, so that matching spec and body have the same
2320 2011-08-03 Robert Dewar <dewar@adacore.com>
2322 * a-except-2005.adb, a-cfhama.adb, a-cfhase.adb, a-cfhase.ads,
2323 a-cforma.adb, a-cforse.ads, a-cforse.adb: Minor reformatting
2325 2011-08-03 Yannick Moy <moy@adacore.com>
2327 * lib-xref-alfa.adb (Detect_And_Add_ALFA_Scope): make the subprogram
2328 library-level because retriction No_Implicit_Dynamic_Code in the
2329 front-end prevents its definition as a local subprogram
2330 (Traverse_Compilation_Unit): extract new procedure from Add_ALFA_File,
2331 for reuse in other contexts
2332 (Traverse_Declarations_Or_Statements,
2333 Traverse_Handled_Statement_Sequence, Traverse_Package_Body,
2334 Traverse_Package_Declaration, Traverse_Subprogram_Body): make all these
2335 procedures take a callback parameter to be called on all declarations
2337 (Traverse_All_Compilation_Units): new generic function to traverse a
2338 compilation unit and call a callback parameter on all declarations
2340 2011-08-03 Javier Miranda <miranda@adacore.com>
2342 * sem_prag.adb (Process_Interface_Name): Allow duplicated export names
2343 in Java since they are always enclosed in a namespace that
2344 differentiates them, and overloaded entities are supported by the VM.
2346 2011-08-03 Ed Schonberg <schonberg@adacore.com>
2348 * checks.adb (Determine_Range): If a computed bound of an operation is
2349 outside the range of the base type of the expression, and overflow
2350 checks are enabled, the result is unknown and cannot be used for any
2351 subsequent constant folding.
2352 * sem_eval.adb (Compile_Time_Compare): if the bounds of one operand are
2353 unknown, so is the result of the comparison.
2355 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
2357 * a-except-2005.adb (Raise_From_Controlled_Operation): Add new formal
2358 From_Abort. When finalization was triggered by an abort, propagate
2359 Standard'Abort_Signal rather than Program_Error.
2360 * a-except-2005.ads (Raise_From_Controlled_Operation): Add new formal
2362 * a-except.adb (Raise_From_Controlled_Operation): Add new formal
2363 From_Abort. When finalization was triggered by an abort, propagate
2364 Standard'Abort_Signal rather than Program_Error.
2365 * a-except.ads:(Raise_From_Controlled_Operation): Add new formal
2367 * exp_ch7.adb:(Build_Adjust_Or_Finalize_Statements): New local variable
2368 Abort_Id. Update the calls to Build_Object_Declarations and
2369 Build_Raise_Statement to include Abort_Id.
2370 (Build_Adjust_Statements): New local variable Abort_Id. Update the
2371 calls to Build_Object_Declarations and Build_Raise_Statement to include
2373 (Build_Finalize_Statements): New local variable Abort_Id. Update the
2374 calls to Build_Object_Declarations and Build_Raise_Statement to include
2376 (Build_Components): Create an entity for Abort_Id when exceptions are
2377 allowed on the target.
2378 (Build_Finalizer): New local variable Abort_Id.
2379 (Build_Initialize_Statements): New local variable Abort_Id. Update the
2380 calls to Build_Object_Declarations and Build_Raise_Statement to include
2382 (Build_Object_Declarations): Add new formal Abort_Id. Create the
2383 declaration of flag Abort_Id to preserve the original abort status
2384 before finalization code is executed.
2385 (Build_Raise_Statement): Add new formal Abort_Id. Pass Abort_Id to
2386 runtime routine Raise_From_Controlled_Operation.
2387 (Create_Finalizer): Update the call to Build_Raise_Statement to include
2388 Abort_Id. Update the call to Build_Object_Declarations to include
2389 Abort_Id. Update the layout of the finalizer body.
2390 (Make_Handler_For_Ctrl_Operation): Add an actual for From_Abort.
2391 (Process_Transient_Objects): New local variable Abort_Id. Remove the
2392 clunky code to create all flags and objects related to
2393 exception propagation and replace it with a call to
2394 Build_Object_Declarations. Update the call to Build_Raise_Statement to
2396 * exp_ch7.ads (Build_Object_Declarations): Moved from body to spec.
2397 Add new formal Abort_Id and associated comment on its use.
2398 (Build_Raise_Statement): Add new formal Abort_Id and associated comment
2400 * exp_intr.adb (Expand_Unc_Deallocation): New local variable Abort_Id.
2401 Remove the clunky code to create all flags and objects related to
2402 exception propagation and replace it with a call to
2403 Build_Object_Declarations. Update the call to Build_Raise_Statement.
2405 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
2407 * s-tassta.adb: Fix minor typos.
2409 2011-08-03 Robert Dewar <dewar@adacore.com>
2411 * rtsfind.ads, makeutl.ads, prj.ads, prj.adb, make.adb,
2412 lib-writ.adb, makeutl.adb, s-soflin.ads, clean.adb: Minor reformatting.
2414 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
2416 * exp_ch7.adb (Create_Finalizer): Treat freeze nodes in similar fashion
2417 to packages. This ensures that the finalizer body will not end up
2418 inside the freeze node.
2419 (Process_Declarations): Add code to detect whether a freeze node has a
2420 nested finalization collection.
2422 2011-08-03 Pascal Obry <obry@adacore.com>
2424 * g-awk.adb, g-awk.ads: Make GNAT.AWK API compatible with Ada 2005.
2425 (Current_Session): Return a not null access to Session_Type.
2426 (Default_Session): Likewise.
2428 2011-08-03 Robert Dewar <dewar@adacore.com>
2430 * a-cfdlli.adb, bindgen.adb, exp_ch4.adb, exp_ch13.adb, sem_warn.adb,
2431 exp_ch3.adb, exp_ch3.ads: Minor reformatting.
2433 2011-08-03 Pascal Obry <obry@adacore.com>
2435 * g-awk.ads: Minor comment fix.
2437 2011-08-03 Sergey Rybin <rybin@adacore.com>
2439 * tree_io.ads (ASIS_Version_Number): Update because of the changes in
2440 the tree structure related to discriminant constraints.
2441 Original_Discriminant cannot be used any more for computing the
2442 defining name for the reference to a discriminant.
2444 2011-08-03 Ed Schonberg <schonberg@adacore.com>
2446 * sem_disp.adb (Is_Tag_Indeterminate): If the return type of the
2447 function is not visibly tagged, this is not a dispatching call and
2448 therfore is not Tag_Indeterminate, even if the function is marked as
2449 dispatching on result.
2451 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
2453 * exp_ch13.adb: Add with and use clauses for Restrict and Rident.
2454 (Expand_N_Free_Statement): Add a guard to protect against run-times
2455 which do not support controlled types.
2456 * exp_ch3.adb (Expand_Freeze_Class_Wide_Type): Add a guard to protect
2457 against run-times which do not support controlled types.
2458 * exp_ch4.adb (Complete_Controlled_Allocation): Add a guard to protect
2459 against run-times which do not support controlled types.
2460 * exp_ch7.adb (Build_Finalization_Collection): Add a guard to protect
2461 against run-times which do not support controlled types.
2462 * exp_util.adb (Needs_Finalization): Code reformatting. Add a guard to
2463 protect against run-times which do not support controlled types.
2465 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
2467 * exp_intr.adb: Put back with and use clauses for Exp_Ch11.
2468 (Expand_Unc_Deallocation): Expand the AT_END handler at the very end.
2470 2011-08-03 Ed Schonberg <schonberg@adacore.com>
2472 * exp_ch5.adb (Expand_Iterator_Loop): indicate that the cursor is
2473 modified in the source, to prevent spurious warnings when compiling
2476 2011-08-03 Thomas Quinot <quinot@adacore.com>
2478 * a-except-2005.adb: Minor reformatting.
2480 2011-08-03 Ed Schonberg <schonberg@adacore.com>
2482 * sem_warn.adb (Check_One_Unit): if the only mention of a withed unit
2483 is a renaming declaration in the private part of a package, do not emit
2484 a warning that the with_clause could be moved because the renaming may
2485 be used in the body or in a child unit.
2487 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
2489 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration):
2490 Propagate the Comes_From_Source attribute from the original return
2491 object to the renaming.
2493 2011-08-03 Jose Ruiz <ruiz@adacore.com>
2495 * exp_ch7.adb (Build_Raise_Statement): Do not call
2496 Raise_From_Controlled_Operation when this routine is not present in
2497 the run-time library.
2498 (Cleanup_Protected_Object, Cleanup_Task): For restricted run-time
2499 libraries (Ravenscar), tasks are non-terminating, and protected objects
2500 and tasks can only appear at library level, so we do not want
2501 finalization of protected objects nor tasks.
2502 * exp_intr.adb: Minor clarification in comment.
2503 bindgen.adb (Gen_Adainit_Ada, Gen_Main_C, Gen_Output_File_Ada,
2504 Gen_Output_File_C): Remove references to finalization of library-level
2505 objects when using restricted run-time libraries.
2507 2011-08-03 Ed Schonberg <schonberg@adacore.com>
2509 * sem_ch3.adb (Build_Discriminant_Constraints): Set
2510 Original_Discriminant only if the parent type is a generic formal.
2512 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
2514 * exp_ch13.adb: Add with and use clause for Targparm;
2515 (Expand_N_Free_Statement): Prevent the generation of a custom
2516 Deallocate on .NET/JVM targets since this requires pools and address
2518 * exp_ch4.adb (Expand_Allocator_Expression): When compiling for
2519 .NET/JVM targets, attach the newly allocated object to the access
2520 type's finalization collection. Do not generate a call to
2521 Set_Finalize_Address_Ptr on .NET/JVM because this routine does not
2522 exist in the runtime.
2523 (Expand_N_Allocator): When compiling for .NET/JVM targets, do not
2524 create a custom Allocate for object that do not require initialization.
2525 Attach a newly allocated object to the access type's finalization
2526 collection on .NET/JVM.
2527 * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add special processing for
2528 assignment of controlled types on .NET/JVM. The two hidden pointers
2529 Prev and Next and stored and later restored after the assignment takes
2531 * exp_ch6.adb (Expand_Call): Add local constant Curr_S. Add specialized
2532 kludge for .NET/JVM to recognize a particular piece of code coming from
2533 Heap_Management and change the call to Finalize into Deep_Finalize.
2534 * exp_ch7.adb (Build_Finalization_Collection): Allow the creation of
2535 finalization collections on .NET/JVM only for types derived from
2536 Controlled. Separate the association of storage pools with a collection
2537 and only allow it on non-.NET/JVM targets.
2538 (Make_Attach_Call): New routine.
2539 (Make_Detach_Call): New routine.
2540 (Process_Object_Declarations): Suppress the generation of
2541 build-in-place return object clean up code on .NET/JVM since it uses
2543 * exp_ch7.ads (Make_Attach_Call): New routine.
2544 (Make_Detach_Call): New routine.
2545 * exp_intr.adb Add with and use clause for Targparm.
2546 (Expand_Unc_Deallocation): Detach a controlled object from a collection
2547 on .NET/JVM targets.
2548 * rtsfind.ads: Add entries RE_Attach, RE_Detach and
2549 RE_Root_Controlled_Ptr to tables RE_Id and RE_Unit_Table.
2550 * snames.ads-tmpl: Add name Name_Prev. Move Name_Prev to the special
2551 names used in finalization.
2553 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
2555 * a-fihema.adb: Add with and use clauses for System.Soft_Links.
2556 (Attach, Detach): Lock the current task when chaining an object onto a
2559 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
2561 * a-except.adb, a-except-2005.adb (Raise_From_Controlled_Operation):
2562 Rewritten to create the message strings when the exception is not
2563 raised by an abort during finalization.
2564 * a-except.ads, a-except-2005.ads: Add pragma Export for procedure
2565 Raise_From_Controlled_Operation and update its associated comment.
2566 * a-fihema.ads, a-fihema.adb: New GNAT unit.
2567 Ada.Finalization.Heap_Management provides key functionality
2568 associated with controlled objects on the heap, their creation,
2569 finalization and reclamation. Type Finalization_Collection is
2570 effectively a wrapper which sits ontop of a storage pool and performs
2571 all necessary bookkeeping for all the objects it contains. Each
2572 access-to-controlled or access-to-class-wide type receives a collection
2573 as part of its expansion. The compiler generates buffer code and
2574 invokes Allocate / Deallocate to create and destroy allocated
2576 * a-finali.adb ("="): Removed.
2577 * a-finali.ads ("="): Removed. Controlled types no longer carry hidden
2578 fields Prev and Next.
2579 * ali.adb (Scan_ALI): Add parsing code to process PF / Has_Finalizer.
2580 A library unit with at least one controlled object on the library level
2581 has a special finalizer which is invoked by the binder. To signal this,
2582 ali files carry field PF.
2583 * ali.ads: New field in type Unit_Record called Has_Finalizer. Add
2584 associated comment on field usage.
2585 * a-tags.adb (Get_RC_Offset): Removed.
2586 (Needs_Finalization): New routine.
2587 * a-tags.ads: Update the structure of the GNAT dispatch tables.
2588 Dispatch tables now carry field Needs_Finalization which provides
2589 runtime indication whether a type is controlled or has controlled
2590 components or both. Remove field RC_Offset.
2591 (Get_RC_Offset): Removed along with its associated pragma Export.
2592 Since tagged types with controlled components no longer carry hidden
2593 field _controller, the special mechanism to retrieve its location is no
2595 (Needs_Finalization): New routine.
2596 * atree.ads, atree.adb (Elist24): New routine.
2597 (Set_Elist24): New routine.
2598 * atree.h: Add a define clause for Elist24.
2599 * bindgen.adb New library-level variable Lib_Final_Built.
2600 (Gen_Adafinal_Ada): Reimplemented. Depending on the restrictions or the
2601 presence of a VM target, the routine generates calls to the proper
2602 library finalization routine.
2603 (Gen_Adainit_Ada): Import Finalize_Library_Objects only on non-VM
2604 targets. Set the correct library finalization routine depending on
2605 whether the library has controlled objects or this is a VM compilation.
2606 (Gen_Finalize_Library_Ada): New routine. This procedure generates calls
2607 to library-level finalizers of compiled units in reverse order of
2608 elaboration. It also produces exception management code and reraises a
2609 potential exception after all units have been finalized.
2610 (Gen_Finalize_Library_C): New routine. This procedure generates calls to
2611 library-level finalizers of compiled units in reverse order of
2613 (Gen_Finalize_Library_Defs_C): New routine. This procedure generates the
2614 definitions of all library-level finalizers available to the compilation
2615 (Gen_Main_Ada): Directly call Adafinal which now contails all target
2617 (Gen_Main_C): Add new local constant Needs_Library_Finalization. Call
2618 System.Standard_Library.Adafinal directly. If the library needs
2619 finalization actions, create the sequence of finalization calls.
2620 (Gen_Output_File_Ada): Alphabetize local variables and constants.
2621 Generate a with clause for System.Soft_Links when compiling for a VM.
2622 Remove the code which imports System.Standard_Library.Adafinal as
2623 Do_Finalize. Generate the library finalization routine.
2624 (Gen_Output_File_C): Add new local constant Needs_Library_Finalization.
2625 If the library needs finalization actions, create all the definitions
2626 of library- level finalizers.
2627 (Has_Finalizer): New routine. Determines whether at least one compiled
2628 unit has a library-level finalizer.
2629 Add type Qualification_Mode.
2630 (Set_Unit_Name): Add a formal which controls the replacement of a dot.
2631 * einfo.adb: New usage of field 15 as Return_Flag.
2632 Remove Finalization_Chain_Entity from the usages of field 19.
2633 Remove Associated_Final_Chain from the usages of field 23.
2634 New usage of field 23 as Associated_Collection.
2635 New usage of field 24 as Finalizer.
2636 New usage of flag 252 as Is_Processed_Transient.
2637 (Associated_Final_Chain): Removed.
2638 (Associated_Collection): New routine.
2639 (Finalization_Chain_Entity): Removed.
2640 (Finalizer): New routine.
2641 (Is_Finalizer): New routine.
2642 (Is_Processed_Transient): New routine.
2643 (Return_Flag): New routine.
2644 (Set_Associated_Final_Chain): Removed.
2645 (Set_Associated_Collection): New routine.
2646 (Set_Finalization_Chain_Entity): Removed.
2647 (Set_Finalizer): New routine.
2648 (Set_Is_Processed_Transient): New routine.
2649 (Set_Return_Flag): New routine.
2650 (Write_Entity_Flags): Include Is_Processed_Transient to the list of
2652 (Write_Field8_Name): Alphabetize the output.
2653 (Write_Field11_Name): Alphabetize the output.
2654 (Write_Field12_Name): Alphabetize the output.
2655 (Write_Field13_Name): Alphabetize the output.
2656 (Write_Field14_Name): Alphabetize the output.
2657 (Write_Field15_Name): Alphabetize the output.
2658 (Write_Field16_Name): Alphabetize the output.
2659 (Write_Field17_Name): Alphabetize the output.
2660 (Write_Field18_Name): Alphabetize the output.
2661 (Write_Field19_Name): Alphabetize the output. Remove the output of
2662 Finalization_Chain_Entity.
2663 (Write_Field20_Name): Alphabetize the output.
2664 (Write_Field21_Name): Alphabetize the output.
2665 (Write_Field22_Name): Alphabetize the output.
2666 (Write_Field23_Name): Alphabetize the output. Remove the output of
2667 Associated_Final_Chain. Add output for Associated_Collection.
2668 (Write_Field24_Name): Alphabetize the output.
2669 (Write_Field25_Name): Add output for Finalizer.
2670 (Write_Field26_Name): Alphabetize the output.
2671 (Write_Field27_Name): Alphabetize the output.
2672 (Write_Field28_Name): Alphabetize the output.
2673 * einfo.ads: Add new field description for Associated_Collection and
2675 Remove Associated_Final_Chain and its uses in nodes.
2676 Remove Finalization_Chain_Entity and its uses in nodes.
2677 Add new field description for Finalizer and its uses in nodes.
2678 Add new synthesized attribute Is_Finalizer.
2679 Add new flag description for Is_Processed_Transient and its uses in
2681 Add new field description for Return_Flag and its uses in nodes.
2682 (Associated_Final_Chain): Removed along with its pragma Inline.
2683 (Associated_Collection): New routine and pragma Inline.
2684 (Finalization_Chain_Entity): Removed along with its pragma Inline.
2685 (Finalizer): New routine and pragma Inline.
2686 (Is_Finalizer): New routine and pragma Inline.
2687 (Is_Processed_Transient): New routine and pragma Inline.
2688 (Return_Flag): New routine and pragma Inline.
2689 (Set_Associated_Final_Chain): Removed along with its pragma Inline.
2690 (Set_Associated_Collection): New routine and pragma Inline.
2691 (Set_Finalization_Chain_Entity): Removed along with its pragma Inline.
2692 (Set_Finalizer): New routine and pragma Inline.
2693 (Set_Is_Processed_Transient): New routine and pragma Inline.
2694 (Set_Return_Flag): New routine and pragma Inline.
2695 * exp_aggr.adb: Alphabetize subprograms.
2696 (Build_Array_Aggr_Code): Remove formal Flist and its associated comment.
2697 (Build_Record_Aggr_Code): Remove formals Flist and Obj along with their
2698 associated comments. Remove local variables External_Final_List and
2700 Rename Ctrl_Stuff_Done to Finalization_Done. Rename local variable A to
2701 Ancestor. Remove the retrieval of finalization lists. Update the call to
2703 (Convert_Aggr_In_Allocator): Remove the retrieval of finalization
2704 lists. Update the call to Late_Expansion.
2705 (Convert_Aggr_In_Assignment): Update the call to Late_Expansion.
2706 (Convert_Aggr_In_Object_Decl): Update the call to Late_Expansion.
2707 (Gen_Assign): Remove the retrieval of the finalization list used to
2708 build the assignment. Update the calls to Make_Init_Call and
2710 (Gen_Ctrl_Actions_For_Aggr): Renamed to Generate_Finalization_Actions.
2711 Remove the mechanism to determine attachment levels and finalization
2712 list retrieval. Remove the processing for coextensions.
2713 (Init_Controller): Removed. Controllers no longer exist.
2714 (Late_Expansion): Remove formals Flist and Obj along with their
2715 associated comments. Update the calls to Build_Record_Aggr_Code and
2716 Build_Array_Aggr_Code.
2717 * exp_ch13.adb (Expand_N_Free_Statement): New routine.
2718 (Expand_N_Freeze_Entity): Add special processing for finalizers which
2719 appear in entry bodies, protected subprograms and task bodies.
2720 * exp_ch13.ads (Expand_N_Free_Statement): New routine.
2721 * exp_ch3.adb (Add_Final_Chain): Removed.
2722 (Build_Array_Init_Proc): Alphabetize local variables.
2723 (Build_Assignment): Alphabetize local variables. Update the call to
2725 (Build_Class_Wide_Master): Rename local variables to better reflect
2727 (Build_Discriminant_Assignments): Code reformatting.
2728 (Build_Init_Call_Thru): Code reformatting.
2729 (Build_Init_Procedure): Code reformatting. Generate a special version
2730 of Deep_Finalize which is capable of finalizing all initialized
2731 components and ignore the rest.
2732 (Build_Init_Statements): Rename local variables to better reflect their
2734 Reimplement the mechanism to include the creation and update of an index
2735 variable called a "counter". It is used as a bookmark for tracing
2736 initialized and non-initialized components.
2737 (Build_Initialization_Call): Remove local variable Controller_Typ.
2738 Alphabetize all local variables. Remove the initialization of the
2739 record controller and update the call to Make_Init_Call.
2740 (Build_Record_Init_Proc): Rename formal Pe to Rec_Ent.
2741 New local variable Counter.
2742 (Constrain_Array): Alphabetize.
2743 (Expand_Freeze_Array_Type): Create a collection instead of a
2745 (Expand_Freeze_Class_Wide_Type): New routine. Creates TSS primitive
2746 Finalize_Address which is used in conjunction with allocated controlled
2748 (Expand_N_Object_Declaration): Remove the creation of a finalization
2749 list for anonymous access types. Update the calls to Make_Init_Call and
2751 (Expand_Freeze_Record_Type): Remove local variable Flist. Remove the
2752 retrieval of finalization lists. Remove the expansion of the record
2753 controller. Create TSS primitive Finalize_Address used in conjunction
2754 with controlled objects on the heap. Create finalization collections
2755 for access-to-controlled record components.
2756 (Expand_Record_Controller): Removed.
2757 (Freeze_Type): Remove the freezing of record controllers. Freezing of
2758 class-wide types now requires additional processing. Create
2759 finalization collections for access-to-controlled types.
2760 (Increment_Counter): New routine.
2761 (Make_Counter): New routine.
2762 (Make_Eq_If): Remove the mention of Name_uController.
2763 (Make_Predefined_Primitive_Specs): There is no longer need to skip
2764 types coming from System.Finalization_Root.
2765 (Predef_Deep_Spec): Reimplemented to reflect the new parameter profiles.
2766 (Predefined_Primitive_Bodies): There is no longer need to skip types
2767 coming from System.Finalization_Root.
2768 (Stream_Operation_OK): Do not generate stream routines for
2769 type Ada.Finalization.Heap_Management.Finalization_Collection.
2770 * exp_ch3.ads: Alphabetize subprograms.
2771 * exp_ch4.adb: Remove with and use clause for Sem_Ch8.
2772 Add with and use clause for Lib.
2773 (Complete_Coextension_Finalization): Removed.
2774 (Complete_Controlled_Allocation): New routine. Create a finalization
2775 collection for anonymous access-to-controlled types. Create a custom
2776 Allocate which interfaces with the back end and the machinery in
2778 (Expand_Allocator_Expression): Add necessary calls to
2779 Complete_Controlled_Allocation. Remove the retrieval of finalization
2780 lists. Update the calls to Make_Adjust_Call. Generate a call to
2781 Ada.Finalization.Heap_Management.Set_Finalize_Address_Ptr to decorate
2782 the associated collection.
2783 (Expand_N_Allocator): Remove the processing for dynamic coextensions.
2784 Code clean up. Remove the retrieval of finalization lists and
2786 Update the call to Make_Init_Call. Generate a call to
2787 Ada.Finalization.Heap_Management.Set_Finalize_Address_Ptr to decorate
2788 the associated collection.
2789 (Get_Allocator_Final_List): Removed. Finalization lists are not
2791 (Suitable_Element): Remove the mention of Name_uController.
2792 * exp_ch5.adb: Remove with and use clauses for Ttypes and Uintp.
2793 (Make_Tag_Ctrl_Assignment): Rewritten to simply do a finalization of
2794 the left hand side, carry out the assignment and adjust the left hand
2796 * exp_ch6.adb (Add_Final_List_Actual_To_Build_In_Place_Call): Removed.
2797 (Add_Collection_Actual_To_Build_In_Place_Call): New routine.
2798 (BIP_Formal_Suffix): Rename BIP_Final_List and BIPfinallist to
2799 BIP_Collection and BIPcollection.
2800 (Build_Heap_Allocator): New routine used to allocate the return object
2801 of a build-in-place function onto a collection.
2802 (Expand_Ctrl_Function_Call): Moved from Exp_Ch7.
2803 (Expand_Call): Do not replace direct calls to Deep routines with their
2805 (Expand_N_Extended_Return_Statement): Give all variables shorter names
2806 and update their occurrences. Add a special return flag to monitor the
2807 [ab]normal execution of the function. The flag is set right before the
2809 Rewrite the mechanism used to allocate a build-in-place return object
2810 on the heap or on a storage pool.
2811 (Is_Direct_Deep_Call): New routine.
2812 (Make_Build_In_Place_Call_In_Allocator): Add a collection to a
2813 build-in-place function call instead of a final list. Build a call to
2814 Set_Finalize_Address_Ptr to decorate the associated collection.
2815 (Make_Build_In_Place_Call_In_Anonymous_Context): Create a temporary in
2816 order to name the build-in-place function call's result for later
2817 finalization. Add a collection to a build-in-place function call
2818 instead of a final list.
2819 (Make_Build_In_Place_Call_In_Assignment): Add a collection to a
2820 build-in-place function call instead of a final list. Remove the code
2821 which moves one final list and transforms it into the actual in a
2822 nested build-in-place call.
2823 (Make_Build_In_Place_Call_In_Object_Declaration): Add a collection to a
2824 build-in-place function call instead of a final list.
2825 (Move_Final_List): Removed.
2826 (Needs_BIP_Collection): New routine.
2827 (Needs_BIP_Final_List): Removed.
2828 * exp_ch6.ads: Replace BIP_Final_List with BIP_Collection in
2829 enumeration type BIP_Formal_Kind.
2830 Update the related comment.
2831 (Needs_BIP_Collection): New routine.
2832 (Needs_BIP_Final_List): Removed.
2833 * exp_ch7.adb: Add with and use clauses for Elists, Exp_Ch6, Stringt
2834 and Ttypes. Remove with and use clauses for Sem_Type. Alphabetize the
2835 majority of subprograms in this unit. Add Name_Finalize_Address to
2836 array Name_Of and TSS_Finalize_Address to array Deep_Name_Of.
2837 (Build_Adjust_Or_Finalize_Statements): Create the adjust or finalization
2838 statements for an array type.
2839 (Build_Adjust_Statements): Create the adjust statements for a record
2841 (Build_Cleanup_Statements): New routine. A procedure which given any
2842 construct containing asynchronous calls, references to _master, or is a
2843 task body, a task allocation or a protected body produces the necessary
2844 runtime calls to clean up these constructs.
2845 (Build_Exception_Handler): New routine.
2846 (Build_Final_List): Removed.
2847 (Build_Finalization_Collection): New routine. A core procedure which
2848 creates a collection to service heap allocated controlled objects
2849 associated with an access-to-controlled type.
2850 (Build_Finalize_Statements): Create the finalization statements for a
2852 (Build_Finalizer): New routine. A core procedure which given any
2853 construct with declarations and/or statements detects all objects which
2854 need any type of clean up (controlled objects, protected objects) and
2855 generates all necessary code to clean up the said objects in the proper
2857 (Build_Finalizer_Call): New routine.
2858 (Build_Initialize_Statements): Create the initialization statements for
2859 an array type. The generated routine contains code to finalize partially
2861 (Build_Object_Declarations): New routine.
2862 (Build_Raise_Statement): New routine.
2863 (Clean_Simple_Protected_Objects): Removed.
2864 (Controller_Component): Removed.
2865 (Enclosing_Function): New routine.
2866 (Expand_Cleanup_Actions): Create a finalizer for a construct which has
2867 either declarations or statements or both.
2868 (Expand_N_Package_Body): Create a finalizer for a non-generic package.
2869 (Expand_N_Package_Declaration): Create a finalizer for a non-generic
2871 (Find_Final_List): Removed.
2872 (Global_Flist_Ref): Removed.
2873 (In_Finalization_Root): Removed.
2874 (Insert_Actions_In_Scope_Around): Determine the range of the transient
2875 scope in terms of tree nodes. Process all transient variables within
2877 (Make_Adjust_Call): Rewritten. There is no longer an attach call
2878 generated after the adjust.
2879 (Make_Attach_Call): Removed.
2880 (Make_Call): New routine.
2881 (Make_Clean): Removed.
2882 (Make_Deep_Array_Body): Rewritten to simply invoke the appropriate
2884 (Make_Deep_Proc): Rewritten to generate the new profile signature used
2886 (Make_Deep_Record_Body): Rewritten to simply invoke the appropriate
2888 (Make_Final_Call): Modified to simply create a call to either
2889 Deep_Finalize or Finalize.
2890 (Make_Finalize_Address_Body): New routine.
2891 (Make_Finalize_Address_Stmts): New routine. A function which produces
2892 TSS primitive Finalize_Address used in conjunction with heap allocated
2894 (Make_Handler_For_Ctrl_Operation): Add specialized code for .NET/JVM.
2895 (Make_Init_Call): Rewritten. There is no longer an attach call
2896 generated after initialization.
2897 (Make_Local_Deep_Finalize): New routine.
2898 (Make_Set_Finalize_Address_Ptr_Call): New routine.
2899 (Make_Transient_Block): Remove the finalization list retrieval and
2901 (Needs_Finalization): Moved to Exp_Util.
2902 (Parent_Field_Type): New routine.
2903 (Preprocess_Components): New routine.
2904 (Process_Transient_Objects): New routine.
2905 (Wrap_HSS_In_Block): New routine.
2906 (Wrap_Transient_Declaration): Remove finalization list management and
2907 controller insertion.
2908 (Wrap_Transient_Expression): Code reformatting.
2909 (Wrap_Transient_Statement): Code reformatting.
2910 * exp_ch7.ads (Build_Final_List): Removed.
2911 (Build_Finalization_Collection): New routine.
2912 (Build_Raise_Statement): New routine.
2913 (Controller_Component): Removed.
2914 (Expand_Ctrl_Function_Call): Moved to Exp_Ch6.
2915 (Find_Final_List): Removed.
2916 (In_Finalization_Root): Removed.
2917 (Is_Simple_Protected_Type): Update related comment.
2918 (Make_Adjust_Call): New parameter profile and associated comments.
2919 (Make_Attach_Call): Removed.
2920 (Make_Final_Call): New parameter profile and associated comments.
2921 (Make_Finalize_Address_Body): New routine.
2922 (Make_Init_Call): New parameter profile and associated comments.
2923 (Make_Local_Deep_Finalize): New routine.
2924 (Make_Set_Finalize_Address_Ptr_Call): New routine.
2925 (Needs_Finalization): Moved to Exp_Util.
2926 * exp_ch9.adb (Add_Object_Pointer): Code reformatting.
2927 (Expand_N_Protected_Body): Remove the handling of finalization lists.
2928 (Find_Protection_Type): Moved to Exp_Util.
2929 * exp_disp.adb: Remove with and use clauses for Exp_Ch7.
2930 (Make_DT): Update sequence of dispatch table initialization. Remove the
2931 initialization of field RC_Offset. Add initialization of field Needs_
2933 * exp_intr.adb (Expand_Unc_Deallocation): Code reformatting.
2934 Reimplement how an object is first finalized, then deallocated.
2935 * exp_strm.adb (Build_Record_Or_Elementary_Input_Function):
2937 * exp_tss.ads: Add special suffix for TSS primitive Finalize_Address.
2938 Register TSS_Finalize_Address with type TSS_Names.
2939 * exp_util.adb (Build_Allocate_Deallocate_Proc): New routine. This core
2940 procedure provides the interface between an allocation / deallocation
2941 and the support machinery in Ada.Finalization.Heap_Management.
2942 (Find_Init_Call): Code reformatting.
2943 (Find_Init_Call_In_List): Code reformatting.
2944 (Find_Protection_Type): Moved from Exp_Ch9.
2945 (Find_Prim_Op): Reimplement to add preference of recovered primitive.
2946 (Has_Controlled_Coextensions): Removed.
2947 (Has_Controlled_Objects): New routine.
2948 (In_Library_Level_Package_Body): New routine.
2949 (Insert_Action_After): New routine.
2950 (Is_Finalizable_Transient): New routine. This predicate determines
2951 whether an object declaration is one of the many variants of controlled
2953 (Is_Null_Access_BIP_Func_Call): New routine.
2954 (Is_Non_BIP_Func_Call): New routine.
2955 (Is_Related_To_Func_Return): New routine.
2956 (Needs_Finalization): Moved from Exp_Ch7.
2957 * exp_util.ads (Build_Allocate_Deallocate_Proc): New routine.
2958 (Find_Protection_Type): Moved from Exp_Ch9.
2959 (Has_Controlled_Coextensions): Removed.
2960 (Has_Controlled_Objects): New routine.
2961 (In_Library_Level_Package_Body): New routine.
2962 (Insert_Action_After): New routine.
2963 (Is_Finalizable_Transient): New routine.
2964 (Is_Null_Access_BIP_Func_Call): New routine.
2965 (Is_Non_BIP_Func_Call): New routine.
2966 (Is_Related_To_Func_Return): New routine.
2967 (Needs_Finalization): Moved from Exp_ch7.
2968 * expander.adb (Expand): Add a case for N_Free_Statement.
2969 * freeze.adb (Freeze_All): Replace the generation of a finalization
2970 list with a collection for access-to-controlled types.
2971 (Freeze_Entity): Code reformatting.
2972 (Freeze_Record_Type): Remove the freezing of a record controller
2974 (Freeze_Subprogram): Code reformatting.
2975 * inline.adb (Cleanup_Scopes): Remove the reset of the scope
2977 * lib-writ.adb (Write_Unit_Information): Output "PF" when a package
2978 has a library-level finalizer.
2979 * lib-writ.ads: Add "PF" to the sequence of unit attributes.
2980 * a-filico.ads, a-filico.adb, s-finimp.ads, s-finimp.adb: Removed.
2981 * Makefile.rtl: Remove a-filico and s-finimp from the list of object
2982 files. Add a-fihema to the list of object files.
2984 Alphabetize the associations in type Is_Parameterless_Attribute.
2985 * rtsfind.ads: Ada.Finalization_List.Controller and
2986 System.Finalization_Implementation are no longer a GNAT unit.
2987 Update the range of type Ada_Finalization_Child. Remove the following
2988 recoverable entities:
2990 RE_Attach_To_Final_List
2994 RE_Finalizable_Ptr_Ptr
2995 RE_Global_Final_List
2996 RE_Limited_Record_Controller
2999 RE_Record_Controller
3000 RE_Simple_List_Controller
3002 Add the following recoverable entities:
3004 RE_Add_Offset_To_Address
3008 RE_Exception_Identity
3009 RE_Finalization_Collection
3010 RE_Finalization_Collection_Ptr
3011 RE_Needs_Finalization
3012 RE_Save_Library_Occurrence
3013 RE_Set_Finalize_Address_Ptr
3014 RE_Set_Storage_Pool_Ptr
3016 * sem_aggr.adb (Resolve_Record_Aggregate): Remove mention of
3018 * sem_aux.adb (First_Discriminant): Remove mention of Name_uController.
3019 (First_Stored_Discriminant): Remove the mention of Name_uController.
3020 * sem_aux.ads: Comment reformatting.
3021 * sem_ch10.adb (Build_Chain): Signal the class-wide creation machinery
3022 to redecorate an already existing class-wide type.
3023 (Decorate_Tagged_Type): New parameter profile and associated comment.
3024 Create a "shadow class-wide type" for a shadow entity.
3025 * sem_ch11.adb (Analyze_Exception_Handlers): Remove the dubious setting
3026 of the final chain along with the associated comment.
3027 * sem_ch3.adb (Access_Type_Declaration): Add new local variable
3028 Full_Desig and set it to the full view of the designated type.
3029 Initialize the finalization collection to empty.
3030 (Build_Derived_Record_Type): Alphabetize local variables. Code
3032 (Collect_Fixed_Components): Remove the mention of Name_uController.
3033 (Create_Constrained_Components): Remove the mention of Name_uController.
3034 (Make_Class_Wide_Type): Add specialized code to redecorate an existing
3035 class-wide type of a shadow entity.
3036 (Process_Full_View): Update the machinery which marks type
3037 Limited_Controlled's entity as limited.
3038 * sem_ch4.adb (Analyze_One_Call): Code reformatting.
3039 * sem_ch6.adb (Create_Extra_Formals): Do not generate a finalization
3040 list, instead make a collection build-in-place formal.
3041 * sem_ch8.adb (Analyze_Object_Renaming): Look at the available view of
3042 a designated type in order to establish a match between the renaming
3043 and the renamed entity.
3044 (Find_Selected_Component): Add guard to prevent spurious exceptions
3045 from being raised on .NET/JVM.
3046 * sem_disp.adb (Check_Dispatching_Operation): Include Finalize_Address
3047 to the list of primitive that need special processing. Update arrays
3048 C_Names and D_Names.
3049 (Replace_Types): Handle class-wide types.
3050 * sem_elab.adb (Check_A_Call): Since Deep_Initialize now has a
3051 different parameter profile, look at the first formal.
3052 * sem_prag.adb: Remove with and use clauses for Exp_Ch7. Add with and
3053 use clauses for Exp_Util.
3054 * sem_res.adb: Remove with and use clauses for Elists.
3055 (Propagate_Coextensions): Removed.
3056 (Resolve_Allocator): Do not propagate the list of coextensions from one
3057 allocator to another.
3058 * sem_util.adb (Build_Actual_Subtype_Of_Component): Rename variable
3059 Deaccessed_T to Desig_Typ.
3060 (Enter_Name): Remove the mention of Name_uController.
3061 (Gather_Components): Remove the mention of Name_uController.
3062 (Incomplete_Or_Private_View): New routine.
3063 (Is_Coextension_Root): Removed.
3064 (Is_Fully_Initialized_Type): Remove the mention of Name_uController.
3065 * sem_util.ads (Incomplete_Or_Private_View): New routine.
3066 (Is_Coextension_Root): Removed.
3067 * s-finroo.ads: Remove with clause for Ada.Unchecked_Conversion.
3068 Controlled types are now derived from a null tagged record. Remove
3069 types Finalizable_Ptr, Finalizable and Empty_Root_Controlled.
3070 * sinfo.adb (Coextensions): Removed.
3071 (Set_Coextensions): Removed.
3072 * sinfo.ads: Remove Coextensions from the explanation of node fields
3073 and its uses in nodes.
3074 Update the field usage of N_Allocator.
3075 (Coextensions): Removed along with its pragma Inline.
3076 (Set_Coextensions): Removed along with its pragma Inline.
3077 * snames.ads-tmpl: Remove names
3082 Name_uLocal_Final_List
3083 Name_Finalization_Root
3090 Name_Finalize_Address
3091 * s-pooglo.adb (Allocate): Add overriding indicator.
3092 (Deallocate): Add overriding indicator.
3093 (Storage_Size): Add overriding indicator.
3094 * s-soflin.adb (Adafinal_NT): Invoke Finalize_Library_Objects rather
3095 than Finalize_Global_List.
3096 (Null_Finalize_Global_List): Removed.
3097 (Save_Library_Occurrence): New routine.
3098 * s-soflin.ads: Remove variable Finalize_Global_List along with its
3099 initialization. Add variable Finalize_Library_Objects along with its
3100 pragma Export. Add variables Library_Exception and
3101 Library_Exception_Set along with their pragma Export.
3102 (Null_Finalize_Global_List): Removed.
3103 (Save_Library_Occurrence): New routine.
3104 * s-tassta.adb (Finalize_Global_Tasks): Call Finalize_Library_Objects
3105 rather than Finalize_Global_List.
3106 * tbuild.adb (Unchecked_Convert_To): Capture and set the parent field
3107 of the constructed node.
3109 2011-08-03 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
3111 * link.c: Include "auto-host.h" before system headers.
3113 2011-08-03 Vincent Celier <celier@adacore.com>
3115 * make.adb (Gnatmake): Add to table Library_Projs only library projects
3116 that are not extended. Do not check if a library project that is
3117 extended should be regenerated. Do not add to table Library_Paths the
3118 libraries that are in extended projects. Link only with libraries that
3119 are in libray projects that are not extended.
3120 * prj-nmsc.adb (Check_Library_Attributes): Do not reset flag Library
3121 for a library project that is extended.
3123 2011-08-03 Gary Dismukes <dismukes@adacore.com>
3125 * sem_ch6.adb (Find_Corresponding_Spec): When in an instance, skip
3126 conforming subprogram renamings that appear to be completions if they
3127 are not fully conformant.
3128 Such renamings are homographs but not completions.
3129 * sem_type.adb (Disambiguate): Handle disambiguation of overloaded
3130 names in a subprogram renaming that appears in an instance.
3132 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3134 * exp_util.adb (Expand_Subtype_From_Expr): if the type is limited but
3135 not immutably limited, build actual subtype from expression to provide
3136 proper bounds to caller.
3138 2011-08-03 Gary Dismukes <dismukes@adacore.com>
3140 * sem_ch8.adb: Minor comment correction.
3142 2011-08-03 Thomas Quinot <quinot@adacore.com>
3144 * exp_strm.adb (Build_Array_Input_Function): In Ada 2005 mode, when
3145 returning a limited array, use an extended return statement.
3147 2011-08-03 Vincent Celier <celier@adacore.com>
3149 * make.adb (Initialize): If --subdirs= is used, but no project file is
3150 specified, attempt to create the specify subdir if it does not already
3151 exist and use it as the object directory as if -D had been specified.
3153 2011-08-03 Arnaud Charlet <charlet@adacore.com>
3155 * s-tpopsp-vms.adb: New file.
3156 * s-taprop-vms.adb: Put back ATCB_Key, since needed by this file on VMS.
3157 * gcc-interfaces/Makefile.in: Use s-taprop-vms.adb on VMS.
3159 2011-08-03 Emmanuel Briot <briot@adacore.com>
3161 * make.adb, makeutl.adb, makeutl.ads, clean.adb (Makeutl.Queue): new
3164 2011-08-03 Yannick Moy <moy@adacore.com>
3166 * cstand.adb (Create_Standard): select Universal_Integer as an ALFA type
3167 * sem_ch3.adb (Array_Type_Declaration): detect array types in ALFA
3168 * sem_util.adb, sem_util.ads (Has_Static_Array_Bounds): new function to
3169 detect that an array has static bounds.
3171 2011-08-03 Thomas Quinot <quinot@adacore.com>
3173 * exp_dist.adb: Minor reformatting.
3175 2011-08-03 Arnaud Charlet <charlet@adacore.com>
3177 * s-taprop-irix.adb, s-taprop-hpux-dce.adb, s-taprop-vms.adb
3178 (ATCB_Key): Removed, not always used.
3180 2011-08-03 Emmanuel Briot <briot@adacore.com>
3182 * gnatcmd.adb, make.adb, prj.adb, prj.ads, makeutl.adb, makeutl.ads,
3183 clean.adb, prj-conf.adb, prj-env.adb, prj-env.ads (Makeutl): remove
3184 most remaining global variables.
3186 2011-08-03 Robert Dewar <dewar@adacore.com>
3188 * gnatcmd.adb, prj-proc.adb, mlib-prj.adb, prj.adb, makeutl.ads,
3189 prj-util.adb, prj-util.ads, prj-conf.adb, prj-env.adb: Minor
3192 2011-08-03 Javier Miranda <miranda@adacore.com>
3194 * exp_util.adb (Is_VM_By_Copy_Actual): Include N_Slide nodes as actuals
3195 that must be passed by copy in VM targets.
3197 2011-08-03 Emmanuel Briot <briot@adacore.com>
3199 * prj.ads, prj-nmsc.adb (Files_Htable): removed this htable, which
3200 duplicates a similar htable now in the project tree.
3202 2011-08-03 Claire Dross <dross@adacore.com>
3204 * a-cfdlli.adb, a-cfhama.adb, a-cfhase.adb, a-cforma.adb, a-cforse.adb,
3205 a-cofove.adb ("=", Length, Is_Empty, Clear, Assign, Copy, Element,
3206 Replace_Element, Query_Element, Update_Element, Move, Insert, Prepend,
3207 Append, Delete, Delete_First, Delete_Last, Reverse_Element, Swap,
3208 Splice, First, First_Element, Last, Last_Element, Next, Previous, Find,
3209 Reverse_Find, Contains, Has_Element, Iterate, Reverse_Iterate, Capacity,
3210 Reserve_Length, Length, Strict_Equal, Left, Right): Data-structure
3213 2011-08-03 Arnaud Charlet <charlet@adacore.com>
3215 * s-taprop-posix.adb, s-taprop-linux.adb, s-taprop-tru64.adb
3216 (ATCB_Key): Removed, not always used.
3217 * s-tpopsp-posix.adb, s-tpopsp-posix-foreign.adb (ATCB_Key): Moved from
3219 * s-tpopsp-tls.adb: New file.
3220 * gcc-interface/Makefile.in: Use TLS implementation of s-tpopsp.adb on
3221 x86/x64/ia64/powerpc/sparc Linux.
3223 2011-08-03 Arnaud Charlet <charlet@adacore.com>
3225 * system-aix.ads, system-aix64.ads: Set ZCX_By_Default to True.
3226 * gcc-interface/Makefile.in: Switch to ZCX by default on AIX ports.
3228 2011-08-03 Thomas Quinot <quinot@adacore.com>
3230 * rtsfind.ads, exp_dist.adb, exp_dist.ads
3231 (Build_From_Any_Call, Build_To_Any_Call, Build_TypeCode_Call):
3232 Fix type selection for mapping integer types to PolyORB types.
3234 2011-08-03 Bob Duff <duff@adacore.com>
3236 * sem_ch7.adb: Minor comment clarification.
3238 2011-08-03 Bob Duff <duff@adacore.com>
3240 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): If we get
3241 an error analyzing a choice, skip further processing. Further
3242 processing could cause a crash or cascade errors.
3244 2011-08-03 Emmanuel Briot <briot@adacore.com>
3246 * gnatcmd.adb, prj-proc.adb, prj-proc.ads, make.adb, mlib-prj.adb,
3247 prj.adb, prj.ads, makeutl.adb, makeutl.ads, clean.adb, prj-nmsc.adb,
3248 prj-util.adb, prj-util.ads, prj-conf.adb, prj-conf.ads, prj-env.adb,
3249 prj-env.ads (Shared_Project_Tree_Data): new type
3250 An aggregate project and its aggregated trees need to share the common
3251 data structures used for lists of strings, packages,... This makes the
3252 code simpler since otherwise we have to pass the root tree (also used
3253 for the configuration file data) in addition to the current project
3254 tree. This also avoids ambiguities as to which tree should be used.
3255 And finally this saves a bit of memory.
3256 (For_Every_Project_Imported): new parameter Tree.
3257 Since aggregated projects are using a different tree, we need to let
3258 the caller know which tree to use to manipulate the returned project.
3260 2011-08-03 Robert Dewar <dewar@adacore.com>
3262 * prj-proc.adb, exp_util.ads, exp_ch9.adb, make.adb, prj-ext.adb,
3263 prj-ext.ads, alfa.ads, sem_ch4.adb, makeutl.adb, makeutl.ads,
3264 lib-xref-alfa.adb, sem_cat.adb, exp_dist.adb, get_alfa.adb,
3265 prj-env.adb, prj-env.ads, prj-tree.adb, alfa.ads: Minor reformatting.
3267 2011-08-03 Javier Miranda <miranda@adacore.com>
3269 * exp_util.adb, sem_aux.adb, exp_util.ads, sem_aux.ads:
3270 Move routine Is_VM_By_Copy_Actual from sem_aux to exp_util.
3272 2011-08-03 Bob Duff <duff@adacore.com>
3274 * sem_ch8.adb (Is_Primitive_Operator_In_Use): Always check In_Use on
3277 2011-08-03 Joel Brobecker <brobecker@adacore.com brobecker>
3279 * g-sha256.ads, g-sha512.ads, g-sha1.ads, g-sha224.ads, g-sha384.ads,
3280 g-sehash.ads: Fix typo. Update header.
3282 2011-08-03 Thomas Quinot <quinot@adacore.com>
3284 * exp_ch6.adb (Expand_Actuals): Remove Ada_2005 guard on build-in-place
3287 2011-08-03 Gary Dismukes <dismukes@adacore.com>
3289 * sem_ch4.adb (Analyze_Overloaded_Selected_Component): Consider
3290 prefixes of private types along with records, since the selector may be
3292 * sem_res.adb (Resolve_Selected_Component): Consider prefixes of
3293 private types along with records, since the selector may be a
3296 2011-08-03 Emmanuel Briot <briot@adacore.com>
3298 * prj-pp.adb (Pretty_Print): Remove trailing blank line.
3300 2011-08-03 Javier Miranda <miranda@adacore.com>
3302 * sem_aux.adb (Is_VM_By_Copy_Actual): Fix wrong use of
3303 Tagged_Type_Expansion.
3305 2011-08-03 Yannick Moy <moy@adacore.com>
3307 * sem_res.adb (Resolve_Op_Concat_Arg): Do not issue a SPARK
3308 violation when the argument of concatenation is the name of a
3311 2011-08-03 Emmanuel Briot <briot@adacore.com>
3313 * prj-proc.adb, prj-ext.adb, prj-ext.ads, prj-env.adb, prj-env.ads,
3314 prj-tree.adb, prj-tree.ads (Initialize_And_Copy, Copy): new subprograms
3315 (Process_Declarative_Items): new parameter Child_Env.
3317 2011-08-03 Yannick Moy <moy@adacore.com>
3319 * alfa.ads: Update format of ALFA section in ALI file in order to
3320 add a mapping from bodies to specs when both are present.
3321 (ALFA_Scope_Record): Add components for spec file/scope.
3322 * get_alfa.adb (Get_ALFA): Read the new file/scope for spec when
3324 * lib-xref-alfa.adb (Collect_ALFA): After all scopes have been
3325 collected, fill in the spec information when relevant.
3326 * put_alfa.adb (Put_ALFA): Write the new file/scope for spec when
3329 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
3331 * inline.adb (Add_Inlined_Subprogram): Do not consider the enclosing
3332 code unit to decide whether to add internally generated subprograms.
3334 2011-08-03 Javier Miranda <miranda@adacore.com>
3336 * sem_aux.ads, sem_aux.adb (Is_VM_By_Copy_Actual): New subprogram.
3337 * exp_ch9.adb (Build_Simple_Entry_Call): Handle actuals that must
3338 be handled by copy in VM targets.
3340 2011-08-03 Emmanuel Briot <briot@adacore.com>
3342 * make.adb, makeutl.adb, makeutl.ads (Make.Switches_Of): Share
3343 code with Makeutl.Get_Switches.
3344 * prj-tree.adb: Update comment.
3346 2011-08-03 Thomas Quinot <quinot@adacore.com>
3348 * sem_cat.adb (Validate_RCI_Subprogram_Declaration): Reject a remote
3349 subprogram with a limited formal that does not support external
3352 2011-08-03 Yannick Moy <moy@adacore.com>
3354 * get_alfa.adb (Get_ALFA): add missing Skip_Spaces at start of
3356 * lib-xref-alfa.adb (Add_ALFA_File): split removal of scopes that are
3357 not from current unit in two phases, because it is not possible to
3358 change the table while iterating over its content.
3359 * put_alfa.adb (Put_ALFA): reset current file/scope at each new entity
3361 2011-08-03 Sergey Rybin <rybin@adacore.com>
3363 * vms_data.ads: Add qualifier for gnatmetric --no-static-loop option
3364 * gnat_ugn.texi: Update description of complexity metrics (gnatmetric)
3366 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3368 * sem_res.adb (Resolve_Op_Concat_Arg): if the argument is an aggregate
3369 and the component type is composite, this is ambiguous for predefined
3370 concatenation, but if the node is not overloaded and the entity is a use
3371 -defined function its profile can be used to resolve that aggregate.
3373 2011-08-03 Robert Dewar <dewar@adacore.com>
3375 * exp_ch4.adb: Minor code cleanup.
3377 2011-08-03 Thomas Quinot <quinot@adacore.com>
3379 * exp_dist.adb: Do not generate distribution stubs if serious errors
3380 have been diagnosed.
3382 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3384 * sem_ch4.adb (Try_Primitive_Operation): when checking the validity of
3385 the first formal of a primitive operation, go to the base type to
3386 handle properly an access to a derived type with constrained
3388 * sem_type.adb (Disambiguate): an immediately visible operator hides a
3389 user-defined function that is only use-visible.
3391 2011-08-03 Robert Dewar <dewar@adacore.com>
3393 * sem_aggr.adb, sem_ch3.adb, lib.ads, gnatcmd.adb, prj-proc.adb,
3394 make.adb, lib-writ.adb, prj-part.adb, prj-part.ads, prj-ext.adb,
3395 fname-uf.adb, prj-ext.ads, prj.adb, prj.ads, sem_attr.adb, alfa.adb,
3396 prj-makr.adb, errout.adb, makeutl.adb, makeutl.ads, restrict.ads,
3397 sem_ch6.adb, g-pehage.adb, clean.adb, put_alfa.adb, lib-xref-alfa.adb,
3398 prj-nmsc.adb, prj-nmsc.ads, sem_ch8.adb, prj-pars.ads, exp_aggr.adb,
3399 prj-attr.ads, sem_ch13.adb, get_alfa.adb, prj-env.adb, prj-env.ads,
3400 alfa_test.adb, prj-tree.adb, prj-tree.ads, einfo.ads: Minor reformatting
3402 2011-08-03 Robert Dewar <dewar@adacore.com>
3404 * repinfo.adb (List_Mechanism): Add handling of
3405 Convention_Ada_Pass_By_XXX.
3406 * sem_mech.adb (Set_Mechanism): Ditto.
3407 * sem_prag.adb (Process_Convention): Add entries for
3408 Convention_Ada_Pass_By_XXX.
3409 * snames.adb-tmpl, snames.ads-tmpl: Ditto.
3411 2011-08-03 Pascal Obry <obry@adacore.com>
3413 * makeutl.adb: Minor reformatting.
3415 2011-08-03 Vincent Celier <celier@adacore.com>
3418 (Get_File_Name) If the file cannot be found when there are no config
3419 pragmas file and May_Fail is True, return No_File instead of the file
3420 name, to be consistent.
3422 2011-08-03 Pascal Obry <obry@adacore.com>
3424 * adaint.c (__gnat_is_executable_file_attr): Avoid access
3427 2011-08-03 Javier Miranda <miranda@adacore.com>
3430 (Same_Representation): In VM targets the representation of arrays with
3431 aliased components differs from arrays with non-aliased components.
3433 2011-08-03 Emmanuel Briot <briot@adacore.com>
3435 * prj-proc.adb, prj-attr.adb, prj-attr.ads (Get_Attribute_Index): do
3436 not systematically lower case attribute indexes that contain no "."
3437 Fix definition of several Naming attributes, which take
3438 a unit name as index and therefore should be case insensitive.
3439 Minor refactoring (reduce length of variable names).
3441 2011-08-03 Emmanuel Briot <briot@adacore.com>
3443 * makeutl.adb, makeutl.ads (Get_Switches): new subprogram.
3445 2011-08-03 Emmanuel Briot <briot@adacore.com>
3447 * gnatcmd.adb, prj-proc.adb, prj-proc.ads, make.adb, prj-part.adb,
3448 prj-part.ads, switch-m.adb, switch-m.ads, prj-makr.adb, clean.adb,
3449 prj-pars.adb, prj-pars.ads, prj-conf.adb, prj-conf.ads, prj-tree.adb,
3450 prj-tree.ads (Prj.Tree.Environment): new type.
3452 2011-08-03 Emmanuel Briot <briot@adacore.com>
3454 * prj-proc.adb, prj.ads, makeutl.adb, makeutl.ads, prj-conf.adb,
3455 prj-tree.adb, prj-tree.ads (Environment): new type.
3457 2011-08-03 Emmanuel Briot <briot@adacore.com>
3459 * prj-tree.ads: Remove unused variable.
3461 2011-08-03 Yannick Moy <moy@adacore.com>
3463 * restrict.adb (Restriction_Msg): set "SPARK" all in upper case for
3464 issuing messages related to SPARK restriction violation.
3466 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3468 * sem_ch6.adb: guard against error nodes in return statements.
3470 2011-08-03 Arnaud Charlet <charlet@adacore.com>
3472 * errout.adb (Error_Msg_Internal): the main unit has not been read yet,
3473 a warning can only appear on a configuration file, so emit warning
3474 without further checks.
3476 2011-08-03 Arnaud Charlet <charlet@adacore.com>
3478 * s-interr.ads: add overriding keyword.
3480 2011-08-03 Geert Bosch <bosch@adacore.com>
3482 * exp_attr.adb: Fix minor typo.
3484 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3486 * par-ch4.adb: improve error recovery.
3488 2011-08-03 Emmanuel Briot <briot@adacore.com>
3490 * prj-part.adb, prj-part.ads, prj-makr.adb, prj-pars.adb, prj-conf.adb,
3491 prj-env.adb (Prj.Part.Parse): change parameter Always_Errout_Finalize
3494 2011-08-03 Emmanuel Briot <briot@adacore.com>
3496 * prj-dect.adb (Parse_Attribute_Declaration): make sure we can use
3497 "external" as an attribute name in aggregate projects.
3499 2011-08-03 Jose Ruiz <ruiz@adacore.com>
3501 * s-taprop-vxworks.adb: (Create_Task, Initialize): Ada 2012 pragma CPU
3502 uses CPU numbers starting 1, while VxWorks uses CPU numbers starting
3503 from 0, so we need to adjust.
3505 2011-08-03 Emmanuel Briot <briot@adacore.com>
3507 * prj-proc.adb, prj-ext.adb, prj-ext.ads, makeutl.adb, prj-tree.adb,
3508 prj-tree.ads, gnatcmd.adb, clean.adb (External_References): new type.
3510 2011-08-03 Yannick Moy <moy@adacore.com>
3512 * sem_ch6.adb (New_Overloaded_Entity): only issue error for SPARK
3513 restriction on overloaded entity if the entity is not an operator.
3515 2011-08-03 Yannick Moy <moy@adacore.com>
3517 * sem_ch7.adb, sem_res.adb, sem_attr.adb, restrict.adb,
3518 restrict.ads: Rename remaining Check_Formal_Restriction* into
3519 Check_SPARK_Restriction*.
3521 2011-08-03 Emmanuel Briot <briot@adacore.com>
3523 * prj-proc.adb, prj-part.adb, prj.adb, prj.ads, prj-nmsc.adb,
3524 prj-nmsc.ads, prj-err.adb (Project_Data): now discriminated on its
3526 (Project_Empty): removed
3527 (Empty_Project): new parameter Qualifier
3528 This is used to have fields specific to aggregate projects, cleaner
3529 New field to store the list of aggregated projects.
3530 (Check_Aggregate_Project): removed
3531 (Process_Aggregated_Projects, Free): new subprograms.
3533 2011-08-03 Olivier Hainque <hainque@adacore.com>
3535 * tracebak.c (STOP_FRAME ppc AIX): Stop at null return address as well.
3537 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3539 * sem_ch8.adb (Analyze_Object_Renaming): if the renamed object is an
3540 explicit dereference of an unconstrained type, create a constrained
3541 subtype for it, as is done for function calls that return an
3544 2011-08-03 Thomas Quinot <quinot@adacore.com>
3546 * g-pehage.adb (Finalize): Avoid possible double-free.
3548 2011-08-03 Steve Baird <baird@adacore.com>
3550 * exp_attr.adb (Expand_N_Attribute_Reference): Don't expand
3551 Elab_Spec/Body attrs in CodePeer_Mode.
3553 2011-08-03 Javier Miranda <miranda@adacore.com>
3555 * exp_aggr.adb (Flatten): Convert to positional form aggregates whose
3556 low bound is not known at compile time but they have no others choice.
3557 Done because in this case the bounds can be obtained directly from the
3560 2011-08-03 Ed Falis <falis@adacore.com>
3562 * s-tasinf-vxworks.ads: Update comment to reflect 0 indexing of CPUs
3563 on VxWorks SMP. Remove unusable constant ANY_CPU.
3565 2011-08-03 Emmanuel Briot <briot@adacore.com>
3567 * gnatcmd.adb, make.adb, prj-part.adb, prj-part.ads, prj-makr.adb,
3568 clean.adb, prj-nmsc.adb, prj-pars.adb, prj-conf.adb, prj-env.adb,
3569 prj-env.ads (Prj.Env.Initialize_Default_Project_Path,
3570 Prj.Env.Initialize_Empty): new subprograms
3571 (Get_Env, Find_Project): remove parameter Target_Name.
3573 2011-08-03 Gary Dismukes <dismukes@adacore.com>
3575 * sem_ch3.adb (Build_Derived_Record_Type): Test the Derive_Subps formal
3576 as a condition for the delayed call to Derived_Subprograms done for the
3577 case of the rewriting of a derived type that constrains the
3578 discriminants of its parent type.
3579 Avoids redundant subprogram derivations for private subtype derivations.
3581 2011-08-03 Javier Miranda <miranda@adacore.com>
3583 * exp_aggr.adb (Init_Hidden_Discriminants): New subprogram of
3584 Build_Record_Aggr_Code.
3585 (Build_Record_Aggr_Code): Add missing support to initialize hidden
3586 discriminants in extension aggregates.
3588 2011-08-03 Emmanuel Briot <briot@adacore.com>
3590 * prj-pp.adb (Print): also output project qualifiers, since in
3591 particular "aggregate" is mandatory in an aggregate project.
3593 2011-08-03 Emmanuel Briot <briot@adacore.com>
3595 * prj-part.adb, prj.adb, prj.ads, prj-nmsc.adb, prj-env.adb:
3596 (Debug_Output): new function.
3598 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
3600 * gnat_ugn.texi: Document -Wstack-usage.
3601 * gcc-interface/misc.c (enumerate_modes): Add guard for ghost FP modes.
3603 2011-08-03 Thomas Quinot <quinot@adacore.com>
3605 * sem_prag.adb Issue an error (not a warning) when a C++ type does not
3606 have keyword LIMITED.
3608 2011-08-03 Yannick Moy <moy@adacore.com>
3610 * alfa.adb, alfa.ads, alfa_test.adb: New files.
3611 * ali.adb (Known_ALI_Lines): add 'C' lines (SCO) and 'F' lines (ALFA)
3612 (Scan_ALI): do not issue a fatal error if parsing known lines after Xref
3613 section (does not happen in compiler, only if code directly calls
3615 * get_alfa.adb, get_alfa.ads: New files.
3616 * lib-writ.adb, lib-writ.ads (Write_ALI): output ALFA information if
3618 * lib-xref-alfa.adb: New file.
3619 * lib-xref.adb, lib-xref.ads
3620 (Xref_Entry): redefine information needed in cross-references for ALFA.
3621 Push ALFA treatments in separated local package.
3622 (Enclosing_Subpragram_Or_Package): treat specially subprogram
3623 identifiers. Return entity of package body instead of spec. Return
3624 Empty for a scope with no location.
3625 (Generate_Reference): adapt to new components for ALFA information.
3626 Remove the need for D references on definitions.
3627 (Is_Local_Reference): moved to ALFA local package
3628 (Output_References): extract subfunction as Extract_Source_Name
3629 (Output_Local_References): remove procedure, replaced by filtering of
3630 cross-references in package ALFA and printing in Put_ALFA.
3631 (Write_Entity_Name): remove procedure
3632 * lib.adb, lib.ads (Extract_Source_Name): extract here function to
3633 print exact name of entity as it appears in source file
3634 (Unit_Ref_Table): make type public for use in Lib.Xref.ALFA
3635 * put_alfa.adb, put_alfa.ads: New files.
3636 * xref_lib.adb (Search_Xref): protect read of cross-references against
3637 reading other sections of the ALI file, in gnatxref
3638 (Search): protect read of cross-references against reading other
3639 sections of the ALI file, in gnatfind.
3640 * gcc-interface/Make-lang.in: Update dependencies.
3642 2011-08-03 Thomas Quinot <quinot@adacore.com>
3644 * sem_ch3.adb: Minor reformatting.
3646 2011-08-03 Jose Ruiz <ruiz@adacore.com>
3648 * s-inmaop-vxworks.adb (Setup_Interrupt_Mask): Do nothing instead of
3649 raising an exception.
3651 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3653 * sem_res.adb (Set_String_Literal_Subtype): if index type is an integer
3654 type, always use 1 as the lower bound or string, even if lower bound of
3655 context is not static, to handle properly null strings in a non-static
3658 2011-08-03 Bob Duff <duff@adacore.com>
3660 * sem_prag.adb (Resolve_Aggregate): An array aggregate with 'others' is
3661 always legal on the right-hand side of an assignment statement; there
3662 is always an applicable index constraint in this case. Therefore, the
3663 check for Pkind = N_Assignment_Statement is now unconditional -- it
3664 doesn't depend on whether Is_Constrained (Typ).
3666 2011-08-03 Robert Dewar <dewar@adacore.com>
3668 * exp_ch5.adb, sem_prag.adb, exp_ch4.adb: Minor reformatting.
3670 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3672 * sem_ch3.adb (Build_Itype_Reference): do not create an itype reference
3673 for an itype created within a generic unit.
3675 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
3677 * gnat_ugn.texi (Switches for gcc): Make it clearer that -fno-inline
3678 suppresses all inlining.
3680 2011-08-03 Robert Dewar <dewar@adacore.com>
3682 * sem_ch3.adb, sem_res.adb, exp_ch13.adb, exp_disp.adb,
3683 exp_aggr.adb: Minor reformatting.
3685 2011-08-03 Thomas Quinot <quinot@adacore.com>
3687 * exp_ch5.adb (Expand_N_Assignment_Statement): Do not force inlining of
3688 tagged assignment when discriminant checks are suppressed. This is
3689 useless and extremely costly in terms of static stack usage.
3691 2011-08-03 Bob Duff <duff@adacore.com>
3693 * sem_prag.adb (Get_Base_Subprogram): Do not follow Alias for instances
3694 of generics, because this leads to the wrong entity in the wrong scope,
3695 causing (e.g.) pragma Export_Procedure to get an error if the entity is
3697 (Process_Interface_Name): Follow Alias for instances of generics, to
3698 correct for the above change.
3700 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3702 * exp_ch4.adb (Expand_N_Selected_Component): If the discriminant value
3703 is an integer literal it is always safe to replace the reference. In
3704 addition, if the reference appears in the generated code for an object
3705 declaration it is necessary to copy because otherwise the reference
3706 might be to the uninitilized value of the discriminant of the object
3709 2011-08-03 Pascal Obry <obry@adacore.com>
3711 * adaint.c (__gnat_is_executable_file_attr): Fix Win32 circuitry when no
3712 ACL used, in this case we want to check for ending .exe, not .exe
3713 anywhere in the path.
3715 2011-08-03 Sergey Rybin <rybin@adacore.com>
3717 * tree_io.ads (ASIS_Version_Number): Update because of the changes in
3718 the tree structure (semantic decoration of references to record
3721 2011-08-03 Gary Dismukes <dismukes@adacore.com>
3723 * sem_aggr.adb (Analyze_Array_Aggregate): When checking the discrete
3724 choices of a named array aggregate, bail out when any choices are
3725 marked as Errors_Posted.
3727 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3729 * exp_ch13.adb (Expand_N_Freeze_Entity): cleanup determination of scope
3730 in which entity is frozen, to handle properly loop variables in
3733 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3735 * sem_res.adb (Set_String_Literal_Subtype): if the lower bound of the
3736 subtype is not static, compute the upper bound using attributes, to
3737 handle properly index types that are not integer types.
3739 2011-08-03 Bob Duff <duff@adacore.com>
3741 * gnat_rm.texi, gnat_ugn.texi: Fix some dangling URLs.
3742 Update copyright notice.
3744 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3746 * sem_ch3.adb (Build_Discriminant_Constraints): Only use
3747 Original_Discriminant if within an instance.
3748 * sem_ch4.adb (Analyze_Selected_Component): Ditto.
3750 2011-08-03 Thomas Quinot <quinot@adacore.com>
3752 * einfo.ads: Minor reformatting.
3754 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3756 * exp_disp.adb (Check_Premature_Freezing): diagnose the presence of a
3757 composite type with an unfrozen subcomponent, in the profile of a
3758 primitive operation.
3760 2011-08-03 Robert Dewar <dewar@adacore.com>
3762 * sem_util.ads, exp_aggr.adb, exp_ch3.adb: Minor reformatting.
3764 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3766 * sem_ch3.adb (Analyze_Object_Declaration): if a constant object of an
3767 unconstrained type with discriminants is initialized with an aggregate,
3768 use the constrained subtype of the aggregate as the type of the object,
3769 because it is immutable, and this allows the back-end to generate no
3770 code for the object declaration.
3772 2011-08-03 Robert Dewar <dewar@adacore.com>
3774 * exp_ch4.adb (Optimize_Length_Check): Fix bad handling of case where
3775 comparison operand is variable, and turns out to be zero or negative.
3777 2011-08-03 Javier Miranda <miranda@adacore.com>
3780 (Expand_Dispatching_Constructor_Call): Disable expansion of
3781 code required for native targets. Done to avoid generating
3782 references to unavailable runtime entities in VM targets.
3784 (Expand_N_Object_Declaration): Add missing support to handle
3785 the explicit initialization of class-wide interface objects.
3788 2011-08-03 Matthew Heaney <heaney@adacore.com>
3790 * a-cobove.adb (Merge): Move source onto target, instead of using Assign
3792 2011-08-03 Matthew Heaney <heaney@adacore.com>
3794 * a-cbdlli.adb (Splice): move source items from first to last
3796 2011-08-03 Yannick Moy <moy@adacore.com>
3798 * sem_util.ads: comment added.
3800 2011-08-03 Javier Miranda <miranda@adacore.com>
3803 (Expand_Record_Aggregate): In VM targets disable the expansion into
3804 assignments of aggregates whose type is not known at compile time.
3806 2011-08-03 Ed Schonberg <schonberg@adacore.com>
3808 * exp_ch9.adb (Build_Renamed_Formal_Declaration): common procedure for
3809 protected entries and task entries, to build the proper renaming
3810 declaration for entry formals, used in debugging.
3811 * exp_ch2.adb (Expand_Entry_Parameter): handle task and entry
3812 parameters in the same way.
3814 2011-08-02 Robert Dewar <dewar@adacore.com>
3816 * a-direct.adb, sinfo.ads, exp_ch9.adb, scng.adb, sem_util.adb,
3817 sem_util.ads, restrict.ads, par-prag.adb: Minor reformatting and/or
3818 code reorganization.
3820 2011-08-02 Robert Dewar <dewar@adacore.com>
3822 * debug.adb: Debug flag d.P to suppress length comparison optimization
3823 * exp_ch4.adb (Optimize_Length_Comparison): New routine to optimize
3824 comparison of Length by comparing First/Last instead.
3826 2011-08-02 Matthew Heaney <heaney@adacore.com>
3828 * a-cobove.ads: Code clean up.
3830 2011-08-02 Vincent Celier <celier@adacore.com>
3832 * adaint.c (file_names_case_sensitive_cache): New static int.
3833 (__gnat_get_file_names_case_sensitive): Cache the return value in
3834 file_names_case_sensitive_cache at the first invocation, to avoid
3835 multiple calls to getenv.
3837 2011-08-02 Bob Duff <duff@adacore.com>
3839 * sem_ch12.adb (Validate_Derived_Type_Instance): Implement AI05-0218-1.
3841 2011-08-02 Yannick Moy <moy@adacore.com>
3843 * sem_ch3.adb, sem_ch5.adb, sem_ch9.adb, sem_prag.adb, sem.ads,
3844 sem_util.adb, sem_util.ads, sem_res.adb, sem_ch2.adb, sem_ch4.adb,
3845 sem_ch6.adb, sem_ch11.adb: Add semantic flag In_Pre_Post_Expression to
3846 indicate that we are in a precondition or postcondition. This is used in
3847 Mark_Non_ALFA_Subprogram (renaming of Mark_Non_ALFA_Subprogram_Body) to
3848 decide whether to flag the spec or body of the current subprogram as
3851 2011-08-02 Fabien Chouteau <chouteau@adacore.com>
3853 * impunit.adb: Add Ada.Execution_Time.Interrupts in the Ada2012 package
3855 * a-extiin.ads: New file.
3857 2011-08-02 Bob Duff <duff@adacore.com>
3859 * a-direct.adb (Rename): Implement AI05-0231-1. In particular, Rename
3860 now raises Name_Error instead of Use_Error in certain cases. The other
3861 parts of this AI were already implemented properly.
3863 2011-08-02 Vincent Celier <celier@adacore.com>
3865 * link.c: Only import "auto-host.h" when building the gnattools.
3867 2011-08-02 Yannick Moy <moy@adacore.com>
3869 * sem_util.adb: Inter-unit inlining does not work for a subprogram
3870 which calls a local subprogram, so extract subprogram
3871 from Mark_Non_ALFA_Subprogram_Body.
3873 2011-08-02 Javier Miranda <miranda@adacore.com>
3876 (Extract_Dispatching_Call): If the type of the dispatching object is an
3877 access type then return an explicit dereference in the Object out-mode
3880 2011-08-02 Gary Dismukes <dismukes@adacore.com>
3882 * sem_ch3.adb (Analyze_Subtype_Declaration): Generate range
3883 compatibility checks for all indexes of an array subtype, not just the
3884 first. Reset Has_Dynamic_Range_Check on the subtype before each
3885 potential check to ensure that Insert_Range_Checks will not elide any
3886 of the dynamic checks.
3888 2011-08-02 Yannick Moy <moy@adacore.com>
3890 * par-prag.ad (Process_Restrictions_Or_Restriction_Warnings): recognize
3891 SPARK restriction at parsing time.
3892 * scng.adb (Scan): Generate a token Tok_SPARK_Hide for a SPARK HIDE
3893 directive only if the SPARK restriction is set for this unit.
3895 2011-08-02 Yannick Moy <moy@adacore.com>
3897 * sem_ch3.adb, sem_ch5.adb, sem_ch9.adb, sem_util.adb, sem_util.ads,
3898 sem_res.adb, sem_ch2.adb, sem_ch4.adb, sem_ch6.adb,
3899 sem_ch11.adb: Protect call to Current_Subprogram which might be costly
3900 when repeated. Rename Current_Subprogram_Is_Not_In_ALFA into
3901 Mark_Non_ALFA_Subprogram_Body.
3902 Split body of Mark_Non_ALFA_Subprogram_Body to get body small and
3905 2011-08-02 Yannick Moy <moy@adacore.com>
3907 * sem_res.adb: Protect calls to Matching_Static_Array_Bounds which
3910 2011-08-02 Robert Dewar <dewar@adacore.com>
3912 * exp_ch9.adb, exp_sel.adb, restrict.ads, exp_disp.adb, erroutc.ads,
3913 exp_ch3.adb: Minor reformatting.
3915 2011-08-02 Emmanuel Briot <briot@adacore.com>
3917 * adaint.c (__gnat_locate_exec_on_path): only returns executable
3918 files, not any regular file.
3919 (__gnat_locate_file_with_predicate): new subprogram.
3921 2011-08-02 Yannick Moy <moy@adacore.com>
3923 * sinfo.adb, sinfo.ads: Restrict the use of flags
3924 Has_Dynamic_Length_Check and Has_Dynamic_Range_Check to expression
3925 nodes, plus N_Subtype_Declaration for the 2nd one.
3927 2011-08-02 Sergey Rybin <rybin@adacore.com>
3929 * gnat_rm.texi: Ramification of pragma Eliminate documentation
3930 - fix bugs in the description of Source_Trace;
3931 - get rid of UNIT_NAME;
3933 2011-08-02 Javier Miranda <miranda@adacore.com>
3936 (Build_Dispatching_Requeue): Adding support for VM targets
3937 since we cannot directly reference the Tag entity.
3938 * exp_sel.adb (Build_K): Adding support for VM targets.
3939 (Build_S_Assignment): Adding support for VM targets.
3941 (Default_Prim_Op_Position): In VM targets do not restrict availability
3942 of predefined interface primitives to compiling in Ada 2005 mode.
3943 (Is_Predefined_Interface_Primitive): In VM targets this service is not
3944 restricted to compiling in Ada 2005 mode.
3945 (Make_VM_TSD): Generate code that declares and initializes the OSD
3946 record. Needed to support dispatching calls through synchronized
3949 (Make_Predefined_Primitive_Specs): Enable generation of predefined
3950 primitives associated with synchronized interfaces.
3951 (Make_Predefined_Primitive_Bodies): Enable generation of predefined
3952 primitives associated with synchronized interfaces.
3954 2011-08-02 Yannick Moy <moy@adacore.com>
3956 * par-ch11.adb (P_Handled_Sequence_Of_Statements): mark a sequence of
3957 statements hidden in SPARK if preceded by the HIDE directive
3958 (Parse_Exception_Handlers): mark each exception handler in a sequence of
3959 exception handlers as hidden in SPARK if preceded by the HIDE directive
3960 * par-ch6.adb (P_Subprogram): mark a subprogram body hidden in SPARK
3961 if starting with the HIDE directive
3962 * par-ch7.adb (P_Package): mark a package body hidden in SPARK if
3963 starting with the HIDE directive; mark the declarations in a private
3964 part as hidden in SPARK if the private part starts with the HIDE
3966 * restrict.adb, restrict.ads
3967 (Set_Hidden_Part_In_SPARK): record a range of slocs as hidden in SPARK
3968 (Is_In_Hidden_Part_In_SPARK): new function which returns whether its
3969 argument node belongs to a part which is hidden in SPARK
3970 (Check_SPARK_Restriction): do not issue violations on nodes in hidden
3971 parts in SPARK; protect the possibly costly call to
3972 Is_In_Hidden_Part_In_SPARK by a check that the SPARK restriction is on
3973 * scans.ads (Token_Type): new value Tok_SPARK_Hide in enumeration
3974 * scng.adb (Accumulate_Token_Checksum_GNAT_6_3,
3975 Accumulate_Token_Checksum_GNAT_5_03): add case for new token
3977 (Scan): recognize special comment starting with '#' and followed by
3978 SPARK keyword "hide" as a HIDE directive.
3980 2011-08-02 Yannick Moy <moy@adacore.com>
3982 * types.ads, erroutc.ads: Minor reformatting.
3984 2011-08-02 Vincent Celier <celier@adacore.com>
3986 * link.c: Add response file support for cross platforms.
3988 2011-08-02 Ed Schonberg <schonberg@adacore.com>
3990 * sem_aggr.adb (Resolve_Array_Aggregate): when copying the expression
3991 in an association, set parent field of copy before partial analysis.
3992 * sem_res.adb (Resolve_Slice): create reference to itype only when
3993 expansion is enabled.
3995 2011-08-02 Yannick Moy <moy@adacore.com>
3997 * einfo.adb, einfo.ads (Body_Is_In_ALFA, Set_Body_Is_In_ALFA): get/set
3998 for new flag denoting which subprogram bodies are in ALFA
3999 * restrict.adb, sem_ch7.adb: Update comment
4000 * sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb,
4001 sem_ch9.adb, sem_res.adb: Add calls to
4002 Current_Subprogram_Body_Is_Not_In_ALFA on unsupported constructs.
4003 * sem_ch6.adb (Analyze_Function_Return): add calls to
4004 Current_Subprogram_Body_Is_Not_In_ALFA on return statement in the
4005 middle of the body, and extended return.
4006 (Check_Missing_Return): add calls to Set_Body_Is_In_ALFA with argument
4007 False when missing return.
4008 (Analyze_Subprogram_Body_Helper): initialize the flag Body_Is_In_ALFA
4009 to True for subprograms whose spec is in ALFA. Remove later on the flag
4010 on the entity used for a subprogram body when there exists a separate
4012 * sem_util.adb, sem_util.ads (Current_Subprogram_Body_Is_Not_In_ALFA):
4013 if Current_Subprogram is not Empty, set its flag Body_Is_In_ALFA to
4014 False, otherwise do nothing.
4016 2011-08-02 Robert Dewar <dewar@adacore.com>
4018 * inline.adb, stand.ads, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
4020 2011-08-02 Yannick Moy <moy@adacore.com>
4022 * sem_ch4.ads: minor formatting.
4024 2011-08-02 Yannick Moy <moy@adacore.com>
4026 * sem_aggr.adb, err_vars.ads, sem_ch3.adb, sem_ch5.adb, sem_ch9.adb,
4027 debug.adb, sem_util.adb, sem_res.adb, sem_attr.adb, gnat1drv.adb,
4028 errout.adb, errout.ads, exp_ch6.adb, sem_ch4.adb, restrict.adb,
4029 restrict.ads, sem_ch6.adb, sem_ch8.adb, sem_ch11.adb,
4030 opt.ads: cleanup of SPARK mode
4032 2011-08-02 Yannick Moy <moy@adacore.com>
4034 * cstand.adb (Create_Standard): sets Is_In_ALFA component of standard
4036 * einfo.adb, einfo.ads (Is_In_ALFA): add flag for all entities
4037 (Is_In_ALFA, Set_Is_In_ALFA): new subprograms to access flag Is_In_ALFA
4039 (Analyze_Object_Declaration): set Is_In_ALFA flag for objects
4040 (Constrain_Enumeration): set Is_In_ALFA flag for enumeration subtypes
4041 (Constrain_Integer): set Is_In_ALFA flag for integer subtypes
4042 (Enumeration_Type_Declaration): set Is_In_ALFA flag for enumeration
4044 (Set_Scalar_Range_For_Subtype): unset Is_In_ALFA flag for subtypes with
4046 * sem_ch6.adb (Analyze_Return_Type): unset Is_In_ALFA flag for
4047 functions whose return type is not in ALFA.
4048 (Analyze_Subprogram_Specification): set Is_In_ALFA flag for subprogram
4050 (Process_Formals): unset Is_In_ALFA flag for subprograms if a
4051 parameter's type is not in ALFA.
4052 * stand.ads (Standard_Type_Is_In_ALFA): array defines which standard
4055 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4057 * sem_ch6 (Analyze_Expression_Function): treat the function as
4058 Inline_Always, and introduce a subprogram declaration for it when it is
4060 * inline.adb (Add_Inlined_Body): recognize bodies that come from
4061 expression functions, so that the back-end can determine whether they
4062 can in fact be inlined.
4063 * sem_util.adb (Is_Expression_Function): predicate to determine whether
4064 a function body comes from an expression function.
4066 2011-08-02 Gary Dismukes <dismukes@adacore.com>
4068 * sem_ch6.adb (Check_Conformance): Revise the check for nonconforming
4069 null exclusions to test Can_Never_Be_Null on the anonymous access types
4070 of the formals rather than testing the formals themselves. Exclude this
4071 check in cases where the Old_Formal is marked as a controlling formal,
4072 to avoid issuing spurious errors for bodies completing dispatching
4073 operations (due to the flag not getting set on controlling access
4074 formals in body specs).
4075 (Find_Corresponding_Spec): When checking full and subtype conformance of
4076 subprogram bodies in instances, pass Designated and E in that order, for
4077 consistency with the expected order of the formals (New_Id followed by
4080 2011-08-02 Robert Dewar <dewar@adacore.com>
4082 * sem_ch8.adb: Minor reformatting.
4084 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4086 * sem_ch8.adb (Analyze_Subprogram_Renaming): new procedure
4087 Check_Class_Wide_Actual, to implement AI05-0071, on defaulted
4088 primitive operations of class-wide actuals.
4090 2011-08-02 Javier Miranda <miranda@adacore.com>
4092 * exp_atag.ads, exp_atag.adb
4093 (Build_Common_Dispatching_Select_Statements): Remove argument Loc
4094 since its value is implicitly passed in argument Typ.
4095 * exp_disp.adb (Make_Disp_Conditional_Select_Body,
4096 Make_Disp_Timed_Select_Body): Remove Loc in calls to routine
4097 Build_Common_Dispatching_Select_Statements.
4099 2011-08-02 Robert Dewar <dewar@adacore.com>
4101 * sem_ch3.adb, exp_atag.ads, get_scos.adb, get_scos.ads,
4102 exp_disp.adb, lib-xref.adb, lib-xref.ads: Update comments.
4105 2011-08-02 Robert Dewar <dewar@adacore.com>
4107 * sem_res.adb: Minor reformatting.
4108 * sem_prag.adb: Minor reformatting.
4110 2011-08-02 Javier Miranda <miranda@adacore.com>
4112 * exp_atag.adb, exp_atags.ads
4113 (Build_Common_Dispatching_Select_Statement): Replace argument DT_Ptr
4114 by the tagged type Entity. Required to use this routine in the VM
4115 targets since we do not have available the Tag entity in the VM
4118 (Expand_N_Subprogram_Body): Do not invoke Build_VM_TSDs if package
4119 Ada.Tags has not been previously loaded.
4121 (Expand_N_Package_Declaration, Expand_N_Package_Body): Do not invoke
4122 Build_VM_TSDs if package Ada.Tags has not been previously loaded.
4124 (Enclosing_Dynamic_Scope): Add missing support to handle the full
4125 view of enclosing scopes. Required to handle enclosing scopes that
4126 are synchronized types whose full view is a task type.
4128 (Build_VM_TSDs): Minor code improvement to avoid generating and
4129 analyzing lists with empty nodes.
4130 (Make_Disp_Asynchronous_Select_Body): Add support for VM targets.
4131 (Make_Disp_Conditional_Select_Body): Add support for VM targets.
4132 (Make_Disp_Get_Prim_Op_Kind): Add support for VM targets.
4133 (Make_Disp_Timed_Select_Body): Add support for VM targets.
4134 (Make_Select_Specific_Data_Table): Add support for VM targets.
4135 (Make_VM_TSD): Generate code to initialize the SSD structure of
4138 2011-08-02 Yannick Moy <moy@adacore.com>
4140 * lib-writ.adb (Write_ALI): when ALFA mode is set, write local
4141 cross-references section in ALI.
4142 * lib-xref.adb, lib-xref.ads (Xref_Entry): add components Sub
4143 (enclosing subprogram), Slc (location of Sub) and Sun (unit number of
4145 (Enclosing_Subprogram_Or_Package): new function to return the enclosing
4146 subprogram or package entity of a node
4147 (Is_Local_Reference_Type): new function returns True for references
4148 selected in local cross-references.
4149 (Lt): function extracted from Lt in Output_References
4150 (Write_Entity_Name): function extracted from Output_References
4151 (Generate_Definition): generate reference with type 'D' for definition
4152 of objects (object declaration and parameter specification), with
4153 appropriate locations and units, for use in local cross-references.
4154 (Generate_Reference): update fields Sub, Slc and Sun. Keep newly created
4155 references of type 'I' for initialization in object definition.
4156 (Output_References): move part of function Lt and procedure
4157 Write_Entity_Name outside of the body. Ignore references of types 'D'
4158 and 'I' introduced for local cross-references.
4159 (Output_Local_References): new procedure to output the local
4160 cross-references sections.
4161 (Lref_Entity_Status): new array defining whether an entity is a local
4162 * sem_ch3.adb (Analyze_Object_Declaration): call Generate_Reference
4163 with 'I' type when initialization expression is present.
4164 * get_scos.adb, get_scos.ads: Correct comments and typos
4166 2011-08-02 Javier Miranda <miranda@adacore.com>
4168 * exp_ch6.adb (Expand_N_Subprogram_Body): Enable generation of TSDs in
4170 * exp_ch7.adb (Expand_N_Package_Body): Enable generation of TSDs in
4172 * exp_disp.adb (Build_VM_TSDs): No action needed if the runtime has no
4175 2011-08-02 Vincent Celier <celier@adacore.com>
4177 * prj-nmsc.adb (File_Found): New components Excl_File and Excl_Line
4178 (No_Space_Img): New function
4179 (Find_Excluded_Sources): When reading from a file, record the file name
4180 and the line number for each excluded source.
4181 (Mark_Excluded_Sources): When reporting an error, if the excluded
4182 sources were read from a file, include file name and line number in
4185 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4187 * sem_res.adb (Resolve_Call): implement rule in RM 12.5.1 (23.3/2).
4189 2011-08-02 Robert Dewar <dewar@adacore.com>
4191 * exp_ch7.adb exp_ch6.adb, exp_disp.adb: Minor reformatting
4193 2011-08-02 Javier Miranda <miranda@adacore.com>
4195 * exp_ch6.adb (Expand_N_Subprogram_Body): Temporarily restrict the
4196 generation of TSDs to the DOTNET compiler.
4197 * exp_ch7.adb (Expand_N_Package_Body): Temporarily restrict the
4198 generation of TSDs to the DOTNET compiler.
4200 2011-08-02 Javier Miranda <miranda@adacore.com>
4202 * exp_disp.ads (Build_VM_TSDs): Build the runtime Type Specific Data
4203 record of all the tagged types declared inside library level package
4204 declarations, library level package bodies or library level subprograms.
4205 * exp_disp.adb (Make_VM_TSD): New subprogram that builds the TSD
4206 associated with a given tagged type.
4207 (Build_VM_TSDs): New subprogram.
4208 * exp_ch6.adb (Expand_N_Subprogram_Body): Generate TSDs records of main
4209 compilation units that are subprograms.
4210 * exp_ch7.adb (Expand_N_Package_Body): Generate TSDs of main
4211 compilation units that are package bodies.
4212 (Expand_N_Package_Declaration): Generate TSDs of the main compilation
4213 units that are a package declaration or a package instantiation.
4214 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Minor code
4215 reorganization to improve the error generated by the frontend when the
4216 function Ada.Tags.Secondary_Tag is not available.
4217 * rtsfind.ads (RE_Register_TSD): New runtime entity.
4218 * exp_ch4.adb (Expand_N_Type_Conversion): Minor code cleanup.
4220 2011-08-02 Javier Miranda <miranda@adacore.com>
4222 * exp_disp.adb (Make_DT): Generate call to Check_TSD in Ada 2005 mode.
4224 2011-08-02 Robert Dewar <dewar@adacore.com>
4226 * s-imenne.ads: Minor reformatting.
4228 2011-08-02 Robert Dewar <dewar@adacore.com>
4230 * a-stunau.ads: Add pragma Suppress_Initialization for Big_String
4231 * freeze.adb (Warn_Overlay): Don't warn if initialization suppressed
4232 * s-stalib.ads: Add pragma Suppress_Initialization for Big_String
4234 2011-08-02 Robert Dewar <dewar@adacore.com>
4236 * einfo.ads (Materialize_Entity): Document this is only for renamings
4237 * exp_ch3.adb (Expand_N_Object_Declaration): Make sure we generate
4238 required debug information in the case where we transform the object
4239 declaration into a renaming declaration.
4240 * exp_ch4.adb (Expand_Concatenate): Generate debug info for result
4242 * exp_dbug.ads (Debug_Renaming_Declaration): Document setting of
4245 2011-08-02 Robert Dewar <dewar@adacore.com>
4247 * einfo.ads, einfo.adb (Suppress_Initialization): Replaces
4248 Suppress_Init_Procs.
4249 * exp_ch3.adb, exp_disp.adb, freeze.adb: Use
4250 Suppress_Initialization/Initialization_Suppressed.
4251 * gnat_rm.texi: New documentation for pragma Suppress_Initialization
4252 * sem_aux.ads, sem_aux.adb (Initialization_Suppressed): New function
4253 * sem_dist.adb: Use Suppress_Initialization/Initialization_Suppressed
4254 * sem_prag.adb: New processing for pragma Suppress_Initialization.
4256 2011-08-02 Robert Dewar <dewar@adacore.com>
4258 * gnat_rm.texi, a-tags.ads, sem_prag.adb, sem_ch12.adb, exp_disp.adb:
4261 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4263 * sem_prag.adb (Chain_PPC): Implement AI04-0230: null procedures can
4264 only have inheritable classwide pre/postconditions.
4266 2011-08-02 Javier Miranda <miranda@adacore.com>
4268 * a-tags.ads, a-tags.adb (Check_TSD): New subprogram.
4269 * rtsfind.ads (RE_Check_TSD): New runtime entity.
4270 * exp_disp.adb (Make_DT): Generate call to the new runtime routine that
4271 checks if the external tag of a type is the same as the external tag
4272 of some other declaration.
4274 2011-08-02 Thomas Quinot <quinot@adacore.com>
4276 * s-taskin.ads: Minor reformatting.
4278 2011-08-02 Emmanuel Briot <briot@adacore.com>
4280 * g-comlin.adb (Display_Help): swap the order in which it prints the
4281 short help and the general usage.
4283 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4285 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration): copy properly
4286 the aspect declarations and attach them to the generic copy for
4287 subsequent analysis.
4288 (Analyze_Subprogram_Instantiation): copy explicitly the aspect
4289 declarations of the generic tree to the new subprogram declarations.
4290 * sem_attr.adb (Check_Precondition_Postcondition): recognize
4291 conditions that apply to a subprogram instance.
4293 2011-08-02 Robert Dewar <dewar@adacore.com>
4295 * gnat_rm.texi: Clarify doc on pragma Source_File_Name[_Project].
4297 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4299 * sem_ch3.adb (Derived_Type_Declaration): When checking that a untagged
4300 private type with a tagged full view is not derived in the immediate
4301 scope of the partial view, (RM 7.3 (7)) use the scope of the base type.
4303 2011-08-02 Robert Dewar <dewar@adacore.com>
4305 * exp_ch4.adb: Minor reformatting.
4307 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4309 * sem_ch5.adb (Analyze_Loop_Statement): If the iteration scheme is an
4310 Ada2012 iterator, the loop will be rewritten during expansion into a
4311 while loop with a cursor and an element declaration. Do not analyze the
4312 body in this case, because if the container is for indefinite types the
4313 actual subtype of the elements will only be determined when the cursor
4314 declaration is analyzed.
4316 2011-08-02 Arnaud Charlet <charlet@adacore.com>
4318 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Ignore
4319 size/alignment related attributes in CodePeer_Mode.
4321 2011-08-02 Gary Dismukes <dismukes@adacore.com>
4323 * sem_ch3.adb (Check_Ops_From_Incomplete_Type): Remove call to
4324 Prepend_Element, since this can result in the operation getting the
4325 wrong slot in the full type's dispatch table if the full type has
4326 inherited operations. The incomplete type's operation will get added
4327 to the proper position in the full type's primitives
4328 list later in Sem_Disp.Check_Operation_From_Incomplete_Type.
4329 (Process_Incomplete_Dependents): Add Is_Primitive test when checking for
4330 dispatching operations, since there are cases where nonprimitive
4331 subprograms can get added to the list of incomplete dependents (such
4332 as subprograms in nested packages).
4333 * sem_ch6.adb (Process_Formals): First, remove test for being in a
4334 private part when determining whether to add a primitive with a
4335 parameter of a tagged incomplete type to the Private_Dependents list.
4336 Such primitives can also occur in the visible part, and should not have
4337 been excluded from being private dependents.
4338 * sem_ch7.adb (Uninstall_Declarations): When checking the rule of
4339 RM05-3.10.1(9.3/2), test that a subprogram in the Private_Dependents
4340 list of a Taft-amendment incomplete type is a primitive before issuing
4341 an error that the full type must appear in the same unit. There are
4342 cases where nonprimitives can be in the list (such as subprograms in
4344 * sem_disp.adb (Derives_From): Use correct condition for checking that
4345 a formal's type is derived from the type of the corresponding formal in
4346 the parent subprogram (the condition was completely wrong). Add
4347 checking that was missing for controlling result types being derived
4348 from the result type of the parent operation.
4350 2011-08-02 Yannick Moy <moy@adacore.com>
4352 * errout.adb (First_Node): minor renaming
4353 * restrict.adb (Check_Formal_Restriction): put restriction warning on
4356 2011-08-02 Yannick Moy <moy@adacore.com>
4358 * sem_res.adb (Resolve_Logical_Op): ensure N is a binary operator
4359 before accessing operands.
4360 * sem_util.adb (Is_SPARK_Initialization_Expr): follow original nodes to
4361 decide whether an initialization expression respects SPARK rules, as
4362 the plain node is the expanded one. This allows for more valid warnings
4364 * gnat_rm.texi: Minor update.
4366 2011-08-02 Arnaud Charlet <charlet@adacore.com>
4368 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Revert
4371 2011-08-02 Robert Dewar <dewar@adacore.com>
4373 * sem_ch3.adb, sem_ch4.adb: Minor reformatting.
4375 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
4377 * exp_ch5.adb (Expand_Iterator_Loop): Reformatting. Wrap the original
4378 loop statements and the element renaming declaration with a block when
4379 the element type is controlled.
4381 2011-08-02 Yannick Moy <moy@adacore.com>
4383 * sinfo.ads: Minor formatting.
4385 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4387 * sem_aggr.adb (Add_Association): if the association has a box and no
4388 expression, use the Sloc of the aggregate itself for the new
4390 * errout.adb (First_Node): Exclude nodes with no Sloc, and always use
4393 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
4395 * exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and refactoring.
4396 When a container is provided via a function call, generate a renaming
4397 of the function result. This avoids the creation of a transient scope
4398 and the premature finalization of the container.
4399 * exp_ch7.adb (Is_Container_Cursor): Removed.
4400 (Wrap_Transient_Declaration): Remove the supression of the finalization
4401 of the list controller when the declaration denotes a container cursor,
4404 2011-08-02 Yannick Moy <moy@adacore.com>
4406 * restrict.adb (Check_Formal_Restriction): only issue a warning if the
4407 node is from source, instead of the original node being from source.
4409 (Resolve_Array_Aggregate): refine the check for a static expression, to
4410 recognize also static ranges
4411 * sem_ch3.adb, sem_ch3.ads (Analyze_Component_Declaration,
4412 Array_Type_Declaration): postpone the test for the type being a subtype
4413 mark after the type has been resolved, so that component-selection and
4414 expanded-name are discriminated.
4415 (Make_Index, Process_Range_Expr_In_Decl): add a parameter In_Iter_Schm
4416 to distinguish the case of an iteration scheme, so that an error is
4417 issed on a non-static range in SPARK except in an iteration scheme.
4418 * sem_ch5.adb (Analyze_Iteration_Scheme): call Make_Index with
4419 In_Iter_Schm = True.
4420 * sem_ch6.adb (Analyze_Subprogram_Specification): refine the check for
4421 user-defined operators so that they are allowed in renaming
4423 (Find_Selected_Component): refine the check for prefixing of operators
4424 so that they are allowed in renaming. Move the checks for restrictions
4425 on selector name after analysis discriminated between
4426 component-selection and expanded-name.
4427 * sem_res.adb (Resolve_Op_Concat_Arg): do not issue a warning on
4428 concatenation argument of string type if it is static.
4429 * sem_util.adb, sem_util.ads
4430 (Check_Later_Vs_Basic_Declarations): add a new function
4431 Is_Later_Declarative_Item to decice which declarations are allowed as
4432 later items, in the two different modes Ada 83 and SPARK. In the SPARK
4433 mode, add that renamings are considered as later items.
4434 (Enclosing_Package): new function to return the enclosing package
4435 (Enter_Name): correct the rule for homonyms in SPARK
4436 (Is_SPARK_Initialization_Expr): default to returning True on nodes not
4437 from source (result of expansion) to avoid issuing wrong warnings.
4439 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4441 * errout.adb: On anything but an expression First_Node returns its
4444 2011-08-02 Pascal Obry <obry@adacore.com>
4446 * prj-proc.adb, make.adb, makeutl.adb: Minor reformatting.
4448 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
4450 * exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and reorganization.
4451 Set the associated loop as the related expression of internally
4453 * exp_ch7.adb (Is_Container_Cursor): New routine.
4454 (Wrap_Transient_Declaration): Supress the finalization of the list
4455 controller when the declaration denotes a container cursor.
4457 2011-08-02 Yannick Moy <moy@adacore.com>
4459 * opt.ads (SPARK_Mode): update comment, SPARK_Mode only set through
4461 * par-ch3.adb (P_Delta_Constraint): remove check in SPARK mode that the
4462 expression is a simple expression. This check cannot be performed in
4463 the semantics, so just drop it.
4464 (P_Index_Or_Discriminant_Constraint): move check that the index or
4465 discriminant is a subtype mark to Analyze_Subtype_Declaration in the
4466 semantics. Other cases were previously checked in the semantics.
4467 * par-ch4.adb (P_Name): move checks that a selector name is not
4468 character literal or an operator symbol to Find_Selected_Component in
4470 * par-ch5.adb (Parse_Decls_Begin_End): move check that basic
4471 declarations are not placed after later declarations in a separate
4472 procedure in Sem_Util (possibly not the best choice?), to be used both
4473 during parsing, for Ada 83 mode, and during semantic analysis, for
4475 * par-endh.adb (Check_End): move check that end label is not missing
4476 to Process_End_Label in the semantics
4477 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): remove
4478 the special case for SPARK restriction
4479 * par.adb: use and with Sem_Util, for use in Parse_Decls_Begin_End
4480 * restrict.adb, restrict.ads (Check_Formal_Restriction): add a
4481 parameter Force to issue the error message even on internal node (used
4482 for generated end label). Call Check_Restriction to check when an error
4483 must be issued. In SPARK mode, issue an error message even if the
4484 restriction is not set.
4485 (Check_Restriction): new procedure with an additional out parameter to
4486 inform the caller that a message has been issued
4487 * sem_aggr.adb: Minor modification of message
4488 * sem_attr.adb (Analyze_Attribute): call Check_Formal_Restriction
4489 instead of issuing an error message directly
4490 * sem_ch3.adb (Analyze_Declarations): move here the check that basic
4491 declarations are not placed after later declarations, by calling
4492 Check_Later_Vs_Basic_Declarations
4493 (Analyze_Subtype_Declaration): move here the check that an index or
4494 discriminant constraint must be a subtype mark. Change the check that
4495 a subtype of String must start at one so that it works on subtype marks.
4496 * sem_ch4.adb (Analyze_Call): move here the check that a named
4497 association cannot follow a positional one in a call
4498 * sem_ch5.adb (Check_Unreachable_Code): call Check_Formal_Restriction
4499 instead of issuing an error message directly
4500 * sem_ch8.adb (Find_Selected_Component): move here the check that a
4501 selector name is not a character literal or an operator symbol. Move
4502 here the check that the prefix of an expanded name cannot be a
4503 subprogram or a loop statement.
4504 * sem_util.adb, sem_util.ads (Check_Later_Vs_Basic_Declarations): new
4505 procedure called from parsing and semantics to check that basic
4506 declarations are not placed after later declarations
4507 (Process_End_Label): move here the check that end label is not missing
4509 2011-08-02 Arnaud Charlet <charlet@adacore.com>
4511 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Ignore enum
4512 representation clause in codepeer mode, since it confuses CodePeer and
4513 does not bring useful info.
4515 2011-08-02 Ed Falis <falis@adacore.com>
4517 * init.c: initialize fp hw on MILS.
4519 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4521 * errout.adb (First_Node): for bodies, return the node itself (small
4522 optimization). For other nodes, do not check source_unit if the node
4523 comes from Standard.
4525 2011-08-02 Robert Dewar <dewar@adacore.com>
4527 * exp_ch3.adb: Minor comment additions.
4528 * sem_ch13.adb: Minor reformatting.
4530 2011-08-02 Pascal Obry <obry@adacore.com>
4532 * make.adb, makeutl.adb: Removes some superfluous directory separator.
4534 2011-08-02 Robert Dewar <dewar@adacore.com>
4536 * sem_attr.adb: Minor reformatting.
4538 2011-08-02 Robert Dewar <dewar@adacore.com>
4540 * einfo.adb (Has_Default_Aspect): Replaces Has_Default_Value
4541 (Has_Default_Component_Value): Removed
4542 * einfo.ads Comment updates
4543 (Has_Default_Aspect): Replaces Has_Default_Value
4544 (Has_Default_Component_Value): Removed
4546 (Expand_N_Freeze_Entity): Handle Default[_Component]_Value aspects
4548 (Build_Array_Init_Proc): Handle Default_[Component_]Value aspects
4549 (Get_Simple_Init_Val): Handle Default_Value aspect
4550 (Needs_Simple_Initialization): Handle Default_Value aspect
4551 * exp_ch3.ads: Needs_Simple_Initialization
4552 * freeze.adb (Freeze_Entity): Handle Default_[Component_]Value aspect
4553 * par-prag.adb (Pragma_Default[_Component]Value) Removed
4555 (Analyze_Aspect_Specifications): Fix Default[_Component]_Value aspects
4556 * sem_prag.adb (Pragma_Default[_Component]Value) Removed
4557 * snames.ads-tmpl (Pragma_Default[_Component]Value) Removed
4559 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4561 * sem_ch5.adb (Analyze_Iterator_Specification): use base type to locate
4562 package containing iteration primitives.
4563 exp_ch5.adb (Expand_Iterator_Loop): ditto.
4565 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4567 * sem_ch5.adb (Analyze_Iteration_Scheme): For an Ada2012 iterator with
4568 "of", pre-analyze expression in case it is a function call with
4569 finalization actions that must be placed ahead of the loop.
4570 * exp_ch5.adb (Expand_Iterator_Loop): If condition_actions are present
4571 on an Ada2012 iterator, insert them ahead of the rewritten loop.
4573 2011-08-02 Geert Bosch <bosch@adacore.com>
4575 * cstand.adb (Create_Float_Types): Only consider C's long double for
4576 Long_Long_Float, in addition to double.
4578 2011-08-02 Robert Dewar <dewar@adacore.com>
4580 * sem_ch3.adb, sem_ch5.adb, sem_type.adb, switch-c.adb, switch-c.ads,
4581 sem_prag.adb, sem_util.adb, sem_util.ads, sem_res.adb, warnsw.ads,
4582 prepcomp.ads, cstand.adb, stand.ads, a-calfor.adb, s-stusta.adb:
4585 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4587 * sem_attr.adb: handle properly 'Result when it is a prefix of an
4590 2011-08-02 Javier Miranda <miranda@adacore.com>
4592 * einfo.ads, einfo.adb
4593 (Original_Access_Type): Move this attribute to Node26 since there was
4594 an undocumented use of Node21 in E_Access_Subprogram_Type entities
4595 which causes conflicts and breaks the generation of the .NET compiler.
4596 (Interface_Name): Add missing documentation on JGNAT only uses of
4599 2011-08-02 Geert Bosch <bosch@adacore.com>
4601 * cstand.adb (Back_End_Float_Types): Use Elist instead of Nlist
4602 (Find_Back_End_Float_Type): Likewise
4603 (Create_Back_End_Float_Types): Likewise
4604 (Create_Float_Types): Likewise
4605 (Register_Float_Type): Likewise
4606 * sem_ch3.adb (Floating_Point_Type_Declaration): Use Elist instead of
4607 Nlist and split out type selection in new local Find_Base_Type function.
4608 * sem_prag.adb (Process_Import_Predefined_Type): Use Elist instead of
4610 * stand.ads (Predefined_Float_Types): Use Elist instead of Nlist
4612 2011-08-02 Robert Dewar <dewar@adacore.com>
4614 * inline.adb: Minor code reorganization (put Get_Code_Unit_Entity in
4616 * opt.ads: Minor comment change.
4617 * sem_ch12.adb: Minor code reorganization.
4619 2011-08-02 Gary Dismukes <dismukes@adacore.com>
4621 * sem_ch3.adb (Complete_Private_Subtype): Don't append the private
4622 subtype's list of rep items to the list on the full subtype in the case
4623 where the lists are the same.
4625 2011-08-02 Geert Bosch <bosch@adacore.com>
4627 * switch-c.adb (Free): New deallocation procedure to avoid implicitly
4628 using the one from System.Strings, which also deallocates all strings.
4630 2011-08-02 Geert Bosch <bosch@adacore.com>
4632 * gcc-interface/gigi.h, gcc-interface/misc.c (enumerate_modes): New
4634 * gcc-interface/Make-lang.in: Update dependencies.
4636 2011-08-02 Olivier Hainque <hainque@adacore.com>
4638 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Set the function
4641 2011-08-02 Javier Miranda <miranda@adacore.com>
4643 * sem_ch3.adb (Check_Anonymous_Access_Components): Create extra formals
4644 associated with anonymous access to subprograms.
4646 2011-08-02 Geert Bosch <bosch@adacore.com>
4649 (Preprocessing_Symbol_Defs): Move from Prepcomp.Symbol_Definitions.
4650 (Preprocessing_Symbol_Last): Move from Prepcomp.Last_Definition.
4651 * prepcomp.adb (Symbol_Definitions, Last_Definition): Move to opt.ads
4652 (Add_Symbol_Definition): Move to switch-c.adb
4653 (Process_Command_Line_Symbol_Definitions): Adjust references to above.
4654 * prepcomp.ads: Remove dependency on Ada.Unchecked_Deallocation.
4655 (Add_Symbol_Definition): Move to switch-c.adb.
4656 * sem_ch13.adb, sem_prag.adb: Add dependency on Warnsw.
4658 (Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
4660 * sem_warn.ads (Warn_On_Record_Holes, Warn_On_Overridden_Size,
4661 Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
4663 * switch-c.adb: Replace dependency on Prepcomp and Sem_Warn by Warnsw.
4664 (Add_Symbol_Definition): Moved from Prepcomp.
4665 * switch-c.ads: Update copyright notice. Use String_List instead of
4666 Argument_List, removing dependency on System.OS_Lib.
4668 2011-08-02 Yannick Moy <moy@adacore.com>
4670 * sem_ch3.adb (Analyze_Object_Declaration): issue an error in formal
4671 mode on initialization expression which does not respect SPARK
4673 * sem_util.adb, sem_util.ads (Is_SPARK_Initialization_Expr): determines
4674 if the tree referenced by its argument represents an initialization
4675 expression in SPARK, suitable for initializing an object in an object
4678 2011-08-02 Javier Miranda <miranda@adacore.com>
4680 * exp_ch9.adb (Expand_Access_Protected_Subprogram_Type): Link the
4681 internally generated access to subprogram with its associated protected
4683 * einfo.ads, einfo.adb (Original_Access_Type): New attribute.
4685 2011-08-02 Geert Bosch <bosch@adacore.com>
4687 * cstand.adb (Register_Float_Type): Print information about type to
4688 register, if the Debug_Flag_Dot_B is set.
4689 * debug.adb (Debug_Flag_Dot_B): Document d.b debug option.
4690 * rtsfind.ads (RE_Max_Base_Digits): New run time entity.
4691 * sem_ch3.adb (Floating_Point_Type_Declaration): Allow declarations
4692 with a requested precision of more than Max_Digits digits and no more
4693 than Max_Base_Digits digits, if a range specification is present and the
4694 Predefined_Float_Types list has a suitable type to derive from.
4695 * sem_ch3.adb (Rep_Item_Too_Early): Avoid generating error in the
4696 case of type completion with pragma Import
4698 (Process_Import_Predefined_Type): Processing to complete a type
4699 with pragma Import. Currently supports floating point types only.
4700 (Set_Convention_From_Pragma): Do nothing without underlying type.
4701 (Process_Convention): Guard against absence of underlying type,
4702 which may happen when importing incomplete types.
4703 (Process_Import_Or_Interface): Handle case of importing predefined
4704 types. Tweak error message.
4706 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
4708 * inline.adb (Add_Inlined_Body): Adjust check for library-level inlined
4709 functions to previous change. Reorganize code slightly.
4711 2011-08-02 Geert Bosch <bosch@adacore.com>
4713 * back_end.ads (Register_Type_Proc): New call back procedure type for
4714 allowing the back end to provide information about available types.
4715 (Register_Back_End_Types): New procedure to register back end types.
4716 * back_end.adb (Register_Back_End_Types): Call the back end to enumerate
4718 * cstand.adb (Back_End_Float_Types): New list for floating point types
4719 supported by the back end.
4720 (Build_Float_Type): Add extra parameter for Float_Rep_Kind.
4721 (Copy_Float_Type): New procedure to make new copies of predefined types.
4722 (Register_Float_Type): New call back procedure to populate the BEFT list
4723 (Find_Back_End_Float_Type): New procedure to find a BEFT by name
4724 (Create_Back_End_Float_Types): New procedure to populate the BEFT list.
4725 (Create_Float_Types): New procedure to create entities for floating
4726 point types predefined in Standard, and put these and any remaining
4727 BEFTs on the Predefined_Float_Types list.
4728 * stand.ads (Predefined_Float_Types): New list for predefined floating
4729 point types that do not have declarations in package Standard.
4731 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
4733 * inline.adb (Get_Code_Unit_Entity): New local function. Returns the
4734 entity node for the unit containing the parameter.
4735 (Add_Inlined_Body): Use it to find the unit containing the subprogram.
4736 (Add_Inlined_Subprogram): Likewise.
4737 * gcc-interface/Make-lang.in: Update dependencies.
4739 2011-08-02 Thomas Quinot <quinot@adacore.com>
4741 * s-stusta.adb (Print): Make sure Pos is always initialized to a
4744 2011-08-02 Geert Bosch <bosch@adacore.com>
4746 * a-calfor.adb (Image): Simplify, removing unnecessary uses of 'Image.
4748 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
4750 * sem_type.adb (Covers): Move trivial case to the top and reuse the
4751 computed value of Base_Type.
4753 2011-08-02 Yannick Moy <moy@adacore.com>
4755 * restrict.adb (Check_Restriction): issue an error for any use of
4756 class-wide, even if the No_Dispatch restriction is not set.
4757 * sem_aggr.adb: Correct typos in comments and messages in formal mode
4758 * sem_ch3.adb (Process_Full_View): issue an error in formal mode is,
4759 when completing a private extension, the type named in the private part
4760 is not the same as that named in the visible part.
4761 * sem_res.adb (Resolve_Call): issue an error in formal mode on the use
4762 of an inherited primitive operations of a tagged type or type extension
4763 that returns the tagged type.
4764 * sem_util.adb, sem_util.ads (Is_Inherited_Operation_For_Type): new
4765 function which returns True for an implicit operation inherited by the
4766 derived type declaration for the argument type.
4767 (Is_SPARK_Object_Reference): move to appropriate place in alphabetic
4770 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4772 * sem_ch5.adb (Pre_Analyze_Range): new procedure extracted from
4773 Process_Bounds, to perform analysis with expansion of a range or an
4774 expression that is the iteration scheme for a loop.
4775 (Analyze_Iterator_Specification): If domain of iteration is given by a
4776 function call with a controlled result, as is the case if call returns
4777 a predefined container, ensure that finalization actions are properly
4779 * par-ch3.adb: accept Ada2012 iterator form in P_Discrete_Range.
4781 2011-08-02 Javier Miranda <miranda@adacore.com>
4783 * sem_ch5.adb (Analyze_Iteration_Scheme): Fix typo.
4784 * gcc-interface/Make-lang.in: Update dependencies.
4786 2011-08-02 Javier Miranda <miranda@adacore.com>
4788 * sem_util.ads, sem_util.adb (Is_Variable): Add a new formal to
4789 determine if the analysis is performed using N or Original_Node (N).
4790 * exp_util.adb (Side_Effect_Free): Code cleanup since the new
4791 functionality of routine Is_Variable avoids code duplication.
4792 * checks.adb (Determine_Range): Handle temporaries generated by
4793 Remove_Side_Effects.
4795 2011-08-02 Javier Miranda <miranda@adacore.com>
4797 * exp_ch4.adb (Expand_N_Quantified_Expression): Force reanalysis and
4798 expansion of the condition. Required since the previous analysis was
4799 done with expansion disabled (see Resolve_Quantified_Expression) and
4800 hence checks were not inserted and record comparisons have not been
4803 2011-08-02 Ed Falis <falis@adacore.com>
4805 * s-taprop-vxworks.adb, s-intman-vxworks.adb, s-intman-vxworks.ads:
4808 2011-08-02 Bob Duff <duff@adacore.com>
4810 * opt.ads: Minor comment fix.
4812 2011-08-02 Bob Duff <duff@adacore.com>
4814 * sem_ch12.adb (Analyze_Package_Instantiation,
4815 Analyze_Subprogram_Instantiation): Turn off style checking while
4816 analyzing an instance. Whatever style checks that apply to the generic
4817 unit should apply, so it makes no sense to apply them in an instance.
4818 This was causing trouble when compiling an instance of a runtime
4819 unit that violates the -gnatyO switch.
4820 * stylesw.adb (Set_Style_Check_Options): "when 'O' =>" was missing from
4821 one of the two case statements, causing spurious errors.
4823 2011-08-02 Robert Dewar <dewar@adacore.com>
4825 * uname.adb: Minor reformatting.
4826 * gnatcmd.adb: Minor reformatting.
4827 * exp_attr.adb: Minor reformatting.
4829 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4831 * exp_ch5.adb (Expand_N_Assignment_Statement): under restriction
4832 No_Dispatching_Calls, do not look for the Assign primitive, because
4833 predefined primitives are not created in this case.
4835 2011-08-02 Bob Duff <duff@adacore.com>
4837 * stylesw.ads: Minor comment fixes.
4839 2011-08-02 Robert Dewar <dewar@adacore.com>
4841 * freeze.adb (Add_To_Result): New procedure.
4843 2011-08-02 Jose Ruiz <ruiz@adacore.com>
4845 * exp_attr.adb (Find_Stream_Subprogram): When using a configurable run
4846 time, if the specific run-time routines for handling streams of strings
4847 are not available, use the default mechanism.
4849 2011-08-02 Arnaud Charlet <charlet@adacore.com>
4851 * s-regpat.ads: Fix typo.
4853 2011-08-02 Vincent Celier <celier@adacore.com>
4855 * prj-conf.adb (Get_Or_Create_Configuration_File): If On_Load_Config is
4856 not null, call it to create the in memory config project file without
4857 parsing an existing default config project file.
4859 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
4861 * atree.adb (Allocate_Initialize_Node): Remove useless temporaries.
4863 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4865 * sem_elim.adb: an abstract subprogram does not need an eliminate
4866 pragma for its descendant to be eliminable.
4868 2011-08-02 Ed Falis <falis@adacore.com>
4870 * init.c: revert to handling before previous checkin for VxWorks
4871 * s-intman-vxworks.adb: delete unnecessary declarations related to
4872 using Ada interrupt facilities for handling signals.
4873 Delete Initialize_Interrupts. Use __gnat_install_handler instead.
4874 * s-intman-vxworks.ads: Import __gnat_install_handler as
4875 Initialize_Interrupts.
4876 * s-taprop-vxworks.adb: Delete Signal_Mask.
4877 (Abort_Handler): change construction of mask to unblock exception
4880 2011-08-02 Jerome Guitton <guitton@adacore.com>
4882 * a-except-2005.adb (Raise_From_Signal_Handler): Call
4883 Debug_Raise_Exception before propagation starts.
4885 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
4887 * exp_ch6.adb (Expand_Call): Guard restriction checks with a call
4888 to Restriction_Check_Required.
4889 * sem_ch3.adb (Analyze_Object_Declaration): Likewise.
4890 * sem_res.adb (Resolve_Call): Likewise.
4891 * sem_attr.adb (Check_Stream_Attribute): Likewise.
4893 2011-08-02 Bob Duff <duff@adacore.com>
4895 * stylesw.ads: Update comment.
4896 * style.adb: Minor: Use Error_Msg_NE instead of Error_Msg_N.
4897 * errout.ads: Remove obsolete comment.
4899 2011-08-02 Javier Miranda <miranda@adacore.com>
4901 * einfo.ads, einfo.adb (Is_Safe_To_Reevaluate): new function.
4902 (Set_Is_Safe_To_Reevaluate): new procedure.
4903 * sem_ch5.adb (Analyze_Assignment): Add one assertion to ensure that no
4904 assignment is allowed on safe-to-reevaluate variables.
4905 (Analyze_Iteration_Schine.Process_Bounds.One_Bound): Decorate the
4906 temporary created to remove side effects in expressions that use
4907 the secondary stack as safe-to-reevaluate.
4908 * exp_util.adb (Side_Effect_Free): Add missing code to handle well
4909 variables that are not true constants.
4911 2011-08-02 Robert Dewar <dewar@adacore.com>
4913 * sem_ch5.adb, sem_ch7.adb, einfo.ads, sem_util.adb, sem_util.ads,
4914 sem_res.adb, sem_ch6.adb: Minor reformatting.
4916 2011-08-02 Jerome Guitton <guitton@adacore.com>
4918 * a-except-2005.adb (Raise_Current_Excep): Remove obsolete dead code.
4920 2011-08-02 Ed Schonberg <schonberg@adacore.com>
4922 * sem_ch6.adb (New_Overloaded_Entity, Check_Overriding_Indicator): Do
4923 not set Overridden_Operation if subprogram is an initialization
4926 2011-08-02 Yannick Moy <moy@adacore.com>
4928 * par-ch6.adb: Correct obsolete name in comments
4929 * restrict.adb, restrict.ads (Check_Formal_Restriction): new function
4930 which takes two message arguments (existing function takes one), with
4931 second message used for continuation.
4932 * sem_ch5.adb (Analyze_Block_Statement): in formal mode, only reject
4933 block statements that originate from a source block statement, not
4934 generated block statements
4935 * sem_ch6.adb (Analyze_Function_Call): rename L into Actuals, for
4936 symmetry with procedure case
4937 * sem_ch7.adb (Check_One_Tagged_Type_Or_Extension_At_Most): new
4938 function to issue an error in formal mode if a package specification
4939 contains more than one tagged type or type extension.
4940 * sem_res.adb (Resolve_Actuals): in formal mode, check that actual
4941 parameters matching formals of tagged types are objects (or ancestor
4942 type conversions of objects), not general expressions. Issue an error
4943 on view conversions that are not involving ancestor conversion of an
4945 (Resolve_Type_Conversion): in formal mode, issue an error on the
4946 operand of an ancestor type conversion which is not an object
4947 * sem_util.adb, sem_util.ads (Find_Actual): extend the behavior of the
4948 procedure so that it works also for actuals of function calls
4949 (Is_Actual_Tagged_Parameter): new function which determines if its
4950 argument is an actual parameter of a formal of tagged type in a
4952 (Is_SPARK_Object_Reference): new function which determines if the tree
4953 referenced by its argument represents an object in SPARK
4955 2011-08-02 Robert Dewar <dewar@adacore.com>
4957 * sem_ch3.adb: Minor reformatting
4958 Minor comment addition
4959 Minor error msg text change
4961 2011-08-02 Javier Miranda <miranda@adacore.com>
4963 * sem_ch5.adb (Analyze_Iteration_Scheme.Uses_Secondary_Stack): New
4964 function. Used to be more precise when we generate a variable plus one
4965 assignment to remove side effects in the evaluation of the Bound
4967 (Analyze_Iteration_Scheme): Clean attribute analyzed in all the nodes
4968 of the bound expression to force its re-analysis and thus expand the
4969 associated transient scope (if required). Code cleanup replacing the
4970 previous code that declared the constant entity by an invocation to
4971 routine Force_Evaluation which centralizes this work in the frontend.
4973 2011-08-02 Robert Dewar <dewar@adacore.com>
4975 * einfo.adb (Is_Base_Type): Improve efficiency by using a flag table
4976 (Base_Type): Now uses improved Is_Base_Type function
4977 * einfo.ads (Base_Type): Inline this function
4979 2011-08-02 Robert Dewar <dewar@adacore.com>
4981 * sem_prag.adb (Analyze_Pragma): Defend against infinite recursion
4982 (Analyze_Aspect_Specifications): Fix Sloc values for constructed pragmas
4984 2011-08-02 Arnaud Charlet <charlet@adacore.com>
4986 * gcc-interface/Make-lang.in: Update dependencies.
4987 * gcc-interface/Makefile.in: Use s-inmapop-vxworks.adb for all VxWorks
4990 2011-08-02 Yannick Moy <moy@adacore.com>
4992 * par-ch3.adb (P_Delta_Constraint): issue an error in formal mode on
4993 non-simple expression used in delta constraint
4994 (P_Index_Or_Discriminant_Constraint): issue an error in formal mode on
4995 index constraint which is not a subtype mark
4996 * par.adb: With and use Restrict
4997 * sem_ch3.adb (Analyze_Component_Declaration): issue an error in formal
4998 mode on component type which is not a subtype mark and default
4999 expression on component
5000 (Analyze_Subtype_Declaration): issue an error in formal mode on subtype
5001 of string which does not have a lower index bound equal to 1
5002 (Array_Type_Declaration): issue an error in formal mode on index or
5003 component type which is not a subtype mark, and on aliased keyword on
5005 (Derived_Type_Declaration): issue an error in formal mode on interface,
5006 limited or abstract type
5007 (Record_Type_Declaration): issue an error in formal mode on interface
5008 (Record_Type_Definition): issue an error in formal mode on tagged types
5009 and type extensions not declared in the specification of a library unit
5010 package; on null non-tagged record; on variant part
5012 2011-08-02 Vincent Celier <celier@adacore.com>
5014 * prj-nmsc.adb (Check_Library_Attributes): Do not report Library_Dir
5015 not declared for qualified library project when Library_Name is not
5016 declared, but Library_Dir is.
5018 2011-08-02 Robert Dewar <dewar@adacore.com>
5020 * sem_ch13.adb (Analyze_Aspect_Specification): Fix slocs on generated
5021 pragmas (affects aspects [Component_]Default_Value
5022 (Check_Aspect_At_Freeze_Point): For Component_Default_Value, use
5023 component type for the resolution
5025 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
5027 * einfo.adb (Base_Type): Tune implementation for speed.
5029 2011-08-02 Robert Dewar <dewar@adacore.com>
5031 * freeze.adb: Minor reformatting.
5033 2011-08-02 Thomas Quinot <quinot@adacore.com>
5035 * scos.ads: Update comments.
5037 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5039 * sem_ch3.adb (Build_Derived_Type): Inherit the convention from the
5040 base type, because the parent may be a subtype of a private type whose
5041 convention is established in a private part.
5043 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
5045 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Wrap the return
5046 statement in a block when the expansion of the return expression has
5047 created a finalization chain.
5048 * freeze.adb (Freeze_Expression): Alphabetize all choices associated
5049 with the parent node.
5050 Add N_Extended_Return_Statement to handle the case where a transient
5051 object declaration appears in the Return_Object_Declarations list of
5052 an extended return statement.
5054 2011-08-02 Matthew Gingell <gingell@adacore.com>
5056 * adaint.c (__gnat_is_symbolic_link_attr): Supress warning on possibly
5057 unused parameter 'name'.
5059 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5061 * sem_elim.adb (Set_Eliminated): If the overridden operation is an
5062 inherited operation, check whether its alias, which is the source
5063 operastion that it renames, has been marked eliminated.
5065 2011-08-02 Javier Miranda <miranda@adacore.com>
5067 * exp_util.adb (Safe_Prefixed_Reference): Do not consider safe an
5068 in-mode parameter whose type is an access type since it can be used to
5069 modify its designated object. Enforce code that handles as safe an
5070 access type that is not access-to-constant but it is the result of a
5071 previous removal of side-effects.
5072 (Remove_Side_Effects): Minor code reorganization of cases which require
5073 no action. Done to incorporate documentation on new cases uncovered
5074 working in this ticket: no action needed if this routine was invoked
5075 too early and the nodes are not yet decorated.
5076 * sem_res.adb (Resolve_Slice): Minor code cleanup replacling two calls
5077 to routine Remove_Side_Effects by calls to Force_Evaluation since they
5078 were issued with actuals that are implicitly provided by
5081 2011-08-02 Robert Dewar <dewar@adacore.com>
5083 * sem_ch3.adb, sem_res.adb: Minor reformatting.
5085 2011-08-02 Yannick Moy <moy@adacore.com>
5087 * sem_attr.adb (Check_Formal_Restriction_On_Attribute): new procedure
5088 to issue an error in formal mode on attribute not supported in this mode
5089 (Analyze_Attribute): issue errors on standard attributes not supported
5091 * sem_ch3.adb (Modular_Type_Declaration): remove obsolete part of
5092 comment, and issue error in formal mode on modulus which is not a power
5094 (Process_Range_Expr_In_Decl): issue error in formal mode on non-static
5096 * sem_ch8.adb (Find_Type): issue error in formal mode on 'Base in
5098 * sem_res.adb (Resolve_Unary_Op): issue error in formal mode on unary
5099 operator on modular type (except 'not').
5101 2011-08-02 Robert Dewar <dewar@adacore.com>
5103 * gnat_rm.texi: Minor reformatting.
5105 2011-08-02 Arnaud Charlet <charlet@adacore.com>
5107 * s-osinte-linux.ads: Minor comment update and reformatting.
5108 * i-cexten.ads: Make this unit pure, as for its parent.
5109 Will allow its usage in more contexts if needed.
5111 2011-08-02 Robert Dewar <dewar@adacore.com>
5113 * s-utf_32.ads: Minor comment fix.
5115 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5117 * sem_res.adb (Resolve_Actuals): if the subprogram is a primitive
5118 operation of a tagged synchronized type, handle the case where the
5119 controlling argument is overloaded.
5121 2011-08-02 Yannick Moy <moy@adacore.com>
5123 * gnat_rm.texi, opt.ads, sem_prag.adb, snames.ads-tmpl:
5124 Replace pragma SPARK_95 with pragma Restrictions (SPARK)
5125 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): set
5126 SPARK mode and formal verification mode on processing SPARK restriction
5127 * s-rident.ads (Restriction_Id): add SPARK restriction in those not
5128 requiring consistency checking.
5130 2011-08-02 Robert Dewar <dewar@adacore.com>
5132 * sem_res.adb: Minor reformatting.
5134 2011-08-02 Robert Dewar <dewar@adacore.com>
5136 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
5137 a-cforse.ads: Remove unneeded with of Ada.Containers
5138 Remove commented out pragma Inline's
5139 Move specifications of new subprograms to the actual specs
5141 2011-08-02 Yannick Moy <moy@adacore.com>
5143 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
5144 a-cforse.ads: Update comments.
5146 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5148 * sem_attr.adb: add attribute name when 'Result has the wrong prefix.
5150 2011-08-02 Robert Dewar <dewar@adacore.com>
5152 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
5153 a-cforse.ads, a-cofove.ads: Minor reformatting.
5155 2011-08-02 Claire Dross <dross@adacore.com>
5157 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads, a-cforse.ads,
5158 a-cofove.ads: Add comments.
5160 2011-08-02 Yannick Moy <moy@adacore.com>
5162 * gnat_rm.texi: Document formal containers.
5164 2011-08-02 Emmanuel Briot <briot@adacore.com>
5166 * g-comlin.adb (Goto_Section, Getopt): fix handling of "*" when there
5169 2011-08-02 Robert Dewar <dewar@adacore.com>
5171 * mlib-prj.adb, restrict.ads, sem_aggr.adb, sem_ch12.adb: Minor
5174 2011-08-02 Robert Dewar <dewar@adacore.com>
5176 * aspects.adb: New aspects Default_Value and Default_Component_Value
5177 New format of Aspect_Names table checks for omitted entries
5178 * aspects.ads: Remove mention of Aspect_Cancel and add documentation on
5179 handling of boolean aspects for derived types.
5180 New aspects Default_Value and Default_Component_Value
5181 New format of Aspect_Names table checks for omitted entries
5182 * einfo.ads, einfo.adb (Has_Default_Component_Value): New flag
5183 (Has_Default_Value): New flag
5184 (Has_Default_Component_Value): New flag
5185 (Has_Default_Value): New flag
5186 * par-ch13.adb (P_Aspect_Specifications): New format of Aspect_Names
5188 * par-prag.adb: New pragmas Default_Value and Default_Component_Value
5189 * sem_ch13.adb (Analyze_Aspect_Specifications): New aspects
5190 Default_Value and Default_Component_Value
5191 * sem_prag.adb: New pragmas Default_Value and Default_Component_Value
5192 New aspects Default_Value and Default_Component_Value
5193 * snames.ads-tmpl: New pragmas Default_Value and Default_Component_Value
5194 * sprint.adb: Print N_Aspect_Specification node when called from gdb
5196 2011-08-02 Vincent Celier <celier@adacore.com>
5198 * prj-nmsc.adb (Check_Library_Attributes): For virtual library project,
5199 inherit library kind.
5201 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5203 * sem_res.adb: Add guards in calls to Matching_Static_Array_Bounds.
5206 2011-08-02 Robert Dewar <dewar@adacore.com>
5208 * i-cstrin.ads: Updates to make Interfaces.C.Strings match RM
5210 2011-08-02 Yannick Moy <moy@adacore.com>
5212 * sem_aggr.adb (Resolve_Aggregate): Fix thinko.
5214 2011-08-02 Robert Dewar <dewar@adacore.com>
5216 * impunit.adb: Add comment.
5218 2011-08-02 Yannick Moy <moy@adacore.com>
5220 * sem_aggr.adb (Check_Qualified_Aggregate): new procedure which checks
5221 qualification of aggregates in formal mode
5222 (Is_Top_Level_Aggregate): returns True for an aggregate not contained in
5224 (Resolve_Aggregate): complete the test that an aggregate is adequately
5225 qualified in formal mode
5227 2011-08-02 Pascal Obry <obry@adacore.com>
5229 * make.adb, bindgen.adb, gnatbind.adb: Minor reformatting.
5230 * mlib-prj.adb: Supress warning when compiling binder generated file.
5231 (Build_Library): Supress all warnings when compiling the binder
5234 2011-08-02 Yannick Moy <moy@adacore.com>
5236 * errout.adb, errout.ads (Check_Formal_Restriction): move procedure
5238 * restrict.adb, restrict.ads (Check_Formal_Restriction): ...to here
5239 * sem_aggr.adb, sem_ch5.adb, sem_util.adb:
5240 Add with/use clauses to make Check_Formal_Restriction visible
5242 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5244 * sem_ch12.adb (Check_Generic_Actuals): handle properly actual
5245 in-parameters when type of the generic formal is private in the generic
5246 spec and non-private in the body.
5248 2011-08-02 Claire Dross <dross@adacore.com>
5250 * a-cfdlli.adb, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfhama.adb,
5251 a-cfhama.ads, a-cforse.adb, a-cforse.ads, a-cforma.adb, a-cforma.ads,
5252 a-cofove.adb, a-cofove.ads: New files implementing formal containers.
5253 * impunit.adb, Makefile.rtl: Take new files into account.
5255 2011-08-02 Robert Dewar <dewar@adacore.com>
5257 * sem_aggr.adb, sem_ch3.adb, sem_ch5.adb, make.adb, sem_res.adb,
5258 sem_attr.adb, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
5260 2011-08-02 Yannick Moy <moy@adacore.com>
5262 * sem_aggr.adb (Resolve_Aggregate): disable incorrectly placed check in
5264 * sem_util.adb (Matching_Static_Array_Bounds): proper detection of
5265 matching static array bounds, taking into account the special case of
5267 * sem_ch3.adb: Typo in comment.
5269 2011-08-02 Yannick Moy <moy@adacore.com>
5271 * errout.adb, errout.ads (Check_Formal_Restriction): new procedure
5272 which issues an error in formal mode if its argument node is originally
5274 * sem_ch3.adb (Analyze_Full_Type_Declaration): move test that a type
5275 has a discriminant specification so that it does not include the case
5277 (Derived_Type_Declaration): move here the test that a derived type has a
5278 discriminant specification
5279 * sem_aggr.adb (Resolve_Record_Aggregate): test the presence of the
5280 first element of a component association before accessing its choices
5281 (presence of component association is not enough)
5282 * exp_ch6.adb (Expand_N_Subprogram_Declaration): test if a subprogram
5283 declaration is a library item before accessing the next element in a
5284 list, as library items are not member of lists
5285 * sem_attr.adb, sem_ch11.adb, sem_ch4.adb, sem_ch5.adb, sem_ch6.adb,
5286 sem_ch8.adb, sem_ch9.adb, sem_res.adb, sem_util.adb: use
5287 Check_Formal_Restriction whenever possible.
5289 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5291 * sem_ch3.adb (Find_Type_Of_Object): In ASIS mode, create an itype
5292 reference when needed.
5294 2011-08-02 Bob Duff <duff@adacore.com>
5296 * gnat_ugn.texi: Fix typo.
5298 2011-08-02 Vincent Celier <celier@adacore.com>
5300 * make.adb (Gnatmake): Use MLib.Tgt.Archive_Ext as the extension of
5301 archive file name. Do not use the full path name of archives for Open
5304 2011-08-02 Robert Dewar <dewar@adacore.com>
5306 * sem_ch12.adb, sem_ch11.adb: New calling sequence for
5307 Analyze_Aspect_Specifications
5309 (Analyze_Aspect_Specifications): New handling for boolean aspects
5310 * sem_ch13.ads (Analyze_Aspect_Specifications): New calling sequence
5311 * sem_ch3.adb, sem_ch6.adb, sem_ch7.adb, sem_ch9.adb: New calling
5312 sequence for Analyze_Aspect_Specifications
5313 * sem_prag.adb (Analyze_Pragma): Remove use of Aspect_Cancel entirely
5314 * sinfo.ads, sinfo.adb (Aspect_Cancel): Remove, no longer used
5316 2011-08-02 Robert Dewar <dewar@adacore.com>
5318 * freeze.adb (Freeze_Entity): Remove handling of delayed boolean
5319 aspects, since these no longer exist.
5321 2011-08-02 Robert Dewar <dewar@adacore.com>
5323 * par-ch13.adb (Aspect_Specifications_Present): Always return false on
5324 semicolon, do not try to see if there are aspects following it.
5325 * par-ch3.adb (P_Declarative_Items): Better message for unexpected
5328 2011-08-02 Robert Dewar <dewar@adacore.com>
5330 * sem_ch8.adb, aspects.ads: Minor reformatting.
5332 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
5334 * sem_ch13.ads (Analyze_Aspect_Specification): Add pragma Inline.
5335 * sem_ch13.adb (Analyze_Non_Null_Aspect_Specifications): New procedure
5337 (Analyze_Aspect_Specifications): ...here. Call above procedure.
5339 2011-08-02 Yannick Moy <moy@adacore.com>
5341 * exp_ch6.adb (Expand_N_Subprogram_Declaration): issue error in formal
5342 mode on subprogram declaration outside of package specification, unless
5343 it is followed by a pragma Import
5344 * sem_ch3.adb (Access_Definition, Access_Subprogram_Declaration,
5345 Access_Type_Declaration): issue error in formal mode on access type
5346 (Analyze_Incomplete_Type_Decl): issue error in formal mode on
5348 (Analyze_Object_Declaration): issue error in formal mode on object
5349 declaration which does not respect SPARK restrictions
5350 (Analyze_Subtype_Declaration): issue error in formal mode on subtype
5351 declaration which does not respect SPARK restrictions
5352 (Constrain_Decimal, Constrain_Float, Constrain_Ordinary_Fixed): issue
5353 error in formal mode on digits or delta constraint
5354 (Decimal_Fixed_Point_Type_Declaration): issue error in formal mode on
5355 decimal fixed point type
5356 (Derived_Type_Declaration): issue error in formal mode on derived type
5357 other than type extensions of tagged record types
5358 * sem_ch6.adb (Process_Formals): remove check in formal mode, redundant
5359 with check on access definition
5360 * sem_ch9.adb (Analyze_Protected_Definition): issue error in formal
5361 mode on protected definition.
5362 (Analyze_Task_Definition): issue error in formal mode on task definition
5364 2011-08-02 Robert Dewar <dewar@adacore.com>
5366 * make.adb, sem_ch8.adb, s-inmaop-vxworks.adb: Minor reformatting.
5368 2011-08-02 Javier Miranda <miranda@adacore.com>
5370 * sem_ch6.adb (Can_Override_Operator): New function.
5371 (Verify_Overriding_Indicator): Add missing code to check overriding
5372 indicator in operators. Fixes regression.
5373 (Check_Overriding_Indicator): Minor reformating after replacing the
5374 code that evaluates if the subprogram can override an operator by
5375 invocations to the above new function.
5377 (Write_Field26_Name): Add missing code to ensure that, following
5378 the documentation in einfo.ads, this field is not shown as attribute
5379 "Static_Initialization" on non-dispatching functions.
5381 2011-08-02 Jose Ruiz <ruiz@adacore.com>
5383 * sem_res.adb (Resolve_Call): A call to
5384 Ada.Real_Time.Timing_Events.Set_Handler violates restriction
5385 No_Relative_Delay (AI-0211) only when it sets a relative timing event,
5386 i.e., when the second parameter is of type Time_Span.
5388 2011-08-02 Vincent Celier <celier@adacore.com>
5390 * make.adb (Gnatmake): use <library dir>/lib<library name>.a to link
5391 with an archive instead of -L<library dir> -l<library name>.
5393 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5395 * sem_ch8.adb (Analyze_Use_Type): If the clause is being re-analyzed,
5396 mark the base types In_Use in addition to making the operations
5399 2011-08-02 Ed Falis <falis@adacore.com>
5401 * init.c: add and setup __gnat_signal_mask for the exception signals
5402 * s-inmaop-vxworks.adb: new file.
5403 * s-intman-vxworks.adb: remove unnecessary initializations and
5405 * s-intman-vxworks.ads: remove unnecessary variable
5406 * s-taprop-vxworks.adb: simplify signal initialization
5408 2011-08-02 Robert Dewar <dewar@adacore.com>
5410 * sem_ch8.adb: Minor code reorganization, comment updates.
5412 2011-08-02 Robert Dewar <dewar@adacore.com>
5414 * sem_res.adb (Matching_Static_Array_Bounds): Moved to Sem_Util
5415 * sem_util.ads, sem_util.adb (Matching_Static_Array_Bounds): Moved
5417 (Matching_Static_Array_Bounds): Use Is_Ok_Static_Expression
5418 (Matching_Static_Array_Bounds): Moved here from Sem_Res
5420 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5422 * atree.h, atree.ads, atree.adb: New subprograms to manipulate Elist5.
5423 * par_ch8.adb (P_Use_Type): initialize Used_Operations for node.
5424 * sinfo.ads, sinfo.adb (Used_Operations): new attribute of
5425 use_type_clauses, to handle more efficiently use_type and use_all_type
5427 * sem_ch8.adb: Rewrite Use_One_Type and End_Use_Type to handle the
5428 Ada2012 Use_All_Type clause.
5429 (Use_Class_Wide_Operations): new procedure.
5431 2011-08-02 Robert Dewar <dewar@adacore.com>
5433 * exp_util.adb, par-ch10.adb, par-ch6.adb, sem.adb, sem_ch6.adb,
5434 sem_ch6.ads, sinfo.adb, sinfo.ads, sprint.adb: Change parameterized
5435 expression to expression function.
5437 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5439 * sem_ch4.adb: transform simple Ada2012 membership into equality only
5440 if types are compatible.
5442 2011-08-02 Yannick Moy <moy@adacore.com>
5444 * sem_res.adb (Matching_Static_Array_Bounds): new function which
5445 returns True if its argument array types have same dimension and same
5446 static bounds at each index.
5447 (Resolve_Actuals): issue an error in formal mode on actuals passed as
5448 OUT or IN OUT paramaters which are not view conversions in SPARK.
5449 (Resolve_Arithmetic_Op): issue an error in formal mode on
5450 multiplication or division with operands of fixed point types which are
5451 not qualified or explicitly converted.
5452 (Resolve_Comparison_Op): issue an error in formal mode on comparisons of
5453 Boolean or array type (except String) operands.
5454 (Resolve_Equality_Op): issue an error in formal mode on equality
5455 operators for array types other than String with non-matching static
5457 (Resolve_Logical_Op): issue an error in formal mode on logical operators
5458 for array types with non-matching static bounds. Factorize the code in
5459 Matching_Static_Array_Bounds.
5460 (Resolve_Qualified_Expression): issue an error in formal mode on
5461 qualified expressions for array types with non-matching static bounds.
5462 (Resolve_Type_Conversion): issue an error in formal mode on type
5463 conversion for array types with non-matching static bounds
5465 2011-08-02 Robert Dewar <dewar@adacore.com>
5467 * par-ch10.adb: Minor code reorganization (use Nkind_In).
5469 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5471 * par-ch9.adb: save location of entry for proper error message.
5473 2011-08-02 Javier Miranda <miranda@adacore.com>
5475 * sem_type.ads, sem_type.adb (Is_Ancestor): Addition of a new formal
5476 (Use_Full_View) which permits this routine to climb through the
5477 ancestors using the full-view of private parents.
5478 * sem_util.adb (Collect_Interfaces_Info, Implements_Interface): Set
5479 Use_Full_View to true in calls to Is_Ancestor.
5480 * sem_disp.adb (Override_Dispatching_Operation): Set Use_Full_View to
5481 true in call to Is_Ancestor.
5482 * exp_ch3.adb (Build_Offset_To_Top_Functions, Initialize_Tag): Set
5483 Use_Full_View to true in call to Is_Ancestor.
5484 * exp_ch7.adb (Controller_Component): Set Use_Full_View to true in
5485 call to Is_Ancestor.
5486 * exp_ch4.adb (Expand_N_Type_Conversion, Tagged_Membership): Set
5487 Use_Full_View to true in calls to Is_Ancestor.
5488 * exp_disp.adb (Expand_Interface_Actuals, Make_Secondary_DT, Make_DT,
5489 Make_Select_Specific_Data_Table, Register_Primitive,
5490 Set_All_DT_Position): Set Use_Full_View to true in calls to Is_Ancestor.
5491 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Set Use_Full_View
5492 to true in call to Is_Ancestor.
5493 * exp_util.adb (Find_Interface_ADT, Find_Interface_Tag): Set
5494 Use_Full_View to true in calls to Is_Ancestor.
5496 (Write_Call_Info): Set Use_Full_View to true in call to Is_Ancestor.
5497 (Write_Type_Info): Set Use_Full_View to true in call to Is_Ancestor.
5499 2011-08-02 Robert Dewar <dewar@adacore.com>
5501 * gnat_rm.texi: Minor reformatting.
5502 * sem_prag.adb: Minor reformatting.
5504 2011-08-02 Tristan Gingold <gingold@adacore.com>
5506 * vms_data.ads: Add VMS qualifier for -gnateP.
5508 2011-08-02 Robert Dewar <dewar@adacore.com>
5510 * par-ch13.adb (P_Aspect_Specification): New meaning of Decl = Empty
5511 * par-ch7.adb (P_Package): Proper placement of aspects for package
5513 * par-endh.adb (Check_End): Ad Is_Sloc parameter
5514 (End_Statements): Add Is_Sloc parameterr
5515 * par.adb (P_Aspect_Specification): New meaning of Decl = Empty
5516 (Check_End): Ad Is_Sloc parameter
5517 (End_Statements): Add Is_Sloc parameterr
5519 2011-08-02 Vincent Celier <celier@adacore.com>
5521 * ug_words: Add VMS qualifier equivalent to -gnateP:
5522 /SYMBOL_PREPROCESSING.
5524 2011-08-02 Jose Ruiz <ruiz@adacore.com>
5526 * gnat-style.texi: For hexadecimal numeric literals the typical
5527 grouping of digits is 4 to represent 2 bytes.
5528 A procedure spec which is split into several lines is indented two
5531 2011-08-02 Yannick Moy <moy@adacore.com>
5533 * exp_aggr.adb (Is_Others_Aggregate): move function to other unit.
5534 * sem_aggr.adb, sem_aggr.ads (Is_Others_Aggregate): move function here
5535 (Resolve_Aggregate): issue errors in formal modes when aggregate is not
5537 (Resolve_Array_Aggregate): issue errors in formal modes on non-static
5538 choice in array aggregate
5539 (Resolve_Extension_Aggregate): issue errors in formal modes on subtype
5541 (Resolve_Record_Aggregate): issue errors in formal modes on mixed
5542 positional and named aggregate for record, or others in record
5543 aggregate, or multiple choice in record aggregate
5544 * sem_res.adb (Resolve_Logical_Op): issue errors in formal mode when
5545 array operands to logical operations AND, OR and XOR do not have the
5546 same static lower and higher bounds
5547 * sem_ch5.adb, sinfo.ads: Correct typos in comments
5549 2011-08-01 Robert Dewar <dewar@adacore.com>
5551 * sem_util.ads, sem_util.adb, sem_ch6.adb (Last_Source_Statement):
5552 Replaces Last_Source_Node_In_Sequence.
5553 * err_vars.ads (Error_Msg_Lang): 16 is OK, don't need 4K
5554 * errout.adb (Set_Error_Msg_Lang): Takes arg with no parens, but stores
5555 parens and blank in string (this was inconsistently implemented).
5557 (Set_Error_Msg_Lang): Takes arg with no parens, but stores parens and
5558 blank in string (this was inconsistently implemented).
5560 (Set_Global_Switches): Set formal mode switches appropriately
5561 * opt.ads, opt.adb: Formal mode is now global switches, more consistent
5563 (Analyze_Pragma, case SPARK_95): Set opt switches appropriately and
5564 call Set_Error_Msg_Lang to set "spark" as language name.
5565 * par.adb: Remove unnecessary call to set formal language for errout
5566 * sem_prag.adb (P_Pragma, case SPARK_95): Set opt switches
5567 appropriately and call Set_Error_Msg_Lang to set "spark" as language
5569 * sem_ch4.adb (Analyze_Concatenation_Operand): remove procedure and
5570 calls to it, moved after resolution so that types are known
5571 * sem_res.adb (Resolve_Op_Concat): issue an error in formal mode if
5572 result of concatenation is not of type String
5573 (Resolve_Op_Concat_Arg): issue an error in formal mode if an operand of
5574 concatenation is not properly restricted
5575 * gnat_rm.texi: Add doc on pragma Spark_95.
5576 * gcc-interface/Makefile.in: Remove obsolete target pairs for
5577 Interfaces.C.* on VMS. Remove s-parame-vms-restrict.ads.
5578 * gcc-interface/Make-lang.in: Update dependencies.
5580 2011-08-01 Javier Miranda <miranda@adacore.com>
5582 * sem_disp.adb (Override_Dispatching_Operation): Enforce strictness of
5583 condition that detects if the overridden operation must replace an
5586 2011-08-01 Javier Miranda <miranda@adacore.com>
5588 * exp_ch4.adb (Expand_N_Case_Expression): Propagate to the expanded
5589 code declarations inserted by Insert_Actions in each alternative of the
5590 N_Case_Expression node.
5592 2011-08-01 Robert Dewar <dewar@adacore.com>
5594 * sem_ch6.adb: Minor code reorganization.
5595 * sem_util.adb: Minor reformatting.
5597 2011-08-01 Pascal Obry <obry@adacore.com>
5599 * prj-env.adb: Remove <prefix>/lib/gpr/<target> project search path.
5600 * gnat_ugn.texi: Add documentation for VERSIONINFO Windows resource.
5602 2011-08-01 Yannick Moy <moy@adacore.com>
5604 * par-ch4.adb (P_Name): issue a syntax error in SPARK mode on character
5605 literal or operator symbol which is prefixed
5606 * sem_attr.adb (Analyze_Access_Attribute): issue an error in formal
5607 mode on access attributes.
5608 * sem_ch4.adb (Analyze_Concatenation_Operand): new procedure to check
5609 that concatenation operands are properly restricted in formal mode
5610 (Analyze_Concatenation, Analyze_Concatenation_Rest): call new procedure
5611 Analyze_Concatenation_Operand. Issue an error in formal mode if the
5612 result of the concatenation has a type different from String.
5613 (Analyze_Conditional_Expression, Analyze_Explicit_Dereference,
5614 Analyze_Quantified_Expression, Analyze_Slice,
5615 Analyze_Null): issue an error in formal mode on unsupported constructs
5617 (Analyze_Block_Statement): only issue error on source block statement
5618 * sem_util.ads, sem_util.adb (Last_Source_Node_In_Sequence): new
5619 function which returns the last node in a list of nodes for which
5620 Comes_From_Source returns True, if any
5621 * sem_ch6.adb (Check_Missing_Return): minor refactoring to use
5622 Last_Source_Node_In_Sequence
5623 * sem_ch8.adb (Analyze_Exception_Renaming, Analyze_Generic_Renaming,
5624 Analyze_Object_Renaming, Analyze_Use_Package): issue an error in formal
5625 mode on unsupported constructs
5626 * sem_ch9.adb Do not return after issuing error in formal mode, as the
5627 rest of the actions may be needed later on since the error is marked as
5629 * sinfo.ads: Typos in comments.
5631 2011-08-01 Pascal Obry <obry@adacore.com>
5633 * projects.texi: Minor editing.
5635 2011-08-01 Yannick Moy <moy@adacore.com>
5637 * err_vars.ads (Error_Msg_Lang, Error_Msg_Langlen): new variables for
5638 insertion character ~~
5639 * errout.ads, errout.adb (Formal_Error_Msg_...): remove procedures
5640 (Set_Error_Msg_Lang): new procedure which fixes the language for use
5641 with insertion character ~~
5642 (Set_Msg_Text): treat insertion character ~~
5643 * par-ch4.adb, par-ch5.adb, par-endh.adb, sem_attr.adb, sem_ch11.adb,
5644 sem_ch3.adb, sem_ch5.adb, sem_ch9.adb, sem_util.adb: Replace calls to
5645 Formal_Error_Msg_... procedures by equivalent Error_Msg_...
5646 procedures. Favor calls to Error_Msg_F(E) over Error_Msg_N(E). Make
5647 errors related to the formal language restriction not serious
5648 (insertion character |).
5649 * par.adb (Par): set formal language for error messages if needed
5650 * sem_ch6.adb (Check_Missing_Return): take into account possible
5651 generated statements at the end of the function
5652 * snames.ads-tmpl (Name_SPARK_95, Pragma_SPARK_95): new variable and
5653 enumeration value to define a new pragma SPARK_95
5654 * opt.ads, opt.adb (SPARK_Version_Type, SPARK_Version_Default,
5655 SPARK_Version): new type and variables to store the SPARK version
5657 (SPARK_Mode): return True when SPARK_Version is set
5658 * par-prag.adb: Correct indentation
5659 (Prag): take Pragma_SPARK_95 into account
5660 * sem_prag.adb (Set_Mechanism_Value, Sig_Flags): take Pragma_SPARK_95
5663 2011-08-01 Robert Dewar <dewar@adacore.com>
5665 * sem_ch3.adb, sem_ch3.ads, sem_ch5.adb, prj-part.adb, par-ch4.adb,
5666 sem_util.adb, sem_ch4.adb, sem_ch6.adb, sem_ch6.ads, sem_ch8.adb,
5667 sem_ch8.ads, sem_ch13.ads, par-ch5.adb, prj-env.ads: Minor reformatting
5669 2011-08-01 Pascal Obry <obry@adacore.com>
5671 * prj-part.ads, prj-part.adb (Parse): Add Target_Name parameter. Pass
5672 Target_Name to Get_Path call.
5673 (Parse_Single_Project): Likewise.
5674 (Post_Parse_Context_Clause): Likewise.
5675 * prj-env.ads, prj-env.adb (Find_Project): Add Target_Name parameter.
5676 Call Initialise_Project_Path with the proper Target_Name.
5677 (Initialize_Project_Path): Add <gnat_root>/<target_name>/lib/gnat
5679 (Get_Path): Add Target_Name parameter. Call Initialise_Project_Path
5680 with the proper Target_Name.
5681 * prj-conf.adb (Get_Or_Create_Configuration_File): Pass Target_Name to
5683 (Parse_Project_And_Apply_Config): Likewise.
5684 * prj-makr.adb (Initialize): Pass empty Target_Name to Parse routine.
5685 This is fine as this part of the code is supporting only native
5687 * prj-pars.adb (Parse): Pass empty Target_Name to Parse routine. This
5688 is fine as this part of the code is supporting only native compilation.
5690 2011-08-01 Yannick Moy <moy@adacore.com>
5692 * sem_util.adb (Enter_Name): issue error in formal mode on declaration
5693 of homonym, unless the homonym is one of the cases allowed in SPARK
5694 * par-ch5.adb (Parse_Decls_Begin_End): issue error in SPARK mode for
5695 package declaration occurring after a body.
5697 2011-08-01 Robert Dewar <dewar@adacore.com>
5699 * checks.adb, exp_ch4.adb: Minor reformatting.
5701 2011-08-01 Javier Miranda <miranda@adacore.com>
5703 * einfo.ads (Access_Disp_Table): Fix documentation.
5704 (Dispatch_Table_Wrappers): Fix documentation.
5706 2011-08-01 Pascal Obry <obry@adacore.com>
5708 * prj-env.adb, prj-env.ads: Minor reformatting.
5710 2011-08-01 Yannick Moy <moy@adacore.com>
5712 * sem_util.ads, sem_util.adb, par.adb, par_util.adb
5713 (Formal_Error_Msg, Formal_Error_Msg_N, Formal_Error_Msg_SP): move
5714 procedures out of these packages.
5715 * errout.ads, errout.adb
5716 (Formal_Error_Msg, Formal_Error_Msg_N, Formal_Error_Msg_SP): move
5717 procedures in of this package
5718 (Formal_Error_Msg_NE): new procedure for wrapper on Error_Msg_NE
5719 * par-ch5.adb (Parse_Decls_Begin_End): issue syntax error in SPARK mode
5720 on misplaced later vs initial declarations, like in Ada 83
5721 * sem_attr.adb (Processing for Analyze_Attribute): issue error in
5722 formal mode on attribute of private type whose full type declaration
5724 * sem_ch3.adb (Analyze_Declarations): issue error in formal mode on a
5725 package declaration inside a package specification
5726 (Analyze_Full_Type_Declaration): issue error in formal mode on
5727 controlled type or discriminant type
5728 * sem_ch6.adb (Analyze_Subprogram_Specification): only issue error on
5729 user-defined operator means that it should come from the source
5730 (New_Overloaded_Entity): issue error in formal mode on overloaded
5732 * sem_ch6.ads, sem_ch13.ads: typos in comments.
5734 2011-08-01 Thomas Quinot <quinot@adacore.com>
5736 * atree.adb: Minor reformatting.
5737 * checks.adb: Minor reformatting.
5739 2011-08-01 Vincent Celier <celier@adacore.com>
5741 * s-parame-vms-ia64.ads: Fix typo in comment
5743 * s-parame-vms-restrict.ads: Removed, unused.
5745 2011-08-01 Javier Miranda <miranda@adacore.com>
5748 (Is_Variable_Size_Array): Remove local subprogram Is_Constant_Bound.
5750 (Constrain_Index): Remove side effects in the evaluation of the bounds.
5751 * sem_ch3.ads, sem_ch3.adb
5752 (Is_Constant_Bound): New extended version of the subprogram that was
5753 previously located inside function Exp_Ch3.Is_Variable_Size_Array.
5754 Moved here since it is shared by routines of sem_ch3 and exp_ch3.
5755 * sem_aux.ads (Constant_Value): Fix typo in comment.
5756 * checks.adb (Generate_Index_Checks): New implementation which, for
5757 array objects with constant bounds, generates the runtime check
5758 referencing the bounds of the array type. For other cases this routine
5759 provides its previous behavior obtaining such values from the array
5761 * sem_res.adb (Set_Slice_Subtype): Link a copied range subtree with its
5763 * atree.adb (New_Copy): Reset flag Is_Overloaded in the new copy since
5764 we cannot have semantic interpretations of the new node.
5766 2011-08-01 Ed Schonberg <schonberg@adacore.com>
5768 * sem_ch6.adb (Fully_Conformant_Expressions): handle quantified
5771 2011-08-01 Arnaud Charlet <charlet@adacore.com>
5773 * sem_ch8.adb: Minor code editing.
5774 * s-vxwext.adb: Remove trailing space.
5775 * freeze.adb, freeze.ads, errout.ads, erroutc.adb: Fix GPLv3 header for
5776 consistency with other files.
5778 2011-08-01 Thomas Quinot <quinot@adacore.com>
5780 * s-auxdec.ads, s-auxdec-vms_64.ads: Minor reformatting.
5782 2011-08-01 Ed Schonberg <schonberg@adacore.com>
5784 * par-ch10.adb: reject parameterized expressions as compilation unit.
5785 * sem_ch4.adb: handle properly conditional expression with overloaded
5786 then_clause and no else_clause.
5788 2011-08-01 Tristan Gingold <gingold@adacore.com>
5790 * s-parame-vms-alpha.ads, s-parame-vms-ia64.ads: Redeclare C_Address
5791 like done by System.Aux_DEC.
5792 * env.c (__gnat_setenv) [VMS]: Put logicals into LNM$PROCESS table.
5794 2011-08-01 Yannick Moy <moy@adacore.com>
5796 * par-endh.adb (Check_End): issue a syntax error in SPARK mode for
5797 missing label at end of declaration (subprogram or package)
5798 * par-ch4.adb (P_Name): issue a syntax error in SPARK mode for mixing
5799 of positional and named parameter association
5800 * par.adb, par-util.adb (Formal_Error_Msg_SP): new wrapper on
5801 Error_Msg_SP which adds a prefix to the error message giving the name
5802 of the formal language analyzed
5803 * sem_ch6.adb (Analyze_Return_Type): issue an error in formal mode for
5804 access result type in subprogram, unconstrained array as result type,.
5805 (Analyze_Subprogram_Declaration): issue an error in formal mode for null
5807 * sem_ch8.adb: Code clean up.
5809 2011-08-01 Javier Miranda <miranda@adacore.com>
5811 * sem_ch7.adb (Uninstall_Declarations): Remove useless code.
5812 * einfo.ads (Access_Disp_Table): Fix documentation.
5813 (Dispatch_Table_Wrappers): Fix documentation.
5814 * einfo.adb (Access_Disp_Table, Dispatch_Table_Wrappers,
5815 Set_Access_Disp_Table, Set_Dispatch_Table_Wrappers): Fix the assertions
5816 to enforce the documentation of this attribute.
5817 (Set_Is_Interface): Cleanup the assertion.
5818 * exp_ch4.adb (Expand_Allocator_Expression, Tagged_Membership): Locate
5819 the Underlying_Type entity before reading attribute Access_Disp_Table.
5820 * exp_disp.adb (Expand_Dispatching_Call, Expand_Interface_Conversion):
5821 Locate the Underlying_Type before reading attribute Access_Disp_Table.
5822 * exp_aggr.adb (Build_Array_Aggr_Code, Build_Record_Aggr_Code): Locate
5823 the Underlying_Type entity before reading attribute Access_Disp_Table.
5824 * exp_ch3.adb (Build_Record_Init_Proc, Expand_N_Object_Declaration):
5825 Locate the Underlying_Type entity before reading attribute
5828 2011-08-01 Ed Schonberg <schonberg@adacore.com>
5830 * s-poosiz.ads: Additional overriding indicators.
5832 2011-08-01 Yannick Moy <moy@adacore.com>
5834 * sem_ch5.adb (Analyze_Exit_Statement): add return after error in
5836 (Analyze_Iteration_Scheme): issue error in formal mode when loop
5837 parameter specification does not include a subtype mark.
5838 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): issue error in
5839 formal mode on abstract subprogram.
5840 (Analyze_Subprogram_Specification): issue error in formal mode on
5841 user-defined operator.
5842 (Process_Formals): issue error in formal mode on access parameter and
5844 * sem_ch9.adb (Analyze_Abort_Statement,
5845 Analyze_Accept_Statement, Analyze_Asynchronous_Select,
5846 Analyze_Conditional_Entry_Call, Analyze_Delay_Relative,
5847 Analyze_Delay_Until, Analyze_Entry_Call_Alternative,
5848 Analyze_Requeue, Analyze_Selective_Accept,
5849 Analyze_Timed_Entry_Call): issue error in formal mode on such constructs
5850 * sem_ch11.adb (Analyze_Raise_Statement, Analyze_Raise_xxx_Error):
5851 issue error in formal mode on user-defined raise statement.
5853 2011-08-01 Thomas Quinot <quinot@adacore.com>
5855 * sem_ch6.adb (Enter_Overloaded_Entity): Do not warn about a
5856 declaration being hidden when overriding an implicit inherited
5858 * par-ch10.adb (P_Compilation_Unit): In syntax check only mode
5859 (-gnats), do not complain about a source file that contains only a
5862 2011-08-01 Ed Schonberg <schonberg@adacore.com>
5864 * sem_ch5.adb (Analyze_Iterator_Scheme): Do not overwrite type of loop
5865 variable if already set.
5867 2011-08-01 Arnaud Charlet <charlet@adacore.com>
5869 * g-socket-dummy.adb, s-osinte-linux.ads, g-socket-dummy.ads,
5870 g-debuti.adb, g-tasloc.adb, g-debuti.ads, g-tasloc.ads,
5871 s-osinte-hpux.ads, g-sercom.adb, g-soliop-solaris.ads, g-sercom.ads,
5872 g-sptain.ads, g-curexc.ads, s-tasloc.adb, s-tasloc.ads, s-tataat.adb,
5873 g-ctrl_c.adb, a-reatim.adb, s-tataat.ads, g-dirope.adb, g-ctrl_c.ads,
5874 g-dirope.ads, g-boubuf.adb, g-calend.adb, g-boubuf.ads, g-souinf.ads,
5875 g-table.adb, g-bytswa-x86.adb, g-wispch.adb, g-io.adb, g-table.ads,
5876 g-wispch.ads, g-io.ads, g-memdum.adb, g-memdum.ads, g-busorg.adb,
5877 g-busorg.ads, g-regpat.adb, g-sothco-dummy.adb, g-encstr.adb,
5878 g-regpat.ads, g-sothco-dummy.ads, s-osinte-aix.ads, g-encstr.ads,
5879 g-sercom-mingw.adb, s-mastop-vms.adb, g-diopit.adb, g-diopit.ads,
5880 s-vxwext.adb, g-dyntab.adb, g-dyntab.ads, g-crc32.adb,
5881 g-sercom-linux.adb, g-crc32.ads, s-regpat.adb, g-flocon.ads,
5882 s-regpat.ads, g-stheme.adb, g-sestin.ads, s-taspri-posix-noaltstack.ads,
5883 g-soliop.ads, s-inmaop-posix.adb, g-locfil.ads, g-enblsp-vms-alpha.adb,
5884 g-socthi-dummy.adb, g-socthi-dummy.ads, gnat.ads, g-moreex.adb,
5885 g-moreex.ads, g-dynhta.adb, g-dynhta.ads, g-deutst.ads, g-htable.adb,
5886 g-cgicoo.adb, g-htable.ads, g-cgicoo.ads, a-interr.adb,
5887 g-socthi-vms.adb, g-socthi-vms.ads, g-hesora.adb, g-bubsor.adb,
5888 g-hesora.ads, g-bubsor.ads, g-md5.adb, g-md5.ads, s-intman-irix.adb,
5889 s-htable.adb, s-osinte-vms.adb, s-htable.ads, s-osinte-vms.ads,
5890 s-taprob.adb, g-bytswa.adb, g-bytswa.ads, s-osinte-solaris-posix.ads,
5891 a-suenco.adb, g-comver.adb, g-comver.ads, g-exctra.adb,
5892 s-osinte-solaris.adb, g-exctra.ads, s-osinte-irix.ads,
5893 s-osinte-solaris.ads, a-caldel-vms.adb, g-socthi-vxworks.adb,
5894 g-expect.adb, g-socthi-vxworks.ads, g-expect.ads, g-comlin.ads,
5895 g-heasor.adb, g-heasor.ads, g-traceb.adb, g-traceb.ads, g-decstr.adb,
5896 g-spipat.adb, g-decstr.ads, g-spipat.ads, s-mastop-tru64.adb,
5897 g-except.ads, g-thread.adb, g-hesorg.adb, g-thread.ads, g-hesorg.ads,
5898 g-expect-vms.adb, a-stuten.ads, g-spchge.adb, g-spchge.ads,
5899 g-u3spch.adb, g-u3spch.ads, g-spitbo.adb, g-spitbo.ads,
5900 s-osinte-dummy.ads, s-osinte-posix.adb, g-pehage.adb, g-pehage.ads,
5901 s-gloloc-mingw.adb, g-sha1.ads, s-traceb-hpux.adb,
5902 g-trasym-unimplemented.adb, g-trasym-unimplemented.ads, g-io_aux.adb,
5903 g-regexp.adb, g-io_aux.ads, g-socthi-mingw.adb, g-regexp.ads,
5904 s-osinte-hpux-dce.adb, g-socthi-mingw.ads, g-cgi.adb,
5905 s-osinte-hpux-dce.ads, g-cgi.ads, g-byorma.adb, g-boumai.ads,
5906 g-byorma.ads, a-caldel.adb, s-regexp.adb, s-regexp.ads,
5907 g-soliop-mingw.ads, g-sptavs.ads, s-osinte-tru64.ads, g-speche.adb,
5908 g-speche.ads, g-socthi.adb, g-stsifd-sockets.adb, g-socthi.ads,
5909 s-osinte-darwin.ads, i-vxwork-x86.ads, g-awk.adb, i-vxwork.ads,
5910 g-awk.ads, g-zspche.adb, g-zspche.ads, g-socket.adb, g-sptabo.ads,
5911 g-socket.ads, g-semaph.adb, g-semaph.ads, s-taspri-posix.ads,
5912 g-enblsp-vms-ia64.adb, g-cgideb.adb, g-cgideb.ads, g-sothco.adb,
5913 s-osinte-freebsd.ads, g-sothco.ads, g-catiio.adb, g-casuti.adb,
5914 g-catiio.ads, g-casuti.ads, g-trasym.adb, g-trasym.ads, s-casuti.adb,
5915 g-os_lib.adb, s-traceb-mastop.adb, g-busora.adb, s-interr-dummy.adb,
5916 g-busora.ads, g-enutst.ads, s-os_lib.adb, a-tasatt.adb,
5917 s-osinte-mingw.ads: Update to GPLv3 run-time license.
5918 Use GNAT instead of GNARL.
5920 2011-08-01 Bob Duff <duff@adacore.com>
5922 * a-cdlili.ads, a-cihama.ads, a-coinve.ads, a-ciorse.ads, a-coorma.ads,
5923 a-cidlli.ads, a-ciormu.ads, a-cihase.ads, a-cohama.ads, a-coorse.ads,
5924 a-ciorma.ads, a-coormu.ads, a-convec.ads, a-cohase.ads: Minor
5927 2011-08-01 Yannick Moy <moy@adacore.com>
5929 * debug.adb (d.D) reverve flag for the SPARK mode
5930 (d.E) reverve flag for SPARK generation mode
5931 (d.F) reverve flag for Why generation mode
5932 * opt.ads, opt.adb (ALFA_Mode, ALFA_Through_SPARK_Mode,
5933 ALFA_Through_Why_Mode, Formal_Verification_Mode, SPARK_Mode): New
5934 functions which return True when the corresponding modes are set
5935 (Formal_Language): return "spark" or "alfa" when in formal verification
5937 * sem_util.ads, sem_util.adb (Formal_Error_Msg): new wrapper on
5938 Error_Msg to prefix the error message with a tag giving the formal
5940 (Formal_Error_Msg_N): new wrapper on Error_Msg_N to prefix the error
5941 message with a tag giving the formal language
5942 * sem_ch5.adb (Analyze_Block_Statement): issue error in formal mode on
5944 (Analyze_Case_Statement): issue error in formal mode on case statement
5945 with a single "others" case alternative
5946 (Analyze_Exit_Statement): issue errors in formal mode on exit
5947 statements which do not respect SPARK restrictions
5948 (Analyze_Goto_Statement): issue error in formal mode on goto statement
5949 (Check_Unreachable_Code): always issue an error (not a warning) in
5950 formal mode on unreachable code (concerns both code after an infinite
5951 loop and after an unconditional jump, both not allowed in SPARK)
5952 * sem_ch6.adb (Analyze_Return_Statement): add call to
5953 Set_Return_Present for a procedure containing a return statement
5954 (already done for functions in Analyze_Function_Return)
5955 (Analyze_Function_Return): issue error in formal mode on extended
5956 return or if return is not last statement in function
5957 (Check_Missing_Return): issue error in formal mode if function does
5958 not end with return or if procedure contains a return
5959 * sem_ch8.ads, sem_ch8.adb (Has_Loop_In_Inner_Open_Scopes): new
5960 function to detect if there is an inner scope of its parameter S which
5963 2011-08-01 Thomas Quinot <quinot@adacore.com>
5965 * sem_ch6.ads: Minor reformatting.
5967 2011-08-01 Javier Miranda <miranda@adacore.com>
5969 * sem_util.adb (Abstract_Interface_List): Complete condition when
5970 processing private type declarations to avoid reading unavailable
5972 (Is_Synchronized_Tagged_Type): Complete condition when processing
5973 private extension declaration nodes to avoid reading unavailable
5976 2011-08-01 Thomas Quinot <quinot@adacore.com>
5978 * sem_ch3.adb: Minor reformatting.
5980 2011-08-01 Thomas Quinot <quinot@adacore.com>
5982 * s-parame-ae653.ads, s-parame-vms-alpha.ads, s-parame-hpux.ads,
5983 i-cpoint.adb, i-cstrin.adb, i-cpoint.ads, i-cstrin.ads,
5984 s-parame-vms-ia64.ads, s-parame.ads, i-c.ads, s-parame-vxworks.ads,
5985 s-parame-vms-restrict.ads: Remove duplicated Interfaces.C.* packages
5986 for VMS, instead parametrize the common implementation with
5987 System.Parameters declarations.
5989 2011-08-01 Eric Botcazou <ebotcazou@adacore.com>
5991 * gnat_rm.texi: Document limitation of Pragma No_Strict_Aliasing.
5993 2011-08-01 Tristan Gingold <gingold@adacore.com>
5995 * seh_init.c: Fix SEH handler installation on win64.
5997 2011-08-01 Ed Schonberg <schonberg@adacore.com>
5999 * sem_ch3.adb (Access_Subprogram_Declaration): in Asis mode, prevent
6000 double analysis of an anonymous access to subprogram, because it can
6001 lead to improper sharing of profiles and a back-end crash.
6003 2011-08-01 Robert Dewar <dewar@adacore.com>
6005 * make.adb, sem_ch4.adb: Minor reformatting.
6006 * gcc-interface/Make-lang.in: Update dependencies.
6007 * sem_util.adb, exp_ch5.adb: Minor reformatting.
6009 2011-08-01 Arnaud Charlet <charlet@adacore.com>
6011 * gnat_rm.texi: Fix definition of Long_Integer.
6013 2011-08-01 Ed Schonberg <schonberg@adacore.com>
6015 * exp_aggr.adb: check limit size of static aggregate unconditionally,
6016 to prevent storage exhaustion.
6017 * exp_ch7.adb (Clean_Simple_Protected_Objects): if the scope being
6018 finalized is a function body, insert the cleanup code before the final
6019 return statement, to prevent spurious warnings.
6020 * s-pooglo.ads: add overriding indicator.
6022 2011-08-01 Ed Schonberg <schonberg@adacore.com>
6024 * sem_ch4.adb (Operator_Check): improve error message when both a
6025 with_clause and a use_clause are needed to make operator usage legal.
6026 * sem_util.ads, sem_util.adb (Unit_Is_Visible): new predicate to
6027 determine whether a compilation unit is visible within an other,
6028 either through a with_clause in the current unit, or a with_clause in
6029 its library unit or one one of its parents.
6031 2011-08-01 Ed Schonberg <schonberg@adacore.com>
6033 * exp_ch5.adb (Expand_N_Iterator_Loop): handle properly an iterator
6034 over an arbitrary expression of an array or container type.
6035 * lib-xref.adb: clarify comment.
6037 2011-08-01 Bob Duff <duff@adacore.com>
6039 * einfo.ads: Minor reformatting.
6040 * debug.adb: Minor comment improvement.
6042 2011-08-01 Javier Miranda <miranda@adacore.com>
6044 * sem_ch4.adb (Try_Object_Operation): For class-wide subprograms do not
6045 consider hidden subprograms as valid candidates.
6047 2011-08-01 Arnaud Charlet <charlet@adacore.com>
6049 * make.adb (Compile): Strip -mxxx switches in CodePeer mode.
6051 2011-08-01 Vasiliy Fofanov <fofanov@adacore.com>
6053 * gnat_ugn.texi: Fix typo.
6055 2011-08-01 Robert Dewar <dewar@adacore.com>
6057 * i-cstrin.adb, sem_util.adb, exp_ch11.adb, sem_ch8.adb,
6058 lib-xref.adb: Minor reformatting
6060 2011-08-01 Gary Dismukes <dismukes@adacore.com>
6062 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Replace test of
6063 when to generate a call to Move_Final_List.
6064 (Has_Controlled_Parts): Remove this function.
6066 2011-08-01 Geert Bosch <bosch@adacore.com>
6068 * par-ch3.adb (P_Discrete_Choice_List): Improve error message for extra
6071 2011-08-01 Thomas Quinot <quinot@adacore.com>
6073 * exp_ch11.adb (Expand_N_Raise_Statement): Mark N_Raise_xxx_Error for
6074 explicit raise of a predefined exception as Comes_From_Source if the
6075 original N_Raise_Statement comes from source.
6077 2011-08-01 Robert Dewar <dewar@adacore.com>
6079 * sinfo.ads: Add comment.
6080 * sem_ch6.adb: Minor reformatting.
6082 2011-08-01 Robert Dewar <dewar@adacore.com>
6084 * freeze.adb (Freeze_Entity): Refine check for bad component size
6085 clause to avoid rejecting confirming clause when atomic/aliased present.
6087 2011-08-01 Ed Schonberg <schonberg@adacore.com>
6089 * sem_ch8.adb (Find_Direct_Name, Analyze_Expanded_Name): use Is_LHS to
6090 better determine whether an entity reference is a write.
6091 * sem_util.adb (Is_LHS): refine predicate to handle assignment to a
6093 * lib-xref.adb (Output_References): Do no suppress a read reference at
6094 the same location as an immediately preceeding modify-reference, to
6095 handle properly in-out actuals.
6097 2011-08-01 Tristan Gingold <gingold@adacore.com>
6099 * env.c (__gnat_setenv) [VMS]: Refine previous change.
6101 2011-08-01 Quentin Ochem <ochem@adacore.com>
6103 * i-cstrin.adb (New_String): Changed implementation, now uses only the
6104 heap to compute the result.
6106 2011-08-01 Robert Dewar <dewar@adacore.com>
6108 * atree.ads: Minor reformatting.
6110 2011-08-01 Emmanuel Briot <briot@adacore.com>
6112 * g-expect.adb (Get_Command_Output): Fix memory leak.
6114 2011-08-01 Geert Bosch <bosch@adacore.com>
6116 * cstand.adb (P_Float_Type): New procedure to print the definition of
6117 predefined fpt types.
6118 (P_Mixed_Name): New procedure to print a name using mixed case
6119 (Print_Standard): Use P_Float_Type for printing floating point types
6120 * einfo.adb (Machine_Emax_Value): Add preliminary support for quad
6121 precision IEEE float.
6123 2011-08-01 Thomas Quinot <quinot@adacore.com>
6125 * sem_ch3.adb: Minor reformatting.
6127 2011-08-01 Ed Schonberg <schonberg@adacore.com>
6129 * sem_ch6.adb (Analyze_Parameterized_Expression): If the expression is
6130 the completion of a generic function, insert the new body rather than
6131 rewriting the original.
6133 2011-08-01 Yannick Moy <moy@adacore.com>
6135 * sinfo.ads, errout.ads: Typos in comments.
6137 2011-08-01 Robert Dewar <dewar@adacore.com>
6139 * par-endh.adb: Minor reformatting.
6141 2011-08-01 Robert Dewar <dewar@adacore.com>
6143 * aspects.ads, aspects.adb: Add aspects for library unit pragmas
6144 (Pre_Post_Aspects): New subtype.
6145 * par-ch12.adb (P_Generic): New syntax for aspects in packages
6146 * par-ch13.adb (P_Aspect_Specifications): Add Semicolon parameter
6147 * par-ch7.adb (P_Package): Remove Decl parameter
6148 (P_Package): Handle new syntax for aspects (before IS)
6149 * par-ch9.adb (P_Protected_Definition): Remove Decl parameter, handle
6151 (P_Task_Definition): Remove Decl parameter, handle new aspect syntax
6152 * par.adb (P_Aspect_Specifications): Add Semicolon parameter
6153 (P_Package): Remove Decl parameter
6154 * sem_ch13.adb (Analyze_Aspect_Specifications): Handle library unit
6156 * sem_ch7.adb (Analyze_Package_Declaration): Analyze new format aspect
6158 * sem_util.ads, sem_util.adb (Static_Boolean): New function
6159 * sinfo.ads: Document new syntax for aspects in packages etc.
6160 * sprint.adb: Handle new syntax of aspects before IS in package
6162 2011-08-01 Thomas Quinot <quinot@adacore.com>
6164 * atree.ads: Minor reformatting.
6165 * sem_prag.adb: Minor reformatting.
6167 2011-08-01 Robert Dewar <dewar@adacore.com>
6169 * exp_util.adb (Insert_Actions): Fix error in handling Actions for
6170 case expr alternative.
6172 2011-08-01 Ed Schonberg <schonberg@adacore.com>
6174 * sem_ch12.adb: Fix typo.
6176 2011-08-01 Geert Bosch <bosch@adacore.com>
6178 * sem_prag.adb (Check_No_Link_Name): New procedure.
6179 (Process_Import_Or_Interface): Use Check_No_Link_Name.
6180 * cstand.adb (Create_Standard): Use Esize (Standard_Long_Long_Float)
6181 instead of Standard_Long_Long_Float_Size global. Preparation for
6182 eventual removal of per type constants.
6183 * exp_util.ads (Get_Stream_Size): New function returning the stream
6184 size value of subtype E.
6185 * exp_util.adb (Get_Stream_Size): Implement new function.
6186 * exp_strm.adb (Build_Elementary_Input_Call): Use Get_Stream_Size
6188 * exp_attr.adb (Attribute_Stream_Size): Use Get_Stream_Size
6190 (Machine_Mantissa_Value): Handle 128-bit quad precision IEEE floats
6192 2011-08-01 Geert Bosch <bosch@adacore.com>
6194 * cstand.adb: Fix comments.
6195 * sem_prag.adb (Analyze_Pragma): Use List_Length instead of explicit
6198 2011-08-01 Robert Dewar <dewar@adacore.com>
6200 * exp_ch4.adb, sem_cat.adb: Minor reformatting.
6202 2011-08-01 Geert Bosch <bosch@adacore.com>
6204 * atree.ads: Fix comment.
6206 2011-08-01 Robert Dewar <dewar@adacore.com>
6208 * aspects.ads, aspects.adb (Aspect_Names): Moved from body to spec.
6209 * par-ch13.adb (P_Aspect_Specifications): Check misspelled aspect name.
6210 * par.adb: Add with for Namet.Sp.
6211 * par-tchk.adb: Minor reformatting.
6213 2011-08-01 Vincent Celier <celier@adacore.com>
6215 * mlib-tgt-specific-vms-alpha.adb, mlib-tgt-specific-vms-ia64.adb
6216 (Build_Dynamic_Library): Use new function Init_Proc_Name to get the name
6217 of the init procedure of a SAL.
6218 * mlib-tgt-vms_common.ads, mlib-tgt-vms_common.adb (Init_Proc_Name):
6221 2011-08-01 Thomas Quinot <quinot@adacore.com>
6223 * exp_ch4.adb, s-tasini.ads, sem_attr.adb, s-soflin.ads: Minor
6226 2011-08-01 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
6228 * adaint.c (__gnat_file_time_name_attr): Get rid of warning.
6230 2011-08-01 Thomas Quinot <quinot@adacore.com>
6232 * sem_util.adb, sem_util.ads (Has_Overriding_Initialize): Make function
6233 conformant with its spec (return True only for types that have
6234 an overriding Initialize primitive operation that prevents them from
6235 having preelaborable initialization).
6236 * sem_cat.adb (Validate_Object_Declaration): Fix test for preelaborable
6237 initialization for controlled types in Ada 2005 or later mode.
6239 2011-08-01 Robert Dewar <dewar@adacore.com>
6241 * aspects.ads, aspects.adb: Add aspect Type_Invariant, Precondition,
6243 (Same_Aspect): New function.
6244 * sem_ch13.adb (Analyze_Aspect_Specifications): Add aspect
6245 Type_Invariant, Precondition, Postcondition.
6246 * snames.ads-tmpl: Add Name_Type_Invariant.
6248 2011-08-01 Robert Dewar <dewar@adacore.com>
6250 * freeze.adb (Freeze_Entity): Don't call Check_Aspect_At_Freeze_Point
6252 (Freeze_All_Ent): Fix error in handling inherited aspects.
6253 * sem_ch13.adb (Analyze_Aspect_Specifications): Skip aspect that is
6254 already analyzed, but don't skip entire processing of a declaration,
6255 that's wrong in some cases of declarations being rewritten.
6256 (Analyze_Aspect_Specification): Set Is_Delayed_Aspect in aspects.
6257 Don't delay for integer, string literals
6258 Treat predicates in usual manner for delay, remove special case code,
6260 (Analyze_Freeze_Entity): Make call to Check_Aspect_At_Freeze_Point
6261 (Build_Predicate_Function): Update saved expression in aspect
6262 (Build_Invariant_Procedure): Update saved expression in aspect
6263 * exp_ch4.adb (Expand_N_Selected_Component): Only do the optimization
6264 of replacement of discriminant references if the reference is simple.
6266 2011-08-01 Robert Dewar <dewar@adacore.com>
6268 * aspects.ads, aspects.adb: Add Static_Predicate and Dynamic_Predicate.
6269 * sem_ch13.adb (Analyze_Aspect_Specification): Add processing for
6270 Static_Predicate and Dynamic_Predicate.
6271 (Build_Predicate_Function): Add processing for Static_Predicate
6272 and Dynamic_Predicate.
6273 * sinfo.ads, sinfo.adb (From_Dynamic_Predicate): New flag
6274 (From_Static_Predicate): New flag
6275 * snames.ads-tmpl: Add Name_Static_Predicate and Name_Dynamic_Predicate
6277 2011-08-01 Robert Dewar <dewar@adacore.com>
6279 * usage.adb: Documentation cleanup for Ada version modes in usage.
6280 * expander.adb: Minor reformatting.
6282 2011-08-01 Robert Dewar <dewar@adacore.com>
6284 * atree.ads: Minor comment fix.
6285 * a-stwifi.adb, a-stzfix.adb, a-strfix.adb, a-ztexio.ads, a-textio.ads,
6286 a-witeio.ads, sem_prag.adb: Minor reformatting.
6288 2011-08-01 Doug Rupp <rupp@adacore.com>
6290 * env.c (__gnat_setenv) [VMS]: Force 32bit on item list structure
6291 pointers. Use descrip.h header file for convenience. Add some
6294 2011-08-01 Robert Dewar <dewar@adacore.com>
6296 * freeze.adb (Freeze_Entity): Call Check_Aspect_At_Freeze_Point
6297 (Freeze_All): Call Check_Aspect_At_End_Of_Declarations
6298 * sem_ch13.ads, sem_ch13.adb (Check_Aspect_At_Freeze_Point):
6300 (Check_Aspect_At_End_Of_Declarations): New procedure
6301 (Analye_Aspect_Specification): Minor changes for above procedures
6302 * sinfo.ads, sinfo.adb (Is_Delayed_Aspect): Now set in aspect
6303 specification node as well.
6305 2011-08-01 Pascal Obry <obry@adacore.com>
6307 * adaint.c (_gnat_stat): GetFilesAttributesEx() would fail on special
6308 Windows files. Use GetFilesAttributes() in this case to check for file
6309 existence instead of returning with an error code.
6311 2011-08-01 Vincent Celier <celier@adacore.com>
6313 * a-stzfix.adb, a-stwifi.adb (Replace_Slice): Fixed computation when
6314 High is above Source length.
6316 2011-08-01 Robert Dewar <dewar@adacore.com>
6318 * a-ztexio.ads, a-textio.ads, a-witeio.ads: Fix comment.
6320 2011-08-01 Robert Dewar <dewar@adacore.com>
6322 * aspects.ads (Boolean_Aspects): New subtype.
6323 * exp_ch13.adb (Expand_Freeze_Entity): Fix errors in handling aspects
6324 for derived types in cases where the parent type and derived type have
6326 * freeze.adb (Freeze_Entity): Fix problems in handling derived type
6327 with aspects when parent type also has aspects.
6328 (Freeze_Entity): Deal with delay of boolean aspects (must evaluate
6329 boolean expression at this point).
6330 * sem_ch13.adb (Analyze_Aspect_Specifications): Delay all aspects in
6331 accordance with final decision on the Ada 2012 feature.
6332 * sinfo.ads, sinfo.adb (Is_Boolean_Aspect): New flag.
6334 2011-08-01 Matthew Heaney <heaney@adacore.com>
6336 * a-chtgbo.adb (Delete_Node_Sans_Free): Replace iterator with selector.
6338 2011-08-01 Pascal Obry <obry@adacore.com>
6340 * a-stzunb-shared.adb, a-strunb-shared.adb, a-stwiun-shared.adb:
6341 Fix Replace_Slice when High is above current string size.
6342 (Replace_Slice): Fix DL computation when High is above current
6345 2011-08-01 Gary Dismukes <dismukes@adacore.com>
6347 * gnat_rm.texi: Add documentation for pragma Static_Elaboration_Desired.
6349 2011-08-01 Matthew Heaney <heaney@adacore.com>
6351 * a-rbtgbo.adb (Delete_Node_Sans_Free): Fixed assignment to left child
6354 2011-08-01 Pascal Obry <obry@adacore.com>
6356 * a-stzunb-shared.adb, a-strunb-shared.adb, a-stwiun-shared.adb: Minor
6359 2011-08-01 Ed Schonberg <schonberg@adacore.com>
6361 * sem_attr.adb (Analyze_Attribute, case 'Access): Handle properly named
6362 access to protected subprograms in generic bodies.
6363 * sem_ch6.adb (Analyze_Subprogram_Declaration): If the context is a
6364 protected type, indicate that the convention of the subprogram is
6365 Convention_Protected, because it may be used in subsequent declarations
6366 within the protected declaration.
6368 2011-08-01 Vincent Celier <celier@adacore.com>
6370 * mlib-prj.adb (Build_Library): Use "ada_" as the prefix for the "init"
6371 and "final" procedures when the name of the library is "ada", to avoid
6372 duplicate symbols "adainit" and "adafinal" in executables.
6374 2011-08-01 Ed Schonberg <schonberg@adacore.com>
6376 * sem_attr.adb (Analyze_Attribute, case 'Result): Handle properly a
6377 quantified expression that appears within a postcondition and uses the
6378 Ada2012 'Result attribute.
6380 2011-07-28 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
6382 * init.c (__gnat_error_handler): Cast reason to int.
6383 (__gnat_install_handler): Explain sa_sigaction use.
6385 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
6387 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: If the
6388 subprogram has copy-in copy-out parameters, try to promote the mode of
6389 the return type if it is passed in registers.
6391 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
6393 * gcc-interface/utils2.c (build_binary_op) <ARRAY_REF>: Do not mark the
6394 left operand as addressable.
6396 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
6398 * gcc-interface/gigi.h (build_function_stub): Remove.
6399 (build_return_expr): Likewise.
6400 (convert_vms_descriptor): Declare.
6401 * gcc-interface/utils.c (convert_vms_descriptor): Make global.
6402 (build_function_stub): Move to...
6403 * gcc-interface/utils2.c (build_return_expr): Move to...
6404 * gcc-interface/trans.c (build_function_stub): ...here.
6405 (build_return_expr): ...here.
6406 (Subprogram_Body_to_gnu): Add local variable for language_function.
6407 Disconnect the parameter attributes cache, if any, once done with it.
6408 Call end_subprog_body only after setting the end_locus.
6409 Build the stub associated with the function, if any, at the very end.
6410 (gnat_to_gnu) <N_Return_Statement>: Remove couple of useless local
6411 variables and streamline control flow.
6413 2011-07-23 Arnaud Charlet <charlet@adacore.com>
6416 * gcc-interface/Makefile.in (powerpc-linux): Remove reference to
6419 2011-07-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
6422 * init.c [sun && __SVR4 && !__vxworks] (__gnat_install_handler):
6423 Assign to act.sa_sigaction.
6424 * tracebak.c [USE_GENERIC_UNWINDER] (__gnat_backtrace): Cast
6425 current->return_address to char * before arithmetic.
6427 2011-07-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
6429 * init.c [sgi] (__gnat_error_handler): Update sigaction(2) citation.
6430 Correct argument types.
6431 Extract code from reason.
6432 (__gnat_install_handler): Assign to act.sa_sigaction.
6434 2011-07-21 Eric Botcazou <ebotcazou@adacore.com>
6436 * gcc-interface/Make-lang.in (GNAT1_ADA_OBJS): Move ada/b_gnat1.o to...
6437 (GNAT1_OBJS): ...here.
6439 2011-07-15 Eric Botcazou <ebotcazou@adacore.com>
6442 * g-socthi-mingw.adb (Fill): Fix formatting.
6444 * gcc-interface/gigi.h: Move around comment.
6446 2011-07-14 John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
6449 * s-taprop-hpux-dce.adb (Abort_Task): Remove unnecessary cast.
6451 2011-07-14 Florian Weimer <fw@deneb.enyo.de>
6454 * g-socthi-mingw.adb (Fill): Guard against invalid MSG_WAITALL.
6456 2011-07-13 Eric Botcazou <ebotcazou@adacore.com>
6458 * gcc-interface/utils.c (build_vms_descriptor32): Skip the 32-bit
6459 range comparison if Pmode is SImode.
6461 2011-07-12 Laurent GUERBY <laurent@guerby.net>
6462 Eric Botcazou <ebotcazou@adacore.com>
6464 * adadecode.c: Wrap up in extern "C" block.
6465 * adadecode.h: Likewise.
6466 * adaint.c: Likewise. Remove 'const' keyword.
6467 * adaint.h: Likewise.
6469 * atree.h: Likewise.
6471 * cstreams.c: Likewise.
6475 * final.c: Likewise.
6477 * initialize.c: Likewise.
6479 * namet.h: Likewise.
6480 * nlists.h: Likewise.
6481 * raise.c: Likewise.
6482 * raise.h: Likewise.
6483 * repinfo.h: Likewise.
6484 * seh_init.c: Likewise.
6485 * targext.c: Likewise.
6486 * tracebak.c: Likewise.
6487 * uintp.h: Likewise.
6488 * urealp.h: Likewise.
6489 * xeinfo.adb: Wrap up generated C code in extern "C" block.
6490 * xsinfo.adb: Likewise.
6491 * xsnamest.adb: Likewise.
6492 * gcc-interface/gadaint.h: Wrap up in extern "C" block.
6493 * gcc-interface/gigi.h: Wrap up some prototypes in extern "C" block.
6494 * gcc-interface/misc.c: Likewise.
6495 * gcc-interface/Make-lang.in (GCC_LINK): Use LINKER.
6496 (GNAT1_C_OBJS): Remove ada/b_gnat1.o. List ada/seh_init.o and
6497 ada/targext.o here...
6498 (GNAT_ADA_OBJS): ...and not here.
6499 (GNAT1_ADA_OBJS): Add ada/b_gnat1.o.
6500 (GNATBIND_OBJS): Reorder.
6502 2011-07-07 Richard Henderson <rth@redhat.com>
6504 * gcc-interface/misc.c (gnat_init_gcc_eh): Don't call
6505 dwarf2out_frame_init.
6507 2011-07-07 Eric Botcazou <ebotcazou@adacore.com>
6509 * gcc-interface/misc.c (gnat_init): Tweak previous change.
6511 2011-07-07 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
6514 * gcc-interface/Makefile.in: Handle x86_64-solaris2.
6516 2011-07-06 Richard Guenther <rguenther@suse.de>
6518 * gcc-interface/misc.c (gnat_init): Merge calls to
6519 build_common_tree_nodes and build_common_tree_nodes_2.
6520 Re-initialize boolean_false_node.
6522 2011-07-02 Eric Botcazou <ebotcazou@adacore.com>
6523 Olivier Hainque <hainque@adacore.com>
6524 Nicolas Setton <setton@adacore.com>
6526 * gcc-interface/utils.c (record_builtin_type): Set TYPE_ARTIFICIAL on
6527 the type according to the ARTIFICIAL_P parameter.
6528 (create_type_decl): Likewise.
6529 (create_type_stub_decl): Set TYPE_ARTIFICIAL on the type to 1.
6531 2011-07-01 Eric Botcazou <ebotcazou@adacore.com>
6533 * gcc-interface/Make-lang.in (gnat1): Prepend '+' to the command.
6534 (gnatbind): Likewise.
6536 2011-06-29 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
6538 * gcc-interface/Makefile.in (TOOLS_LIBS): Add $(LIBINTL).
6540 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
6542 * gcc-interface/decl.c (gnat_to_gnu_component_type): Use GNAT_TYPE
6543 local variable throughout. Remove useless call to Base_Type.
6544 (gnat_to_gnu_field): Use GNAT_FIELD_TYPE local variable throughout.
6545 Take it also into account for the volatileness of the field. Set the
6546 TREE_SIDE_EFFECTS flag as well in this case. Reorder some warnings.
6548 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
6550 * gcc-interface/trans.c (Identifier_to_gnu): Don't set TREE_THIS_NOTRAP
6551 on a dereference built for a by-ref object if it has an address clause.
6553 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
6555 * einfo.ads (Address_Taken): Document use for the second argument of
6556 Asm_Input and Asm_Output attributes.
6557 * sem_attr.adb (Analyze_Attribute) <Attribute_Asm_Input>: If the second
6558 argument is an entity name, then set Address_Taken on it.
6559 <Attribute_Asm_Output>: Likewise.
6560 * gcc-interface/trans.c (lvalue_required_for_attribute_p): Handle the
6561 Attr_Asm_Input and Attr_Asm_Output attributes explicitly.
6562 (gnat_to_gnu) <N_Code_Statement>: If an operand is going to end up in
6563 memory and is a CONST_DECL, retrieve its corresponding VAR_DECL.
6565 2011-06-16 Joern Rennecke <joern.rennecke@embecosm.com>
6568 * gcc-interface/decl.c (gnat_to_gnu_param): Use pack_cumulative_args.
6570 2011-06-14 Joseph Myers <joseph@codesourcery.com>
6572 * gcc-interface/Make-lang.in (gnatbind$(exeext)): Use ggc-none.o.
6573 (ada/utils.o): Update dependencies.
6574 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Add
6575 ../../../libcpp/libcpp.a.
6576 * gcc-interface/utils.c: Include common/common-target.h.
6577 (process_attributes): Use targetm_common.have_named_sections.
6579 2011-06-07 Richard Guenther <rguenther@suse.de>
6581 * gcc-interface/misc.c (gnat_init): Do not set size_type_node or call
6584 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
6586 * gcc-interface/utils2.c (gnat_stabilize_reference): Propagate the
6587 TREE_THIS_NOTRAP flag.
6589 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
6591 * gcc-interface/utils2.c (gnat_stabilize_reference) <COMPOUND_EXPR>:
6594 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
6596 * gcc-interface/trans.c (Identifier_to_gnu): Also handle deferred
6597 constants whose full view has discriminants specially.
6599 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
6601 * gcc-interface/utils.c: Include diagnostic.h.
6602 (gnat_write_global_declarations): Output debug information for all
6603 global type declarations before finalizing the compilation unit.
6604 * gcc-interface/Make-lang.in (ada/utils.o): Add dependency.
6606 2011-05-25 Jakub Jelinek <jakub@redhat.com>
6608 * gcc-interface/utils.c (def_fn_type): Remove extra va_end.
6610 2011-05-25 Kai Tietz <ktietz@redhat.com>
6612 * adaint.c (__gnat_to_canonical_file_list_next): Use array
6613 initialization instead of const/none-const pointer assignment.
6615 2011-05-24 Joseph Myers <joseph@codesourcery.com>
6617 * gcc-interface/Make-lang.in (GNAT1_OBJS): Don't include
6618 $(EXTRA_GNAT1_OBJS).
6619 (GNATBIND_OBJS): Don't include $(EXTRA_GNATBIND_OBJS).
6620 (EXTRA_GNAT1_OBJS, EXTRA_GNATBIND_OBJS): Remove.
6621 (gnat1$(exeext), gnatbind$(exeext)): Use libcommon-target.a.
6622 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Use
6623 libcommon-target.a instead of prefix.o.
6625 2011-05-21 Joseph Myers <joseph@codesourcery.com>
6628 * gcc-interface/Make-lang.in (gnatbind$(exeext)): Depend on $(LIBDEPS).
6630 2011-05-20 Joseph Myers <joseph@codesourcery.com>
6632 * gcc-interface/Make-lang.in (EXTRA_GNATBIND_OBJS): Remove version.o.
6633 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Use libcommon.a
6634 instead of version.o.
6636 2011-05-18 Kai Tietz <ktietz@redhat.com>
6638 * gcc-interface/trans.c (Exception_Handler_to_gnu_sjlj): Use
6639 boolean_false_node instead of integer_zero_node.
6640 (convert_with_check): Likewise.
6641 * gcc-interface/decl.c (choices_to_gnu): Likewise.
6643 2011-05-12 Eric Botcazou <ebotcazou@adacore.com>
6645 * gcc-interface/trans.c (call_to_gnu): In the by-reference case, if the
6646 type of the parameter is an unconstrained array, convert the actual to
6647 the type of the formal in the In Out and Out cases as well.
6649 2011-05-11 Nathan Froyd <froydnj@codesourcery.com>
6651 * gcc-interface/utils.c (def_fn_type): Don't call build_function_type;
6652 call build_function_type_array or build_varargs_function_type_array
6654 (create_subprog_type): Don't call build_function_type; call
6655 build_function_type_vec instead.
6657 2011-05-11 Nathan Froyd <froydnj@codesourcery.com>
6659 * gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE): Use TYPE_MINVAL.
6660 (TYPE_GCC_MIN_VALUE): Use TYPE_MINVAL.
6661 (TYPE_GCC_MAX_VALUE): Use TYPE_MAXVAL.
6663 2011-05-07 Eric Botcazou <ebotcazou@adacore.com>
6665 * gcc-interface/decl.c (intrin_arglists_compatible_p): Remove spaces.
6667 * gcc-interface/gigi.h (global_bindings_p): Adjust prototype.
6668 * gcc-interface/utils.c (global_bindings_p): Return bool and simplify.
6670 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
6672 * gcc-interface/trans.c (Case_Statement_to_gnu): Call build_case_label.
6674 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
6676 * gcc-interface/decl.c (intrin_arglists_compatible_p): Use iterators
6677 instead of accessing TYPE_ARG_TYPES directly.
6678 * gcc-interface/utils.c (handle_nonnull_attribute): Likewise.
6680 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
6683 * gcc-interface/gigi.h (get_variant_part): Declare.
6684 * gcc-interface/decl.c (get_variant_part): Make global.
6685 * gcc-interface/utils2.c (find_common_type): Do not return T1 if the
6686 types have the same constant size, are record types and T1 has a
6687 variant part while T2 doesn't.
6689 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
6691 * gcc-interface/utils.c (begin_subprog_body): Do not call
6693 (end_subprog_body): Likewise.
6695 2011-05-04 Richard Guenther <rguenther@suse.de>
6697 * gcc-interface/trans.c (gnat_to_gnu): Remove zero notrunc argument to
6699 (pos_to_constructor): Likewise.
6701 2011-05-03 Nathan Froyd <froydnj@codesourcery.com>
6702 Eric Botcazou <ebotcazou@adacore.com>
6704 * gcc-interface/trans.c (gigi): Call build_function_type_list instead
6705 of build_function_type. Adjust calls to...
6706 (build_raise_check): ...this. Do not take a void_tree parameter.
6707 Call build_function_type_list instead of build_function_type.
6708 Fix head comment and swap couple of conditional blocks.
6710 2011-04-30 Eric Botcazou <ebotcazou@adacore.com>
6712 * gnatvsn.ads (Library_Version): Bump to 4.7.
6713 (Current_Year): Bump to 2011.
6715 2011-04-29 Michael Matz <matz@suse.de>
6717 * gcc-interface/misc.c (gnat_handle_option): Set
6718 warn_maybe_uninitialized.
6720 2011-04-23 Gerald Pfeifer <gerald@pfeifer.com>
6722 * gnat_ugn.texi (Complexity Metrics Control): Update link to
6723 the Watson/McCabe paper.
6725 2011-04-23 Jim Meyering <meyering@redhat.com>
6727 * gnat_ugn.texi (Examples of gnatxref Usage): Fix typo: s/it it/it is/
6729 2011-04-22 Eric Botcazou <ebotcazou@adacore.com>
6731 * gcc-interface/decl.c (make_packable_type): Copy DECL_PARALLEL_TYPE
6734 2011-04-22 Eric Botcazou <ebotcazou@adacore.com>
6736 * gcc-interface/gigi.h (create_subprog_decl): Add ARTIFICIAL_FLAG
6738 * gcc-interface/utils.c (create_subprog_decl): Likewise. Set
6739 DECL_ARTIFICIAL and DECL_NO_INLINE_WARNING_P on the DECL accordingly.
6740 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: Add
6741 ARTIFICIAL_FLAG local variable and pass it to create_subprog_decl.
6742 <all>: Do not set flags on the reused DECL node coming from an alias.
6743 Set DECL_IGNORED_P on the DECL node built for subprograms if they
6744 don't need debug info here...
6745 * gcc-interface/trans.c (Subprogram_Body_to_gnu): ...and not here.
6746 (gigi): Adjust calls to create_subprog_decl.
6747 (build_raise_check): Likewise.
6748 (establish_gnat_vms_condition_handler): Likewise.
6749 (Compilation_Unit_to_gnu): Likewise.
6750 (gnat_to_gnu): Likewise.
6752 2011-04-21 Eric Botcazou <ebotcazou@adacore.com>
6754 * gcc-interface/Makefile.in (NO_SIBLING_ADAFLAGS): Always define.
6755 (NO_REORDER_ADAFLAGS): New variable.
6756 (EXTRA_GNATTOOLS): Always define.
6757 (../stamp-gnatlib1-$(RTSDIR): Copy tsystem.h.
6758 Clean up and adjust list of files compiled with special options.
6759 * gcc-interface/Make-lang.in: Likewise.
6760 (ada/decl.o): Cosmetical change.
6761 (ada/misc.o): Remove dependency on $(PLUGIN_H).
6763 2011-04-20 Jim Meyering <meyering@redhat.com>
6765 * initialize.c (__gnat_initialize): Remove useless if-before-free.
6767 2011-04-17 Eric Botcazou <ebotcazou@adacore.com>
6769 * gcc-interface/Make-lang.in (gnatbind): Replace $(ALL_CFLAGS) with
6770 $(CFLAGS) on the link line.
6772 2011-04-17 Eric Botcazou <ebotcazou@adacore.com>
6774 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Function>: Declare the
6775 padded type built for the return type if it is unconstrained.
6777 2011-04-14 Nathan Froyd <froydnj@codesourcery.com>
6779 * gcc-interface/utils.c (gnat_poplevel): Use block_chainon.
6781 2011-04-12 Nathan Froyd <froydnj@codesourcery.com>
6783 * gcc-interface/ada-tree.h (union lang_tree_node): Check for TS_COMMON
6784 before calling TREE_CHAIN.
6785 * gcc-interface/misc.c (gnat_init_ts): New function.
6786 (LANG_HOOKS_INIT_TS): Define.
6788 2011-04-12 Martin Jambor <mjambor@suse.cz>
6790 * gcc-interface/utils.c (end_subprog_body): Call cgraph_get_create_node
6791 instead of cgraph_node.
6793 2011-04-08 Eric Botcazou <ebotcazou@adacore.com>
6795 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Procedure>: Set minimum
6796 alignment on fields of the RETURN type built for the Copy-In Copy-Out
6799 2011-04-08 Eric Botcazou <ebotcazou@adacore.com>
6801 * gcc-interface/trans.c (Identifier_to_gnu): Do not return initializers
6802 of aggregate types that contain a placeholder.
6804 2011-04-08 Nathan Froyd <froydnj@codesourcery.com>
6806 * gcc-interface/utils.c (handle_sentinel_attribute): Don't use
6808 (handle_type_generic_attribute): Likewise.
6810 2011-04-04 Eric Botcazou <ebotcazou@adacore.com>
6813 * s-oscons-tmplt.c (MSG_WAITALL): Fix thinko in previous change.
6815 2011-04-04 Kai Tietz <ktietz@redhat.com>
6818 * s-oscons-tmplt.c (MSG_WAITALL): Define it for native windows targets
6821 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6823 * gcc-interface/utils2.c (build_allocator): In the unconstrained array
6824 type case, do not strip a padding type around the array type.
6826 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6828 * gcc-interface/utils.c (update_pointer_to): Finalize named pointer
6831 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6833 * gcc-interface/lang.opt (feliminate-unused-debug-types): Delete.
6834 * gcc-interface/misc.c (gnat_handle_option): Remove special handling
6835 code for -feliminate-unused-debug-types.
6836 (gnat_post_options): Likewise.
6838 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6840 * gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
6841 declaration of a pointer type, then set DECL_ORIGINAL_TYPE to a
6844 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6846 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not force the
6847 DECL_ARTIFICIAL flag on enumeration types.
6849 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6851 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Do not make
6852 fat pointer types artificial unconditionally.
6853 <E_Array_Subtype>: Attach the base array type as a parallel type if it
6856 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6858 * gcc-interface/gigi.h (get_dummy_type): Declare.
6859 (build_dummy_unc_pointer_types): Likewise.
6860 (finish_fat_pointer_type): Likewise.
6861 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: If a dummy
6862 fat pointer type has been built, complete it in place.
6863 <E_Access_Type>: Call build_dummy_unc_pointer_types to build dummy fat
6864 and thin pointers. Remove useless variable.
6865 (finish_fat_pointer_type): Make global and move to...
6866 * gcc-interface/utils.c (finish_fat_pointer_type): ...here.
6867 (get_dummy_type): New function.
6868 (build_dummy_unc_pointer_types): Likewise.
6869 (gnat_pushdecl): Propage the name to the anonymous variants only.
6870 (update_pointer_to): Only adjust the pointer types in the unconstrained
6873 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6875 * gcc-interface/ada-tree.h (DECL_TAFT_TYPE_P): New flag.
6876 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Incomplete_Type>: Set it
6877 if this is a Taft amendment type and the full declaration is available.
6878 * gcc-interface/trans.c (process_type): Likewise.
6879 If there is an old type, mark the new one as used if DECL_TAFT_TYPE_P.
6880 (process_freeze_entity): Likewise.
6881 * gcc-interface/utils.c (dummy_global): New static variable.
6882 (gnat_write_global_declarations): If there are types declared as used
6883 at the global level, insert them in the global hash table.
6885 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6887 * gcc-interface/gigi.h (record_builtin_type): Add ARTIFICIAL_P param.
6888 * gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
6889 declaration of an array type, then set DECL_ORIGINAL_TYPE to a distinct
6891 (record_builtin_type): Add ARTIFICIAL_P parameter. Set DECL_ARTIFICIAL
6892 flag of the type accordingly.
6893 * gcc-interface/trans.c (gigi): Adjust calls to record_builtin_type.
6895 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
6897 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Defer
6898 finalizing types when updating the pointers to the designated type.
6899 <all>: Finalize the deferred types even if we didn't defer processing
6900 of incomplete types in this invocation.
6902 2011-04-01 Olivier Hainque <hainque@adacore.com>
6903 Nicolas Setton <setton@adacore.com>
6904 Eric Botcazou <ebotcazou@adacore.com>
6906 * gcc-interface/misc.c (gnat_descriptive_type): New function.
6907 (LANG_HOOKS_DESCRIPTIVE_TYPE): Redefine to gnat_descriptive_type.
6909 2011-03-28 Kai Tietz <ktietz@redhat.com>
6911 * gcc-interface/Makefile.in (SO_LIB): Handle multilib build for native
6913 (EH_MECHANISM): Use GCC exception mechanism for native Windows targets.
6914 * system-mingw.ads (System): Change ZCX_By_Default default to True.
6916 * raise-gcc.c (PERSONALITY_FUNCTION): Add prototype.
6918 2011-03-28 Tristan Gingold <gingold@adacore.com>
6921 * gcc-interface/Make-lang.in (ada/b_gnat1.adb): Replace ada/b_gnat1.c.
6922 Use ada output of gnatbind.
6923 (ada/b_gnatb.adb): Ditto.
6924 (ada/b_gnat1.o, ada/b_gnatb.o): New rules.
6925 (ada.mostlyclean, ada.stage1)
6926 (ada.stage2, ada.stage3, ada.stage4, ada.stageprofile)
6927 (ada.stagefeedback): Adjust.
6928 * gcc-interface/Makefile.in (b_gnatl.adb): Replace b_gnatl.c.
6929 Use ada output of gnatbind.
6930 (b_gnatm.adb): Ditto.
6931 (b_gnatl.o, b_gnatm.o): New rules.
6933 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
6935 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Create TYPE_DECL
6936 for the padded type built to support a specified size or alignment.
6938 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
6940 * gcc-interface/gigi.h (finalize_from_with_types): Adjust comment.
6941 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Defer
6942 unconditionally to the end of the unit when the designated type is
6944 <all>: Rename local variable. Attempt to un-defer types only and do it
6945 for limited_with'ed types as well.
6946 (finalize_from_with_types): Adjust comment. Rename variable and tidy.
6947 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Use GNAT_UNIT
6948 consistently and remove redundant call to finalize_from_with_types.
6950 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
6952 * inline.adb (Back_End_Cannot_Inline): Lift restriction on calls to
6953 subprograms without a previous spec declared in the same unit.
6954 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Process inlined
6955 subprograms at the end of the unit instead of at the beginning.
6956 * gcc-interface/utils.c (create_subprog_decl): Check that the entity
6957 isn't public for the special handling of non-inline functions nested
6958 inside inline external functions.
6960 2011-03-25 Jeff Law <law@redhat.com>
6962 * gcc-interface/utils.c (def_fn_type): Add missing va_end.
6964 2011-03-24 Eric Botcazou <ebotcazou@adacore.com>
6966 * einfo.ads (Size_Depends_On_Discriminant): Adjust description.
6967 * layout.adb (Compute_Size_Depends_On_Discriminant): New procedure
6968 to compute Set_Size_Depends_On_Discriminant.
6969 (Layout_Type): Call it on array types in back-end layout mode.
6970 * sem_util.adb (Requires_Transient_Scope): Return true for array
6971 types only if the size depends on the value of discriminants.
6972 * gcc-interface/utils2.c (build_binary_op) <MODIFY_EXPR>: Use the RHS
6973 type if the RHS is a call to a function that returns an unconstrained
6974 type with default discriminant.
6976 2011-03-24 Eric Botcazou <ebotcazou@adacore.com>
6978 * gcc-interface/trans.c (gnat_to_gnu): Remove obsolete case of
6979 non-conversion to the nominal result type at the end.
6981 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
6983 * gcc-interface/trans.c (create_temporary): New function taken from...
6984 (create_init_temporary): ...here. Call it.
6985 (call_to_gnu): Create the temporary for the return value early, if any.
6986 Create it for a function with copy-in/copy-out parameters if there is
6987 no target; in other cases of copy-in/copy-out, use another temporary.
6988 Push the new binding level lazily. Add and rename local variables.
6990 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
6992 * gcc-interface/decl.c (validate_size): Improve comments and tweak
6994 (set_rm_size): Likewise.
6996 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
6998 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Create TYPE_DECL
6999 for the padded type built in order to support a specified alignment.
7000 Fix incorrect formatting.
7002 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
7005 * gcc-interface/decl.c (elaborate_expression_1): Localize GNU_DECL.
7007 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
7009 * gcc-interface/decl.c (components_to_record): Add REORDER parameter,
7010 rename DEBUG_INFO_P into DEBUG_INFO and move P_GNU_REP_LIST parameter
7011 to the end of the list. Adjust recursive call. Rename local variable.
7012 If REORDER is true, reorder components of the record type.
7013 (gnat_to_gnu_entity): Pass OK_To_Reorder_Components flag as argument to
7014 components_to_record and adjust the parameter list.
7016 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
7018 * gcc-interface/decl.c (elaborate_expression_1): When optimization is
7019 disabled, use the variable for bounds of loop iteration scheme.
7021 2011-03-21 Kai Tietz <ktietz@redhat.com>
7024 * gcc-interface/utils.c (gnat_internal_attribute_table): Add column.
7026 2011-03-17 Eric Botcazou <ebotcazou@adacore.com>
7028 * gcc-interface/decl.c (elaborate_expression_1): Try harder to find
7029 out whether the expression is read-only. Short-circuit placeholder
7030 case and rename a couple of local variables.
7032 2011-03-17 Eric Botcazou <ebotcazou@adacore.com>
7034 * gcc-interface/gigi.h (smaller_form_type_p): Declare.
7035 * gcc-interface/trans.c (smaller_form_type_p): Make global and move...
7036 * gcc-interface/utils.c (smaller_form_type_p): ...to here.
7037 (convert): Deal with conversions from a smaller form type specially.
7039 2011-02-14 Eric Botcazou <ebotcazou@adacore.com>
7041 * gcc-interface/misc.c (gnat_init_options): Do not concatenate -I and
7042 its argument, except for the special -I- switch.
7044 2011-02-12 Gerald Pfeifer <gerald@pfeifer.com>
7046 * gnat_ugn.texi (Compiling Different Versions of Ada): Update link to
7049 2011-02-08 Eric Botcazou <ebotcazou@adacore.com>
7051 * gcc-interface/Makefile.in (x86-64 darwin): Handle multilibs.
7053 2011-02-03 Eric Botcazou <ebotcazou@adacore.com>
7055 * gcc-interface/gigi.h (fill_vms_descriptor): Take GNU_TYPE instead of
7057 * gcc-interface/utils2.c (fill_vms_descriptor): Move from here to...
7058 * gcc-interface/utils.c (fill_vms_descriptor): ...here. Take GNU_TYPE
7059 instead of GNAT_FORMAL. Protect the expression against multiple uses.
7060 Do not generate the check directly, instead instantiate the template
7061 check present in the descriptor.
7062 (make_descriptor_field): Move around.
7063 (build_vms_descriptor32): Build a template check in the POINTER field.
7064 (build_vms_descriptor): Remove useless suffixes.
7065 * gcc-interface/trans.c (call_to_gnu): Adjust fill_vms_descriptor call.
7067 2011-01-26 Eric Botcazou <ebotcazou@adacore.com>
7070 * targext.c: Include target files if IN_RTS is defined.
7072 2011-01-26 Richard Guenther <rguenther@suse.de>
7075 * targext.c: Include config.h.
7076 * gcc-interface/Make-lang.in (ada/targext.o): Add $(CONFIG_H)
7079 2011-01-04 Pascal Obry <obry@adacore.com>
7080 Eric Botcazou <ebotcazou@adacore.com>
7082 * gcc-interface/decl.c: Disable Stdcall convention handling for 64-bit.
7084 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
7086 * gcc-interface/trans.c (Case_Statement_to_gnu): Put the SLOC of the
7087 end-of-case on the end label and its associated gotos, if any.
7089 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
7091 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Evaluate the
7092 expressions of the parameter cache within the statement group of
7095 2011-01-04 Olivier Hainque <hainque@adacore.com>
7096 Eric Botcazou <ebotcazou@adacore.com>
7098 * gcc-interface/trans.c (BLOCK_SOURCE_END_LOCATION): Provide default.
7099 (set_end_locus_from_node): New function.
7100 (Subprogram_Body_to_gnu): Use it to mark both the inner BIND_EXPR we
7101 make and the function end_locus.
7102 (Compilation_Unit_to_gnu): Call it instead of a straight Sloc_to_locus
7103 for the elaboration subprogram.
7104 (set_gnu_expr_location_from_node) <default case>: Use it to attempt to
7105 set the end_locus of the expression as well.
7107 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
7110 * gcc-interface/trans.c (Identifier_to_gnu): In SJLJ mode, do not make
7111 variables that are referenced in exception handlers volatile.
7115 Copyright (C) 2011 Free Software Foundation, Inc.
7117 Copying and distribution of this file, with or without modification,
7118 are permitted in any medium without royalty provided the copyright
7119 notice and this notice are preserved.
7121 * gnat_rm.texi: Ramification of pragma Eliminate documentation
7122 - fix bugs in the description of Source_Trace;
7123 - get rid of UNIT_NAME;
7125 2011-08-02 Javier Miranda <miranda@adacore.com>
7128 (Build_Dispatching_Requeue): Adding support for VM targets
7129 since we cannot directly reference the Tag entity.
7130 * exp_sel.adb (Build_K): Adding support for VM targets.
7131 (Build_S_Assignment): Adding support for VM targets.
7133 (Default_Prim_Op_Position): In VM targets do not restrict availability
7134 of predefined interface primitives to compiling in Ada 2005 mode.
7135 (Is_Predefined_Interface_Primitive): In VM targets this service is not
7136 restricted to compiling in Ada 2005 mode.
7137 (Make_VM_TSD): Generate code that declares and initializes the OSD
7138 record. Needed to support dispatching calls through synchronized
7141 (Make_Predefined_Primitive_Specs): Enable generation of predefined
7142 primitives associated with synchronized interfaces.
7143 (Make_Predefined_Primitive_Bodies): Enable generation of predefined
7144 primitives associated with synchronized interfaces.
7146 2011-08-02 Yannick Moy <moy@adacore.com>
7148 * par-ch11.adb (P_Handled_Sequence_Of_Statements): mark a sequence of
7149 statements hidden in SPARK if preceded by the HIDE directive
7150 (Parse_Exception_Handlers): mark each exception handler in a sequence of
7151 exception handlers as hidden in SPARK if preceded by the HIDE directive
7152 * par-ch6.adb (P_Subprogram): mark a subprogram body hidden in SPARK
7153 if starting with the HIDE directive
7154 * par-ch7.adb (P_Package): mark a package body hidden in SPARK if
7155 starting with the HIDE directive; mark the declarations in a private
7156 part as hidden in SPARK if the private part starts with the HIDE
7158 * restrict.adb, restrict.ads
7159 (Set_Hidden_Part_In_SPARK): record a range of slocs as hidden in SPARK
7160 (Is_In_Hidden_Part_In_SPARK): new function which returns whether its
7161 argument node belongs to a part which is hidden in SPARK
7162 (Check_SPARK_Restriction): do not issue violations on nodes in hidden
7163 parts in SPARK; protect the possibly costly call to
7164 Is_In_Hidden_Part_In_SPARK by a check that the SPARK restriction is on
7165 * scans.ads (Token_Type): new value Tok_SPARK_Hide in enumeration
7166 * scng.adb (Accumulate_Token_Checksum_GNAT_6_3,
7167 Accumulate_Token_Checksum_GNAT_5_03): add case for new token
7169 (Scan): recognize special comment starting with '#' and followed by
7170 SPARK keyword "hide" as a HIDE directive.
7172 2011-08-02 Yannick Moy <moy@adacore.com>
7174 * types.ads, erroutc.ads: Minor reformatting.
7176 2011-08-02 Vincent Celier <celier@adacore.com>
7178 * link.c: Add response file support for cross platforms.
7180 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7182 * sem_aggr.adb (Resolve_Array_Aggregate): when copying the expression
7183 in an association, set parent field of copy before partial analysis.
7184 * sem_res.adb (Resolve_Slice): create reference to itype only when
7185 expansion is enabled.
7187 2011-08-02 Yannick Moy <moy@adacore.com>
7189 * einfo.adb, einfo.ads (Body_Is_In_ALFA, Set_Body_Is_In_ALFA): get/set
7190 for new flag denoting which subprogram bodies are in ALFA
7191 * restrict.adb, sem_ch7.adb: Update comment
7192 * sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb,
7193 sem_ch9.adb, sem_res.adb: Add calls to
7194 Current_Subprogram_Body_Is_Not_In_ALFA on unsupported constructs.
7195 * sem_ch6.adb (Analyze_Function_Return): add calls to
7196 Current_Subprogram_Body_Is_Not_In_ALFA on return statement in the
7197 middle of the body, and extended return.
7198 (Check_Missing_Return): add calls to Set_Body_Is_In_ALFA with argument
7199 False when missing return.
7200 (Analyze_Subprogram_Body_Helper): initialize the flag Body_Is_In_ALFA
7201 to True for subprograms whose spec is in ALFA. Remove later on the flag
7202 on the entity used for a subprogram body when there exists a separate
7204 * sem_util.adb, sem_util.ads (Current_Subprogram_Body_Is_Not_In_ALFA):
7205 if Current_Subprogram is not Empty, set its flag Body_Is_In_ALFA to
7206 False, otherwise do nothing.
7208 2011-08-02 Robert Dewar <dewar@adacore.com>
7210 * inline.adb, stand.ads, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
7212 2011-08-02 Yannick Moy <moy@adacore.com>
7214 * sem_ch4.ads: minor formatting.
7216 2011-08-02 Yannick Moy <moy@adacore.com>
7218 * sem_aggr.adb, err_vars.ads, sem_ch3.adb, sem_ch5.adb, sem_ch9.adb,
7219 debug.adb, sem_util.adb, sem_res.adb, sem_attr.adb, gnat1drv.adb,
7220 errout.adb, errout.ads, exp_ch6.adb, sem_ch4.adb, restrict.adb,
7221 restrict.ads, sem_ch6.adb, sem_ch8.adb, sem_ch11.adb,
7222 opt.ads: cleanup of SPARK mode
7224 2011-08-02 Yannick Moy <moy@adacore.com>
7226 * cstand.adb (Create_Standard): sets Is_In_ALFA component of standard
7228 * einfo.adb, einfo.ads (Is_In_ALFA): add flag for all entities
7229 (Is_In_ALFA, Set_Is_In_ALFA): new subprograms to access flag Is_In_ALFA
7231 (Analyze_Object_Declaration): set Is_In_ALFA flag for objects
7232 (Constrain_Enumeration): set Is_In_ALFA flag for enumeration subtypes
7233 (Constrain_Integer): set Is_In_ALFA flag for integer subtypes
7234 (Enumeration_Type_Declaration): set Is_In_ALFA flag for enumeration
7236 (Set_Scalar_Range_For_Subtype): unset Is_In_ALFA flag for subtypes with
7238 * sem_ch6.adb (Analyze_Return_Type): unset Is_In_ALFA flag for
7239 functions whose return type is not in ALFA.
7240 (Analyze_Subprogram_Specification): set Is_In_ALFA flag for subprogram
7242 (Process_Formals): unset Is_In_ALFA flag for subprograms if a
7243 parameter's type is not in ALFA.
7244 * stand.ads (Standard_Type_Is_In_ALFA): array defines which standard
7247 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7249 * sem_ch6 (Analyze_Expression_Function): treat the function as
7250 Inline_Always, and introduce a subprogram declaration for it when it is
7252 * inline.adb (Add_Inlined_Body): recognize bodies that come from
7253 expression functions, so that the back-end can determine whether they
7254 can in fact be inlined.
7255 * sem_util.adb (Is_Expression_Function): predicate to determine whether
7256 a function body comes from an expression function.
7258 2011-08-02 Gary Dismukes <dismukes@adacore.com>
7260 * sem_ch6.adb (Check_Conformance): Revise the check for nonconforming
7261 null exclusions to test Can_Never_Be_Null on the anonymous access types
7262 of the formals rather than testing the formals themselves. Exclude this
7263 check in cases where the Old_Formal is marked as a controlling formal,
7264 to avoid issuing spurious errors for bodies completing dispatching
7265 operations (due to the flag not getting set on controlling access
7266 formals in body specs).
7267 (Find_Corresponding_Spec): When checking full and subtype conformance of
7268 subprogram bodies in instances, pass Designated and E in that order, for
7269 consistency with the expected order of the formals (New_Id followed by
7272 2011-08-02 Robert Dewar <dewar@adacore.com>
7274 * sem_ch8.adb: Minor reformatting.
7276 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7278 * sem_ch8.adb (Analyze_Subprogram_Renaming): new procedure
7279 Check_Class_Wide_Actual, to implement AI05-0071, on defaulted
7280 primitive operations of class-wide actuals.
7282 2011-08-02 Javier Miranda <miranda@adacore.com>
7284 * exp_atag.ads, exp_atag.adb
7285 (Build_Common_Dispatching_Select_Statements): Remove argument Loc
7286 since its value is implicitly passed in argument Typ.
7287 * exp_disp.adb (Make_Disp_Conditional_Select_Body,
7288 Make_Disp_Timed_Select_Body): Remove Loc in calls to routine
7289 Build_Common_Dispatching_Select_Statements.
7291 2011-08-02 Robert Dewar <dewar@adacore.com>
7293 * sem_ch3.adb, exp_atag.ads, get_scos.adb, get_scos.ads,
7294 exp_disp.adb, lib-xref.adb, lib-xref.ads: Update comments.
7297 2011-08-02 Robert Dewar <dewar@adacore.com>
7299 * sem_res.adb: Minor reformatting.
7300 * sem_prag.adb: Minor reformatting.
7302 2011-08-02 Javier Miranda <miranda@adacore.com>
7304 * exp_atag.adb, exp_atags.ads
7305 (Build_Common_Dispatching_Select_Statement): Replace argument DT_Ptr
7306 by the tagged type Entity. Required to use this routine in the VM
7307 targets since we do not have available the Tag entity in the VM
7310 (Expand_N_Subprogram_Body): Do not invoke Build_VM_TSDs if package
7311 Ada.Tags has not been previously loaded.
7313 (Expand_N_Package_Declaration, Expand_N_Package_Body): Do not invoke
7314 Build_VM_TSDs if package Ada.Tags has not been previously loaded.
7316 (Enclosing_Dynamic_Scope): Add missing support to handle the full
7317 view of enclosing scopes. Required to handle enclosing scopes that
7318 are synchronized types whose full view is a task type.
7320 (Build_VM_TSDs): Minor code improvement to avoid generating and
7321 analyzing lists with empty nodes.
7322 (Make_Disp_Asynchronous_Select_Body): Add support for VM targets.
7323 (Make_Disp_Conditional_Select_Body): Add support for VM targets.
7324 (Make_Disp_Get_Prim_Op_Kind): Add support for VM targets.
7325 (Make_Disp_Timed_Select_Body): Add support for VM targets.
7326 (Make_Select_Specific_Data_Table): Add support for VM targets.
7327 (Make_VM_TSD): Generate code to initialize the SSD structure of
7330 2011-08-02 Yannick Moy <moy@adacore.com>
7332 * lib-writ.adb (Write_ALI): when ALFA mode is set, write local
7333 cross-references section in ALI.
7334 * lib-xref.adb, lib-xref.ads (Xref_Entry): add components Sub
7335 (enclosing subprogram), Slc (location of Sub) and Sun (unit number of
7337 (Enclosing_Subprogram_Or_Package): new function to return the enclosing
7338 subprogram or package entity of a node
7339 (Is_Local_Reference_Type): new function returns True for references
7340 selected in local cross-references.
7341 (Lt): function extracted from Lt in Output_References
7342 (Write_Entity_Name): function extracted from Output_References
7343 (Generate_Definition): generate reference with type 'D' for definition
7344 of objects (object declaration and parameter specification), with
7345 appropriate locations and units, for use in local cross-references.
7346 (Generate_Reference): update fields Sub, Slc and Sun. Keep newly created
7347 references of type 'I' for initialization in object definition.
7348 (Output_References): move part of function Lt and procedure
7349 Write_Entity_Name outside of the body. Ignore references of types 'D'
7350 and 'I' introduced for local cross-references.
7351 (Output_Local_References): new procedure to output the local
7352 cross-references sections.
7353 (Lref_Entity_Status): new array defining whether an entity is a local
7354 * sem_ch3.adb (Analyze_Object_Declaration): call Generate_Reference
7355 with 'I' type when initialization expression is present.
7356 * get_scos.adb, get_scos.ads: Correct comments and typos
7358 2011-08-02 Javier Miranda <miranda@adacore.com>
7360 * exp_ch6.adb (Expand_N_Subprogram_Body): Enable generation of TSDs in
7362 * exp_ch7.adb (Expand_N_Package_Body): Enable generation of TSDs in
7364 * exp_disp.adb (Build_VM_TSDs): No action needed if the runtime has no
7367 2011-08-02 Vincent Celier <celier@adacore.com>
7369 * prj-nmsc.adb (File_Found): New components Excl_File and Excl_Line
7370 (No_Space_Img): New function
7371 (Find_Excluded_Sources): When reading from a file, record the file name
7372 and the line number for each excluded source.
7373 (Mark_Excluded_Sources): When reporting an error, if the excluded
7374 sources were read from a file, include file name and line number in
7377 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7379 * sem_res.adb (Resolve_Call): implement rule in RM 12.5.1 (23.3/2).
7381 2011-08-02 Robert Dewar <dewar@adacore.com>
7383 * exp_ch7.adb exp_ch6.adb, exp_disp.adb: Minor reformatting
7385 2011-08-02 Javier Miranda <miranda@adacore.com>
7387 * exp_ch6.adb (Expand_N_Subprogram_Body): Temporarily restrict the
7388 generation of TSDs to the DOTNET compiler.
7389 * exp_ch7.adb (Expand_N_Package_Body): Temporarily restrict the
7390 generation of TSDs to the DOTNET compiler.
7392 2011-08-02 Javier Miranda <miranda@adacore.com>
7394 * exp_disp.ads (Build_VM_TSDs): Build the runtime Type Specific Data
7395 record of all the tagged types declared inside library level package
7396 declarations, library level package bodies or library level subprograms.
7397 * exp_disp.adb (Make_VM_TSD): New subprogram that builds the TSD
7398 associated with a given tagged type.
7399 (Build_VM_TSDs): New subprogram.
7400 * exp_ch6.adb (Expand_N_Subprogram_Body): Generate TSDs records of main
7401 compilation units that are subprograms.
7402 * exp_ch7.adb (Expand_N_Package_Body): Generate TSDs of main
7403 compilation units that are package bodies.
7404 (Expand_N_Package_Declaration): Generate TSDs of the main compilation
7405 units that are a package declaration or a package instantiation.
7406 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Minor code
7407 reorganization to improve the error generated by the frontend when the
7408 function Ada.Tags.Secondary_Tag is not available.
7409 * rtsfind.ads (RE_Register_TSD): New runtime entity.
7410 * exp_ch4.adb (Expand_N_Type_Conversion): Minor code cleanup.
7412 2011-08-02 Javier Miranda <miranda@adacore.com>
7414 * exp_disp.adb (Make_DT): Generate call to Check_TSD in Ada 2005 mode.
7416 2011-08-02 Robert Dewar <dewar@adacore.com>
7418 * s-imenne.ads: Minor reformatting.
7420 2011-08-02 Robert Dewar <dewar@adacore.com>
7422 * a-stunau.ads: Add pragma Suppress_Initialization for Big_String
7423 * freeze.adb (Warn_Overlay): Don't warn if initialization suppressed
7424 * s-stalib.ads: Add pragma Suppress_Initialization for Big_String
7426 2011-08-02 Robert Dewar <dewar@adacore.com>
7428 * einfo.ads (Materialize_Entity): Document this is only for renamings
7429 * exp_ch3.adb (Expand_N_Object_Declaration): Make sure we generate
7430 required debug information in the case where we transform the object
7431 declaration into a renaming declaration.
7432 * exp_ch4.adb (Expand_Concatenate): Generate debug info for result
7434 * exp_dbug.ads (Debug_Renaming_Declaration): Document setting of
7437 2011-08-02 Robert Dewar <dewar@adacore.com>
7439 * einfo.ads, einfo.adb (Suppress_Initialization): Replaces
7440 Suppress_Init_Procs.
7441 * exp_ch3.adb, exp_disp.adb, freeze.adb: Use
7442 Suppress_Initialization/Initialization_Suppressed.
7443 * gnat_rm.texi: New documentation for pragma Suppress_Initialization
7444 * sem_aux.ads, sem_aux.adb (Initialization_Suppressed): New function
7445 * sem_dist.adb: Use Suppress_Initialization/Initialization_Suppressed
7446 * sem_prag.adb: New processing for pragma Suppress_Initialization.
7448 2011-08-02 Robert Dewar <dewar@adacore.com>
7450 * gnat_rm.texi, a-tags.ads, sem_prag.adb, sem_ch12.adb, exp_disp.adb:
7453 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7455 * sem_prag.adb (Chain_PPC): Implement AI04-0230: null procedures can
7456 only have inheritable classwide pre/postconditions.
7458 2011-08-02 Javier Miranda <miranda@adacore.com>
7460 * a-tags.ads, a-tags.adb (Check_TSD): New subprogram.
7461 * rtsfind.ads (RE_Check_TSD): New runtime entity.
7462 * exp_disp.adb (Make_DT): Generate call to the new runtime routine that
7463 checks if the external tag of a type is the same as the external tag
7464 of some other declaration.
7466 2011-08-02 Thomas Quinot <quinot@adacore.com>
7468 * s-taskin.ads: Minor reformatting.
7470 2011-08-02 Emmanuel Briot <briot@adacore.com>
7472 * g-comlin.adb (Display_Help): swap the order in which it prints the
7473 short help and the general usage.
7475 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7477 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration): copy properly
7478 the aspect declarations and attach them to the generic copy for
7479 subsequent analysis.
7480 (Analyze_Subprogram_Instantiation): copy explicitly the aspect
7481 declarations of the generic tree to the new subprogram declarations.
7482 * sem_attr.adb (Check_Precondition_Postcondition): recognize
7483 conditions that apply to a subprogram instance.
7485 2011-08-02 Robert Dewar <dewar@adacore.com>
7487 * gnat_rm.texi: Clarify doc on pragma Source_File_Name[_Project].
7489 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7491 * sem_ch3.adb (Derived_Type_Declaration): When checking that a untagged
7492 private type with a tagged full view is not derived in the immediate
7493 scope of the partial view, (RM 7.3 (7)) use the scope of the base type.
7495 2011-08-02 Robert Dewar <dewar@adacore.com>
7497 * exp_ch4.adb: Minor reformatting.
7499 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7501 * sem_ch5.adb (Analyze_Loop_Statement): If the iteration scheme is an
7502 Ada2012 iterator, the loop will be rewritten during expansion into a
7503 while loop with a cursor and an element declaration. Do not analyze the
7504 body in this case, because if the container is for indefinite types the
7505 actual subtype of the elements will only be determined when the cursor
7506 declaration is analyzed.
7508 2011-08-02 Arnaud Charlet <charlet@adacore.com>
7510 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Ignore
7511 size/alignment related attributes in CodePeer_Mode.
7513 2011-08-02 Gary Dismukes <dismukes@adacore.com>
7515 * sem_ch3.adb (Check_Ops_From_Incomplete_Type): Remove call to
7516 Prepend_Element, since this can result in the operation getting the
7517 wrong slot in the full type's dispatch table if the full type has
7518 inherited operations. The incomplete type's operation will get added
7519 to the proper position in the full type's primitives
7520 list later in Sem_Disp.Check_Operation_From_Incomplete_Type.
7521 (Process_Incomplete_Dependents): Add Is_Primitive test when checking for
7522 dispatching operations, since there are cases where nonprimitive
7523 subprograms can get added to the list of incomplete dependents (such
7524 as subprograms in nested packages).
7525 * sem_ch6.adb (Process_Formals): First, remove test for being in a
7526 private part when determining whether to add a primitive with a
7527 parameter of a tagged incomplete type to the Private_Dependents list.
7528 Such primitives can also occur in the visible part, and should not have
7529 been excluded from being private dependents.
7530 * sem_ch7.adb (Uninstall_Declarations): When checking the rule of
7531 RM05-3.10.1(9.3/2), test that a subprogram in the Private_Dependents
7532 list of a Taft-amendment incomplete type is a primitive before issuing
7533 an error that the full type must appear in the same unit. There are
7534 cases where nonprimitives can be in the list (such as subprograms in
7536 * sem_disp.adb (Derives_From): Use correct condition for checking that
7537 a formal's type is derived from the type of the corresponding formal in
7538 the parent subprogram (the condition was completely wrong). Add
7539 checking that was missing for controlling result types being derived
7540 from the result type of the parent operation.
7542 2011-08-02 Yannick Moy <moy@adacore.com>
7544 * errout.adb (First_Node): minor renaming
7545 * restrict.adb (Check_Formal_Restriction): put restriction warning on
7548 2011-08-02 Yannick Moy <moy@adacore.com>
7550 * sem_res.adb (Resolve_Logical_Op): ensure N is a binary operator
7551 before accessing operands.
7552 * sem_util.adb (Is_SPARK_Initialization_Expr): follow original nodes to
7553 decide whether an initialization expression respects SPARK rules, as
7554 the plain node is the expanded one. This allows for more valid warnings
7556 * gnat_rm.texi: Minor update.
7558 2011-08-02 Arnaud Charlet <charlet@adacore.com>
7560 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Revert
7563 2011-08-02 Robert Dewar <dewar@adacore.com>
7565 * sem_ch3.adb, sem_ch4.adb: Minor reformatting.
7567 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
7569 * exp_ch5.adb (Expand_Iterator_Loop): Reformatting. Wrap the original
7570 loop statements and the element renaming declaration with a block when
7571 the element type is controlled.
7573 2011-08-02 Yannick Moy <moy@adacore.com>
7575 * sinfo.ads: Minor formatting.
7577 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7579 * sem_aggr.adb (Add_Association): if the association has a box and no
7580 expression, use the Sloc of the aggregate itself for the new
7582 * errout.adb (First_Node): Exclude nodes with no Sloc, and always use
7585 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
7587 * exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and refactoring.
7588 When a container is provided via a function call, generate a renaming
7589 of the function result. This avoids the creation of a transient scope
7590 and the premature finalization of the container.
7591 * exp_ch7.adb (Is_Container_Cursor): Removed.
7592 (Wrap_Transient_Declaration): Remove the supression of the finalization
7593 of the list controller when the declaration denotes a container cursor,
7596 2011-08-02 Yannick Moy <moy@adacore.com>
7598 * restrict.adb (Check_Formal_Restriction): only issue a warning if the
7599 node is from source, instead of the original node being from source.
7601 (Resolve_Array_Aggregate): refine the check for a static expression, to
7602 recognize also static ranges
7603 * sem_ch3.adb, sem_ch3.ads (Analyze_Component_Declaration,
7604 Array_Type_Declaration): postpone the test for the type being a subtype
7605 mark after the type has been resolved, so that component-selection and
7606 expanded-name are discriminated.
7607 (Make_Index, Process_Range_Expr_In_Decl): add a parameter In_Iter_Schm
7608 to distinguish the case of an iteration scheme, so that an error is
7609 issed on a non-static range in SPARK except in an iteration scheme.
7610 * sem_ch5.adb (Analyze_Iteration_Scheme): call Make_Index with
7611 In_Iter_Schm = True.
7612 * sem_ch6.adb (Analyze_Subprogram_Specification): refine the check for
7613 user-defined operators so that they are allowed in renaming
7615 (Find_Selected_Component): refine the check for prefixing of operators
7616 so that they are allowed in renaming. Move the checks for restrictions
7617 on selector name after analysis discriminated between
7618 component-selection and expanded-name.
7619 * sem_res.adb (Resolve_Op_Concat_Arg): do not issue a warning on
7620 concatenation argument of string type if it is static.
7621 * sem_util.adb, sem_util.ads
7622 (Check_Later_Vs_Basic_Declarations): add a new function
7623 Is_Later_Declarative_Item to decice which declarations are allowed as
7624 later items, in the two different modes Ada 83 and SPARK. In the SPARK
7625 mode, add that renamings are considered as later items.
7626 (Enclosing_Package): new function to return the enclosing package
7627 (Enter_Name): correct the rule for homonyms in SPARK
7628 (Is_SPARK_Initialization_Expr): default to returning True on nodes not
7629 from source (result of expansion) to avoid issuing wrong warnings.
7631 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7633 * errout.adb: On anything but an expression First_Node returns its
7636 2011-08-02 Pascal Obry <obry@adacore.com>
7638 * prj-proc.adb, make.adb, makeutl.adb: Minor reformatting.
7640 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
7642 * exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and reorganization.
7643 Set the associated loop as the related expression of internally
7645 * exp_ch7.adb (Is_Container_Cursor): New routine.
7646 (Wrap_Transient_Declaration): Supress the finalization of the list
7647 controller when the declaration denotes a container cursor.
7649 2011-08-02 Yannick Moy <moy@adacore.com>
7651 * opt.ads (SPARK_Mode): update comment, SPARK_Mode only set through
7653 * par-ch3.adb (P_Delta_Constraint): remove check in SPARK mode that the
7654 expression is a simple expression. This check cannot be performed in
7655 the semantics, so just drop it.
7656 (P_Index_Or_Discriminant_Constraint): move check that the index or
7657 discriminant is a subtype mark to Analyze_Subtype_Declaration in the
7658 semantics. Other cases were previously checked in the semantics.
7659 * par-ch4.adb (P_Name): move checks that a selector name is not
7660 character literal or an operator symbol to Find_Selected_Component in
7662 * par-ch5.adb (Parse_Decls_Begin_End): move check that basic
7663 declarations are not placed after later declarations in a separate
7664 procedure in Sem_Util (possibly not the best choice?), to be used both
7665 during parsing, for Ada 83 mode, and during semantic analysis, for
7667 * par-endh.adb (Check_End): move check that end label is not missing
7668 to Process_End_Label in the semantics
7669 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): remove
7670 the special case for SPARK restriction
7671 * par.adb: use and with Sem_Util, for use in Parse_Decls_Begin_End
7672 * restrict.adb, restrict.ads (Check_Formal_Restriction): add a
7673 parameter Force to issue the error message even on internal node (used
7674 for generated end label). Call Check_Restriction to check when an error
7675 must be issued. In SPARK mode, issue an error message even if the
7676 restriction is not set.
7677 (Check_Restriction): new procedure with an additional out parameter to
7678 inform the caller that a message has been issued
7679 * sem_aggr.adb: Minor modification of message
7680 * sem_attr.adb (Analyze_Attribute): call Check_Formal_Restriction
7681 instead of issuing an error message directly
7682 * sem_ch3.adb (Analyze_Declarations): move here the check that basic
7683 declarations are not placed after later declarations, by calling
7684 Check_Later_Vs_Basic_Declarations
7685 (Analyze_Subtype_Declaration): move here the check that an index or
7686 discriminant constraint must be a subtype mark. Change the check that
7687 a subtype of String must start at one so that it works on subtype marks.
7688 * sem_ch4.adb (Analyze_Call): move here the check that a named
7689 association cannot follow a positional one in a call
7690 * sem_ch5.adb (Check_Unreachable_Code): call Check_Formal_Restriction
7691 instead of issuing an error message directly
7692 * sem_ch8.adb (Find_Selected_Component): move here the check that a
7693 selector name is not a character literal or an operator symbol. Move
7694 here the check that the prefix of an expanded name cannot be a
7695 subprogram or a loop statement.
7696 * sem_util.adb, sem_util.ads (Check_Later_Vs_Basic_Declarations): new
7697 procedure called from parsing and semantics to check that basic
7698 declarations are not placed after later declarations
7699 (Process_End_Label): move here the check that end label is not missing
7701 2011-08-02 Arnaud Charlet <charlet@adacore.com>
7703 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Ignore enum
7704 representation clause in codepeer mode, since it confuses CodePeer and
7705 does not bring useful info.
7707 2011-08-02 Ed Falis <falis@adacore.com>
7709 * init.c: initialize fp hw on MILS.
7711 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7713 * errout.adb (First_Node): for bodies, return the node itself (small
7714 optimization). For other nodes, do not check source_unit if the node
7715 comes from Standard.
7717 2011-08-02 Robert Dewar <dewar@adacore.com>
7719 * exp_ch3.adb: Minor comment additions.
7720 * sem_ch13.adb: Minor reformatting.
7722 2011-08-02 Pascal Obry <obry@adacore.com>
7724 * make.adb, makeutl.adb: Removes some superfluous directory separator.
7726 2011-08-02 Robert Dewar <dewar@adacore.com>
7728 * sem_attr.adb: Minor reformatting.
7730 2011-08-02 Robert Dewar <dewar@adacore.com>
7732 * einfo.adb (Has_Default_Aspect): Replaces Has_Default_Value
7733 (Has_Default_Component_Value): Removed
7734 * einfo.ads Comment updates
7735 (Has_Default_Aspect): Replaces Has_Default_Value
7736 (Has_Default_Component_Value): Removed
7738 (Expand_N_Freeze_Entity): Handle Default[_Component]_Value aspects
7740 (Build_Array_Init_Proc): Handle Default_[Component_]Value aspects
7741 (Get_Simple_Init_Val): Handle Default_Value aspect
7742 (Needs_Simple_Initialization): Handle Default_Value aspect
7743 * exp_ch3.ads: Needs_Simple_Initialization
7744 * freeze.adb (Freeze_Entity): Handle Default_[Component_]Value aspect
7745 * par-prag.adb (Pragma_Default[_Component]Value) Removed
7747 (Analyze_Aspect_Specifications): Fix Default[_Component]_Value aspects
7748 * sem_prag.adb (Pragma_Default[_Component]Value) Removed
7749 * snames.ads-tmpl (Pragma_Default[_Component]Value) Removed
7751 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7753 * sem_ch5.adb (Analyze_Iterator_Specification): use base type to locate
7754 package containing iteration primitives.
7755 exp_ch5.adb (Expand_Iterator_Loop): ditto.
7757 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7759 * sem_ch5.adb (Analyze_Iteration_Scheme): For an Ada2012 iterator with
7760 "of", pre-analyze expression in case it is a function call with
7761 finalization actions that must be placed ahead of the loop.
7762 * exp_ch5.adb (Expand_Iterator_Loop): If condition_actions are present
7763 on an Ada2012 iterator, insert them ahead of the rewritten loop.
7765 2011-08-02 Geert Bosch <bosch@adacore.com>
7767 * cstand.adb (Create_Float_Types): Only consider C's long double for
7768 Long_Long_Float, in addition to double.
7770 2011-08-02 Robert Dewar <dewar@adacore.com>
7772 * sem_ch3.adb, sem_ch5.adb, sem_type.adb, switch-c.adb, switch-c.ads,
7773 sem_prag.adb, sem_util.adb, sem_util.ads, sem_res.adb, warnsw.ads,
7774 prepcomp.ads, cstand.adb, stand.ads, a-calfor.adb, s-stusta.adb:
7777 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7779 * sem_attr.adb: handle properly 'Result when it is a prefix of an
7782 2011-08-02 Javier Miranda <miranda@adacore.com>
7784 * einfo.ads, einfo.adb
7785 (Original_Access_Type): Move this attribute to Node26 since there was
7786 an undocumented use of Node21 in E_Access_Subprogram_Type entities
7787 which causes conflicts and breaks the generation of the .NET compiler.
7788 (Interface_Name): Add missing documentation on JGNAT only uses of
7791 2011-08-02 Geert Bosch <bosch@adacore.com>
7793 * cstand.adb (Back_End_Float_Types): Use Elist instead of Nlist
7794 (Find_Back_End_Float_Type): Likewise
7795 (Create_Back_End_Float_Types): Likewise
7796 (Create_Float_Types): Likewise
7797 (Register_Float_Type): Likewise
7798 * sem_ch3.adb (Floating_Point_Type_Declaration): Use Elist instead of
7799 Nlist and split out type selection in new local Find_Base_Type function.
7800 * sem_prag.adb (Process_Import_Predefined_Type): Use Elist instead of
7802 * stand.ads (Predefined_Float_Types): Use Elist instead of Nlist
7804 2011-08-02 Robert Dewar <dewar@adacore.com>
7806 * inline.adb: Minor code reorganization (put Get_Code_Unit_Entity in
7808 * opt.ads: Minor comment change.
7809 * sem_ch12.adb: Minor code reorganization.
7811 2011-08-02 Gary Dismukes <dismukes@adacore.com>
7813 * sem_ch3.adb (Complete_Private_Subtype): Don't append the private
7814 subtype's list of rep items to the list on the full subtype in the case
7815 where the lists are the same.
7817 2011-08-02 Geert Bosch <bosch@adacore.com>
7819 * switch-c.adb (Free): New deallocation procedure to avoid implicitly
7820 using the one from System.Strings, which also deallocates all strings.
7822 2011-08-02 Geert Bosch <bosch@adacore.com>
7824 * gcc-interface/gigi.h, gcc-interface/misc.c (enumerate_modes): New
7826 * gcc-interface/Make-lang.in: Update dependencies.
7828 2011-08-02 Olivier Hainque <hainque@adacore.com>
7830 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Set the function
7833 2011-08-02 Javier Miranda <miranda@adacore.com>
7835 * sem_ch3.adb (Check_Anonymous_Access_Components): Create extra formals
7836 associated with anonymous access to subprograms.
7838 2011-08-02 Geert Bosch <bosch@adacore.com>
7841 (Preprocessing_Symbol_Defs): Move from Prepcomp.Symbol_Definitions.
7842 (Preprocessing_Symbol_Last): Move from Prepcomp.Last_Definition.
7843 * prepcomp.adb (Symbol_Definitions, Last_Definition): Move to opt.ads
7844 (Add_Symbol_Definition): Move to switch-c.adb
7845 (Process_Command_Line_Symbol_Definitions): Adjust references to above.
7846 * prepcomp.ads: Remove dependency on Ada.Unchecked_Deallocation.
7847 (Add_Symbol_Definition): Move to switch-c.adb.
7848 * sem_ch13.adb, sem_prag.adb: Add dependency on Warnsw.
7850 (Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
7852 * sem_warn.ads (Warn_On_Record_Holes, Warn_On_Overridden_Size,
7853 Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
7855 * switch-c.adb: Replace dependency on Prepcomp and Sem_Warn by Warnsw.
7856 (Add_Symbol_Definition): Moved from Prepcomp.
7857 * switch-c.ads: Update copyright notice. Use String_List instead of
7858 Argument_List, removing dependency on System.OS_Lib.
7860 2011-08-02 Yannick Moy <moy@adacore.com>
7862 * sem_ch3.adb (Analyze_Object_Declaration): issue an error in formal
7863 mode on initialization expression which does not respect SPARK
7865 * sem_util.adb, sem_util.ads (Is_SPARK_Initialization_Expr): determines
7866 if the tree referenced by its argument represents an initialization
7867 expression in SPARK, suitable for initializing an object in an object
7870 2011-08-02 Javier Miranda <miranda@adacore.com>
7872 * exp_ch9.adb (Expand_Access_Protected_Subprogram_Type): Link the
7873 internally generated access to subprogram with its associated protected
7875 * einfo.ads, einfo.adb (Original_Access_Type): New attribute.
7877 2011-08-02 Geert Bosch <bosch@adacore.com>
7879 * cstand.adb (Register_Float_Type): Print information about type to
7880 register, if the Debug_Flag_Dot_B is set.
7881 * debug.adb (Debug_Flag_Dot_B): Document d.b debug option.
7882 * rtsfind.ads (RE_Max_Base_Digits): New run time entity.
7883 * sem_ch3.adb (Floating_Point_Type_Declaration): Allow declarations
7884 with a requested precision of more than Max_Digits digits and no more
7885 than Max_Base_Digits digits, if a range specification is present and the
7886 Predefined_Float_Types list has a suitable type to derive from.
7887 * sem_ch3.adb (Rep_Item_Too_Early): Avoid generating error in the
7888 case of type completion with pragma Import
7890 (Process_Import_Predefined_Type): Processing to complete a type
7891 with pragma Import. Currently supports floating point types only.
7892 (Set_Convention_From_Pragma): Do nothing without underlying type.
7893 (Process_Convention): Guard against absence of underlying type,
7894 which may happen when importing incomplete types.
7895 (Process_Import_Or_Interface): Handle case of importing predefined
7896 types. Tweak error message.
7898 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
7900 * inline.adb (Add_Inlined_Body): Adjust check for library-level inlined
7901 functions to previous change. Reorganize code slightly.
7903 2011-08-02 Geert Bosch <bosch@adacore.com>
7905 * back_end.ads (Register_Type_Proc): New call back procedure type for
7906 allowing the back end to provide information about available types.
7907 (Register_Back_End_Types): New procedure to register back end types.
7908 * back_end.adb (Register_Back_End_Types): Call the back end to enumerate
7910 * cstand.adb (Back_End_Float_Types): New list for floating point types
7911 supported by the back end.
7912 (Build_Float_Type): Add extra parameter for Float_Rep_Kind.
7913 (Copy_Float_Type): New procedure to make new copies of predefined types.
7914 (Register_Float_Type): New call back procedure to populate the BEFT list
7915 (Find_Back_End_Float_Type): New procedure to find a BEFT by name
7916 (Create_Back_End_Float_Types): New procedure to populate the BEFT list.
7917 (Create_Float_Types): New procedure to create entities for floating
7918 point types predefined in Standard, and put these and any remaining
7919 BEFTs on the Predefined_Float_Types list.
7920 * stand.ads (Predefined_Float_Types): New list for predefined floating
7921 point types that do not have declarations in package Standard.
7923 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
7925 * inline.adb (Get_Code_Unit_Entity): New local function. Returns the
7926 entity node for the unit containing the parameter.
7927 (Add_Inlined_Body): Use it to find the unit containing the subprogram.
7928 (Add_Inlined_Subprogram): Likewise.
7929 * gcc-interface/Make-lang.in: Update dependencies.
7931 2011-08-02 Thomas Quinot <quinot@adacore.com>
7933 * s-stusta.adb (Print): Make sure Pos is always initialized to a
7936 2011-08-02 Geert Bosch <bosch@adacore.com>
7938 * a-calfor.adb (Image): Simplify, removing unnecessary uses of 'Image.
7940 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
7942 * sem_type.adb (Covers): Move trivial case to the top and reuse the
7943 computed value of Base_Type.
7945 2011-08-02 Yannick Moy <moy@adacore.com>
7947 * restrict.adb (Check_Restriction): issue an error for any use of
7948 class-wide, even if the No_Dispatch restriction is not set.
7949 * sem_aggr.adb: Correct typos in comments and messages in formal mode
7950 * sem_ch3.adb (Process_Full_View): issue an error in formal mode is,
7951 when completing a private extension, the type named in the private part
7952 is not the same as that named in the visible part.
7953 * sem_res.adb (Resolve_Call): issue an error in formal mode on the use
7954 of an inherited primitive operations of a tagged type or type extension
7955 that returns the tagged type.
7956 * sem_util.adb, sem_util.ads (Is_Inherited_Operation_For_Type): new
7957 function which returns True for an implicit operation inherited by the
7958 derived type declaration for the argument type.
7959 (Is_SPARK_Object_Reference): move to appropriate place in alphabetic
7962 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7964 * sem_ch5.adb (Pre_Analyze_Range): new procedure extracted from
7965 Process_Bounds, to perform analysis with expansion of a range or an
7966 expression that is the iteration scheme for a loop.
7967 (Analyze_Iterator_Specification): If domain of iteration is given by a
7968 function call with a controlled result, as is the case if call returns
7969 a predefined container, ensure that finalization actions are properly
7971 * par-ch3.adb: accept Ada2012 iterator form in P_Discrete_Range.
7973 2011-08-02 Javier Miranda <miranda@adacore.com>
7975 * sem_ch5.adb (Analyze_Iteration_Scheme): Fix typo.
7976 * gcc-interface/Make-lang.in: Update dependencies.
7978 2011-08-02 Javier Miranda <miranda@adacore.com>
7980 * sem_util.ads, sem_util.adb (Is_Variable): Add a new formal to
7981 determine if the analysis is performed using N or Original_Node (N).
7982 * exp_util.adb (Side_Effect_Free): Code cleanup since the new
7983 functionality of routine Is_Variable avoids code duplication.
7984 * checks.adb (Determine_Range): Handle temporaries generated by
7985 Remove_Side_Effects.
7987 2011-08-02 Javier Miranda <miranda@adacore.com>
7989 * exp_ch4.adb (Expand_N_Quantified_Expression): Force reanalysis and
7990 expansion of the condition. Required since the previous analysis was
7991 done with expansion disabled (see Resolve_Quantified_Expression) and
7992 hence checks were not inserted and record comparisons have not been
7995 2011-08-02 Ed Falis <falis@adacore.com>
7997 * s-taprop-vxworks.adb, s-intman-vxworks.adb, s-intman-vxworks.ads:
8000 2011-08-02 Bob Duff <duff@adacore.com>
8002 * opt.ads: Minor comment fix.
8004 2011-08-02 Bob Duff <duff@adacore.com>
8006 * sem_ch12.adb (Analyze_Package_Instantiation,
8007 Analyze_Subprogram_Instantiation): Turn off style checking while
8008 analyzing an instance. Whatever style checks that apply to the generic
8009 unit should apply, so it makes no sense to apply them in an instance.
8010 This was causing trouble when compiling an instance of a runtime
8011 unit that violates the -gnatyO switch.
8012 * stylesw.adb (Set_Style_Check_Options): "when 'O' =>" was missing from
8013 one of the two case statements, causing spurious errors.
8015 2011-08-02 Robert Dewar <dewar@adacore.com>
8017 * uname.adb: Minor reformatting.
8018 * gnatcmd.adb: Minor reformatting.
8019 * exp_attr.adb: Minor reformatting.
8021 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8023 * exp_ch5.adb (Expand_N_Assignment_Statement): under restriction
8024 No_Dispatching_Calls, do not look for the Assign primitive, because
8025 predefined primitives are not created in this case.
8027 2011-08-02 Bob Duff <duff@adacore.com>
8029 * stylesw.ads: Minor comment fixes.
8031 2011-08-02 Robert Dewar <dewar@adacore.com>
8033 * freeze.adb (Add_To_Result): New procedure.
8035 2011-08-02 Jose Ruiz <ruiz@adacore.com>
8037 * exp_attr.adb (Find_Stream_Subprogram): When using a configurable run
8038 time, if the specific run-time routines for handling streams of strings
8039 are not available, use the default mechanism.
8041 2011-08-02 Arnaud Charlet <charlet@adacore.com>
8043 * s-regpat.ads: Fix typo.
8045 2011-08-02 Vincent Celier <celier@adacore.com>
8047 * prj-conf.adb (Get_Or_Create_Configuration_File): If On_Load_Config is
8048 not null, call it to create the in memory config project file without
8049 parsing an existing default config project file.
8051 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
8053 * atree.adb (Allocate_Initialize_Node): Remove useless temporaries.
8055 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8057 * sem_elim.adb: an abstract subprogram does not need an eliminate
8058 pragma for its descendant to be eliminable.
8060 2011-08-02 Ed Falis <falis@adacore.com>
8062 * init.c: revert to handling before previous checkin for VxWorks
8063 * s-intman-vxworks.adb: delete unnecessary declarations related to
8064 using Ada interrupt facilities for handling signals.
8065 Delete Initialize_Interrupts. Use __gnat_install_handler instead.
8066 * s-intman-vxworks.ads: Import __gnat_install_handler as
8067 Initialize_Interrupts.
8068 * s-taprop-vxworks.adb: Delete Signal_Mask.
8069 (Abort_Handler): change construction of mask to unblock exception
8072 2011-08-02 Jerome Guitton <guitton@adacore.com>
8074 * a-except-2005.adb (Raise_From_Signal_Handler): Call
8075 Debug_Raise_Exception before propagation starts.
8077 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
8079 * exp_ch6.adb (Expand_Call): Guard restriction checks with a call
8080 to Restriction_Check_Required.
8081 * sem_ch3.adb (Analyze_Object_Declaration): Likewise.
8082 * sem_res.adb (Resolve_Call): Likewise.
8083 * sem_attr.adb (Check_Stream_Attribute): Likewise.
8085 2011-08-02 Bob Duff <duff@adacore.com>
8087 * stylesw.ads: Update comment.
8088 * style.adb: Minor: Use Error_Msg_NE instead of Error_Msg_N.
8089 * errout.ads: Remove obsolete comment.
8091 2011-08-02 Javier Miranda <miranda@adacore.com>
8093 * einfo.ads, einfo.adb (Is_Safe_To_Reevaluate): new function.
8094 (Set_Is_Safe_To_Reevaluate): new procedure.
8095 * sem_ch5.adb (Analyze_Assignment): Add one assertion to ensure that no
8096 assignment is allowed on safe-to-reevaluate variables.
8097 (Analyze_Iteration_Schine.Process_Bounds.One_Bound): Decorate the
8098 temporary created to remove side effects in expressions that use
8099 the secondary stack as safe-to-reevaluate.
8100 * exp_util.adb (Side_Effect_Free): Add missing code to handle well
8101 variables that are not true constants.
8103 2011-08-02 Robert Dewar <dewar@adacore.com>
8105 * sem_ch5.adb, sem_ch7.adb, einfo.ads, sem_util.adb, sem_util.ads,
8106 sem_res.adb, sem_ch6.adb: Minor reformatting.
8108 2011-08-02 Jerome Guitton <guitton@adacore.com>
8110 * a-except-2005.adb (Raise_Current_Excep): Remove obsolete dead code.
8112 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8114 * sem_ch6.adb (New_Overloaded_Entity, Check_Overriding_Indicator): Do
8115 not set Overridden_Operation if subprogram is an initialization
8118 2011-08-02 Yannick Moy <moy@adacore.com>
8120 * par-ch6.adb: Correct obsolete name in comments
8121 * restrict.adb, restrict.ads (Check_Formal_Restriction): new function
8122 which takes two message arguments (existing function takes one), with
8123 second message used for continuation.
8124 * sem_ch5.adb (Analyze_Block_Statement): in formal mode, only reject
8125 block statements that originate from a source block statement, not
8126 generated block statements
8127 * sem_ch6.adb (Analyze_Function_Call): rename L into Actuals, for
8128 symmetry with procedure case
8129 * sem_ch7.adb (Check_One_Tagged_Type_Or_Extension_At_Most): new
8130 function to issue an error in formal mode if a package specification
8131 contains more than one tagged type or type extension.
8132 * sem_res.adb (Resolve_Actuals): in formal mode, check that actual
8133 parameters matching formals of tagged types are objects (or ancestor
8134 type conversions of objects), not general expressions. Issue an error
8135 on view conversions that are not involving ancestor conversion of an
8137 (Resolve_Type_Conversion): in formal mode, issue an error on the
8138 operand of an ancestor type conversion which is not an object
8139 * sem_util.adb, sem_util.ads (Find_Actual): extend the behavior of the
8140 procedure so that it works also for actuals of function calls
8141 (Is_Actual_Tagged_Parameter): new function which determines if its
8142 argument is an actual parameter of a formal of tagged type in a
8144 (Is_SPARK_Object_Reference): new function which determines if the tree
8145 referenced by its argument represents an object in SPARK
8147 2011-08-02 Robert Dewar <dewar@adacore.com>
8149 * sem_ch3.adb: Minor reformatting
8150 Minor comment addition
8151 Minor error msg text change
8153 2011-08-02 Javier Miranda <miranda@adacore.com>
8155 * sem_ch5.adb (Analyze_Iteration_Scheme.Uses_Secondary_Stack): New
8156 function. Used to be more precise when we generate a variable plus one
8157 assignment to remove side effects in the evaluation of the Bound
8159 (Analyze_Iteration_Scheme): Clean attribute analyzed in all the nodes
8160 of the bound expression to force its re-analysis and thus expand the
8161 associated transient scope (if required). Code cleanup replacing the
8162 previous code that declared the constant entity by an invocation to
8163 routine Force_Evaluation which centralizes this work in the frontend.
8165 2011-08-02 Robert Dewar <dewar@adacore.com>
8167 * einfo.adb (Is_Base_Type): Improve efficiency by using a flag table
8168 (Base_Type): Now uses improved Is_Base_Type function
8169 * einfo.ads (Base_Type): Inline this function
8171 2011-08-02 Robert Dewar <dewar@adacore.com>
8173 * sem_prag.adb (Analyze_Pragma): Defend against infinite recursion
8174 (Analyze_Aspect_Specifications): Fix Sloc values for constructed pragmas
8176 2011-08-02 Arnaud Charlet <charlet@adacore.com>
8178 * gcc-interface/Make-lang.in: Update dependencies.
8179 * gcc-interface/Makefile.in: Use s-inmapop-vxworks.adb for all VxWorks
8182 2011-08-02 Yannick Moy <moy@adacore.com>
8184 * par-ch3.adb (P_Delta_Constraint): issue an error in formal mode on
8185 non-simple expression used in delta constraint
8186 (P_Index_Or_Discriminant_Constraint): issue an error in formal mode on
8187 index constraint which is not a subtype mark
8188 * par.adb: With and use Restrict
8189 * sem_ch3.adb (Analyze_Component_Declaration): issue an error in formal
8190 mode on component type which is not a subtype mark and default
8191 expression on component
8192 (Analyze_Subtype_Declaration): issue an error in formal mode on subtype
8193 of string which does not have a lower index bound equal to 1
8194 (Array_Type_Declaration): issue an error in formal mode on index or
8195 component type which is not a subtype mark, and on aliased keyword on
8197 (Derived_Type_Declaration): issue an error in formal mode on interface,
8198 limited or abstract type
8199 (Record_Type_Declaration): issue an error in formal mode on interface
8200 (Record_Type_Definition): issue an error in formal mode on tagged types
8201 and type extensions not declared in the specification of a library unit
8202 package; on null non-tagged record; on variant part
8204 2011-08-02 Vincent Celier <celier@adacore.com>
8206 * prj-nmsc.adb (Check_Library_Attributes): Do not report Library_Dir
8207 not declared for qualified library project when Library_Name is not
8208 declared, but Library_Dir is.
8210 2011-08-02 Robert Dewar <dewar@adacore.com>
8212 * sem_ch13.adb (Analyze_Aspect_Specification): Fix slocs on generated
8213 pragmas (affects aspects [Component_]Default_Value
8214 (Check_Aspect_At_Freeze_Point): For Component_Default_Value, use
8215 component type for the resolution
8217 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
8219 * einfo.adb (Base_Type): Tune implementation for speed.
8221 2011-08-02 Robert Dewar <dewar@adacore.com>
8223 * freeze.adb: Minor reformatting.
8225 2011-08-02 Thomas Quinot <quinot@adacore.com>
8227 * scos.ads: Update comments.
8229 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8231 * sem_ch3.adb (Build_Derived_Type): Inherit the convention from the
8232 base type, because the parent may be a subtype of a private type whose
8233 convention is established in a private part.
8235 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
8237 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Wrap the return
8238 statement in a block when the expansion of the return expression has
8239 created a finalization chain.
8240 * freeze.adb (Freeze_Expression): Alphabetize all choices associated
8241 with the parent node.
8242 Add N_Extended_Return_Statement to handle the case where a transient
8243 object declaration appears in the Return_Object_Declarations list of
8244 an extended return statement.
8246 2011-08-02 Matthew Gingell <gingell@adacore.com>
8248 * adaint.c (__gnat_is_symbolic_link_attr): Supress warning on possibly
8249 unused parameter 'name'.
8251 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8253 * sem_elim.adb (Set_Eliminated): If the overridden operation is an
8254 inherited operation, check whether its alias, which is the source
8255 operastion that it renames, has been marked eliminated.
8257 2011-08-02 Javier Miranda <miranda@adacore.com>
8259 * exp_util.adb (Safe_Prefixed_Reference): Do not consider safe an
8260 in-mode parameter whose type is an access type since it can be used to
8261 modify its designated object. Enforce code that handles as safe an
8262 access type that is not access-to-constant but it is the result of a
8263 previous removal of side-effects.
8264 (Remove_Side_Effects): Minor code reorganization of cases which require
8265 no action. Done to incorporate documentation on new cases uncovered
8266 working in this ticket: no action needed if this routine was invoked
8267 too early and the nodes are not yet decorated.
8268 * sem_res.adb (Resolve_Slice): Minor code cleanup replacling two calls
8269 to routine Remove_Side_Effects by calls to Force_Evaluation since they
8270 were issued with actuals that are implicitly provided by
8273 2011-08-02 Robert Dewar <dewar@adacore.com>
8275 * sem_ch3.adb, sem_res.adb: Minor reformatting.
8277 2011-08-02 Yannick Moy <moy@adacore.com>
8279 * sem_attr.adb (Check_Formal_Restriction_On_Attribute): new procedure
8280 to issue an error in formal mode on attribute not supported in this mode
8281 (Analyze_Attribute): issue errors on standard attributes not supported
8283 * sem_ch3.adb (Modular_Type_Declaration): remove obsolete part of
8284 comment, and issue error in formal mode on modulus which is not a power
8286 (Process_Range_Expr_In_Decl): issue error in formal mode on non-static
8288 * sem_ch8.adb (Find_Type): issue error in formal mode on 'Base in
8290 * sem_res.adb (Resolve_Unary_Op): issue error in formal mode on unary
8291 operator on modular type (except 'not').
8293 2011-08-02 Robert Dewar <dewar@adacore.com>
8295 * gnat_rm.texi: Minor reformatting.
8297 2011-08-02 Arnaud Charlet <charlet@adacore.com>
8299 * s-osinte-linux.ads: Minor comment update and reformatting.
8300 * i-cexten.ads: Make this unit pure, as for its parent.
8301 Will allow its usage in more contexts if needed.
8303 2011-08-02 Robert Dewar <dewar@adacore.com>
8305 * s-utf_32.ads: Minor comment fix.
8307 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8309 * sem_res.adb (Resolve_Actuals): if the subprogram is a primitive
8310 operation of a tagged synchronized type, handle the case where the
8311 controlling argument is overloaded.
8313 2011-08-02 Yannick Moy <moy@adacore.com>
8315 * gnat_rm.texi, opt.ads, sem_prag.adb, snames.ads-tmpl:
8316 Replace pragma SPARK_95 with pragma Restrictions (SPARK)
8317 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): set
8318 SPARK mode and formal verification mode on processing SPARK restriction
8319 * s-rident.ads (Restriction_Id): add SPARK restriction in those not
8320 requiring consistency checking.
8322 2011-08-02 Robert Dewar <dewar@adacore.com>
8324 * sem_res.adb: Minor reformatting.
8326 2011-08-02 Robert Dewar <dewar@adacore.com>
8328 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
8329 a-cforse.ads: Remove unneeded with of Ada.Containers
8330 Remove commented out pragma Inline's
8331 Move specifications of new subprograms to the actual specs
8333 2011-08-02 Yannick Moy <moy@adacore.com>
8335 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
8336 a-cforse.ads: Update comments.
8338 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8340 * sem_attr.adb: add attribute name when 'Result has the wrong prefix.
8342 2011-08-02 Robert Dewar <dewar@adacore.com>
8344 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
8345 a-cforse.ads, a-cofove.ads: Minor reformatting.
8347 2011-08-02 Claire Dross <dross@adacore.com>
8349 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads, a-cforse.ads,
8350 a-cofove.ads: Add comments.
8352 2011-08-02 Yannick Moy <moy@adacore.com>
8354 * gnat_rm.texi: Document formal containers.
8356 2011-08-02 Emmanuel Briot <briot@adacore.com>
8358 * g-comlin.adb (Goto_Section, Getopt): fix handling of "*" when there
8361 2011-08-02 Robert Dewar <dewar@adacore.com>
8363 * mlib-prj.adb, restrict.ads, sem_aggr.adb, sem_ch12.adb: Minor
8366 2011-08-02 Robert Dewar <dewar@adacore.com>
8368 * aspects.adb: New aspects Default_Value and Default_Component_Value
8369 New format of Aspect_Names table checks for omitted entries
8370 * aspects.ads: Remove mention of Aspect_Cancel and add documentation on
8371 handling of boolean aspects for derived types.
8372 New aspects Default_Value and Default_Component_Value
8373 New format of Aspect_Names table checks for omitted entries
8374 * einfo.ads, einfo.adb (Has_Default_Component_Value): New flag
8375 (Has_Default_Value): New flag
8376 (Has_Default_Component_Value): New flag
8377 (Has_Default_Value): New flag
8378 * par-ch13.adb (P_Aspect_Specifications): New format of Aspect_Names
8380 * par-prag.adb: New pragmas Default_Value and Default_Component_Value
8381 * sem_ch13.adb (Analyze_Aspect_Specifications): New aspects
8382 Default_Value and Default_Component_Value
8383 * sem_prag.adb: New pragmas Default_Value and Default_Component_Value
8384 New aspects Default_Value and Default_Component_Value
8385 * snames.ads-tmpl: New pragmas Default_Value and Default_Component_Value
8386 * sprint.adb: Print N_Aspect_Specification node when called from gdb
8388 2011-08-02 Vincent Celier <celier@adacore.com>
8390 * prj-nmsc.adb (Check_Library_Attributes): For virtual library project,
8391 inherit library kind.
8393 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8395 * sem_res.adb: Add guards in calls to Matching_Static_Array_Bounds.
8398 2011-08-02 Robert Dewar <dewar@adacore.com>
8400 * i-cstrin.ads: Updates to make Interfaces.C.Strings match RM
8402 2011-08-02 Yannick Moy <moy@adacore.com>
8404 * sem_aggr.adb (Resolve_Aggregate): Fix thinko.
8406 2011-08-02 Robert Dewar <dewar@adacore.com>
8408 * impunit.adb: Add comment.
8410 2011-08-02 Yannick Moy <moy@adacore.com>
8412 * sem_aggr.adb (Check_Qualified_Aggregate): new procedure which checks
8413 qualification of aggregates in formal mode
8414 (Is_Top_Level_Aggregate): returns True for an aggregate not contained in
8416 (Resolve_Aggregate): complete the test that an aggregate is adequately
8417 qualified in formal mode
8419 2011-08-02 Pascal Obry <obry@adacore.com>
8421 * make.adb, bindgen.adb, gnatbind.adb: Minor reformatting.
8422 * mlib-prj.adb: Supress warning when compiling binder generated file.
8423 (Build_Library): Supress all warnings when compiling the binder
8426 2011-08-02 Yannick Moy <moy@adacore.com>
8428 * errout.adb, errout.ads (Check_Formal_Restriction): move procedure
8430 * restrict.adb, restrict.ads (Check_Formal_Restriction): ...to here
8431 * sem_aggr.adb, sem_ch5.adb, sem_util.adb:
8432 Add with/use clauses to make Check_Formal_Restriction visible
8434 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8436 * sem_ch12.adb (Check_Generic_Actuals): handle properly actual
8437 in-parameters when type of the generic formal is private in the generic
8438 spec and non-private in the body.
8440 2011-08-02 Claire Dross <dross@adacore.com>
8442 * a-cfdlli.adb, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfhama.adb,
8443 a-cfhama.ads, a-cforse.adb, a-cforse.ads, a-cforma.adb, a-cforma.ads,
8444 a-cofove.adb, a-cofove.ads: New files implementing formal containers.
8445 * impunit.adb, Makefile.rtl: Take new files into account.
8447 2011-08-02 Robert Dewar <dewar@adacore.com>
8449 * sem_aggr.adb, sem_ch3.adb, sem_ch5.adb, make.adb, sem_res.adb,
8450 sem_attr.adb, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
8452 2011-08-02 Yannick Moy <moy@adacore.com>
8454 * sem_aggr.adb (Resolve_Aggregate): disable incorrectly placed check in
8456 * sem_util.adb (Matching_Static_Array_Bounds): proper detection of
8457 matching static array bounds, taking into account the special case of
8459 * sem_ch3.adb: Typo in comment.
8461 2011-08-02 Yannick Moy <moy@adacore.com>
8463 * errout.adb, errout.ads (Check_Formal_Restriction): new procedure
8464 which issues an error in formal mode if its argument node is originally
8466 * sem_ch3.adb (Analyze_Full_Type_Declaration): move test that a type
8467 has a discriminant specification so that it does not include the case
8469 (Derived_Type_Declaration): move here the test that a derived type has a
8470 discriminant specification
8471 * sem_aggr.adb (Resolve_Record_Aggregate): test the presence of the
8472 first element of a component association before accessing its choices
8473 (presence of component association is not enough)
8474 * exp_ch6.adb (Expand_N_Subprogram_Declaration): test if a subprogram
8475 declaration is a library item before accessing the next element in a
8476 list, as library items are not member of lists
8477 * sem_attr.adb, sem_ch11.adb, sem_ch4.adb, sem_ch5.adb, sem_ch6.adb,
8478 sem_ch8.adb, sem_ch9.adb, sem_res.adb, sem_util.adb: use
8479 Check_Formal_Restriction whenever possible.
8481 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8483 * sem_ch3.adb (Find_Type_Of_Object): In ASIS mode, create an itype
8484 reference when needed.
8486 2011-08-02 Bob Duff <duff@adacore.com>
8488 * gnat_ugn.texi: Fix typo.
8490 2011-08-02 Vincent Celier <celier@adacore.com>
8492 * make.adb (Gnatmake): Use MLib.Tgt.Archive_Ext as the extension of
8493 archive file name. Do not use the full path name of archives for Open
8496 2011-08-02 Robert Dewar <dewar@adacore.com>
8498 * sem_ch12.adb, sem_ch11.adb: New calling sequence for
8499 Analyze_Aspect_Specifications
8501 (Analyze_Aspect_Specifications): New handling for boolean aspects
8502 * sem_ch13.ads (Analyze_Aspect_Specifications): New calling sequence
8503 * sem_ch3.adb, sem_ch6.adb, sem_ch7.adb, sem_ch9.adb: New calling
8504 sequence for Analyze_Aspect_Specifications
8505 * sem_prag.adb (Analyze_Pragma): Remove use of Aspect_Cancel entirely
8506 * sinfo.ads, sinfo.adb (Aspect_Cancel): Remove, no longer used
8508 2011-08-02 Robert Dewar <dewar@adacore.com>
8510 * freeze.adb (Freeze_Entity): Remove handling of delayed boolean
8511 aspects, since these no longer exist.
8513 2011-08-02 Robert Dewar <dewar@adacore.com>
8515 * par-ch13.adb (Aspect_Specifications_Present): Always return false on
8516 semicolon, do not try to see if there are aspects following it.
8517 * par-ch3.adb (P_Declarative_Items): Better message for unexpected
8520 2011-08-02 Robert Dewar <dewar@adacore.com>
8522 * sem_ch8.adb, aspects.ads: Minor reformatting.
8524 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
8526 * sem_ch13.ads (Analyze_Aspect_Specification): Add pragma Inline.
8527 * sem_ch13.adb (Analyze_Non_Null_Aspect_Specifications): New procedure
8529 (Analyze_Aspect_Specifications): ...here. Call above procedure.
8531 2011-08-02 Yannick Moy <moy@adacore.com>
8533 * exp_ch6.adb (Expand_N_Subprogram_Declaration): issue error in formal
8534 mode on subprogram declaration outside of package specification, unless
8535 it is followed by a pragma Import
8536 * sem_ch3.adb (Access_Definition, Access_Subprogram_Declaration,
8537 Access_Type_Declaration): issue error in formal mode on access type
8538 (Analyze_Incomplete_Type_Decl): issue error in formal mode on
8540 (Analyze_Object_Declaration): issue error in formal mode on object
8541 declaration which does not respect SPARK restrictions
8542 (Analyze_Subtype_Declaration): issue error in formal mode on subtype
8543 declaration which does not respect SPARK restrictions
8544 (Constrain_Decimal, Constrain_Float, Constrain_Ordinary_Fixed): issue
8545 error in formal mode on digits or delta constraint
8546 (Decimal_Fixed_Point_Type_Declaration): issue error in formal mode on
8547 decimal fixed point type
8548 (Derived_Type_Declaration): issue error in formal mode on derived type
8549 other than type extensions of tagged record types
8550 * sem_ch6.adb (Process_Formals): remove check in formal mode, redundant
8551 with check on access definition
8552 * sem_ch9.adb (Analyze_Protected_Definition): issue error in formal
8553 mode on protected definition.
8554 (Analyze_Task_Definition): issue error in formal mode on task definition
8556 2011-08-02 Robert Dewar <dewar@adacore.com>
8558 * make.adb, sem_ch8.adb, s-inmaop-vxworks.adb: Minor reformatting.
8560 2011-08-02 Javier Miranda <miranda@adacore.com>
8562 * sem_ch6.adb (Can_Override_Operator): New function.
8563 (Verify_Overriding_Indicator): Add missing code to check overriding
8564 indicator in operators. Fixes regression.
8565 (Check_Overriding_Indicator): Minor reformating after replacing the
8566 code that evaluates if the subprogram can override an operator by
8567 invocations to the above new function.
8569 (Write_Field26_Name): Add missing code to ensure that, following
8570 the documentation in einfo.ads, this field is not shown as attribute
8571 "Static_Initialization" on non-dispatching functions.
8573 2011-08-02 Jose Ruiz <ruiz@adacore.com>
8575 * sem_res.adb (Resolve_Call): A call to
8576 Ada.Real_Time.Timing_Events.Set_Handler violates restriction
8577 No_Relative_Delay (AI-0211) only when it sets a relative timing event,
8578 i.e., when the second parameter is of type Time_Span.
8580 2011-08-02 Vincent Celier <celier@adacore.com>
8582 * make.adb (Gnatmake): use <library dir>/lib<library name>.a to link
8583 with an archive instead of -L<library dir> -l<library name>.
8585 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8587 * sem_ch8.adb (Analyze_Use_Type): If the clause is being re-analyzed,
8588 mark the base types In_Use in addition to making the operations
8591 2011-08-02 Ed Falis <falis@adacore.com>
8593 * init.c: add and setup __gnat_signal_mask for the exception signals
8594 * s-inmaop-vxworks.adb: new file.
8595 * s-intman-vxworks.adb: remove unnecessary initializations and
8597 * s-intman-vxworks.ads: remove unnecessary variable
8598 * s-taprop-vxworks.adb: simplify signal initialization
8600 2011-08-02 Robert Dewar <dewar@adacore.com>
8602 * sem_ch8.adb: Minor code reorganization, comment updates.
8604 2011-08-02 Robert Dewar <dewar@adacore.com>
8606 * sem_res.adb (Matching_Static_Array_Bounds): Moved to Sem_Util
8607 * sem_util.ads, sem_util.adb (Matching_Static_Array_Bounds): Moved
8609 (Matching_Static_Array_Bounds): Use Is_Ok_Static_Expression
8610 (Matching_Static_Array_Bounds): Moved here from Sem_Res
8612 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8614 * atree.h, atree.ads, atree.adb: New subprograms to manipulate Elist5.
8615 * par_ch8.adb (P_Use_Type): initialize Used_Operations for node.
8616 * sinfo.ads, sinfo.adb (Used_Operations): new attribute of
8617 use_type_clauses, to handle more efficiently use_type and use_all_type
8619 * sem_ch8.adb: Rewrite Use_One_Type and End_Use_Type to handle the
8620 Ada2012 Use_All_Type clause.
8621 (Use_Class_Wide_Operations): new procedure.
8623 2011-08-02 Robert Dewar <dewar@adacore.com>
8625 * exp_util.adb, par-ch10.adb, par-ch6.adb, sem.adb, sem_ch6.adb,
8626 sem_ch6.ads, sinfo.adb, sinfo.ads, sprint.adb: Change parameterized
8627 expression to expression function.
8629 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8631 * sem_ch4.adb: transform simple Ada2012 membership into equality only
8632 if types are compatible.
8634 2011-08-02 Yannick Moy <moy@adacore.com>
8636 * sem_res.adb (Matching_Static_Array_Bounds): new function which
8637 returns True if its argument array types have same dimension and same
8638 static bounds at each index.
8639 (Resolve_Actuals): issue an error in formal mode on actuals passed as
8640 OUT or IN OUT paramaters which are not view conversions in SPARK.
8641 (Resolve_Arithmetic_Op): issue an error in formal mode on
8642 multiplication or division with operands of fixed point types which are
8643 not qualified or explicitly converted.
8644 (Resolve_Comparison_Op): issue an error in formal mode on comparisons of
8645 Boolean or array type (except String) operands.
8646 (Resolve_Equality_Op): issue an error in formal mode on equality
8647 operators for array types other than String with non-matching static
8649 (Resolve_Logical_Op): issue an error in formal mode on logical operators
8650 for array types with non-matching static bounds. Factorize the code in
8651 Matching_Static_Array_Bounds.
8652 (Resolve_Qualified_Expression): issue an error in formal mode on
8653 qualified expressions for array types with non-matching static bounds.
8654 (Resolve_Type_Conversion): issue an error in formal mode on type
8655 conversion for array types with non-matching static bounds
8657 2011-08-02 Robert Dewar <dewar@adacore.com>
8659 * par-ch10.adb: Minor code reorganization (use Nkind_In).
8661 2011-08-02 Ed Schonberg <schonberg@adacore.com>
8663 * par-ch9.adb: save location of entry for proper error message.
8665 2011-08-02 Javier Miranda <miranda@adacore.com>
8667 * sem_type.ads, sem_type.adb (Is_Ancestor): Addition of a new formal
8668 (Use_Full_View) which permits this routine to climb through the
8669 ancestors using the full-view of private parents.
8670 * sem_util.adb (Collect_Interfaces_Info, Implements_Interface): Set
8671 Use_Full_View to true in calls to Is_Ancestor.
8672 * sem_disp.adb (Override_Dispatching_Operation): Set Use_Full_View to
8673 true in call to Is_Ancestor.
8674 * exp_ch3.adb (Build_Offset_To_Top_Functions, Initialize_Tag): Set
8675 Use_Full_View to true in call to Is_Ancestor.
8676 * exp_ch7.adb (Controller_Component): Set Use_Full_View to true in
8677 call to Is_Ancestor.
8678 * exp_ch4.adb (Expand_N_Type_Conversion, Tagged_Membership): Set
8679 Use_Full_View to true in calls to Is_Ancestor.
8680 * exp_disp.adb (Expand_Interface_Actuals, Make_Secondary_DT, Make_DT,
8681 Make_Select_Specific_Data_Table, Register_Primitive,
8682 Set_All_DT_Position): Set Use_Full_View to true in calls to Is_Ancestor.
8683 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Set Use_Full_View
8684 to true in call to Is_Ancestor.
8685 * exp_util.adb (Find_Interface_ADT, Find_Interface_Tag): Set
8686 Use_Full_View to true in calls to Is_Ancestor.
8688 (Write_Call_Info): Set Use_Full_View to true in call to Is_Ancestor.
8689 (Write_Type_Info): Set Use_Full_View to true in call to Is_Ancestor.
8691 2011-08-02 Robert Dewar <dewar@adacore.com>
8693 * gnat_rm.texi: Minor reformatting.
8694 * sem_prag.adb: Minor reformatting.
8696 2011-08-02 Tristan Gingold <gingold@adacore.com>
8698 * vms_data.ads: Add VMS qualifier for -gnateP.
8700 2011-08-02 Robert Dewar <dewar@adacore.com>
8702 * par-ch13.adb (P_Aspect_Specification): New meaning of Decl = Empty
8703 * par-ch7.adb (P_Package): Proper placement of aspects for package
8705 * par-endh.adb (Check_End): Ad Is_Sloc parameter
8706 (End_Statements): Add Is_Sloc parameterr
8707 * par.adb (P_Aspect_Specification): New meaning of Decl = Empty
8708 (Check_End): Ad Is_Sloc parameter
8709 (End_Statements): Add Is_Sloc parameterr
8711 2011-08-02 Vincent Celier <celier@adacore.com>
8713 * ug_words: Add VMS qualifier equivalent to -gnateP:
8714 /SYMBOL_PREPROCESSING.
8716 2011-08-02 Jose Ruiz <ruiz@adacore.com>
8718 * gnat-style.texi: For hexadecimal numeric literals the typical
8719 grouping of digits is 4 to represent 2 bytes.
8720 A procedure spec which is split into several lines is indented two
8723 2011-08-02 Yannick Moy <moy@adacore.com>
8725 * exp_aggr.adb (Is_Others_Aggregate): move function to other unit.
8726 * sem_aggr.adb, sem_aggr.ads (Is_Others_Aggregate): move function here
8727 (Resolve_Aggregate): issue errors in formal modes when aggregate is not
8729 (Resolve_Array_Aggregate): issue errors in formal modes on non-static
8730 choice in array aggregate
8731 (Resolve_Extension_Aggregate): issue errors in formal modes on subtype
8733 (Resolve_Record_Aggregate): issue errors in formal modes on mixed
8734 positional and named aggregate for record, or others in record
8735 aggregate, or multiple choice in record aggregate
8736 * sem_res.adb (Resolve_Logical_Op): issue errors in formal mode when
8737 array operands to logical operations AND, OR and XOR do not have the
8738 same static lower and higher bounds
8739 * sem_ch5.adb, sinfo.ads: Correct typos in comments
8741 2011-08-01 Robert Dewar <dewar@adacore.com>
8743 * sem_util.ads, sem_util.adb, sem_ch6.adb (Last_Source_Statement):
8744 Replaces Last_Source_Node_In_Sequence.
8745 * err_vars.ads (Error_Msg_Lang): 16 is OK, don't need 4K
8746 * errout.adb (Set_Error_Msg_Lang): Takes arg with no parens, but stores
8747 parens and blank in string (this was inconsistently implemented).
8749 (Set_Error_Msg_Lang): Takes arg with no parens, but stores parens and
8750 blank in string (this was inconsistently implemented).
8752 (Set_Global_Switches): Set formal mode switches appropriately
8753 * opt.ads, opt.adb: Formal mode is now global switches, more consistent
8755 (Analyze_Pragma, case SPARK_95): Set opt switches appropriately and
8756 call Set_Error_Msg_Lang to set "spark" as language name.
8757 * par.adb: Remove unnecessary call to set formal language for errout
8758 * sem_prag.adb (P_Pragma, case SPARK_95): Set opt switches
8759 appropriately and call Set_Error_Msg_Lang to set "spark" as language
8761 * sem_ch4.adb (Analyze_Concatenation_Operand): remove procedure and
8762 calls to it, moved after resolution so that types are known
8763 * sem_res.adb (Resolve_Op_Concat): issue an error in formal mode if
8764 result of concatenation is not of type String
8765 (Resolve_Op_Concat_Arg): issue an error in formal mode if an operand of
8766 concatenation is not properly restricted
8767 * gnat_rm.texi: Add doc on pragma Spark_95.
8768 * gcc-interface/Makefile.in: Remove obsolete target pairs for
8769 Interfaces.C.* on VMS. Remove s-parame-vms-restrict.ads.
8770 * gcc-interface/Make-lang.in: Update dependencies.
8772 2011-08-01 Javier Miranda <miranda@adacore.com>
8774 * sem_disp.adb (Override_Dispatching_Operation): Enforce strictness of
8775 condition that detects if the overridden operation must replace an
8778 2011-08-01 Javier Miranda <miranda@adacore.com>
8780 * exp_ch4.adb (Expand_N_Case_Expression): Propagate to the expanded
8781 code declarations inserted by Insert_Actions in each alternative of the
8782 N_Case_Expression node.
8784 2011-08-01 Robert Dewar <dewar@adacore.com>
8786 * sem_ch6.adb: Minor code reorganization.
8787 * sem_util.adb: Minor reformatting.
8789 2011-08-01 Pascal Obry <obry@adacore.com>
8791 * prj-env.adb: Remove <prefix>/lib/gpr/<target> project search path.
8792 * gnat_ugn.texi: Add documentation for VERSIONINFO Windows resource.
8794 2011-08-01 Yannick Moy <moy@adacore.com>
8796 * par-ch4.adb (P_Name): issue a syntax error in SPARK mode on character
8797 literal or operator symbol which is prefixed
8798 * sem_attr.adb (Analyze_Access_Attribute): issue an error in formal
8799 mode on access attributes.
8800 * sem_ch4.adb (Analyze_Concatenation_Operand): new procedure to check
8801 that concatenation operands are properly restricted in formal mode
8802 (Analyze_Concatenation, Analyze_Concatenation_Rest): call new procedure
8803 Analyze_Concatenation_Operand. Issue an error in formal mode if the
8804 result of the concatenation has a type different from String.
8805 (Analyze_Conditional_Expression, Analyze_Explicit_Dereference,
8806 Analyze_Quantified_Expression, Analyze_Slice,
8807 Analyze_Null): issue an error in formal mode on unsupported constructs
8809 (Analyze_Block_Statement): only issue error on source block statement
8810 * sem_util.ads, sem_util.adb (Last_Source_Node_In_Sequence): new
8811 function which returns the last node in a list of nodes for which
8812 Comes_From_Source returns True, if any
8813 * sem_ch6.adb (Check_Missing_Return): minor refactoring to use
8814 Last_Source_Node_In_Sequence
8815 * sem_ch8.adb (Analyze_Exception_Renaming, Analyze_Generic_Renaming,
8816 Analyze_Object_Renaming, Analyze_Use_Package): issue an error in formal
8817 mode on unsupported constructs
8818 * sem_ch9.adb Do not return after issuing error in formal mode, as the
8819 rest of the actions may be needed later on since the error is marked as
8821 * sinfo.ads: Typos in comments.
8823 2011-08-01 Pascal Obry <obry@adacore.com>
8825 * projects.texi: Minor editing.
8827 2011-08-01 Yannick Moy <moy@adacore.com>
8829 * err_vars.ads (Error_Msg_Lang, Error_Msg_Langlen): new variables for
8830 insertion character ~~
8831 * errout.ads, errout.adb (Formal_Error_Msg_...): remove procedures
8832 (Set_Error_Msg_Lang): new procedure which fixes the language for use
8833 with insertion character ~~
8834 (Set_Msg_Text): treat insertion character ~~
8835 * par-ch4.adb, par-ch5.adb, par-endh.adb, sem_attr.adb, sem_ch11.adb,
8836 sem_ch3.adb, sem_ch5.adb, sem_ch9.adb, sem_util.adb: Replace calls to
8837 Formal_Error_Msg_... procedures by equivalent Error_Msg_...
8838 procedures. Favor calls to Error_Msg_F(E) over Error_Msg_N(E). Make
8839 errors related to the formal language restriction not serious
8840 (insertion character |).
8841 * par.adb (Par): set formal language for error messages if needed
8842 * sem_ch6.adb (Check_Missing_Return): take into account possible
8843 generated statements at the end of the function
8844 * snames.ads-tmpl (Name_SPARK_95, Pragma_SPARK_95): new variable and
8845 enumeration value to define a new pragma SPARK_95
8846 * opt.ads, opt.adb (SPARK_Version_Type, SPARK_Version_Default,
8847 SPARK_Version): new type and variables to store the SPARK version
8849 (SPARK_Mode): return True when SPARK_Version is set
8850 * par-prag.adb: Correct indentation
8851 (Prag): take Pragma_SPARK_95 into account
8852 * sem_prag.adb (Set_Mechanism_Value, Sig_Flags): take Pragma_SPARK_95
8855 2011-08-01 Robert Dewar <dewar@adacore.com>
8857 * sem_ch3.adb, sem_ch3.ads, sem_ch5.adb, prj-part.adb, par-ch4.adb,
8858 sem_util.adb, sem_ch4.adb, sem_ch6.adb, sem_ch6.ads, sem_ch8.adb,
8859 sem_ch8.ads, sem_ch13.ads, par-ch5.adb, prj-env.ads: Minor reformatting
8861 2011-08-01 Pascal Obry <obry@adacore.com>
8863 * prj-part.ads, prj-part.adb (Parse): Add Target_Name parameter. Pass
8864 Target_Name to Get_Path call.
8865 (Parse_Single_Project): Likewise.
8866 (Post_Parse_Context_Clause): Likewise.
8867 * prj-env.ads, prj-env.adb (Find_Project): Add Target_Name parameter.
8868 Call Initialise_Project_Path with the proper Target_Name.
8869 (Initialize_Project_Path): Add <gnat_root>/<target_name>/lib/gnat
8871 (Get_Path): Add Target_Name parameter. Call Initialise_Project_Path
8872 with the proper Target_Name.
8873 * prj-conf.adb (Get_Or_Create_Configuration_File): Pass Target_Name to
8875 (Parse_Project_And_Apply_Config): Likewise.
8876 * prj-makr.adb (Initialize): Pass empty Target_Name to Parse routine.
8877 This is fine as this part of the code is supporting only native
8879 * prj-pars.adb (Parse): Pass empty Target_Name to Parse routine. This
8880 is fine as this part of the code is supporting only native compilation.
8882 2011-08-01 Yannick Moy <moy@adacore.com>
8884 * sem_util.adb (Enter_Name): issue error in formal mode on declaration
8885 of homonym, unless the homonym is one of the cases allowed in SPARK
8886 * par-ch5.adb (Parse_Decls_Begin_End): issue error in SPARK mode for
8887 package declaration occurring after a body.
8889 2011-08-01 Robert Dewar <dewar@adacore.com>
8891 * checks.adb, exp_ch4.adb: Minor reformatting.
8893 2011-08-01 Javier Miranda <miranda@adacore.com>
8895 * einfo.ads (Access_Disp_Table): Fix documentation.
8896 (Dispatch_Table_Wrappers): Fix documentation.
8898 2011-08-01 Pascal Obry <obry@adacore.com>
8900 * prj-env.adb, prj-env.ads: Minor reformatting.
8902 2011-08-01 Yannick Moy <moy@adacore.com>
8904 * sem_util.ads, sem_util.adb, par.adb, par_util.adb
8905 (Formal_Error_Msg, Formal_Error_Msg_N, Formal_Error_Msg_SP): move
8906 procedures out of these packages.
8907 * errout.ads, errout.adb
8908 (Formal_Error_Msg, Formal_Error_Msg_N, Formal_Error_Msg_SP): move
8909 procedures in of this package
8910 (Formal_Error_Msg_NE): new procedure for wrapper on Error_Msg_NE
8911 * par-ch5.adb (Parse_Decls_Begin_End): issue syntax error in SPARK mode
8912 on misplaced later vs initial declarations, like in Ada 83
8913 * sem_attr.adb (Processing for Analyze_Attribute): issue error in
8914 formal mode on attribute of private type whose full type declaration
8916 * sem_ch3.adb (Analyze_Declarations): issue error in formal mode on a
8917 package declaration inside a package specification
8918 (Analyze_Full_Type_Declaration): issue error in formal mode on
8919 controlled type or discriminant type
8920 * sem_ch6.adb (Analyze_Subprogram_Specification): only issue error on
8921 user-defined operator means that it should come from the source
8922 (New_Overloaded_Entity): issue error in formal mode on overloaded
8924 * sem_ch6.ads, sem_ch13.ads: typos in comments.
8926 2011-08-01 Thomas Quinot <quinot@adacore.com>
8928 * atree.adb: Minor reformatting.
8929 * checks.adb: Minor reformatting.
8931 2011-08-01 Vincent Celier <celier@adacore.com>
8933 * s-parame-vms-ia64.ads: Fix typo in comment
8935 * s-parame-vms-restrict.ads: Removed, unused.
8937 2011-08-01 Javier Miranda <miranda@adacore.com>
8940 (Is_Variable_Size_Array): Remove local subprogram Is_Constant_Bound.
8942 (Constrain_Index): Remove side effects in the evaluation of the bounds.
8943 * sem_ch3.ads, sem_ch3.adb
8944 (Is_Constant_Bound): New extended version of the subprogram that was
8945 previously located inside function Exp_Ch3.Is_Variable_Size_Array.
8946 Moved here since it is shared by routines of sem_ch3 and exp_ch3.
8947 * sem_aux.ads (Constant_Value): Fix typo in comment.
8948 * checks.adb (Generate_Index_Checks): New implementation which, for
8949 array objects with constant bounds, generates the runtime check
8950 referencing the bounds of the array type. For other cases this routine
8951 provides its previous behavior obtaining such values from the array
8953 * sem_res.adb (Set_Slice_Subtype): Link a copied range subtree with its
8955 * atree.adb (New_Copy): Reset flag Is_Overloaded in the new copy since
8956 we cannot have semantic interpretations of the new node.
8958 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8960 * sem_ch6.adb (Fully_Conformant_Expressions): handle quantified
8963 2011-08-01 Arnaud Charlet <charlet@adacore.com>
8965 * sem_ch8.adb: Minor code editing.
8966 * s-vxwext.adb: Remove trailing space.
8967 * freeze.adb, freeze.ads, errout.ads, erroutc.adb: Fix GPLv3 header for
8968 consistency with other files.
8970 2011-08-01 Thomas Quinot <quinot@adacore.com>
8972 * s-auxdec.ads, s-auxdec-vms_64.ads: Minor reformatting.
8974 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8976 * par-ch10.adb: reject parameterized expressions as compilation unit.
8977 * sem_ch4.adb: handle properly conditional expression with overloaded
8978 then_clause and no else_clause.
8980 2011-08-01 Tristan Gingold <gingold@adacore.com>
8982 * s-parame-vms-alpha.ads, s-parame-vms-ia64.ads: Redeclare C_Address
8983 like done by System.Aux_DEC.
8984 * env.c (__gnat_setenv) [VMS]: Put logicals into LNM$PROCESS table.
8986 2011-08-01 Yannick Moy <moy@adacore.com>
8988 * par-endh.adb (Check_End): issue a syntax error in SPARK mode for
8989 missing label at end of declaration (subprogram or package)
8990 * par-ch4.adb (P_Name): issue a syntax error in SPARK mode for mixing
8991 of positional and named parameter association
8992 * par.adb, par-util.adb (Formal_Error_Msg_SP): new wrapper on
8993 Error_Msg_SP which adds a prefix to the error message giving the name
8994 of the formal language analyzed
8995 * sem_ch6.adb (Analyze_Return_Type): issue an error in formal mode for
8996 access result type in subprogram, unconstrained array as result type,.
8997 (Analyze_Subprogram_Declaration): issue an error in formal mode for null
8999 * sem_ch8.adb: Code clean up.
9001 2011-08-01 Javier Miranda <miranda@adacore.com>
9003 * sem_ch7.adb (Uninstall_Declarations): Remove useless code.
9004 * einfo.ads (Access_Disp_Table): Fix documentation.
9005 (Dispatch_Table_Wrappers): Fix documentation.
9006 * einfo.adb (Access_Disp_Table, Dispatch_Table_Wrappers,
9007 Set_Access_Disp_Table, Set_Dispatch_Table_Wrappers): Fix the assertions
9008 to enforce the documentation of this attribute.
9009 (Set_Is_Interface): Cleanup the assertion.
9010 * exp_ch4.adb (Expand_Allocator_Expression, Tagged_Membership): Locate
9011 the Underlying_Type entity before reading attribute Access_Disp_Table.
9012 * exp_disp.adb (Expand_Dispatching_Call, Expand_Interface_Conversion):
9013 Locate the Underlying_Type before reading attribute Access_Disp_Table.
9014 * exp_aggr.adb (Build_Array_Aggr_Code, Build_Record_Aggr_Code): Locate
9015 the Underlying_Type entity before reading attribute Access_Disp_Table.
9016 * exp_ch3.adb (Build_Record_Init_Proc, Expand_N_Object_Declaration):
9017 Locate the Underlying_Type entity before reading attribute
9020 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9022 * s-poosiz.ads: Additional overriding indicators.
9024 2011-08-01 Yannick Moy <moy@adacore.com>
9026 * sem_ch5.adb (Analyze_Exit_Statement): add return after error in
9028 (Analyze_Iteration_Scheme): issue error in formal mode when loop
9029 parameter specification does not include a subtype mark.
9030 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): issue error in
9031 formal mode on abstract subprogram.
9032 (Analyze_Subprogram_Specification): issue error in formal mode on
9033 user-defined operator.
9034 (Process_Formals): issue error in formal mode on access parameter and
9036 * sem_ch9.adb (Analyze_Abort_Statement,
9037 Analyze_Accept_Statement, Analyze_Asynchronous_Select,
9038 Analyze_Conditional_Entry_Call, Analyze_Delay_Relative,
9039 Analyze_Delay_Until, Analyze_Entry_Call_Alternative,
9040 Analyze_Requeue, Analyze_Selective_Accept,
9041 Analyze_Timed_Entry_Call): issue error in formal mode on such constructs
9042 * sem_ch11.adb (Analyze_Raise_Statement, Analyze_Raise_xxx_Error):
9043 issue error in formal mode on user-defined raise statement.
9045 2011-08-01 Thomas Quinot <quinot@adacore.com>
9047 * sem_ch6.adb (Enter_Overloaded_Entity): Do not warn about a
9048 declaration being hidden when overriding an implicit inherited
9050 * par-ch10.adb (P_Compilation_Unit): In syntax check only mode
9051 (-gnats), do not complain about a source file that contains only a
9054 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9056 * sem_ch5.adb (Analyze_Iterator_Scheme): Do not overwrite type of loop
9057 variable if already set.
9059 2011-08-01 Arnaud Charlet <charlet@adacore.com>
9061 * g-socket-dummy.adb, s-osinte-linux.ads, g-socket-dummy.ads,
9062 g-debuti.adb, g-tasloc.adb, g-debuti.ads, g-tasloc.ads,
9063 s-osinte-hpux.ads, g-sercom.adb, g-soliop-solaris.ads, g-sercom.ads,
9064 g-sptain.ads, g-curexc.ads, s-tasloc.adb, s-tasloc.ads, s-tataat.adb,
9065 g-ctrl_c.adb, a-reatim.adb, s-tataat.ads, g-dirope.adb, g-ctrl_c.ads,
9066 g-dirope.ads, g-boubuf.adb, g-calend.adb, g-boubuf.ads, g-souinf.ads,
9067 g-table.adb, g-bytswa-x86.adb, g-wispch.adb, g-io.adb, g-table.ads,
9068 g-wispch.ads, g-io.ads, g-memdum.adb, g-memdum.ads, g-busorg.adb,
9069 g-busorg.ads, g-regpat.adb, g-sothco-dummy.adb, g-encstr.adb,
9070 g-regpat.ads, g-sothco-dummy.ads, s-osinte-aix.ads, g-encstr.ads,
9071 g-sercom-mingw.adb, s-mastop-vms.adb, g-diopit.adb, g-diopit.ads,
9072 s-vxwext.adb, g-dyntab.adb, g-dyntab.ads, g-crc32.adb,
9073 g-sercom-linux.adb, g-crc32.ads, s-regpat.adb, g-flocon.ads,
9074 s-regpat.ads, g-stheme.adb, g-sestin.ads, s-taspri-posix-noaltstack.ads,
9075 g-soliop.ads, s-inmaop-posix.adb, g-locfil.ads, g-enblsp-vms-alpha.adb,
9076 g-socthi-dummy.adb, g-socthi-dummy.ads, gnat.ads, g-moreex.adb,
9077 g-moreex.ads, g-dynhta.adb, g-dynhta.ads, g-deutst.ads, g-htable.adb,
9078 g-cgicoo.adb, g-htable.ads, g-cgicoo.ads, a-interr.adb,
9079 g-socthi-vms.adb, g-socthi-vms.ads, g-hesora.adb, g-bubsor.adb,
9080 g-hesora.ads, g-bubsor.ads, g-md5.adb, g-md5.ads, s-intman-irix.adb,
9081 s-htable.adb, s-osinte-vms.adb, s-htable.ads, s-osinte-vms.ads,
9082 s-taprob.adb, g-bytswa.adb, g-bytswa.ads, s-osinte-solaris-posix.ads,
9083 a-suenco.adb, g-comver.adb, g-comver.ads, g-exctra.adb,
9084 s-osinte-solaris.adb, g-exctra.ads, s-osinte-irix.ads,
9085 s-osinte-solaris.ads, a-caldel-vms.adb, g-socthi-vxworks.adb,
9086 g-expect.adb, g-socthi-vxworks.ads, g-expect.ads, g-comlin.ads,
9087 g-heasor.adb, g-heasor.ads, g-traceb.adb, g-traceb.ads, g-decstr.adb,
9088 g-spipat.adb, g-decstr.ads, g-spipat.ads, s-mastop-tru64.adb,
9089 g-except.ads, g-thread.adb, g-hesorg.adb, g-thread.ads, g-hesorg.ads,
9090 g-expect-vms.adb, a-stuten.ads, g-spchge.adb, g-spchge.ads,
9091 g-u3spch.adb, g-u3spch.ads, g-spitbo.adb, g-spitbo.ads,
9092 s-osinte-dummy.ads, s-osinte-posix.adb, g-pehage.adb, g-pehage.ads,
9093 s-gloloc-mingw.adb, g-sha1.ads, s-traceb-hpux.adb,
9094 g-trasym-unimplemented.adb, g-trasym-unimplemented.ads, g-io_aux.adb,
9095 g-regexp.adb, g-io_aux.ads, g-socthi-mingw.adb, g-regexp.ads,
9096 s-osinte-hpux-dce.adb, g-socthi-mingw.ads, g-cgi.adb,
9097 s-osinte-hpux-dce.ads, g-cgi.ads, g-byorma.adb, g-boumai.ads,
9098 g-byorma.ads, a-caldel.adb, s-regexp.adb, s-regexp.ads,
9099 g-soliop-mingw.ads, g-sptavs.ads, s-osinte-tru64.ads, g-speche.adb,
9100 g-speche.ads, g-socthi.adb, g-stsifd-sockets.adb, g-socthi.ads,
9101 s-osinte-darwin.ads, i-vxwork-x86.ads, g-awk.adb, i-vxwork.ads,
9102 g-awk.ads, g-zspche.adb, g-zspche.ads, g-socket.adb, g-sptabo.ads,
9103 g-socket.ads, g-semaph.adb, g-semaph.ads, s-taspri-posix.ads,
9104 g-enblsp-vms-ia64.adb, g-cgideb.adb, g-cgideb.ads, g-sothco.adb,
9105 s-osinte-freebsd.ads, g-sothco.ads, g-catiio.adb, g-casuti.adb,
9106 g-catiio.ads, g-casuti.ads, g-trasym.adb, g-trasym.ads, s-casuti.adb,
9107 g-os_lib.adb, s-traceb-mastop.adb, g-busora.adb, s-interr-dummy.adb,
9108 g-busora.ads, g-enutst.ads, s-os_lib.adb, a-tasatt.adb,
9109 s-osinte-mingw.ads: Update to GPLv3 run-time license.
9110 Use GNAT instead of GNARL.
9112 2011-08-01 Bob Duff <duff@adacore.com>
9114 * a-cdlili.ads, a-cihama.ads, a-coinve.ads, a-ciorse.ads, a-coorma.ads,
9115 a-cidlli.ads, a-ciormu.ads, a-cihase.ads, a-cohama.ads, a-coorse.ads,
9116 a-ciorma.ads, a-coormu.ads, a-convec.ads, a-cohase.ads: Minor
9119 2011-08-01 Yannick Moy <moy@adacore.com>
9121 * debug.adb (d.D) reverve flag for the SPARK mode
9122 (d.E) reverve flag for SPARK generation mode
9123 (d.F) reverve flag for Why generation mode
9124 * opt.ads, opt.adb (ALFA_Mode, ALFA_Through_SPARK_Mode,
9125 ALFA_Through_Why_Mode, Formal_Verification_Mode, SPARK_Mode): New
9126 functions which return True when the corresponding modes are set
9127 (Formal_Language): return "spark" or "alfa" when in formal verification
9129 * sem_util.ads, sem_util.adb (Formal_Error_Msg): new wrapper on
9130 Error_Msg to prefix the error message with a tag giving the formal
9132 (Formal_Error_Msg_N): new wrapper on Error_Msg_N to prefix the error
9133 message with a tag giving the formal language
9134 * sem_ch5.adb (Analyze_Block_Statement): issue error in formal mode on
9136 (Analyze_Case_Statement): issue error in formal mode on case statement
9137 with a single "others" case alternative
9138 (Analyze_Exit_Statement): issue errors in formal mode on exit
9139 statements which do not respect SPARK restrictions
9140 (Analyze_Goto_Statement): issue error in formal mode on goto statement
9141 (Check_Unreachable_Code): always issue an error (not a warning) in
9142 formal mode on unreachable code (concerns both code after an infinite
9143 loop and after an unconditional jump, both not allowed in SPARK)
9144 * sem_ch6.adb (Analyze_Return_Statement): add call to
9145 Set_Return_Present for a procedure containing a return statement
9146 (already done for functions in Analyze_Function_Return)
9147 (Analyze_Function_Return): issue error in formal mode on extended
9148 return or if return is not last statement in function
9149 (Check_Missing_Return): issue error in formal mode if function does
9150 not end with return or if procedure contains a return
9151 * sem_ch8.ads, sem_ch8.adb (Has_Loop_In_Inner_Open_Scopes): new
9152 function to detect if there is an inner scope of its parameter S which
9155 2011-08-01 Thomas Quinot <quinot@adacore.com>
9157 * sem_ch6.ads: Minor reformatting.
9159 2011-08-01 Javier Miranda <miranda@adacore.com>
9161 * sem_util.adb (Abstract_Interface_List): Complete condition when
9162 processing private type declarations to avoid reading unavailable
9164 (Is_Synchronized_Tagged_Type): Complete condition when processing
9165 private extension declaration nodes to avoid reading unavailable
9168 2011-08-01 Thomas Quinot <quinot@adacore.com>
9170 * sem_ch3.adb: Minor reformatting.
9172 2011-08-01 Thomas Quinot <quinot@adacore.com>
9174 * s-parame-ae653.ads, s-parame-vms-alpha.ads, s-parame-hpux.ads,
9175 i-cpoint.adb, i-cstrin.adb, i-cpoint.ads, i-cstrin.ads,
9176 s-parame-vms-ia64.ads, s-parame.ads, i-c.ads, s-parame-vxworks.ads,
9177 s-parame-vms-restrict.ads: Remove duplicated Interfaces.C.* packages
9178 for VMS, instead parametrize the common implementation with
9179 System.Parameters declarations.
9181 2011-08-01 Eric Botcazou <ebotcazou@adacore.com>
9183 * gnat_rm.texi: Document limitation of Pragma No_Strict_Aliasing.
9185 2011-08-01 Tristan Gingold <gingold@adacore.com>
9187 * seh_init.c: Fix SEH handler installation on win64.
9189 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9191 * sem_ch3.adb (Access_Subprogram_Declaration): in Asis mode, prevent
9192 double analysis of an anonymous access to subprogram, because it can
9193 lead to improper sharing of profiles and a back-end crash.
9195 2011-08-01 Robert Dewar <dewar@adacore.com>
9197 * make.adb, sem_ch4.adb: Minor reformatting.
9198 * gcc-interface/Make-lang.in: Update dependencies.
9199 * sem_util.adb, exp_ch5.adb: Minor reformatting.
9201 2011-08-01 Arnaud Charlet <charlet@adacore.com>
9203 * gnat_rm.texi: Fix definition of Long_Integer.
9205 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9207 * exp_aggr.adb: check limit size of static aggregate unconditionally,
9208 to prevent storage exhaustion.
9209 * exp_ch7.adb (Clean_Simple_Protected_Objects): if the scope being
9210 finalized is a function body, insert the cleanup code before the final
9211 return statement, to prevent spurious warnings.
9212 * s-pooglo.ads: add overriding indicator.
9214 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9216 * sem_ch4.adb (Operator_Check): improve error message when both a
9217 with_clause and a use_clause are needed to make operator usage legal.
9218 * sem_util.ads, sem_util.adb (Unit_Is_Visible): new predicate to
9219 determine whether a compilation unit is visible within an other,
9220 either through a with_clause in the current unit, or a with_clause in
9221 its library unit or one one of its parents.
9223 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9225 * exp_ch5.adb (Expand_N_Iterator_Loop): handle properly an iterator
9226 over an arbitrary expression of an array or container type.
9227 * lib-xref.adb: clarify comment.
9229 2011-08-01 Bob Duff <duff@adacore.com>
9231 * einfo.ads: Minor reformatting.
9232 * debug.adb: Minor comment improvement.
9234 2011-08-01 Javier Miranda <miranda@adacore.com>
9236 * sem_ch4.adb (Try_Object_Operation): For class-wide subprograms do not
9237 consider hidden subprograms as valid candidates.
9239 2011-08-01 Arnaud Charlet <charlet@adacore.com>
9241 * make.adb (Compile): Strip -mxxx switches in CodePeer mode.
9243 2011-08-01 Vasiliy Fofanov <fofanov@adacore.com>
9245 * gnat_ugn.texi: Fix typo.
9247 2011-08-01 Robert Dewar <dewar@adacore.com>
9249 * i-cstrin.adb, sem_util.adb, exp_ch11.adb, sem_ch8.adb,
9250 lib-xref.adb: Minor reformatting
9252 2011-08-01 Gary Dismukes <dismukes@adacore.com>
9254 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Replace test of
9255 when to generate a call to Move_Final_List.
9256 (Has_Controlled_Parts): Remove this function.
9258 2011-08-01 Geert Bosch <bosch@adacore.com>
9260 * par-ch3.adb (P_Discrete_Choice_List): Improve error message for extra
9263 2011-08-01 Thomas Quinot <quinot@adacore.com>
9265 * exp_ch11.adb (Expand_N_Raise_Statement): Mark N_Raise_xxx_Error for
9266 explicit raise of a predefined exception as Comes_From_Source if the
9267 original N_Raise_Statement comes from source.
9269 2011-08-01 Robert Dewar <dewar@adacore.com>
9271 * sinfo.ads: Add comment.
9272 * sem_ch6.adb: Minor reformatting.
9274 2011-08-01 Robert Dewar <dewar@adacore.com>
9276 * freeze.adb (Freeze_Entity): Refine check for bad component size
9277 clause to avoid rejecting confirming clause when atomic/aliased present.
9279 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9281 * sem_ch8.adb (Find_Direct_Name, Analyze_Expanded_Name): use Is_LHS to
9282 better determine whether an entity reference is a write.
9283 * sem_util.adb (Is_LHS): refine predicate to handle assignment to a
9285 * lib-xref.adb (Output_References): Do no suppress a read reference at
9286 the same location as an immediately preceeding modify-reference, to
9287 handle properly in-out actuals.
9289 2011-08-01 Tristan Gingold <gingold@adacore.com>
9291 * env.c (__gnat_setenv) [VMS]: Refine previous change.
9293 2011-08-01 Quentin Ochem <ochem@adacore.com>
9295 * i-cstrin.adb (New_String): Changed implementation, now uses only the
9296 heap to compute the result.
9298 2011-08-01 Robert Dewar <dewar@adacore.com>
9300 * atree.ads: Minor reformatting.
9302 2011-08-01 Emmanuel Briot <briot@adacore.com>
9304 * g-expect.adb (Get_Command_Output): Fix memory leak.
9306 2011-08-01 Geert Bosch <bosch@adacore.com>
9308 * cstand.adb (P_Float_Type): New procedure to print the definition of
9309 predefined fpt types.
9310 (P_Mixed_Name): New procedure to print a name using mixed case
9311 (Print_Standard): Use P_Float_Type for printing floating point types
9312 * einfo.adb (Machine_Emax_Value): Add preliminary support for quad
9313 precision IEEE float.
9315 2011-08-01 Thomas Quinot <quinot@adacore.com>
9317 * sem_ch3.adb: Minor reformatting.
9319 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9321 * sem_ch6.adb (Analyze_Parameterized_Expression): If the expression is
9322 the completion of a generic function, insert the new body rather than
9323 rewriting the original.
9325 2011-08-01 Yannick Moy <moy@adacore.com>
9327 * sinfo.ads, errout.ads: Typos in comments.
9329 2011-08-01 Robert Dewar <dewar@adacore.com>
9331 * par-endh.adb: Minor reformatting.
9333 2011-08-01 Robert Dewar <dewar@adacore.com>
9335 * aspects.ads, aspects.adb: Add aspects for library unit pragmas
9336 (Pre_Post_Aspects): New subtype.
9337 * par-ch12.adb (P_Generic): New syntax for aspects in packages
9338 * par-ch13.adb (P_Aspect_Specifications): Add Semicolon parameter
9339 * par-ch7.adb (P_Package): Remove Decl parameter
9340 (P_Package): Handle new syntax for aspects (before IS)
9341 * par-ch9.adb (P_Protected_Definition): Remove Decl parameter, handle
9343 (P_Task_Definition): Remove Decl parameter, handle new aspect syntax
9344 * par.adb (P_Aspect_Specifications): Add Semicolon parameter
9345 (P_Package): Remove Decl parameter
9346 * sem_ch13.adb (Analyze_Aspect_Specifications): Handle library unit
9348 * sem_ch7.adb (Analyze_Package_Declaration): Analyze new format aspect
9350 * sem_util.ads, sem_util.adb (Static_Boolean): New function
9351 * sinfo.ads: Document new syntax for aspects in packages etc.
9352 * sprint.adb: Handle new syntax of aspects before IS in package
9354 2011-08-01 Thomas Quinot <quinot@adacore.com>
9356 * atree.ads: Minor reformatting.
9357 * sem_prag.adb: Minor reformatting.
9359 2011-08-01 Robert Dewar <dewar@adacore.com>
9361 * exp_util.adb (Insert_Actions): Fix error in handling Actions for
9362 case expr alternative.
9364 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9366 * sem_ch12.adb: Fix typo.
9368 2011-08-01 Geert Bosch <bosch@adacore.com>
9370 * sem_prag.adb (Check_No_Link_Name): New procedure.
9371 (Process_Import_Or_Interface): Use Check_No_Link_Name.
9372 * cstand.adb (Create_Standard): Use Esize (Standard_Long_Long_Float)
9373 instead of Standard_Long_Long_Float_Size global. Preparation for
9374 eventual removal of per type constants.
9375 * exp_util.ads (Get_Stream_Size): New function returning the stream
9376 size value of subtype E.
9377 * exp_util.adb (Get_Stream_Size): Implement new function.
9378 * exp_strm.adb (Build_Elementary_Input_Call): Use Get_Stream_Size
9380 * exp_attr.adb (Attribute_Stream_Size): Use Get_Stream_Size
9382 (Machine_Mantissa_Value): Handle 128-bit quad precision IEEE floats
9384 2011-08-01 Geert Bosch <bosch@adacore.com>
9386 * cstand.adb: Fix comments.
9387 * sem_prag.adb (Analyze_Pragma): Use List_Length instead of explicit
9390 2011-08-01 Robert Dewar <dewar@adacore.com>
9392 * exp_ch4.adb, sem_cat.adb: Minor reformatting.
9394 2011-08-01 Geert Bosch <bosch@adacore.com>
9396 * atree.ads: Fix comment.
9398 2011-08-01 Robert Dewar <dewar@adacore.com>
9400 * aspects.ads, aspects.adb (Aspect_Names): Moved from body to spec.
9401 * par-ch13.adb (P_Aspect_Specifications): Check misspelled aspect name.
9402 * par.adb: Add with for Namet.Sp.
9403 * par-tchk.adb: Minor reformatting.
9405 2011-08-01 Vincent Celier <celier@adacore.com>
9407 * mlib-tgt-specific-vms-alpha.adb, mlib-tgt-specific-vms-ia64.adb
9408 (Build_Dynamic_Library): Use new function Init_Proc_Name to get the name
9409 of the init procedure of a SAL.
9410 * mlib-tgt-vms_common.ads, mlib-tgt-vms_common.adb (Init_Proc_Name):
9413 2011-08-01 Thomas Quinot <quinot@adacore.com>
9415 * exp_ch4.adb, s-tasini.ads, sem_attr.adb, s-soflin.ads: Minor
9418 2011-08-01 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
9420 * adaint.c (__gnat_file_time_name_attr): Get rid of warning.
9422 2011-08-01 Thomas Quinot <quinot@adacore.com>
9424 * sem_util.adb, sem_util.ads (Has_Overriding_Initialize): Make function
9425 conformant with its spec (return True only for types that have
9426 an overriding Initialize primitive operation that prevents them from
9427 having preelaborable initialization).
9428 * sem_cat.adb (Validate_Object_Declaration): Fix test for preelaborable
9429 initialization for controlled types in Ada 2005 or later mode.
9431 2011-08-01 Robert Dewar <dewar@adacore.com>
9433 * aspects.ads, aspects.adb: Add aspect Type_Invariant, Precondition,
9435 (Same_Aspect): New function.
9436 * sem_ch13.adb (Analyze_Aspect_Specifications): Add aspect
9437 Type_Invariant, Precondition, Postcondition.
9438 * snames.ads-tmpl: Add Name_Type_Invariant.
9440 2011-08-01 Robert Dewar <dewar@adacore.com>
9442 * freeze.adb (Freeze_Entity): Don't call Check_Aspect_At_Freeze_Point
9444 (Freeze_All_Ent): Fix error in handling inherited aspects.
9445 * sem_ch13.adb (Analyze_Aspect_Specifications): Skip aspect that is
9446 already analyzed, but don't skip entire processing of a declaration,
9447 that's wrong in some cases of declarations being rewritten.
9448 (Analyze_Aspect_Specification): Set Is_Delayed_Aspect in aspects.
9449 Don't delay for integer, string literals
9450 Treat predicates in usual manner for delay, remove special case code,
9452 (Analyze_Freeze_Entity): Make call to Check_Aspect_At_Freeze_Point
9453 (Build_Predicate_Function): Update saved expression in aspect
9454 (Build_Invariant_Procedure): Update saved expression in aspect
9455 * exp_ch4.adb (Expand_N_Selected_Component): Only do the optimization
9456 of replacement of discriminant references if the reference is simple.
9458 2011-08-01 Robert Dewar <dewar@adacore.com>
9460 * aspects.ads, aspects.adb: Add Static_Predicate and Dynamic_Predicate.
9461 * sem_ch13.adb (Analyze_Aspect_Specification): Add processing for
9462 Static_Predicate and Dynamic_Predicate.
9463 (Build_Predicate_Function): Add processing for Static_Predicate
9464 and Dynamic_Predicate.
9465 * sinfo.ads, sinfo.adb (From_Dynamic_Predicate): New flag
9466 (From_Static_Predicate): New flag
9467 * snames.ads-tmpl: Add Name_Static_Predicate and Name_Dynamic_Predicate
9469 2011-08-01 Robert Dewar <dewar@adacore.com>
9471 * usage.adb: Documentation cleanup for Ada version modes in usage.
9472 * expander.adb: Minor reformatting.
9474 2011-08-01 Robert Dewar <dewar@adacore.com>
9476 * atree.ads: Minor comment fix.
9477 * a-stwifi.adb, a-stzfix.adb, a-strfix.adb, a-ztexio.ads, a-textio.ads,
9478 a-witeio.ads, sem_prag.adb: Minor reformatting.
9480 2011-08-01 Doug Rupp <rupp@adacore.com>
9482 * env.c (__gnat_setenv) [VMS]: Force 32bit on item list structure
9483 pointers. Use descrip.h header file for convenience. Add some
9486 2011-08-01 Robert Dewar <dewar@adacore.com>
9488 * freeze.adb (Freeze_Entity): Call Check_Aspect_At_Freeze_Point
9489 (Freeze_All): Call Check_Aspect_At_End_Of_Declarations
9490 * sem_ch13.ads, sem_ch13.adb (Check_Aspect_At_Freeze_Point):
9492 (Check_Aspect_At_End_Of_Declarations): New procedure
9493 (Analye_Aspect_Specification): Minor changes for above procedures
9494 * sinfo.ads, sinfo.adb (Is_Delayed_Aspect): Now set in aspect
9495 specification node as well.
9497 2011-08-01 Pascal Obry <obry@adacore.com>
9499 * adaint.c (_gnat_stat): GetFilesAttributesEx() would fail on special
9500 Windows files. Use GetFilesAttributes() in this case to check for file
9501 existence instead of returning with an error code.
9503 2011-08-01 Vincent Celier <celier@adacore.com>
9505 * a-stzfix.adb, a-stwifi.adb (Replace_Slice): Fixed computation when
9506 High is above Source length.
9508 2011-08-01 Robert Dewar <dewar@adacore.com>
9510 * a-ztexio.ads, a-textio.ads, a-witeio.ads: Fix comment.
9512 2011-08-01 Robert Dewar <dewar@adacore.com>
9514 * aspects.ads (Boolean_Aspects): New subtype.
9515 * exp_ch13.adb (Expand_Freeze_Entity): Fix errors in handling aspects
9516 for derived types in cases where the parent type and derived type have
9518 * freeze.adb (Freeze_Entity): Fix problems in handling derived type
9519 with aspects when parent type also has aspects.
9520 (Freeze_Entity): Deal with delay of boolean aspects (must evaluate
9521 boolean expression at this point).
9522 * sem_ch13.adb (Analyze_Aspect_Specifications): Delay all aspects in
9523 accordance with final decision on the Ada 2012 feature.
9524 * sinfo.ads, sinfo.adb (Is_Boolean_Aspect): New flag.
9526 2011-08-01 Matthew Heaney <heaney@adacore.com>
9528 * a-chtgbo.adb (Delete_Node_Sans_Free): Replace iterator with selector.
9530 2011-08-01 Pascal Obry <obry@adacore.com>
9532 * a-stzunb-shared.adb, a-strunb-shared.adb, a-stwiun-shared.adb:
9533 Fix Replace_Slice when High is above current string size.
9534 (Replace_Slice): Fix DL computation when High is above current
9537 2011-08-01 Gary Dismukes <dismukes@adacore.com>
9539 * gnat_rm.texi: Add documentation for pragma Static_Elaboration_Desired.
9541 2011-08-01 Matthew Heaney <heaney@adacore.com>
9543 * a-rbtgbo.adb (Delete_Node_Sans_Free): Fixed assignment to left child
9546 2011-08-01 Pascal Obry <obry@adacore.com>
9548 * a-stzunb-shared.adb, a-strunb-shared.adb, a-stwiun-shared.adb: Minor
9551 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9553 * sem_attr.adb (Analyze_Attribute, case 'Access): Handle properly named
9554 access to protected subprograms in generic bodies.
9555 * sem_ch6.adb (Analyze_Subprogram_Declaration): If the context is a
9556 protected type, indicate that the convention of the subprogram is
9557 Convention_Protected, because it may be used in subsequent declarations
9558 within the protected declaration.
9560 2011-08-01 Vincent Celier <celier@adacore.com>
9562 * mlib-prj.adb (Build_Library): Use "ada_" as the prefix for the "init"
9563 and "final" procedures when the name of the library is "ada", to avoid
9564 duplicate symbols "adainit" and "adafinal" in executables.
9566 2011-08-01 Ed Schonberg <schonberg@adacore.com>
9568 * sem_attr.adb (Analyze_Attribute, case 'Result): Handle properly a
9569 quantified expression that appears within a postcondition and uses the
9570 Ada2012 'Result attribute.
9572 2011-07-28 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
9574 * init.c (__gnat_error_handler): Cast reason to int.
9575 (__gnat_install_handler): Explain sa_sigaction use.
9577 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
9579 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: If the
9580 subprogram has copy-in copy-out parameters, try to promote the mode of
9581 the return type if it is passed in registers.
9583 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
9585 * gcc-interface/utils2.c (build_binary_op) <ARRAY_REF>: Do not mark the
9586 left operand as addressable.
9588 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
9590 * gcc-interface/gigi.h (build_function_stub): Remove.
9591 (build_return_expr): Likewise.
9592 (convert_vms_descriptor): Declare.
9593 * gcc-interface/utils.c (convert_vms_descriptor): Make global.
9594 (build_function_stub): Move to...
9595 * gcc-interface/utils2.c (build_return_expr): Move to...
9596 * gcc-interface/trans.c (build_function_stub): ...here.
9597 (build_return_expr): ...here.
9598 (Subprogram_Body_to_gnu): Add local variable for language_function.
9599 Disconnect the parameter attributes cache, if any, once done with it.
9600 Call end_subprog_body only after setting the end_locus.
9601 Build the stub associated with the function, if any, at the very end.
9602 (gnat_to_gnu) <N_Return_Statement>: Remove couple of useless local
9603 variables and streamline control flow.
9605 2011-07-23 Arnaud Charlet <charlet@adacore.com>
9608 * gcc-interface/Makefile.in (powerpc-linux): Remove reference to
9611 2011-07-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
9614 * init.c [sun && __SVR4 && !__vxworks] (__gnat_install_handler):
9615 Assign to act.sa_sigaction.
9616 * tracebak.c [USE_GENERIC_UNWINDER] (__gnat_backtrace): Cast
9617 current->return_address to char * before arithmetic.
9619 2011-07-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
9621 * init.c [sgi] (__gnat_error_handler): Update sigaction(2) citation.
9622 Correct argument types.
9623 Extract code from reason.
9624 (__gnat_install_handler): Assign to act.sa_sigaction.
9626 2011-07-21 Eric Botcazou <ebotcazou@adacore.com>
9628 * gcc-interface/Make-lang.in (GNAT1_ADA_OBJS): Move ada/b_gnat1.o to...
9629 (GNAT1_OBJS): ...here.
9631 2011-07-15 Eric Botcazou <ebotcazou@adacore.com>
9634 * g-socthi-mingw.adb (Fill): Fix formatting.
9636 * gcc-interface/gigi.h: Move around comment.
9638 2011-07-14 John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
9641 * s-taprop-hpux-dce.adb (Abort_Task): Remove unnecessary cast.
9643 2011-07-14 Florian Weimer <fw@deneb.enyo.de>
9646 * g-socthi-mingw.adb (Fill): Guard against invalid MSG_WAITALL.
9648 2011-07-13 Eric Botcazou <ebotcazou@adacore.com>
9650 * gcc-interface/utils.c (build_vms_descriptor32): Skip the 32-bit
9651 range comparison if Pmode is SImode.
9653 2011-07-12 Laurent GUERBY <laurent@guerby.net>
9654 Eric Botcazou <ebotcazou@adacore.com>
9656 * adadecode.c: Wrap up in extern "C" block.
9657 * adadecode.h: Likewise.
9658 * adaint.c: Likewise. Remove 'const' keyword.
9659 * adaint.h: Likewise.
9661 * atree.h: Likewise.
9663 * cstreams.c: Likewise.
9667 * final.c: Likewise.
9669 * initialize.c: Likewise.
9671 * namet.h: Likewise.
9672 * nlists.h: Likewise.
9673 * raise.c: Likewise.
9674 * raise.h: Likewise.
9675 * repinfo.h: Likewise.
9676 * seh_init.c: Likewise.
9677 * targext.c: Likewise.
9678 * tracebak.c: Likewise.
9679 * uintp.h: Likewise.
9680 * urealp.h: Likewise.
9681 * xeinfo.adb: Wrap up generated C code in extern "C" block.
9682 * xsinfo.adb: Likewise.
9683 * xsnamest.adb: Likewise.
9684 * gcc-interface/gadaint.h: Wrap up in extern "C" block.
9685 * gcc-interface/gigi.h: Wrap up some prototypes in extern "C" block.
9686 * gcc-interface/misc.c: Likewise.
9687 * gcc-interface/Make-lang.in (GCC_LINK): Use LINKER.
9688 (GNAT1_C_OBJS): Remove ada/b_gnat1.o. List ada/seh_init.o and
9689 ada/targext.o here...
9690 (GNAT_ADA_OBJS): ...and not here.
9691 (GNAT1_ADA_OBJS): Add ada/b_gnat1.o.
9692 (GNATBIND_OBJS): Reorder.
9694 2011-07-07 Richard Henderson <rth@redhat.com>
9696 * gcc-interface/misc.c (gnat_init_gcc_eh): Don't call
9697 dwarf2out_frame_init.
9699 2011-07-07 Eric Botcazou <ebotcazou@adacore.com>
9701 * gcc-interface/misc.c (gnat_init): Tweak previous change.
9703 2011-07-07 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
9706 * gcc-interface/Makefile.in: Handle x86_64-solaris2.
9708 2011-07-06 Richard Guenther <rguenther@suse.de>
9710 * gcc-interface/misc.c (gnat_init): Merge calls to
9711 build_common_tree_nodes and build_common_tree_nodes_2.
9712 Re-initialize boolean_false_node.
9714 2011-07-02 Eric Botcazou <ebotcazou@adacore.com>
9715 Olivier Hainque <hainque@adacore.com>
9716 Nicolas Setton <setton@adacore.com>
9718 * gcc-interface/utils.c (record_builtin_type): Set TYPE_ARTIFICIAL on
9719 the type according to the ARTIFICIAL_P parameter.
9720 (create_type_decl): Likewise.
9721 (create_type_stub_decl): Set TYPE_ARTIFICIAL on the type to 1.
9723 2011-07-01 Eric Botcazou <ebotcazou@adacore.com>
9725 * gcc-interface/Make-lang.in (gnat1): Prepend '+' to the command.
9726 (gnatbind): Likewise.
9728 2011-06-29 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
9730 * gcc-interface/Makefile.in (TOOLS_LIBS): Add $(LIBINTL).
9732 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
9734 * gcc-interface/decl.c (gnat_to_gnu_component_type): Use GNAT_TYPE
9735 local variable throughout. Remove useless call to Base_Type.
9736 (gnat_to_gnu_field): Use GNAT_FIELD_TYPE local variable throughout.
9737 Take it also into account for the volatileness of the field. Set the
9738 TREE_SIDE_EFFECTS flag as well in this case. Reorder some warnings.
9740 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
9742 * gcc-interface/trans.c (Identifier_to_gnu): Don't set TREE_THIS_NOTRAP
9743 on a dereference built for a by-ref object if it has an address clause.
9745 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
9747 * einfo.ads (Address_Taken): Document use for the second argument of
9748 Asm_Input and Asm_Output attributes.
9749 * sem_attr.adb (Analyze_Attribute) <Attribute_Asm_Input>: If the second
9750 argument is an entity name, then set Address_Taken on it.
9751 <Attribute_Asm_Output>: Likewise.
9752 * gcc-interface/trans.c (lvalue_required_for_attribute_p): Handle the
9753 Attr_Asm_Input and Attr_Asm_Output attributes explicitly.
9754 (gnat_to_gnu) <N_Code_Statement>: If an operand is going to end up in
9755 memory and is a CONST_DECL, retrieve its corresponding VAR_DECL.
9757 2011-06-16 Joern Rennecke <joern.rennecke@embecosm.com>
9760 * gcc-interface/decl.c (gnat_to_gnu_param): Use pack_cumulative_args.
9762 2011-06-14 Joseph Myers <joseph@codesourcery.com>
9764 * gcc-interface/Make-lang.in (gnatbind$(exeext)): Use ggc-none.o.
9765 (ada/utils.o): Update dependencies.
9766 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Add
9767 ../../../libcpp/libcpp.a.
9768 * gcc-interface/utils.c: Include common/common-target.h.
9769 (process_attributes): Use targetm_common.have_named_sections.
9771 2011-06-07 Richard Guenther <rguenther@suse.de>
9773 * gcc-interface/misc.c (gnat_init): Do not set size_type_node or call
9776 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
9778 * gcc-interface/utils2.c (gnat_stabilize_reference): Propagate the
9779 TREE_THIS_NOTRAP flag.
9781 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
9783 * gcc-interface/utils2.c (gnat_stabilize_reference) <COMPOUND_EXPR>:
9786 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
9788 * gcc-interface/trans.c (Identifier_to_gnu): Also handle deferred
9789 constants whose full view has discriminants specially.
9791 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
9793 * gcc-interface/utils.c: Include diagnostic.h.
9794 (gnat_write_global_declarations): Output debug information for all
9795 global type declarations before finalizing the compilation unit.
9796 * gcc-interface/Make-lang.in (ada/utils.o): Add dependency.
9798 2011-05-25 Jakub Jelinek <jakub@redhat.com>
9800 * gcc-interface/utils.c (def_fn_type): Remove extra va_end.
9802 2011-05-25 Kai Tietz <ktietz@redhat.com>
9804 * adaint.c (__gnat_to_canonical_file_list_next): Use array
9805 initialization instead of const/none-const pointer assignment.
9807 2011-05-24 Joseph Myers <joseph@codesourcery.com>
9809 * gcc-interface/Make-lang.in (GNAT1_OBJS): Don't include
9810 $(EXTRA_GNAT1_OBJS).
9811 (GNATBIND_OBJS): Don't include $(EXTRA_GNATBIND_OBJS).
9812 (EXTRA_GNAT1_OBJS, EXTRA_GNATBIND_OBJS): Remove.
9813 (gnat1$(exeext), gnatbind$(exeext)): Use libcommon-target.a.
9814 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Use
9815 libcommon-target.a instead of prefix.o.
9817 2011-05-21 Joseph Myers <joseph@codesourcery.com>
9820 * gcc-interface/Make-lang.in (gnatbind$(exeext)): Depend on $(LIBDEPS).
9822 2011-05-20 Joseph Myers <joseph@codesourcery.com>
9824 * gcc-interface/Make-lang.in (EXTRA_GNATBIND_OBJS): Remove version.o.
9825 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Use libcommon.a
9826 instead of version.o.
9828 2011-05-18 Kai Tietz <ktietz@redhat.com>
9830 * gcc-interface/trans.c (Exception_Handler_to_gnu_sjlj): Use
9831 boolean_false_node instead of integer_zero_node.
9832 (convert_with_check): Likewise.
9833 * gcc-interface/decl.c (choices_to_gnu): Likewise.
9835 2011-05-12 Eric Botcazou <ebotcazou@adacore.com>
9837 * gcc-interface/trans.c (call_to_gnu): In the by-reference case, if the
9838 type of the parameter is an unconstrained array, convert the actual to
9839 the type of the formal in the In Out and Out cases as well.
9841 2011-05-11 Nathan Froyd <froydnj@codesourcery.com>
9843 * gcc-interface/utils.c (def_fn_type): Don't call build_function_type;
9844 call build_function_type_array or build_varargs_function_type_array
9846 (create_subprog_type): Don't call build_function_type; call
9847 build_function_type_vec instead.
9849 2011-05-11 Nathan Froyd <froydnj@codesourcery.com>
9851 * gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE): Use TYPE_MINVAL.
9852 (TYPE_GCC_MIN_VALUE): Use TYPE_MINVAL.
9853 (TYPE_GCC_MAX_VALUE): Use TYPE_MAXVAL.
9855 2011-05-07 Eric Botcazou <ebotcazou@adacore.com>
9857 * gcc-interface/decl.c (intrin_arglists_compatible_p): Remove spaces.
9859 * gcc-interface/gigi.h (global_bindings_p): Adjust prototype.
9860 * gcc-interface/utils.c (global_bindings_p): Return bool and simplify.
9862 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
9864 * gcc-interface/trans.c (Case_Statement_to_gnu): Call build_case_label.
9866 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
9868 * gcc-interface/decl.c (intrin_arglists_compatible_p): Use iterators
9869 instead of accessing TYPE_ARG_TYPES directly.
9870 * gcc-interface/utils.c (handle_nonnull_attribute): Likewise.
9872 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
9875 * gcc-interface/gigi.h (get_variant_part): Declare.
9876 * gcc-interface/decl.c (get_variant_part): Make global.
9877 * gcc-interface/utils2.c (find_common_type): Do not return T1 if the
9878 types have the same constant size, are record types and T1 has a
9879 variant part while T2 doesn't.
9881 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
9883 * gcc-interface/utils.c (begin_subprog_body): Do not call
9885 (end_subprog_body): Likewise.
9887 2011-05-04 Richard Guenther <rguenther@suse.de>
9889 * gcc-interface/trans.c (gnat_to_gnu): Remove zero notrunc argument to
9891 (pos_to_constructor): Likewise.
9893 2011-05-03 Nathan Froyd <froydnj@codesourcery.com>
9894 Eric Botcazou <ebotcazou@adacore.com>
9896 * gcc-interface/trans.c (gigi): Call build_function_type_list instead
9897 of build_function_type. Adjust calls to...
9898 (build_raise_check): ...this. Do not take a void_tree parameter.
9899 Call build_function_type_list instead of build_function_type.
9900 Fix head comment and swap couple of conditional blocks.
9902 2011-04-30 Eric Botcazou <ebotcazou@adacore.com>
9904 * gnatvsn.ads (Library_Version): Bump to 4.7.
9905 (Current_Year): Bump to 2011.
9907 2011-04-29 Michael Matz <matz@suse.de>
9909 * gcc-interface/misc.c (gnat_handle_option): Set
9910 warn_maybe_uninitialized.
9912 2011-04-23 Gerald Pfeifer <gerald@pfeifer.com>
9914 * gnat_ugn.texi (Complexity Metrics Control): Update link to
9915 the Watson/McCabe paper.
9917 2011-04-23 Jim Meyering <meyering@redhat.com>
9919 * gnat_ugn.texi (Examples of gnatxref Usage): Fix typo: s/it it/it is/
9921 2011-04-22 Eric Botcazou <ebotcazou@adacore.com>
9923 * gcc-interface/decl.c (make_packable_type): Copy DECL_PARALLEL_TYPE
9926 2011-04-22 Eric Botcazou <ebotcazou@adacore.com>
9928 * gcc-interface/gigi.h (create_subprog_decl): Add ARTIFICIAL_FLAG
9930 * gcc-interface/utils.c (create_subprog_decl): Likewise. Set
9931 DECL_ARTIFICIAL and DECL_NO_INLINE_WARNING_P on the DECL accordingly.
9932 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: Add
9933 ARTIFICIAL_FLAG local variable and pass it to create_subprog_decl.
9934 <all>: Do not set flags on the reused DECL node coming from an alias.
9935 Set DECL_IGNORED_P on the DECL node built for subprograms if they
9936 don't need debug info here...
9937 * gcc-interface/trans.c (Subprogram_Body_to_gnu): ...and not here.
9938 (gigi): Adjust calls to create_subprog_decl.
9939 (build_raise_check): Likewise.
9940 (establish_gnat_vms_condition_handler): Likewise.
9941 (Compilation_Unit_to_gnu): Likewise.
9942 (gnat_to_gnu): Likewise.
9944 2011-04-21 Eric Botcazou <ebotcazou@adacore.com>
9946 * gcc-interface/Makefile.in (NO_SIBLING_ADAFLAGS): Always define.
9947 (NO_REORDER_ADAFLAGS): New variable.
9948 (EXTRA_GNATTOOLS): Always define.
9949 (../stamp-gnatlib1-$(RTSDIR): Copy tsystem.h.
9950 Clean up and adjust list of files compiled with special options.
9951 * gcc-interface/Make-lang.in: Likewise.
9952 (ada/decl.o): Cosmetical change.
9953 (ada/misc.o): Remove dependency on $(PLUGIN_H).
9955 2011-04-20 Jim Meyering <meyering@redhat.com>
9957 * initialize.c (__gnat_initialize): Remove useless if-before-free.
9959 2011-04-17 Eric Botcazou <ebotcazou@adacore.com>
9961 * gcc-interface/Make-lang.in (gnatbind): Replace $(ALL_CFLAGS) with
9962 $(CFLAGS) on the link line.
9964 2011-04-17 Eric Botcazou <ebotcazou@adacore.com>
9966 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Function>: Declare the
9967 padded type built for the return type if it is unconstrained.
9969 2011-04-14 Nathan Froyd <froydnj@codesourcery.com>
9971 * gcc-interface/utils.c (gnat_poplevel): Use block_chainon.
9973 2011-04-12 Nathan Froyd <froydnj@codesourcery.com>
9975 * gcc-interface/ada-tree.h (union lang_tree_node): Check for TS_COMMON
9976 before calling TREE_CHAIN.
9977 * gcc-interface/misc.c (gnat_init_ts): New function.
9978 (LANG_HOOKS_INIT_TS): Define.
9980 2011-04-12 Martin Jambor <mjambor@suse.cz>
9982 * gcc-interface/utils.c (end_subprog_body): Call cgraph_get_create_node
9983 instead of cgraph_node.
9985 2011-04-08 Eric Botcazou <ebotcazou@adacore.com>
9987 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Procedure>: Set minimum
9988 alignment on fields of the RETURN type built for the Copy-In Copy-Out
9991 2011-04-08 Eric Botcazou <ebotcazou@adacore.com>
9993 * gcc-interface/trans.c (Identifier_to_gnu): Do not return initializers
9994 of aggregate types that contain a placeholder.
9996 2011-04-08 Nathan Froyd <froydnj@codesourcery.com>
9998 * gcc-interface/utils.c (handle_sentinel_attribute): Don't use
10000 (handle_type_generic_attribute): Likewise.
10002 2011-04-04 Eric Botcazou <ebotcazou@adacore.com>
10005 * s-oscons-tmplt.c (MSG_WAITALL): Fix thinko in previous change.
10007 2011-04-04 Kai Tietz <ktietz@redhat.com>
10010 * s-oscons-tmplt.c (MSG_WAITALL): Define it for native windows targets
10013 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10015 * gcc-interface/utils2.c (build_allocator): In the unconstrained array
10016 type case, do not strip a padding type around the array type.
10018 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10020 * gcc-interface/utils.c (update_pointer_to): Finalize named pointer
10023 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10025 * gcc-interface/lang.opt (feliminate-unused-debug-types): Delete.
10026 * gcc-interface/misc.c (gnat_handle_option): Remove special handling
10027 code for -feliminate-unused-debug-types.
10028 (gnat_post_options): Likewise.
10030 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10032 * gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
10033 declaration of a pointer type, then set DECL_ORIGINAL_TYPE to a
10036 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10038 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not force the
10039 DECL_ARTIFICIAL flag on enumeration types.
10041 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10043 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Do not make
10044 fat pointer types artificial unconditionally.
10045 <E_Array_Subtype>: Attach the base array type as a parallel type if it
10048 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10050 * gcc-interface/gigi.h (get_dummy_type): Declare.
10051 (build_dummy_unc_pointer_types): Likewise.
10052 (finish_fat_pointer_type): Likewise.
10053 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: If a dummy
10054 fat pointer type has been built, complete it in place.
10055 <E_Access_Type>: Call build_dummy_unc_pointer_types to build dummy fat
10056 and thin pointers. Remove useless variable.
10057 (finish_fat_pointer_type): Make global and move to...
10058 * gcc-interface/utils.c (finish_fat_pointer_type): ...here.
10059 (get_dummy_type): New function.
10060 (build_dummy_unc_pointer_types): Likewise.
10061 (gnat_pushdecl): Propage the name to the anonymous variants only.
10062 (update_pointer_to): Only adjust the pointer types in the unconstrained
10065 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10067 * gcc-interface/ada-tree.h (DECL_TAFT_TYPE_P): New flag.
10068 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Incomplete_Type>: Set it
10069 if this is a Taft amendment type and the full declaration is available.
10070 * gcc-interface/trans.c (process_type): Likewise.
10071 If there is an old type, mark the new one as used if DECL_TAFT_TYPE_P.
10072 (process_freeze_entity): Likewise.
10073 * gcc-interface/utils.c (dummy_global): New static variable.
10074 (gnat_write_global_declarations): If there are types declared as used
10075 at the global level, insert them in the global hash table.
10077 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10079 * gcc-interface/gigi.h (record_builtin_type): Add ARTIFICIAL_P param.
10080 * gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
10081 declaration of an array type, then set DECL_ORIGINAL_TYPE to a distinct
10083 (record_builtin_type): Add ARTIFICIAL_P parameter. Set DECL_ARTIFICIAL
10084 flag of the type accordingly.
10085 * gcc-interface/trans.c (gigi): Adjust calls to record_builtin_type.
10087 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
10089 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Defer
10090 finalizing types when updating the pointers to the designated type.
10091 <all>: Finalize the deferred types even if we didn't defer processing
10092 of incomplete types in this invocation.
10094 2011-04-01 Olivier Hainque <hainque@adacore.com>
10095 Nicolas Setton <setton@adacore.com>
10096 Eric Botcazou <ebotcazou@adacore.com>
10098 * gcc-interface/misc.c (gnat_descriptive_type): New function.
10099 (LANG_HOOKS_DESCRIPTIVE_TYPE): Redefine to gnat_descriptive_type.
10101 2011-03-28 Kai Tietz <ktietz@redhat.com>
10103 * gcc-interface/Makefile.in (SO_LIB): Handle multilib build for native
10105 (EH_MECHANISM): Use GCC exception mechanism for native Windows targets.
10106 * system-mingw.ads (System): Change ZCX_By_Default default to True.
10108 * raise-gcc.c (PERSONALITY_FUNCTION): Add prototype.
10110 2011-03-28 Tristan Gingold <gingold@adacore.com>
10113 * gcc-interface/Make-lang.in (ada/b_gnat1.adb): Replace ada/b_gnat1.c.
10114 Use ada output of gnatbind.
10115 (ada/b_gnatb.adb): Ditto.
10116 (ada/b_gnat1.o, ada/b_gnatb.o): New rules.
10117 (ada.mostlyclean, ada.stage1)
10118 (ada.stage2, ada.stage3, ada.stage4, ada.stageprofile)
10119 (ada.stagefeedback): Adjust.
10120 * gcc-interface/Makefile.in (b_gnatl.adb): Replace b_gnatl.c.
10121 Use ada output of gnatbind.
10122 (b_gnatm.adb): Ditto.
10123 (b_gnatl.o, b_gnatm.o): New rules.
10125 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
10127 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Create TYPE_DECL
10128 for the padded type built to support a specified size or alignment.
10130 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
10132 * gcc-interface/gigi.h (finalize_from_with_types): Adjust comment.
10133 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Defer
10134 unconditionally to the end of the unit when the designated type is
10136 <all>: Rename local variable. Attempt to un-defer types only and do it
10137 for limited_with'ed types as well.
10138 (finalize_from_with_types): Adjust comment. Rename variable and tidy.
10139 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Use GNAT_UNIT
10140 consistently and remove redundant call to finalize_from_with_types.
10142 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
10144 * inline.adb (Back_End_Cannot_Inline): Lift restriction on calls to
10145 subprograms without a previous spec declared in the same unit.
10146 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Process inlined
10147 subprograms at the end of the unit instead of at the beginning.
10148 * gcc-interface/utils.c (create_subprog_decl): Check that the entity
10149 isn't public for the special handling of non-inline functions nested
10150 inside inline external functions.
10152 2011-03-25 Jeff Law <law@redhat.com>
10154 * gcc-interface/utils.c (def_fn_type): Add missing va_end.
10156 2011-03-24 Eric Botcazou <ebotcazou@adacore.com>
10158 * einfo.ads (Size_Depends_On_Discriminant): Adjust description.
10159 * layout.adb (Compute_Size_Depends_On_Discriminant): New procedure
10160 to compute Set_Size_Depends_On_Discriminant.
10161 (Layout_Type): Call it on array types in back-end layout mode.
10162 * sem_util.adb (Requires_Transient_Scope): Return true for array
10163 types only if the size depends on the value of discriminants.
10164 * gcc-interface/utils2.c (build_binary_op) <MODIFY_EXPR>: Use the RHS
10165 type if the RHS is a call to a function that returns an unconstrained
10166 type with default discriminant.
10168 2011-03-24 Eric Botcazou <ebotcazou@adacore.com>
10170 * gcc-interface/trans.c (gnat_to_gnu): Remove obsolete case of
10171 non-conversion to the nominal result type at the end.
10173 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
10175 * gcc-interface/trans.c (create_temporary): New function taken from...
10176 (create_init_temporary): ...here. Call it.
10177 (call_to_gnu): Create the temporary for the return value early, if any.
10178 Create it for a function with copy-in/copy-out parameters if there is
10179 no target; in other cases of copy-in/copy-out, use another temporary.
10180 Push the new binding level lazily. Add and rename local variables.
10182 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
10184 * gcc-interface/decl.c (validate_size): Improve comments and tweak
10186 (set_rm_size): Likewise.
10188 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
10190 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Create TYPE_DECL
10191 for the padded type built in order to support a specified alignment.
10192 Fix incorrect formatting.
10194 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
10197 * gcc-interface/decl.c (elaborate_expression_1): Localize GNU_DECL.
10199 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
10201 * gcc-interface/decl.c (components_to_record): Add REORDER parameter,
10202 rename DEBUG_INFO_P into DEBUG_INFO and move P_GNU_REP_LIST parameter
10203 to the end of the list. Adjust recursive call. Rename local variable.
10204 If REORDER is true, reorder components of the record type.
10205 (gnat_to_gnu_entity): Pass OK_To_Reorder_Components flag as argument to
10206 components_to_record and adjust the parameter list.
10208 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
10210 * gcc-interface/decl.c (elaborate_expression_1): When optimization is
10211 disabled, use the variable for bounds of loop iteration scheme.
10213 2011-03-21 Kai Tietz <ktietz@redhat.com>
10216 * gcc-interface/utils.c (gnat_internal_attribute_table): Add column.
10218 2011-03-17 Eric Botcazou <ebotcazou@adacore.com>
10220 * gcc-interface/decl.c (elaborate_expression_1): Try harder to find
10221 out whether the expression is read-only. Short-circuit placeholder
10222 case and rename a couple of local variables.
10224 2011-03-17 Eric Botcazou <ebotcazou@adacore.com>
10226 * gcc-interface/gigi.h (smaller_form_type_p): Declare.
10227 * gcc-interface/trans.c (smaller_form_type_p): Make global and move...
10228 * gcc-interface/utils.c (smaller_form_type_p): ...to here.
10229 (convert): Deal with conversions from a smaller form type specially.
10231 2011-02-14 Eric Botcazou <ebotcazou@adacore.com>
10233 * gcc-interface/misc.c (gnat_init_options): Do not concatenate -I and
10234 its argument, except for the special -I- switch.
10236 2011-02-12 Gerald Pfeifer <gerald@pfeifer.com>
10238 * gnat_ugn.texi (Compiling Different Versions of Ada): Update link to
10241 2011-02-08 Eric Botcazou <ebotcazou@adacore.com>
10243 * gcc-interface/Makefile.in (x86-64 darwin): Handle multilibs.
10245 2011-02-03 Eric Botcazou <ebotcazou@adacore.com>
10247 * gcc-interface/gigi.h (fill_vms_descriptor): Take GNU_TYPE instead of
10249 * gcc-interface/utils2.c (fill_vms_descriptor): Move from here to...
10250 * gcc-interface/utils.c (fill_vms_descriptor): ...here. Take GNU_TYPE
10251 instead of GNAT_FORMAL. Protect the expression against multiple uses.
10252 Do not generate the check directly, instead instantiate the template
10253 check present in the descriptor.
10254 (make_descriptor_field): Move around.
10255 (build_vms_descriptor32): Build a template check in the POINTER field.
10256 (build_vms_descriptor): Remove useless suffixes.
10257 * gcc-interface/trans.c (call_to_gnu): Adjust fill_vms_descriptor call.
10259 2011-01-26 Eric Botcazou <ebotcazou@adacore.com>
10262 * targext.c: Include target files if IN_RTS is defined.
10264 2011-01-26 Richard Guenther <rguenther@suse.de>
10267 * targext.c: Include config.h.
10268 * gcc-interface/Make-lang.in (ada/targext.o): Add $(CONFIG_H)
10271 2011-01-04 Pascal Obry <obry@adacore.com>
10272 Eric Botcazou <ebotcazou@adacore.com>
10274 * gcc-interface/decl.c: Disable Stdcall convention handling for 64-bit.
10276 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
10278 * gcc-interface/trans.c (Case_Statement_to_gnu): Put the SLOC of the
10279 end-of-case on the end label and its associated gotos, if any.
10281 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
10283 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Evaluate the
10284 expressions of the parameter cache within the statement group of
10285 the CICO mechanism.
10287 2011-01-04 Olivier Hainque <hainque@adacore.com>
10288 Eric Botcazou <ebotcazou@adacore.com>
10290 * gcc-interface/trans.c (BLOCK_SOURCE_END_LOCATION): Provide default.
10291 (set_end_locus_from_node): New function.
10292 (Subprogram_Body_to_gnu): Use it to mark both the inner BIND_EXPR we
10293 make and the function end_locus.
10294 (Compilation_Unit_to_gnu): Call it instead of a straight Sloc_to_locus
10295 for the elaboration subprogram.
10296 (set_gnu_expr_location_from_node) <default case>: Use it to attempt to
10297 set the end_locus of the expression as well.
10299 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
10302 * gcc-interface/trans.c (Identifier_to_gnu): In SJLJ mode, do not make
10303 variables that are referenced in exception handlers volatile.
10307 Copyright (C) 2011 Free Software Foundation, Inc.
10309 Copying and distribution of this file, with or without modification,
10310 are permitted in any medium without royalty provided the copyright
10311 notice and this notice are preserved.