1 2011-08-30 Javier Miranda <miranda@adacore.com>
3 * exp_ch3.adb (Make_Eq_If): If the etype of the _parent component is an
4 interface type then do not generate code to compare this component.
5 Required since they have no components and their equality operator is
8 2011-08-30 Steve Baird <baird@adacore.com>
10 * sem_util.ads (Deepest_Type_Access_Level): New function; for the type
11 of a saooaaat (i.e, a stand-alone object of an anonymous access type),
12 returns the (static) accessibility level of the object. Otherwise, the
13 same as Type_Access_Level.
14 (Dynamic_Accessibility_Level): New function; given an expression which
15 could occur as the rhs of an assignment to a saooaaat (i.e., an
16 expression of an access-to-object type), return the new value for the
17 saooaaat's associated Extra_Accessibility object.
18 (Effective_Extra_Accessibility): New function; same as
19 Einfo.Extra_Accessibility except that object renames are looked through.
21 (Deepest_Type_Access_Level): New function; see sem_util.ads description.
22 (Dynamic_Accessibility_Level): New function; see sem_util.ads
24 (Effective_Extra_Accessibility): New function; see sem_util.ads
26 * einfo.ads (Is_Local_Anonymous_Access): Update comments.
27 (Extra_Accessibility): Update comments.
28 (Init_Object_Size_Align): New procedure; same as Init_Size_Align
29 except RM_Size field (which is only for types) is unaffected.
31 (Extra_Accessibility): Expand domain to allow objects, not just formals.
32 (Set_Extra_Accessibility): Expand domain to allow objects, not just
34 (Init_Size): Add assertion that we are not trashing the
35 Extra_Accessibility attribute of an object.
36 (Init_Size_Align): Add assertion that we are not trashing the
37 Extra_Accessibility attribute of an object.
38 (Init_Object_Size_Align): New procedure; see einfo.ads description.
39 * sem_ch3.adb (Find_Type_Of_Object): Set Is_Local_Anonymous_Access
40 differently for the type of a (non-library-level) saooaaat depending
41 whether Ada_Version < Ada_2012. This is the only point where Ada_Version
42 is queried in this set of changes - everything else (in particular,
43 setting of the Extra_Accessibility attribute in exp_ch3.adb) is
44 driven off of the setting of the Is_Local_Anonymous_Access attribute.
45 The special treatment of library-level saooaaats is an optimization,
46 not required for correctnesss. This is based on the observation that the
47 Ada2012 rules (static and dynamic) for saooaaats turn out to be
48 equivalent to the Ada2005 rules in the case of a library-level saooaaat.
50 (Expand_N_Object_Declaration): If Is_Local_Anonymous_Access is
51 false for the type of a saooaaat, declare and initialize its
52 accessibility level object and set the Extra_Accessibility attribute
53 of the saooaaat to refer to this object.
54 * checks.adb (Apply_Accessibility_Check): Add Ada 2012 saooaaat support.
55 * exp_ch4.adb (Expand_N_In): Replace some Extra_Accessibility calls with
56 calls to Effective_Extra_Accessibility in order to support
58 (Expand_N_Type_Conversion): Add new local function,
59 Has_Extra_Accessibility, and call it when determining whether an
60 accessibility check is needed.
61 It returns True iff Present (Effective_Extra_Accessibility (Id)) would
62 evaluate to True (without raising an exception).
64 (Expand_N_Assignment_Statement): When assigning to an Ada2012
65 saooaaat, update its associated Extra_Accessibility object (if
66 it has one). This includes an accessibility check.
67 * exp_ch6.adb (Add_Call_By_Copy_Code): When parameter copy-back updates
68 a saooaaat, update its Extra_Accessibility object too (if it
70 (Expand_Call): Replace a couple of calls to Type_Access_Level
71 with calls to Dynamic_Access_Level to handle cases where
72 passing a literal (any literal) is incorrect.
73 * sem_attr.adb (Resolve_Attribute): Handle the static accessibility
74 checks associated with "Saooaat := Some_Object'Access;"; this must
75 be rejected if Some_Object is declared in a more nested scope
77 * sem_ch5.adb (Analyze_Assignment): Force accessibility checking for an
78 assignment to a saooaaat even if Is_Local_Anonymous_Access
79 returns False for its type (indicating a 2012-style saooaaat).
81 (Analyze_Object_Renaming): Replace a call to Init_Size_Align
82 (which is only appropriate for objects, not types) with a call
83 of Init_Object_Size_Align in order to avoid trashing the
84 Extra_Accessibility attribute of a rename (the two attributes
87 (Valid_Conversion) Replace six calls to Type_Access_Level with
88 calls to Deepest_Type_Access_Level. This is a bit tricky. For an
89 Ada2012 non-library-level saooaaat, the former returns library level
90 while the latter returns the (static) accessibility level of the
91 saooaaat. A type conversion to the anonymous type of a saooaaat
92 can only occur as part of an assignment to the saooaaat, so we
93 know that such a conversion must be in a lhs context, so Deepest
94 yields the result that we need. If such a conversion could occur,
95 say, as the operand of an equality operator, then this might not
96 be right. Also add a test so that static accessibilty checks are
97 performed for converting to a saooaaat's type even if
98 Is_Local_Anonymous_Access yields False for the type.
100 2011-08-30 Javier Miranda <miranda@adacore.com>
102 * sem_disp.adb (Check_Dispatching_Operation): Complete condition that
103 controls generation of a warning associated with late declaration of
104 dispatching functions. Required to avoid generating spurious
107 2011-08-30 Gary Dismukes <dismukes@adacore.com>
109 * sem_ch6.adb (Check_Return_Subtype_Indication): Issue error if the
110 return object has an anonymous access type and the function's type is
112 * sem_ch8.adb (Analyze_Object_Renaming): Suppress error about renaming
113 conversions on implicit conversions, since such conversions can occur
114 for anonymous access cases due to expansion. Issue error for attempt
115 to rename an anonymous expression as an object of a named access type.
116 * sem_res.ads (Valid_Conversion): Add defaulted parameter Report_Errs,
117 to indicate whether this function should report errors on invalid
119 * sem_res.adb (Resolve): For Ada 2012, in the case where the type of
120 the expression is of an anonymous access type and the expected type is
121 a named general access type, rewrite the expression as a type
122 conversion, unless this is an expression of a membership test.
123 (Valid_Conversion.Error_Msg_N): New procedure that conditions the
124 calling of Error_Msg_N on new formal Report_Errs.
125 (Valid_Conversion.Error_Msg_NE): New procedure that conditions the
126 calling of Error_Msg_NE on new formal Report_Errs.
127 (Valid_Conversion): Move declaration of this function to the package
128 spec, to allow calls from membership test processing. For Ada 2012,
129 enforce legality restrictions on implicit conversions of anonymous
130 access values to general access types, disallowing such conversions in
131 cases where the expression has a dynamic accessibility level (access
132 parameters, stand-alone anonymous access objects, or a component of a
133 dereference of one of the first two cases).
134 * sem_type.adb (Covers): For Ada 2012, allow an anonymous access type
135 in the context of a named general access expected type.
136 * exp_ch4.adb Add with and use of Exp_Ch2.
137 (Expand_N_In): Add processing for membership tests applied to
138 expressions of an anonymous access type. First, Valid_Conversion is
139 called to check whether the test is statically False, and then the
140 conversion is expanded to test that the expression's accessibility
141 level is no deeper than that of the tested type. In the case of
142 anonymous access-to-tagged types, a tagged membership test is applied
144 (Tagged_Membership): Extend to handle access type cases, applying the
145 test to the designated types.
146 * exp_ch6.adb (Expand_Call): When creating an extra actual for an
147 accessibility level, and the actual is a 'Access applied to a current
148 instance, pass the accessibility level of the type of the current
149 instance rather than applying Object_Access_Level to the prefix. Add a
150 ??? comment, since this level isn't quite right either (will eventually
151 need to pass an implicit level parameter to init procs).
153 2011-08-30 Bob Duff <duff@adacore.com>
155 * s-taskin.ads: Minor comment fix.
157 2011-08-30 Ed Schonberg <schonberg@adacore.com>
159 * sem_res.adb (Check_Parameterless_Call): If the node is a selected
160 component and the selector is a dispatching operation, check if it is
161 a prefixed call before rewriting as a parameterless function call.
163 2011-08-29 Jakub Jelinek <jakub@redhat.com>
165 * gcc-interface/Makefile.in (../stamp-gnatlib1-$(RTSDIR)): Copy
166 tsystem.h into $(RTSDIR) instead of rts.
168 2011-08-29 Robert Dewar <dewar@adacore.com>
170 * sem_ch10.adb, a-coorse.adb, exp_dist.adb, exp_ch3.adb: Minor
172 * gcc-interface/Make-lang.in: Update dependencies.
174 2011-08-29 Yannick Moy <moy@adacore.com>
176 * alfa.ads (Name_Of_Heap_Variable): New constant name.
177 * lib-xref-alfa.adb, lib-xref.adb, lib-xref.ads (Drefs): New global
178 table to hold dereferences.
179 (Add_ALFA_Xrefs): Take into account dereferences as special
180 reads/writes to the variable "HEAP".
181 (Enclosing_Subprogram_Or_Package): Move subprogram here.
182 (Generate_Dereference): New procedure to store a read/write dereferencew
184 * put_alfa.adb (Put_ALFA): Use different default than (0,0) used for
185 the special "HEAP" var.
186 * sem_ch4.adb (Analyze_Explicit_Dereference): Store read dereference
188 * sem_util.adb (Note_Possible_Modification): Store write dereference
191 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
193 * exp_ch3.adb (Freeze_Type): Generate an accessibility check which
194 ensures that the level of the subpool access type is not deeper than
195 that of the pool object.
196 * sem_util.adb (Object_Access_Level): Expand to handle defining
198 * sem_res.adb (Resolve_Allocator): Add a guard to avoid examining the
199 subpool handle name of a rewritten allocator.
201 2011-08-29 Robert Dewar <dewar@adacore.com>
203 * impunit.adb, exp_ch4.adb, s-finmas.adb: Minor reformatting.
205 2011-08-29 Thomas Quinot <quinot@adacore.com>
207 * exp_dist.adb (TC_Rec_Add_Process_Element): For a choice with multiple
208 values, we generate multiple triples of parameters in the TypeCode.
209 Bump Choice_Index for each such triple so that a subsequent default
210 choice is associated with the correct index in the typecode.
212 2011-08-29 Ed Schonberg <schonberg@adacore.com>
214 * a-cdlili.adb (Iterate): Initialize properly an iterator over a null
216 (First, Last): Handle properly an iterator over a null container.
218 2011-08-29 Bob Duff <duff@adacore.com>
220 * sem_ch10.adb (Analyze_With_Clause,Install_Withed_Unit): Abandon
221 processing if we run across a node with no Scope. This can happen if
222 we're with-ing an library-level instance, and that instance got errors
223 that caused "instantiation abandoned".
224 * sem_util.adb (Unit_Declaration_Node): Make it more robust, by raising
225 an exception instead of using Assert, so it won't go into an infinite
226 loop, even when assertions are turned off.
228 2011-08-29 Ed Schonberg <schonberg@adacore.com>
230 * a-coorse.adb: Proper handling of empty ordered sets.
232 2011-08-29 Johannes Kanig <kanig@adacore.com>
234 * debug.adb: Add comments.
236 2011-08-29 Thomas Quinot <quinot@adacore.com>
238 * a-except.adb, a-except-2005.adb: Minor comment rewording and
241 2011-08-29 Yannick Moy <moy@adacore.com>
243 * sem_ch3.adb (Array_Type_Declaration): Remove insertion of
244 declaration for Itypes in Alfa mode.
246 2011-08-29 Robert Dewar <dewar@adacore.com>
248 * a-cdlili.ads, a-coinve.ads, a-coorma.adb, a-coorma.ads, s-tassta.adb,
249 a-cborma.adb, a-cborma.ads, a-cohama.ads, a-coorse.ads, a-cbhama.ads,
250 a-cborse.ads, a-cobove.adb, a-cobove.ads, a-cbhase.ads: Minor
253 2011-08-29 Tristan Gingold <gingold@adacore.com>
255 * exp_ch7.adb, exp_ch7.ads (Build_Exception_Handler): Move its spec to
257 * exp_intr.adb (Expand_Unc_Deallocation): Use Build_Exception_Handler.
258 * a-except.adb, a-except-2005.adb (Rcheck_22): Do not defer aborts
261 2011-08-29 Robert Dewar <dewar@adacore.com>
263 * a-cbhama.adb, a-cbhama.ads: Minor reformatting.
265 2011-08-29 Javier Miranda <miranda@adacore.com>
267 * sem_ch8.adb (Analyze_Subprogram_Renaming): Complete support for
268 renamings of formal subprograms when the actual for a formal type is
271 2011-08-29 Matthew Heaney <heaney@adacore.com>
273 * a-cbhama.ads, a-cbhase.ads (Move): Clear Source following assignment
276 2011-08-29 Matthew Heaney <heaney@adacore.com>
278 * a-cborma.ads, a-cborse.ads (Cursor): Default-initialize all
279 components of record type.
280 * a-cborma.adb, a-cborse.adb (Move): Clear Source following assignmentw
283 2011-08-29 Ed Schonberg <schonberg@adacore.com>
285 * a-cbhama.adb, a-cbhama.ads, a-cborma.adb, a-cborma.ads, a-cobove.adb,
286 a-cobove.ads, a-coorma.adb, a-coorma.ads: Add iterator machinery to
289 2011-08-29 Robert Dewar <dewar@adacore.com>
291 * sem_ch3.adb, sem_util.adb, gnat1drv.adb, s-parint.ads: Minor
294 2011-08-29 Matthew Heaney <heaney@adacore.com>
296 * a-cbhama.ads, a-cbhase.ads (Cursor): Default-initialize all
297 components of record type.
299 2011-08-29 Bob Duff <duff@adacore.com>
301 * s-tassta.adb (Task_Wrapper): Handle and ignore exceptions propagated
302 by the termination handler.
304 2011-08-29 Yannick Moy <moy@adacore.com>
306 * sem_ch3.adb (Array_Type_Declaration): Create declarations for Itypes
307 created in Alfa mode, instead of inserting artificial declarations of
308 non-Itypes in the tree.
309 * sem_util.adb, sem_util.ads (Itype_Has_Declaration): New function to
310 know if an Itype has a corresponding declaration, as defined in
313 2011-08-29 Yannick Moy <moy@adacore.com>
315 * gnat1drv.adb: Minor rewrite.
317 2011-08-29 Bob Duff <duff@adacore.com>
319 * s-tasuti.adb (Make_Passive): Work around race condition in
320 Make_Independent, which can cause Wait_Count to be zero. So instead of
321 asserting that Wait_Count > 0, and then decrementing it, decrement it
322 only if Wait_Count > 0.
323 * s-taskin.ads (Wait_Count, Alive_Count, Awake_Count): All of these
324 should be nonnegative, so declare them Natural instead of Integer.
326 2011-08-29 Robert Dewar <dewar@adacore.com>
328 * exp_ch5.adb, sem_ch3.adb, a-cihama.adb, a-cihama.ads, exp_ch7.adb,
329 sem_ch5.adb, a-ciorse.adb, a-ciorse.ads, sem_ch12.adb, a-cidlli.adb,
330 a-cidlli.ads, sem_util.adb, sem_res.adb, gnat1drv.adb, a-except.adb,
331 a-except.ads, a-except-2005.ads, sem_ch4.adb, exp_disp.adb,
332 exp_aggr.adb, sem_ch13.adb, par-ch3.adb: Minor reformatting.
334 2011-08-29 Tristan Gingold <gingold@adacore.com>
336 * s-auxdec-vms-alpha.adb: Add comments, remove some HT before labels.
338 2011-08-29 Vadim Godunko <godunko@adacore.com>
340 * s-parint.ads: Minor comment clarification.
342 2011-08-29 Vincent Celier <celier@adacore.com>
344 * prj.adb (Initialize): Make sure that new reserved words after Ada 95
345 may be used as identifiers.
347 2011-08-29 Ed Schonberg <schonberg@adacore.com>
349 * a-coinho.ads: Minor reformating.
351 2011-08-29 Ed Schonberg <schonberg@adacore.com>
353 * exp_ch5.adb (Expand_Iterator_Loop): Handle properly a loop over a
354 container of a derived type.
356 2011-08-29 Ed Schonberg <schonberg@adacore.com>
358 * a-cidlli.adb, a-cidlli.ads, a-cihama.adb, a-cihama.ads,
359 a-ciorse.adb, a-ciorse.ads: Add iterator machinery to containers.
361 2011-08-29 Pascal Obry <obry@adacore.com>
363 * exp_disp.adb: Minor comment fix.
364 (Make_Disp_Asynchronous_Select_Body): Properly initialize out parameters
365 to avoid warnings when compiling with -Wall.
366 (Make_Disp_Conditional_Select_Body): Likewise.
367 (Make_Disp_Timed_Select_Body): Likewise.
369 2011-08-29 Ed Schonberg <schonberg@adacore.com>
371 * sem_ch12.adb (Analyze_Formal_Subprogram_Declaration): If default is
372 an entity name, generate reference for it.
374 2011-08-29 Ed Schonberg <schonberg@adacore.com>
376 * exp_ch5.adb (Expand_Iterator_Loop): Uniform handling of "X of S"
378 * sem_util.adb (Is_Iterator, Is_Reversible_Iterator): Yield True for
380 * sem_ch5.adb: Move some rewriting to the expander, where it belongs.
382 2011-08-29 Ed Schonberg <schonberg@adacore.com>
384 * sem_ch8.adb (Check_Constrained_Object): Do not create an actual
385 subtype for an object whose type is an unconstrained union.
387 2011-08-29 Ed Schonberg <schonberg@adacore.com>
389 * par-ch3.adb (P_Array_Type_Definiation, P_Component_Items): "aliased"
390 is allowed in a component definition, by AI95-406.
392 2011-08-29 Matthew Heaney <heaney@adacore.com>
394 * a-chtgbo.adb (Generic_Iteration): Use correct overloading of Next.
396 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
398 * a-except-2005.adb: Alphabetize all routines.
399 (Triggered_By_Abort): New routine.
400 * a-except-2005.ads (Triggered_By_Abort): New routine.
401 * a-except.adb Alphabetize all routines.
402 (Triggered_By_Abort): New routine.
403 * a-except.ads (Triggered_By_Abort): New routine.
404 * exp_ch7.adb: Update all comments involving the detection of aborts in
406 (Build_Object_Declarations): Do not generate code to detect the
407 presence of an abort at the start of finalization code, use a runtime
409 * rtsfind.ads: Add RE_Triggered_By_Abort to tables RE_Id and
411 * sem_res.adb (Resolve_Allocator): Emit a warning when attempting to
412 allocate a task on a subpool.
413 * s-stposu.adb: Add library-level flag Finalize_Address_Table_In_Use.
414 The flag disables all actions related to the maintenance of
415 Finalize_Address_Table when subpools are not in use.
416 (Allocate_Any_Controlled): Signal the machinery that subpools are in
418 (Deallocate_Any_Controlled): Do not call Delete_Finalize_Address which
419 performs costly task locking when subpools are not in use.
421 2011-08-29 Yannick Moy <moy@adacore.com>
423 * gnat1drv.adb (Adjust_Global_Switches): Restore expansion of tagged
424 types and dispatching calls in Alfa mode.
425 * lib-xref-alfa.adb (Collect_ALFA): Rewrite computation of
426 correspondance between body and spec scopes, to reuse utility functions
427 (Traverse_Declarations_Or_Statements): Protect access to body for stub
428 by testing the presence of the library unit for the body
429 * sem_ch6.adb (Set_Actual_Subtypes): take into account that in Alfa
430 mode the expansion of accept statements is skipped
431 * sem_util.adb, sem_util.ads (Unique_Entity): New function returning
432 the unique entity corresponding to the one returned by
433 Unique_Defining_Entity applied to the enclosing declaration of the
436 2011-08-29 Bob Duff <duff@adacore.com>
438 * treepr.ads: Improve debugging facilities. pn(x) no longer crashes in
439 gdb when x is not a node (it can be a node list, name_id, etc). pp is
440 an alias for pn. ppp is an alias for pt.
442 2011-08-29 Javier Miranda <miranda@adacore.com>
444 * exp_aggr.adb (Expand_Record_Aggregate): Use the top-level enclosing
445 aggregate to take a consistent decision on the need to convert into
446 assignments aggregates that initialize constant objects.
448 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
450 * exp_ch4.adb (Expand_Allocator_Expression): Add a call to
451 Build_Allocate_Deallocate_Proc in order to handle allocation of
452 non-controlled objects on subpools.
453 * impunit.adb: Remove s-finmas and s-spsufi since they were never meant
454 to be end-user visible.
455 * s-finmas.adb: Add with and use clause for System.HTable.
456 Add an instantiation of Simple_HTable which provides a mapping between
457 the address of a controlled object and the corresponding
458 Finalize_Address used to clean up the object. The table is used when a
459 master is operating in heterogeneous mode.
460 (Attach): Explain why the input node is not verified on being already
462 (Delete_Finalize_Address): New routine.
463 (Detach): Add pragma Assert which ensures that a node is already
465 (Finalize): Add local variable Cleanup. Rewrite the iteration scheme
466 since nodes are no longer removed on traversal. Explain why node
467 detachment is undesirable in this case.
468 (Get_Finalize_Address): New routine.
470 (Is_Empty_List): Removed.
471 (pm): Renamed to Print_Master. Add output for discriminant
473 Comment reformatting.
474 (Set_Finalize_Address (Address, Finalize_Address_Ptr)): New routine.
475 * s-finmas.ads: Various comments additions / improvements.
476 Type Finalization_Master has a discriminant which determines the mode of
478 (Delete_Finalize_Address): New routine.
479 (Get_Finalize_Address): New routine.
480 (pm): Renamed to Print_Master.
481 (Set_Finalize_Address (Address, Finalize_Address_Ptr)): New routine.
482 * s-stposu.adb: Add with clause for System.Address_Image; Add with and
483 use clause for System.IO.
484 (Allocate_Any_Controlled): Add machinery to set TSS primitive
485 Finalize_Address depending on the mode of allocation and the mode of
487 (Deallocate_Any_Controlled): Remove the relation pair object -
488 Finalize_Address regardless of the master mode. Add comment explaining
490 (Detach): Ensure that fields Prev and Next are null after detachment.
491 (Finalize_Pool): Remove local variable Next_Ptr. Rewrite the iteration
492 scheme to check whether the list of subpools is empty. There is no
493 longer need to store the next subpool or advance the current pointer.
494 (Is_Empty_List): New routine.
495 (Print_Pool): New routine.
496 (Print_Subpool): New routine.
497 * s-stposu.ads: Various comments additions / improvements.
498 Field Master of type Root_Subpool is now a heterogeneous collection.
499 (Print_Pool): New routine.
500 (Print_Subpool): New routine.
502 2011-08-29 Ed Schonberg <schonberg@adacore.com>
504 * exp_ch5.adb (Expand_N_Iterator_Loop): Implement Ada2012 loop iterator
505 forms, using aspects of container types.
506 * sem_ch3.adb (Find_Type_Name): Preserve Has_Delayed_Aspects and
507 Has_Implicit_Dereference flags, that may be set on the partial view.
508 * sem_ch4.adb (Process_Overloaded_Indexed_Component): Prefix may be a
509 container type with an indexing aspect.
510 (Analyze_Quantified_Expression): Analyze construct with expansion
511 disabled, because it will be rewritten as a loop during expansion.
512 (Try_Container_Indexing): The prefix itself may be a container type
513 with an indexing aspect, as with a vector of vectors.
514 * sem_ch5.adb (Analyze_Iteration_Scheme): In a generic context, analyze
515 the original doamin of iteration, for name capture.
516 (Analyze_Iterator_Specification): If the domain is an expression that
517 needs finalization, create a separate declaration for it.
518 For an iterator with "of" retrieve default iterator info from aspect of
519 container type. For "in" iterator, retrieve type of Iterate function.
520 * sem_ch13.adb (Check_Iterator_Function): Fix typo.
521 (Check_Aspect_At_End_Of_Declaration): Make type unfrozen before
522 analysis, to prevent spurious errors about late attributes.
523 * sprint.adb: Handle quantified expression with either loop or iterator
525 * a-convec.ads, a-convec.adb: Iterate function returns a reversible
528 2011-08-29 Vincent Celier <celier@adacore.com>
530 * make.adb (Scan_Make_Arg): Take any option as is in packages Compiler,
531 Binder or Linker of the main project file.
533 2011-08-29 Ed Schonberg <schonberg@adacore.com>
535 * inline.adb (Add_Scopes_To_Clean): Exclude any entity within a generic
538 2011-08-29 Yannick Moy <moy@adacore.com>
540 * exp_ch9.adb: Partial revert of previous change for Alfa mode
542 2011-08-29 Yannick Moy <moy@adacore.com>
544 * exp_ch11.adb: Minor expansion of comment.
546 2011-08-29 Yannick Moy <moy@adacore.com>
548 * lib-xref-alfa.adb (Add_ALFA_Scope): Treat generic entities.
550 2011-08-29 Ed Schonberg <schonberg@adacore.com>
552 * sem_res.adb (Resolve_Arithmetic_Op): If the node has a universal
553 interpretation, set the type before resolving the operands, because
554 legality checks on an exponention operand need to know the type of the
557 2011-08-29 Ed Schonberg <schonberg@adacore.com>
559 * sem_ch12.adb (Analyze_Package_Instantiation): Do not set delayed
560 cleanups on a master if the instance is within a generic unit.
561 Complement to the corresponding fix to inline.adb for K520-030.
563 2011-08-29 Tristan Gingold <gingold@adacore.com>
565 * exp_ch7.adb (Build_Raise_Statement): Raise PE instead of the current
567 * exp_intr.adb: Minor comment fix.
569 2011-08-29 Bob Duff <duff@adacore.com>
571 * sem_ch13.adb (Analyze_Aspect_Specifications): Fix cases where
572 Delay_Required was used as an uninitialized variable.
574 2011-08-29 Robert Dewar <dewar@adacore.com>
576 * a-cdlili.adb, a-cdlili.ads, a-coinve.adb, a-coinve.ads,
577 sem_util.adb, sem_util.ads, a-cohama.adb, a-cohama.ads, a-coorse.adb,
578 a-coorse.ads, aspects.ads, sem_ch8.adb: Minor reformatting.
580 2011-08-29 Thomas Quinot <quinot@adacore.com>
582 * system-freebsd-x86_64.ads (Backend_Overflow_Checks): Set true True.
583 Remove unused variables.
585 2011-08-29 Ed Schonberg <schonberg@adacore.com>
587 * sem_res.adb: Remove Build_Explicit_Dereference.
588 * sem_util.adb, sem_util.ads (Build_Explicit_Dereference): Moved here
589 from sem_res.adb, used in analysis of additional constructs.
590 (Is_Iterator, Is_Reversible_Iterator): New predicates for Ada2012
591 expansion of iterators.
592 (Is_Object_Reference): Recognize variables rewritten as explicit
593 dereferences in Ada2012.
594 * snames.ads-tmpl: Add Has_Element, Forward_Iterator,
595 Reversible_Iterator names, for expansion of Ada2012 iterators.
596 * aspects.ads, aspects.adb (Find_Aspect): Utility.
597 * a-cdlili.ads, a-cdlili.adb: Add new iterator machinery to doubly
598 linked list container.
599 * a-coinve.ads, a-coinve.adb: Ditto for indefinite vector containers.
600 * a-coorse.ads, a-coorse.adb: Ditto for ordered sets.
602 2011-08-29 Ed Schonberg <schonberg@adacore.com>
604 * a-cohama.adb, a-cohama.ads: Add iterator primitives to hashed map
607 2011-08-29 Vincent Celier <celier@adacore.com>
609 * make.adb (Gnatmake): Get the maximum number of simultaneous
610 compilation processes after the Builder switches has been scanned, as
611 there may include -jnn.
613 2011-08-29 Matthew Heaney <heaney@adacore.com>
615 * a-chtgbo.adb (Generic_Equal): Use correct overloading of Next.
617 2011-08-29 Tristan Gingold <gingold@adacore.com>
619 * gnatcmd.adb (GNATCmd): On OpenVMS, truncate the length of
620 GNAT_DRIVER_COMMAND_LINE to 255.
622 2011-08-29 Pascal Obry <obry@adacore.com>
624 * freeze.adb, sem_ch8.adb, a-convec.adb, a-convec.ads: Minor
625 reformatting and style fix (class attribute casing).
627 2011-08-29 Yannick Moy <moy@adacore.com>
629 * exp_ch11.adb: Yet another case where expansion should be common
630 between CodePeer and Alfa.
632 2011-08-29 Yannick Moy <moy@adacore.com>
634 * exp_ch9.adb: Partial revert of previous change for Alfa mode.
636 2011-08-29 Ed Schonberg <schonberg@adacore.com>
638 * sem_ch6.adb (Matches_Limited_With_View): The limited views of an
639 incomplete type and its completion match.
641 2011-08-29 Yannick Moy <moy@adacore.com>
643 * exp_ch13.adb: Adjust previous change.
645 2011-08-29 Robert Dewar <dewar@adacore.com>
647 * sem_prag.adb, prj.adb, sem_util.adb, sem_res.adb, gnat1drv.adb,
648 exp_ch4.adb, sem_ch8.adb: Minor code reorganization
651 2011-08-29 Emmanuel Briot <briot@adacore.com>
653 * make.adb, prj.adb, prj.ads (Compute_All_Imported_Projects): Also
654 initialize aggregated projects.
656 2011-08-29 Ed Schonberg <schonberg@adacore.com>
658 * sem_ch8.adb (Find_Renamed_Entity): Within an instance, use scope
659 depth of candidates to resolve a potentially spurious ambiguity between
660 two visible subprograms.
662 2011-08-29 Yannick Moy <moy@adacore.com>
664 * sem_prag.adb (Analyze_Pragma): Allow Test_Case pragma without
666 * sem_util.adb (Get_Ensures_From_Test_Case_Pragma,
667 Get_Requires_From_Test_Case_Pragma): Allow Test_Case pragma without
670 2011-08-29 Arnaud Charlet <charlet@adacore.com>
672 * gnat1drv.adb (Adjust_Global_Switches): Improve previous change.
675 2011-08-29 Thomas Quinot <quinot@adacore.com>
677 * sem_res.adb: Minor reformatting.
679 2011-08-29 Johannes Kanig <kanig@adacore.com>
681 * exp_ch4.adb (Expand_Quantified_Expression): Do not expand in ALFA
683 * gnat1drv.adb (Adjust_Global_Switches): Set
684 Use_Expressions_With_Actions to False in ALFA mode.
685 * sem_res.adb (Resolve_Quantified_Expression): Simpler treatment in
688 2011-08-29 Yannick Moy <moy@adacore.com>
690 * exp_ch13.adb (Expand_N_Freeze_Entity): Do nothing in Alfa mode.
691 * exp_ch9.adb: Do not expand tasking constructs in Alfa mode.
692 * gnat1drv.adb (Adjust_Global_Switches): Suppress the expansion of
693 tagged types and dispatching calls in Alfa mode.
695 2011-08-29 Javier Miranda <miranda@adacore.com>
697 * sem_ch3.adb (Process_Discriminants): Add missing check to ensure that
698 we do not report an error on an Empty node.
700 2011-08-29 Geert Bosch <bosch@adacore.com>
702 * Makefile.rtl (GNATRTL_NONTASKING_OBJECTS): Add a-nllrar.o,
703 a-nlrear.o and a-nurear.o.
705 2011-08-29 Robert Dewar <dewar@adacore.com>
707 * freeze.adb: Minor code reorganization.
709 * sem_util.adb, errout.adb, exp_ch11.adb, a-ngrear.adb, s-gearop.adb,
710 sem_ch6.adb: Minor reformatting
712 2011-08-29 Tristan Gingold <gingold@adacore.com>
714 * s-except.ads, s-except.adb: Provide dummy body.
716 2011-08-29 Yannick Moy <moy@adacore.com>
718 * sem_warn.adb (Within_Postcondition): Take into account the case of
719 an Ensures component in a Test_Case.
721 2011-08-29 Tristan Gingold <gingold@adacore.com>
723 * s-excdeb.ads, s-excdeb.adb: New files, created from s-except.
724 * rtsfind.ads (RTU_Id): Replaces System_Exceptions by
725 System_Exceptions_Debug
726 (RE_Unit_Table): Search RE_Local_Raise in System_Exceptions_Debug
727 * a-except.adb: With and use System.Exceptions_Debug instead of
729 * a-except-2005.adb: Likewise.
730 * s-assert.adb: Likewise.
731 * s-except.adb, s-except.ads: Move debugging hooks to s-excdeb.
732 * Makefile.rtl: Add s-excdeb. Adjust compilation rule.
733 * gcc-interfaces/Makefile.in, gcc-interface/Make-lang.in: Add
734 s-excdeb. Update dependencies.
735 (GNATRTL_LINEARALGEBRA_OBJS): Remove a-nlrear.o a-nurear.o a-nllrar.o
736 as these no longer need external libraries.
738 2011-08-29 Ed Schonberg <schonberg@adacore.com>
740 * sem_res.adb (Resolve_Op_Expon): Additional check to reject an
741 exponentiation operator on universal values in a context that requires
744 2011-08-29 Tristan Gingold <gingold@adacore.com>
746 * raise-gcc.c (personnality_routine): Fix thinko. Set Ada occurrence
747 before calling notify_handled_exception.
748 * a-exextr.adb: Fix comment.
750 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
752 * exp_ch4.adb (Expand_Allocator_Expression): Add code to set attribute
753 Finalize_Address of the access type's finalization master.
754 (Expand_N_Allocator): Add code to set attribute Finalize_Address of the
755 access type's finalization master. Add a guard to prevent
756 Associated_Storage_Pool from being set on .NET/JVM.
757 * exp_ch6.adb (Make_Build_In_Place_Call_In_Allocator): Add code to set
758 attribute Finalize_Address of the access type's finalization master.
759 * exp_ch7.adb (Make_Finalize_Address_Call): New routine.
760 * exp_ch7.ads (Make_Finalize_Address_Call): New routine.
761 * rtsfind.ads: Add RE_Set_Finalize_Address to tables RE_Id and
763 * s-finmas.adb: Add with clause for System.Address_Image. Add with and
764 use clause for System.IO
765 (Detach): Relax the assertion, to be reinstated later.
766 (Finalize): Rewrite the iteration loop to avoid pointer comparison.
767 Relax the assertion on Finalize_Address, to be reinstated later.
768 (Is_Empty_List): New routine.
769 (pm): New debug routine.
770 (Set_Finalize_Address): New routine.
771 * s-finmas.ads (pm): New debug routine.
772 (Set_Finalize_Address): New routine.
773 * s-stposu.adb (Allocate_Any_Controlled): Code reformatting.
775 2011-08-29 Tristan Gingold <gingold@adacore.com>
777 * a-exexpr-gcc.adb (GCC_Exception_Access, GNAT_GCC_Exception_Access):
780 2011-08-29 Tristan Gingold <gingold@adacore.com>
782 * s-taprop-vms.adb (Get_Exc_Stack_Addr): Remove.
783 (Initialize_TCB): Remove Exc_Stack_Ptr initialization.
784 (Finalize_TCB): Remove its finalization.
785 (Initialize): Remove assignment of GET_Exc_Stack_Addr
786 * s-soflin.adb (NT_Exc_Stack): Remove
787 (Get_Exc_Stack_Addr_NT): Likewise.
788 (Get_Exc_Stack_Addr_Soft): Likewise.
789 * s-soflin.ads (Get_Exc_Stack_Addr_NT): Remove.
790 (Get_Exc_Stack_Addr): Likewise.
791 (Get_Exc_Stack_Addr_Soft): Likewise
792 * s-taspri-vms.ads (Exc_Stack_T): Remove.
793 (Exc_Stack_Ptr_T): Likewise.
794 (Private_Data): Remove Exc_Stack_Ptr component.
796 2011-08-29 Tristan Gingold <gingold@adacore.com>
798 * raise-gcc.c (get_ip_from_context): New function. Factorize code.
800 2011-08-29 Tristan Gingold <gingold@adacore.com>
802 * gnat_ugn.texi: Fix aix and x86-solaris info for run-time.
804 2011-08-29 Geert Bosch <bosch@adacore.com>
806 * s-gearop.ads (Back_Substitute, Diagonal, Forward_Eliminate,
807 L2_Norm, Swap_Column): New generic subprograms
808 * s-gearop.adb (Back_Substitute, Diagonal, Forward_Eliminate,
809 L2_Norm, Swap_Column): Implement new subprograms in order to
810 eliminate dependency on BLAS and LAPACK libraries in
811 Ada.Numerics.Generic_Real_Arrays and eventually also the complex
812 version. Forward_Eliminate/Back_Substitute can be used to put a
813 matrix in row echelon or reduced row echelon form using partial
815 * a-ngrear.adb: (Back_Substitute, Diagonal, Forward_Eleminate,
816 Swap_Column): Instantiate from System.Generic_Array_Operations.
817 ("*", "abs"): Implement by instantiation from Generic_Array_Operations.
818 (Sqrt): Local function for simple computation of square root without
819 adding dependencies on Generic_Elementary_Functions.
820 (Swap): New subprogram to exchange floating point numbers.
821 (Inverse): Reimplement using Jordan-Gauss elimination.
822 (Jacobi): New procedure implementing Jacobi's method for computation
823 of eigensystems, based on Rutishauser's implementation.
824 (L2_Norm): Implement directly using the inner product.
825 (Sort_Eigensystem): Sort eigenvalue/eigenvector pairs in order of
826 decreasing eigenvalue as required by the Ada RM.
827 (Swap_Column): New helper procedure for Sort_Eigensystem.
828 Remove with of System.Generic_Real_BLAS and System.Generic_Real_LAPACK.
829 Add with of Ada.Containers.Generic_Anonymous_Array_Sort, for
832 2011-08-29 Thomas Quinot <quinot@adacore.com>
834 * put_scos.adb (Put_SCOs): Do not emit a newline for an empty
837 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
839 * s-finmas.adb (Finalize): Check Finalize_Address of the master rather
840 than the current node.
841 * s-finmas.ads: Move field Finalize_Address from type FM_Node to
842 Finalization_Master. The list headers have two fields instead of three.
843 This should fix alignment issue but subpool allocations are now
844 unusable. Alphabetize subprograms.
845 * s-stposu.adb (Allocate_Any_Controlled): Use the offset rather than
846 the size of the header when converting the beginning of the object to
847 a FM_Node. Set the master's Finalize_Address attribute if not already
849 (Deallocate_Any_Controlled): Use the offset rather than the size of the
850 header when converting the beginning of the object to a FM_Node.
852 2011-08-29 Gary Dismukes <dismukes@adacore.com>
854 * exp_ch11.adb (Expand_N_Raise_Statement): Don't suppress expansion of
855 reraise when compiling for CodePeer.
857 2011-08-29 Arnaud Charlet <charlet@adacore.com>
859 * a-iteint.ads, Makefile.rtl: Add missing compilation of a-iteint.ads,
860 now needed by a-convec.adb. Fix warning.
862 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
864 * exp_util.adb (Build_Allocate_Deallocate_Proc): Add a guard for the
865 processing of TSS routine Finalize_Address when compiling in
868 2011-08-29 Thomas Quinot <quinot@adacore.com>
870 * a-strunb.ads, einfo.ads, g-comlin.ads, sem_ch6.adb,
871 sem_warn.adb: Minor reformatting.
873 2011-08-29 Emmanuel Briot <briot@adacore.com>
875 * prj-conf.adb (Get_Config_Switches): Also collect the list of
876 languages from aggregated projects.
878 2011-08-29 Yannick Moy <moy@adacore.com>
880 * lib-xref-alfa.adb, lib-xref.ads (Traverse_Declarations_Or_Statements,
881 Traverse_Handled_Statement_Sequence, Traverse_Package_Body,
882 Traverse_Package_Declaration, Traverse_Subprogram_Body,
883 Traverse_Compilation_Unit): Add a parameter Inside_Stubs so that bodies
884 for stubs are traversed too when parameter is set
885 (Traverse_All_Compilation_Units): Traverse without going inside stubs
886 (Traverse_Declarations_Or_Statements): Do the special traversing for
888 * sem_util.adb, sem_util.ads (Get_Body_From_Stub): New function to
889 return subprogram or package body from stub.
890 (Is_Subprogram_Stub_Without_Prior_Declaration): New function to detect
891 stubs without prior subprogram decl.
893 2011-08-29 Vasiliy Fofanov <fofanov@adacore.com>
895 * gnat_ugn.texi: Fix typo.
897 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
899 * s-stposu.adb (Allocate_Any_Controlled): Reimplement the mechanism
900 which accounts for size vs alignment issues and calculates the size of
902 (Deallocate_Any_Controlled): Ditto.
903 (Nearest_Multiple_Rounded_Up): New routine.
905 2011-08-29 Tristan Gingold <gingold@adacore.com>
907 * a-exstat.adb (String_To_EO): Do no set Cleanup_Flag.
908 * a-exexda.adb (Set_Exception_C_Msg): Ditto.
909 (Set_Exception_Msg): Ditto.
910 * a-exexpr-gcc.adb (Setup_Current_Excep): Ditto. Do not set
912 * a-except.adb, a-except-2005.adb (Save_Occurrence_No_Private): Remove.
913 Use Save_Occurrence instead of Save_Occurrence_No_Private.
914 (Raise_With_Msg): Remove Cleanup_Flag.
915 * a-except.ads, a-except-2005.ads (Exception_Occurrence): Remove
916 Clean_Flag and Private_Data components.
918 2011-08-29 Yannick Moy <moy@adacore.com>
920 * freeze.adb (Freeze_Record_Type): Ignore packing in Alfa mode, like
922 * sem_ch3.adb (Signed_Integer_Type_Declaration): Correct the generation
923 of an explicitly declared type, so that the base types of the original
924 type and this generated type are the same, and a "type" (not a subtype
926 * errout.adb (Special_Msg_Delete): Do not issue messages "Size too
927 small" in Alfa mode, like in CodePeer mode.
928 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Ignore rep
929 clauses in Alfa mode.
931 2011-08-29 Javier Miranda <miranda@adacore.com>
933 * exp_ch6.ads, exp_ch6.adb (Is_Null_Procedure): Move the spec of this
934 function to the package spec.
935 * sem_ch6.adb (Find_Corresponding_Spec, New_Overloaded_Entity): For
936 internally generated bodies of null procedures locate the internally
937 generated spec enforcing mode conformance.
938 (Is_Interface_Conformant): Ensure that the controlling formal of the
941 2011-08-29 Ed Schonberg <schonberg@adacore.com>
943 * sem_prag.adb (Analyze_Pragma, case Inline): In an instance, do not
944 reject the pragma if it appears to apply to a formal subprogram.
946 2011-08-29 Ed Schonberg <schonberg@adacore.com>
948 * exp_ch4.adb (Expand_Allocator_Expression): Use consistent name for
949 inner expression, to prevent double evaluation.
951 2011-08-29 Tristan Gingold <gingold@adacore.com>
953 * a-exexpr.adb (Propagate_Exception): Remove all the parameters as
955 * a-exexpr-gcc.adb (Propagate_Exception): Ditto.
956 * a-except-2005.adb (Propagate_Exception): Adjust spec.
957 (Raise_Current_Excep): Adjust call.
958 (Raise_From_Signal_Handler): Call now simply call Raise_Current_Excep.
960 2011-08-29 Thomas Quinot <quinot@adacore.com>
962 * exp_disp.adb: Minor reformatting.
964 2011-08-29 Tristan Gingold <gingold@adacore.com>
966 * a-exexpr.adb (Setup_Exception): Removed.
967 * a-exexpr-gcc.adb (Setup_Exception): Removed.
968 * a-except.adb (Exception_Propagation): Removed.
969 * a-except-2005.adb (Setup_Exception): Removed.
970 (Reraise): Remove call to Setup_Exception.
971 (Reraise_Occurrence): Ditto.
972 (Reraise_Occurrence_Always): Ditto.
973 (Reraise_Occurrence_No_Defer): Ditto.
974 (Transfer_Occurrence): Ditto.
975 * a-exexda.adb (Set_Exception_C_Msg): Remove call to Setup_Exception.
976 (Set_Exception_Msg): Ditto.
978 2011-08-29 Robert Dewar <dewar@adacore.com>
980 * a-convec.adb, exp_disp.adb: Minor reformatting.
982 2011-08-29 Tristan Gingold <gingold@adacore.com>
984 * a-exexpr-gcc.adb (GNAT_GCC_Exception_Access): Set to convention C.
986 2011-08-29 Gary Dismukes <dismukes@adacore.com>
988 * exp_ch3.adb (Build_Record_Init_Proc.Build_Init_Procedure): Set
989 Exception_Handlers to No_List instead of Empty_List in the case where
990 there are no handlers.
992 2011-08-29 Tristan Gingold <gingold@adacore.com>
994 * gcc-interface/gigi.h (enum standard_datatypes): Add
996 (reraise_zcx_decl): New macro.
997 * gcc-interface/trans.c (gnu_incoming_exc_ptr): New variable.
998 (gigi): Set reraise_zcx_decl.
999 (Exception_Handler_to_gnu_zcx): Save and restore gnu_incoming_exc_ptr.
1000 (gnat_to_gnu): Handle N_Raise_Statement.
1002 2011-08-29 Robert Dewar <dewar@adacore.com>
1004 * sem_ch6.adb, exp_ch3.adb, s-stposu.adb, a-undesu.ads,
1005 a-undesu.adb: Minor reformatting.
1007 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1009 * exp_disp.adb (Check_Premature_Freezing): When building a dispatch
1010 table, accept an unfrozen untagged component if it is an actual for a
1011 formal incomplete type.
1012 * a-convec.ads, a-convec.adb: Instantiate Ada.Iterator_Interfaces to
1013 provide new iterator forms over vectors.
1014 Introduce type Iterator in package body to implement operations of
1015 Reversible_Iterator interface.
1016 * a-iteint.ads: Make package pure so it is usable with new container
1017 packages, that are categorized Remote_Types.
1019 2011-08-29 Robert Dewar <dewar@adacore.com>
1021 * a-exexpr-gcc.adb, a-synbar.adb, sem_ch13.adb: Minor reformatting.
1023 2011-08-29 Bob Duff <duff@adacore.com>
1025 * sem_aggr.adb (Resolve_Aggr_Expr): Call this routine even in the case
1026 of <>, because this is the routine that checks for dimensionality
1027 errors (for example, for a two-dimensional array, (others => <>) should
1028 be (others => (others => <>)).
1030 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
1032 * impunit.adb: Add new run-time units.
1033 * freeze.adb, exp_ch7.ads, exp_ch7.adb, exp_util.ads, exp_util.adb,
1034 s-stposu.ads, s-stposu.adb: Code clean up.
1035 Handle protected class-wide or task class-wide types
1036 Handle C/C++/CIL/Java types.
1037 * s-spsufi.adb, s-spsufi.ads: New files.
1039 2011-08-29 Yannick Moy <moy@adacore.com>
1041 * sem_ch13.adb (Analyze_Aspect_Specifications): Reject test-case on
1042 library-level subprogram.
1043 * sem_prag.adb (Check_Test_Case): Stricter rules for test-case
1045 (Analyze_Pragma): Change name "Normal" for "Nominal" in test-case
1047 * snames.ads-tmpl: Change name "Normal" for "Nominal" in test-case
1049 * gnat_rm.texi: Update doc for Test_Case pragma.
1051 2011-08-29 Tristan Gingold <gingold@adacore.com>
1053 * a-exexpr-gcc.adb (Unwind_Exception): Remove default value, made it
1055 (GCC_Exception_Access): New type.
1056 (Unwind_DeleteException): New imported procedure
1057 (Foreign_Exception): Import it.
1058 (GNAT_GCC_Exception): Simply have the occurrence inside.
1059 (To_GCC_Exception): New function.
1060 (To_GNAT_GCC_Exception): New function.
1061 (GNAT_GCC_Exception_Cleanup): New procedure..
1062 (Propagate_GCC_Exception): New procedure.
1063 (Reraise_GCC_Exception): New procedure.
1064 (Setup_Current_Excep): New procedure.
1065 (CleanupUnwind_Handler): Change type of UW_Exception parameter.
1066 (Unwind_RaiseException): Ditto.
1067 (Unwind_ForcedUnwind): Ditto.
1069 (Begin_Handler): Change type of parameter.
1070 (End_Handler): Ditto. Now delete the exception if still present.
1071 (Setup_Key): Removed.
1072 (Is_Setup_And_Not_Propagated): Removed.
1073 (Set_Setup_And_Not_Propagated): Ditto.
1074 (Clear_Setup_And_Not_Propagated): Ditto.
1075 (Save_Occurrence_And_Private): Ditto.
1076 (EID_For): Add 'not null' constraint on parameter.
1077 (Setup_Exception): Does nothing.
1078 (Propagate_Exception): Simplified.
1079 * exp_ch11.adb (Expand_N_Raise_Statement): In back-end exception model,
1080 re-raise is not expanded anymore.
1081 * s-except.ads (Foreign_Exception): New exception - placeholder for
1083 * raise-gcc.c (__gnat_setup_current_excep): Declare
1084 (CXX_EXCEPTION_CLASS): Define (not yet used)
1085 (GNAT_EXCEPTION_CLASS): Define.
1086 (is_handled_by): Handle foreign exceptions.
1087 (PERSONALITY_FUNCTION): Call __gnat_setup_current_excep.
1089 2011-08-29 Jose Ruiz <ruiz@adacore.com>
1091 * a-synbar.adb (Synchronous_Barrier): Some additional clarification.
1093 2011-08-29 Thomas Quinot <quinot@adacore.com>
1095 * a-synbar-posix.adb: Minor reformatting.
1097 2011-08-29 Jose Ruiz <ruiz@adacore.com>
1099 * a-exetim-posix.adb, a-exetim-mingw.adb, a-exetim-mingw.ads,
1100 a-exetim-default.ads (Interrupt_Clocks_Supported,
1101 Separate_Interrupt_Clocks_Supported, Clock_For_Interrupts): Add these
1102 definitions to be compliant with AI-0171. The target systems do not
1103 support separate account for the execution time of interrupt handlers.
1105 2011-08-29 Jose Ruiz <ruiz@adacore.com>
1107 * a-synbar.adb (Wait): Change the order of evaluation of the conditions
1108 in the barrier to put first the easiest to evaluate (and the one which
1109 will be True more often). More efficient.
1111 2011-08-29 Eric Botcazou <ebotcazou@adacore.com>
1113 * s-atocou-x86.adb: Fix constraint in machine code insertion.
1115 2011-08-29 Bob Duff <duff@adacore.com>
1117 * aspects.ads, aspects.adb: Add new aspects for various pragmas and
1118 attributes that are now aspects, as specified by AI05-0229-1.
1119 * sem_ch13.adb (Analyze_Aspect_Specifications,
1120 Check_Aspect_At_Freeze_Point): Analyze the new aspects. Turn them into
1121 pragmas or attribute references, as appropriate.
1123 2011-08-29 Robert Dewar <dewar@adacore.com>
1125 * a-synbar.ads, a-synbar.adb, a-synbar-posix.adb,
1126 a-synbar-posix.ads: Minor reformatting.
1128 2011-08-29 Yannick Moy <moy@adacore.com>
1130 * snames.ads-tmpl: Add name Force.
1132 2011-08-29 Pascal Obry <obry@adacore.com>
1134 * prj-nmsc.adb: Minor reformatting.
1136 2011-08-29 Jose Ruiz <ruiz@adacore.com>
1138 * a-exetim.ads (Interrupt_Clocks_Supported,
1139 Separate_Interrupt_Clocks_Supported, Clock_For_Interrupts): Add these
1140 definitions to be compliant with AI-0171.
1142 2011-08-29 Robert Dewar <dewar@adacore.com>
1144 * a-ngelfu.adb: Add comments.
1146 2011-08-29 Geert Bosch <bosch@adacore.com>
1148 * a-ngelfu.adb (Tan): Do not raise Constraint_Error if the argument is
1149 the closest machine number to Pi / 2.0.
1151 2011-08-29 Jose Ruiz <ruiz@adacore.com>
1153 * impunit.adb (Non_Imp_File_Names_12): Add a-synbar for new Ada 2012
1154 package Ada.Synchronous_Barriers.
1155 * a-synbar.ads, a-synbar.adb, a-synbar-posix.ads, a-synbar-posix.adb:
1156 Add new specs and bodies for Ada.Synchronous_Barriers. There is a
1157 default implementation using protected objects and another one
1158 a-synbar-posix using POSIX barriers as the underlying support.
1159 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS for Linux (x86,
1160 x86_64, ia64) and MIPS IRIX): Use the a-synbar-posix implementation of
1161 Ada.Synchronous_Barriers which uses POSIX barriers (more efficient).
1162 Clean up dependencies.
1163 * Makefile.rtl (GNATRTL_TASKING_OBJS): Add a-synbar.o
1165 2011-08-29 Robert Dewar <dewar@adacore.com>
1167 * sem_ch7.adb, make.adb, sem_res.adb, exp_intr.adb,
1168 exp_dist.adb: Minor code reorganization.
1171 2011-08-29 Thomas Quinot <quinot@adacore.com>
1173 * sem_cat.adb (Validate_RACW_Primitive): The return type of an RACW
1174 primitive operation must support external streaming if it is not a
1175 controlling access result.
1177 2011-08-29 Thomas Quinot <quinot@adacore.com>
1179 * sinfo.ads, sem_ch7.adb: Minor reformatting.
1181 2011-08-29 Bob Duff <duff@adacore.com>
1183 * sem_ch4.adb (Analyze_Allocator): Check No_Nested_Finalization
1184 restriction on allocators, as required by AI05-0013-1.
1185 * restrict.ads: Minor comment fix.
1187 2011-08-29 Tristan Gingold <gingold@adacore.com>
1189 * a-exexpr.adb, a-except-2005.ads (Jmpbuf_Address): Move to a-exexpr.adb
1190 (To_Jmpbuf_Address): Ditto
1191 (builtin_longjmp): Ditto
1193 2011-08-29 Thomas Quinot <quinot@adacore.com>
1195 * sem_res.adb: Minor reformatting.
1197 2011-08-29 Vincent Celier <celier@adacore.com>
1199 * make.adb (Gnatmake): Move special processing for VM targets after the
1200 call to Get_Target_Parameters.
1202 2011-08-29 Thomas Quinot <quinot@adacore.com>
1204 * sem_ch12.adb, par-ch12.adb: Minor reformatting.
1206 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
1208 * sem_res.adb (Resolve_Allocator): Implement Ada2012-B052. Detect cases
1209 where an anonymous access discriminant of a limited designated type
1210 appears in a non-immutably limited discriminated type and issue an
1211 error message. Add local variable Desig_T and replace all occurrences
1214 2011-08-29 Jose Ruiz <ruiz@adacore.com>
1216 * a-rttiev.adb (Set_Handler): Update comment to indicate that our
1217 implementation is compliant to RM D.15(15/2) after the modification
1218 imposed by AI05-0094-1 (binding interpretation).
1220 2011-08-29 Robert Dewar <dewar@adacore.com>
1222 * exp_ch9.adb, s-tasren.adb, exp_sel.adb, exp_sel.ads, exp_ch11.adb,
1223 s-interr-hwint.adb, s-tpobop.adb, sem_ch13.adb: Minor reformatting.
1225 2011-08-29 Thomas Quinot <quinot@adacore.com>
1227 * par-endh.adb (Check_End): For an END where it is mandatory to repeat
1228 the scope name, do not report a missing label as a style violation (it
1229 will be diagnosed as an illegality).
1230 * exp_dist.adb (Add_Params_For_Variant_Components): Fix handling of
1231 variant records: Get_Enum_Lit_From_Pos already returns a usage
1232 occurrence of the literal, no need to use New_Occurrence_Of. Set Etype
1233 on Expr in Integer_Literal case so that it can be used by
1236 2011-08-29 Tristan Gingold <gingold@adacore.com>
1238 * exp_sel.ads (Build_Abort_BLock_Handler): New function spec.
1240 * exp_sel.adb (Build_Abort_Block): Use Build_Abort_Block_Handler.
1241 (Build_Abort_Block_Handler): New function to build an Abort_Signal
1243 * exp_ch9.adb (Expand_N_Asynchronous_Select): Call
1244 Build_Abort_Block_Handler to build the exception handler. Do not
1245 undefer aborts for the Abort_Signal exception handler if back-end
1246 exception mechanism.
1247 * exp_ch11.adb (Expand_Exception_Handlers): Do not undefer aborts if
1248 back_end exceptions for all others and abort_signal.
1249 * s-except.ads (ZCX_By_Default): New constant.
1250 * a-except-2005.adb (Raise_Exception): Do not defer abort if ZCX.
1251 (Raise_Exception_Always): Ditto.
1252 (Raise_From_Signal_Handler): Ditto.
1253 (Raise_With_Location_And_Msg): Ditto.
1254 (Raise_With_Msg): Ditto.
1256 (Reraise_Occurence): Ditto.
1257 (Reraise_Occurrence_Always): Ditto.
1258 * s-tasren.adb (Exceptional_Complete_Rendezvous): Defer aborts if ZCX.
1259 * s-tpobop.adb: (Exceptional_Complete_Body): Undefer abort if ZCX.
1261 2011-08-29 Thomas Quinot <quinot@adacore.com>
1263 * sem_util.ads (Get_Enum_Lit_From_Pos): Clarify documentation.
1265 2011-08-29 Robert Dewar <dewar@adacore.com>
1267 * snames.adb-tmpl, sem_ch13.adb: Minor reformatting
1268 Minor code reorganization.
1270 2011-08-29 Bob Duff <duff@adacore.com>
1272 * usage.adb (-gnatwy): Fix documentation: this switch applies to Ada
1273 2012, not just Ada 2005.
1275 2011-08-29 Vincent Celier <celier@adacore.com>
1277 * gnat_ugn.texi: Indicate that when the compiler is called by gnatmake
1278 with a project file or with gprbuid, if -gnatep= is specified, the
1279 builder may need to be invoked with -x.
1281 2011-08-29 Tristan Gingold <gingold@adacore.com>
1283 * a-exexpr-gcc.adb: Minor comment fix.
1285 2011-08-29 Robert Dewar <dewar@adacore.com>
1287 * sem_ch8.adb: Minor reformatting.
1289 2011-08-29 Bob Duff <duff@adacore.com>
1291 * par-ch2.adb (P_Identifier): Warn that "some" is reserved in Ada 2012.
1292 * par-ch4.adb (P_Quantified_Expression): Remove unnecessary code for
1293 treating "some" as unreserved in earlier Ada versions. This is now
1294 handled in Snames.Is_Keyword_Name. Parse "for some" using Tok_Some,
1295 rather than Name_Some, since Tok_Some is now recognized as reserved.
1296 * scans.adb (Initialize_Ada_Keywords): Handle Tok_Some like any other
1298 * scans.ads: Minor comment fixes.
1299 * snames.adb-tmpl (Is_Keyword_Name): Handle Ada 2012 reserved words as
1300 for other language versions.
1301 * scn.adb (Scan_Reserved_Identifier): Remove unnecessary code for
1302 treating "some" as unreserved in earlier Ada versions. This is now
1303 handled in Snames.Is_Keyword_Name.
1304 * par-ch3.adb (P_Defining_Identifier): Warn that "some" is reserved in
1306 (P_Subtype_Mark_Resync): Remove unnecessary code for treating "some" as
1307 unreserved in earlier Ada versions. This is now handled in
1308 Snames.Is_Keyword_Name.
1309 * snames.ads-tmpl (Ada_2012_Reserved_Words): Handle Ada 2012 reserved
1310 words as for other language versions.
1311 * gnat_ugn.texi (-gnatwy): Fix documentation: this switch applies to
1312 Ada 2012, not just Ada 2005.
1314 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1316 * sem_ch13.adb: Additional semantic checks for aspects involved in
1319 2011-08-29 Matthew Heaney <heaney@adacore.com>
1321 * a-comutr.ads, a-comutr.adb, a-cimutr.ads, a-cimutr.adb,
1322 a-cbmutr.ads, a-cbmutr.adb (Find_In_Subtree): Remove superfluous
1323 Container parameter.
1324 (Ancestor_Find): ditto.
1326 2011-08-29 Thomas Quinot <quinot@adacore.com>
1328 * par-endh.adb: Minor reformatting.
1330 2011-08-29 Tristan Gingold <gingold@adacore.com>
1332 * a-exexpr-gcc.adb (Unwind_Action) Rewrite as an integer with constants.
1333 (GNAT_GCC_Exception): Remove N_Cleanups_To_Trigger component.
1334 (Adjust_N_CLeanups_For): Remove.
1335 (CleanupUnwind_Handler): Call Unhandled_Exception_Terminate when end of
1337 (Propgate_Exception): Adjust.
1338 * raise-gcc.c: Add a few static/const.
1339 (Adjust_N_Cleanups_For): Remove declaration.
1340 (PERSONALITY_FUNCTION): Remove code dealing with N_Cleanups_To_Trigger.
1342 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1344 * sem_ch8.adb: Use type of function return when rewriting as object
1347 2011-08-29 Gary Dismukes <dismukes@adacore.com>
1349 * sem_type.adb: Minor reformatting.
1351 2011-08-29 Robert Dewar <dewar@adacore.com>
1353 * makeutl.adb: Minor reformatting.
1355 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1357 * sem_ch8.adb (Analyze_Object_Renaming): If the renamed object is a
1358 function call of a limited type, the expansion of the renaming is
1359 complicated by the presence of various temporaries and subtypes that
1360 capture constraints of the renamed object.
1361 Rewrite node as an object declaration, whose expansion is simpler.
1362 Given that the object is limited there is no copy involved and no
1365 2011-08-29 Robert Dewar <dewar@adacore.com>
1367 * exp_ch5.adb, sinfo.ads, make.adb, s-pooglo.adb, sem_ch12.adb,
1368 freeze.adb, sem_ch6.adb, par-ch12.adb: Minor reformatting.
1370 2011-08-29 Tristan Gingold <gingold@adacore.com>
1372 * system-darwin-x86.ads, system-linux-s390x.ads, system-linux-alpha.ads,
1373 system-tru64.ads, system-irix-n32.ads, system-vxworks-arm.ads,
1374 system-linux-hppa.ads, system-linux-s390.ads,
1375 system-solaris-sparcv9.ads, system-mingw.ads, system-linux-ia64.ads,
1376 system-vms_64.ads, system-vxworks-sparcv9.ads, system-linux-ppc.ads,
1377 system-aix64.ads, system-lynxos-ppc.ads, system-linux-sh4.ads,
1378 system-solaris-x86.ads, system-linux-x86_64.ads, system-linux-x86.ads,
1379 system-vxworks-ppc.ads, system-hpux.ads, system-darwin-ppc.ads,
1380 system-solaris-sparc.ads, system-lynxos-x86.ads,
1381 system-vxworks-m68k.ads, system-hpux-ia64.ads, system-irix-o32.ads,
1382 system-solaris-x86_64.ads, system-mingw-x86_64.ads,
1383 system-vxworks-mips.ads, system-linux-sparc.ads, system-vms-ia64.ads,
1384 system-freebsd-x86.ads, system-aix.ads, system-darwin-x86_64.ads,
1385 system-vxworks-x86.ads: Remove GCC_ZCX_Support
1386 * s-taprop-posix.adb, s-taprop-irix.adb, s-taprop-vxworks.adb,
1387 s-taprop-tru64.adb, s-taprop-linux.adb, s-taprop-solaris.adb: Ditto.
1388 * opt.ads: Adjust comment.
1389 * targparm.ads, targparm.adb: Remove GCC_ZCX_Support_On_Target.
1390 * gnat1drv.adb: Do not check for GCC_ZCX_Support_On_Target.
1391 * system.ads: Move GCC_ZCX_Support to obsolete entries.
1393 2011-08-29 Emmanuel Briot <briot@adacore.com>
1395 * makeutl.adb (Do_Complete): Resolve symbolic links when a relative
1396 file name is specified on the gnatmake or gprbuild command line, and
1397 before we search for that file in the project.
1399 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1401 * sem_type.adb (Within_Instance): New predicate in Collect_Interps,
1402 used to determine whether a possible interpretation for an overloadable
1403 entity is declared within the current instantiation and should be
1404 included in the candidate set.
1406 2011-08-29 Vasiliy Fofanov <fofanov@adacore.com>
1408 * gnat_rm.texi, gnat_ugn.texi: Clean ups.
1410 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1412 * sem_res.adb (Resolve_Actuals): Use base type to determine whether an
1413 access subtype is access_to_subprogram, when applying checks for
1416 2011-08-29 Matthew Heaney <heaney@adacore.com>
1418 * a-comutr.adb, a-cimutr.adb, a-cbmutr.adb (Splice_Subtree): Only check
1419 for sibling when common parent.
1421 2011-08-29 Thomas Quinot <quinot@adacore.com>
1423 * get_scos.adb: Literals of Pragma_Id are pragma names prefixed with
1426 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1428 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Enable freeze actions
1429 for the return type when in ASIS mode.
1431 2011-08-29 Vincent Celier <celier@adacore.com>
1433 * make.adb (Gnatmake): Get the default search dirs, then the target
1434 parameters after getting the Builder switches, as the Builder switches
1435 may include --RTS= and that could change the default search dirs.
1437 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
1439 * exp_ch7.adb (Make_Adjust_Call): Rewrite to mimic the structure of
1440 Make_Final_Call. Move the processing for class-wide types before the
1441 processing for derivations from [Limited_]Controlled.
1442 (Make_Final_Call): Move the processing for class-wide types before the
1443 processing for derivations from [Limited_]Controlled.
1444 * s-stposu.adb (Allocate_Any_Controlled): Correct the membership check.
1445 Add code to account for alignments larger than the list header. Add a
1446 comment illustrating the structure of the allocated object + padding +
1448 (Deallocate_Any_Controlled): Add code to account for alignments larger
1449 than the list header.
1451 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1453 * sinfo.ads, sinfo.adb: New node kind
1454 N_Formal_Incomplete_Type_Definition, related flags.
1455 par-ch12.adb (P_Formal_Type_Declaration, G_Formal_Type_Definition):
1456 Parse formal incomplete types.
1457 * sem.adb (Analyze): Formal_Incomplete_Type_Definitions are handled in
1459 * sem_ch7.adb (Analyze_Package_Specification, Unit_Requires_Body):
1460 Formal incomplete types do not need completion.
1461 * sem_ch12.adb (Analyze_Formal_Incomplete_Type,
1462 Validate_Incomplete_Type_Instance): New procedures to handle formal
1464 * freeze.adb (Freeze_Entity): Do not freeze the subtype of an actual
1465 that corresponds to a formal incomplete type.
1466 * sprint.adb: Handle formal incomplete type declarations.
1467 * exp_util.adb (Insert_Actions): An incomplete_type_definition is not
1470 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
1472 * a-fihema.ads, a-fihema.adb: Unit removed.
1473 * a-undesu.ads, a-undesu.adb: New unit implementing
1474 Ada.Unchecked_Deallocate_Subpool.
1475 * einfo.adb: Remove Associated_Collection from the node usage.
1476 Add Finalization_Master to the node usage.
1477 (Associated_Collection): Removed.
1478 (Finalization_Master): New routine.
1479 (Set_Associated_Collection): Removed.
1480 (Set_Finalization_Master): New routine.
1481 (Write_Field23_Name): Remove Associated_Collection from the output. Add
1482 Finalization_Master to the output.
1483 * einfo.ads: Remove attribute Associated_Collection and its uses in
1485 Add new attribute Finalization_Master along with its uses in entitites.
1486 (Associated_Collection): Removed along with its pragma import.
1487 (Finalization_Master): New routine along with a pragma import.
1488 (Set_Associated_Collection): Removed along with its pragma import.
1489 (Set_Finalization_Master): New routine along with a pragma import.
1490 * exp_ch3.adb (Expand_Freeze_Array_Type): Replace call to
1491 Build_Finalization_Collection with Build_Finalization_Master.
1492 (Expand_Freeze_Record_Type): Move the generation of Finalize_Address
1493 before the bodies of the predefined routines. Add comment explaining
1494 this. Replace call to Build_Finalization_Collection with
1495 Build_Finalization_Master.
1496 (Freeze_Type): Replace call to Build_Finalization_Collection with
1497 Build_Finalization_Master.
1498 (Make_Finalize_Address_Body): Comment reformatting.
1499 (Make_Predefined_Primitive_Specs): Code reformatting.
1500 (Stream_Operation_OK): Update comment mentioning finalization
1501 collections. Replace RE_Finalization_Collection with
1502 RE_Finalization_Master.
1503 * exp_ch4.adb (Complete_Controlled_Allocation): Replace call to
1504 Associated_Collection with Finalization_Master. Replace call to
1505 Build_Finalization_Collection with Build_Finalization_Master.
1506 (Expand_Allocator_Expression): Replace call to Associated_Collection
1507 with Finalization_Master. Replace call to Set_Associated_Collection with
1508 Set_Finalization_Master. Remove the generation of
1509 Set_Finalize_Address_Ptr.
1510 (Expand_N_Allocator): Replace call to Associated_Collection with
1511 Finalization_Master. Remove the generation of Set_Finalize_Address_Ptr.
1512 * exp_ch6.adb (Add_Collection_Actual_To_Build_In_Place_Call): Renamed to
1513 Add_Finalization_Master_Actual_To_Build_In_Place_Call. Update the
1514 comment on usage. Replace call to Needs_BIP_Collection with
1515 Needs_BIP_Finalization_Master Remplace BIP_Collection with
1516 BIP_Finalization_Master. Update all comments which mention finalization
1517 collections. Replace Associated_Collection with
1518 Finalization_Master. Replace Build_Finalization_Collection with
1519 Build_Finalization_Master.
1520 (BIP_Formal_Suffix): Update BIP_Collection's case.
1521 (Build_Heap_Allocator): Update the related comment. Rename local
1522 variable Collect to Fin_Mas_Id and update its occurrences. Update
1523 comments which mention finalization collections. Replace
1524 Set_Associated_Collection with Set_Finalization_Master.
1525 (Expand_Call): Update the code which detects a special piece of library
1527 (Make_Build_In_Place_Call_In_Allocator): Replace the call to
1528 Add_Collection_Actual_To_Build_In_Place_Call with
1529 Add_Finalization_Master_Actual_To_Build_In_Place_Call. Remove the code
1530 which generates a call to Make_Set_Finalize_Address_Ptr_Call.
1531 (Make_Build_In_Place_Call_In_Anonymous_Context): Replace call to
1532 Add_Collection_Actual_To_Build_In_Place_Call with
1533 Add_Finalization_Master_Actual_To_Build_In_Place_Call.
1534 (Make_Build_In_Place_Call_In_Assignment): Replace call to
1535 Add_Collection_Actual_To_Build_In_Place_Call with
1536 Add_Finalization_Master_Actual_To_Build_In_Place_Call.
1537 (Needs_BIP_Collection): Renamed to Needs_BIP_Finalization_Master.
1538 * exp_ch6.ads: Rename BIP_Collection to BIP_Finalization_Master.
1539 (Needs_BIP_Collection): Renamed to Needs_BIP_Finalization_Master.
1540 * exp_ch7.adb (Build_BIP_Cleanup_Stmts): Update comment on usage.
1541 Rename local variable Collect to Fin_Mas_Id and update its occurrences.
1542 Replace call to Set_Associated_Collection with Set_Finalization_Master.
1543 (Build_Finalization_Collection): Renamed to Build_Finalization_Master.
1544 Replace the call to Associated_Collection with Finalization_Master.
1545 Rename local variable Coll_Id to Fin_Mas_Id and update its occurrences.
1546 Update the way finalization master names are generated. Update the
1547 retrieval of the correct access type which will carry the pool and
1549 (Make_Final_Call): Reimplement the way [Deep_]Finalize is retrieved.
1550 (Make_Finalize_Address_Body): Abstract types do not need
1551 Finalize_Address. Code reformatting.
1552 (Make_Finalize_Address_Stmts): Update comment on usage.
1553 (Make_Set_Finalize_Address_Ptr_Call): Removed.
1554 (Process_Declarations): Update comments.
1555 * exp_ch7.ads (Build_Finalization_Collection): Renamed to
1556 Build_Finalization_Master. Update associated comment.
1557 (Make_Set_Finalize_Address_Ptr_Call): Removed.
1558 * exp_ch13.adb: Update comments which mention finalization collections.
1559 (Expand_N_Free_Statement): Replace the call to Associated_Collection
1560 with Finalization_Master.
1561 * exp_util.adb (Build_Allocate_Deallocate_Proc): Reimplemented to
1562 create calls to routines Allocate_Any_Controlled and
1563 Deallocate_Any_Controlled.
1564 (Find_Finalize_Address): New routine.
1565 (Is_Allocate_Deallocate_Proc): Update the RTE entities used in the
1567 (Requires_Cleanup_Actions): Update the comment on freeze node
1569 * exp_util.ads: Remove comment on generated code for
1570 Build_Allocate_Deallocate_Proc. The code is now quite complex and it
1571 is better to simply look in the body.
1572 * freeze.adb (Freeze_All): Update the comment of finalization
1573 collections. Replace the call to Associated_Collection with
1574 Finalization_Master. Replace the call to Build_Finalization_Collection
1575 with Build_Finalization_Master.
1576 * impunit.adb: Add a-undesu and s-stposu to the list of units.
1577 * Makefile.rtl: Add files a-undesu, s-finmas and s-stposu. Remove file
1579 * rtsfind.adb (Get_Unit_Name): Remove the processing for children of
1580 Ada.Finalization. Add processing for children of System.Storage_Pools.
1581 * rtsfind.ads: Remove the naming of second level children of
1583 Remove Ada_Finalization_Heap_Management from the list of units.
1584 Remove subtype Ada_Finalization_Child.
1585 Remove the following subprogram entities:
1589 RE_Finalization_Collection
1590 RE_Finalization_Collection_Ptr
1591 RE_Set_Finalize_Address_Ptr
1593 Add the naming of second level children of System.Storage_Pools.
1594 Add System_Finalization_Masters and System_Storage_Pools_Subpools to
1596 Add subtype System_Storage_Pools_Child.
1597 Add the following subprogram entities to System.Finalization_Masters:
1599 RE_Finalization_Master
1600 RE_Finalization_Master_Ptr
1602 Add the following subprogram entities to System.Storage_Pools.Subpools:
1604 RE_Allocate_Any_Controlled
1605 RE_Deallocate_Any_Controlled
1606 RE_Root_Storage_Pool_With_Subpools
1610 Move the following subprogram entities from
1611 Ada.Finalization.Heap_Management to System.Finalization_Masters:
1613 RE_Add_Offset_To_Address
1618 * sem_ch3.adb (Access_Type_Declaration): Replace the call to
1619 Set_Associated_Collection with Set_Finalization_Master.
1620 * sem_ch6.adb (Create_Extra_Formals): Update the way extra formal
1621 BIP_Finalization_Master is created.
1622 * s-finmas.adb: New unit System.Finalization_Masters.
1623 * s-finmas.ads: New unit System.Finalization_Masters.
1624 * s-stopoo.ads, s-stopoo.adb: Minor code reformatting.
1625 * s-stposu.ads, s-stposu.adb: New unit implementing
1626 System.Storage_Pools.Subpools.
1628 2011-08-29 Bob Duff <duff@adacore.com>
1630 * tbuild.adb: Add assertion.
1632 2011-08-29 Thomas Quinot <quinot@adacore.com>
1634 * s-pooglo.adb: Minor reformatting.
1636 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1638 * exp_ch5.adb (Expand_N_Assignment_Statement): if the left-hand side is
1639 an indexed component of a packed array whose element type is a record
1640 with a representation clause different from that of the right-hand
1641 side, generate a temporary to minimuze the number of bit-field
1642 operations generated.
1644 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1646 * exp_util.adb (Insert_Actions): Use clauses can be part of lists of
1647 declarations, and thus are likely insertion points for actions.
1649 2011-08-29 Bob Duff <duff@adacore.com>
1651 * einfo.ads: Minor comment fix.
1653 2011-08-29 Robert Dewar <dewar@adacore.com>
1655 * frontend.adb, gnat1drv.adb: Minor reformatting.
1657 2011-08-29 Tristan Gingold <gingold@adacore.com>
1659 * s-pooglo.adb (Allocate, Deallocate): Take into account the alignment.
1660 * a-fihema.adb (Allocate, Deallocate): Ditto. Possibly add padding
1661 space in front of the header.
1663 2011-08-29 Johannes Kanig <kanig@adacore.com>
1665 * frontend.adb (Frontend): Exit after creating Standard package when
1666 -gnatd.H is present.
1667 * gnat1drv.adb (Gnat1drv): Call Backend right away when -gnatd.H is
1670 2011-08-29 Robert Dewar <dewar@adacore.com>
1672 * exp_ch9.adb, mlib-prj.adb, prj.adb, prj.ads, ttypes.ads, sem_ch4.adb,
1673 makeutl.adb, makeutl.ads, atree.ads, snames.adb-tmpl,
1674 snames.ads-tmpl: Minor reformatting.
1676 2011-08-29 Philippe Gil <gil@adacore.com>
1678 * prj.adb (Reset_Units_In_Table): New procedure.
1679 Reset units to avoid access to freed memory.
1681 2011-08-29 Thomas Quinot <quinot@adacore.com>
1683 * get_scos.adb: When reading a P statement SCO without a pragma name
1684 (from an older ALI file), ensure that the Pragma_Name component is set
1685 to Unknown_Pragma (not left uninitialized).
1687 2011-08-29 Vincent Celier <celier@adacore.com>
1689 * makeutl.adb (Get_Directories): New procedure moved from Buildgpr and
1690 modified to compute correctly the object path of a SAL project that is
1691 extending another library project.
1692 (Write_Path_File): New procedure.
1693 * makeutl.ads (Directories): New table moved from Buildgpr
1694 (Get_Directories): New procedure moved from Buildgpr
1695 (Write_Path_File): New procedure
1696 * mlib-prj.adb (Build_Library): Use Makeutl.Get_Directories to set the
1697 paths before binding SALs, instead of Set_Ada_Paths.
1698 * prj-env.adb (Set_Path_File_Var): Procedure has been moved to package
1700 * prj.adb (Set_Path_File_Var): New procedure moved from Prj.Env
1701 (Current_Source_Path_File_Of): New function
1702 (Set_Current_Object_Path_File_Of): New procedure
1703 (Current_Source_Object_File_Of): New function
1704 (Set_Current_Object_Path_File_Of): New procedure
1705 * prj.ads (Set_Path_File_Var): New procedure moved from Prj.Env
1706 (Current_Source_Path_File_Of): New function
1707 (Set_Current_Object_Path_File_Of): New procedure
1708 (Current_Source_Object_File_Of): New function
1709 (Set_Current_Object_Path_File_Of): New procedure
1711 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1713 * exp_ch5.adb (Expand_N_Assignment_Statement): For an assignment to a
1714 packed entity, use a bit-field assignment only if there is no change of
1717 2011-08-29 Thomas Quinot <quinot@adacore.com>
1719 * rtsfind.ads, exp_ch3.adb (In_Runtime): Minor code improvement, use
1720 Is_RTU instead of using Chars comparisons.
1722 2011-08-29 Thomas Quinot <quinot@adacore.com>
1724 * exp_strm.adb (Build_Mutable_Record_Read_Procedure): Do not create a
1725 temporary object if the actual is constrained, and the discriminants
1726 read from the stream don't match.
1728 2011-08-29 Tristan Gingold <gingold@adacore.com>
1730 * sem_attr.adb, exp_attr.adb: Add handling of
1731 Attribute_System_Allocator_Alignment
1732 * snames.ads-tmpl: Add Name_System_Allocator_Alignment and
1733 Attribute_System_Allocator_Alignment.
1734 * ttypes.ads, get_targ.ads: Add Get_System_Allocator_Alignment.
1735 * gcc-interface/targtyps.c, gcc-interface/utils2.c,
1736 gcc-interface/gigi.h: Renames get_target_default_allocator_alignment to
1737 get_target_system_allocator_alignment.
1739 2011-08-29 Arnaud Charlet <charlet@adacore.com>
1741 * gcc-interface/Makefile.in, gcc-interface/Make-lang.in: Update
1744 2011-08-29 Arnaud Charlet <charlet@adacore.com>
1746 * exp_ch3.adb (In_Runtime): Fix typo.
1748 2011-08-29 Bob Duff <duff@adacore.com>
1750 * sem_ch4.adb (Analyze_Allocator): Analyze the subpool specification.
1752 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1754 * exp_ch3.adb (Expand_N_Object_Declaration): If the entity is tagged
1755 and a separate tag assignment is generated, ensure that the tag
1756 assignment is analyzed.
1758 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1760 * atree.ads, atree.adb (Copy_Separate_List): New function that applies
1761 Copy_Separate_Tree to a list of nodes. Used to create disjoint copies
1762 of statement lists that may contain local declarations.
1763 * exp_ch9.adb (Expand_N_Timed_Entry_Call): Use Copy_Separate_List to
1764 duplicate the triggering statements needed for the expansion of this
1765 construct, when the trigger is a dispatching call to a synchronized
1768 2011-08-29 Arnaud Charlet <charlet@adacore.com>
1770 * gnat_rm.texi: Add doc for 'Elab_Subp_Body.
1771 * bindgen.adb: Add comments.
1772 * snames.adb-tmpl (Is_Attribute_Name): Only recognize 'Elab_Subp_Body
1775 2011-08-29 Robert Dewar <dewar@adacore.com>
1777 * exp_attr.adb: Minor reformatting.
1778 Minor code reorganization and commenting.
1779 * par_sco.adb, checks.adb, sem_attr.adb, get_scos.adb: Minor
1782 2011-08-29 Thomas Quinot <quinot@adacore.com>
1784 * get_scos.adb: Ignore chaining indicators not currently supported
1787 2011-08-29 Arnaud Charlet <charlet@adacore.com>
1789 * system.ads: Minor editing.
1791 2011-08-29 Arnaud Charlet <charlet@adacore.com>
1793 * bindgen.adb (Gen_Elab_Calls): Generate calls to subp'Elab_Subp_Body in
1795 * sem_attr.ads, sem_attr.adb, exp_Attr.adb, sem_ch6.adb: Add handling of
1796 Attribute_Elab_Subp_Body.
1797 * snames.ads-tmpl (Attribute_Elab_Subp_Body, Name_Elab_Subp_Body): New.
1798 * sem_util.adb: Update comments.
1800 2011-08-29 Thomas Quinot <quinot@adacore.com>
1802 * par_sco.adb, scos.adb, scos.ads, put_scos.adb, get_scos.adb: Record
1803 pragma name for each SCO statement corresponding to a pragma.
1805 2011-08-29 Arnaud Charlet <charlet@adacore.com>
1807 * opt.ads: Minor editing.
1809 2011-08-29 Yannick Moy <moy@adacore.com>
1811 * gnat1drv.adb (Adjust_Global_Switches): Remove options for ALFA mode
1812 that only made sense for CodePeer mode.
1814 2011-08-29 Jose Ruiz <ruiz@adacore.com>
1816 * targparm.ads (Support_64_Bit_Divides_On_Target): Remove this flag
1817 which is no longer used.
1818 * targparm.adb (S64, S64_Str, Get_Target_Parameters): Remove the
1819 handling of the 64-bit division check.
1820 * exp_ch4.adb (Expand_N_Op_Divide): Remove the check for 64-bit
1822 * system*.ads (Support_64_Bit_Divides): Remove this flag which is no
1825 2011-08-29 Thomas Quinot <quinot@adacore.com>
1827 * get_scos.adb: Minor reformatting.
1829 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
1831 * exp_util.adb (Process_Statements_For_Controlled_Objects): Whenever a
1832 statement list is wrapped in a block, the block is explicitly analyzed
1833 in order to properly redecorate the entities and create a servicing
1836 2011-08-29 Tristan Gingold <gingold@adacore.com>
1838 * sinfo.ads, sinfo.adb (Zero_Cost_Handling): Remove.
1839 (Set_Zero_Cost_Handling): Remove.
1841 2011-08-29 Thomas Quinot <quinot@adacore.com>
1843 * par_sco.adb, scos.ads, put_scos.adb, get_scos.adb: Minor reformatting
1845 2011-08-29 Geert Bosch <bosch@adacore.com>
1847 * s-vaflop-vms-alpha.adb (Neg_F): Use subtraction instead of negation
1848 instruction, as the latter may produce -0.0, which is not a valid VAX
1850 (Neg_G): Likewise for VAX F float.
1852 2011-08-29 Robert Dewar <dewar@adacore.com>
1854 * exp_util.adb: Minor reformatting.
1856 2011-08-29 Yannick Moy <moy@adacore.com>
1858 * sem_ch3.adb: Minor comment update.
1860 2011-08-29 Thomas Quinot <quinot@adacore.com>
1862 * checks.adb (Apply_Type_Conversion_Checks): Use the Underlying_Type of
1865 2011-08-29 Thomas Quinot <quinot@adacore.com>
1867 * par_sco.adb (Traverse_Declarations_Or_Statements): Do not flush
1868 current statement sequence on a generic instantiation or a subprogram
1871 2011-08-29 Robert Dewar <dewar@adacore.com>
1873 * sem_type.adb, einfo.ads, freeze.adb, exp_ch4.adb, sem_ch13.adb:
1876 2011-08-29 Hristian Kirtchev <kirtchev@adacore.com>
1878 * exp_util.adb (Requires_Cleanup_Actions (List_Id, Boolean, Boolean)):
1879 Correct the check which involves the freeze node of a controlled or
1880 access-to-controlled type.
1882 2011-08-29 Geert Bosch <bosch@adacore.com>
1884 * sem_warn.adb (Check_Code_Statement): Remove check for consecutive Asm
1886 * s-vaflop-vms-alpha.adb: Remove bogus Volatile => True arguments from
1889 2011-08-29 Yannick Moy <moy@adacore.com>
1891 * sem_ch3.adb (Array_Type_Declaration): Insert a subtype declaration
1892 for every index type and component type that is not a subtype_mark.
1893 (Process_Subtype): Set Etype of subtype.
1895 2011-08-29 Robert Dewar <dewar@adacore.com>
1897 * a-cbmutr.adb, a-cimutr.adb, a-comutr.adb, prj-nmsc.adb: Minor code
1898 reorganization. Minor reformatting.
1900 2011-08-29 Steve Baird <baird@adacore.com>
1902 * exp_ch4.adb (Expand_N_Op_Expon): Suppress N_Op_Expon node expansion
1903 for CodePeer and ALFA modes.
1905 2011-08-29 Ed Schonberg <schonberg@adacore.com>
1907 * sem_type.adb (Collect_Interps): Within an instance, collect a homonym
1908 that comes from an enclosing scope if it is not the renaming of an
1909 actual, to handle properly a spurious ambiguity in an instance.
1911 2011-08-29 Eric Botcazou <ebotcazou@adacore.com>
1913 * sem_ch13.adb (Alignment_Check_For_Esize_Change): Rename to...
1914 (Alignment_Check_For_Size_Change): ...this. Add SIZE parameter and
1915 use it instead of the Esize of the first parameter.
1916 (Analyze_Attribute_Definition_Clause) <Object_Size>: Adjust call to
1918 <Size>: Likewise. Call it for composite types on the RM size.
1920 2011-08-29 Yannick Moy <moy@adacore.com>
1922 * exp_ch4.adb (Expand_N_Op_Not): Do not expand not on array.
1923 * sem_util.adb (Unique_Name): Correct behaviour for names of
1926 2011-08-29 Yannick Moy <moy@adacore.com>
1928 * sem_prag.adb (Check_Precondition_Postcondition): In formal
1929 verification mode, analyze pragma expression for correctness, for
1930 pre/post on library-level subprogram, as it is not expanded later.
1932 2011-08-29 Yannick Moy <moy@adacore.com>
1934 * exp_aggr.adb (Expand_Array_Aggregate): Do not expand array aggregates
1935 in formal verification.
1937 2011-08-29 Thomas Quinot <quinot@adacore.com>
1939 * sem_util.adb: Minor reformatting.
1940 * freeze.adb, sem_ch13.adb: Fix comment: Bit_Order is an attribute,
1942 * par_sco.ads, par_sco.adb: Update comments.
1944 2011-08-29 Yannick Moy <moy@adacore.com>
1946 * einfo.adb, einfo.ads: Remove flag Is_Postcondition_Proc and
1947 associated getter/setter.
1948 * sem_ch6.adb: Remove reference to Is_Postcondition_Proc.
1950 2011-08-29 Vincent Celier <celier@adacore.com>
1952 * prj-attr.adb: New Compiler attribute Dependency_Kind and Language_Kind
1953 * prj-conf.adb: Add_Default_GNAT_Naming_Scheme: Add a package Compiler
1954 with declarations for Language_Kind and Dependency_Kind for Ada.
1955 * prj-nmsc.adb (Check_Unit_Name): New name of procedure Check_Ada_Name
1956 (Process_Compiler): Take into account the new attributes Dependency_Kind
1958 (Check_Configuration): Check if language kind is unit based, not if the
1959 language name is Ada.
1960 (Process_Exceptions_Unit_Based): Ditto
1961 (Add_Language): Remove default additions of language and dependency kind
1962 * prj.ads: Minor comment change
1963 * snames.ads-tmpl: New standard names Dependency_Kind and Language_Kind
1965 2011-08-29 Johannes Kanig <kanig@adacore.com>
1967 * debug.adb: Update comments.
1969 2011-08-24 Joseph Myers <joseph@codesourcery.com>
1971 * gcc-interface/Make-lang.in (CFLAGS-ada/tracebak.o)
1972 (CFLAGS-ada/targext.o, CFLAGS-ada/cio.o, CFLAGS-ada/init.o)
1973 (CFLAGS-ada/initialize.o, CFLAGS-ada/raise.o): New.
1974 (ada/tracebak.o, ada/targext.o, ada/cio.o, ada/init.o)
1975 (ada/initialize.o, ada/raise.o): Remove explicit compilation rules.
1977 2011-08-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
1979 * gcc-interface/Makefile.in (PICFLAG_FOR_TARGET): New.
1980 (GNATLIBCFLAGS_FOR_C): Replace
1981 TARGET_LIBGCC2_CFLAGS by PICFLAG_FOR_TARGET.
1982 (gnatlib-shared-default, gnatlib-shared-dual-win32)
1983 (gnatlib-shared-win32, gnatlib-shared-darwin, gnatlib-shared)
1984 (gnatlib-sjlj, gnatlib-zcx): Likewise.
1986 2011-08-07 Eric Botcazou <ebotcazou@adacore.com>
1988 * gcc-interface/Makefile.in (raise-gcc.o): Fix previous change.
1990 * gcc-interface/gigi.h (enumerate_modes): Fix formatting.
1992 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Revert latest change.
1994 2011-08-05 Nicolas Roche <roche@adacore.com>
1996 * gcc-interface/Makefile.in: Don't use directly ../xgcc to build shared
1997 libgnat. Use rather the value of GCC_FOR_TARGET. Fix issue with
1999 * gcc-interface/Make-lang.in: Add support for canadian cross setting.
2001 2011-08-05 Matthew Heaney <heaney@adacore.com>
2003 * a-comutr.adb, a-cimutr.adb, a-cbmutr.adb (Child_Count, Child_Depth):
2004 subprogram bodies declared out-of-order.
2006 2011-08-05 Yannick Moy <moy@adacore.com>
2008 * sem_util.adb (Unique_Name): only prefix with "standard" the names of
2009 entities directly in package Standard, otherwise skip the standard
2012 2011-08-05 Robert Dewar <dewar@adacore.com>
2014 * a-cbmutr.adb: Minor reformatting
2015 (Allocate_Node): refactor node allocation algorithm
2017 2011-08-05 Robert Dewar <dewar@adacore.com>
2019 * opt.ads, opt.adb (Debug_Pragmas_Disabled): New switch.
2020 * sem_prag.adb (Analyze_Pragma, case Debug_Policy): Implement Disable
2022 (Analyze_Pragma, case Check_Policy): Ditto.
2023 * sem_prag.ads (Check_Disabled): New function
2024 * snames.ads-tmpl: Add Name_Disable.
2026 2011-08-05 Robert Dewar <dewar@adacore.com>
2028 * gnat_rm.texi: Document implementation-defined policy DISABLE for
2029 pragmas Assertion_Policy, Check_Policy, Debug_Policy.
2031 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2033 * sem_prag.adb (Analyze_Pragma, case Inline): reject an Inline pragma
2034 that appears in a generic formal part and applies to a formal
2037 2011-08-05 Robert Dewar <dewar@adacore.com>
2039 * a-cbmutr.ads: Minor reformatting.
2041 2011-08-05 Matthew Heaney <heaney@adacore.com>
2043 * a-comutr.adb, a-cimutr.adb, a-cbmutr.adb (Read): do not use T'Valid
2044 to check count, check sign of value instead.
2045 * a-comutr.adb, a-cimutr.adb (Write): return immediately if tree empty
2046 (Copy_Subtree): allocate copy of source element
2047 (Equal_Subtree): compare elements, not access objects
2049 2011-08-05 Vincent Celier <celier@adacore.com>
2051 * gnat_ugn.texi: Fix VMS alternative.
2053 2011-08-05 Thomas Quinot <quinot@adacore.com>
2055 * sem_ch11.adb: Add comment.
2057 2011-08-05 Robert Dewar <dewar@adacore.com>
2059 * exp_util.adb: Minor comment fix.
2061 2011-08-05 Robert Dewar <dewar@adacore.com>
2063 * scng.adb (Error_Unterminated_String): Improve flag position when
2066 2011-08-05 Matthew Heaney <heaney@adacore.com>
2068 * Makefile.rtl, impunit.adb: Added a-cbmutr.ad[sb] (bounded multiway
2070 * a-cbmutr.ads, a-cbmutr.adb: This is the new Ada 2012 unit for bounded
2071 multiway tree containers.
2073 2011-08-05 Robert Dewar <dewar@adacore.com>
2075 * styleg.adb (Check_Comment): Implement comment spacing of 1 or 2
2076 * stylesw.adb: Implement -gnatyC to control comment spacing
2077 * stylesw.ads (Style_Check_Comments_Spacing): New switch (set by
2079 * usage.adb: Add line for -gnatyC.
2081 2011-08-05 Robert Dewar <dewar@adacore.com>
2083 * gnat_ugn.texi: Document -gnatyC.
2084 * vms_data.ads: Implement COMMENTS1/COMMENTS2 (retaining COMMENTS as a
2085 synonym for COMMENTS2).
2087 2011-08-05 Robert Dewar <dewar@adacore.com>
2089 * par_sco.adb, sem_ch3.adb, scos.ads, a-iteint.ads, sem_ch12.adb,
2090 a-cimutr.adb, a-cimutr.ads, sem_util.ads, sem_res.adb, a-fihema.adb,
2091 sem_ch4.adb, lib-xref-alfa.adb, exp_disp.adb, a-comutr.adb,
2092 a-comutr.ads, lib-xref.adb: Minor reformatting.
2094 2011-08-05 Robert Dewar <dewar@adacore.com>
2096 * sem_ch11.adb (Analyze_Raise_Statement): Kill assignment to formal
2097 warning if there is an exception handler present.
2099 2011-08-05 Pascal Obry <obry@adacore.com>
2101 * a-iteint.ads: Fix copyright year.
2103 2011-08-05 Thomas Quinot <quinot@adacore.com>
2105 * par_sco.adb (Traverse_Declarations_Or_Statements): Do not generate a
2106 statement SCO for a USE clause or a representation clause.
2108 2011-08-05 Yannick Moy <moy@adacore.com>
2110 * lib-xref-alfa.adb (Collect_ALFA): generate the proper relation
2111 between body and spec for stub.
2112 (Detect_And_Add_ALFA_Scope): take into account subprogram stub
2113 * lib-xref.adb (Enclosing_Subprogram_Or_Package): in the case of a
2114 pragma precondition or postcondition, for which the enclosing
2115 subprogram or package in the AST is not the desired one, return empty.
2117 2011-08-05 Thomas Quinot <quinot@adacore.com>
2119 * g-expect.adb: Minor reformatting.
2121 2011-08-05 Bob Duff <duff@adacore.com>
2123 * a-fihema.adb: Comment out OS_Lib.
2125 2011-08-05 Matthew Heaney <heaney@adacore.com>
2127 * Makefile.rtl, impunit.adb: Added a-c[oi]mutr.ad[sb]
2128 (unbounded multiway tree containers) and a-iteint.ads.
2129 * a-comutr.ads, a-comutr.adb:
2130 This is the new Ada 2012 unit for unbounded multiway tree containers
2131 * a-cimutr.ads, a-cimutr.adb
2132 This is the new Ada 2012 unit for indefinite multiway tree containers
2133 * a-iteint.ads: New file.
2135 2011-08-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
2137 * gcc-interface/Makefile.in (raise-gcc.o): Search $(srcdir)/../libgcc.
2139 2011-08-05 Bob Duff <duff@adacore.com>
2141 * sinfo.ads, sinfo.adb (Subpool_Handle_Name): New attribute for
2143 * par-ch4.adb (P_Allocator): Parse new subpool specification syntax.
2145 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2147 * sem_ch4.adb (Try_Container_Indexing): New procedure to implement the
2148 general indexing aspects of Ada2012. Called when analyzing indexed
2149 components when other interpretations fail.
2150 * sem_ch8.adb (Find_Direct_Name): check for implicit dereference only
2151 in an expression context where overloading is meaningful. This excludes
2152 the occurrence in an aspect specification (efficiency only).
2153 * sem_attr.adb (Analyze_Attribute): indicate that the attributes
2154 related to iterators can be set by an attribute specification, but
2156 * sem_ch13.adb (Analyze_Aspect_Specifications): handle
2157 Constant_Indexing and Variable_Indexing.
2158 (Check_Indexing_Functions): New procedure to perform legality checks.
2159 Additional semantic checks at end of declarations.
2161 2011-08-05 Sergey Rybin <rybin@adacore.com>
2163 * tree_io.ads: Update ASIS_Version_Number because of the change of the
2164 order of calling Tree_Write/Tree_Read routines made for aspects.
2166 2011-08-05 Bob Duff <duff@adacore.com>
2168 * a-fihema.adb (Finalize): Fix race condition.
2170 2011-08-05 Yannick Moy <moy@adacore.com>
2172 * sem_ch12.adb (Analyze_Package_Instantiation,
2173 Need_Subprogram_Instance_Body): do not generate instance bodies in ALFA
2176 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2178 * sem_type.adb (Specific_Type): in an instance, the type-specific
2179 operand of an equality check that involves null may have a private
2180 type. Use full view to determine legality of construct.
2182 2011-08-05 Vincent Celier <celier@adacore.com>
2184 * gnatcmd.adb (Get_Closure): Do not crash when it is not possible to
2185 delete or close the file when the call to gnatmake was successful.
2187 2011-08-05 Yannick Moy <moy@adacore.com>
2189 * gnat1drv.adb (Adjust_Global_Switches): in ALFA mode, set
2190 Global_Discard_Names.
2192 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2194 * sinfo.ads: comments on use of entity field for aspect specifications.
2196 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2198 * sem_ch12.adb (Reset_Entity): If the entity field of the associated
2199 node is not itself an entity but a selected component, it is a
2200 rewritten parameterless call to an en enclosing synchronized operation,
2201 and this expansion will be performed again in the instance, so there is
2202 no global information to preserve.
2204 2011-08-05 Javier Miranda <miranda@adacore.com>
2206 * exp_disp.adb (Set_All_DT_Position): Cleanup code and improve support
2207 for renamings of predefined primitives.
2208 (In_Predef_Prims_DT): New subprogram.
2210 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2212 * sem_util.adb, sem_util.ads (Check_Implicit_Dereference): If a
2213 possible interpretation of name is a reference type, add an
2214 interpretation that is the designated type of the reference
2215 discriminant of that type.
2216 * sem_res.adb (resolve): If the interpretation imposed by context is an
2217 implicit dereference, rewrite the node as the deference of the
2218 reference discriminant.
2219 * sem_ch3.adb (Analyze_Subtype_Declaration, Build_Derived_Record_Type,
2220 Build_Discriminated_Subtype): Inherit Has_Implicit_Dereference from
2221 parent type or base type.
2222 * sem_ch4.adb (Process_Indexed_Component,
2223 Process_Overloaded_Indexed_Component, Indicate_Name_And_Type,
2224 Analyze_Overloaded_Selected_Component, Analyze_Selected_Component):
2225 Check for implicit dereference.
2226 (List_Operand_Interps): Indicate when an implicit dereference is
2228 * sem_ch8.adb (Find_Direct_Name): Check for implicit dereference.
2230 2011-08-05 Thomas Quinot <quinot@adacore.com>
2232 * scos.ads: Update documentation of SCO table. Pragma statements can now
2233 be marked as disabled (using 'p' instead of 'P' as the statement kind).
2234 * par_sco.ads, par_sco.adb: Implement the above change.
2235 (Process_Decisions_Defer): Generate a P decision for the first parameter
2236 of a dyadic pragma Debug.
2237 * sem_prag.adb (Analyze_Pragma, case Debug): Mark pragma as enabled if
2239 * put_scos.adb: Code simplification based on above change.
2241 2011-08-05 Robert Dewar <dewar@adacore.com>
2243 * sem_ch3.adb, gnatcmd.adb, switch-c.adb, exp_attr.adb, make.adb,
2244 bindgen.adb, einfo.adb, sem_ch12.adb, sem_attr.adb, a-fihema.adb,
2245 a-fihema.ads, sem_elab.adb, sem_elab.ads, aspects.adb, opt.ads,
2246 prj-conf.adb, sem_ch13.adb, s-ficobl.ads: Minor reformatting
2248 2011-08-05 Bob Duff <duff@adacore.com>
2250 * a-stunau.ads, g-spipat.adb: Update comments.
2252 2011-08-05 Bob Duff <duff@adacore.com>
2254 * a-fihema.ads: Minor comment fix.
2255 * a-fihema.adb (Allocate, Deallocate): Assert that the alignment is
2257 (Attach, Detach): Remove some unnecessary code.
2258 (Finalize): Remove Node_Ptr_To_Address, replace with a constant.
2260 2011-08-05 Bob Duff <duff@adacore.com>
2262 * a-fihema.ads, a-fihema.adb (Finalization_Collection): Avoid heap
2263 allocation for Objects component. This simplifies the code somewhat. It
2264 is also a little more efficient in the not-so-unusual case where there
2265 are no controlled objects allocated.
2266 Make Finalization_Started flag atomic.
2267 (Finalize): Avoid unnecessary detachment of items from the list.
2268 (pcol): Minor cleanup.
2270 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2272 * sem_ch12.adb (Analyze_Formal_Package_Declaration): reject a formal
2273 package whose name is the same as that of the generic unit, or its
2276 2011-08-05 Bob Duff <duff@adacore.com>
2278 * a-fihema.adb, a-fihema.ads: Minor comment improvements.
2279 * sem_ch3.adb, exp_ch5.adb, exp_ch7.adb, exp_ch7.ads, exp_util.adb:
2280 Minor comment fixes.
2282 2011-08-05 Arnaud Charlet <charlet@adacore.com>
2284 * make.adb (Linking_Phase): No longer need to set source search path
2285 before calling gnatlink in CodePeer mode.
2286 * gnatlink.adb (Gnatlink): No longer pass -gnat83/95/05/12 switch to
2287 gcc in CodePeer mode, since the binder generated file no longer has a
2289 * switch.ads, switch.adb (Is_Language_Switch): Removed.
2290 * switch-c.adb: Update comment.
2292 2011-08-05 Thomas Quinot <quinot@adacore.com>
2294 * exp_strm.adb, bindgen.adb, s-ficobl.ads: Minor reformatting.
2296 2011-08-05 Nicolas Roche <roche@adacore.com>
2298 * gnat_ugn.texi: Fix minor syntax error issue.
2300 2011-08-05 Vincent Celier <celier@adacore.com>
2302 * gnatcmd.adb (Get_Closure): Do not crash when it is not possible to
2303 delete or close the file when the call to gnatmake returns a non
2304 successful return code.
2306 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2308 * exp_ch4.adb (Expand_N_Type_Conversion): When expanding a predicate
2309 check, indicate that the copy of the original node does not come from
2310 source, to prevent an infinite recursion of the expansion.
2312 2011-08-05 Johannes Kanig <kanig@adacore.com>
2314 * debug.adb: document switch -gnatd.G for gnat2why, which deactivates
2315 VC generation for subprogram bodies.
2317 2011-08-05 Yannick Moy <moy@adacore.com>
2320 * sem_ch3.adb (Signed_Integer_Type_Declaration): in ALFA mode, define
2321 the base type with the smallest allowed base type.
2323 2011-08-05 Sergey Rybin <rybin@adacore.com>
2325 * tree_gen.adb, tree_in.adb, aspects.adb: Fix tree read-write for
2328 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2330 * sem_ch12.ads: minor comment updates.
2332 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2334 * sem_ch12.adb (Analyze_Formal_Package_Declaration): in an
2335 instantiation and a formal package the compiler generates a package
2336 renaming declaration so that the generic name within the declaration
2337 is interpreted as a renaming of the instance. At the end of a formal
2338 package declaration, this renaming must become invisible.
2340 2011-08-05 Hristian Kirtchev <kirtchev@adacore.com>
2342 * exp_ch7.adb (Is_Init_Call): Reimplemented to avoid character
2343 comparison and rely on concrete entities instead.
2345 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2347 * einfo.ads, einfo.adb (Has_Implicit_Dereference): new flag on types
2348 and discriminants, to indicate that the type has an access discriminant
2349 that supports implicit dereference.
2350 * snames.ads-tmpl: Add names of aspects and attributes related to
2351 Ada2012 iterators: constant_indexing, default_iterator,
2352 iterator_element, implicit_dereference, variable_indexing.
2353 * aspects.ads, aspects.adb: entries for iterator-related aspects.
2354 * sem_ch13.adb (Analyze_aspect_specifications): dummy entries for
2355 iterator-related aspects.
2356 * sem_attr.adb, exp_attr.adb Dummy entries for iterator-related aspects.
2358 2011-08-05 Sergey Rybin <rybin@adacore.com>
2360 * gnat_ugn.texi, vms_data.ads: Extend the subsection about coupling
2361 metrics in gnatmetric to cover new kinds of coupling mentrics.
2363 2011-08-05 Steve Baird <baird@adacore.com>
2365 * bindgen.adb (Gen_CodePeer_Wrapper): Call Ada_Main_Program instead
2366 of calling the user-defined main subprogram.
2367 (Gen_Main): Declare Ada_Main_Program and (if CodePeer_Mode
2368 is set) Call_Main_Subprogram ahead of, as opposed to
2370 (Gen_Output_File_Ada): Remove CodePeer_Mode-conditional
2371 generation of a "with" of the user-defined main subprogram.
2372 Remove CodePeer_Mode-conditional call to Gen_CodePeer_Wrapper
2373 (which is now called from Gen_Main instead).
2375 2011-08-05 Emmanuel Briot <briot@adacore.com>
2377 * projects.texi: Added reference to the Makefile package.
2379 2011-08-05 Thomas Quinot <quinot@adacore.com>
2381 * exp_ch7.adb: Minor comment rewording.
2383 2011-08-05 Ed Falis <falis@adacore.com>
2385 * env.c: Fix comment.
2387 2011-08-05 Hristian Kirtchev <kirtchev@adacore.com>
2389 * sem_elab.adb (Is_Finalization_Procedure): Reimplemented to avoid
2390 character comparison and rely on concrete entities instead.
2392 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2394 * sem_ch3.adb: (Check_Private_Overriding): better error message,
2395 suggested by AI95-0068.
2397 2011-08-05 Hristian Kirtchev <kirtchev@adacore.com>
2399 * exp_ch7.adb (Find_Last_Init): Use Next_Suitable_Statement to retrieve
2400 the two potential initialization calls. This accounts for any
2401 access-before-elaboration checks which may precede the initialization
2403 (Next_Suitable_Statement): New routine. Returns the next real statement
2404 after the input node while skipping generated checks.
2405 * sem_elab.adb (Check_A_Call): New formal parameter In_Init_Proc along
2406 with comment on usage.
2407 Do not generate Elaborate_All when the trigger is a finalization call
2408 coming from a type init proc.
2409 (Check_Elab_Call): Propagate the initialization procedure context to
2410 subsequent calls to Check_A_Call.
2411 (Check_Internal_Call_Continue): Propagate the initialization procedure
2412 context to subsequent calls to Check_Elab_Call.
2413 (Is_Finalization_Procedure): New routine. Returns True if the input
2414 entity denotes a [Deep_]Finalize routine.
2415 * sem_elab.ads (Check_Elab_Call): New formal parameter In_Init_Proc
2416 along with comment on usage.
2418 2011-08-05 Vadim Godunko <godunko@adacore.com>
2420 * s-atocou.ads: Add list of supported platforms.
2422 2011-08-05 Yannick Moy <moy@adacore.com>
2424 * sem_prag.adb, restrict.adb: Correct style for or'ing Boolean variables
2426 * opt.ads (Disable_ALI_File): new Boolean flag
2427 * lib-writ.adb (Write_ALI): when Disable_ALI_File is set, do nothing
2429 2011-08-05 Ed Falis <falis@adacore.com>
2431 * env.c (__gnat_environ): Fix includes for RTPs and VTHREADS so that
2432 environ is properly defined.
2434 2011-08-05 Vincent Celier <celier@adacore.com>
2436 * make.adb (Compilation_Phase): Exit immediately when all objects have
2437 been found up to date, to avoid multiple exit messages.
2438 * prj-nmsc.adb (Add_Source): Allow duplicate source file names in the
2439 same project for languages with no compiler.
2440 * gnat_ugn.texi: Document compiler switch -gnateI and gnatmake switch
2442 2011-08-05 Robert Dewar <dewar@adacore.com>
2444 * exp_ch7.ads, sem_type.adb, make.adb, sem_prag.adb, sem_util.adb,
2445 sem_util.ads, sem_attr.adb, restrict.ads, sem_ch6.adb, prj-conf.adb,
2446 prj-conf.ads, s-atocou.ads, s-atocou.adb, s-atocou-x86.adb,
2447 s-atocou-builtin.adb: Minor reformatting.
2449 2011-08-05 Yannick Moy <moy@adacore.com>
2451 * exp_ch7.adb (Establish_Transient_Scope): in formal verification mode,
2452 if the node to wrap is a pragma check, this node and enclosed
2453 expression are not expanded, so do not apply any transformations here.
2454 * exp_prag.adb (Expand_Pragma_Check): document the need to avoid
2455 introducing transient scopes.
2457 2011-08-05 Jose Ruiz <ruiz@adacore.com>
2459 * adaint.c (__gnat_set_writable, __gnat_set_readable,
2460 __gnat_set_executable, __gnat_set_non_writable, __gnat_set_non_readable,
2461 __gnat_copy_attribs): On VxWorks 6.x and later, the required chmod
2462 routine is available, so we use the default implementation of these
2464 * s-os_lib.ads (Copy_File, Copy_Time_Stamps): Document that there is
2465 support for copying attributes on VxWorks 6.
2467 2011-08-05 Yannick Moy <moy@adacore.com>
2469 * debug.adb: Remove use of -gnatd.D.
2470 * gnat1drv.adb (Adjust_Global_Switches): adjust switches for ALFA mode
2471 * opt.ads: Simplify variables for ALFA mode, to keep one only
2472 * restrict.adb, sem_prag.adb: Adapt treatment done for CodePeer mode
2475 2011-08-05 Vincent Celier <celier@adacore.com>
2477 * prj-conf.adb (Do_Autoconf): Look also for --RTS in
2478 Builder'Default_Switches.
2480 2011-08-05 Vincent Celier <celier@adacore.com>
2482 * makeusg.adb: Add lines for --create-map-file switches.
2484 2011-08-05 Ed Schonberg <schonberg@adacore.com>
2486 * freeze.adb (Freeze_Entity): For a subprogram, if a type in the
2487 profile is incomplete and the full view is available, replace it with
2489 * sem_ch6.adb (Possible_Freeze): if a type in the profile is
2490 incomplete, freezing the subprogram is delayed until the full view is
2492 * sem_type.adb (Disambiguate): an ambiguity between a user-defined
2493 fixed-point multiplication operator and the predefined operator is
2494 resolved in favor of the user-defined one.
2496 2011-08-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
2498 * init.c [__alpha__ && __osf__] (__gnat_error_handler): Use
2501 2011-08-04 Ed Schonberg <schonberg@adacore.com>
2503 * sem_util.ads, sem_unit.adb (Type_Without_Stream_Operation): determine
2504 whether a type lacks user-defined Read or Write operations, or has a
2505 component that lacks them.
2506 * sem_attr.adb (Check_Stream_Attribute): if restriction
2507 No_Default_Stream_Attributes is active, verify that all subcomponent
2508 types of the target have user-defined stream operations, and report
2510 * exp_ch3.adb (Stream_Operqtion_OK): use Type_Without_Stream_Operation.
2511 * exp_strm.adb: Build_Elementary_Input_Call,
2512 Build_Elementary_Write_Call): remove checks for restriction
2513 No_Default_Stream_Attributes, now checked in semantics.
2515 2011-08-04 Vincent Celier <celier@adacore.com>
2517 * prj-conf.ads, prj-conf.adb (Do_Autoconf): If there is no --RTS
2518 switches on the command line, look for all valid --RTS switches in the
2519 Builder switches and for each language use the first runtime name found
2520 to invoke gprconfig.
2521 (Get_Or_Create_Configuration_File): Warn if --RTS is specified on the
2522 command line and there is no auto-configuration.
2523 (Runtime_Name_Set_For): New function.
2525 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2527 * exp_ch7.adb (Build_Object_Declarations): Do not generate the
2528 elaborate initialization expression for variable Abort when processing
2529 a package body or a declaration.
2530 (Create_Finalizer): Propagate the package context when creating the
2531 exception-related variables.
2532 * exp_ch7.ads (Build_Object_Declarations): New formal parameter
2533 For_Package along with usage comment.
2535 2011-08-04 Arnaud Charlet <charlet@adacore.com>
2537 * gcc-interface/Makefile.in: Clean up targets.
2538 Enable new package for atomic counters and copy-on-write implementation
2539 of unbounded strings on x86 platforms.
2540 * gcc-interface/Make-lang.in: Update dependencies.
2542 2011-08-04 Robert Dewar <dewar@adacore.com>
2544 * exp_ch7.adb: Minor reformatting.
2546 2011-08-04 Robert Dewar <dewar@adacore.com>
2548 * exp_strm.adb: Minor reformatting.
2550 2011-08-04 Vadim Godunko <godunko@adacore.com>
2552 * s-atocou.adb: Replace by dummy version and use on targets where atomic
2553 operations are not supported.
2554 * s-atocou-builtin.adb: Renamed from s-atocou.adb.
2555 * s-atocou-x86.adb: New file.
2556 * Makefile.rtl: Add s-atocou.o file
2558 2011-08-04 Arnaud Charlet <charlet@adacore.com>
2560 * make.adb (Compile): Move setting of CodePeer_Mode to ...
2561 (Compilation_Phase): ... here.
2562 (Scan_Make_Arg): Now bind and link by default in CodePeer mode.
2564 2011-08-04 Thomas Quinot <quinot@adacore.com>
2566 * Make-generated.in: Fix minor typo in comment.
2568 2011-08-04 Thomas Quinot <quinot@adacore.com>
2570 * gnatls.adb: Use Prj.Env.Initialize_Default_Project_Path to retrieve
2573 2011-08-04 Robert Dewar <dewar@adacore.com>
2575 * a-coinho.adb: Minor reformatting.
2577 2011-08-04 Robert Dewar <dewar@adacore.com>
2579 * a-coinho.ads: Minor reformatting.
2581 2011-08-04 Vadim Godunko <godunko@adacore.com>
2583 * s-atocou.ads, s-atocou.adb: New files.
2584 * a-strunb-shared.ads, a-strunb-shared.adb, a-stwiun-shared.ads,
2585 a-stwiun-shared.adb, a-stzunb-shared.ads, a-stzunb-shared.adb: Remove
2586 direct use of GCC's atomic builtins and replace them by use of new
2587 atomic counter package.
2589 2011-08-04 Ed Schonberg <schonberg@adacore.com>
2591 * exp_strm.adb: better error message for No_Default_Stream_Attributes.
2593 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2595 * a-tags.adb (Unregister_Tag): Replace the complex address arithmetic
2596 with a call to Get_External_Tag.
2597 * exp_ch7.adb (Build_Cleanup_Statements): Update the comment on
2598 subprogram usage. Remove the guard against package declarations and
2599 bodies since Build_Cleanup_Statements is no longer invoked in that
2601 (Build_Components): Initialize Tagged_Type_Stmts when the context
2602 contains at least one library-level tagged type.
2603 (Build_Finalizer): New local variables Has_Tagged_Types and
2604 Tagged_Type_Stmts along with associated comments on usage. Update the
2605 logic to include tagged type processing.
2606 (Create_Finalizer): Insert all library-level tagged type unregistration
2607 code before the jump block circuitry.
2608 (Expand_N_Package_Body): Remove the call to Build_Cleanup_Statements.
2609 (Expand_N_Package_Declaration): Remove the call to
2610 Build_Cleanup_Statements.
2611 (Process_Tagged_Type_Declaration): New routine. Generate a call to
2612 unregister the external tag of a tagged type.
2613 (Processing_Actions): Reimplemented to handle tagged types.
2614 (Process_Declarations): Detect the declaration of a library-level
2615 tagged type and carry out the appropriate actions.
2616 (Unregister_Tagged_Types): Removed. The machinery has been directly
2617 merged with Build_Finalizer.
2619 2011-08-04 Robert Dewar <dewar@adacore.com>
2621 * bindgen.ads, gnatlink.adb, sem_ch4.adb, gnatbind.adb, put_alfa.adb,
2622 gnatls.adb, exp_ch3.adb: Minor reformatting.
2624 2011-08-04 Marc Sango <sango@adacore.com>
2626 * sem_attr.adb (Analyze_Attribute): Replace the message
2627 "invisible attribute of}" of the spark restriction violation in
2628 attribute reference by the simple message "invisible attribute of type".
2629 Indeed, the node value Error_Msg_Node_1 used is in conflit with the
2630 two insertion characters: '&' and '}'.
2632 2011-08-04 Vadim Godunko <godunko@adacore.com>
2634 * impunit.adb (Non_Imp_File_Names_12): Add "a-coinho".
2635 * a-coinho.ads, a-coinho.adb: New file.
2636 * Makefile.rtl: Add Ada.Containers.Indefinite_Holders.
2638 2011-08-04 Nicolas Roche <roche@adacore.com>
2640 * alfa_test.adb: Not all ali files are containing alfa information even
2641 if compiled with -gnatd.F. So suppress warning about missing ALFA
2644 2011-08-04 Yannick Moy <moy@adacore.com>
2646 * lib-xref-alfa.adb (Add_ALFA_Scope): use non-empty unique name for
2648 * put_alfa.adb: Check that scope name is not empty.
2650 2011-08-04 Ed Schonberg <schonberg@adacore.com>
2652 * exp_ch3.adb (Stream_Operation_Ok): new predicate
2653 Needs_Elementary_Stream_Operation, to determine whether user-defined
2654 Read and Write attributes are available for the elementary components
2655 of the given type. If only the predefined attributes are available,
2656 then when restriction No_Default_Stream_Attributes is active the
2657 predefined stream attributes for the composite type cannot be created.
2659 2011-08-04 Robert Dewar <dewar@adacore.com>
2661 * bindgen.adb: Fix obsolete comments and names from Ada/C days.
2662 Put routines in alpha order
2664 2011-08-04 Jose Ruiz <ruiz@adacore.com>
2666 * gcc-interface/Makefile.in: Remove xenomai specific versions of system.
2667 * gcc-interface/Make-lang.in: Update dependencies.
2669 2011-08-04 Arnaud Charlet <charlet@adacore.com>
2671 * gcc-interface/lang.opt: Add AdaWhy language, simimlar to Ada.
2672 * gcc-interface/lang-specs.h: Add handling of AdaWhy specs (calls
2675 2011-08-04 Robert Dewar <dewar@adacore.com>
2677 * sem_ch3.adb, make.adb, a-cohata.ads, sem_prag.adb, makeutl.adb,
2678 lib-xref-alfa.adb: Minor reformatting.
2680 2011-08-04 Marc Sango <sango@adacore.com>
2682 * sem_ch12.adb (Analyze_Generic_Package_Declaration,
2683 Analyze_Generic_Subprogram_Declaration, Analyze_Package_Instantiation,
2684 Analyze_Subprogram_Instantiation): Check absence of generic in SPARK
2687 2011-08-04 Tristan Gingold <gingold@adacore.com>
2689 * bindgen.adb (Gen_Adainit_C): Remove.
2690 (Gen_Adafinal_C): Ditto.
2691 (Gen_Elab_Externals_C): Ditto.
2692 (Gen_Elab_Calls_C): Ditto.
2693 (Gen_Elab_Order_C): Ditto.
2694 (Gen_Elab_Defs_C): Ditto.
2695 (Gen_Finalize_Library_C): Ditto.
2696 (Gen_Finalize_Library_Defs_C): Ditto.
2697 (Gen_Main_C): Ditto.
2698 (Gen_Output_File_C): Ditto.
2699 (Gen_Restrictions_C): Ditto.
2700 (Gen_Versions_C): Ditto.
2701 (Write_Info_Ada_C): Ditto.
2702 (Gen_Object_Files_Options): Call WBI instead of Write_Info_Ada_C
2703 (Gen_Output_File): Do not force Ada_Bind_File anymore.
2704 Always call Gen_Output_File_Ada.
2705 * gnatlink.adb (Begin_Info): Now a constant.
2707 (Ada_Bind_File): Remove
2708 (Process_Args): Do not handle -A/-C. Remove not Ada_Bind_File cases.
2709 * switch-b.adb (Scan_Binder_Switches): Do not handle -C.
2710 * gnatbind.adb (Gnatbind): Remove not Ada_Bind_File cases.
2711 * opt.ads (Ada_Bind_File): Remove.
2713 2011-08-04 Thomas Quinot <quinot@adacore.com>
2715 * projects.texi: Document target-specific directory in default project
2718 2011-08-04 Thomas Quinot <quinot@adacore.com>
2720 * gnatls.adb, prj-env.adb: Add $prefix/share/gpr to default project
2723 2011-08-04 Yannick Moy <moy@adacore.com>
2725 * sem_ch3.adb, sem_ch5.adb, sem_util.adb, sem_ch4.adb, sem_ch8.adb,
2726 opt.ads, lib-xref.ads: Code clean up.
2728 2011-08-04 Yannick Moy <moy@adacore.com>
2730 * gnat_rm.texi: Update description of Test_Case
2731 * gnat_ugn.texi: Typo.
2733 2011-08-04 Ed Falis <falis@adacore.com>
2735 * adaint.c (__gnat_get_number_of_cpus): fix typo in last checkin.
2737 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2739 * exp_ch4.adb (Suitable_Element): Skip field _parent on .NET/JVM when
2740 it is of type Root_Controlled. This action eliminates fields Prev and
2741 Next from type equality.
2743 2011-08-04 Yannick Moy <moy@adacore.com>
2745 * lib-xref-alfa.adb: Correct typo.
2747 2011-08-04 Matthew Heaney <heaney@adacore.com>
2749 * a-cohata.ads (Hash_Table_Type): default-initialize the Nodes
2752 2011-08-04 Yannick Moy <moy@adacore.com>
2754 * sem_prag.adb (Check_Arg_Is_String_Literal): remove useless procedure
2755 (Analyze_Pragma): allow static string expression for name of Test_Case,
2756 instead of simply string literals.
2757 * sem_util.adb (Get_Name_From_Test_Case_Pragma): adapt to static string
2760 2011-08-04 Vincent Celier <celier@adacore.com>
2762 * makeutl.adb (Complete_Mains.Find_File_Add_Extension): Use canonical
2763 case suffixes to find truncated main sources.
2765 2011-08-04 Tristan Gingold <gingold@adacore.com>
2767 * impunit.adb (Non_Imp_File_Names_95): Add g-tastus.
2768 s-stusta.adb (Compute_All_Task): Use Put_Line instead of Put.
2769 (Compute_Current_Task): Ditto.
2771 2011-08-04 Tristan Gingold <gingold@adacore.com>
2773 * gnat_ugn.texi: Mention GNAT.Task_Stack_Usage.
2775 2011-08-04 Yannick Moy <moy@adacore.com>
2777 * lib-xref-alfa.adb (Is_Global_Constant): new function that detects
2778 library-level constant.
2779 (Add_ALFA_Xrefs): ignore global constants in ALFA xref.
2780 * sem_res.adb (Resolve_Actuals): do not add cross-reference to Formal
2781 used as selector of parameter association, in ALFA mode.
2783 2011-08-04 Robert Dewar <dewar@adacore.com>
2785 * exp_ch5.adb, exp_ch7.adb, exp_util.adb, bindgen.adb, sem_prag.adb,
2786 s-tassta.adb, exp_ch4.adb, exp_disp.adb, s-stausa.adb: Minor
2789 2011-08-04 Arnaud Charlet <charlet@adacore.com>
2791 * make.adb (Linking_Phase): Set source search path before calling
2792 gnatlink in CodePeer mode.
2794 2011-08-04 Javier Miranda <miranda@adacore.com>
2796 * exp_ch7.adb (Expand_N_Package_Body, Expand_N_Package_Declaration):
2797 Remove code which takes care of building TSDs.
2798 * rtsfind.ads (RE_Check_Interface_Conversion): New entity.
2799 * exp_ch4.adb (Apply_Accessibility_Check): Add support for generating
2800 the accessibility check in VM targets.
2801 * exp_disp.adb (Make_VM_TSD): Spec moved to exp_disp.ads
2802 (Building_Static_DT): Now returns false for VM targets.
2803 (Build_VM_TSDs): Removed.
2804 (Expand_Interface_Conversion): Generate missing runtime check for
2805 conversions to interface types whose target type is unknown at compile
2807 (Make_VM_TSD): Add missing code to disable the generation of calls to
2808 Check_TSD if the tagged type is not defined at library level, or not
2809 has a representation clause specifying its external tag, or -gnatdQ is
2811 * exp_disp.ads (Build_VM_TSDs): Removed.
2812 (Make_VM_TSDs): Spec relocated from exp_disp.adb
2813 * sem_disp.adb (Check_Dispatching_Operation): No code required to
2814 register primitives in the dispatch tables in VM targets.
2815 * exp_ch3.adb (Expand_N_Object_Declaration): Remove wrong expansion of
2816 initialization of class-wide interface objects in VM targets.
2817 (Expand_Freeze_Record_Type): For VM targets call Make_VM_TSD (instead
2820 2011-08-04 Jerome Lambourg <lambourg@adacore.com>
2822 * gnatlink.adb (Gnatlink): Correct missleading error message displayed
2823 when dotnet-ld cannot be found.
2825 2011-08-04 Arnaud Charlet <charlet@adacore.com>
2827 * bindgen.adb: Simplify significantly generation of binder body file in
2829 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Prevent assert failure
2830 when compiling binder generated file in CodePeer mode (xxx'Elab_Spec
2833 2011-08-04 Yannick Moy <moy@adacore.com>
2835 * sem_prag.adb, sem.ads: Code cleanup.
2837 2011-08-04 Tristan Gingold <gingold@adacore.com>
2839 * s-tassta.adb (Task_Wrapper): Rewrite the dynamic stack usage part.
2840 * s-stausa.adb, s-stausa.ads: Major rewrite. Now provides accurate
2841 results if possible.
2842 * s-stusta.adb (Print): Adjust after changes in s-stausa.
2843 * gnat_ugn.texi: Update dynamic stack usage section.
2845 2011-08-04 Steve Baird <baird@adacore.com>
2847 * bindgen.adb (Gen_CodePeer_Wrapper): new procedure.
2848 Generate (if CodePeer_Mode is set) a "wrapper" subprogram which
2849 contains only a call to the user-defined main subprogram.
2850 (Gen_Main_Ada) - If CodePeer_Mode is set, then
2851 call the "wrapper" subprogram instead of directly
2852 calling the user-defined main subprogram.
2854 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2856 * exp_ch5.adb (Expand_N_Case_Statement): Check the statements of all
2857 alternatives of a case statement for controlled objects. Rename local
2858 variable A to Dead_Alt.
2859 (Expand_N_If_Statement): Check the then and else statements of an if
2860 statement for controlled objects. Check the then statements of all
2861 elsif parts of an if statement for controlled objects.
2862 (Expand_N_Loop_Statement): Check the statements of a loop for controlled
2864 * exp_ch7.adb (Process_Transient_Objects): Rewrite the condition which
2865 detects a loop associated with the expansion of an array object.
2866 Augment the processing of the loop statements to account for a possible
2867 wrap done by Process_Statements_For_Controlled_Objects.
2868 * exp_ch9.adb (Expand_N_Asynchronous_Select): Check the triggering
2869 statements and abortable part of an asynchronous select for controlled
2871 (Expand_N_Conditional_Entry_Call): Check the else statements of a
2872 conditional entry call for controlled objects.
2873 (Expand_N_Selective_Accept): Check the alternatives of a selective
2874 accept for controlled objects.
2875 (Expand_N_Timed_Entry_Call): Check the entry call and delay
2876 alternatives of a timed entry call for controlled objects.
2877 * exp_ch11.adb (Expand_Exception_Handlers): Check the statements of an
2878 exception handler for controlled objects.
2879 * exp_util.adb (Requires_Cleanup_Actions (List_Id, Boolean, Boolean)):
2880 Add formal parameter Nested_Constructs along with its associated
2882 (Requires_Cleanup_Actions (Node_Id)): Update all calls to
2883 Requires_Cleanup_Actions.
2884 (Process_Statements_For_Controlled_Objects): New routine.
2885 * exp_util.ads (Process_Statements_For_Controlled_Objects): New
2886 routine. Inspect a node which contains a non-handled sequence of
2887 statements for controlled objects. If such an object is found, the
2888 statements are wrapped in a block.
2890 2011-08-04 Bob Duff <duff@adacore.com>
2892 * sem_type.adb (Covers): If T2 is a subtype of a class-wide type, we
2893 need to compare with Class_Wide_Type (T2), in order to get at the
2894 original class-wide type node.
2895 * sem_type.ads (Covers): Improve the comment.
2896 * einfo.ads (Class_Wide_Type): Improve the comment.
2897 * exp_intr.adb (Expand_Unc_Deallocation): Remove unnecessary setting of
2898 the type of the Deref.
2900 2011-08-04 Yannick Moy <moy@adacore.com>
2902 * gnat_rm.texi: Document that Test_Case pragma can only appear on
2903 separate declarations.
2904 * sem_prag.adb (procedure Check_Identifier_Is_One_Of): new procedure to
2905 check identifier of pragma argument.
2906 (Chain_TC): check that no other test case associated to the same entity
2907 share the same name.
2908 (Check_Test_Case): disallow test case inside subprogram body
2909 (Analyze_Pragma): correct call to check identifier and not argument
2910 * sem_util.adb, sem_util.ads (Get_Name_From_Test_Case_Pragma): new
2911 function gets name from test case pragma.
2913 2011-08-04 Yannick Moy <moy@adacore.com>
2915 * gnat_rm.texi: Document new pragma and aspect.
2916 * aspects.adb, aspects.ads (Aspect_Id): new value Aspect_Test_Case
2917 (No_Duplicates_Allowed): new constant array defining whether duplicates
2918 aspects of each kind can appear on the same declaration.
2919 * einfo.adb, einfo.ads (Spec_PPC_List): replace field with Contract
2920 field, which points to a node holding the previous Spec_PPC_List.
2921 * exp_ch9.adb, sem_ch6.adb, sem_prag.adb: Reach to Spec_PPC_List
2922 through the indirection with Contract.
2923 * exp_util.adb (Insert_Actions): raise Program_Error on N_Contract node
2924 * par-prag.adb (Prag): do nothing on Test_Case pragma
2925 * sem.adb (Analyze): abort on N_Contract, on which Analyze should not
2927 * sem_attr.adb (Analyze_Attribute): allow attribute 'Result in
2928 component Ensures of Test_Case.
2929 * sem_ch12.adb, sem_ch6.adb, sem_ch9.adb
2930 (Analyze_Generic_Subprogram_Declaration,
2931 Analyze_Subprogram_Instantiation,
2932 Analyze_Abstract_Subprogram_Declaration,
2933 Analyze_Subprogram_Body_Helper,
2934 Analyze_Subprogram_Specification, Analyze_Entry_Declaration):
2935 insert contract in subprogram node at point of definition
2937 (Aspect_Loop): do not raise error on duplicate Test_Case aspect
2938 (Analyze_Aspect_Specifications): analyze Test_Case aspect and create
2939 corresponding pragma
2940 (Check_Aspect_At_Freeze_Point): raise Program_Error on Test_Case aspect
2941 * sem_ch3.adb (Analyze_Declarations): insert analysis of test-cases,
2942 similar to the analysis of pre/post
2943 (Derive_Subprogram): insert contract in subprogram node at point of
2945 * sem_prag.adb, sem_prag.ads
2946 (Check_Arg_Is_String_Literal, Check_Identifier):
2947 new checking procedures to be called in treatment of pragmas
2948 (Check_Test_Case): new procedure to check that a Test_Case aspect or
2949 pragma is well-formed. This does not check currently that 'Result is
2950 used only in the Ensures component of a Test_Case.
2951 (Analyze_Pragma): add case for Test_Case
2952 (Analyze_TC_In_Decl_Part): pre-analyze the Requires and Ensures
2953 components of a Test_Case.
2954 (Preanalyze_TC_Args): new procedure to preanalyze the boolean
2955 expressions in the 3rd (and 4th if present) arguments of a Test_Case
2956 pragma, treated as spec expressions.
2957 (Sig_Flags): add value -1 for Test_Case.
2958 * sem_util.adb, sem_util.ads (Get_Ensures_From_Test_Case_Pragma,
2959 Get_Requires_From_Test_Case_Pragma): getters for both expression
2960 components of a Test_Case.
2961 * sinfo.adb, sinfo.ads (N_Contract): new kind of node used as
2962 indirection between an entry or [generic] subprogram entity and its
2963 pre/post + test-cases.
2964 (Spec_PPC_List, Spec_TC_List, Set_Spec_PPC_List, Set_Spec_TC_List):
2965 get/set for fields of an N_Contract node.
2966 * snames.ads-tmpl (Name_Test_Case, Name_Ensures, Name_Mode,
2967 Name_Normal, Name_Requires, Name_Robustness, Pragma_Test_Case): new
2968 names and pragma for Test_Case.
2969 * sprint.adb (Sprint_Node): raise Program_Error on N_Contract node
2971 2011-08-04 Vincent Celier <celier@adacore.com>
2973 * gnat_ugn.texi: Improve documentation of gnatmake switch
2974 --source-info-file=.
2976 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
2978 * exp_ch7.adb (Make_Final_Call): Add local variable Atyp (assertion
2979 type). Initialize Atyp to the appropriate type which is later checked
2980 for completion. Rewrite the assertion associated with private type
2983 2011-08-04 Ed Falis <falis@adacore.com>
2985 * adaint.c: Add call to vxCpuConfiguredGet for VxWorks SMP to
2986 initialize the number of CPUs.
2988 2011-08-04 Ed Schonberg <schonberg@adacore.com>
2990 * sem_type.adb (Disambiguate): New subsidiary routine
2991 In_Same_Declaration_List, to implement AI05-0020: a user-defined
2992 equality on an anonymous access type whose designated type is private
2993 does not lead to an ambiguity with the universal access equality
2994 operator in the body or child units of the defining package. The same
2995 is true for a multiplication operator on a private type completed with
2998 2011-08-04 Javier Miranda <miranda@adacore.com>
3000 * opt.ads (Init_Or_Norm_Scalars_Config): Removed.
3001 (Normalize_Scalars_Config): Removed.
3003 (Register_Opt_Config_Switches): Remove registering config values of
3004 Init_Or_Norm_Scalars_Config and Normalize_Scalars_Config.
3005 (Restore_Opt_Config_Switches): Remove code which restores the values of
3006 Init_Or_Norm_Scalars and Normalize_Scalars. Recalculate value of
3007 Init_Or_Norm_Scalars.
3008 (Save_Opt_Config_Switches): Remove code which saves values of
3009 Init_Or_Norm_Scalars and Normalize_Scalars.
3010 (Set_Opt_Config_Switches): Remove code which restores config values of
3011 Init_Or_Norm_Scalars and Normalize_Scalars. Recalculate value of
3012 Init_Or_Norm_Scalars.
3014 2011-08-04 Yannick Moy <moy@adacore.com>
3016 * frontend.adb (Frontend): remove previous patch to avoid full
3017 qualification in ALFA mode.
3018 * lib-xref-alfa.adb (Add_ALFA_Xrefs): use unique name for variables.
3019 * sem_util.adb, sem_util.ads (Unique_Name): new function to define a
3020 unique name for an entity, which could be used to identify the entity
3021 across compilation units.
3023 2011-08-04 Thomas Quinot <quinot@adacore.com>
3026 (Initialize_Default_Project_Path): Add target specific directory
3027 ($prefix/$target/lib/gnat) in front of project path in all cases
3028 (making gnatmake's behaviour consistent with gprbuild).
3029 * gnatcmd.adb, make.adb, prj-makr.adb, clean.adb:
3030 Pass target name from Sdefault to project subsystem.
3031 * gnatls.adb: Show new target specific default project directory.
3033 2011-08-04 Johannes Kanig <kanig@adacore.com>
3035 * cstand.adb: Add Information to Identifier in Standard
3036 (Identifer_For): Set Entity to the corresponding entity
3038 2011-08-04 Sergey Rybin <rybin@adacore.com>
3040 * gnat_ugn.texi: Update doc on gnatcheck.
3042 2011-08-04 Yannick Moy <moy@adacore.com>
3044 * lib-xref-alfa.adb (Add_ALFA_Xrefs): correct definition of ranges of
3047 2011-08-04 Yannick Moy <moy@adacore.com>
3049 * exp_prag.adb (Expand_Pragma_Check): in ALFA mode, return without
3050 performing expansion.
3051 * sem_ch6.adb (Analyze_Subprogram_Body_Helper,
3052 Analyze_Generic_Subprogram_Body): protect call to Process_PCCs so that
3053 it is not called in ALFA mode.
3055 2011-08-04 Emmanuel Briot <briot@adacore.com>
3057 * make.adb, osint.adb, osint.ads (Reset_Command_Line_Files): not used
3058 after all, so removed.
3060 2011-08-04 Sergey Rybin <rybin@adacore.com>
3062 * vms_data.ads: Add missing VMS qualifiers.
3064 2011-08-04 Emmanuel Briot <briot@adacore.com>
3066 * make.adb, makeutl.adb, osint.adb, osint.ads (Check_Mains): rebuild
3067 the list of files on the command line after processing it through
3070 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3072 * exp_ch7.adb (Build_Raise_Statement): Remove the specialized
3073 processing for .NET/JVM. These targets can now benefit from
3074 Raise_From_Controlled_Operation and they share the same processing with
3076 (Establish_Transient_Scope): Remove the restriction for .NET/JVM.
3077 These targets need transient scopes in order to properly finalize short
3078 lived controlled objects.
3079 (Make_Handler_For_Ctrl_Operation): Remove the specialized processing for
3080 NET/JVM. These targets can now benefit from
3081 Raise_From_Controlled_Operation and they share the same processing with
3084 2011-08-04 Geert Bosch <bosch@adacore.com>
3086 * tracebak.c (STOP_FRAME): Stop at any next pointer outside the stack
3088 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3090 * exp_aggr.adb (Has_Visible_Private_Ancestor): subsidiary routine to
3091 Expand_Record_Aggregate, to determine whether aggregate must be
3092 expanded into assignments. This is the case if the ancestor part is
3093 private, regarless of the setting of the flag Has_Private_Ancestor.
3095 2011-08-04 Ed Falis <falis@adacore.com>
3097 * vxaddr2line.adb: Add support for e500v2 and for Linux hosts
3099 2011-08-04 Bob Duff <duff@adacore.com>
3101 * sinfo.ads: Fix comment.
3103 2011-08-04 Steve Baird <baird@adacore.com>
3105 * bindgen.adb (Get_Ada_Main_Name): If CodePeer_Mode is set, then
3106 choose a package name in much the same way as is
3107 done for JGNAT when VM_Target /= No_VM, except that
3108 a slightly more distinctive prefix string is used.
3110 2011-08-04 Emmanuel Briot <briot@adacore.com>
3112 * makeutl.adb (Complete_Mains): no longer accept unit names on the
3113 gnatmake command line.
3114 This behavior was never documented (and was supported only because of
3115 an early bug in the code). This case might lead to ambiguous cases
3116 (between unit names and truncated base names without suffixes).
3118 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3120 * a-tags.ads, a-tags.adb (Unregister_Tag): New routine.
3121 Remove the external tag of a tagged type from the internal hash table.
3122 * exp_ch7.adb (Build_Cleanup_Statements): Update the comment on the
3123 expanded usage of the routine. Strenghten the check for Is_Master. Add
3124 processing for tagged types.
3125 (Build_Finalizer): Create all the necessary lists used in finalizer
3126 creation when the processed context is a package that may contain
3128 (Expand_Cleanup_Actions): Rename the call to Has_Controlled_Objects to
3129 Requires_Cleanup_Actions.
3130 (Expand_N_Package_Body): Package bodies may need clean up code
3131 depending on whether they contain tagged types.
3132 (Expand_N_Package_Declaration): Package declarations may need clean up
3133 code depending on whether they contain tagged types.
3134 (Unregister_Tagged_Types): New routine. Search through a list of
3135 declarations or statements, looking for non-abstract Ada tagged types.
3136 For each such type, generate code to unregister the external tag.
3137 * exp_util.adb (Has_Controlled_Objects (Node_Id)): Renamed to
3138 Requires_Cleanup_Actions.
3139 (Requires_Cleanup_Actions (List_Id, Boolean)): New routine. Search
3140 through a list of declarations or statements looking for non-abstract
3141 Ada tagged types or controlled objects.
3142 * exp_util.ads (Has_Controlled_Objects (Node_Id)): Renamed to
3143 Requires_Cleanup_Actions.
3144 (Has_Controlled_Objects (List_Id, Boolean)): Removed.
3145 * rtsfind.ads: Add entry RE_Unregister_Tag to tables RE_Id and
3148 2011-08-04 Vincent Celier <celier@adacore.com>
3150 * prj-env.adb (For_All_Source_Dirs.For_Project): Check if project Prj
3151 has Ada sources, not project Project, because if the root project
3152 Project has no sources of its own, all projects will be deemed without
3155 2011-08-04 Gary Dismukes <dismukes@adacore.com>
3157 * bindgen.adb (Gen_Adainit_Ada): Move the generation of the declaration
3158 of the No_Param_Proc acc-to-subp type used for initialization of
3159 __gnat_finalize_library_objects so that it's declared at library level
3160 rather than nested inside of the adainit routine.
3162 2011-08-04 Javier Miranda <miranda@adacore.com>
3164 * exp_disp.adb (Make_DT): Generate code to check the external tag ONLY
3165 if the tagged type has a representation clause which specifies its
3168 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3170 * einfo.ads, einfo.adb (Has_Private_Ancestor): now a flag on types.
3171 Remove previous procedure with that name.
3172 * sem_ch3.adb (Build_Derived_Record_Type): set Has_Private_Ancestor
3174 * sem_aggr.adb (Resolve_Extension_Aggregate): if the ancestor part is a
3175 subtype mark, the ancestor cannot have unknown discriminants.
3176 (Resolve_Record_Aggregate): if the type has invisible components
3177 because of a private ancestor, the aggregate is illegal.
3179 2011-08-04 Vincent Celier <celier@adacore.com>
3181 * switch-m.adb (Normalize_Compiler_Switches): Recognize and take into
3182 account switches -gnat2005, -gnat12 and -gnat2012.
3184 2011-08-04 Bob Duff <duff@adacore.com>
3186 * s-tasdeb.ads: Minor comment fix.
3188 2011-08-04 Arnaud Charlet <charlet@adacore.com>
3190 * gnatlink.adb (Gnatlink): Pass -gnat83/95/05/12 switch to gcc in
3192 * switch.ads, switch.adb (Is_Language_Switch): New function.
3194 2011-08-04 Vincent Celier <celier@adacore.com>
3196 * switch-c.adb: Minor comment addition.
3198 2011-08-04 Vincent Celier <celier@adacore.com>
3200 * vms_conv.adb (Process_Argument): Fail graciously when qualifier
3201 ending with '=' is followed by a space (missing file name).
3203 2011-08-04 Pascal Obry <obry@adacore.com>
3205 * g-regist.ads: Fix size of HKEY on x86_64-windows.
3207 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3209 * sem_ch12.adb (Analyze_Associations): New routine
3210 Check_Overloaded_Formal_Subprogram to reject a formal package when
3211 there is a named association or a box initialisation for an overloaded
3212 formal subprogram of the corresponding generic.
3214 2011-08-04 Yannick Moy <moy@adacore.com>
3216 * alfa.ads (ALFA_Xref_Record): add component for type of entity
3217 * get_alfa.adb, put_alfa.adb: Read and write new component of
3219 * lib-xref-alfa.adb (Collect_ALFA): generate new component.
3221 2011-08-04 Pascal Obry <obry@adacore.com>
3223 * urealp.adb: Minor reformatting.
3225 2011-08-04 Tristan Gingold <gingold@adacore.com>
3227 * exp_ch7.adb (build_finalizer.process_declarations.processing_actions):
3228 Handle the case when Cleanup_Protected_Object returns Empty.
3230 2011-08-04 Yannick Moy <moy@adacore.com>
3232 * frontend.adb (Frontend): only qualify names in non-ALFA mode
3234 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3236 * sem_ch4.adb (Try_Class_Wide_Operation): if the context is a procedure
3237 call, ignore functions.
3239 2011-08-04 Geert Bosch <bosch@adacore.com>
3241 * urealp.adb (Equivalent_Decimal_Exponent): Avoid the use of floating
3244 2011-08-04 Emmanuel Briot <briot@adacore.com>
3246 * makeutl.adb (Compute_Builder_Switches): no longer accept a unit name
3247 as an index for Builder'Switches. This conforms to the documentation.
3248 * make.adb (Insert_Project_Sources): avoid duplicate code
3250 2011-08-04 Emmanuel Briot <briot@adacore.com>
3252 * makeutl.adb (Complete_Mains): if the user has passed a relative file
3253 name on the command line (for instance "../dummy"), never assume it can
3256 2011-08-04 Tristan Gingold <gingold@adacore.com>
3258 * bindgen.adb: Remove code the reference or create the
3259 Break_Start/__gnat_break_start procedure.
3260 * s-stalib.adb (Break_Start): Removed.
3262 2011-08-04 Emmanuel Briot <briot@adacore.com>
3264 * make.adb, makeutl.adb, makeutl.ads (Compute_Builder_Switches): now
3265 shared with gprbuild.
3267 2011-08-04 Yannick Moy <moy@adacore.com>
3269 * par-ch4.adb (P_Primary): preferentially issue an error message about
3270 a missing parenthesis arount a conditional or case expression in Ada
3271 2012 mode, if we detect that the alignment is not correct for a
3274 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3276 * exp_ch7.adb (Process_Declarations): Do not consider the result of a
3277 tag-to-class-wide conversion as needing finalization actions.
3278 * exp_util.adb (Has_Controlled_Objects): Do not consider the result of
3279 a tag-to-class-wide conversion as needing finalization actions.
3280 (Is_Finalizable_Transient): The result of a tag-to-class-wide
3281 conversion does not need finalization actions.
3282 (Is_Tag_To_CW_Conversion): New routine.
3283 * exp_util.ads (Is_Tag_To_CW_Conversion): New routine. Determines
3284 whether an object is the result of a tag-to-class-wide conversion.
3286 2011-08-04 Yannick Moy <moy@adacore.com>
3288 * sem_ch13.adb (Analyze_Aspect_Specifications): correct order in which
3289 the left-hand-side and right-hand-side of a conjunct are inserted when
3290 translating a pre- or postcondition
3291 * sem_ch6.adb: Correct typo in comment
3293 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3295 * gnat_rm.texi: Ravenscar does not prohibit dependence on
3296 Unchecked_Conversion and Unchecked_Deallocation.
3298 2011-08-04 Thomas Quinot <quinot@adacore.com>
3300 * make.adb: Minor reformatting.
3302 2011-08-04 Emmanuel Briot <briot@adacore.com>
3304 * prj.adb, prj.ads, makeutl.adb (Complete_Mains): search for the
3305 sources in the project and its imported projects, but not in the whole
3308 2011-08-04 Emmanuel Briot <briot@adacore.com>
3310 * make.adb: Remove debug trace.
3312 2011-08-04 Vincent Celier <celier@adacore.com>
3314 * makeutl.adb (Do_Complete): Get the absolute path name of a relative
3315 path in canonical form, to be able to compare path names on platforms
3316 such as Windows or Darwin.
3318 2011-08-04 Thomas Quinot <quinot@adacore.com>
3320 * par_sco.adb (Traverse_Declarations_Or_Statements.Set_Statement_Entry):
3321 For a pragma (statement with C1 = 'P'), record the sloc of the pragma.
3322 * scos.ads: Update documentation accordingly.
3323 * put_scos.adb (Output_SCO_Line): Omit statement SCOs for disabled
3326 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3328 * sem_attr.adb (Bad_Attribute_For_Predicate): flag illegal use of
3329 attribute only if prefix type is scalar.
3331 2011-08-04 Emmanuel Briot <briot@adacore.com>
3333 * make.adb, makeutl.adb, prj-env.adb (Check_Mains): put back support
3334 in gnatmake for specifying mains on the command line that do not belong
3335 to the main project. These mains must currently all belong to the same
3337 (Ultimate_Extension_Of): removed, since duplicated
3338 Ultimate_Extending_Project.
3340 2011-08-04 Arnaud Charlet <charlet@adacore.com>
3342 * make.adb (Do_Codepeer_Globalize_Step): Removed. Use CodePeer_Mode
3344 (CodePeer_Mode_String): New.
3345 (Linking_Phase, Binding_Phase): Call gnatlink with -P switch in
3347 (Scan_Make_Arg): Do not disable binding/linking phase in CodePeer mode.
3348 * bindgen.adb (Gen_Elab_Calls_Ada): Ignore subprograms in CodePeer
3349 mode, since no useful elaboration subprogram is needed by CodePeer.
3350 * gnatlink.adb (Gnatlink): Add support for -P switch (CodePeer mode).
3351 In this mode, compile binder file with -gnatC and do stop after this
3354 2011-08-04 Vincent Celier <celier@adacore.com>
3356 * exp_ch7.adb: Minor comment fix.
3358 2011-08-04 Robert Dewar <dewar@adacore.com>
3360 * exp_ch7.adb, make.adb, sem_ch10.adb, bindgen.adb, sem_res.adb,
3361 exp_ch4.adb, makeutl.adb: Minor reformatting.
3363 2011-08-04 Emmanuel Briot <briot@adacore.com>
3365 * make.adb, makeutl.adb, makeutl.ads (Make): major refactoring.
3366 Create several new subprograms to move code out of Make. This makes the
3367 code more readable, removes code duplication, and is a preparation work
3368 for adding support for aggregate projects.
3370 2011-08-04 Tristan Gingold <gingold@adacore.com>
3372 * s-po32gl.ads, s-po32gl.adb: New files.
3373 * exp_ch7.ads (Get_Global_Pool_For_Access_Type): New function.
3374 * exp_ch7.adb (Get_Global_Pool_For_Access_Type): New function.
3375 (Build_Finalization_Collection): Use it.
3376 * exp_ch4.adb (Complete_Controlled_Allocation): Ditto.
3377 * rtsfind.ads: System_Pool_32_Global, Re_Global_Pool_32_Object: New
3379 * gcc-interface/Makefile.in: Use s-po32gl.o on VMS.
3380 * gcc-interface/Make-lang.in: Update dependencies.
3382 2011-08-04 Emmanuel Briot <briot@adacore.com>
3384 * makeutl.adb (Complete_Mains): add support for specs with no suffix on
3387 2011-08-04 Emmanuel Briot <briot@adacore.com>
3389 * make.adb, makeutl.adb (Complete_Mains): if a main specified on the
3390 command line is not a file name, also check whether it could be a unit
3393 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
3395 * bindgen.adb (Gen_Finalize_Library_Ada): Factor out code to generate
3396 the header of the finalization routine.
3397 If the unit has no finalizer but is a body whose spec has one, then
3398 generate the decrement of the elaboration entity only.
3399 If the unit has a finalizer and is a spec, then do not generate the
3400 decrement of the elaboration entity.
3401 (Gen_Finalize_Library_C): Likewise.
3403 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3405 * exp_ch7.adb (Alignment_Of): New subsidiary routine.
3406 (Bounds_Size_Expression): Removed.
3407 (Double_Alignment_Of): New subsidiary routine.
3408 (Make_Finalize_Address_Stmts): New local variable Index_Typ. Account
3409 for a hole in the dope vector of unconstrained arrays due to different
3410 index and element alignments.
3412 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3414 * sem_res.adb (Resolve_Allocator): diagnose task allocator that will
3415 raise program_error because body has not been seen yet.
3417 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3419 * sem_ch10.adb (Analyze_With_Clause): Protect against child unit with
3422 2011-08-04 Vincent Celier <celier@adacore.com>
3424 * makeutl.adb (Do_Complete): Check absolute paths in canonical forms
3426 2011-08-04 Yannick Moy <moy@adacore.com>
3428 * alfa.adb, alfa.ads (Unique_Defining_Entity): move function from here
3429 * sem_util.adb, sem_util.ads (Unique_Defining_Entity): ...to here
3431 2011-08-04 Thomas Quinot <quinot@adacore.com>
3433 * sem_ch12.adb (Analyze_Package_Instantiation): Do not omit body for
3434 instantiation in RCI.
3436 2011-08-04 Emmanuel Briot <briot@adacore.com>
3438 * make.adb: Share more code with gprbuild
3440 2011-08-04 Emmanuel Briot <briot@adacore.com>
3442 * projects.texi: Added documentation for the IDE'Gnat project file
3445 2011-08-04 Nicolas Roche <roche@adacore.com>
3447 * gnat_rm.texi: Minor editing.
3449 2011-08-04 Javier Miranda <miranda@adacore.com>
3451 * bindgen.adb (Gen_Adafinal_Ada): Do not differentiate the main case
3452 and the library case for VM targets.
3453 (Gen_Adainit_Ada): Likewise.
3455 2011-08-04 Robert Dewar <dewar@adacore.com>
3457 * g-altive.ads: Minor comment updates.
3458 * prj-nmsc.adb: Minor reformatting.
3460 2011-08-04 Javier Miranda <miranda@adacore.com>
3463 (Normalize_Scalars_Config): Value of the configuration switch set by
3464 pragma Normalize_Scalars when it appears in the gnat.adc file.
3465 (Normalize_Scalars): New field for record Config_Switches_Type. Used
3466 to save and restore settings of this pragma.
3468 (Register_Opt_Config_Switches, Save_Opt_Config_Switches,
3469 Restore_Opt_Config_Switches): Add missing support for Normalize_Scalars.
3471 2011-08-04 Vincent Celier <celier@adacore.com>
3473 * gnat_ugn.texi: Document gnatlink options -M and -M=mapfile
3475 2011-08-04 Arnaud Charlet <charlet@adacore.com>
3477 * makeutl.adb: Minor reformatting.
3479 2011-08-04 Olivier Hainque <hainque@adacore.com>
3481 * g-altive.ads: Update comments to reflect that only the soft
3482 binding is available today.
3484 2011-08-04 Robert Dewar <dewar@adacore.com>
3486 * bindgen.adb, einfo.adb, sem_ch12.adb, s-tasren.adb, sem_res.adb,
3487 makeutl.adb, prj-nmsc.adb, opt.ads, prj-env.adb: Minor reformatting
3488 * gcc-interface/Make-lang.in: Update dependencies.
3490 2011-08-04 Arnaud Charlet <charlet@adacore.com>
3492 * prj-env.adb: Remove local debug traces.
3494 2011-08-04 Yannick Moy <moy@adacore.com>
3496 * checks.adb (Apply_Float_Conversion_Check): correct a typo where Lo_OK
3497 was used instead of Hi_OK, which could cause a read of an uninitialized
3498 value later on. Detected while working on the new warning.
3499 * exp_ch9.adb (Expand_N_Entry_Declaration): remove useless assignment
3501 * sem_ch5.adb (Analyze_Assignment): set the last assignment component
3502 in more cases, in order to detect more unreferenced values.
3503 * sem_util.adb, sem_util.ads (Get_Enclosing_Object): return enclosing
3504 object for expression, if any.
3506 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
3508 * exp_intr.adb (Expand_Binary_Operator_Call): Look at the RM size of
3509 the operand types instead of the Esize.
3511 2011-08-04 Steve Baird <baird@adacore.com>
3513 * switch-b.adb (Scan_Binder_Switches): Add -P binder switch, used to
3514 enable CodePeer_Mode.
3515 * bindusg.adb (Display): Add help message describing -P binder switch.
3516 * gnat_ugn.texi: Document -P binder switch.
3517 * bindgen.adb (Gen_Main_Ada): If CodePeer_Mode is set, then call the
3518 user-defined main program directly.
3519 (Gen_Output_File_Ada): If CodePeer_Mode is set, generate a with of the
3520 user-defined main program in the context clause of the package body.
3522 2011-08-04 Yannick Moy <moy@adacore.com>
3524 * alfa.adb, alfa.ads (Get_Entity_For_Decl): remove function, partial
3525 duplicate of Defining_Entity
3526 (Get_Unique_Entity_For_Decl): rename function into
3527 Unique_Defining_Entity
3528 * einfo.adb, einfo.ads (Is_In_ALFA, Body_Is_In_ALFA): remove flags
3529 (Formal_Proof_On): remove synthesized flag
3530 * cstand.adb, sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb,
3531 sem_ch5.adb, sem_ch6.adb, sem_ch9.adb, sem_res.adb, sem_util.adb,
3532 sem_util.ads, stand.ads: Remove treatment associated to entities in ALFA
3533 * sem_prag.adb (Analyze_Pragma): remove special treatment for pragma
3534 Annotate (Formal_Proof)
3536 2011-08-04 Emmanuel Briot <briot@adacore.com>
3538 * prj-env.adb (Create_Config_Pragmas_File): fix handling of multi-unit
3539 source files with non-standard naming schemes, in imported projects
3541 2011-08-04 Emmanuel Briot <briot@adacore.com>
3543 * makeutl.adb (Complete_Mains): when a multi-unit source file is
3544 specified on the gprbuild command line, we need to compile all units
3545 within that file, not just the first one we find
3546 Fix error message for mains that are not found.
3548 2011-08-04 Thomas Quinot <quinot@adacore.com>
3550 * sem_ch6.adb: Update comment.
3551 * sem_ch12.adb: Minor reformatting.
3553 2011-08-04 Bob Duff <duff@adacore.com>
3555 * s-tasren.adb (Task_Do_Or_Queue): Previous code was reading
3556 Acceptor.Terminate_Alternative without locking Acceptor, which causes a
3557 race condition whose symptom is to fail to lock Parent. That, in turn,
3558 causes Parent.Awake_Count to be accessed without locking Parent, which
3559 causes another race condition whose symptom is that Parent.Awake_Count
3560 can be off by 1 (either too high or too low). The solution is to lock
3561 Parent unconditionally, and then lock Acceptor, before reading
3562 Acceptor.Terminate_Alternative.
3564 2011-08-04 Arnaud Charlet <charlet@adacore.com>
3566 * debug.adb: Update comment.
3568 2011-08-04 Robert Dewar <dewar@adacore.com>
3570 * par_sco.adb, exp_util.adb, make.adb, a-tags.adb, sem_prag.adb,
3571 sem_util.adb, sem_attr.adb, exp_ch4.adb, g-comlin.adb, g-comlin.ads,
3572 exp_ch6.adb: Minor reformatting.
3574 2011-08-04 Gary Dismukes <dismukes@adacore.com>
3576 * gnat_ugn.texi: Add sentence about the case of compile-time-detected
3579 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3581 * gnat_rm.texi: update Ravenscar desription to reflect Ada2012 RM.
3583 2011-08-04 Thomas Quinot <quinot@adacore.com>
3585 * sinfo.ads: Minor reformatting.
3587 2011-08-04 Emmanuel Briot <briot@adacore.com>
3589 * makeutl.adb, makeutl.ads, prj-nmsc.adb (Complete_Mains): report error
3590 even if there is no location.
3592 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3594 * sem_res.adb, sem_ch4.adb: move check for restriction
3595 No_Task_Hierarchy to resolve_allocator.
3597 2011-08-04 Thomas Quinot <quinot@adacore.com>
3599 * sinfo.adb, sinfo.ads, sem_prag.adb, sem_ch12.adb (Pragma_Enabled):
3600 This flag of N_Pragma nodes is not used, remove it as well as all of
3601 the associated circuitry.
3603 2011-08-04 Javier Miranda <miranda@adacore.com>
3605 * exp_disp.adb (Make_DT): Switch -gnatdQ disables the generation of the
3606 runtime check on duplicated externa tags
3607 * debug.adb Document switch -gnatdQ.
3609 2011-08-04 Gary Dismukes <dismukes@adacore.com>
3611 * a-fihema.ads: Minor typo fix.
3613 2011-08-04 Yannick Moy <moy@adacore.com>
3615 * sem_ch10.adb: Minor comment update.
3617 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3619 * einfo.adb: Update the node field usage to reflect the renaming of
3620 Return_Flag to Return_ Flag_Or_Transient_Decl.
3621 (Return_Flag): Renamed to Return_Flag_Or_Transient_Decl.
3622 (Set_Return_Flag): Renamed to Set_Return_Flag_Or_Transient_Decl.
3623 (Write_Field15_Name): Change Return_Flag to
3624 Return_Flag_Or_Transient_Decl.
3625 * einfo.ads: Rename node field Return_Flag to
3626 Return_Flag_Or_Transient_Decl. Update the associated comment and all
3627 occurrences in entities.
3628 (Return_Flag): Renamed to Return_Flag_Or_Transient_Decl. Update
3629 associated Inline pragma.
3630 (Set_Return_Flag): Renamed to Set_Return_Flag_Or_Transient_Decl. Update
3631 associated Inline pragma.
3632 * exp_ch4.ads, exp_ch4.adb (Expand_N_Expression_With_Actions): New
3634 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Update the calls to
3635 Return_Flag and Set_Return_Flag.
3636 * exp_ch7.adb (Process_Declarations): Add code to recognize hook
3637 objects generated for controlled transients declared inside an
3638 Exception_With_Actions. Update the calls to Return_Flag.
3639 (Process_Object_Declaration): Add code to add a null guard for hook
3640 objects generated for controlled transients declared inside an
3641 Exception_With_Actions. Update related comment.
3642 * exp_util.adb (Has_Controlled_Objects): Add code to recognize hook
3643 objects generated for controlled transients declared inside an
3644 Exception_With_Actions. Update the calls to Return_Flag.
3645 * expander.adb (Expand): Add new case for N_Expression_With_Actions.
3647 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3649 * sem_util.adb:(Wrong_Type): Improve error message on a one-element
3650 positional aggregate.
3652 2011-08-04 Vincent Celier <celier@adacore.com>
3654 * par_sco.adb (Process_Decisions.Output_Header): Check and record pragma
3655 SLOC only for pragmas.
3657 2011-08-04 Emmanuel Briot <briot@adacore.com>
3659 * projects.texi: Minor typo fix.
3661 2011-08-04 Emmanuel Briot <briot@adacore.com>
3663 * prj-nmsc.adb (Check_File): Minor change to traces, to help debugging
3664 on case-sensitive file systems.
3666 2011-08-04 Thomas Quinot <quinot@adacore.com>
3668 * put_scos.adb (Put_SCOs): Do not emit decision SCO for an X decision
3669 nested in a disabled pragma.
3670 * scos.ads, scos.adb, par_sco.ads, par_sco.adb: Record sloc of
3671 enclosing pragma, if any, for X decisions.
3673 2011-08-04 Thomas Quinot <quinot@adacore.com>
3675 * sem_prag.adb: Minor reformatting.
3677 2011-08-04 Vincent Celier <celier@adacore.com>
3679 * a-tags.adb (Check_TSD): Avoid concatenation of strings, as it is not
3680 allowed in no run time mode.
3682 2011-08-04 Vincent Celier <celier@adacore.com>
3684 * make.adb (Check): When -gnatc is used, check for the source file
3685 inside the ALI file with a canonical case file name.
3687 2011-08-04 Emmanuel Briot <briot@adacore.com>
3689 * g-comlin.adb, g-comlin.ads (Add_Switch): Put back support for
3690 overriding the separator.
3692 2011-08-04 Robert Dewar <dewar@adacore.com>
3694 * sem_aggr.adb, par_sco.adb, sem_type.adb, exp_util.adb, exp_ch9.adb,
3695 prj-nmsc.adb, sem_ch13.adb, exp_strm.adb: Minor reformatting.
3697 2011-08-04 Robert Dewar <dewar@adacore.com>
3699 * gnat_rm.texi: Minor documentation fix for pragma Annotate.
3701 2011-08-04 Yannick Moy <moy@adacore.com>
3703 * sem_attr.adb (Analyze_Attribute): add check during pre-analysis that
3704 'Result only appears in postcondition of function.
3706 2011-08-04 Thomas Quinot <quinot@adacore.com>
3708 * a-tags.adb (Check_TSD): When raising PROGRAM_ERROR for a duplicated
3709 external tag, include the value of the external tag in the exception
3712 2011-08-04 Yannick Moy <moy@adacore.com>
3714 * sem_attr.adb (Result): modify error message for misplaced 'Result
3716 2011-08-04 Sergey Rybin <rybin@adacore.com>
3718 * gnat_rm.texi (pragma Annotate): Fix syntax description to make it
3719 clear that the second argument must be an identifier.
3721 2011-08-04 Thomas Quinot <quinot@adacore.com>
3723 * exp_ch9.adb (Build_Barrier_Function): When compiling with
3724 -fpreserve-control-flow, insert an IF statement on the barrier
3725 condition to ensure that a conditional branch instruction is generated.
3727 2011-08-04 Emmanuel Briot <briot@adacore.com>
3729 * prj-part.adb, prj.adb, prj.ads, prj-tree.ads
3730 (Processing_Flags.Ignore_Missing_With): new flag.
3732 2011-08-04 Emmanuel Briot <briot@adacore.com>
3734 * prj-nmsc.adb (Find_Sources, Path_Name_Of): Fix handling of
3735 Source_List_File on case-insensitive systems where the file is actually
3736 on a case-sensitive file system (NFS,...).
3738 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3740 * sem_ch6.adb (Analyze_Function_Return): In a rare case where a
3741 function return contains a controlled [extension] aggregate and the
3742 return statement is not part of a handled sequence of statements, wrap
3743 the return in a block. This ensures that all controlled temporaries
3744 generated during aggregate resolution will be picked up by the
3745 finalization machinery.
3747 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3749 * sem_aggr.adb (Resolve_Aggregate): If aggregate has box-initialized
3750 components, freeze type before resolution, to ensure that default
3751 initializations are present for all components.
3752 * sem_res.adb (Resolve_Actuals): the designated object of an
3753 accces-to-constant type is a legal actual in a call to an
3754 initialization procedure.
3756 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3758 * exp_util.adb (Extract_Renamed_Object): Add N_Type_Conversion and
3759 N_Unchecked_Type_Conversion to the possible containers of a renamed
3762 2011-08-04 Yannick Moy <moy@adacore.com>
3764 * par-ch13.adb (Aspect_Specifications_Present): recognize
3765 "with Identifier'Class =>" as an aspect, so that a meaningful warning
3766 is issued in Strict mode.
3767 * par.adb: Fix typos in comments.
3769 2011-08-04 Yannick Moy <moy@adacore.com>
3771 * sem_attr.adb (Result): modify error message to take into account Post
3772 aspect when compiling Ada 2012 (or newer) code.
3774 2011-08-04 Nicolas Roche <roche@adacore.com>
3776 * env.c (__gnat_clearenv): Avoid use of dynamic size array in order to
3777 remove need for GCC exceptions.
3779 2011-08-04 Vincent Celier <celier@adacore.com>
3781 * makeutl.adb (Do_Complete): Call Debug_Output with the name of the
3782 project, not the source file name.
3783 * prj.adb (Find_Sources.Look_For_Sources): If the source has been
3784 excluded, continue looking. This excluded source will only be returned
3785 if there is no other source with the same base name that is not locally
3788 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3790 * sem_res.adb (Resolve_Intrinsic_Operator): if the result type is
3791 private and one of the operands is a real literal, use a qualified
3792 expression rather than a conversion which is not meaningful to the
3795 2011-08-04 Yannick Moy <moy@adacore.com>
3797 * sem_ch13.adb (Aspect_Loop): when an aspect X and its classwise
3798 corresponding aspect X'Class are allowed, proceed with analysis of the
3799 aspect instead of skipping it.
3801 2011-08-04 Tristan Gingold <gingold@adacore.com>
3803 * s-flocon.adb, s-flocon.ads: Add a body for s-flocon.ads
3804 This will allow to have an Ada implementation for the subprogram.
3806 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3808 * sem_ch3.adb (Analyze_Full_Type_Declaration): If the declaration is a
3809 completion and aspects are present, apply them to the entity for the
3810 type which is currently the partial view, but which is the one that
3812 * sem_ch13.adb (Analyze_Aspect_Specifications): if the predicate
3813 applies to a partial view, indicate that the full view has predicates
3814 and delayed aspects.
3815 (Replace_Type_Reference): Handle properly predicates that apply to the
3816 full view of a private completion.
3818 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
3820 * layout.adb (Layout_Type): For composite types, do not set Esize.
3821 * freeze.adb (Set_Small_Size): Remove test on alignment and do not
3823 (Size_Known): Look at the RM size of components instead of the Esize.
3824 (Freeze_Record_Type): Look at the RM size instead of the Esize to
3825 issue warning and activate Implicit_Packing.
3826 (Freeze_Entity): Likewise. Do not issue a warning for alias/atomic
3827 if the Esize is not known.
3828 * sem_ch13.adb (Analyze_Attribute_Definition_Clause) <Size>: Set Esize
3829 for elementary types only.
3830 (Analyze_Record_Representation_Clause): Look at the RM size instead
3831 of the Esize to issue errors.
3832 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not set Esize if it
3834 <E_Record_Type>: Look at the RM size instead of the Esize. Remove
3836 Look at the RM size instead of the Esize for types if the latter is
3838 (gnat_to_gnu_field): Use Known_Esize instead of Known_Static_Esize.
3840 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3842 * sem_type.adb: proper handling of equality not involving anonymous
3845 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3847 * exp_ch7.adb (Create_Finalizer): Remove local variables Spec_Nod and
3848 Vis_Decls. When creating a library-level finalizer for a package spec,
3849 both the declaration and body of the finalizer are inserted either in
3850 the visible or private declarations of the package spec.
3852 2011-08-04 Javier Miranda <miranda@adacore.com>
3854 * sem_ch3.adb (Derive_Subprograms): Complete assertion to request the
3855 use of the full-view of a type when invoking Is_Ancestor.
3856 * sem_type.adb (Is_Ancestor): For consistency, when the traversal of
3857 the full-view of private parents is requested, then use also the
3858 full-view of the parent of the first derivation.
3860 2011-08-04 Tristan Gingold <gingold@adacore.com>
3862 * s-taprop-vxworks.adb (Enter_Task): Use System.Float_Control.Reset
3863 instead of the locally imported procedure.
3864 * s-taprop-mingw.adb (Enter_Task): Ditto.
3865 * s-valrea.adb (Scan_Real): Ditto.
3866 * s-imgrea.adb (Set_Image_Real): Ditto.
3867 * s-flocon.ads: Make the package pure.
3869 2011-08-04 Thomas Quinot <quinot@adacore.com>
3871 * sinfo.ads, sinfo.adb (Debug_Statement, Set_Debug_Statement): Remove.
3872 * tbuild.ads, tbuild.adb (Make_Pragma): Adjust accordingly.
3873 * sinfo-cn.ads, sinfo-cn.adb (Change_Name_To_Procedure_Call_Statement):
3874 New subprogram, moved here from...
3875 * par.adb, par-ch5.adb (P_Statement_Name): ... here.
3876 * par-prag.adb (Par.Prag, case Pragma_Debug): Do not perform any
3877 rewriting of the last argument into a procedure call statement here...
3878 * sem_prag.adb (Analyze_Pragma, case Pragma_Debug): ...do it there
3881 2011-08-04 Thomas Quinot <quinot@adacore.com>
3883 * par_sco.adb: Minor reformatting.
3885 2011-08-04 Robert Dewar <dewar@adacore.com>
3887 * erroutc.adb: Minor reformatting.
3889 2011-08-04 Thomas Quinot <quinot@adacore.com>
3891 * par_sco.adb: Comment update.
3893 2011-08-04 Tristan Gingold <gingold@adacore.com>
3895 * s-flocon.ads: New file.
3896 * g-flocon.ads: Now a renaming of s-flocon.
3897 * Makefile.rtl: Add s-flocon.o
3899 2011-08-04 Javier Miranda <miranda@adacore.com>
3901 * exp_strm.adb (Build_Array_Input_Function): if the array type is
3902 constrained, do not attempt to build a subtype of it.
3904 2011-08-04 Yannick Moy <moy@adacore.com>
3906 * errout.ads Change comments: remove 'R'M as an example where quotes
3907 are needed; add ALFA as another case where quotes are not needed
3908 * erroutc.adb (Set_Msg_Insertion_Reserved_Word): add ALFA as another
3909 case where quotes are not needed.
3910 * sem_ch11.adb, sem_ch13.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb,
3911 sem_ch5.adb, sem_ch6.adb, sem_ch9.adb, sem_prag.adb, sem_res.adb:
3912 Remove all occurrences of 'A'L'F'A
3914 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3916 * sem_ch13.adb: check legality of invariant pragma.
3918 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
3920 * bindgen.adb: Add comments.
3922 2011-08-04 Yannick Moy <moy@adacore.com>
3924 * einfo.adb, einfo.ads: Free Flag254 and make Formal_Proof_On a
3926 * sem_prag.adb (Analyze_Pragma): record the pragma Annotate
3927 (Formal_Proof, On/Off) in the Rep_Item list of the current subprogram.
3929 2011-08-04 Robert Dewar <dewar@adacore.com>
3931 * exp_ch7.adb, exp_ch6.adb, sem_ch3.adb, layout.adb, sem_ch5.adb,
3932 osint-c.ads, sem_util.ads, gnat1drv.adb, targparm.ads, sem_ch6.adb,
3933 sem_ch13.adb, s-pooloc.adb: Minor reformatting.
3935 2011-08-04 Thomas Quinot <quinot@adacore.com>
3937 * s-pooloc.ads, s-pooglo.ads: Minor reformatting
3939 2011-08-04 Thomas Quinot <quinot@adacore.com>
3942 * s-pooloc.adb (Deallocate): Fix the case of deallocating the only
3945 2011-08-04 Robert Dewar <dewar@adacore.com>
3947 * einfo.ads, exp_ch4.adb: Minor reformatting.
3949 2011-08-04 Jerome Lambourg <lambourg@adacore.com>
3951 * back_end.ads (Gen_Or_Update_Object_File): Add more comments.
3953 2011-08-04 Ed Schonberg <schonberg@adacore.com>
3955 * exp_ch4.adb (Expand_Composite_Equality): code cleanup: use component
3956 type in all cases to compute list of primitive operations, because full
3957 view may be an itype that is not attached to the list of declarations.
3959 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
3961 * bindgen.adb (Gen_Adafinal_Ada): Generate an early return if the
3962 library has already been finalized.
3963 (Gen_Adafinal_C): Likewise.
3964 (Gen_Adainit_Ada): Generate an early return if the library has
3965 already been elaborated.
3966 (Gen_Adainit_C): Likewise.
3967 (Gen_Output_File_Ada): Generate an elaboration flag.
3968 (Gen_Output_File_C): Likewise.
3970 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3972 * exp_ch4.adb (Expand_Allocator_Expression): Disable the generation of
3973 Set_Finalize_Address_Ptr for CodePeer because Finalize_Address was not
3974 built in the first place.
3975 (Expand_N_Allocator): Disable the generation of Set_Finalize_Address_Ptr
3976 for CodePeer because Finalize_Address was not built to begin with.
3977 * exp_ch6.adb (Make_Build_In_Place_Call_In_Allocator): Ditto.
3979 2011-08-04 Pascal Obry <obry@adacore.com>
3981 * adaint.c (__gnat_tmp_name): Use current process id to create temp
3982 filenames, this ensures unicity of filenames across processes.
3984 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
3986 * bindgen.adb (Gen_Finalize_Library_Ada): Rename generated routine
3987 Raise_Controlled to Raise_From_Controlled_Operation. Update the
3988 signature of Raise_From_Controlled_Operation by adding flag From_Abort.
3989 Add False as the actual to From_Abort in the generated call to
3990 Raise_From_Controlled_Operation.
3992 2011-08-04 Jerome Lambourg <lambourg@adacore.com>
3994 * osint-c.ads, osint-c.adb (Set_Library_Info_Name): Move to declaration
3995 so that the ali file name can be retrieved from outside of this package.
3996 * back_end.ads, back_end.adb (Gen_Or_Update_Object_File): New method
3997 doing nothing in the general case, but used to update the object file
3998 timestamp if directly generated by the backend.
3999 * gnat1drv.adb (Gnat1drv): Make sure the object file's timestamp is set
4000 to a later time than the ali file one.
4002 2011-08-04 Yannick Moy <moy@adacore.com>
4004 * einfo.adb, einfo.ads (Formal_Proof_On): new flag set on subprogram
4005 entities whose body contains an Annotate pragma which forces formal
4007 * sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb,
4008 sem_ch6.adb, sem_ch9.adb, sem_res.adb: Adapt call to
4009 Mark_Non_ALFA_Subprogram to pass in a message and node.
4010 * sem_prag.adb (Analyze_Pragma): add treatment of pragma Annotate
4011 (Forma_Proof, On) which sets the flag Formal_Proof_On in the
4012 surrounding subprogram.
4013 * sem_util.adb, sem_util.ads (Mark_Non_ALFA_Subprogram,
4014 Mark_Non_ALFA_Subprogram_Unconditional): if the subprogram being marked
4015 as not in ALFA is annotated with Formal_Proof being On, then an error
4016 is issued based on the additional parameters for message and node.
4017 * snames.ads-tmpl (Name_Formal_Proof): new name for annotation.
4018 * gcc-interface/Make-lang.in: Update dependencies.
4020 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
4022 * exp_ch3.adb (Expand_Freeze_Class_Wide_Type): Do not generate
4023 Finalize_Address when CodePeer is enabled.
4025 2011-08-04 Pascal Obry <obry@adacore.com>
4027 * adaint.c (__gnat_tmp_name): Use _tempnam() instead of tempnam() as
4028 the latter returns a pointer to a static buffer which is deallocated
4029 at the end of the routine.
4031 2011-08-04 Yannick Moy <moy@adacore.com>
4033 * sem_ch3.adb (Array_Type_Declaration): move test for type in ALFA
4034 after index creation; mark unconstrained base array type generated as
4035 being in/not in ALFA as well
4036 (Make_Index): mark subtype created as in/not in ALFA
4037 * sem_ch5.adb (Analyze_Iteration_Scheme): mark entity for iterating
4038 over a loop as in/not in ALFA, depending on its type and form of loop
4041 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
4043 * exp_ch7.adb (Build_Object_Declarations): Initialize flag Abort
4044 directly to False on .NET and JVM.
4046 2011-08-04 Yannick Moy <moy@adacore.com>
4048 * sem_ch3.adb (Constrain_Enumeration, Constrain_Integer): remove
4049 constraint that subtype must come from source code to be in ALFA, so
4050 that anonymous subtypes can be in ALFA too.
4052 2011-08-04 Yannick Moy <moy@adacore.com>
4054 * sem_ch3.adb (Analyze_Object_Declaration): remove obsolete addition of
4055 reference for ALFA mode.
4056 * lib-xref-alfa.adb, lib-xref.ads (Traverse_Compilation_Unit): make
4057 procedure public so as to use it from formal verification back-end.
4059 2011-08-04 Jerome Lambourg <lambourg@adacore.com>
4061 * g-comlin.adb (For_Each_Simple_Switch.Is_In_Config): Remove the
4062 invalid checks of the Parameter, making Remove_Switch not working
4065 2011-08-04 Arnaud Charlet <charlet@adacore.com>
4067 * targparm.ads: Update header: no run-time exception is needed on this
4070 2011-08-04 Vincent Celier <celier@adacore.com>
4072 * a-fihema.adb: Use System.IO instead of GNAT.IO
4074 2011-08-04 Thomas Quinot <quinot@adacore.com>
4076 * sem_ch3.adb (Access_Definition): Anonymous access to subprogram types
4077 are forbidden in Compiler_Unit mode.
4079 2011-08-04 Robert Dewar <dewar@adacore.com>
4081 * sem_util.adb: Minor reformatting.
4083 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
4085 * bindgen.adb (Gen_Finalize_Library_Ada): Update the import string for
4086 library-level finalizers.
4087 (Gen_Finalize_Library_C): Update the import string for library-level
4089 (Gen_Finalize_Library_Defs_C): Update the definition name of a
4090 library-level finalizer.
4091 * exp_ch7.adb: Remove with and use clauses for Stringt.
4092 (Create_Finalizer): Remove local variables Conv_Name, Prag_Decl,
4093 Spec_Decl. Add local variable Body_Id. The names of library-level
4094 finalizers are now manually fully qualified and are no longer external.
4095 A single name is now capable of servicing .NET, JVM and non-VM targets.
4096 Pragma Export is no longer required to provide visibility for the name.
4097 (Create_Finalizer_String): Removed.
4098 (New_Finalizer_Name): New routine which mimics New_..._Name.
4100 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
4102 * sem_elab.adb (Check_Internal_Call_Continue): Change the type of the
4103 elaboration counter to Standard_Short_Integer.
4104 * sem_util.adb (Build_Elaboration_Entity): Likewise.
4105 * bindgen.adb (Gen_Elab_Externals_Ada): Adjust to above change.
4106 (Gen_Elab_Externals_C): Likewise.
4108 2011-08-04 Ed Falis <falis@adacore.com>
4110 * system-vxworks-arm.ads, system-vxworks-sparcv9.ads,
4111 system-vxworks-ppc.ads, system-vxworks-m68k.ads,
4112 system-vxworks-mips.ads, system-vxworks-x86.ads
4113 (Always_Compatible_Rep): set to False for all VxWorks targets.
4115 2011-08-04 Robert Dewar <dewar@adacore.com>
4117 * par_sco.adb, prj-proc.adb, make.adb, bindgen.adb, prj.adb, prj.ads,
4118 makeutl.adb, makeutl.ads, prj-nmsc.adb, exp_ch5.adb, exp_ch12.adb,
4119 exp_ch7.ads, exp_util.ads, sem_util.ads, g-comlin.ads, exp_ch6.adb,
4120 exp_ch6.ads, lib-xref.ads, exp_ch7.adb, exp_util.adb, exp_dist.adb,
4121 exp_strm.adb, gnatcmd.adb, freeze.adb, g-comlin.adb, lib-xref-alfa.adb,
4122 sem_attr.adb, sem_prag.adb, sem_util.adb, sem_elab.adb, sem_ch8.adb,
4123 sem_ch11.adb, sem_eval.adb, sem_ch13.adb, sem_disp.adb, a-fihema.adb:
4124 Minor reformatting and code reorganization.
4126 2011-08-04 Emmanuel Briot <briot@adacore.com>
4128 * projects.texi: Added doc for aggregate projects.
4130 2011-08-04 Emmanuel Briot <briot@adacore.com>
4132 * prj-proc.adb, prj-nmsc.adb, prj-env.adb (Process_Declarative_Items):
4133 Add support for overriding the Project_Path in aggregate projects.
4135 2011-08-04 Robert Dewar <dewar@adacore.com>
4137 * a-cofove.ads: Minor reformatting.
4139 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
4141 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Update the comment
4142 on the generated code.
4143 (Build_Finalize_Statements): Update the comment on the generated code.
4144 (Build_Initialize_Statements): Update the comment on the generated code.
4145 (Build_Object_Declarations): Add local variable Result. The object
4146 declarations are now built in sequence.
4147 * rtsfind.ads: Add RE_Exception_Occurrence_Access to tables RE_Id and
4150 2011-08-04 Robert Dewar <dewar@adacore.com>
4152 * checks.adb, alfa.adb, alfa.ads: Minor reformatting.
4154 2011-08-04 Eric Botcazou <ebotcazou@adacore.com>
4156 * einfo.ads (Elaboration_Entity): Document new definition and use.
4157 (Elaboration_Entity_Required): Adjust to above change.
4158 * exp_attr.adb (Expand_N_Attribute_Reference): Likewise.
4159 * exp_ch12.adb: And with and use for Snames.
4160 (Expand_N_Generic_Instantiation): Test 'Elaborated attribute.
4161 * exp_util.adb (Set_Elaboration_Flag): Likewise.
4162 * sem_attr.adb (Analyze_Attribute) <Check_Library_Unit>: Delete.
4163 <Check_Unit_Name>: Deal with N_Expanded_Name.
4164 <Attribute_Elaborated>: Extend to all unit names.
4165 * sem_elab.adb: And with and use for Uintp.
4166 (Check_Internal_Call_Continue): Adjust to Elaboration_Entity change.
4167 * sem_util.ads (Build_Elaboration_Entity): Adjust comment.
4168 * sem_util.adb (Build_Elaboration_Entity): Change type to Integer.
4169 * bindgen.adb (Gen_Elab_Externals_Ada): New local subprogram taken
4170 from Gen_Adainit_Ada.
4171 (Gen_Elab_Externals_C): Likewise, but taken from Gen_Adainit_C.
4172 (Gen_Adafinal_Ada): Remove redundant test. In the non-main program
4173 case, do not call System.Standard_Library.Adafinal; instead call
4174 finalize_library if needed.
4175 (Gen_Adafinal_C): Likewise.
4176 (Gen_Adainit_Ada): Do not set SSL.Finalize_Library_Objects in the
4177 non-main program case.
4178 (Gen_Adainit_C): Generate a couple of external declarations here.
4179 In the main program case, set SSL.Finalize_Library_Objects.
4180 (Gen_Elab_Calls_Ada): Adjust to Elaboration_Entity change.
4181 (Gen_Elab_Calls_C): Likewise.
4182 (Gen_Finalize_Library_Ada): Likewise. Skip SAL interface units.
4183 (Gen_Finalize_Library_C): Likewise. Generate a full function.
4184 (Gen_Main_C): Put back call to Ada_Final and don't finalize library
4186 (Gen_Output_File_Ada): Generate pragma Linker_Destructor for Ada_Final
4187 if -a is specified. Call Gen_Elab_Externals_Ada. Move around call to
4189 (Gen_Output_File_C): Generate __attribute__((destructor)) for Ada_Final
4190 if -a is specified. Call Gen_Elab_Externals_C. Remove useless couple
4191 of external declarations. Call Gen_Finalize_Library_C.
4193 2011-08-04 Emmanuel Briot <briot@adacore.com>
4195 * prj.adb, prj.ads, makeutl.adb, makeutl.ads (Complete_Mains,
4196 Compute_Compilation_Phases): new subprogram.
4197 (Builder_Data, Builder_Project_Tree_Data): new subprogram and type
4198 The number of mains as well as the various compilation phases that
4199 need to be run are now project tree specific, since various
4200 aggregated trees might have different requirements. In particular,
4201 they do not all require bind or link phases.
4203 2011-08-04 Emmanuel Briot <briot@adacore.com>
4205 * prj.adb, prj.ads, makeutl.adb, makeutl.ads, prj-env.adb
4206 (Project_Tree_Appdata): New type.
4207 It is now possible to associate application-specific data to a project
4208 tree. In particular, this is used in the gprbuild builder to avoid a
4209 number of global tables and htables, especially now that there can be
4210 several project trees loaded at once because of aggregate projects.
4211 (Debug_Name): new procedure.
4212 * projects.texi: Clarify syntax of "**" for Source_Dirs
4214 2011-08-03 Emmanuel Briot <briot@adacore.com>
4216 * prj.ads, makeutl.adb, makeutl.ads (Queue.Insert): now also inserts
4217 the "roots" for a main.
4218 (Fill_From_Project): add support for aggregate projects. Main units
4219 in aggregated projects are now automatically added in the list of
4220 files to build (although this fails later on in gprbuild, because
4221 these files are not using the root proejct tree, so this needs
4223 * gcc-interface/Make-lang.in: Update dependencies.
4225 2011-08-03 Yannick Moy <moy@adacore.com>
4227 * sem_ch4.adb (Analyze_Conditional_Expression): only allow boolean
4228 conditional expression in ALFA.
4229 * sem_res.adb (Resolve_Conditional_Expression): mark non-boolean
4230 expressions as not in ALFA.
4232 2011-08-03 Robert Dewar <dewar@adacore.com>
4234 * a-cofove.adb: Minor reformatting.
4236 2011-08-03 Emmanuel Briot <briot@adacore.com>
4238 * make.adb, prj.adb, prj.ads, makeutl.adb, makeutl.ads
4239 (Insert_Project_Sources, Insert_withed_Sources_For): moved from the
4241 These packages are more logically placed in the Queue package, since
4242 they manipulate the queue. It is also likely that they can be adapted
4243 for gnatmake, thus sharing more code.
4244 (Finish_Program, Fail_Program): moved from the gprbuild sources, so
4245 that we could move the above.
4247 2011-08-03 Emmanuel Briot <briot@adacore.com>
4249 * errutil.adb (Finalize): clean up the list of error messages on exit.
4250 Calling this subprogram multiple times will no longer show duplicate
4251 error messages on stderr.
4253 2011-08-03 Emmanuel Briot <briot@adacore.com>
4255 * g-comlin.adb, g-comlin.ads (Set_Command_Line): ignore the parameter
4256 Getopt_Switches when we have already define a command line
4259 2011-08-03 Yannick Moy <moy@adacore.com>
4261 * sem_ch11.adb (Analyze_Raise_xxx_Error): do not mark such nodes as not
4262 in ALFA. Instead, they are considered as assertions to prove.
4263 * sem_ch4.adb (Analyze_Conditional_Expression): do not always mark such
4264 nodes as not in ALFA. Instead, include conditional expressions in ALFA
4265 if they have no ELSE part, or if they occur in pre- and postconditions,
4266 where the Condition cannot have side-effects in ALFA
4267 (Analyze_Membership_Op): do not mark such nodes as not in ALFA
4268 (Analyze_Type_Conversion): do not always mark such nodes as not in ALFA.
4269 Instead, include type conversion between scalar types in ALFA.
4270 * sem_ch6.adb (Process_Formals): correctly mark a parameter in ALFA
4271 if-and-only-if its type is in ALFA.
4273 2011-08-03 Thomas Quinot <quinot@adacore.com>
4275 * scos.adb, get_scos.adb, put_scos.adb
4276 New code letter for decisions: G (entry guard)
4278 (Traverse_Subprogram_Body): Rename to...
4279 (Traverse_Subprogram_Or_Task_Body): New subrpogram.
4280 (Traverse_Protected_Body): New subprogram
4281 (Traverse_Declarations_Or_Statements): Add traversal of task bodies,
4282 protected bodies and entry bodies.
4284 2011-08-03 Yannick Moy <moy@adacore.com>
4286 * einfo.adb, einfo.ads (Is_Postcondition_Proc): new flag for procedure
4287 entities with get/set subprograms, which is set on procedure entities
4288 generated by the compiler for a postcondition.
4289 * sem_ch6.adb (Process_PPCs): set new flag on postcondition procedures
4290 * alfa.adb, alfa.ads (Get_Entity_For_Decl): new function returning the
4291 entity for a declaration
4292 (Get_Unique_Entity_For_Decl): new function returning an entity which
4293 represents a declaration, so that matching spec and body have the same
4296 2011-08-03 Robert Dewar <dewar@adacore.com>
4298 * a-except-2005.adb, a-cfhama.adb, a-cfhase.adb, a-cfhase.ads,
4299 a-cforma.adb, a-cforse.ads, a-cforse.adb: Minor reformatting
4301 2011-08-03 Yannick Moy <moy@adacore.com>
4303 * lib-xref-alfa.adb (Detect_And_Add_ALFA_Scope): make the subprogram
4304 library-level because retriction No_Implicit_Dynamic_Code in the
4305 front-end prevents its definition as a local subprogram
4306 (Traverse_Compilation_Unit): extract new procedure from Add_ALFA_File,
4307 for reuse in other contexts
4308 (Traverse_Declarations_Or_Statements,
4309 Traverse_Handled_Statement_Sequence, Traverse_Package_Body,
4310 Traverse_Package_Declaration, Traverse_Subprogram_Body): make all these
4311 procedures take a callback parameter to be called on all declarations
4313 (Traverse_All_Compilation_Units): new generic function to traverse a
4314 compilation unit and call a callback parameter on all declarations
4316 2011-08-03 Javier Miranda <miranda@adacore.com>
4318 * sem_prag.adb (Process_Interface_Name): Allow duplicated export names
4319 in Java since they are always enclosed in a namespace that
4320 differentiates them, and overloaded entities are supported by the VM.
4322 2011-08-03 Ed Schonberg <schonberg@adacore.com>
4324 * checks.adb (Determine_Range): If a computed bound of an operation is
4325 outside the range of the base type of the expression, and overflow
4326 checks are enabled, the result is unknown and cannot be used for any
4327 subsequent constant folding.
4328 * sem_eval.adb (Compile_Time_Compare): if the bounds of one operand are
4329 unknown, so is the result of the comparison.
4331 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
4333 * a-except-2005.adb (Raise_From_Controlled_Operation): Add new formal
4334 From_Abort. When finalization was triggered by an abort, propagate
4335 Standard'Abort_Signal rather than Program_Error.
4336 * a-except-2005.ads (Raise_From_Controlled_Operation): Add new formal
4338 * a-except.adb (Raise_From_Controlled_Operation): Add new formal
4339 From_Abort. When finalization was triggered by an abort, propagate
4340 Standard'Abort_Signal rather than Program_Error.
4341 * a-except.ads:(Raise_From_Controlled_Operation): Add new formal
4343 * exp_ch7.adb:(Build_Adjust_Or_Finalize_Statements): New local variable
4344 Abort_Id. Update the calls to Build_Object_Declarations and
4345 Build_Raise_Statement to include Abort_Id.
4346 (Build_Adjust_Statements): New local variable Abort_Id. Update the
4347 calls to Build_Object_Declarations and Build_Raise_Statement to include
4349 (Build_Finalize_Statements): New local variable Abort_Id. Update the
4350 calls to Build_Object_Declarations and Build_Raise_Statement to include
4352 (Build_Components): Create an entity for Abort_Id when exceptions are
4353 allowed on the target.
4354 (Build_Finalizer): New local variable Abort_Id.
4355 (Build_Initialize_Statements): New local variable Abort_Id. Update the
4356 calls to Build_Object_Declarations and Build_Raise_Statement to include
4358 (Build_Object_Declarations): Add new formal Abort_Id. Create the
4359 declaration of flag Abort_Id to preserve the original abort status
4360 before finalization code is executed.
4361 (Build_Raise_Statement): Add new formal Abort_Id. Pass Abort_Id to
4362 runtime routine Raise_From_Controlled_Operation.
4363 (Create_Finalizer): Update the call to Build_Raise_Statement to include
4364 Abort_Id. Update the call to Build_Object_Declarations to include
4365 Abort_Id. Update the layout of the finalizer body.
4366 (Make_Handler_For_Ctrl_Operation): Add an actual for From_Abort.
4367 (Process_Transient_Objects): New local variable Abort_Id. Remove the
4368 clunky code to create all flags and objects related to
4369 exception propagation and replace it with a call to
4370 Build_Object_Declarations. Update the call to Build_Raise_Statement to
4372 * exp_ch7.ads (Build_Object_Declarations): Moved from body to spec.
4373 Add new formal Abort_Id and associated comment on its use.
4374 (Build_Raise_Statement): Add new formal Abort_Id and associated comment
4376 * exp_intr.adb (Expand_Unc_Deallocation): New local variable Abort_Id.
4377 Remove the clunky code to create all flags and objects related to
4378 exception propagation and replace it with a call to
4379 Build_Object_Declarations. Update the call to Build_Raise_Statement.
4381 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
4383 * s-tassta.adb: Fix minor typos.
4385 2011-08-03 Robert Dewar <dewar@adacore.com>
4387 * rtsfind.ads, makeutl.ads, prj.ads, prj.adb, make.adb,
4388 lib-writ.adb, makeutl.adb, s-soflin.ads, clean.adb: Minor reformatting.
4390 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
4392 * exp_ch7.adb (Create_Finalizer): Treat freeze nodes in similar fashion
4393 to packages. This ensures that the finalizer body will not end up
4394 inside the freeze node.
4395 (Process_Declarations): Add code to detect whether a freeze node has a
4396 nested finalization collection.
4398 2011-08-03 Pascal Obry <obry@adacore.com>
4400 * g-awk.adb, g-awk.ads: Make GNAT.AWK API compatible with Ada 2005.
4401 (Current_Session): Return a not null access to Session_Type.
4402 (Default_Session): Likewise.
4404 2011-08-03 Robert Dewar <dewar@adacore.com>
4406 * a-cfdlli.adb, bindgen.adb, exp_ch4.adb, exp_ch13.adb, sem_warn.adb,
4407 exp_ch3.adb, exp_ch3.ads: Minor reformatting.
4409 2011-08-03 Pascal Obry <obry@adacore.com>
4411 * g-awk.ads: Minor comment fix.
4413 2011-08-03 Sergey Rybin <rybin@adacore.com>
4415 * tree_io.ads (ASIS_Version_Number): Update because of the changes in
4416 the tree structure related to discriminant constraints.
4417 Original_Discriminant cannot be used any more for computing the
4418 defining name for the reference to a discriminant.
4420 2011-08-03 Ed Schonberg <schonberg@adacore.com>
4422 * sem_disp.adb (Is_Tag_Indeterminate): If the return type of the
4423 function is not visibly tagged, this is not a dispatching call and
4424 therfore is not Tag_Indeterminate, even if the function is marked as
4425 dispatching on result.
4427 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
4429 * exp_ch13.adb: Add with and use clauses for Restrict and Rident.
4430 (Expand_N_Free_Statement): Add a guard to protect against run-times
4431 which do not support controlled types.
4432 * exp_ch3.adb (Expand_Freeze_Class_Wide_Type): Add a guard to protect
4433 against run-times which do not support controlled types.
4434 * exp_ch4.adb (Complete_Controlled_Allocation): Add a guard to protect
4435 against run-times which do not support controlled types.
4436 * exp_ch7.adb (Build_Finalization_Collection): Add a guard to protect
4437 against run-times which do not support controlled types.
4438 * exp_util.adb (Needs_Finalization): Code reformatting. Add a guard to
4439 protect against run-times which do not support controlled types.
4441 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
4443 * exp_intr.adb: Put back with and use clauses for Exp_Ch11.
4444 (Expand_Unc_Deallocation): Expand the AT_END handler at the very end.
4446 2011-08-03 Ed Schonberg <schonberg@adacore.com>
4448 * exp_ch5.adb (Expand_Iterator_Loop): indicate that the cursor is
4449 modified in the source, to prevent spurious warnings when compiling
4452 2011-08-03 Thomas Quinot <quinot@adacore.com>
4454 * a-except-2005.adb: Minor reformatting.
4456 2011-08-03 Ed Schonberg <schonberg@adacore.com>
4458 * sem_warn.adb (Check_One_Unit): if the only mention of a withed unit
4459 is a renaming declaration in the private part of a package, do not emit
4460 a warning that the with_clause could be moved because the renaming may
4461 be used in the body or in a child unit.
4463 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
4465 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration):
4466 Propagate the Comes_From_Source attribute from the original return
4467 object to the renaming.
4469 2011-08-03 Jose Ruiz <ruiz@adacore.com>
4471 * exp_ch7.adb (Build_Raise_Statement): Do not call
4472 Raise_From_Controlled_Operation when this routine is not present in
4473 the run-time library.
4474 (Cleanup_Protected_Object, Cleanup_Task): For restricted run-time
4475 libraries (Ravenscar), tasks are non-terminating, and protected objects
4476 and tasks can only appear at library level, so we do not want
4477 finalization of protected objects nor tasks.
4478 * exp_intr.adb: Minor clarification in comment.
4479 bindgen.adb (Gen_Adainit_Ada, Gen_Main_C, Gen_Output_File_Ada,
4480 Gen_Output_File_C): Remove references to finalization of library-level
4481 objects when using restricted run-time libraries.
4483 2011-08-03 Ed Schonberg <schonberg@adacore.com>
4485 * sem_ch3.adb (Build_Discriminant_Constraints): Set
4486 Original_Discriminant only if the parent type is a generic formal.
4488 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
4490 * exp_ch13.adb: Add with and use clause for Targparm;
4491 (Expand_N_Free_Statement): Prevent the generation of a custom
4492 Deallocate on .NET/JVM targets since this requires pools and address
4494 * exp_ch4.adb (Expand_Allocator_Expression): When compiling for
4495 .NET/JVM targets, attach the newly allocated object to the access
4496 type's finalization collection. Do not generate a call to
4497 Set_Finalize_Address_Ptr on .NET/JVM because this routine does not
4498 exist in the runtime.
4499 (Expand_N_Allocator): When compiling for .NET/JVM targets, do not
4500 create a custom Allocate for object that do not require initialization.
4501 Attach a newly allocated object to the access type's finalization
4502 collection on .NET/JVM.
4503 * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add special processing for
4504 assignment of controlled types on .NET/JVM. The two hidden pointers
4505 Prev and Next and stored and later restored after the assignment takes
4507 * exp_ch6.adb (Expand_Call): Add local constant Curr_S. Add specialized
4508 kludge for .NET/JVM to recognize a particular piece of code coming from
4509 Heap_Management and change the call to Finalize into Deep_Finalize.
4510 * exp_ch7.adb (Build_Finalization_Collection): Allow the creation of
4511 finalization collections on .NET/JVM only for types derived from
4512 Controlled. Separate the association of storage pools with a collection
4513 and only allow it on non-.NET/JVM targets.
4514 (Make_Attach_Call): New routine.
4515 (Make_Detach_Call): New routine.
4516 (Process_Object_Declarations): Suppress the generation of
4517 build-in-place return object clean up code on .NET/JVM since it uses
4519 * exp_ch7.ads (Make_Attach_Call): New routine.
4520 (Make_Detach_Call): New routine.
4521 * exp_intr.adb Add with and use clause for Targparm.
4522 (Expand_Unc_Deallocation): Detach a controlled object from a collection
4523 on .NET/JVM targets.
4524 * rtsfind.ads: Add entries RE_Attach, RE_Detach and
4525 RE_Root_Controlled_Ptr to tables RE_Id and RE_Unit_Table.
4526 * snames.ads-tmpl: Add name Name_Prev. Move Name_Prev to the special
4527 names used in finalization.
4529 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
4531 * a-fihema.adb: Add with and use clauses for System.Soft_Links.
4532 (Attach, Detach): Lock the current task when chaining an object onto a
4535 2011-08-03 Hristian Kirtchev <kirtchev@adacore.com>
4537 * a-except.adb, a-except-2005.adb (Raise_From_Controlled_Operation):
4538 Rewritten to create the message strings when the exception is not
4539 raised by an abort during finalization.
4540 * a-except.ads, a-except-2005.ads: Add pragma Export for procedure
4541 Raise_From_Controlled_Operation and update its associated comment.
4542 * a-fihema.ads, a-fihema.adb: New GNAT unit.
4543 Ada.Finalization.Heap_Management provides key functionality
4544 associated with controlled objects on the heap, their creation,
4545 finalization and reclamation. Type Finalization_Collection is
4546 effectively a wrapper which sits ontop of a storage pool and performs
4547 all necessary bookkeeping for all the objects it contains. Each
4548 access-to-controlled or access-to-class-wide type receives a collection
4549 as part of its expansion. The compiler generates buffer code and
4550 invokes Allocate / Deallocate to create and destroy allocated
4552 * a-finali.adb ("="): Removed.
4553 * a-finali.ads ("="): Removed. Controlled types no longer carry hidden
4554 fields Prev and Next.
4555 * ali.adb (Scan_ALI): Add parsing code to process PF / Has_Finalizer.
4556 A library unit with at least one controlled object on the library level
4557 has a special finalizer which is invoked by the binder. To signal this,
4558 ali files carry field PF.
4559 * ali.ads: New field in type Unit_Record called Has_Finalizer. Add
4560 associated comment on field usage.
4561 * a-tags.adb (Get_RC_Offset): Removed.
4562 (Needs_Finalization): New routine.
4563 * a-tags.ads: Update the structure of the GNAT dispatch tables.
4564 Dispatch tables now carry field Needs_Finalization which provides
4565 runtime indication whether a type is controlled or has controlled
4566 components or both. Remove field RC_Offset.
4567 (Get_RC_Offset): Removed along with its associated pragma Export.
4568 Since tagged types with controlled components no longer carry hidden
4569 field _controller, the special mechanism to retrieve its location is no
4571 (Needs_Finalization): New routine.
4572 * atree.ads, atree.adb (Elist24): New routine.
4573 (Set_Elist24): New routine.
4574 * atree.h: Add a define clause for Elist24.
4575 * bindgen.adb New library-level variable Lib_Final_Built.
4576 (Gen_Adafinal_Ada): Reimplemented. Depending on the restrictions or the
4577 presence of a VM target, the routine generates calls to the proper
4578 library finalization routine.
4579 (Gen_Adainit_Ada): Import Finalize_Library_Objects only on non-VM
4580 targets. Set the correct library finalization routine depending on
4581 whether the library has controlled objects or this is a VM compilation.
4582 (Gen_Finalize_Library_Ada): New routine. This procedure generates calls
4583 to library-level finalizers of compiled units in reverse order of
4584 elaboration. It also produces exception management code and reraises a
4585 potential exception after all units have been finalized.
4586 (Gen_Finalize_Library_C): New routine. This procedure generates calls to
4587 library-level finalizers of compiled units in reverse order of
4589 (Gen_Finalize_Library_Defs_C): New routine. This procedure generates the
4590 definitions of all library-level finalizers available to the compilation
4591 (Gen_Main_Ada): Directly call Adafinal which now contails all target
4593 (Gen_Main_C): Add new local constant Needs_Library_Finalization. Call
4594 System.Standard_Library.Adafinal directly. If the library needs
4595 finalization actions, create the sequence of finalization calls.
4596 (Gen_Output_File_Ada): Alphabetize local variables and constants.
4597 Generate a with clause for System.Soft_Links when compiling for a VM.
4598 Remove the code which imports System.Standard_Library.Adafinal as
4599 Do_Finalize. Generate the library finalization routine.
4600 (Gen_Output_File_C): Add new local constant Needs_Library_Finalization.
4601 If the library needs finalization actions, create all the definitions
4602 of library- level finalizers.
4603 (Has_Finalizer): New routine. Determines whether at least one compiled
4604 unit has a library-level finalizer.
4605 Add type Qualification_Mode.
4606 (Set_Unit_Name): Add a formal which controls the replacement of a dot.
4607 * einfo.adb: New usage of field 15 as Return_Flag.
4608 Remove Finalization_Chain_Entity from the usages of field 19.
4609 Remove Associated_Final_Chain from the usages of field 23.
4610 New usage of field 23 as Associated_Collection.
4611 New usage of field 24 as Finalizer.
4612 New usage of flag 252 as Is_Processed_Transient.
4613 (Associated_Final_Chain): Removed.
4614 (Associated_Collection): New routine.
4615 (Finalization_Chain_Entity): Removed.
4616 (Finalizer): New routine.
4617 (Is_Finalizer): New routine.
4618 (Is_Processed_Transient): New routine.
4619 (Return_Flag): New routine.
4620 (Set_Associated_Final_Chain): Removed.
4621 (Set_Associated_Collection): New routine.
4622 (Set_Finalization_Chain_Entity): Removed.
4623 (Set_Finalizer): New routine.
4624 (Set_Is_Processed_Transient): New routine.
4625 (Set_Return_Flag): New routine.
4626 (Write_Entity_Flags): Include Is_Processed_Transient to the list of
4628 (Write_Field8_Name): Alphabetize the output.
4629 (Write_Field11_Name): Alphabetize the output.
4630 (Write_Field12_Name): Alphabetize the output.
4631 (Write_Field13_Name): Alphabetize the output.
4632 (Write_Field14_Name): Alphabetize the output.
4633 (Write_Field15_Name): Alphabetize the output.
4634 (Write_Field16_Name): Alphabetize the output.
4635 (Write_Field17_Name): Alphabetize the output.
4636 (Write_Field18_Name): Alphabetize the output.
4637 (Write_Field19_Name): Alphabetize the output. Remove the output of
4638 Finalization_Chain_Entity.
4639 (Write_Field20_Name): Alphabetize the output.
4640 (Write_Field21_Name): Alphabetize the output.
4641 (Write_Field22_Name): Alphabetize the output.
4642 (Write_Field23_Name): Alphabetize the output. Remove the output of
4643 Associated_Final_Chain. Add output for Associated_Collection.
4644 (Write_Field24_Name): Alphabetize the output.
4645 (Write_Field25_Name): Add output for Finalizer.
4646 (Write_Field26_Name): Alphabetize the output.
4647 (Write_Field27_Name): Alphabetize the output.
4648 (Write_Field28_Name): Alphabetize the output.
4649 * einfo.ads: Add new field description for Associated_Collection and
4651 Remove Associated_Final_Chain and its uses in nodes.
4652 Remove Finalization_Chain_Entity and its uses in nodes.
4653 Add new field description for Finalizer and its uses in nodes.
4654 Add new synthesized attribute Is_Finalizer.
4655 Add new flag description for Is_Processed_Transient and its uses in
4657 Add new field description for Return_Flag and its uses in nodes.
4658 (Associated_Final_Chain): Removed along with its pragma Inline.
4659 (Associated_Collection): New routine and pragma Inline.
4660 (Finalization_Chain_Entity): Removed along with its pragma Inline.
4661 (Finalizer): New routine and pragma Inline.
4662 (Is_Finalizer): New routine and pragma Inline.
4663 (Is_Processed_Transient): New routine and pragma Inline.
4664 (Return_Flag): New routine and pragma Inline.
4665 (Set_Associated_Final_Chain): Removed along with its pragma Inline.
4666 (Set_Associated_Collection): New routine and pragma Inline.
4667 (Set_Finalization_Chain_Entity): Removed along with its pragma Inline.
4668 (Set_Finalizer): New routine and pragma Inline.
4669 (Set_Is_Processed_Transient): New routine and pragma Inline.
4670 (Set_Return_Flag): New routine and pragma Inline.
4671 * exp_aggr.adb: Alphabetize subprograms.
4672 (Build_Array_Aggr_Code): Remove formal Flist and its associated comment.
4673 (Build_Record_Aggr_Code): Remove formals Flist and Obj along with their
4674 associated comments. Remove local variables External_Final_List and
4676 Rename Ctrl_Stuff_Done to Finalization_Done. Rename local variable A to
4677 Ancestor. Remove the retrieval of finalization lists. Update the call to
4679 (Convert_Aggr_In_Allocator): Remove the retrieval of finalization
4680 lists. Update the call to Late_Expansion.
4681 (Convert_Aggr_In_Assignment): Update the call to Late_Expansion.
4682 (Convert_Aggr_In_Object_Decl): Update the call to Late_Expansion.
4683 (Gen_Assign): Remove the retrieval of the finalization list used to
4684 build the assignment. Update the calls to Make_Init_Call and
4686 (Gen_Ctrl_Actions_For_Aggr): Renamed to Generate_Finalization_Actions.
4687 Remove the mechanism to determine attachment levels and finalization
4688 list retrieval. Remove the processing for coextensions.
4689 (Init_Controller): Removed. Controllers no longer exist.
4690 (Late_Expansion): Remove formals Flist and Obj along with their
4691 associated comments. Update the calls to Build_Record_Aggr_Code and
4692 Build_Array_Aggr_Code.
4693 * exp_ch13.adb (Expand_N_Free_Statement): New routine.
4694 (Expand_N_Freeze_Entity): Add special processing for finalizers which
4695 appear in entry bodies, protected subprograms and task bodies.
4696 * exp_ch13.ads (Expand_N_Free_Statement): New routine.
4697 * exp_ch3.adb (Add_Final_Chain): Removed.
4698 (Build_Array_Init_Proc): Alphabetize local variables.
4699 (Build_Assignment): Alphabetize local variables. Update the call to
4701 (Build_Class_Wide_Master): Rename local variables to better reflect
4703 (Build_Discriminant_Assignments): Code reformatting.
4704 (Build_Init_Call_Thru): Code reformatting.
4705 (Build_Init_Procedure): Code reformatting. Generate a special version
4706 of Deep_Finalize which is capable of finalizing all initialized
4707 components and ignore the rest.
4708 (Build_Init_Statements): Rename local variables to better reflect their
4710 Reimplement the mechanism to include the creation and update of an index
4711 variable called a "counter". It is used as a bookmark for tracing
4712 initialized and non-initialized components.
4713 (Build_Initialization_Call): Remove local variable Controller_Typ.
4714 Alphabetize all local variables. Remove the initialization of the
4715 record controller and update the call to Make_Init_Call.
4716 (Build_Record_Init_Proc): Rename formal Pe to Rec_Ent.
4717 New local variable Counter.
4718 (Constrain_Array): Alphabetize.
4719 (Expand_Freeze_Array_Type): Create a collection instead of a
4721 (Expand_Freeze_Class_Wide_Type): New routine. Creates TSS primitive
4722 Finalize_Address which is used in conjunction with allocated controlled
4724 (Expand_N_Object_Declaration): Remove the creation of a finalization
4725 list for anonymous access types. Update the calls to Make_Init_Call and
4727 (Expand_Freeze_Record_Type): Remove local variable Flist. Remove the
4728 retrieval of finalization lists. Remove the expansion of the record
4729 controller. Create TSS primitive Finalize_Address used in conjunction
4730 with controlled objects on the heap. Create finalization collections
4731 for access-to-controlled record components.
4732 (Expand_Record_Controller): Removed.
4733 (Freeze_Type): Remove the freezing of record controllers. Freezing of
4734 class-wide types now requires additional processing. Create
4735 finalization collections for access-to-controlled types.
4736 (Increment_Counter): New routine.
4737 (Make_Counter): New routine.
4738 (Make_Eq_If): Remove the mention of Name_uController.
4739 (Make_Predefined_Primitive_Specs): There is no longer need to skip
4740 types coming from System.Finalization_Root.
4741 (Predef_Deep_Spec): Reimplemented to reflect the new parameter profiles.
4742 (Predefined_Primitive_Bodies): There is no longer need to skip types
4743 coming from System.Finalization_Root.
4744 (Stream_Operation_OK): Do not generate stream routines for
4745 type Ada.Finalization.Heap_Management.Finalization_Collection.
4746 * exp_ch3.ads: Alphabetize subprograms.
4747 * exp_ch4.adb: Remove with and use clause for Sem_Ch8.
4748 Add with and use clause for Lib.
4749 (Complete_Coextension_Finalization): Removed.
4750 (Complete_Controlled_Allocation): New routine. Create a finalization
4751 collection for anonymous access-to-controlled types. Create a custom
4752 Allocate which interfaces with the back end and the machinery in
4754 (Expand_Allocator_Expression): Add necessary calls to
4755 Complete_Controlled_Allocation. Remove the retrieval of finalization
4756 lists. Update the calls to Make_Adjust_Call. Generate a call to
4757 Ada.Finalization.Heap_Management.Set_Finalize_Address_Ptr to decorate
4758 the associated collection.
4759 (Expand_N_Allocator): Remove the processing for dynamic coextensions.
4760 Code clean up. Remove the retrieval of finalization lists and
4762 Update the call to Make_Init_Call. Generate a call to
4763 Ada.Finalization.Heap_Management.Set_Finalize_Address_Ptr to decorate
4764 the associated collection.
4765 (Get_Allocator_Final_List): Removed. Finalization lists are not
4767 (Suitable_Element): Remove the mention of Name_uController.
4768 * exp_ch5.adb: Remove with and use clauses for Ttypes and Uintp.
4769 (Make_Tag_Ctrl_Assignment): Rewritten to simply do a finalization of
4770 the left hand side, carry out the assignment and adjust the left hand
4772 * exp_ch6.adb (Add_Final_List_Actual_To_Build_In_Place_Call): Removed.
4773 (Add_Collection_Actual_To_Build_In_Place_Call): New routine.
4774 (BIP_Formal_Suffix): Rename BIP_Final_List and BIPfinallist to
4775 BIP_Collection and BIPcollection.
4776 (Build_Heap_Allocator): New routine used to allocate the return object
4777 of a build-in-place function onto a collection.
4778 (Expand_Ctrl_Function_Call): Moved from Exp_Ch7.
4779 (Expand_Call): Do not replace direct calls to Deep routines with their
4781 (Expand_N_Extended_Return_Statement): Give all variables shorter names
4782 and update their occurrences. Add a special return flag to monitor the
4783 [ab]normal execution of the function. The flag is set right before the
4785 Rewrite the mechanism used to allocate a build-in-place return object
4786 on the heap or on a storage pool.
4787 (Is_Direct_Deep_Call): New routine.
4788 (Make_Build_In_Place_Call_In_Allocator): Add a collection to a
4789 build-in-place function call instead of a final list. Build a call to
4790 Set_Finalize_Address_Ptr to decorate the associated collection.
4791 (Make_Build_In_Place_Call_In_Anonymous_Context): Create a temporary in
4792 order to name the build-in-place function call's result for later
4793 finalization. Add a collection to a build-in-place function call
4794 instead of a final list.
4795 (Make_Build_In_Place_Call_In_Assignment): Add a collection to a
4796 build-in-place function call instead of a final list. Remove the code
4797 which moves one final list and transforms it into the actual in a
4798 nested build-in-place call.
4799 (Make_Build_In_Place_Call_In_Object_Declaration): Add a collection to a
4800 build-in-place function call instead of a final list.
4801 (Move_Final_List): Removed.
4802 (Needs_BIP_Collection): New routine.
4803 (Needs_BIP_Final_List): Removed.
4804 * exp_ch6.ads: Replace BIP_Final_List with BIP_Collection in
4805 enumeration type BIP_Formal_Kind.
4806 Update the related comment.
4807 (Needs_BIP_Collection): New routine.
4808 (Needs_BIP_Final_List): Removed.
4809 * exp_ch7.adb: Add with and use clauses for Elists, Exp_Ch6, Stringt
4810 and Ttypes. Remove with and use clauses for Sem_Type. Alphabetize the
4811 majority of subprograms in this unit. Add Name_Finalize_Address to
4812 array Name_Of and TSS_Finalize_Address to array Deep_Name_Of.
4813 (Build_Adjust_Or_Finalize_Statements): Create the adjust or finalization
4814 statements for an array type.
4815 (Build_Adjust_Statements): Create the adjust statements for a record
4817 (Build_Cleanup_Statements): New routine. A procedure which given any
4818 construct containing asynchronous calls, references to _master, or is a
4819 task body, a task allocation or a protected body produces the necessary
4820 runtime calls to clean up these constructs.
4821 (Build_Exception_Handler): New routine.
4822 (Build_Final_List): Removed.
4823 (Build_Finalization_Collection): New routine. A core procedure which
4824 creates a collection to service heap allocated controlled objects
4825 associated with an access-to-controlled type.
4826 (Build_Finalize_Statements): Create the finalization statements for a
4828 (Build_Finalizer): New routine. A core procedure which given any
4829 construct with declarations and/or statements detects all objects which
4830 need any type of clean up (controlled objects, protected objects) and
4831 generates all necessary code to clean up the said objects in the proper
4833 (Build_Finalizer_Call): New routine.
4834 (Build_Initialize_Statements): Create the initialization statements for
4835 an array type. The generated routine contains code to finalize partially
4837 (Build_Object_Declarations): New routine.
4838 (Build_Raise_Statement): New routine.
4839 (Clean_Simple_Protected_Objects): Removed.
4840 (Controller_Component): Removed.
4841 (Enclosing_Function): New routine.
4842 (Expand_Cleanup_Actions): Create a finalizer for a construct which has
4843 either declarations or statements or both.
4844 (Expand_N_Package_Body): Create a finalizer for a non-generic package.
4845 (Expand_N_Package_Declaration): Create a finalizer for a non-generic
4847 (Find_Final_List): Removed.
4848 (Global_Flist_Ref): Removed.
4849 (In_Finalization_Root): Removed.
4850 (Insert_Actions_In_Scope_Around): Determine the range of the transient
4851 scope in terms of tree nodes. Process all transient variables within
4853 (Make_Adjust_Call): Rewritten. There is no longer an attach call
4854 generated after the adjust.
4855 (Make_Attach_Call): Removed.
4856 (Make_Call): New routine.
4857 (Make_Clean): Removed.
4858 (Make_Deep_Array_Body): Rewritten to simply invoke the appropriate
4860 (Make_Deep_Proc): Rewritten to generate the new profile signature used
4862 (Make_Deep_Record_Body): Rewritten to simply invoke the appropriate
4864 (Make_Final_Call): Modified to simply create a call to either
4865 Deep_Finalize or Finalize.
4866 (Make_Finalize_Address_Body): New routine.
4867 (Make_Finalize_Address_Stmts): New routine. A function which produces
4868 TSS primitive Finalize_Address used in conjunction with heap allocated
4870 (Make_Handler_For_Ctrl_Operation): Add specialized code for .NET/JVM.
4871 (Make_Init_Call): Rewritten. There is no longer an attach call
4872 generated after initialization.
4873 (Make_Local_Deep_Finalize): New routine.
4874 (Make_Set_Finalize_Address_Ptr_Call): New routine.
4875 (Make_Transient_Block): Remove the finalization list retrieval and
4877 (Needs_Finalization): Moved to Exp_Util.
4878 (Parent_Field_Type): New routine.
4879 (Preprocess_Components): New routine.
4880 (Process_Transient_Objects): New routine.
4881 (Wrap_HSS_In_Block): New routine.
4882 (Wrap_Transient_Declaration): Remove finalization list management and
4883 controller insertion.
4884 (Wrap_Transient_Expression): Code reformatting.
4885 (Wrap_Transient_Statement): Code reformatting.
4886 * exp_ch7.ads (Build_Final_List): Removed.
4887 (Build_Finalization_Collection): New routine.
4888 (Build_Raise_Statement): New routine.
4889 (Controller_Component): Removed.
4890 (Expand_Ctrl_Function_Call): Moved to Exp_Ch6.
4891 (Find_Final_List): Removed.
4892 (In_Finalization_Root): Removed.
4893 (Is_Simple_Protected_Type): Update related comment.
4894 (Make_Adjust_Call): New parameter profile and associated comments.
4895 (Make_Attach_Call): Removed.
4896 (Make_Final_Call): New parameter profile and associated comments.
4897 (Make_Finalize_Address_Body): New routine.
4898 (Make_Init_Call): New parameter profile and associated comments.
4899 (Make_Local_Deep_Finalize): New routine.
4900 (Make_Set_Finalize_Address_Ptr_Call): New routine.
4901 (Needs_Finalization): Moved to Exp_Util.
4902 * exp_ch9.adb (Add_Object_Pointer): Code reformatting.
4903 (Expand_N_Protected_Body): Remove the handling of finalization lists.
4904 (Find_Protection_Type): Moved to Exp_Util.
4905 * exp_disp.adb: Remove with and use clauses for Exp_Ch7.
4906 (Make_DT): Update sequence of dispatch table initialization. Remove the
4907 initialization of field RC_Offset. Add initialization of field Needs_
4909 * exp_intr.adb (Expand_Unc_Deallocation): Code reformatting.
4910 Reimplement how an object is first finalized, then deallocated.
4911 * exp_strm.adb (Build_Record_Or_Elementary_Input_Function):
4913 * exp_tss.ads: Add special suffix for TSS primitive Finalize_Address.
4914 Register TSS_Finalize_Address with type TSS_Names.
4915 * exp_util.adb (Build_Allocate_Deallocate_Proc): New routine. This core
4916 procedure provides the interface between an allocation / deallocation
4917 and the support machinery in Ada.Finalization.Heap_Management.
4918 (Find_Init_Call): Code reformatting.
4919 (Find_Init_Call_In_List): Code reformatting.
4920 (Find_Protection_Type): Moved from Exp_Ch9.
4921 (Find_Prim_Op): Reimplement to add preference of recovered primitive.
4922 (Has_Controlled_Coextensions): Removed.
4923 (Has_Controlled_Objects): New routine.
4924 (In_Library_Level_Package_Body): New routine.
4925 (Insert_Action_After): New routine.
4926 (Is_Finalizable_Transient): New routine. This predicate determines
4927 whether an object declaration is one of the many variants of controlled
4929 (Is_Null_Access_BIP_Func_Call): New routine.
4930 (Is_Non_BIP_Func_Call): New routine.
4931 (Is_Related_To_Func_Return): New routine.
4932 (Needs_Finalization): Moved from Exp_Ch7.
4933 * exp_util.ads (Build_Allocate_Deallocate_Proc): New routine.
4934 (Find_Protection_Type): Moved from Exp_Ch9.
4935 (Has_Controlled_Coextensions): Removed.
4936 (Has_Controlled_Objects): New routine.
4937 (In_Library_Level_Package_Body): New routine.
4938 (Insert_Action_After): New routine.
4939 (Is_Finalizable_Transient): New routine.
4940 (Is_Null_Access_BIP_Func_Call): New routine.
4941 (Is_Non_BIP_Func_Call): New routine.
4942 (Is_Related_To_Func_Return): New routine.
4943 (Needs_Finalization): Moved from Exp_ch7.
4944 * expander.adb (Expand): Add a case for N_Free_Statement.
4945 * freeze.adb (Freeze_All): Replace the generation of a finalization
4946 list with a collection for access-to-controlled types.
4947 (Freeze_Entity): Code reformatting.
4948 (Freeze_Record_Type): Remove the freezing of a record controller
4950 (Freeze_Subprogram): Code reformatting.
4951 * inline.adb (Cleanup_Scopes): Remove the reset of the scope
4953 * lib-writ.adb (Write_Unit_Information): Output "PF" when a package
4954 has a library-level finalizer.
4955 * lib-writ.ads: Add "PF" to the sequence of unit attributes.
4956 * a-filico.ads, a-filico.adb, s-finimp.ads, s-finimp.adb: Removed.
4957 * Makefile.rtl: Remove a-filico and s-finimp from the list of object
4958 files. Add a-fihema to the list of object files.
4960 Alphabetize the associations in type Is_Parameterless_Attribute.
4961 * rtsfind.ads: Ada.Finalization_List.Controller and
4962 System.Finalization_Implementation are no longer a GNAT unit.
4963 Update the range of type Ada_Finalization_Child. Remove the following
4964 recoverable entities:
4966 RE_Attach_To_Final_List
4970 RE_Finalizable_Ptr_Ptr
4971 RE_Global_Final_List
4972 RE_Limited_Record_Controller
4975 RE_Record_Controller
4976 RE_Simple_List_Controller
4978 Add the following recoverable entities:
4980 RE_Add_Offset_To_Address
4984 RE_Exception_Identity
4985 RE_Finalization_Collection
4986 RE_Finalization_Collection_Ptr
4987 RE_Needs_Finalization
4988 RE_Save_Library_Occurrence
4989 RE_Set_Finalize_Address_Ptr
4990 RE_Set_Storage_Pool_Ptr
4992 * sem_aggr.adb (Resolve_Record_Aggregate): Remove mention of
4994 * sem_aux.adb (First_Discriminant): Remove mention of Name_uController.
4995 (First_Stored_Discriminant): Remove the mention of Name_uController.
4996 * sem_aux.ads: Comment reformatting.
4997 * sem_ch10.adb (Build_Chain): Signal the class-wide creation machinery
4998 to redecorate an already existing class-wide type.
4999 (Decorate_Tagged_Type): New parameter profile and associated comment.
5000 Create a "shadow class-wide type" for a shadow entity.
5001 * sem_ch11.adb (Analyze_Exception_Handlers): Remove the dubious setting
5002 of the final chain along with the associated comment.
5003 * sem_ch3.adb (Access_Type_Declaration): Add new local variable
5004 Full_Desig and set it to the full view of the designated type.
5005 Initialize the finalization collection to empty.
5006 (Build_Derived_Record_Type): Alphabetize local variables. Code
5008 (Collect_Fixed_Components): Remove the mention of Name_uController.
5009 (Create_Constrained_Components): Remove the mention of Name_uController.
5010 (Make_Class_Wide_Type): Add specialized code to redecorate an existing
5011 class-wide type of a shadow entity.
5012 (Process_Full_View): Update the machinery which marks type
5013 Limited_Controlled's entity as limited.
5014 * sem_ch4.adb (Analyze_One_Call): Code reformatting.
5015 * sem_ch6.adb (Create_Extra_Formals): Do not generate a finalization
5016 list, instead make a collection build-in-place formal.
5017 * sem_ch8.adb (Analyze_Object_Renaming): Look at the available view of
5018 a designated type in order to establish a match between the renaming
5019 and the renamed entity.
5020 (Find_Selected_Component): Add guard to prevent spurious exceptions
5021 from being raised on .NET/JVM.
5022 * sem_disp.adb (Check_Dispatching_Operation): Include Finalize_Address
5023 to the list of primitive that need special processing. Update arrays
5024 C_Names and D_Names.
5025 (Replace_Types): Handle class-wide types.
5026 * sem_elab.adb (Check_A_Call): Since Deep_Initialize now has a
5027 different parameter profile, look at the first formal.
5028 * sem_prag.adb: Remove with and use clauses for Exp_Ch7. Add with and
5029 use clauses for Exp_Util.
5030 * sem_res.adb: Remove with and use clauses for Elists.
5031 (Propagate_Coextensions): Removed.
5032 (Resolve_Allocator): Do not propagate the list of coextensions from one
5033 allocator to another.
5034 * sem_util.adb (Build_Actual_Subtype_Of_Component): Rename variable
5035 Deaccessed_T to Desig_Typ.
5036 (Enter_Name): Remove the mention of Name_uController.
5037 (Gather_Components): Remove the mention of Name_uController.
5038 (Incomplete_Or_Private_View): New routine.
5039 (Is_Coextension_Root): Removed.
5040 (Is_Fully_Initialized_Type): Remove the mention of Name_uController.
5041 * sem_util.ads (Incomplete_Or_Private_View): New routine.
5042 (Is_Coextension_Root): Removed.
5043 * s-finroo.ads: Remove with clause for Ada.Unchecked_Conversion.
5044 Controlled types are now derived from a null tagged record. Remove
5045 types Finalizable_Ptr, Finalizable and Empty_Root_Controlled.
5046 * sinfo.adb (Coextensions): Removed.
5047 (Set_Coextensions): Removed.
5048 * sinfo.ads: Remove Coextensions from the explanation of node fields
5049 and its uses in nodes.
5050 Update the field usage of N_Allocator.
5051 (Coextensions): Removed along with its pragma Inline.
5052 (Set_Coextensions): Removed along with its pragma Inline.
5053 * snames.ads-tmpl: Remove names
5058 Name_uLocal_Final_List
5059 Name_Finalization_Root
5066 Name_Finalize_Address
5067 * s-pooglo.adb (Allocate): Add overriding indicator.
5068 (Deallocate): Add overriding indicator.
5069 (Storage_Size): Add overriding indicator.
5070 * s-soflin.adb (Adafinal_NT): Invoke Finalize_Library_Objects rather
5071 than Finalize_Global_List.
5072 (Null_Finalize_Global_List): Removed.
5073 (Save_Library_Occurrence): New routine.
5074 * s-soflin.ads: Remove variable Finalize_Global_List along with its
5075 initialization. Add variable Finalize_Library_Objects along with its
5076 pragma Export. Add variables Library_Exception and
5077 Library_Exception_Set along with their pragma Export.
5078 (Null_Finalize_Global_List): Removed.
5079 (Save_Library_Occurrence): New routine.
5080 * s-tassta.adb (Finalize_Global_Tasks): Call Finalize_Library_Objects
5081 rather than Finalize_Global_List.
5082 * tbuild.adb (Unchecked_Convert_To): Capture and set the parent field
5083 of the constructed node.
5085 2011-08-03 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
5087 * link.c: Include "auto-host.h" before system headers.
5089 2011-08-03 Vincent Celier <celier@adacore.com>
5091 * make.adb (Gnatmake): Add to table Library_Projs only library projects
5092 that are not extended. Do not check if a library project that is
5093 extended should be regenerated. Do not add to table Library_Paths the
5094 libraries that are in extended projects. Link only with libraries that
5095 are in libray projects that are not extended.
5096 * prj-nmsc.adb (Check_Library_Attributes): Do not reset flag Library
5097 for a library project that is extended.
5099 2011-08-03 Gary Dismukes <dismukes@adacore.com>
5101 * sem_ch6.adb (Find_Corresponding_Spec): When in an instance, skip
5102 conforming subprogram renamings that appear to be completions if they
5103 are not fully conformant.
5104 Such renamings are homographs but not completions.
5105 * sem_type.adb (Disambiguate): Handle disambiguation of overloaded
5106 names in a subprogram renaming that appears in an instance.
5108 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5110 * exp_util.adb (Expand_Subtype_From_Expr): if the type is limited but
5111 not immutably limited, build actual subtype from expression to provide
5112 proper bounds to caller.
5114 2011-08-03 Gary Dismukes <dismukes@adacore.com>
5116 * sem_ch8.adb: Minor comment correction.
5118 2011-08-03 Thomas Quinot <quinot@adacore.com>
5120 * exp_strm.adb (Build_Array_Input_Function): In Ada 2005 mode, when
5121 returning a limited array, use an extended return statement.
5123 2011-08-03 Vincent Celier <celier@adacore.com>
5125 * make.adb (Initialize): If --subdirs= is used, but no project file is
5126 specified, attempt to create the specify subdir if it does not already
5127 exist and use it as the object directory as if -D had been specified.
5129 2011-08-03 Arnaud Charlet <charlet@adacore.com>
5131 * s-tpopsp-vms.adb: New file.
5132 * s-taprop-vms.adb: Put back ATCB_Key, since needed by this file on VMS.
5133 * gcc-interfaces/Makefile.in: Use s-taprop-vms.adb on VMS.
5135 2011-08-03 Emmanuel Briot <briot@adacore.com>
5137 * make.adb, makeutl.adb, makeutl.ads, clean.adb (Makeutl.Queue): new
5140 2011-08-03 Yannick Moy <moy@adacore.com>
5142 * cstand.adb (Create_Standard): select Universal_Integer as an ALFA type
5143 * sem_ch3.adb (Array_Type_Declaration): detect array types in ALFA
5144 * sem_util.adb, sem_util.ads (Has_Static_Array_Bounds): new function to
5145 detect that an array has static bounds.
5147 2011-08-03 Thomas Quinot <quinot@adacore.com>
5149 * exp_dist.adb: Minor reformatting.
5151 2011-08-03 Arnaud Charlet <charlet@adacore.com>
5153 * s-taprop-irix.adb, s-taprop-hpux-dce.adb, s-taprop-vms.adb
5154 (ATCB_Key): Removed, not always used.
5156 2011-08-03 Emmanuel Briot <briot@adacore.com>
5158 * gnatcmd.adb, make.adb, prj.adb, prj.ads, makeutl.adb, makeutl.ads,
5159 clean.adb, prj-conf.adb, prj-env.adb, prj-env.ads (Makeutl): remove
5160 most remaining global variables.
5162 2011-08-03 Robert Dewar <dewar@adacore.com>
5164 * gnatcmd.adb, prj-proc.adb, mlib-prj.adb, prj.adb, makeutl.ads,
5165 prj-util.adb, prj-util.ads, prj-conf.adb, prj-env.adb: Minor
5168 2011-08-03 Javier Miranda <miranda@adacore.com>
5170 * exp_util.adb (Is_VM_By_Copy_Actual): Include N_Slide nodes as actuals
5171 that must be passed by copy in VM targets.
5173 2011-08-03 Emmanuel Briot <briot@adacore.com>
5175 * prj.ads, prj-nmsc.adb (Files_Htable): removed this htable, which
5176 duplicates a similar htable now in the project tree.
5178 2011-08-03 Claire Dross <dross@adacore.com>
5180 * a-cfdlli.adb, a-cfhama.adb, a-cfhase.adb, a-cforma.adb, a-cforse.adb,
5181 a-cofove.adb ("=", Length, Is_Empty, Clear, Assign, Copy, Element,
5182 Replace_Element, Query_Element, Update_Element, Move, Insert, Prepend,
5183 Append, Delete, Delete_First, Delete_Last, Reverse_Element, Swap,
5184 Splice, First, First_Element, Last, Last_Element, Next, Previous, Find,
5185 Reverse_Find, Contains, Has_Element, Iterate, Reverse_Iterate, Capacity,
5186 Reserve_Length, Length, Strict_Equal, Left, Right): Data-structure
5189 2011-08-03 Arnaud Charlet <charlet@adacore.com>
5191 * s-taprop-posix.adb, s-taprop-linux.adb, s-taprop-tru64.adb
5192 (ATCB_Key): Removed, not always used.
5193 * s-tpopsp-posix.adb, s-tpopsp-posix-foreign.adb (ATCB_Key): Moved from
5195 * s-tpopsp-tls.adb: New file.
5196 * gcc-interface/Makefile.in: Use TLS implementation of s-tpopsp.adb on
5197 x86/x64/ia64/powerpc/sparc Linux.
5199 2011-08-03 Arnaud Charlet <charlet@adacore.com>
5201 * system-aix.ads, system-aix64.ads: Set ZCX_By_Default to True.
5202 * gcc-interface/Makefile.in: Switch to ZCX by default on AIX ports.
5204 2011-08-03 Thomas Quinot <quinot@adacore.com>
5206 * rtsfind.ads, exp_dist.adb, exp_dist.ads
5207 (Build_From_Any_Call, Build_To_Any_Call, Build_TypeCode_Call):
5208 Fix type selection for mapping integer types to PolyORB types.
5210 2011-08-03 Bob Duff <duff@adacore.com>
5212 * sem_ch7.adb: Minor comment clarification.
5214 2011-08-03 Bob Duff <duff@adacore.com>
5216 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): If we get
5217 an error analyzing a choice, skip further processing. Further
5218 processing could cause a crash or cascade errors.
5220 2011-08-03 Emmanuel Briot <briot@adacore.com>
5222 * gnatcmd.adb, prj-proc.adb, prj-proc.ads, make.adb, mlib-prj.adb,
5223 prj.adb, prj.ads, makeutl.adb, makeutl.ads, clean.adb, prj-nmsc.adb,
5224 prj-util.adb, prj-util.ads, prj-conf.adb, prj-conf.ads, prj-env.adb,
5225 prj-env.ads (Shared_Project_Tree_Data): new type
5226 An aggregate project and its aggregated trees need to share the common
5227 data structures used for lists of strings, packages,... This makes the
5228 code simpler since otherwise we have to pass the root tree (also used
5229 for the configuration file data) in addition to the current project
5230 tree. This also avoids ambiguities as to which tree should be used.
5231 And finally this saves a bit of memory.
5232 (For_Every_Project_Imported): new parameter Tree.
5233 Since aggregated projects are using a different tree, we need to let
5234 the caller know which tree to use to manipulate the returned project.
5236 2011-08-03 Robert Dewar <dewar@adacore.com>
5238 * prj-proc.adb, exp_util.ads, exp_ch9.adb, make.adb, prj-ext.adb,
5239 prj-ext.ads, alfa.ads, sem_ch4.adb, makeutl.adb, makeutl.ads,
5240 lib-xref-alfa.adb, sem_cat.adb, exp_dist.adb, get_alfa.adb,
5241 prj-env.adb, prj-env.ads, prj-tree.adb, alfa.ads: Minor reformatting.
5243 2011-08-03 Javier Miranda <miranda@adacore.com>
5245 * exp_util.adb, sem_aux.adb, exp_util.ads, sem_aux.ads:
5246 Move routine Is_VM_By_Copy_Actual from sem_aux to exp_util.
5248 2011-08-03 Bob Duff <duff@adacore.com>
5250 * sem_ch8.adb (Is_Primitive_Operator_In_Use): Always check In_Use on
5253 2011-08-03 Joel Brobecker <brobecker@adacore.com brobecker>
5255 * g-sha256.ads, g-sha512.ads, g-sha1.ads, g-sha224.ads, g-sha384.ads,
5256 g-sehash.ads: Fix typo. Update header.
5258 2011-08-03 Thomas Quinot <quinot@adacore.com>
5260 * exp_ch6.adb (Expand_Actuals): Remove Ada_2005 guard on build-in-place
5263 2011-08-03 Gary Dismukes <dismukes@adacore.com>
5265 * sem_ch4.adb (Analyze_Overloaded_Selected_Component): Consider
5266 prefixes of private types along with records, since the selector may be
5268 * sem_res.adb (Resolve_Selected_Component): Consider prefixes of
5269 private types along with records, since the selector may be a
5272 2011-08-03 Emmanuel Briot <briot@adacore.com>
5274 * prj-pp.adb (Pretty_Print): Remove trailing blank line.
5276 2011-08-03 Javier Miranda <miranda@adacore.com>
5278 * sem_aux.adb (Is_VM_By_Copy_Actual): Fix wrong use of
5279 Tagged_Type_Expansion.
5281 2011-08-03 Yannick Moy <moy@adacore.com>
5283 * sem_res.adb (Resolve_Op_Concat_Arg): Do not issue a SPARK
5284 violation when the argument of concatenation is the name of a
5287 2011-08-03 Emmanuel Briot <briot@adacore.com>
5289 * prj-proc.adb, prj-ext.adb, prj-ext.ads, prj-env.adb, prj-env.ads,
5290 prj-tree.adb, prj-tree.ads (Initialize_And_Copy, Copy): new subprograms
5291 (Process_Declarative_Items): new parameter Child_Env.
5293 2011-08-03 Yannick Moy <moy@adacore.com>
5295 * alfa.ads: Update format of ALFA section in ALI file in order to
5296 add a mapping from bodies to specs when both are present.
5297 (ALFA_Scope_Record): Add components for spec file/scope.
5298 * get_alfa.adb (Get_ALFA): Read the new file/scope for spec when
5300 * lib-xref-alfa.adb (Collect_ALFA): After all scopes have been
5301 collected, fill in the spec information when relevant.
5302 * put_alfa.adb (Put_ALFA): Write the new file/scope for spec when
5305 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
5307 * inline.adb (Add_Inlined_Subprogram): Do not consider the enclosing
5308 code unit to decide whether to add internally generated subprograms.
5310 2011-08-03 Javier Miranda <miranda@adacore.com>
5312 * sem_aux.ads, sem_aux.adb (Is_VM_By_Copy_Actual): New subprogram.
5313 * exp_ch9.adb (Build_Simple_Entry_Call): Handle actuals that must
5314 be handled by copy in VM targets.
5316 2011-08-03 Emmanuel Briot <briot@adacore.com>
5318 * make.adb, makeutl.adb, makeutl.ads (Make.Switches_Of): Share
5319 code with Makeutl.Get_Switches.
5320 * prj-tree.adb: Update comment.
5322 2011-08-03 Thomas Quinot <quinot@adacore.com>
5324 * sem_cat.adb (Validate_RCI_Subprogram_Declaration): Reject a remote
5325 subprogram with a limited formal that does not support external
5328 2011-08-03 Yannick Moy <moy@adacore.com>
5330 * get_alfa.adb (Get_ALFA): add missing Skip_Spaces at start of
5332 * lib-xref-alfa.adb (Add_ALFA_File): split removal of scopes that are
5333 not from current unit in two phases, because it is not possible to
5334 change the table while iterating over its content.
5335 * put_alfa.adb (Put_ALFA): reset current file/scope at each new entity
5337 2011-08-03 Sergey Rybin <rybin@adacore.com>
5339 * vms_data.ads: Add qualifier for gnatmetric --no-static-loop option
5340 * gnat_ugn.texi: Update description of complexity metrics (gnatmetric)
5342 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5344 * sem_res.adb (Resolve_Op_Concat_Arg): if the argument is an aggregate
5345 and the component type is composite, this is ambiguous for predefined
5346 concatenation, but if the node is not overloaded and the entity is a use
5347 -defined function its profile can be used to resolve that aggregate.
5349 2011-08-03 Robert Dewar <dewar@adacore.com>
5351 * exp_ch4.adb: Minor code cleanup.
5353 2011-08-03 Thomas Quinot <quinot@adacore.com>
5355 * exp_dist.adb: Do not generate distribution stubs if serious errors
5356 have been diagnosed.
5358 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5360 * sem_ch4.adb (Try_Primitive_Operation): when checking the validity of
5361 the first formal of a primitive operation, go to the base type to
5362 handle properly an access to a derived type with constrained
5364 * sem_type.adb (Disambiguate): an immediately visible operator hides a
5365 user-defined function that is only use-visible.
5367 2011-08-03 Robert Dewar <dewar@adacore.com>
5369 * sem_aggr.adb, sem_ch3.adb, lib.ads, gnatcmd.adb, prj-proc.adb,
5370 make.adb, lib-writ.adb, prj-part.adb, prj-part.ads, prj-ext.adb,
5371 fname-uf.adb, prj-ext.ads, prj.adb, prj.ads, sem_attr.adb, alfa.adb,
5372 prj-makr.adb, errout.adb, makeutl.adb, makeutl.ads, restrict.ads,
5373 sem_ch6.adb, g-pehage.adb, clean.adb, put_alfa.adb, lib-xref-alfa.adb,
5374 prj-nmsc.adb, prj-nmsc.ads, sem_ch8.adb, prj-pars.ads, exp_aggr.adb,
5375 prj-attr.ads, sem_ch13.adb, get_alfa.adb, prj-env.adb, prj-env.ads,
5376 alfa_test.adb, prj-tree.adb, prj-tree.ads, einfo.ads: Minor reformatting
5378 2011-08-03 Robert Dewar <dewar@adacore.com>
5380 * repinfo.adb (List_Mechanism): Add handling of
5381 Convention_Ada_Pass_By_XXX.
5382 * sem_mech.adb (Set_Mechanism): Ditto.
5383 * sem_prag.adb (Process_Convention): Add entries for
5384 Convention_Ada_Pass_By_XXX.
5385 * snames.adb-tmpl, snames.ads-tmpl: Ditto.
5387 2011-08-03 Pascal Obry <obry@adacore.com>
5389 * makeutl.adb: Minor reformatting.
5391 2011-08-03 Vincent Celier <celier@adacore.com>
5394 (Get_File_Name) If the file cannot be found when there are no config
5395 pragmas file and May_Fail is True, return No_File instead of the file
5396 name, to be consistent.
5398 2011-08-03 Pascal Obry <obry@adacore.com>
5400 * adaint.c (__gnat_is_executable_file_attr): Avoid access
5403 2011-08-03 Javier Miranda <miranda@adacore.com>
5406 (Same_Representation): In VM targets the representation of arrays with
5407 aliased components differs from arrays with non-aliased components.
5409 2011-08-03 Emmanuel Briot <briot@adacore.com>
5411 * prj-proc.adb, prj-attr.adb, prj-attr.ads (Get_Attribute_Index): do
5412 not systematically lower case attribute indexes that contain no "."
5413 Fix definition of several Naming attributes, which take
5414 a unit name as index and therefore should be case insensitive.
5415 Minor refactoring (reduce length of variable names).
5417 2011-08-03 Emmanuel Briot <briot@adacore.com>
5419 * makeutl.adb, makeutl.ads (Get_Switches): new subprogram.
5421 2011-08-03 Emmanuel Briot <briot@adacore.com>
5423 * gnatcmd.adb, prj-proc.adb, prj-proc.ads, make.adb, prj-part.adb,
5424 prj-part.ads, switch-m.adb, switch-m.ads, prj-makr.adb, clean.adb,
5425 prj-pars.adb, prj-pars.ads, prj-conf.adb, prj-conf.ads, prj-tree.adb,
5426 prj-tree.ads (Prj.Tree.Environment): new type.
5428 2011-08-03 Emmanuel Briot <briot@adacore.com>
5430 * prj-proc.adb, prj.ads, makeutl.adb, makeutl.ads, prj-conf.adb,
5431 prj-tree.adb, prj-tree.ads (Environment): new type.
5433 2011-08-03 Emmanuel Briot <briot@adacore.com>
5435 * prj-tree.ads: Remove unused variable.
5437 2011-08-03 Yannick Moy <moy@adacore.com>
5439 * restrict.adb (Restriction_Msg): set "SPARK" all in upper case for
5440 issuing messages related to SPARK restriction violation.
5442 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5444 * sem_ch6.adb: guard against error nodes in return statements.
5446 2011-08-03 Arnaud Charlet <charlet@adacore.com>
5448 * errout.adb (Error_Msg_Internal): the main unit has not been read yet,
5449 a warning can only appear on a configuration file, so emit warning
5450 without further checks.
5452 2011-08-03 Arnaud Charlet <charlet@adacore.com>
5454 * s-interr.ads: add overriding keyword.
5456 2011-08-03 Geert Bosch <bosch@adacore.com>
5458 * exp_attr.adb: Fix minor typo.
5460 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5462 * par-ch4.adb: improve error recovery.
5464 2011-08-03 Emmanuel Briot <briot@adacore.com>
5466 * prj-part.adb, prj-part.ads, prj-makr.adb, prj-pars.adb, prj-conf.adb,
5467 prj-env.adb (Prj.Part.Parse): change parameter Always_Errout_Finalize
5470 2011-08-03 Emmanuel Briot <briot@adacore.com>
5472 * prj-dect.adb (Parse_Attribute_Declaration): make sure we can use
5473 "external" as an attribute name in aggregate projects.
5475 2011-08-03 Jose Ruiz <ruiz@adacore.com>
5477 * s-taprop-vxworks.adb: (Create_Task, Initialize): Ada 2012 pragma CPU
5478 uses CPU numbers starting 1, while VxWorks uses CPU numbers starting
5479 from 0, so we need to adjust.
5481 2011-08-03 Emmanuel Briot <briot@adacore.com>
5483 * prj-proc.adb, prj-ext.adb, prj-ext.ads, makeutl.adb, prj-tree.adb,
5484 prj-tree.ads, gnatcmd.adb, clean.adb (External_References): new type.
5486 2011-08-03 Yannick Moy <moy@adacore.com>
5488 * sem_ch6.adb (New_Overloaded_Entity): only issue error for SPARK
5489 restriction on overloaded entity if the entity is not an operator.
5491 2011-08-03 Yannick Moy <moy@adacore.com>
5493 * sem_ch7.adb, sem_res.adb, sem_attr.adb, restrict.adb,
5494 restrict.ads: Rename remaining Check_Formal_Restriction* into
5495 Check_SPARK_Restriction*.
5497 2011-08-03 Emmanuel Briot <briot@adacore.com>
5499 * prj-proc.adb, prj-part.adb, prj.adb, prj.ads, prj-nmsc.adb,
5500 prj-nmsc.ads, prj-err.adb (Project_Data): now discriminated on its
5502 (Project_Empty): removed
5503 (Empty_Project): new parameter Qualifier
5504 This is used to have fields specific to aggregate projects, cleaner
5505 New field to store the list of aggregated projects.
5506 (Check_Aggregate_Project): removed
5507 (Process_Aggregated_Projects, Free): new subprograms.
5509 2011-08-03 Olivier Hainque <hainque@adacore.com>
5511 * tracebak.c (STOP_FRAME ppc AIX): Stop at null return address as well.
5513 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5515 * sem_ch8.adb (Analyze_Object_Renaming): if the renamed object is an
5516 explicit dereference of an unconstrained type, create a constrained
5517 subtype for it, as is done for function calls that return an
5520 2011-08-03 Thomas Quinot <quinot@adacore.com>
5522 * g-pehage.adb (Finalize): Avoid possible double-free.
5524 2011-08-03 Steve Baird <baird@adacore.com>
5526 * exp_attr.adb (Expand_N_Attribute_Reference): Don't expand
5527 Elab_Spec/Body attrs in CodePeer_Mode.
5529 2011-08-03 Javier Miranda <miranda@adacore.com>
5531 * exp_aggr.adb (Flatten): Convert to positional form aggregates whose
5532 low bound is not known at compile time but they have no others choice.
5533 Done because in this case the bounds can be obtained directly from the
5536 2011-08-03 Ed Falis <falis@adacore.com>
5538 * s-tasinf-vxworks.ads: Update comment to reflect 0 indexing of CPUs
5539 on VxWorks SMP. Remove unusable constant ANY_CPU.
5541 2011-08-03 Emmanuel Briot <briot@adacore.com>
5543 * gnatcmd.adb, make.adb, prj-part.adb, prj-part.ads, prj-makr.adb,
5544 clean.adb, prj-nmsc.adb, prj-pars.adb, prj-conf.adb, prj-env.adb,
5545 prj-env.ads (Prj.Env.Initialize_Default_Project_Path,
5546 Prj.Env.Initialize_Empty): new subprograms
5547 (Get_Env, Find_Project): remove parameter Target_Name.
5549 2011-08-03 Gary Dismukes <dismukes@adacore.com>
5551 * sem_ch3.adb (Build_Derived_Record_Type): Test the Derive_Subps formal
5552 as a condition for the delayed call to Derived_Subprograms done for the
5553 case of the rewriting of a derived type that constrains the
5554 discriminants of its parent type.
5555 Avoids redundant subprogram derivations for private subtype derivations.
5557 2011-08-03 Javier Miranda <miranda@adacore.com>
5559 * exp_aggr.adb (Init_Hidden_Discriminants): New subprogram of
5560 Build_Record_Aggr_Code.
5561 (Build_Record_Aggr_Code): Add missing support to initialize hidden
5562 discriminants in extension aggregates.
5564 2011-08-03 Emmanuel Briot <briot@adacore.com>
5566 * prj-pp.adb (Print): also output project qualifiers, since in
5567 particular "aggregate" is mandatory in an aggregate project.
5569 2011-08-03 Emmanuel Briot <briot@adacore.com>
5571 * prj-part.adb, prj.adb, prj.ads, prj-nmsc.adb, prj-env.adb:
5572 (Debug_Output): new function.
5574 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
5576 * gnat_ugn.texi: Document -Wstack-usage.
5577 * gcc-interface/misc.c (enumerate_modes): Add guard for ghost FP modes.
5579 2011-08-03 Thomas Quinot <quinot@adacore.com>
5581 * sem_prag.adb Issue an error (not a warning) when a C++ type does not
5582 have keyword LIMITED.
5584 2011-08-03 Yannick Moy <moy@adacore.com>
5586 * alfa.adb, alfa.ads, alfa_test.adb: New files.
5587 * ali.adb (Known_ALI_Lines): add 'C' lines (SCO) and 'F' lines (ALFA)
5588 (Scan_ALI): do not issue a fatal error if parsing known lines after Xref
5589 section (does not happen in compiler, only if code directly calls
5591 * get_alfa.adb, get_alfa.ads: New files.
5592 * lib-writ.adb, lib-writ.ads (Write_ALI): output ALFA information if
5594 * lib-xref-alfa.adb: New file.
5595 * lib-xref.adb, lib-xref.ads
5596 (Xref_Entry): redefine information needed in cross-references for ALFA.
5597 Push ALFA treatments in separated local package.
5598 (Enclosing_Subpragram_Or_Package): treat specially subprogram
5599 identifiers. Return entity of package body instead of spec. Return
5600 Empty for a scope with no location.
5601 (Generate_Reference): adapt to new components for ALFA information.
5602 Remove the need for D references on definitions.
5603 (Is_Local_Reference): moved to ALFA local package
5604 (Output_References): extract subfunction as Extract_Source_Name
5605 (Output_Local_References): remove procedure, replaced by filtering of
5606 cross-references in package ALFA and printing in Put_ALFA.
5607 (Write_Entity_Name): remove procedure
5608 * lib.adb, lib.ads (Extract_Source_Name): extract here function to
5609 print exact name of entity as it appears in source file
5610 (Unit_Ref_Table): make type public for use in Lib.Xref.ALFA
5611 * put_alfa.adb, put_alfa.ads: New files.
5612 * xref_lib.adb (Search_Xref): protect read of cross-references against
5613 reading other sections of the ALI file, in gnatxref
5614 (Search): protect read of cross-references against reading other
5615 sections of the ALI file, in gnatfind.
5616 * gcc-interface/Make-lang.in: Update dependencies.
5618 2011-08-03 Thomas Quinot <quinot@adacore.com>
5620 * sem_ch3.adb: Minor reformatting.
5622 2011-08-03 Jose Ruiz <ruiz@adacore.com>
5624 * s-inmaop-vxworks.adb (Setup_Interrupt_Mask): Do nothing instead of
5625 raising an exception.
5627 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5629 * sem_res.adb (Set_String_Literal_Subtype): if index type is an integer
5630 type, always use 1 as the lower bound or string, even if lower bound of
5631 context is not static, to handle properly null strings in a non-static
5634 2011-08-03 Bob Duff <duff@adacore.com>
5636 * sem_prag.adb (Resolve_Aggregate): An array aggregate with 'others' is
5637 always legal on the right-hand side of an assignment statement; there
5638 is always an applicable index constraint in this case. Therefore, the
5639 check for Pkind = N_Assignment_Statement is now unconditional -- it
5640 doesn't depend on whether Is_Constrained (Typ).
5642 2011-08-03 Robert Dewar <dewar@adacore.com>
5644 * exp_ch5.adb, sem_prag.adb, exp_ch4.adb: Minor reformatting.
5646 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5648 * sem_ch3.adb (Build_Itype_Reference): do not create an itype reference
5649 for an itype created within a generic unit.
5651 2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
5653 * gnat_ugn.texi (Switches for gcc): Make it clearer that -fno-inline
5654 suppresses all inlining.
5656 2011-08-03 Robert Dewar <dewar@adacore.com>
5658 * sem_ch3.adb, sem_res.adb, exp_ch13.adb, exp_disp.adb,
5659 exp_aggr.adb: Minor reformatting.
5661 2011-08-03 Thomas Quinot <quinot@adacore.com>
5663 * exp_ch5.adb (Expand_N_Assignment_Statement): Do not force inlining of
5664 tagged assignment when discriminant checks are suppressed. This is
5665 useless and extremely costly in terms of static stack usage.
5667 2011-08-03 Bob Duff <duff@adacore.com>
5669 * sem_prag.adb (Get_Base_Subprogram): Do not follow Alias for instances
5670 of generics, because this leads to the wrong entity in the wrong scope,
5671 causing (e.g.) pragma Export_Procedure to get an error if the entity is
5673 (Process_Interface_Name): Follow Alias for instances of generics, to
5674 correct for the above change.
5676 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5678 * exp_ch4.adb (Expand_N_Selected_Component): If the discriminant value
5679 is an integer literal it is always safe to replace the reference. In
5680 addition, if the reference appears in the generated code for an object
5681 declaration it is necessary to copy because otherwise the reference
5682 might be to the uninitilized value of the discriminant of the object
5685 2011-08-03 Pascal Obry <obry@adacore.com>
5687 * adaint.c (__gnat_is_executable_file_attr): Fix Win32 circuitry when no
5688 ACL used, in this case we want to check for ending .exe, not .exe
5689 anywhere in the path.
5691 2011-08-03 Sergey Rybin <rybin@adacore.com>
5693 * tree_io.ads (ASIS_Version_Number): Update because of the changes in
5694 the tree structure (semantic decoration of references to record
5697 2011-08-03 Gary Dismukes <dismukes@adacore.com>
5699 * sem_aggr.adb (Analyze_Array_Aggregate): When checking the discrete
5700 choices of a named array aggregate, bail out when any choices are
5701 marked as Errors_Posted.
5703 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5705 * exp_ch13.adb (Expand_N_Freeze_Entity): cleanup determination of scope
5706 in which entity is frozen, to handle properly loop variables in
5709 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5711 * sem_res.adb (Set_String_Literal_Subtype): if the lower bound of the
5712 subtype is not static, compute the upper bound using attributes, to
5713 handle properly index types that are not integer types.
5715 2011-08-03 Bob Duff <duff@adacore.com>
5717 * gnat_rm.texi, gnat_ugn.texi: Fix some dangling URLs.
5718 Update copyright notice.
5720 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5722 * sem_ch3.adb (Build_Discriminant_Constraints): Only use
5723 Original_Discriminant if within an instance.
5724 * sem_ch4.adb (Analyze_Selected_Component): Ditto.
5726 2011-08-03 Thomas Quinot <quinot@adacore.com>
5728 * einfo.ads: Minor reformatting.
5730 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5732 * exp_disp.adb (Check_Premature_Freezing): diagnose the presence of a
5733 composite type with an unfrozen subcomponent, in the profile of a
5734 primitive operation.
5736 2011-08-03 Robert Dewar <dewar@adacore.com>
5738 * sem_util.ads, exp_aggr.adb, exp_ch3.adb: Minor reformatting.
5740 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5742 * sem_ch3.adb (Analyze_Object_Declaration): if a constant object of an
5743 unconstrained type with discriminants is initialized with an aggregate,
5744 use the constrained subtype of the aggregate as the type of the object,
5745 because it is immutable, and this allows the back-end to generate no
5746 code for the object declaration.
5748 2011-08-03 Robert Dewar <dewar@adacore.com>
5750 * exp_ch4.adb (Optimize_Length_Check): Fix bad handling of case where
5751 comparison operand is variable, and turns out to be zero or negative.
5753 2011-08-03 Javier Miranda <miranda@adacore.com>
5756 (Expand_Dispatching_Constructor_Call): Disable expansion of
5757 code required for native targets. Done to avoid generating
5758 references to unavailable runtime entities in VM targets.
5760 (Expand_N_Object_Declaration): Add missing support to handle
5761 the explicit initialization of class-wide interface objects.
5764 2011-08-03 Matthew Heaney <heaney@adacore.com>
5766 * a-cobove.adb (Merge): Move source onto target, instead of using Assign
5768 2011-08-03 Matthew Heaney <heaney@adacore.com>
5770 * a-cbdlli.adb (Splice): move source items from first to last
5772 2011-08-03 Yannick Moy <moy@adacore.com>
5774 * sem_util.ads: comment added.
5776 2011-08-03 Javier Miranda <miranda@adacore.com>
5779 (Expand_Record_Aggregate): In VM targets disable the expansion into
5780 assignments of aggregates whose type is not known at compile time.
5782 2011-08-03 Ed Schonberg <schonberg@adacore.com>
5784 * exp_ch9.adb (Build_Renamed_Formal_Declaration): common procedure for
5785 protected entries and task entries, to build the proper renaming
5786 declaration for entry formals, used in debugging.
5787 * exp_ch2.adb (Expand_Entry_Parameter): handle task and entry
5788 parameters in the same way.
5790 2011-08-02 Robert Dewar <dewar@adacore.com>
5792 * a-direct.adb, sinfo.ads, exp_ch9.adb, scng.adb, sem_util.adb,
5793 sem_util.ads, restrict.ads, par-prag.adb: Minor reformatting and/or
5794 code reorganization.
5796 2011-08-02 Robert Dewar <dewar@adacore.com>
5798 * debug.adb: Debug flag d.P to suppress length comparison optimization
5799 * exp_ch4.adb (Optimize_Length_Comparison): New routine to optimize
5800 comparison of Length by comparing First/Last instead.
5802 2011-08-02 Matthew Heaney <heaney@adacore.com>
5804 * a-cobove.ads: Code clean up.
5806 2011-08-02 Vincent Celier <celier@adacore.com>
5808 * adaint.c (file_names_case_sensitive_cache): New static int.
5809 (__gnat_get_file_names_case_sensitive): Cache the return value in
5810 file_names_case_sensitive_cache at the first invocation, to avoid
5811 multiple calls to getenv.
5813 2011-08-02 Bob Duff <duff@adacore.com>
5815 * sem_ch12.adb (Validate_Derived_Type_Instance): Implement AI05-0218-1.
5817 2011-08-02 Yannick Moy <moy@adacore.com>
5819 * sem_ch3.adb, sem_ch5.adb, sem_ch9.adb, sem_prag.adb, sem.ads,
5820 sem_util.adb, sem_util.ads, sem_res.adb, sem_ch2.adb, sem_ch4.adb,
5821 sem_ch6.adb, sem_ch11.adb: Add semantic flag In_Pre_Post_Expression to
5822 indicate that we are in a precondition or postcondition. This is used in
5823 Mark_Non_ALFA_Subprogram (renaming of Mark_Non_ALFA_Subprogram_Body) to
5824 decide whether to flag the spec or body of the current subprogram as
5827 2011-08-02 Fabien Chouteau <chouteau@adacore.com>
5829 * impunit.adb: Add Ada.Execution_Time.Interrupts in the Ada2012 package
5831 * a-extiin.ads: New file.
5833 2011-08-02 Bob Duff <duff@adacore.com>
5835 * a-direct.adb (Rename): Implement AI05-0231-1. In particular, Rename
5836 now raises Name_Error instead of Use_Error in certain cases. The other
5837 parts of this AI were already implemented properly.
5839 2011-08-02 Vincent Celier <celier@adacore.com>
5841 * link.c: Only import "auto-host.h" when building the gnattools.
5843 2011-08-02 Yannick Moy <moy@adacore.com>
5845 * sem_util.adb: Inter-unit inlining does not work for a subprogram
5846 which calls a local subprogram, so extract subprogram
5847 from Mark_Non_ALFA_Subprogram_Body.
5849 2011-08-02 Javier Miranda <miranda@adacore.com>
5852 (Extract_Dispatching_Call): If the type of the dispatching object is an
5853 access type then return an explicit dereference in the Object out-mode
5856 2011-08-02 Gary Dismukes <dismukes@adacore.com>
5858 * sem_ch3.adb (Analyze_Subtype_Declaration): Generate range
5859 compatibility checks for all indexes of an array subtype, not just the
5860 first. Reset Has_Dynamic_Range_Check on the subtype before each
5861 potential check to ensure that Insert_Range_Checks will not elide any
5862 of the dynamic checks.
5864 2011-08-02 Yannick Moy <moy@adacore.com>
5866 * par-prag.ad (Process_Restrictions_Or_Restriction_Warnings): recognize
5867 SPARK restriction at parsing time.
5868 * scng.adb (Scan): Generate a token Tok_SPARK_Hide for a SPARK HIDE
5869 directive only if the SPARK restriction is set for this unit.
5871 2011-08-02 Yannick Moy <moy@adacore.com>
5873 * sem_ch3.adb, sem_ch5.adb, sem_ch9.adb, sem_util.adb, sem_util.ads,
5874 sem_res.adb, sem_ch2.adb, sem_ch4.adb, sem_ch6.adb,
5875 sem_ch11.adb: Protect call to Current_Subprogram which might be costly
5876 when repeated. Rename Current_Subprogram_Is_Not_In_ALFA into
5877 Mark_Non_ALFA_Subprogram_Body.
5878 Split body of Mark_Non_ALFA_Subprogram_Body to get body small and
5881 2011-08-02 Yannick Moy <moy@adacore.com>
5883 * sem_res.adb: Protect calls to Matching_Static_Array_Bounds which
5886 2011-08-02 Robert Dewar <dewar@adacore.com>
5888 * exp_ch9.adb, exp_sel.adb, restrict.ads, exp_disp.adb, erroutc.ads,
5889 exp_ch3.adb: Minor reformatting.
5891 2011-08-02 Emmanuel Briot <briot@adacore.com>
5893 * adaint.c (__gnat_locate_exec_on_path): only returns executable
5894 files, not any regular file.
5895 (__gnat_locate_file_with_predicate): new subprogram.
5897 2011-08-02 Yannick Moy <moy@adacore.com>
5899 * sinfo.adb, sinfo.ads: Restrict the use of flags
5900 Has_Dynamic_Length_Check and Has_Dynamic_Range_Check to expression
5901 nodes, plus N_Subtype_Declaration for the 2nd one.
5903 2011-08-02 Sergey Rybin <rybin@adacore.com>
5905 * gnat_rm.texi: Ramification of pragma Eliminate documentation
5906 - fix bugs in the description of Source_Trace;
5907 - get rid of UNIT_NAME;
5909 2011-08-02 Javier Miranda <miranda@adacore.com>
5912 (Build_Dispatching_Requeue): Adding support for VM targets
5913 since we cannot directly reference the Tag entity.
5914 * exp_sel.adb (Build_K): Adding support for VM targets.
5915 (Build_S_Assignment): Adding support for VM targets.
5917 (Default_Prim_Op_Position): In VM targets do not restrict availability
5918 of predefined interface primitives to compiling in Ada 2005 mode.
5919 (Is_Predefined_Interface_Primitive): In VM targets this service is not
5920 restricted to compiling in Ada 2005 mode.
5921 (Make_VM_TSD): Generate code that declares and initializes the OSD
5922 record. Needed to support dispatching calls through synchronized
5925 (Make_Predefined_Primitive_Specs): Enable generation of predefined
5926 primitives associated with synchronized interfaces.
5927 (Make_Predefined_Primitive_Bodies): Enable generation of predefined
5928 primitives associated with synchronized interfaces.
5930 2011-08-02 Yannick Moy <moy@adacore.com>
5932 * par-ch11.adb (P_Handled_Sequence_Of_Statements): mark a sequence of
5933 statements hidden in SPARK if preceded by the HIDE directive
5934 (Parse_Exception_Handlers): mark each exception handler in a sequence of
5935 exception handlers as hidden in SPARK if preceded by the HIDE directive
5936 * par-ch6.adb (P_Subprogram): mark a subprogram body hidden in SPARK
5937 if starting with the HIDE directive
5938 * par-ch7.adb (P_Package): mark a package body hidden in SPARK if
5939 starting with the HIDE directive; mark the declarations in a private
5940 part as hidden in SPARK if the private part starts with the HIDE
5942 * restrict.adb, restrict.ads
5943 (Set_Hidden_Part_In_SPARK): record a range of slocs as hidden in SPARK
5944 (Is_In_Hidden_Part_In_SPARK): new function which returns whether its
5945 argument node belongs to a part which is hidden in SPARK
5946 (Check_SPARK_Restriction): do not issue violations on nodes in hidden
5947 parts in SPARK; protect the possibly costly call to
5948 Is_In_Hidden_Part_In_SPARK by a check that the SPARK restriction is on
5949 * scans.ads (Token_Type): new value Tok_SPARK_Hide in enumeration
5950 * scng.adb (Accumulate_Token_Checksum_GNAT_6_3,
5951 Accumulate_Token_Checksum_GNAT_5_03): add case for new token
5953 (Scan): recognize special comment starting with '#' and followed by
5954 SPARK keyword "hide" as a HIDE directive.
5956 2011-08-02 Yannick Moy <moy@adacore.com>
5958 * types.ads, erroutc.ads: Minor reformatting.
5960 2011-08-02 Vincent Celier <celier@adacore.com>
5962 * link.c: Add response file support for cross platforms.
5964 2011-08-02 Ed Schonberg <schonberg@adacore.com>
5966 * sem_aggr.adb (Resolve_Array_Aggregate): when copying the expression
5967 in an association, set parent field of copy before partial analysis.
5968 * sem_res.adb (Resolve_Slice): create reference to itype only when
5969 expansion is enabled.
5971 2011-08-02 Yannick Moy <moy@adacore.com>
5973 * einfo.adb, einfo.ads (Body_Is_In_ALFA, Set_Body_Is_In_ALFA): get/set
5974 for new flag denoting which subprogram bodies are in ALFA
5975 * restrict.adb, sem_ch7.adb: Update comment
5976 * sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb,
5977 sem_ch9.adb, sem_res.adb: Add calls to
5978 Current_Subprogram_Body_Is_Not_In_ALFA on unsupported constructs.
5979 * sem_ch6.adb (Analyze_Function_Return): add calls to
5980 Current_Subprogram_Body_Is_Not_In_ALFA on return statement in the
5981 middle of the body, and extended return.
5982 (Check_Missing_Return): add calls to Set_Body_Is_In_ALFA with argument
5983 False when missing return.
5984 (Analyze_Subprogram_Body_Helper): initialize the flag Body_Is_In_ALFA
5985 to True for subprograms whose spec is in ALFA. Remove later on the flag
5986 on the entity used for a subprogram body when there exists a separate
5988 * sem_util.adb, sem_util.ads (Current_Subprogram_Body_Is_Not_In_ALFA):
5989 if Current_Subprogram is not Empty, set its flag Body_Is_In_ALFA to
5990 False, otherwise do nothing.
5992 2011-08-02 Robert Dewar <dewar@adacore.com>
5994 * inline.adb, stand.ads, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
5996 2011-08-02 Yannick Moy <moy@adacore.com>
5998 * sem_ch4.ads: minor formatting.
6000 2011-08-02 Yannick Moy <moy@adacore.com>
6002 * sem_aggr.adb, err_vars.ads, sem_ch3.adb, sem_ch5.adb, sem_ch9.adb,
6003 debug.adb, sem_util.adb, sem_res.adb, sem_attr.adb, gnat1drv.adb,
6004 errout.adb, errout.ads, exp_ch6.adb, sem_ch4.adb, restrict.adb,
6005 restrict.ads, sem_ch6.adb, sem_ch8.adb, sem_ch11.adb,
6006 opt.ads: cleanup of SPARK mode
6008 2011-08-02 Yannick Moy <moy@adacore.com>
6010 * cstand.adb (Create_Standard): sets Is_In_ALFA component of standard
6012 * einfo.adb, einfo.ads (Is_In_ALFA): add flag for all entities
6013 (Is_In_ALFA, Set_Is_In_ALFA): new subprograms to access flag Is_In_ALFA
6015 (Analyze_Object_Declaration): set Is_In_ALFA flag for objects
6016 (Constrain_Enumeration): set Is_In_ALFA flag for enumeration subtypes
6017 (Constrain_Integer): set Is_In_ALFA flag for integer subtypes
6018 (Enumeration_Type_Declaration): set Is_In_ALFA flag for enumeration
6020 (Set_Scalar_Range_For_Subtype): unset Is_In_ALFA flag for subtypes with
6022 * sem_ch6.adb (Analyze_Return_Type): unset Is_In_ALFA flag for
6023 functions whose return type is not in ALFA.
6024 (Analyze_Subprogram_Specification): set Is_In_ALFA flag for subprogram
6026 (Process_Formals): unset Is_In_ALFA flag for subprograms if a
6027 parameter's type is not in ALFA.
6028 * stand.ads (Standard_Type_Is_In_ALFA): array defines which standard
6031 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6033 * sem_ch6 (Analyze_Expression_Function): treat the function as
6034 Inline_Always, and introduce a subprogram declaration for it when it is
6036 * inline.adb (Add_Inlined_Body): recognize bodies that come from
6037 expression functions, so that the back-end can determine whether they
6038 can in fact be inlined.
6039 * sem_util.adb (Is_Expression_Function): predicate to determine whether
6040 a function body comes from an expression function.
6042 2011-08-02 Gary Dismukes <dismukes@adacore.com>
6044 * sem_ch6.adb (Check_Conformance): Revise the check for nonconforming
6045 null exclusions to test Can_Never_Be_Null on the anonymous access types
6046 of the formals rather than testing the formals themselves. Exclude this
6047 check in cases where the Old_Formal is marked as a controlling formal,
6048 to avoid issuing spurious errors for bodies completing dispatching
6049 operations (due to the flag not getting set on controlling access
6050 formals in body specs).
6051 (Find_Corresponding_Spec): When checking full and subtype conformance of
6052 subprogram bodies in instances, pass Designated and E in that order, for
6053 consistency with the expected order of the formals (New_Id followed by
6056 2011-08-02 Robert Dewar <dewar@adacore.com>
6058 * sem_ch8.adb: Minor reformatting.
6060 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6062 * sem_ch8.adb (Analyze_Subprogram_Renaming): new procedure
6063 Check_Class_Wide_Actual, to implement AI05-0071, on defaulted
6064 primitive operations of class-wide actuals.
6066 2011-08-02 Javier Miranda <miranda@adacore.com>
6068 * exp_atag.ads, exp_atag.adb
6069 (Build_Common_Dispatching_Select_Statements): Remove argument Loc
6070 since its value is implicitly passed in argument Typ.
6071 * exp_disp.adb (Make_Disp_Conditional_Select_Body,
6072 Make_Disp_Timed_Select_Body): Remove Loc in calls to routine
6073 Build_Common_Dispatching_Select_Statements.
6075 2011-08-02 Robert Dewar <dewar@adacore.com>
6077 * sem_ch3.adb, exp_atag.ads, get_scos.adb, get_scos.ads,
6078 exp_disp.adb, lib-xref.adb, lib-xref.ads: Update comments.
6081 2011-08-02 Robert Dewar <dewar@adacore.com>
6083 * sem_res.adb: Minor reformatting.
6084 * sem_prag.adb: Minor reformatting.
6086 2011-08-02 Javier Miranda <miranda@adacore.com>
6088 * exp_atag.adb, exp_atags.ads
6089 (Build_Common_Dispatching_Select_Statement): Replace argument DT_Ptr
6090 by the tagged type Entity. Required to use this routine in the VM
6091 targets since we do not have available the Tag entity in the VM
6094 (Expand_N_Subprogram_Body): Do not invoke Build_VM_TSDs if package
6095 Ada.Tags has not been previously loaded.
6097 (Expand_N_Package_Declaration, Expand_N_Package_Body): Do not invoke
6098 Build_VM_TSDs if package Ada.Tags has not been previously loaded.
6100 (Enclosing_Dynamic_Scope): Add missing support to handle the full
6101 view of enclosing scopes. Required to handle enclosing scopes that
6102 are synchronized types whose full view is a task type.
6104 (Build_VM_TSDs): Minor code improvement to avoid generating and
6105 analyzing lists with empty nodes.
6106 (Make_Disp_Asynchronous_Select_Body): Add support for VM targets.
6107 (Make_Disp_Conditional_Select_Body): Add support for VM targets.
6108 (Make_Disp_Get_Prim_Op_Kind): Add support for VM targets.
6109 (Make_Disp_Timed_Select_Body): Add support for VM targets.
6110 (Make_Select_Specific_Data_Table): Add support for VM targets.
6111 (Make_VM_TSD): Generate code to initialize the SSD structure of
6114 2011-08-02 Yannick Moy <moy@adacore.com>
6116 * lib-writ.adb (Write_ALI): when ALFA mode is set, write local
6117 cross-references section in ALI.
6118 * lib-xref.adb, lib-xref.ads (Xref_Entry): add components Sub
6119 (enclosing subprogram), Slc (location of Sub) and Sun (unit number of
6121 (Enclosing_Subprogram_Or_Package): new function to return the enclosing
6122 subprogram or package entity of a node
6123 (Is_Local_Reference_Type): new function returns True for references
6124 selected in local cross-references.
6125 (Lt): function extracted from Lt in Output_References
6126 (Write_Entity_Name): function extracted from Output_References
6127 (Generate_Definition): generate reference with type 'D' for definition
6128 of objects (object declaration and parameter specification), with
6129 appropriate locations and units, for use in local cross-references.
6130 (Generate_Reference): update fields Sub, Slc and Sun. Keep newly created
6131 references of type 'I' for initialization in object definition.
6132 (Output_References): move part of function Lt and procedure
6133 Write_Entity_Name outside of the body. Ignore references of types 'D'
6134 and 'I' introduced for local cross-references.
6135 (Output_Local_References): new procedure to output the local
6136 cross-references sections.
6137 (Lref_Entity_Status): new array defining whether an entity is a local
6138 * sem_ch3.adb (Analyze_Object_Declaration): call Generate_Reference
6139 with 'I' type when initialization expression is present.
6140 * get_scos.adb, get_scos.ads: Correct comments and typos
6142 2011-08-02 Javier Miranda <miranda@adacore.com>
6144 * exp_ch6.adb (Expand_N_Subprogram_Body): Enable generation of TSDs in
6146 * exp_ch7.adb (Expand_N_Package_Body): Enable generation of TSDs in
6148 * exp_disp.adb (Build_VM_TSDs): No action needed if the runtime has no
6151 2011-08-02 Vincent Celier <celier@adacore.com>
6153 * prj-nmsc.adb (File_Found): New components Excl_File and Excl_Line
6154 (No_Space_Img): New function
6155 (Find_Excluded_Sources): When reading from a file, record the file name
6156 and the line number for each excluded source.
6157 (Mark_Excluded_Sources): When reporting an error, if the excluded
6158 sources were read from a file, include file name and line number in
6161 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6163 * sem_res.adb (Resolve_Call): implement rule in RM 12.5.1 (23.3/2).
6165 2011-08-02 Robert Dewar <dewar@adacore.com>
6167 * exp_ch7.adb exp_ch6.adb, exp_disp.adb: Minor reformatting
6169 2011-08-02 Javier Miranda <miranda@adacore.com>
6171 * exp_ch6.adb (Expand_N_Subprogram_Body): Temporarily restrict the
6172 generation of TSDs to the DOTNET compiler.
6173 * exp_ch7.adb (Expand_N_Package_Body): Temporarily restrict the
6174 generation of TSDs to the DOTNET compiler.
6176 2011-08-02 Javier Miranda <miranda@adacore.com>
6178 * exp_disp.ads (Build_VM_TSDs): Build the runtime Type Specific Data
6179 record of all the tagged types declared inside library level package
6180 declarations, library level package bodies or library level subprograms.
6181 * exp_disp.adb (Make_VM_TSD): New subprogram that builds the TSD
6182 associated with a given tagged type.
6183 (Build_VM_TSDs): New subprogram.
6184 * exp_ch6.adb (Expand_N_Subprogram_Body): Generate TSDs records of main
6185 compilation units that are subprograms.
6186 * exp_ch7.adb (Expand_N_Package_Body): Generate TSDs of main
6187 compilation units that are package bodies.
6188 (Expand_N_Package_Declaration): Generate TSDs of the main compilation
6189 units that are a package declaration or a package instantiation.
6190 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Minor code
6191 reorganization to improve the error generated by the frontend when the
6192 function Ada.Tags.Secondary_Tag is not available.
6193 * rtsfind.ads (RE_Register_TSD): New runtime entity.
6194 * exp_ch4.adb (Expand_N_Type_Conversion): Minor code cleanup.
6196 2011-08-02 Javier Miranda <miranda@adacore.com>
6198 * exp_disp.adb (Make_DT): Generate call to Check_TSD in Ada 2005 mode.
6200 2011-08-02 Robert Dewar <dewar@adacore.com>
6202 * s-imenne.ads: Minor reformatting.
6204 2011-08-02 Robert Dewar <dewar@adacore.com>
6206 * a-stunau.ads: Add pragma Suppress_Initialization for Big_String
6207 * freeze.adb (Warn_Overlay): Don't warn if initialization suppressed
6208 * s-stalib.ads: Add pragma Suppress_Initialization for Big_String
6210 2011-08-02 Robert Dewar <dewar@adacore.com>
6212 * einfo.ads (Materialize_Entity): Document this is only for renamings
6213 * exp_ch3.adb (Expand_N_Object_Declaration): Make sure we generate
6214 required debug information in the case where we transform the object
6215 declaration into a renaming declaration.
6216 * exp_ch4.adb (Expand_Concatenate): Generate debug info for result
6218 * exp_dbug.ads (Debug_Renaming_Declaration): Document setting of
6221 2011-08-02 Robert Dewar <dewar@adacore.com>
6223 * einfo.ads, einfo.adb (Suppress_Initialization): Replaces
6224 Suppress_Init_Procs.
6225 * exp_ch3.adb, exp_disp.adb, freeze.adb: Use
6226 Suppress_Initialization/Initialization_Suppressed.
6227 * gnat_rm.texi: New documentation for pragma Suppress_Initialization
6228 * sem_aux.ads, sem_aux.adb (Initialization_Suppressed): New function
6229 * sem_dist.adb: Use Suppress_Initialization/Initialization_Suppressed
6230 * sem_prag.adb: New processing for pragma Suppress_Initialization.
6232 2011-08-02 Robert Dewar <dewar@adacore.com>
6234 * gnat_rm.texi, a-tags.ads, sem_prag.adb, sem_ch12.adb, exp_disp.adb:
6237 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6239 * sem_prag.adb (Chain_PPC): Implement AI04-0230: null procedures can
6240 only have inheritable classwide pre/postconditions.
6242 2011-08-02 Javier Miranda <miranda@adacore.com>
6244 * a-tags.ads, a-tags.adb (Check_TSD): New subprogram.
6245 * rtsfind.ads (RE_Check_TSD): New runtime entity.
6246 * exp_disp.adb (Make_DT): Generate call to the new runtime routine that
6247 checks if the external tag of a type is the same as the external tag
6248 of some other declaration.
6250 2011-08-02 Thomas Quinot <quinot@adacore.com>
6252 * s-taskin.ads: Minor reformatting.
6254 2011-08-02 Emmanuel Briot <briot@adacore.com>
6256 * g-comlin.adb (Display_Help): swap the order in which it prints the
6257 short help and the general usage.
6259 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6261 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration): copy properly
6262 the aspect declarations and attach them to the generic copy for
6263 subsequent analysis.
6264 (Analyze_Subprogram_Instantiation): copy explicitly the aspect
6265 declarations of the generic tree to the new subprogram declarations.
6266 * sem_attr.adb (Check_Precondition_Postcondition): recognize
6267 conditions that apply to a subprogram instance.
6269 2011-08-02 Robert Dewar <dewar@adacore.com>
6271 * gnat_rm.texi: Clarify doc on pragma Source_File_Name[_Project].
6273 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6275 * sem_ch3.adb (Derived_Type_Declaration): When checking that a untagged
6276 private type with a tagged full view is not derived in the immediate
6277 scope of the partial view, (RM 7.3 (7)) use the scope of the base type.
6279 2011-08-02 Robert Dewar <dewar@adacore.com>
6281 * exp_ch4.adb: Minor reformatting.
6283 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6285 * sem_ch5.adb (Analyze_Loop_Statement): If the iteration scheme is an
6286 Ada2012 iterator, the loop will be rewritten during expansion into a
6287 while loop with a cursor and an element declaration. Do not analyze the
6288 body in this case, because if the container is for indefinite types the
6289 actual subtype of the elements will only be determined when the cursor
6290 declaration is analyzed.
6292 2011-08-02 Arnaud Charlet <charlet@adacore.com>
6294 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Ignore
6295 size/alignment related attributes in CodePeer_Mode.
6297 2011-08-02 Gary Dismukes <dismukes@adacore.com>
6299 * sem_ch3.adb (Check_Ops_From_Incomplete_Type): Remove call to
6300 Prepend_Element, since this can result in the operation getting the
6301 wrong slot in the full type's dispatch table if the full type has
6302 inherited operations. The incomplete type's operation will get added
6303 to the proper position in the full type's primitives
6304 list later in Sem_Disp.Check_Operation_From_Incomplete_Type.
6305 (Process_Incomplete_Dependents): Add Is_Primitive test when checking for
6306 dispatching operations, since there are cases where nonprimitive
6307 subprograms can get added to the list of incomplete dependents (such
6308 as subprograms in nested packages).
6309 * sem_ch6.adb (Process_Formals): First, remove test for being in a
6310 private part when determining whether to add a primitive with a
6311 parameter of a tagged incomplete type to the Private_Dependents list.
6312 Such primitives can also occur in the visible part, and should not have
6313 been excluded from being private dependents.
6314 * sem_ch7.adb (Uninstall_Declarations): When checking the rule of
6315 RM05-3.10.1(9.3/2), test that a subprogram in the Private_Dependents
6316 list of a Taft-amendment incomplete type is a primitive before issuing
6317 an error that the full type must appear in the same unit. There are
6318 cases where nonprimitives can be in the list (such as subprograms in
6320 * sem_disp.adb (Derives_From): Use correct condition for checking that
6321 a formal's type is derived from the type of the corresponding formal in
6322 the parent subprogram (the condition was completely wrong). Add
6323 checking that was missing for controlling result types being derived
6324 from the result type of the parent operation.
6326 2011-08-02 Yannick Moy <moy@adacore.com>
6328 * errout.adb (First_Node): minor renaming
6329 * restrict.adb (Check_Formal_Restriction): put restriction warning on
6332 2011-08-02 Yannick Moy <moy@adacore.com>
6334 * sem_res.adb (Resolve_Logical_Op): ensure N is a binary operator
6335 before accessing operands.
6336 * sem_util.adb (Is_SPARK_Initialization_Expr): follow original nodes to
6337 decide whether an initialization expression respects SPARK rules, as
6338 the plain node is the expanded one. This allows for more valid warnings
6340 * gnat_rm.texi: Minor update.
6342 2011-08-02 Arnaud Charlet <charlet@adacore.com>
6344 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Revert
6347 2011-08-02 Robert Dewar <dewar@adacore.com>
6349 * sem_ch3.adb, sem_ch4.adb: Minor reformatting.
6351 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
6353 * exp_ch5.adb (Expand_Iterator_Loop): Reformatting. Wrap the original
6354 loop statements and the element renaming declaration with a block when
6355 the element type is controlled.
6357 2011-08-02 Yannick Moy <moy@adacore.com>
6359 * sinfo.ads: Minor formatting.
6361 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6363 * sem_aggr.adb (Add_Association): if the association has a box and no
6364 expression, use the Sloc of the aggregate itself for the new
6366 * errout.adb (First_Node): Exclude nodes with no Sloc, and always use
6369 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
6371 * exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and refactoring.
6372 When a container is provided via a function call, generate a renaming
6373 of the function result. This avoids the creation of a transient scope
6374 and the premature finalization of the container.
6375 * exp_ch7.adb (Is_Container_Cursor): Removed.
6376 (Wrap_Transient_Declaration): Remove the supression of the finalization
6377 of the list controller when the declaration denotes a container cursor,
6380 2011-08-02 Yannick Moy <moy@adacore.com>
6382 * restrict.adb (Check_Formal_Restriction): only issue a warning if the
6383 node is from source, instead of the original node being from source.
6385 (Resolve_Array_Aggregate): refine the check for a static expression, to
6386 recognize also static ranges
6387 * sem_ch3.adb, sem_ch3.ads (Analyze_Component_Declaration,
6388 Array_Type_Declaration): postpone the test for the type being a subtype
6389 mark after the type has been resolved, so that component-selection and
6390 expanded-name are discriminated.
6391 (Make_Index, Process_Range_Expr_In_Decl): add a parameter In_Iter_Schm
6392 to distinguish the case of an iteration scheme, so that an error is
6393 issed on a non-static range in SPARK except in an iteration scheme.
6394 * sem_ch5.adb (Analyze_Iteration_Scheme): call Make_Index with
6395 In_Iter_Schm = True.
6396 * sem_ch6.adb (Analyze_Subprogram_Specification): refine the check for
6397 user-defined operators so that they are allowed in renaming
6399 (Find_Selected_Component): refine the check for prefixing of operators
6400 so that they are allowed in renaming. Move the checks for restrictions
6401 on selector name after analysis discriminated between
6402 component-selection and expanded-name.
6403 * sem_res.adb (Resolve_Op_Concat_Arg): do not issue a warning on
6404 concatenation argument of string type if it is static.
6405 * sem_util.adb, sem_util.ads
6406 (Check_Later_Vs_Basic_Declarations): add a new function
6407 Is_Later_Declarative_Item to decice which declarations are allowed as
6408 later items, in the two different modes Ada 83 and SPARK. In the SPARK
6409 mode, add that renamings are considered as later items.
6410 (Enclosing_Package): new function to return the enclosing package
6411 (Enter_Name): correct the rule for homonyms in SPARK
6412 (Is_SPARK_Initialization_Expr): default to returning True on nodes not
6413 from source (result of expansion) to avoid issuing wrong warnings.
6415 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6417 * errout.adb: On anything but an expression First_Node returns its
6420 2011-08-02 Pascal Obry <obry@adacore.com>
6422 * prj-proc.adb, make.adb, makeutl.adb: Minor reformatting.
6424 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
6426 * exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and reorganization.
6427 Set the associated loop as the related expression of internally
6429 * exp_ch7.adb (Is_Container_Cursor): New routine.
6430 (Wrap_Transient_Declaration): Supress the finalization of the list
6431 controller when the declaration denotes a container cursor.
6433 2011-08-02 Yannick Moy <moy@adacore.com>
6435 * opt.ads (SPARK_Mode): update comment, SPARK_Mode only set through
6437 * par-ch3.adb (P_Delta_Constraint): remove check in SPARK mode that the
6438 expression is a simple expression. This check cannot be performed in
6439 the semantics, so just drop it.
6440 (P_Index_Or_Discriminant_Constraint): move check that the index or
6441 discriminant is a subtype mark to Analyze_Subtype_Declaration in the
6442 semantics. Other cases were previously checked in the semantics.
6443 * par-ch4.adb (P_Name): move checks that a selector name is not
6444 character literal or an operator symbol to Find_Selected_Component in
6446 * par-ch5.adb (Parse_Decls_Begin_End): move check that basic
6447 declarations are not placed after later declarations in a separate
6448 procedure in Sem_Util (possibly not the best choice?), to be used both
6449 during parsing, for Ada 83 mode, and during semantic analysis, for
6451 * par-endh.adb (Check_End): move check that end label is not missing
6452 to Process_End_Label in the semantics
6453 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): remove
6454 the special case for SPARK restriction
6455 * par.adb: use and with Sem_Util, for use in Parse_Decls_Begin_End
6456 * restrict.adb, restrict.ads (Check_Formal_Restriction): add a
6457 parameter Force to issue the error message even on internal node (used
6458 for generated end label). Call Check_Restriction to check when an error
6459 must be issued. In SPARK mode, issue an error message even if the
6460 restriction is not set.
6461 (Check_Restriction): new procedure with an additional out parameter to
6462 inform the caller that a message has been issued
6463 * sem_aggr.adb: Minor modification of message
6464 * sem_attr.adb (Analyze_Attribute): call Check_Formal_Restriction
6465 instead of issuing an error message directly
6466 * sem_ch3.adb (Analyze_Declarations): move here the check that basic
6467 declarations are not placed after later declarations, by calling
6468 Check_Later_Vs_Basic_Declarations
6469 (Analyze_Subtype_Declaration): move here the check that an index or
6470 discriminant constraint must be a subtype mark. Change the check that
6471 a subtype of String must start at one so that it works on subtype marks.
6472 * sem_ch4.adb (Analyze_Call): move here the check that a named
6473 association cannot follow a positional one in a call
6474 * sem_ch5.adb (Check_Unreachable_Code): call Check_Formal_Restriction
6475 instead of issuing an error message directly
6476 * sem_ch8.adb (Find_Selected_Component): move here the check that a
6477 selector name is not a character literal or an operator symbol. Move
6478 here the check that the prefix of an expanded name cannot be a
6479 subprogram or a loop statement.
6480 * sem_util.adb, sem_util.ads (Check_Later_Vs_Basic_Declarations): new
6481 procedure called from parsing and semantics to check that basic
6482 declarations are not placed after later declarations
6483 (Process_End_Label): move here the check that end label is not missing
6485 2011-08-02 Arnaud Charlet <charlet@adacore.com>
6487 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Ignore enum
6488 representation clause in codepeer mode, since it confuses CodePeer and
6489 does not bring useful info.
6491 2011-08-02 Ed Falis <falis@adacore.com>
6493 * init.c: initialize fp hw on MILS.
6495 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6497 * errout.adb (First_Node): for bodies, return the node itself (small
6498 optimization). For other nodes, do not check source_unit if the node
6499 comes from Standard.
6501 2011-08-02 Robert Dewar <dewar@adacore.com>
6503 * exp_ch3.adb: Minor comment additions.
6504 * sem_ch13.adb: Minor reformatting.
6506 2011-08-02 Pascal Obry <obry@adacore.com>
6508 * make.adb, makeutl.adb: Removes some superfluous directory separator.
6510 2011-08-02 Robert Dewar <dewar@adacore.com>
6512 * sem_attr.adb: Minor reformatting.
6514 2011-08-02 Robert Dewar <dewar@adacore.com>
6516 * einfo.adb (Has_Default_Aspect): Replaces Has_Default_Value
6517 (Has_Default_Component_Value): Removed
6518 * einfo.ads Comment updates
6519 (Has_Default_Aspect): Replaces Has_Default_Value
6520 (Has_Default_Component_Value): Removed
6522 (Expand_N_Freeze_Entity): Handle Default[_Component]_Value aspects
6524 (Build_Array_Init_Proc): Handle Default_[Component_]Value aspects
6525 (Get_Simple_Init_Val): Handle Default_Value aspect
6526 (Needs_Simple_Initialization): Handle Default_Value aspect
6527 * exp_ch3.ads: Needs_Simple_Initialization
6528 * freeze.adb (Freeze_Entity): Handle Default_[Component_]Value aspect
6529 * par-prag.adb (Pragma_Default[_Component]Value) Removed
6531 (Analyze_Aspect_Specifications): Fix Default[_Component]_Value aspects
6532 * sem_prag.adb (Pragma_Default[_Component]Value) Removed
6533 * snames.ads-tmpl (Pragma_Default[_Component]Value) Removed
6535 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6537 * sem_ch5.adb (Analyze_Iterator_Specification): use base type to locate
6538 package containing iteration primitives.
6539 exp_ch5.adb (Expand_Iterator_Loop): ditto.
6541 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6543 * sem_ch5.adb (Analyze_Iteration_Scheme): For an Ada2012 iterator with
6544 "of", pre-analyze expression in case it is a function call with
6545 finalization actions that must be placed ahead of the loop.
6546 * exp_ch5.adb (Expand_Iterator_Loop): If condition_actions are present
6547 on an Ada2012 iterator, insert them ahead of the rewritten loop.
6549 2011-08-02 Geert Bosch <bosch@adacore.com>
6551 * cstand.adb (Create_Float_Types): Only consider C's long double for
6552 Long_Long_Float, in addition to double.
6554 2011-08-02 Robert Dewar <dewar@adacore.com>
6556 * sem_ch3.adb, sem_ch5.adb, sem_type.adb, switch-c.adb, switch-c.ads,
6557 sem_prag.adb, sem_util.adb, sem_util.ads, sem_res.adb, warnsw.ads,
6558 prepcomp.ads, cstand.adb, stand.ads, a-calfor.adb, s-stusta.adb:
6561 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6563 * sem_attr.adb: handle properly 'Result when it is a prefix of an
6566 2011-08-02 Javier Miranda <miranda@adacore.com>
6568 * einfo.ads, einfo.adb
6569 (Original_Access_Type): Move this attribute to Node26 since there was
6570 an undocumented use of Node21 in E_Access_Subprogram_Type entities
6571 which causes conflicts and breaks the generation of the .NET compiler.
6572 (Interface_Name): Add missing documentation on JGNAT only uses of
6575 2011-08-02 Geert Bosch <bosch@adacore.com>
6577 * cstand.adb (Back_End_Float_Types): Use Elist instead of Nlist
6578 (Find_Back_End_Float_Type): Likewise
6579 (Create_Back_End_Float_Types): Likewise
6580 (Create_Float_Types): Likewise
6581 (Register_Float_Type): Likewise
6582 * sem_ch3.adb (Floating_Point_Type_Declaration): Use Elist instead of
6583 Nlist and split out type selection in new local Find_Base_Type function.
6584 * sem_prag.adb (Process_Import_Predefined_Type): Use Elist instead of
6586 * stand.ads (Predefined_Float_Types): Use Elist instead of Nlist
6588 2011-08-02 Robert Dewar <dewar@adacore.com>
6590 * inline.adb: Minor code reorganization (put Get_Code_Unit_Entity in
6592 * opt.ads: Minor comment change.
6593 * sem_ch12.adb: Minor code reorganization.
6595 2011-08-02 Gary Dismukes <dismukes@adacore.com>
6597 * sem_ch3.adb (Complete_Private_Subtype): Don't append the private
6598 subtype's list of rep items to the list on the full subtype in the case
6599 where the lists are the same.
6601 2011-08-02 Geert Bosch <bosch@adacore.com>
6603 * switch-c.adb (Free): New deallocation procedure to avoid implicitly
6604 using the one from System.Strings, which also deallocates all strings.
6606 2011-08-02 Geert Bosch <bosch@adacore.com>
6608 * gcc-interface/gigi.h, gcc-interface/misc.c (enumerate_modes): New
6610 * gcc-interface/Make-lang.in: Update dependencies.
6612 2011-08-02 Olivier Hainque <hainque@adacore.com>
6614 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Set the function
6617 2011-08-02 Javier Miranda <miranda@adacore.com>
6619 * sem_ch3.adb (Check_Anonymous_Access_Components): Create extra formals
6620 associated with anonymous access to subprograms.
6622 2011-08-02 Geert Bosch <bosch@adacore.com>
6625 (Preprocessing_Symbol_Defs): Move from Prepcomp.Symbol_Definitions.
6626 (Preprocessing_Symbol_Last): Move from Prepcomp.Last_Definition.
6627 * prepcomp.adb (Symbol_Definitions, Last_Definition): Move to opt.ads
6628 (Add_Symbol_Definition): Move to switch-c.adb
6629 (Process_Command_Line_Symbol_Definitions): Adjust references to above.
6630 * prepcomp.ads: Remove dependency on Ada.Unchecked_Deallocation.
6631 (Add_Symbol_Definition): Move to switch-c.adb.
6632 * sem_ch13.adb, sem_prag.adb: Add dependency on Warnsw.
6634 (Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
6636 * sem_warn.ads (Warn_On_Record_Holes, Warn_On_Overridden_Size,
6637 Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
6639 * switch-c.adb: Replace dependency on Prepcomp and Sem_Warn by Warnsw.
6640 (Add_Symbol_Definition): Moved from Prepcomp.
6641 * switch-c.ads: Update copyright notice. Use String_List instead of
6642 Argument_List, removing dependency on System.OS_Lib.
6644 2011-08-02 Yannick Moy <moy@adacore.com>
6646 * sem_ch3.adb (Analyze_Object_Declaration): issue an error in formal
6647 mode on initialization expression which does not respect SPARK
6649 * sem_util.adb, sem_util.ads (Is_SPARK_Initialization_Expr): determines
6650 if the tree referenced by its argument represents an initialization
6651 expression in SPARK, suitable for initializing an object in an object
6654 2011-08-02 Javier Miranda <miranda@adacore.com>
6656 * exp_ch9.adb (Expand_Access_Protected_Subprogram_Type): Link the
6657 internally generated access to subprogram with its associated protected
6659 * einfo.ads, einfo.adb (Original_Access_Type): New attribute.
6661 2011-08-02 Geert Bosch <bosch@adacore.com>
6663 * cstand.adb (Register_Float_Type): Print information about type to
6664 register, if the Debug_Flag_Dot_B is set.
6665 * debug.adb (Debug_Flag_Dot_B): Document d.b debug option.
6666 * rtsfind.ads (RE_Max_Base_Digits): New run time entity.
6667 * sem_ch3.adb (Floating_Point_Type_Declaration): Allow declarations
6668 with a requested precision of more than Max_Digits digits and no more
6669 than Max_Base_Digits digits, if a range specification is present and the
6670 Predefined_Float_Types list has a suitable type to derive from.
6671 * sem_ch3.adb (Rep_Item_Too_Early): Avoid generating error in the
6672 case of type completion with pragma Import
6674 (Process_Import_Predefined_Type): Processing to complete a type
6675 with pragma Import. Currently supports floating point types only.
6676 (Set_Convention_From_Pragma): Do nothing without underlying type.
6677 (Process_Convention): Guard against absence of underlying type,
6678 which may happen when importing incomplete types.
6679 (Process_Import_Or_Interface): Handle case of importing predefined
6680 types. Tweak error message.
6682 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
6684 * inline.adb (Add_Inlined_Body): Adjust check for library-level inlined
6685 functions to previous change. Reorganize code slightly.
6687 2011-08-02 Geert Bosch <bosch@adacore.com>
6689 * back_end.ads (Register_Type_Proc): New call back procedure type for
6690 allowing the back end to provide information about available types.
6691 (Register_Back_End_Types): New procedure to register back end types.
6692 * back_end.adb (Register_Back_End_Types): Call the back end to enumerate
6694 * cstand.adb (Back_End_Float_Types): New list for floating point types
6695 supported by the back end.
6696 (Build_Float_Type): Add extra parameter for Float_Rep_Kind.
6697 (Copy_Float_Type): New procedure to make new copies of predefined types.
6698 (Register_Float_Type): New call back procedure to populate the BEFT list
6699 (Find_Back_End_Float_Type): New procedure to find a BEFT by name
6700 (Create_Back_End_Float_Types): New procedure to populate the BEFT list.
6701 (Create_Float_Types): New procedure to create entities for floating
6702 point types predefined in Standard, and put these and any remaining
6703 BEFTs on the Predefined_Float_Types list.
6704 * stand.ads (Predefined_Float_Types): New list for predefined floating
6705 point types that do not have declarations in package Standard.
6707 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
6709 * inline.adb (Get_Code_Unit_Entity): New local function. Returns the
6710 entity node for the unit containing the parameter.
6711 (Add_Inlined_Body): Use it to find the unit containing the subprogram.
6712 (Add_Inlined_Subprogram): Likewise.
6713 * gcc-interface/Make-lang.in: Update dependencies.
6715 2011-08-02 Thomas Quinot <quinot@adacore.com>
6717 * s-stusta.adb (Print): Make sure Pos is always initialized to a
6720 2011-08-02 Geert Bosch <bosch@adacore.com>
6722 * a-calfor.adb (Image): Simplify, removing unnecessary uses of 'Image.
6724 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
6726 * sem_type.adb (Covers): Move trivial case to the top and reuse the
6727 computed value of Base_Type.
6729 2011-08-02 Yannick Moy <moy@adacore.com>
6731 * restrict.adb (Check_Restriction): issue an error for any use of
6732 class-wide, even if the No_Dispatch restriction is not set.
6733 * sem_aggr.adb: Correct typos in comments and messages in formal mode
6734 * sem_ch3.adb (Process_Full_View): issue an error in formal mode is,
6735 when completing a private extension, the type named in the private part
6736 is not the same as that named in the visible part.
6737 * sem_res.adb (Resolve_Call): issue an error in formal mode on the use
6738 of an inherited primitive operations of a tagged type or type extension
6739 that returns the tagged type.
6740 * sem_util.adb, sem_util.ads (Is_Inherited_Operation_For_Type): new
6741 function which returns True for an implicit operation inherited by the
6742 derived type declaration for the argument type.
6743 (Is_SPARK_Object_Reference): move to appropriate place in alphabetic
6746 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6748 * sem_ch5.adb (Pre_Analyze_Range): new procedure extracted from
6749 Process_Bounds, to perform analysis with expansion of a range or an
6750 expression that is the iteration scheme for a loop.
6751 (Analyze_Iterator_Specification): If domain of iteration is given by a
6752 function call with a controlled result, as is the case if call returns
6753 a predefined container, ensure that finalization actions are properly
6755 * par-ch3.adb: accept Ada2012 iterator form in P_Discrete_Range.
6757 2011-08-02 Javier Miranda <miranda@adacore.com>
6759 * sem_ch5.adb (Analyze_Iteration_Scheme): Fix typo.
6760 * gcc-interface/Make-lang.in: Update dependencies.
6762 2011-08-02 Javier Miranda <miranda@adacore.com>
6764 * sem_util.ads, sem_util.adb (Is_Variable): Add a new formal to
6765 determine if the analysis is performed using N or Original_Node (N).
6766 * exp_util.adb (Side_Effect_Free): Code cleanup since the new
6767 functionality of routine Is_Variable avoids code duplication.
6768 * checks.adb (Determine_Range): Handle temporaries generated by
6769 Remove_Side_Effects.
6771 2011-08-02 Javier Miranda <miranda@adacore.com>
6773 * exp_ch4.adb (Expand_N_Quantified_Expression): Force reanalysis and
6774 expansion of the condition. Required since the previous analysis was
6775 done with expansion disabled (see Resolve_Quantified_Expression) and
6776 hence checks were not inserted and record comparisons have not been
6779 2011-08-02 Ed Falis <falis@adacore.com>
6781 * s-taprop-vxworks.adb, s-intman-vxworks.adb, s-intman-vxworks.ads:
6784 2011-08-02 Bob Duff <duff@adacore.com>
6786 * opt.ads: Minor comment fix.
6788 2011-08-02 Bob Duff <duff@adacore.com>
6790 * sem_ch12.adb (Analyze_Package_Instantiation,
6791 Analyze_Subprogram_Instantiation): Turn off style checking while
6792 analyzing an instance. Whatever style checks that apply to the generic
6793 unit should apply, so it makes no sense to apply them in an instance.
6794 This was causing trouble when compiling an instance of a runtime
6795 unit that violates the -gnatyO switch.
6796 * stylesw.adb (Set_Style_Check_Options): "when 'O' =>" was missing from
6797 one of the two case statements, causing spurious errors.
6799 2011-08-02 Robert Dewar <dewar@adacore.com>
6801 * uname.adb: Minor reformatting.
6802 * gnatcmd.adb: Minor reformatting.
6803 * exp_attr.adb: Minor reformatting.
6805 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6807 * exp_ch5.adb (Expand_N_Assignment_Statement): under restriction
6808 No_Dispatching_Calls, do not look for the Assign primitive, because
6809 predefined primitives are not created in this case.
6811 2011-08-02 Bob Duff <duff@adacore.com>
6813 * stylesw.ads: Minor comment fixes.
6815 2011-08-02 Robert Dewar <dewar@adacore.com>
6817 * freeze.adb (Add_To_Result): New procedure.
6819 2011-08-02 Jose Ruiz <ruiz@adacore.com>
6821 * exp_attr.adb (Find_Stream_Subprogram): When using a configurable run
6822 time, if the specific run-time routines for handling streams of strings
6823 are not available, use the default mechanism.
6825 2011-08-02 Arnaud Charlet <charlet@adacore.com>
6827 * s-regpat.ads: Fix typo.
6829 2011-08-02 Vincent Celier <celier@adacore.com>
6831 * prj-conf.adb (Get_Or_Create_Configuration_File): If On_Load_Config is
6832 not null, call it to create the in memory config project file without
6833 parsing an existing default config project file.
6835 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
6837 * atree.adb (Allocate_Initialize_Node): Remove useless temporaries.
6839 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6841 * sem_elim.adb: an abstract subprogram does not need an eliminate
6842 pragma for its descendant to be eliminable.
6844 2011-08-02 Ed Falis <falis@adacore.com>
6846 * init.c: revert to handling before previous checkin for VxWorks
6847 * s-intman-vxworks.adb: delete unnecessary declarations related to
6848 using Ada interrupt facilities for handling signals.
6849 Delete Initialize_Interrupts. Use __gnat_install_handler instead.
6850 * s-intman-vxworks.ads: Import __gnat_install_handler as
6851 Initialize_Interrupts.
6852 * s-taprop-vxworks.adb: Delete Signal_Mask.
6853 (Abort_Handler): change construction of mask to unblock exception
6856 2011-08-02 Jerome Guitton <guitton@adacore.com>
6858 * a-except-2005.adb (Raise_From_Signal_Handler): Call
6859 Debug_Raise_Exception before propagation starts.
6861 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
6863 * exp_ch6.adb (Expand_Call): Guard restriction checks with a call
6864 to Restriction_Check_Required.
6865 * sem_ch3.adb (Analyze_Object_Declaration): Likewise.
6866 * sem_res.adb (Resolve_Call): Likewise.
6867 * sem_attr.adb (Check_Stream_Attribute): Likewise.
6869 2011-08-02 Bob Duff <duff@adacore.com>
6871 * stylesw.ads: Update comment.
6872 * style.adb: Minor: Use Error_Msg_NE instead of Error_Msg_N.
6873 * errout.ads: Remove obsolete comment.
6875 2011-08-02 Javier Miranda <miranda@adacore.com>
6877 * einfo.ads, einfo.adb (Is_Safe_To_Reevaluate): new function.
6878 (Set_Is_Safe_To_Reevaluate): new procedure.
6879 * sem_ch5.adb (Analyze_Assignment): Add one assertion to ensure that no
6880 assignment is allowed on safe-to-reevaluate variables.
6881 (Analyze_Iteration_Schine.Process_Bounds.One_Bound): Decorate the
6882 temporary created to remove side effects in expressions that use
6883 the secondary stack as safe-to-reevaluate.
6884 * exp_util.adb (Side_Effect_Free): Add missing code to handle well
6885 variables that are not true constants.
6887 2011-08-02 Robert Dewar <dewar@adacore.com>
6889 * sem_ch5.adb, sem_ch7.adb, einfo.ads, sem_util.adb, sem_util.ads,
6890 sem_res.adb, sem_ch6.adb: Minor reformatting.
6892 2011-08-02 Jerome Guitton <guitton@adacore.com>
6894 * a-except-2005.adb (Raise_Current_Excep): Remove obsolete dead code.
6896 2011-08-02 Ed Schonberg <schonberg@adacore.com>
6898 * sem_ch6.adb (New_Overloaded_Entity, Check_Overriding_Indicator): Do
6899 not set Overridden_Operation if subprogram is an initialization
6902 2011-08-02 Yannick Moy <moy@adacore.com>
6904 * par-ch6.adb: Correct obsolete name in comments
6905 * restrict.adb, restrict.ads (Check_Formal_Restriction): new function
6906 which takes two message arguments (existing function takes one), with
6907 second message used for continuation.
6908 * sem_ch5.adb (Analyze_Block_Statement): in formal mode, only reject
6909 block statements that originate from a source block statement, not
6910 generated block statements
6911 * sem_ch6.adb (Analyze_Function_Call): rename L into Actuals, for
6912 symmetry with procedure case
6913 * sem_ch7.adb (Check_One_Tagged_Type_Or_Extension_At_Most): new
6914 function to issue an error in formal mode if a package specification
6915 contains more than one tagged type or type extension.
6916 * sem_res.adb (Resolve_Actuals): in formal mode, check that actual
6917 parameters matching formals of tagged types are objects (or ancestor
6918 type conversions of objects), not general expressions. Issue an error
6919 on view conversions that are not involving ancestor conversion of an
6921 (Resolve_Type_Conversion): in formal mode, issue an error on the
6922 operand of an ancestor type conversion which is not an object
6923 * sem_util.adb, sem_util.ads (Find_Actual): extend the behavior of the
6924 procedure so that it works also for actuals of function calls
6925 (Is_Actual_Tagged_Parameter): new function which determines if its
6926 argument is an actual parameter of a formal of tagged type in a
6928 (Is_SPARK_Object_Reference): new function which determines if the tree
6929 referenced by its argument represents an object in SPARK
6931 2011-08-02 Robert Dewar <dewar@adacore.com>
6933 * sem_ch3.adb: Minor reformatting
6934 Minor comment addition
6935 Minor error msg text change
6937 2011-08-02 Javier Miranda <miranda@adacore.com>
6939 * sem_ch5.adb (Analyze_Iteration_Scheme.Uses_Secondary_Stack): New
6940 function. Used to be more precise when we generate a variable plus one
6941 assignment to remove side effects in the evaluation of the Bound
6943 (Analyze_Iteration_Scheme): Clean attribute analyzed in all the nodes
6944 of the bound expression to force its re-analysis and thus expand the
6945 associated transient scope (if required). Code cleanup replacing the
6946 previous code that declared the constant entity by an invocation to
6947 routine Force_Evaluation which centralizes this work in the frontend.
6949 2011-08-02 Robert Dewar <dewar@adacore.com>
6951 * einfo.adb (Is_Base_Type): Improve efficiency by using a flag table
6952 (Base_Type): Now uses improved Is_Base_Type function
6953 * einfo.ads (Base_Type): Inline this function
6955 2011-08-02 Robert Dewar <dewar@adacore.com>
6957 * sem_prag.adb (Analyze_Pragma): Defend against infinite recursion
6958 (Analyze_Aspect_Specifications): Fix Sloc values for constructed pragmas
6960 2011-08-02 Arnaud Charlet <charlet@adacore.com>
6962 * gcc-interface/Make-lang.in: Update dependencies.
6963 * gcc-interface/Makefile.in: Use s-inmapop-vxworks.adb for all VxWorks
6966 2011-08-02 Yannick Moy <moy@adacore.com>
6968 * par-ch3.adb (P_Delta_Constraint): issue an error in formal mode on
6969 non-simple expression used in delta constraint
6970 (P_Index_Or_Discriminant_Constraint): issue an error in formal mode on
6971 index constraint which is not a subtype mark
6972 * par.adb: With and use Restrict
6973 * sem_ch3.adb (Analyze_Component_Declaration): issue an error in formal
6974 mode on component type which is not a subtype mark and default
6975 expression on component
6976 (Analyze_Subtype_Declaration): issue an error in formal mode on subtype
6977 of string which does not have a lower index bound equal to 1
6978 (Array_Type_Declaration): issue an error in formal mode on index or
6979 component type which is not a subtype mark, and on aliased keyword on
6981 (Derived_Type_Declaration): issue an error in formal mode on interface,
6982 limited or abstract type
6983 (Record_Type_Declaration): issue an error in formal mode on interface
6984 (Record_Type_Definition): issue an error in formal mode on tagged types
6985 and type extensions not declared in the specification of a library unit
6986 package; on null non-tagged record; on variant part
6988 2011-08-02 Vincent Celier <celier@adacore.com>
6990 * prj-nmsc.adb (Check_Library_Attributes): Do not report Library_Dir
6991 not declared for qualified library project when Library_Name is not
6992 declared, but Library_Dir is.
6994 2011-08-02 Robert Dewar <dewar@adacore.com>
6996 * sem_ch13.adb (Analyze_Aspect_Specification): Fix slocs on generated
6997 pragmas (affects aspects [Component_]Default_Value
6998 (Check_Aspect_At_Freeze_Point): For Component_Default_Value, use
6999 component type for the resolution
7001 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
7003 * einfo.adb (Base_Type): Tune implementation for speed.
7005 2011-08-02 Robert Dewar <dewar@adacore.com>
7007 * freeze.adb: Minor reformatting.
7009 2011-08-02 Thomas Quinot <quinot@adacore.com>
7011 * scos.ads: Update comments.
7013 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7015 * sem_ch3.adb (Build_Derived_Type): Inherit the convention from the
7016 base type, because the parent may be a subtype of a private type whose
7017 convention is established in a private part.
7019 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
7021 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Wrap the return
7022 statement in a block when the expansion of the return expression has
7023 created a finalization chain.
7024 * freeze.adb (Freeze_Expression): Alphabetize all choices associated
7025 with the parent node.
7026 Add N_Extended_Return_Statement to handle the case where a transient
7027 object declaration appears in the Return_Object_Declarations list of
7028 an extended return statement.
7030 2011-08-02 Matthew Gingell <gingell@adacore.com>
7032 * adaint.c (__gnat_is_symbolic_link_attr): Supress warning on possibly
7033 unused parameter 'name'.
7035 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7037 * sem_elim.adb (Set_Eliminated): If the overridden operation is an
7038 inherited operation, check whether its alias, which is the source
7039 operastion that it renames, has been marked eliminated.
7041 2011-08-02 Javier Miranda <miranda@adacore.com>
7043 * exp_util.adb (Safe_Prefixed_Reference): Do not consider safe an
7044 in-mode parameter whose type is an access type since it can be used to
7045 modify its designated object. Enforce code that handles as safe an
7046 access type that is not access-to-constant but it is the result of a
7047 previous removal of side-effects.
7048 (Remove_Side_Effects): Minor code reorganization of cases which require
7049 no action. Done to incorporate documentation on new cases uncovered
7050 working in this ticket: no action needed if this routine was invoked
7051 too early and the nodes are not yet decorated.
7052 * sem_res.adb (Resolve_Slice): Minor code cleanup replacling two calls
7053 to routine Remove_Side_Effects by calls to Force_Evaluation since they
7054 were issued with actuals that are implicitly provided by
7057 2011-08-02 Robert Dewar <dewar@adacore.com>
7059 * sem_ch3.adb, sem_res.adb: Minor reformatting.
7061 2011-08-02 Yannick Moy <moy@adacore.com>
7063 * sem_attr.adb (Check_Formal_Restriction_On_Attribute): new procedure
7064 to issue an error in formal mode on attribute not supported in this mode
7065 (Analyze_Attribute): issue errors on standard attributes not supported
7067 * sem_ch3.adb (Modular_Type_Declaration): remove obsolete part of
7068 comment, and issue error in formal mode on modulus which is not a power
7070 (Process_Range_Expr_In_Decl): issue error in formal mode on non-static
7072 * sem_ch8.adb (Find_Type): issue error in formal mode on 'Base in
7074 * sem_res.adb (Resolve_Unary_Op): issue error in formal mode on unary
7075 operator on modular type (except 'not').
7077 2011-08-02 Robert Dewar <dewar@adacore.com>
7079 * gnat_rm.texi: Minor reformatting.
7081 2011-08-02 Arnaud Charlet <charlet@adacore.com>
7083 * s-osinte-linux.ads: Minor comment update and reformatting.
7084 * i-cexten.ads: Make this unit pure, as for its parent.
7085 Will allow its usage in more contexts if needed.
7087 2011-08-02 Robert Dewar <dewar@adacore.com>
7089 * s-utf_32.ads: Minor comment fix.
7091 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7093 * sem_res.adb (Resolve_Actuals): if the subprogram is a primitive
7094 operation of a tagged synchronized type, handle the case where the
7095 controlling argument is overloaded.
7097 2011-08-02 Yannick Moy <moy@adacore.com>
7099 * gnat_rm.texi, opt.ads, sem_prag.adb, snames.ads-tmpl:
7100 Replace pragma SPARK_95 with pragma Restrictions (SPARK)
7101 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): set
7102 SPARK mode and formal verification mode on processing SPARK restriction
7103 * s-rident.ads (Restriction_Id): add SPARK restriction in those not
7104 requiring consistency checking.
7106 2011-08-02 Robert Dewar <dewar@adacore.com>
7108 * sem_res.adb: Minor reformatting.
7110 2011-08-02 Robert Dewar <dewar@adacore.com>
7112 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
7113 a-cforse.ads: Remove unneeded with of Ada.Containers
7114 Remove commented out pragma Inline's
7115 Move specifications of new subprograms to the actual specs
7117 2011-08-02 Yannick Moy <moy@adacore.com>
7119 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
7120 a-cforse.ads: Update comments.
7122 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7124 * sem_attr.adb: add attribute name when 'Result has the wrong prefix.
7126 2011-08-02 Robert Dewar <dewar@adacore.com>
7128 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
7129 a-cforse.ads, a-cofove.ads: Minor reformatting.
7131 2011-08-02 Claire Dross <dross@adacore.com>
7133 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads, a-cforse.ads,
7134 a-cofove.ads: Add comments.
7136 2011-08-02 Yannick Moy <moy@adacore.com>
7138 * gnat_rm.texi: Document formal containers.
7140 2011-08-02 Emmanuel Briot <briot@adacore.com>
7142 * g-comlin.adb (Goto_Section, Getopt): fix handling of "*" when there
7145 2011-08-02 Robert Dewar <dewar@adacore.com>
7147 * mlib-prj.adb, restrict.ads, sem_aggr.adb, sem_ch12.adb: Minor
7150 2011-08-02 Robert Dewar <dewar@adacore.com>
7152 * aspects.adb: New aspects Default_Value and Default_Component_Value
7153 New format of Aspect_Names table checks for omitted entries
7154 * aspects.ads: Remove mention of Aspect_Cancel and add documentation on
7155 handling of boolean aspects for derived types.
7156 New aspects Default_Value and Default_Component_Value
7157 New format of Aspect_Names table checks for omitted entries
7158 * einfo.ads, einfo.adb (Has_Default_Component_Value): New flag
7159 (Has_Default_Value): New flag
7160 (Has_Default_Component_Value): New flag
7161 (Has_Default_Value): New flag
7162 * par-ch13.adb (P_Aspect_Specifications): New format of Aspect_Names
7164 * par-prag.adb: New pragmas Default_Value and Default_Component_Value
7165 * sem_ch13.adb (Analyze_Aspect_Specifications): New aspects
7166 Default_Value and Default_Component_Value
7167 * sem_prag.adb: New pragmas Default_Value and Default_Component_Value
7168 New aspects Default_Value and Default_Component_Value
7169 * snames.ads-tmpl: New pragmas Default_Value and Default_Component_Value
7170 * sprint.adb: Print N_Aspect_Specification node when called from gdb
7172 2011-08-02 Vincent Celier <celier@adacore.com>
7174 * prj-nmsc.adb (Check_Library_Attributes): For virtual library project,
7175 inherit library kind.
7177 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7179 * sem_res.adb: Add guards in calls to Matching_Static_Array_Bounds.
7182 2011-08-02 Robert Dewar <dewar@adacore.com>
7184 * i-cstrin.ads: Updates to make Interfaces.C.Strings match RM
7186 2011-08-02 Yannick Moy <moy@adacore.com>
7188 * sem_aggr.adb (Resolve_Aggregate): Fix thinko.
7190 2011-08-02 Robert Dewar <dewar@adacore.com>
7192 * impunit.adb: Add comment.
7194 2011-08-02 Yannick Moy <moy@adacore.com>
7196 * sem_aggr.adb (Check_Qualified_Aggregate): new procedure which checks
7197 qualification of aggregates in formal mode
7198 (Is_Top_Level_Aggregate): returns True for an aggregate not contained in
7200 (Resolve_Aggregate): complete the test that an aggregate is adequately
7201 qualified in formal mode
7203 2011-08-02 Pascal Obry <obry@adacore.com>
7205 * make.adb, bindgen.adb, gnatbind.adb: Minor reformatting.
7206 * mlib-prj.adb: Supress warning when compiling binder generated file.
7207 (Build_Library): Supress all warnings when compiling the binder
7210 2011-08-02 Yannick Moy <moy@adacore.com>
7212 * errout.adb, errout.ads (Check_Formal_Restriction): move procedure
7214 * restrict.adb, restrict.ads (Check_Formal_Restriction): ...to here
7215 * sem_aggr.adb, sem_ch5.adb, sem_util.adb:
7216 Add with/use clauses to make Check_Formal_Restriction visible
7218 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7220 * sem_ch12.adb (Check_Generic_Actuals): handle properly actual
7221 in-parameters when type of the generic formal is private in the generic
7222 spec and non-private in the body.
7224 2011-08-02 Claire Dross <dross@adacore.com>
7226 * a-cfdlli.adb, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfhama.adb,
7227 a-cfhama.ads, a-cforse.adb, a-cforse.ads, a-cforma.adb, a-cforma.ads,
7228 a-cofove.adb, a-cofove.ads: New files implementing formal containers.
7229 * impunit.adb, Makefile.rtl: Take new files into account.
7231 2011-08-02 Robert Dewar <dewar@adacore.com>
7233 * sem_aggr.adb, sem_ch3.adb, sem_ch5.adb, make.adb, sem_res.adb,
7234 sem_attr.adb, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
7236 2011-08-02 Yannick Moy <moy@adacore.com>
7238 * sem_aggr.adb (Resolve_Aggregate): disable incorrectly placed check in
7240 * sem_util.adb (Matching_Static_Array_Bounds): proper detection of
7241 matching static array bounds, taking into account the special case of
7243 * sem_ch3.adb: Typo in comment.
7245 2011-08-02 Yannick Moy <moy@adacore.com>
7247 * errout.adb, errout.ads (Check_Formal_Restriction): new procedure
7248 which issues an error in formal mode if its argument node is originally
7250 * sem_ch3.adb (Analyze_Full_Type_Declaration): move test that a type
7251 has a discriminant specification so that it does not include the case
7253 (Derived_Type_Declaration): move here the test that a derived type has a
7254 discriminant specification
7255 * sem_aggr.adb (Resolve_Record_Aggregate): test the presence of the
7256 first element of a component association before accessing its choices
7257 (presence of component association is not enough)
7258 * exp_ch6.adb (Expand_N_Subprogram_Declaration): test if a subprogram
7259 declaration is a library item before accessing the next element in a
7260 list, as library items are not member of lists
7261 * sem_attr.adb, sem_ch11.adb, sem_ch4.adb, sem_ch5.adb, sem_ch6.adb,
7262 sem_ch8.adb, sem_ch9.adb, sem_res.adb, sem_util.adb: use
7263 Check_Formal_Restriction whenever possible.
7265 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7267 * sem_ch3.adb (Find_Type_Of_Object): In ASIS mode, create an itype
7268 reference when needed.
7270 2011-08-02 Bob Duff <duff@adacore.com>
7272 * gnat_ugn.texi: Fix typo.
7274 2011-08-02 Vincent Celier <celier@adacore.com>
7276 * make.adb (Gnatmake): Use MLib.Tgt.Archive_Ext as the extension of
7277 archive file name. Do not use the full path name of archives for Open
7280 2011-08-02 Robert Dewar <dewar@adacore.com>
7282 * sem_ch12.adb, sem_ch11.adb: New calling sequence for
7283 Analyze_Aspect_Specifications
7285 (Analyze_Aspect_Specifications): New handling for boolean aspects
7286 * sem_ch13.ads (Analyze_Aspect_Specifications): New calling sequence
7287 * sem_ch3.adb, sem_ch6.adb, sem_ch7.adb, sem_ch9.adb: New calling
7288 sequence for Analyze_Aspect_Specifications
7289 * sem_prag.adb (Analyze_Pragma): Remove use of Aspect_Cancel entirely
7290 * sinfo.ads, sinfo.adb (Aspect_Cancel): Remove, no longer used
7292 2011-08-02 Robert Dewar <dewar@adacore.com>
7294 * freeze.adb (Freeze_Entity): Remove handling of delayed boolean
7295 aspects, since these no longer exist.
7297 2011-08-02 Robert Dewar <dewar@adacore.com>
7299 * par-ch13.adb (Aspect_Specifications_Present): Always return false on
7300 semicolon, do not try to see if there are aspects following it.
7301 * par-ch3.adb (P_Declarative_Items): Better message for unexpected
7304 2011-08-02 Robert Dewar <dewar@adacore.com>
7306 * sem_ch8.adb, aspects.ads: Minor reformatting.
7308 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
7310 * sem_ch13.ads (Analyze_Aspect_Specification): Add pragma Inline.
7311 * sem_ch13.adb (Analyze_Non_Null_Aspect_Specifications): New procedure
7313 (Analyze_Aspect_Specifications): ...here. Call above procedure.
7315 2011-08-02 Yannick Moy <moy@adacore.com>
7317 * exp_ch6.adb (Expand_N_Subprogram_Declaration): issue error in formal
7318 mode on subprogram declaration outside of package specification, unless
7319 it is followed by a pragma Import
7320 * sem_ch3.adb (Access_Definition, Access_Subprogram_Declaration,
7321 Access_Type_Declaration): issue error in formal mode on access type
7322 (Analyze_Incomplete_Type_Decl): issue error in formal mode on
7324 (Analyze_Object_Declaration): issue error in formal mode on object
7325 declaration which does not respect SPARK restrictions
7326 (Analyze_Subtype_Declaration): issue error in formal mode on subtype
7327 declaration which does not respect SPARK restrictions
7328 (Constrain_Decimal, Constrain_Float, Constrain_Ordinary_Fixed): issue
7329 error in formal mode on digits or delta constraint
7330 (Decimal_Fixed_Point_Type_Declaration): issue error in formal mode on
7331 decimal fixed point type
7332 (Derived_Type_Declaration): issue error in formal mode on derived type
7333 other than type extensions of tagged record types
7334 * sem_ch6.adb (Process_Formals): remove check in formal mode, redundant
7335 with check on access definition
7336 * sem_ch9.adb (Analyze_Protected_Definition): issue error in formal
7337 mode on protected definition.
7338 (Analyze_Task_Definition): issue error in formal mode on task definition
7340 2011-08-02 Robert Dewar <dewar@adacore.com>
7342 * make.adb, sem_ch8.adb, s-inmaop-vxworks.adb: Minor reformatting.
7344 2011-08-02 Javier Miranda <miranda@adacore.com>
7346 * sem_ch6.adb (Can_Override_Operator): New function.
7347 (Verify_Overriding_Indicator): Add missing code to check overriding
7348 indicator in operators. Fixes regression.
7349 (Check_Overriding_Indicator): Minor reformating after replacing the
7350 code that evaluates if the subprogram can override an operator by
7351 invocations to the above new function.
7353 (Write_Field26_Name): Add missing code to ensure that, following
7354 the documentation in einfo.ads, this field is not shown as attribute
7355 "Static_Initialization" on non-dispatching functions.
7357 2011-08-02 Jose Ruiz <ruiz@adacore.com>
7359 * sem_res.adb (Resolve_Call): A call to
7360 Ada.Real_Time.Timing_Events.Set_Handler violates restriction
7361 No_Relative_Delay (AI-0211) only when it sets a relative timing event,
7362 i.e., when the second parameter is of type Time_Span.
7364 2011-08-02 Vincent Celier <celier@adacore.com>
7366 * make.adb (Gnatmake): use <library dir>/lib<library name>.a to link
7367 with an archive instead of -L<library dir> -l<library name>.
7369 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7371 * sem_ch8.adb (Analyze_Use_Type): If the clause is being re-analyzed,
7372 mark the base types In_Use in addition to making the operations
7375 2011-08-02 Ed Falis <falis@adacore.com>
7377 * init.c: add and setup __gnat_signal_mask for the exception signals
7378 * s-inmaop-vxworks.adb: new file.
7379 * s-intman-vxworks.adb: remove unnecessary initializations and
7381 * s-intman-vxworks.ads: remove unnecessary variable
7382 * s-taprop-vxworks.adb: simplify signal initialization
7384 2011-08-02 Robert Dewar <dewar@adacore.com>
7386 * sem_ch8.adb: Minor code reorganization, comment updates.
7388 2011-08-02 Robert Dewar <dewar@adacore.com>
7390 * sem_res.adb (Matching_Static_Array_Bounds): Moved to Sem_Util
7391 * sem_util.ads, sem_util.adb (Matching_Static_Array_Bounds): Moved
7393 (Matching_Static_Array_Bounds): Use Is_Ok_Static_Expression
7394 (Matching_Static_Array_Bounds): Moved here from Sem_Res
7396 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7398 * atree.h, atree.ads, atree.adb: New subprograms to manipulate Elist5.
7399 * par_ch8.adb (P_Use_Type): initialize Used_Operations for node.
7400 * sinfo.ads, sinfo.adb (Used_Operations): new attribute of
7401 use_type_clauses, to handle more efficiently use_type and use_all_type
7403 * sem_ch8.adb: Rewrite Use_One_Type and End_Use_Type to handle the
7404 Ada2012 Use_All_Type clause.
7405 (Use_Class_Wide_Operations): new procedure.
7407 2011-08-02 Robert Dewar <dewar@adacore.com>
7409 * exp_util.adb, par-ch10.adb, par-ch6.adb, sem.adb, sem_ch6.adb,
7410 sem_ch6.ads, sinfo.adb, sinfo.ads, sprint.adb: Change parameterized
7411 expression to expression function.
7413 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7415 * sem_ch4.adb: transform simple Ada2012 membership into equality only
7416 if types are compatible.
7418 2011-08-02 Yannick Moy <moy@adacore.com>
7420 * sem_res.adb (Matching_Static_Array_Bounds): new function which
7421 returns True if its argument array types have same dimension and same
7422 static bounds at each index.
7423 (Resolve_Actuals): issue an error in formal mode on actuals passed as
7424 OUT or IN OUT paramaters which are not view conversions in SPARK.
7425 (Resolve_Arithmetic_Op): issue an error in formal mode on
7426 multiplication or division with operands of fixed point types which are
7427 not qualified or explicitly converted.
7428 (Resolve_Comparison_Op): issue an error in formal mode on comparisons of
7429 Boolean or array type (except String) operands.
7430 (Resolve_Equality_Op): issue an error in formal mode on equality
7431 operators for array types other than String with non-matching static
7433 (Resolve_Logical_Op): issue an error in formal mode on logical operators
7434 for array types with non-matching static bounds. Factorize the code in
7435 Matching_Static_Array_Bounds.
7436 (Resolve_Qualified_Expression): issue an error in formal mode on
7437 qualified expressions for array types with non-matching static bounds.
7438 (Resolve_Type_Conversion): issue an error in formal mode on type
7439 conversion for array types with non-matching static bounds
7441 2011-08-02 Robert Dewar <dewar@adacore.com>
7443 * par-ch10.adb: Minor code reorganization (use Nkind_In).
7445 2011-08-02 Ed Schonberg <schonberg@adacore.com>
7447 * par-ch9.adb: save location of entry for proper error message.
7449 2011-08-02 Javier Miranda <miranda@adacore.com>
7451 * sem_type.ads, sem_type.adb (Is_Ancestor): Addition of a new formal
7452 (Use_Full_View) which permits this routine to climb through the
7453 ancestors using the full-view of private parents.
7454 * sem_util.adb (Collect_Interfaces_Info, Implements_Interface): Set
7455 Use_Full_View to true in calls to Is_Ancestor.
7456 * sem_disp.adb (Override_Dispatching_Operation): Set Use_Full_View to
7457 true in call to Is_Ancestor.
7458 * exp_ch3.adb (Build_Offset_To_Top_Functions, Initialize_Tag): Set
7459 Use_Full_View to true in call to Is_Ancestor.
7460 * exp_ch7.adb (Controller_Component): Set Use_Full_View to true in
7461 call to Is_Ancestor.
7462 * exp_ch4.adb (Expand_N_Type_Conversion, Tagged_Membership): Set
7463 Use_Full_View to true in calls to Is_Ancestor.
7464 * exp_disp.adb (Expand_Interface_Actuals, Make_Secondary_DT, Make_DT,
7465 Make_Select_Specific_Data_Table, Register_Primitive,
7466 Set_All_DT_Position): Set Use_Full_View to true in calls to Is_Ancestor.
7467 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Set Use_Full_View
7468 to true in call to Is_Ancestor.
7469 * exp_util.adb (Find_Interface_ADT, Find_Interface_Tag): Set
7470 Use_Full_View to true in calls to Is_Ancestor.
7472 (Write_Call_Info): Set Use_Full_View to true in call to Is_Ancestor.
7473 (Write_Type_Info): Set Use_Full_View to true in call to Is_Ancestor.
7475 2011-08-02 Robert Dewar <dewar@adacore.com>
7477 * gnat_rm.texi: Minor reformatting.
7478 * sem_prag.adb: Minor reformatting.
7480 2011-08-02 Tristan Gingold <gingold@adacore.com>
7482 * vms_data.ads: Add VMS qualifier for -gnateP.
7484 2011-08-02 Robert Dewar <dewar@adacore.com>
7486 * par-ch13.adb (P_Aspect_Specification): New meaning of Decl = Empty
7487 * par-ch7.adb (P_Package): Proper placement of aspects for package
7489 * par-endh.adb (Check_End): Ad Is_Sloc parameter
7490 (End_Statements): Add Is_Sloc parameterr
7491 * par.adb (P_Aspect_Specification): New meaning of Decl = Empty
7492 (Check_End): Ad Is_Sloc parameter
7493 (End_Statements): Add Is_Sloc parameterr
7495 2011-08-02 Vincent Celier <celier@adacore.com>
7497 * ug_words: Add VMS qualifier equivalent to -gnateP:
7498 /SYMBOL_PREPROCESSING.
7500 2011-08-02 Jose Ruiz <ruiz@adacore.com>
7502 * gnat-style.texi: For hexadecimal numeric literals the typical
7503 grouping of digits is 4 to represent 2 bytes.
7504 A procedure spec which is split into several lines is indented two
7507 2011-08-02 Yannick Moy <moy@adacore.com>
7509 * exp_aggr.adb (Is_Others_Aggregate): move function to other unit.
7510 * sem_aggr.adb, sem_aggr.ads (Is_Others_Aggregate): move function here
7511 (Resolve_Aggregate): issue errors in formal modes when aggregate is not
7513 (Resolve_Array_Aggregate): issue errors in formal modes on non-static
7514 choice in array aggregate
7515 (Resolve_Extension_Aggregate): issue errors in formal modes on subtype
7517 (Resolve_Record_Aggregate): issue errors in formal modes on mixed
7518 positional and named aggregate for record, or others in record
7519 aggregate, or multiple choice in record aggregate
7520 * sem_res.adb (Resolve_Logical_Op): issue errors in formal mode when
7521 array operands to logical operations AND, OR and XOR do not have the
7522 same static lower and higher bounds
7523 * sem_ch5.adb, sinfo.ads: Correct typos in comments
7525 2011-08-01 Robert Dewar <dewar@adacore.com>
7527 * sem_util.ads, sem_util.adb, sem_ch6.adb (Last_Source_Statement):
7528 Replaces Last_Source_Node_In_Sequence.
7529 * err_vars.ads (Error_Msg_Lang): 16 is OK, don't need 4K
7530 * errout.adb (Set_Error_Msg_Lang): Takes arg with no parens, but stores
7531 parens and blank in string (this was inconsistently implemented).
7533 (Set_Error_Msg_Lang): Takes arg with no parens, but stores parens and
7534 blank in string (this was inconsistently implemented).
7536 (Set_Global_Switches): Set formal mode switches appropriately
7537 * opt.ads, opt.adb: Formal mode is now global switches, more consistent
7539 (Analyze_Pragma, case SPARK_95): Set opt switches appropriately and
7540 call Set_Error_Msg_Lang to set "spark" as language name.
7541 * par.adb: Remove unnecessary call to set formal language for errout
7542 * sem_prag.adb (P_Pragma, case SPARK_95): Set opt switches
7543 appropriately and call Set_Error_Msg_Lang to set "spark" as language
7545 * sem_ch4.adb (Analyze_Concatenation_Operand): remove procedure and
7546 calls to it, moved after resolution so that types are known
7547 * sem_res.adb (Resolve_Op_Concat): issue an error in formal mode if
7548 result of concatenation is not of type String
7549 (Resolve_Op_Concat_Arg): issue an error in formal mode if an operand of
7550 concatenation is not properly restricted
7551 * gnat_rm.texi: Add doc on pragma Spark_95.
7552 * gcc-interface/Makefile.in: Remove obsolete target pairs for
7553 Interfaces.C.* on VMS. Remove s-parame-vms-restrict.ads.
7554 * gcc-interface/Make-lang.in: Update dependencies.
7556 2011-08-01 Javier Miranda <miranda@adacore.com>
7558 * sem_disp.adb (Override_Dispatching_Operation): Enforce strictness of
7559 condition that detects if the overridden operation must replace an
7562 2011-08-01 Javier Miranda <miranda@adacore.com>
7564 * exp_ch4.adb (Expand_N_Case_Expression): Propagate to the expanded
7565 code declarations inserted by Insert_Actions in each alternative of the
7566 N_Case_Expression node.
7568 2011-08-01 Robert Dewar <dewar@adacore.com>
7570 * sem_ch6.adb: Minor code reorganization.
7571 * sem_util.adb: Minor reformatting.
7573 2011-08-01 Pascal Obry <obry@adacore.com>
7575 * prj-env.adb: Remove <prefix>/lib/gpr/<target> project search path.
7576 * gnat_ugn.texi: Add documentation for VERSIONINFO Windows resource.
7578 2011-08-01 Yannick Moy <moy@adacore.com>
7580 * par-ch4.adb (P_Name): issue a syntax error in SPARK mode on character
7581 literal or operator symbol which is prefixed
7582 * sem_attr.adb (Analyze_Access_Attribute): issue an error in formal
7583 mode on access attributes.
7584 * sem_ch4.adb (Analyze_Concatenation_Operand): new procedure to check
7585 that concatenation operands are properly restricted in formal mode
7586 (Analyze_Concatenation, Analyze_Concatenation_Rest): call new procedure
7587 Analyze_Concatenation_Operand. Issue an error in formal mode if the
7588 result of the concatenation has a type different from String.
7589 (Analyze_Conditional_Expression, Analyze_Explicit_Dereference,
7590 Analyze_Quantified_Expression, Analyze_Slice,
7591 Analyze_Null): issue an error in formal mode on unsupported constructs
7593 (Analyze_Block_Statement): only issue error on source block statement
7594 * sem_util.ads, sem_util.adb (Last_Source_Node_In_Sequence): new
7595 function which returns the last node in a list of nodes for which
7596 Comes_From_Source returns True, if any
7597 * sem_ch6.adb (Check_Missing_Return): minor refactoring to use
7598 Last_Source_Node_In_Sequence
7599 * sem_ch8.adb (Analyze_Exception_Renaming, Analyze_Generic_Renaming,
7600 Analyze_Object_Renaming, Analyze_Use_Package): issue an error in formal
7601 mode on unsupported constructs
7602 * sem_ch9.adb Do not return after issuing error in formal mode, as the
7603 rest of the actions may be needed later on since the error is marked as
7605 * sinfo.ads: Typos in comments.
7607 2011-08-01 Pascal Obry <obry@adacore.com>
7609 * projects.texi: Minor editing.
7611 2011-08-01 Yannick Moy <moy@adacore.com>
7613 * err_vars.ads (Error_Msg_Lang, Error_Msg_Langlen): new variables for
7614 insertion character ~~
7615 * errout.ads, errout.adb (Formal_Error_Msg_...): remove procedures
7616 (Set_Error_Msg_Lang): new procedure which fixes the language for use
7617 with insertion character ~~
7618 (Set_Msg_Text): treat insertion character ~~
7619 * par-ch4.adb, par-ch5.adb, par-endh.adb, sem_attr.adb, sem_ch11.adb,
7620 sem_ch3.adb, sem_ch5.adb, sem_ch9.adb, sem_util.adb: Replace calls to
7621 Formal_Error_Msg_... procedures by equivalent Error_Msg_...
7622 procedures. Favor calls to Error_Msg_F(E) over Error_Msg_N(E). Make
7623 errors related to the formal language restriction not serious
7624 (insertion character |).
7625 * par.adb (Par): set formal language for error messages if needed
7626 * sem_ch6.adb (Check_Missing_Return): take into account possible
7627 generated statements at the end of the function
7628 * snames.ads-tmpl (Name_SPARK_95, Pragma_SPARK_95): new variable and
7629 enumeration value to define a new pragma SPARK_95
7630 * opt.ads, opt.adb (SPARK_Version_Type, SPARK_Version_Default,
7631 SPARK_Version): new type and variables to store the SPARK version
7633 (SPARK_Mode): return True when SPARK_Version is set
7634 * par-prag.adb: Correct indentation
7635 (Prag): take Pragma_SPARK_95 into account
7636 * sem_prag.adb (Set_Mechanism_Value, Sig_Flags): take Pragma_SPARK_95
7639 2011-08-01 Robert Dewar <dewar@adacore.com>
7641 * sem_ch3.adb, sem_ch3.ads, sem_ch5.adb, prj-part.adb, par-ch4.adb,
7642 sem_util.adb, sem_ch4.adb, sem_ch6.adb, sem_ch6.ads, sem_ch8.adb,
7643 sem_ch8.ads, sem_ch13.ads, par-ch5.adb, prj-env.ads: Minor reformatting
7645 2011-08-01 Pascal Obry <obry@adacore.com>
7647 * prj-part.ads, prj-part.adb (Parse): Add Target_Name parameter. Pass
7648 Target_Name to Get_Path call.
7649 (Parse_Single_Project): Likewise.
7650 (Post_Parse_Context_Clause): Likewise.
7651 * prj-env.ads, prj-env.adb (Find_Project): Add Target_Name parameter.
7652 Call Initialise_Project_Path with the proper Target_Name.
7653 (Initialize_Project_Path): Add <gnat_root>/<target_name>/lib/gnat
7655 (Get_Path): Add Target_Name parameter. Call Initialise_Project_Path
7656 with the proper Target_Name.
7657 * prj-conf.adb (Get_Or_Create_Configuration_File): Pass Target_Name to
7659 (Parse_Project_And_Apply_Config): Likewise.
7660 * prj-makr.adb (Initialize): Pass empty Target_Name to Parse routine.
7661 This is fine as this part of the code is supporting only native
7663 * prj-pars.adb (Parse): Pass empty Target_Name to Parse routine. This
7664 is fine as this part of the code is supporting only native compilation.
7666 2011-08-01 Yannick Moy <moy@adacore.com>
7668 * sem_util.adb (Enter_Name): issue error in formal mode on declaration
7669 of homonym, unless the homonym is one of the cases allowed in SPARK
7670 * par-ch5.adb (Parse_Decls_Begin_End): issue error in SPARK mode for
7671 package declaration occurring after a body.
7673 2011-08-01 Robert Dewar <dewar@adacore.com>
7675 * checks.adb, exp_ch4.adb: Minor reformatting.
7677 2011-08-01 Javier Miranda <miranda@adacore.com>
7679 * einfo.ads (Access_Disp_Table): Fix documentation.
7680 (Dispatch_Table_Wrappers): Fix documentation.
7682 2011-08-01 Pascal Obry <obry@adacore.com>
7684 * prj-env.adb, prj-env.ads: Minor reformatting.
7686 2011-08-01 Yannick Moy <moy@adacore.com>
7688 * sem_util.ads, sem_util.adb, par.adb, par_util.adb
7689 (Formal_Error_Msg, Formal_Error_Msg_N, Formal_Error_Msg_SP): move
7690 procedures out of these packages.
7691 * errout.ads, errout.adb
7692 (Formal_Error_Msg, Formal_Error_Msg_N, Formal_Error_Msg_SP): move
7693 procedures in of this package
7694 (Formal_Error_Msg_NE): new procedure for wrapper on Error_Msg_NE
7695 * par-ch5.adb (Parse_Decls_Begin_End): issue syntax error in SPARK mode
7696 on misplaced later vs initial declarations, like in Ada 83
7697 * sem_attr.adb (Processing for Analyze_Attribute): issue error in
7698 formal mode on attribute of private type whose full type declaration
7700 * sem_ch3.adb (Analyze_Declarations): issue error in formal mode on a
7701 package declaration inside a package specification
7702 (Analyze_Full_Type_Declaration): issue error in formal mode on
7703 controlled type or discriminant type
7704 * sem_ch6.adb (Analyze_Subprogram_Specification): only issue error on
7705 user-defined operator means that it should come from the source
7706 (New_Overloaded_Entity): issue error in formal mode on overloaded
7708 * sem_ch6.ads, sem_ch13.ads: typos in comments.
7710 2011-08-01 Thomas Quinot <quinot@adacore.com>
7712 * atree.adb: Minor reformatting.
7713 * checks.adb: Minor reformatting.
7715 2011-08-01 Vincent Celier <celier@adacore.com>
7717 * s-parame-vms-ia64.ads: Fix typo in comment
7719 * s-parame-vms-restrict.ads: Removed, unused.
7721 2011-08-01 Javier Miranda <miranda@adacore.com>
7724 (Is_Variable_Size_Array): Remove local subprogram Is_Constant_Bound.
7726 (Constrain_Index): Remove side effects in the evaluation of the bounds.
7727 * sem_ch3.ads, sem_ch3.adb
7728 (Is_Constant_Bound): New extended version of the subprogram that was
7729 previously located inside function Exp_Ch3.Is_Variable_Size_Array.
7730 Moved here since it is shared by routines of sem_ch3 and exp_ch3.
7731 * sem_aux.ads (Constant_Value): Fix typo in comment.
7732 * checks.adb (Generate_Index_Checks): New implementation which, for
7733 array objects with constant bounds, generates the runtime check
7734 referencing the bounds of the array type. For other cases this routine
7735 provides its previous behavior obtaining such values from the array
7737 * sem_res.adb (Set_Slice_Subtype): Link a copied range subtree with its
7739 * atree.adb (New_Copy): Reset flag Is_Overloaded in the new copy since
7740 we cannot have semantic interpretations of the new node.
7742 2011-08-01 Ed Schonberg <schonberg@adacore.com>
7744 * sem_ch6.adb (Fully_Conformant_Expressions): handle quantified
7747 2011-08-01 Arnaud Charlet <charlet@adacore.com>
7749 * sem_ch8.adb: Minor code editing.
7750 * s-vxwext.adb: Remove trailing space.
7751 * freeze.adb, freeze.ads, errout.ads, erroutc.adb: Fix GPLv3 header for
7752 consistency with other files.
7754 2011-08-01 Thomas Quinot <quinot@adacore.com>
7756 * s-auxdec.ads, s-auxdec-vms_64.ads: Minor reformatting.
7758 2011-08-01 Ed Schonberg <schonberg@adacore.com>
7760 * par-ch10.adb: reject parameterized expressions as compilation unit.
7761 * sem_ch4.adb: handle properly conditional expression with overloaded
7762 then_clause and no else_clause.
7764 2011-08-01 Tristan Gingold <gingold@adacore.com>
7766 * s-parame-vms-alpha.ads, s-parame-vms-ia64.ads: Redeclare C_Address
7767 like done by System.Aux_DEC.
7768 * env.c (__gnat_setenv) [VMS]: Put logicals into LNM$PROCESS table.
7770 2011-08-01 Yannick Moy <moy@adacore.com>
7772 * par-endh.adb (Check_End): issue a syntax error in SPARK mode for
7773 missing label at end of declaration (subprogram or package)
7774 * par-ch4.adb (P_Name): issue a syntax error in SPARK mode for mixing
7775 of positional and named parameter association
7776 * par.adb, par-util.adb (Formal_Error_Msg_SP): new wrapper on
7777 Error_Msg_SP which adds a prefix to the error message giving the name
7778 of the formal language analyzed
7779 * sem_ch6.adb (Analyze_Return_Type): issue an error in formal mode for
7780 access result type in subprogram, unconstrained array as result type,.
7781 (Analyze_Subprogram_Declaration): issue an error in formal mode for null
7783 * sem_ch8.adb: Code clean up.
7785 2011-08-01 Javier Miranda <miranda@adacore.com>
7787 * sem_ch7.adb (Uninstall_Declarations): Remove useless code.
7788 * einfo.ads (Access_Disp_Table): Fix documentation.
7789 (Dispatch_Table_Wrappers): Fix documentation.
7790 * einfo.adb (Access_Disp_Table, Dispatch_Table_Wrappers,
7791 Set_Access_Disp_Table, Set_Dispatch_Table_Wrappers): Fix the assertions
7792 to enforce the documentation of this attribute.
7793 (Set_Is_Interface): Cleanup the assertion.
7794 * exp_ch4.adb (Expand_Allocator_Expression, Tagged_Membership): Locate
7795 the Underlying_Type entity before reading attribute Access_Disp_Table.
7796 * exp_disp.adb (Expand_Dispatching_Call, Expand_Interface_Conversion):
7797 Locate the Underlying_Type before reading attribute Access_Disp_Table.
7798 * exp_aggr.adb (Build_Array_Aggr_Code, Build_Record_Aggr_Code): Locate
7799 the Underlying_Type entity before reading attribute Access_Disp_Table.
7800 * exp_ch3.adb (Build_Record_Init_Proc, Expand_N_Object_Declaration):
7801 Locate the Underlying_Type entity before reading attribute
7804 2011-08-01 Ed Schonberg <schonberg@adacore.com>
7806 * s-poosiz.ads: Additional overriding indicators.
7808 2011-08-01 Yannick Moy <moy@adacore.com>
7810 * sem_ch5.adb (Analyze_Exit_Statement): add return after error in
7812 (Analyze_Iteration_Scheme): issue error in formal mode when loop
7813 parameter specification does not include a subtype mark.
7814 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): issue error in
7815 formal mode on abstract subprogram.
7816 (Analyze_Subprogram_Specification): issue error in formal mode on
7817 user-defined operator.
7818 (Process_Formals): issue error in formal mode on access parameter and
7820 * sem_ch9.adb (Analyze_Abort_Statement,
7821 Analyze_Accept_Statement, Analyze_Asynchronous_Select,
7822 Analyze_Conditional_Entry_Call, Analyze_Delay_Relative,
7823 Analyze_Delay_Until, Analyze_Entry_Call_Alternative,
7824 Analyze_Requeue, Analyze_Selective_Accept,
7825 Analyze_Timed_Entry_Call): issue error in formal mode on such constructs
7826 * sem_ch11.adb (Analyze_Raise_Statement, Analyze_Raise_xxx_Error):
7827 issue error in formal mode on user-defined raise statement.
7829 2011-08-01 Thomas Quinot <quinot@adacore.com>
7831 * sem_ch6.adb (Enter_Overloaded_Entity): Do not warn about a
7832 declaration being hidden when overriding an implicit inherited
7834 * par-ch10.adb (P_Compilation_Unit): In syntax check only mode
7835 (-gnats), do not complain about a source file that contains only a
7838 2011-08-01 Ed Schonberg <schonberg@adacore.com>
7840 * sem_ch5.adb (Analyze_Iterator_Scheme): Do not overwrite type of loop
7841 variable if already set.
7843 2011-08-01 Arnaud Charlet <charlet@adacore.com>
7845 * g-socket-dummy.adb, s-osinte-linux.ads, g-socket-dummy.ads,
7846 g-debuti.adb, g-tasloc.adb, g-debuti.ads, g-tasloc.ads,
7847 s-osinte-hpux.ads, g-sercom.adb, g-soliop-solaris.ads, g-sercom.ads,
7848 g-sptain.ads, g-curexc.ads, s-tasloc.adb, s-tasloc.ads, s-tataat.adb,
7849 g-ctrl_c.adb, a-reatim.adb, s-tataat.ads, g-dirope.adb, g-ctrl_c.ads,
7850 g-dirope.ads, g-boubuf.adb, g-calend.adb, g-boubuf.ads, g-souinf.ads,
7851 g-table.adb, g-bytswa-x86.adb, g-wispch.adb, g-io.adb, g-table.ads,
7852 g-wispch.ads, g-io.ads, g-memdum.adb, g-memdum.ads, g-busorg.adb,
7853 g-busorg.ads, g-regpat.adb, g-sothco-dummy.adb, g-encstr.adb,
7854 g-regpat.ads, g-sothco-dummy.ads, s-osinte-aix.ads, g-encstr.ads,
7855 g-sercom-mingw.adb, s-mastop-vms.adb, g-diopit.adb, g-diopit.ads,
7856 s-vxwext.adb, g-dyntab.adb, g-dyntab.ads, g-crc32.adb,
7857 g-sercom-linux.adb, g-crc32.ads, s-regpat.adb, g-flocon.ads,
7858 s-regpat.ads, g-stheme.adb, g-sestin.ads, s-taspri-posix-noaltstack.ads,
7859 g-soliop.ads, s-inmaop-posix.adb, g-locfil.ads, g-enblsp-vms-alpha.adb,
7860 g-socthi-dummy.adb, g-socthi-dummy.ads, gnat.ads, g-moreex.adb,
7861 g-moreex.ads, g-dynhta.adb, g-dynhta.ads, g-deutst.ads, g-htable.adb,
7862 g-cgicoo.adb, g-htable.ads, g-cgicoo.ads, a-interr.adb,
7863 g-socthi-vms.adb, g-socthi-vms.ads, g-hesora.adb, g-bubsor.adb,
7864 g-hesora.ads, g-bubsor.ads, g-md5.adb, g-md5.ads, s-intman-irix.adb,
7865 s-htable.adb, s-osinte-vms.adb, s-htable.ads, s-osinte-vms.ads,
7866 s-taprob.adb, g-bytswa.adb, g-bytswa.ads, s-osinte-solaris-posix.ads,
7867 a-suenco.adb, g-comver.adb, g-comver.ads, g-exctra.adb,
7868 s-osinte-solaris.adb, g-exctra.ads, s-osinte-irix.ads,
7869 s-osinte-solaris.ads, a-caldel-vms.adb, g-socthi-vxworks.adb,
7870 g-expect.adb, g-socthi-vxworks.ads, g-expect.ads, g-comlin.ads,
7871 g-heasor.adb, g-heasor.ads, g-traceb.adb, g-traceb.ads, g-decstr.adb,
7872 g-spipat.adb, g-decstr.ads, g-spipat.ads, s-mastop-tru64.adb,
7873 g-except.ads, g-thread.adb, g-hesorg.adb, g-thread.ads, g-hesorg.ads,
7874 g-expect-vms.adb, a-stuten.ads, g-spchge.adb, g-spchge.ads,
7875 g-u3spch.adb, g-u3spch.ads, g-spitbo.adb, g-spitbo.ads,
7876 s-osinte-dummy.ads, s-osinte-posix.adb, g-pehage.adb, g-pehage.ads,
7877 s-gloloc-mingw.adb, g-sha1.ads, s-traceb-hpux.adb,
7878 g-trasym-unimplemented.adb, g-trasym-unimplemented.ads, g-io_aux.adb,
7879 g-regexp.adb, g-io_aux.ads, g-socthi-mingw.adb, g-regexp.ads,
7880 s-osinte-hpux-dce.adb, g-socthi-mingw.ads, g-cgi.adb,
7881 s-osinte-hpux-dce.ads, g-cgi.ads, g-byorma.adb, g-boumai.ads,
7882 g-byorma.ads, a-caldel.adb, s-regexp.adb, s-regexp.ads,
7883 g-soliop-mingw.ads, g-sptavs.ads, s-osinte-tru64.ads, g-speche.adb,
7884 g-speche.ads, g-socthi.adb, g-stsifd-sockets.adb, g-socthi.ads,
7885 s-osinte-darwin.ads, i-vxwork-x86.ads, g-awk.adb, i-vxwork.ads,
7886 g-awk.ads, g-zspche.adb, g-zspche.ads, g-socket.adb, g-sptabo.ads,
7887 g-socket.ads, g-semaph.adb, g-semaph.ads, s-taspri-posix.ads,
7888 g-enblsp-vms-ia64.adb, g-cgideb.adb, g-cgideb.ads, g-sothco.adb,
7889 s-osinte-freebsd.ads, g-sothco.ads, g-catiio.adb, g-casuti.adb,
7890 g-catiio.ads, g-casuti.ads, g-trasym.adb, g-trasym.ads, s-casuti.adb,
7891 g-os_lib.adb, s-traceb-mastop.adb, g-busora.adb, s-interr-dummy.adb,
7892 g-busora.ads, g-enutst.ads, s-os_lib.adb, a-tasatt.adb,
7893 s-osinte-mingw.ads: Update to GPLv3 run-time license.
7894 Use GNAT instead of GNARL.
7896 2011-08-01 Bob Duff <duff@adacore.com>
7898 * a-cdlili.ads, a-cihama.ads, a-coinve.ads, a-ciorse.ads, a-coorma.ads,
7899 a-cidlli.ads, a-ciormu.ads, a-cihase.ads, a-cohama.ads, a-coorse.ads,
7900 a-ciorma.ads, a-coormu.ads, a-convec.ads, a-cohase.ads: Minor
7903 2011-08-01 Yannick Moy <moy@adacore.com>
7905 * debug.adb (d.D) reverve flag for the SPARK mode
7906 (d.E) reverve flag for SPARK generation mode
7907 (d.F) reverve flag for Why generation mode
7908 * opt.ads, opt.adb (ALFA_Mode, ALFA_Through_SPARK_Mode,
7909 ALFA_Through_Why_Mode, Formal_Verification_Mode, SPARK_Mode): New
7910 functions which return True when the corresponding modes are set
7911 (Formal_Language): return "spark" or "alfa" when in formal verification
7913 * sem_util.ads, sem_util.adb (Formal_Error_Msg): new wrapper on
7914 Error_Msg to prefix the error message with a tag giving the formal
7916 (Formal_Error_Msg_N): new wrapper on Error_Msg_N to prefix the error
7917 message with a tag giving the formal language
7918 * sem_ch5.adb (Analyze_Block_Statement): issue error in formal mode on
7920 (Analyze_Case_Statement): issue error in formal mode on case statement
7921 with a single "others" case alternative
7922 (Analyze_Exit_Statement): issue errors in formal mode on exit
7923 statements which do not respect SPARK restrictions
7924 (Analyze_Goto_Statement): issue error in formal mode on goto statement
7925 (Check_Unreachable_Code): always issue an error (not a warning) in
7926 formal mode on unreachable code (concerns both code after an infinite
7927 loop and after an unconditional jump, both not allowed in SPARK)
7928 * sem_ch6.adb (Analyze_Return_Statement): add call to
7929 Set_Return_Present for a procedure containing a return statement
7930 (already done for functions in Analyze_Function_Return)
7931 (Analyze_Function_Return): issue error in formal mode on extended
7932 return or if return is not last statement in function
7933 (Check_Missing_Return): issue error in formal mode if function does
7934 not end with return or if procedure contains a return
7935 * sem_ch8.ads, sem_ch8.adb (Has_Loop_In_Inner_Open_Scopes): new
7936 function to detect if there is an inner scope of its parameter S which
7939 2011-08-01 Thomas Quinot <quinot@adacore.com>
7941 * sem_ch6.ads: Minor reformatting.
7943 2011-08-01 Javier Miranda <miranda@adacore.com>
7945 * sem_util.adb (Abstract_Interface_List): Complete condition when
7946 processing private type declarations to avoid reading unavailable
7948 (Is_Synchronized_Tagged_Type): Complete condition when processing
7949 private extension declaration nodes to avoid reading unavailable
7952 2011-08-01 Thomas Quinot <quinot@adacore.com>
7954 * sem_ch3.adb: Minor reformatting.
7956 2011-08-01 Thomas Quinot <quinot@adacore.com>
7958 * s-parame-ae653.ads, s-parame-vms-alpha.ads, s-parame-hpux.ads,
7959 i-cpoint.adb, i-cstrin.adb, i-cpoint.ads, i-cstrin.ads,
7960 s-parame-vms-ia64.ads, s-parame.ads, i-c.ads, s-parame-vxworks.ads,
7961 s-parame-vms-restrict.ads: Remove duplicated Interfaces.C.* packages
7962 for VMS, instead parametrize the common implementation with
7963 System.Parameters declarations.
7965 2011-08-01 Eric Botcazou <ebotcazou@adacore.com>
7967 * gnat_rm.texi: Document limitation of Pragma No_Strict_Aliasing.
7969 2011-08-01 Tristan Gingold <gingold@adacore.com>
7971 * seh_init.c: Fix SEH handler installation on win64.
7973 2011-08-01 Ed Schonberg <schonberg@adacore.com>
7975 * sem_ch3.adb (Access_Subprogram_Declaration): in Asis mode, prevent
7976 double analysis of an anonymous access to subprogram, because it can
7977 lead to improper sharing of profiles and a back-end crash.
7979 2011-08-01 Robert Dewar <dewar@adacore.com>
7981 * make.adb, sem_ch4.adb: Minor reformatting.
7982 * gcc-interface/Make-lang.in: Update dependencies.
7983 * sem_util.adb, exp_ch5.adb: Minor reformatting.
7985 2011-08-01 Arnaud Charlet <charlet@adacore.com>
7987 * gnat_rm.texi: Fix definition of Long_Integer.
7989 2011-08-01 Ed Schonberg <schonberg@adacore.com>
7991 * exp_aggr.adb: check limit size of static aggregate unconditionally,
7992 to prevent storage exhaustion.
7993 * exp_ch7.adb (Clean_Simple_Protected_Objects): if the scope being
7994 finalized is a function body, insert the cleanup code before the final
7995 return statement, to prevent spurious warnings.
7996 * s-pooglo.ads: add overriding indicator.
7998 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8000 * sem_ch4.adb (Operator_Check): improve error message when both a
8001 with_clause and a use_clause are needed to make operator usage legal.
8002 * sem_util.ads, sem_util.adb (Unit_Is_Visible): new predicate to
8003 determine whether a compilation unit is visible within an other,
8004 either through a with_clause in the current unit, or a with_clause in
8005 its library unit or one one of its parents.
8007 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8009 * exp_ch5.adb (Expand_N_Iterator_Loop): handle properly an iterator
8010 over an arbitrary expression of an array or container type.
8011 * lib-xref.adb: clarify comment.
8013 2011-08-01 Bob Duff <duff@adacore.com>
8015 * einfo.ads: Minor reformatting.
8016 * debug.adb: Minor comment improvement.
8018 2011-08-01 Javier Miranda <miranda@adacore.com>
8020 * sem_ch4.adb (Try_Object_Operation): For class-wide subprograms do not
8021 consider hidden subprograms as valid candidates.
8023 2011-08-01 Arnaud Charlet <charlet@adacore.com>
8025 * make.adb (Compile): Strip -mxxx switches in CodePeer mode.
8027 2011-08-01 Vasiliy Fofanov <fofanov@adacore.com>
8029 * gnat_ugn.texi: Fix typo.
8031 2011-08-01 Robert Dewar <dewar@adacore.com>
8033 * i-cstrin.adb, sem_util.adb, exp_ch11.adb, sem_ch8.adb,
8034 lib-xref.adb: Minor reformatting
8036 2011-08-01 Gary Dismukes <dismukes@adacore.com>
8038 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Replace test of
8039 when to generate a call to Move_Final_List.
8040 (Has_Controlled_Parts): Remove this function.
8042 2011-08-01 Geert Bosch <bosch@adacore.com>
8044 * par-ch3.adb (P_Discrete_Choice_List): Improve error message for extra
8047 2011-08-01 Thomas Quinot <quinot@adacore.com>
8049 * exp_ch11.adb (Expand_N_Raise_Statement): Mark N_Raise_xxx_Error for
8050 explicit raise of a predefined exception as Comes_From_Source if the
8051 original N_Raise_Statement comes from source.
8053 2011-08-01 Robert Dewar <dewar@adacore.com>
8055 * sinfo.ads: Add comment.
8056 * sem_ch6.adb: Minor reformatting.
8058 2011-08-01 Robert Dewar <dewar@adacore.com>
8060 * freeze.adb (Freeze_Entity): Refine check for bad component size
8061 clause to avoid rejecting confirming clause when atomic/aliased present.
8063 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8065 * sem_ch8.adb (Find_Direct_Name, Analyze_Expanded_Name): use Is_LHS to
8066 better determine whether an entity reference is a write.
8067 * sem_util.adb (Is_LHS): refine predicate to handle assignment to a
8069 * lib-xref.adb (Output_References): Do no suppress a read reference at
8070 the same location as an immediately preceeding modify-reference, to
8071 handle properly in-out actuals.
8073 2011-08-01 Tristan Gingold <gingold@adacore.com>
8075 * env.c (__gnat_setenv) [VMS]: Refine previous change.
8077 2011-08-01 Quentin Ochem <ochem@adacore.com>
8079 * i-cstrin.adb (New_String): Changed implementation, now uses only the
8080 heap to compute the result.
8082 2011-08-01 Robert Dewar <dewar@adacore.com>
8084 * atree.ads: Minor reformatting.
8086 2011-08-01 Emmanuel Briot <briot@adacore.com>
8088 * g-expect.adb (Get_Command_Output): Fix memory leak.
8090 2011-08-01 Geert Bosch <bosch@adacore.com>
8092 * cstand.adb (P_Float_Type): New procedure to print the definition of
8093 predefined fpt types.
8094 (P_Mixed_Name): New procedure to print a name using mixed case
8095 (Print_Standard): Use P_Float_Type for printing floating point types
8096 * einfo.adb (Machine_Emax_Value): Add preliminary support for quad
8097 precision IEEE float.
8099 2011-08-01 Thomas Quinot <quinot@adacore.com>
8101 * sem_ch3.adb: Minor reformatting.
8103 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8105 * sem_ch6.adb (Analyze_Parameterized_Expression): If the expression is
8106 the completion of a generic function, insert the new body rather than
8107 rewriting the original.
8109 2011-08-01 Yannick Moy <moy@adacore.com>
8111 * sinfo.ads, errout.ads: Typos in comments.
8113 2011-08-01 Robert Dewar <dewar@adacore.com>
8115 * par-endh.adb: Minor reformatting.
8117 2011-08-01 Robert Dewar <dewar@adacore.com>
8119 * aspects.ads, aspects.adb: Add aspects for library unit pragmas
8120 (Pre_Post_Aspects): New subtype.
8121 * par-ch12.adb (P_Generic): New syntax for aspects in packages
8122 * par-ch13.adb (P_Aspect_Specifications): Add Semicolon parameter
8123 * par-ch7.adb (P_Package): Remove Decl parameter
8124 (P_Package): Handle new syntax for aspects (before IS)
8125 * par-ch9.adb (P_Protected_Definition): Remove Decl parameter, handle
8127 (P_Task_Definition): Remove Decl parameter, handle new aspect syntax
8128 * par.adb (P_Aspect_Specifications): Add Semicolon parameter
8129 (P_Package): Remove Decl parameter
8130 * sem_ch13.adb (Analyze_Aspect_Specifications): Handle library unit
8132 * sem_ch7.adb (Analyze_Package_Declaration): Analyze new format aspect
8134 * sem_util.ads, sem_util.adb (Static_Boolean): New function
8135 * sinfo.ads: Document new syntax for aspects in packages etc.
8136 * sprint.adb: Handle new syntax of aspects before IS in package
8138 2011-08-01 Thomas Quinot <quinot@adacore.com>
8140 * atree.ads: Minor reformatting.
8141 * sem_prag.adb: Minor reformatting.
8143 2011-08-01 Robert Dewar <dewar@adacore.com>
8145 * exp_util.adb (Insert_Actions): Fix error in handling Actions for
8146 case expr alternative.
8148 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8150 * sem_ch12.adb: Fix typo.
8152 2011-08-01 Geert Bosch <bosch@adacore.com>
8154 * sem_prag.adb (Check_No_Link_Name): New procedure.
8155 (Process_Import_Or_Interface): Use Check_No_Link_Name.
8156 * cstand.adb (Create_Standard): Use Esize (Standard_Long_Long_Float)
8157 instead of Standard_Long_Long_Float_Size global. Preparation for
8158 eventual removal of per type constants.
8159 * exp_util.ads (Get_Stream_Size): New function returning the stream
8160 size value of subtype E.
8161 * exp_util.adb (Get_Stream_Size): Implement new function.
8162 * exp_strm.adb (Build_Elementary_Input_Call): Use Get_Stream_Size
8164 * exp_attr.adb (Attribute_Stream_Size): Use Get_Stream_Size
8166 (Machine_Mantissa_Value): Handle 128-bit quad precision IEEE floats
8168 2011-08-01 Geert Bosch <bosch@adacore.com>
8170 * cstand.adb: Fix comments.
8171 * sem_prag.adb (Analyze_Pragma): Use List_Length instead of explicit
8174 2011-08-01 Robert Dewar <dewar@adacore.com>
8176 * exp_ch4.adb, sem_cat.adb: Minor reformatting.
8178 2011-08-01 Geert Bosch <bosch@adacore.com>
8180 * atree.ads: Fix comment.
8182 2011-08-01 Robert Dewar <dewar@adacore.com>
8184 * aspects.ads, aspects.adb (Aspect_Names): Moved from body to spec.
8185 * par-ch13.adb (P_Aspect_Specifications): Check misspelled aspect name.
8186 * par.adb: Add with for Namet.Sp.
8187 * par-tchk.adb: Minor reformatting.
8189 2011-08-01 Vincent Celier <celier@adacore.com>
8191 * mlib-tgt-specific-vms-alpha.adb, mlib-tgt-specific-vms-ia64.adb
8192 (Build_Dynamic_Library): Use new function Init_Proc_Name to get the name
8193 of the init procedure of a SAL.
8194 * mlib-tgt-vms_common.ads, mlib-tgt-vms_common.adb (Init_Proc_Name):
8197 2011-08-01 Thomas Quinot <quinot@adacore.com>
8199 * exp_ch4.adb, s-tasini.ads, sem_attr.adb, s-soflin.ads: Minor
8202 2011-08-01 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
8204 * adaint.c (__gnat_file_time_name_attr): Get rid of warning.
8206 2011-08-01 Thomas Quinot <quinot@adacore.com>
8208 * sem_util.adb, sem_util.ads (Has_Overriding_Initialize): Make function
8209 conformant with its spec (return True only for types that have
8210 an overriding Initialize primitive operation that prevents them from
8211 having preelaborable initialization).
8212 * sem_cat.adb (Validate_Object_Declaration): Fix test for preelaborable
8213 initialization for controlled types in Ada 2005 or later mode.
8215 2011-08-01 Robert Dewar <dewar@adacore.com>
8217 * aspects.ads, aspects.adb: Add aspect Type_Invariant, Precondition,
8219 (Same_Aspect): New function.
8220 * sem_ch13.adb (Analyze_Aspect_Specifications): Add aspect
8221 Type_Invariant, Precondition, Postcondition.
8222 * snames.ads-tmpl: Add Name_Type_Invariant.
8224 2011-08-01 Robert Dewar <dewar@adacore.com>
8226 * freeze.adb (Freeze_Entity): Don't call Check_Aspect_At_Freeze_Point
8228 (Freeze_All_Ent): Fix error in handling inherited aspects.
8229 * sem_ch13.adb (Analyze_Aspect_Specifications): Skip aspect that is
8230 already analyzed, but don't skip entire processing of a declaration,
8231 that's wrong in some cases of declarations being rewritten.
8232 (Analyze_Aspect_Specification): Set Is_Delayed_Aspect in aspects.
8233 Don't delay for integer, string literals
8234 Treat predicates in usual manner for delay, remove special case code,
8236 (Analyze_Freeze_Entity): Make call to Check_Aspect_At_Freeze_Point
8237 (Build_Predicate_Function): Update saved expression in aspect
8238 (Build_Invariant_Procedure): Update saved expression in aspect
8239 * exp_ch4.adb (Expand_N_Selected_Component): Only do the optimization
8240 of replacement of discriminant references if the reference is simple.
8242 2011-08-01 Robert Dewar <dewar@adacore.com>
8244 * aspects.ads, aspects.adb: Add Static_Predicate and Dynamic_Predicate.
8245 * sem_ch13.adb (Analyze_Aspect_Specification): Add processing for
8246 Static_Predicate and Dynamic_Predicate.
8247 (Build_Predicate_Function): Add processing for Static_Predicate
8248 and Dynamic_Predicate.
8249 * sinfo.ads, sinfo.adb (From_Dynamic_Predicate): New flag
8250 (From_Static_Predicate): New flag
8251 * snames.ads-tmpl: Add Name_Static_Predicate and Name_Dynamic_Predicate
8253 2011-08-01 Robert Dewar <dewar@adacore.com>
8255 * usage.adb: Documentation cleanup for Ada version modes in usage.
8256 * expander.adb: Minor reformatting.
8258 2011-08-01 Robert Dewar <dewar@adacore.com>
8260 * atree.ads: Minor comment fix.
8261 * a-stwifi.adb, a-stzfix.adb, a-strfix.adb, a-ztexio.ads, a-textio.ads,
8262 a-witeio.ads, sem_prag.adb: Minor reformatting.
8264 2011-08-01 Doug Rupp <rupp@adacore.com>
8266 * env.c (__gnat_setenv) [VMS]: Force 32bit on item list structure
8267 pointers. Use descrip.h header file for convenience. Add some
8270 2011-08-01 Robert Dewar <dewar@adacore.com>
8272 * freeze.adb (Freeze_Entity): Call Check_Aspect_At_Freeze_Point
8273 (Freeze_All): Call Check_Aspect_At_End_Of_Declarations
8274 * sem_ch13.ads, sem_ch13.adb (Check_Aspect_At_Freeze_Point):
8276 (Check_Aspect_At_End_Of_Declarations): New procedure
8277 (Analye_Aspect_Specification): Minor changes for above procedures
8278 * sinfo.ads, sinfo.adb (Is_Delayed_Aspect): Now set in aspect
8279 specification node as well.
8281 2011-08-01 Pascal Obry <obry@adacore.com>
8283 * adaint.c (_gnat_stat): GetFilesAttributesEx() would fail on special
8284 Windows files. Use GetFilesAttributes() in this case to check for file
8285 existence instead of returning with an error code.
8287 2011-08-01 Vincent Celier <celier@adacore.com>
8289 * a-stzfix.adb, a-stwifi.adb (Replace_Slice): Fixed computation when
8290 High is above Source length.
8292 2011-08-01 Robert Dewar <dewar@adacore.com>
8294 * a-ztexio.ads, a-textio.ads, a-witeio.ads: Fix comment.
8296 2011-08-01 Robert Dewar <dewar@adacore.com>
8298 * aspects.ads (Boolean_Aspects): New subtype.
8299 * exp_ch13.adb (Expand_Freeze_Entity): Fix errors in handling aspects
8300 for derived types in cases where the parent type and derived type have
8302 * freeze.adb (Freeze_Entity): Fix problems in handling derived type
8303 with aspects when parent type also has aspects.
8304 (Freeze_Entity): Deal with delay of boolean aspects (must evaluate
8305 boolean expression at this point).
8306 * sem_ch13.adb (Analyze_Aspect_Specifications): Delay all aspects in
8307 accordance with final decision on the Ada 2012 feature.
8308 * sinfo.ads, sinfo.adb (Is_Boolean_Aspect): New flag.
8310 2011-08-01 Matthew Heaney <heaney@adacore.com>
8312 * a-chtgbo.adb (Delete_Node_Sans_Free): Replace iterator with selector.
8314 2011-08-01 Pascal Obry <obry@adacore.com>
8316 * a-stzunb-shared.adb, a-strunb-shared.adb, a-stwiun-shared.adb:
8317 Fix Replace_Slice when High is above current string size.
8318 (Replace_Slice): Fix DL computation when High is above current
8321 2011-08-01 Gary Dismukes <dismukes@adacore.com>
8323 * gnat_rm.texi: Add documentation for pragma Static_Elaboration_Desired.
8325 2011-08-01 Matthew Heaney <heaney@adacore.com>
8327 * a-rbtgbo.adb (Delete_Node_Sans_Free): Fixed assignment to left child
8330 2011-08-01 Pascal Obry <obry@adacore.com>
8332 * a-stzunb-shared.adb, a-strunb-shared.adb, a-stwiun-shared.adb: Minor
8335 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8337 * sem_attr.adb (Analyze_Attribute, case 'Access): Handle properly named
8338 access to protected subprograms in generic bodies.
8339 * sem_ch6.adb (Analyze_Subprogram_Declaration): If the context is a
8340 protected type, indicate that the convention of the subprogram is
8341 Convention_Protected, because it may be used in subsequent declarations
8342 within the protected declaration.
8344 2011-08-01 Vincent Celier <celier@adacore.com>
8346 * mlib-prj.adb (Build_Library): Use "ada_" as the prefix for the "init"
8347 and "final" procedures when the name of the library is "ada", to avoid
8348 duplicate symbols "adainit" and "adafinal" in executables.
8350 2011-08-01 Ed Schonberg <schonberg@adacore.com>
8352 * sem_attr.adb (Analyze_Attribute, case 'Result): Handle properly a
8353 quantified expression that appears within a postcondition and uses the
8354 Ada2012 'Result attribute.
8356 2011-07-28 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
8358 * init.c (__gnat_error_handler): Cast reason to int.
8359 (__gnat_install_handler): Explain sa_sigaction use.
8361 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
8363 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: If the
8364 subprogram has copy-in copy-out parameters, try to promote the mode of
8365 the return type if it is passed in registers.
8367 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
8369 * gcc-interface/utils2.c (build_binary_op) <ARRAY_REF>: Do not mark the
8370 left operand as addressable.
8372 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
8374 * gcc-interface/gigi.h (build_function_stub): Remove.
8375 (build_return_expr): Likewise.
8376 (convert_vms_descriptor): Declare.
8377 * gcc-interface/utils.c (convert_vms_descriptor): Make global.
8378 (build_function_stub): Move to...
8379 * gcc-interface/utils2.c (build_return_expr): Move to...
8380 * gcc-interface/trans.c (build_function_stub): ...here.
8381 (build_return_expr): ...here.
8382 (Subprogram_Body_to_gnu): Add local variable for language_function.
8383 Disconnect the parameter attributes cache, if any, once done with it.
8384 Call end_subprog_body only after setting the end_locus.
8385 Build the stub associated with the function, if any, at the very end.
8386 (gnat_to_gnu) <N_Return_Statement>: Remove couple of useless local
8387 variables and streamline control flow.
8389 2011-07-23 Arnaud Charlet <charlet@adacore.com>
8392 * gcc-interface/Makefile.in (powerpc-linux): Remove reference to
8395 2011-07-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
8398 * init.c [sun && __SVR4 && !__vxworks] (__gnat_install_handler):
8399 Assign to act.sa_sigaction.
8400 * tracebak.c [USE_GENERIC_UNWINDER] (__gnat_backtrace): Cast
8401 current->return_address to char * before arithmetic.
8403 2011-07-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
8405 * init.c [sgi] (__gnat_error_handler): Update sigaction(2) citation.
8406 Correct argument types.
8407 Extract code from reason.
8408 (__gnat_install_handler): Assign to act.sa_sigaction.
8410 2011-07-21 Eric Botcazou <ebotcazou@adacore.com>
8412 * gcc-interface/Make-lang.in (GNAT1_ADA_OBJS): Move ada/b_gnat1.o to...
8413 (GNAT1_OBJS): ...here.
8415 2011-07-15 Eric Botcazou <ebotcazou@adacore.com>
8418 * g-socthi-mingw.adb (Fill): Fix formatting.
8420 * gcc-interface/gigi.h: Move around comment.
8422 2011-07-14 John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
8425 * s-taprop-hpux-dce.adb (Abort_Task): Remove unnecessary cast.
8427 2011-07-14 Florian Weimer <fw@deneb.enyo.de>
8430 * g-socthi-mingw.adb (Fill): Guard against invalid MSG_WAITALL.
8432 2011-07-13 Eric Botcazou <ebotcazou@adacore.com>
8434 * gcc-interface/utils.c (build_vms_descriptor32): Skip the 32-bit
8435 range comparison if Pmode is SImode.
8437 2011-07-12 Laurent GUERBY <laurent@guerby.net>
8438 Eric Botcazou <ebotcazou@adacore.com>
8440 * adadecode.c: Wrap up in extern "C" block.
8441 * adadecode.h: Likewise.
8442 * adaint.c: Likewise. Remove 'const' keyword.
8443 * adaint.h: Likewise.
8445 * atree.h: Likewise.
8447 * cstreams.c: Likewise.
8451 * final.c: Likewise.
8453 * initialize.c: Likewise.
8455 * namet.h: Likewise.
8456 * nlists.h: Likewise.
8457 * raise.c: Likewise.
8458 * raise.h: Likewise.
8459 * repinfo.h: Likewise.
8460 * seh_init.c: Likewise.
8461 * targext.c: Likewise.
8462 * tracebak.c: Likewise.
8463 * uintp.h: Likewise.
8464 * urealp.h: Likewise.
8465 * xeinfo.adb: Wrap up generated C code in extern "C" block.
8466 * xsinfo.adb: Likewise.
8467 * xsnamest.adb: Likewise.
8468 * gcc-interface/gadaint.h: Wrap up in extern "C" block.
8469 * gcc-interface/gigi.h: Wrap up some prototypes in extern "C" block.
8470 * gcc-interface/misc.c: Likewise.
8471 * gcc-interface/Make-lang.in (GCC_LINK): Use LINKER.
8472 (GNAT1_C_OBJS): Remove ada/b_gnat1.o. List ada/seh_init.o and
8473 ada/targext.o here...
8474 (GNAT_ADA_OBJS): ...and not here.
8475 (GNAT1_ADA_OBJS): Add ada/b_gnat1.o.
8476 (GNATBIND_OBJS): Reorder.
8478 2011-07-07 Richard Henderson <rth@redhat.com>
8480 * gcc-interface/misc.c (gnat_init_gcc_eh): Don't call
8481 dwarf2out_frame_init.
8483 2011-07-07 Eric Botcazou <ebotcazou@adacore.com>
8485 * gcc-interface/misc.c (gnat_init): Tweak previous change.
8487 2011-07-07 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
8490 * gcc-interface/Makefile.in: Handle x86_64-solaris2.
8492 2011-07-06 Richard Guenther <rguenther@suse.de>
8494 * gcc-interface/misc.c (gnat_init): Merge calls to
8495 build_common_tree_nodes and build_common_tree_nodes_2.
8496 Re-initialize boolean_false_node.
8498 2011-07-02 Eric Botcazou <ebotcazou@adacore.com>
8499 Olivier Hainque <hainque@adacore.com>
8500 Nicolas Setton <setton@adacore.com>
8502 * gcc-interface/utils.c (record_builtin_type): Set TYPE_ARTIFICIAL on
8503 the type according to the ARTIFICIAL_P parameter.
8504 (create_type_decl): Likewise.
8505 (create_type_stub_decl): Set TYPE_ARTIFICIAL on the type to 1.
8507 2011-07-01 Eric Botcazou <ebotcazou@adacore.com>
8509 * gcc-interface/Make-lang.in (gnat1): Prepend '+' to the command.
8510 (gnatbind): Likewise.
8512 2011-06-29 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
8514 * gcc-interface/Makefile.in (TOOLS_LIBS): Add $(LIBINTL).
8516 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
8518 * gcc-interface/decl.c (gnat_to_gnu_component_type): Use GNAT_TYPE
8519 local variable throughout. Remove useless call to Base_Type.
8520 (gnat_to_gnu_field): Use GNAT_FIELD_TYPE local variable throughout.
8521 Take it also into account for the volatileness of the field. Set the
8522 TREE_SIDE_EFFECTS flag as well in this case. Reorder some warnings.
8524 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
8526 * gcc-interface/trans.c (Identifier_to_gnu): Don't set TREE_THIS_NOTRAP
8527 on a dereference built for a by-ref object if it has an address clause.
8529 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
8531 * einfo.ads (Address_Taken): Document use for the second argument of
8532 Asm_Input and Asm_Output attributes.
8533 * sem_attr.adb (Analyze_Attribute) <Attribute_Asm_Input>: If the second
8534 argument is an entity name, then set Address_Taken on it.
8535 <Attribute_Asm_Output>: Likewise.
8536 * gcc-interface/trans.c (lvalue_required_for_attribute_p): Handle the
8537 Attr_Asm_Input and Attr_Asm_Output attributes explicitly.
8538 (gnat_to_gnu) <N_Code_Statement>: If an operand is going to end up in
8539 memory and is a CONST_DECL, retrieve its corresponding VAR_DECL.
8541 2011-06-16 Joern Rennecke <joern.rennecke@embecosm.com>
8544 * gcc-interface/decl.c (gnat_to_gnu_param): Use pack_cumulative_args.
8546 2011-06-14 Joseph Myers <joseph@codesourcery.com>
8548 * gcc-interface/Make-lang.in (gnatbind$(exeext)): Use ggc-none.o.
8549 (ada/utils.o): Update dependencies.
8550 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Add
8551 ../../../libcpp/libcpp.a.
8552 * gcc-interface/utils.c: Include common/common-target.h.
8553 (process_attributes): Use targetm_common.have_named_sections.
8555 2011-06-07 Richard Guenther <rguenther@suse.de>
8557 * gcc-interface/misc.c (gnat_init): Do not set size_type_node or call
8560 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
8562 * gcc-interface/utils2.c (gnat_stabilize_reference): Propagate the
8563 TREE_THIS_NOTRAP flag.
8565 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
8567 * gcc-interface/utils2.c (gnat_stabilize_reference) <COMPOUND_EXPR>:
8570 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
8572 * gcc-interface/trans.c (Identifier_to_gnu): Also handle deferred
8573 constants whose full view has discriminants specially.
8575 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
8577 * gcc-interface/utils.c: Include diagnostic.h.
8578 (gnat_write_global_declarations): Output debug information for all
8579 global type declarations before finalizing the compilation unit.
8580 * gcc-interface/Make-lang.in (ada/utils.o): Add dependency.
8582 2011-05-25 Jakub Jelinek <jakub@redhat.com>
8584 * gcc-interface/utils.c (def_fn_type): Remove extra va_end.
8586 2011-05-25 Kai Tietz <ktietz@redhat.com>
8588 * adaint.c (__gnat_to_canonical_file_list_next): Use array
8589 initialization instead of const/none-const pointer assignment.
8591 2011-05-24 Joseph Myers <joseph@codesourcery.com>
8593 * gcc-interface/Make-lang.in (GNAT1_OBJS): Don't include
8594 $(EXTRA_GNAT1_OBJS).
8595 (GNATBIND_OBJS): Don't include $(EXTRA_GNATBIND_OBJS).
8596 (EXTRA_GNAT1_OBJS, EXTRA_GNATBIND_OBJS): Remove.
8597 (gnat1$(exeext), gnatbind$(exeext)): Use libcommon-target.a.
8598 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Use
8599 libcommon-target.a instead of prefix.o.
8601 2011-05-21 Joseph Myers <joseph@codesourcery.com>
8604 * gcc-interface/Make-lang.in (gnatbind$(exeext)): Depend on $(LIBDEPS).
8606 2011-05-20 Joseph Myers <joseph@codesourcery.com>
8608 * gcc-interface/Make-lang.in (EXTRA_GNATBIND_OBJS): Remove version.o.
8609 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Use libcommon.a
8610 instead of version.o.
8612 2011-05-18 Kai Tietz <ktietz@redhat.com>
8614 * gcc-interface/trans.c (Exception_Handler_to_gnu_sjlj): Use
8615 boolean_false_node instead of integer_zero_node.
8616 (convert_with_check): Likewise.
8617 * gcc-interface/decl.c (choices_to_gnu): Likewise.
8619 2011-05-12 Eric Botcazou <ebotcazou@adacore.com>
8621 * gcc-interface/trans.c (call_to_gnu): In the by-reference case, if the
8622 type of the parameter is an unconstrained array, convert the actual to
8623 the type of the formal in the In Out and Out cases as well.
8625 2011-05-11 Nathan Froyd <froydnj@codesourcery.com>
8627 * gcc-interface/utils.c (def_fn_type): Don't call build_function_type;
8628 call build_function_type_array or build_varargs_function_type_array
8630 (create_subprog_type): Don't call build_function_type; call
8631 build_function_type_vec instead.
8633 2011-05-11 Nathan Froyd <froydnj@codesourcery.com>
8635 * gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE): Use TYPE_MINVAL.
8636 (TYPE_GCC_MIN_VALUE): Use TYPE_MINVAL.
8637 (TYPE_GCC_MAX_VALUE): Use TYPE_MAXVAL.
8639 2011-05-07 Eric Botcazou <ebotcazou@adacore.com>
8641 * gcc-interface/decl.c (intrin_arglists_compatible_p): Remove spaces.
8643 * gcc-interface/gigi.h (global_bindings_p): Adjust prototype.
8644 * gcc-interface/utils.c (global_bindings_p): Return bool and simplify.
8646 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
8648 * gcc-interface/trans.c (Case_Statement_to_gnu): Call build_case_label.
8650 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
8652 * gcc-interface/decl.c (intrin_arglists_compatible_p): Use iterators
8653 instead of accessing TYPE_ARG_TYPES directly.
8654 * gcc-interface/utils.c (handle_nonnull_attribute): Likewise.
8656 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
8659 * gcc-interface/gigi.h (get_variant_part): Declare.
8660 * gcc-interface/decl.c (get_variant_part): Make global.
8661 * gcc-interface/utils2.c (find_common_type): Do not return T1 if the
8662 types have the same constant size, are record types and T1 has a
8663 variant part while T2 doesn't.
8665 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
8667 * gcc-interface/utils.c (begin_subprog_body): Do not call
8669 (end_subprog_body): Likewise.
8671 2011-05-04 Richard Guenther <rguenther@suse.de>
8673 * gcc-interface/trans.c (gnat_to_gnu): Remove zero notrunc argument to
8675 (pos_to_constructor): Likewise.
8677 2011-05-03 Nathan Froyd <froydnj@codesourcery.com>
8678 Eric Botcazou <ebotcazou@adacore.com>
8680 * gcc-interface/trans.c (gigi): Call build_function_type_list instead
8681 of build_function_type. Adjust calls to...
8682 (build_raise_check): ...this. Do not take a void_tree parameter.
8683 Call build_function_type_list instead of build_function_type.
8684 Fix head comment and swap couple of conditional blocks.
8686 2011-04-30 Eric Botcazou <ebotcazou@adacore.com>
8688 * gnatvsn.ads (Library_Version): Bump to 4.7.
8689 (Current_Year): Bump to 2011.
8691 2011-04-29 Michael Matz <matz@suse.de>
8693 * gcc-interface/misc.c (gnat_handle_option): Set
8694 warn_maybe_uninitialized.
8696 2011-04-23 Gerald Pfeifer <gerald@pfeifer.com>
8698 * gnat_ugn.texi (Complexity Metrics Control): Update link to
8699 the Watson/McCabe paper.
8701 2011-04-23 Jim Meyering <meyering@redhat.com>
8703 * gnat_ugn.texi (Examples of gnatxref Usage): Fix typo: s/it it/it is/
8705 2011-04-22 Eric Botcazou <ebotcazou@adacore.com>
8707 * gcc-interface/decl.c (make_packable_type): Copy DECL_PARALLEL_TYPE
8710 2011-04-22 Eric Botcazou <ebotcazou@adacore.com>
8712 * gcc-interface/gigi.h (create_subprog_decl): Add ARTIFICIAL_FLAG
8714 * gcc-interface/utils.c (create_subprog_decl): Likewise. Set
8715 DECL_ARTIFICIAL and DECL_NO_INLINE_WARNING_P on the DECL accordingly.
8716 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: Add
8717 ARTIFICIAL_FLAG local variable and pass it to create_subprog_decl.
8718 <all>: Do not set flags on the reused DECL node coming from an alias.
8719 Set DECL_IGNORED_P on the DECL node built for subprograms if they
8720 don't need debug info here...
8721 * gcc-interface/trans.c (Subprogram_Body_to_gnu): ...and not here.
8722 (gigi): Adjust calls to create_subprog_decl.
8723 (build_raise_check): Likewise.
8724 (establish_gnat_vms_condition_handler): Likewise.
8725 (Compilation_Unit_to_gnu): Likewise.
8726 (gnat_to_gnu): Likewise.
8728 2011-04-21 Eric Botcazou <ebotcazou@adacore.com>
8730 * gcc-interface/Makefile.in (NO_SIBLING_ADAFLAGS): Always define.
8731 (NO_REORDER_ADAFLAGS): New variable.
8732 (EXTRA_GNATTOOLS): Always define.
8733 (../stamp-gnatlib1-$(RTSDIR): Copy tsystem.h.
8734 Clean up and adjust list of files compiled with special options.
8735 * gcc-interface/Make-lang.in: Likewise.
8736 (ada/decl.o): Cosmetical change.
8737 (ada/misc.o): Remove dependency on $(PLUGIN_H).
8739 2011-04-20 Jim Meyering <meyering@redhat.com>
8741 * initialize.c (__gnat_initialize): Remove useless if-before-free.
8743 2011-04-17 Eric Botcazou <ebotcazou@adacore.com>
8745 * gcc-interface/Make-lang.in (gnatbind): Replace $(ALL_CFLAGS) with
8746 $(CFLAGS) on the link line.
8748 2011-04-17 Eric Botcazou <ebotcazou@adacore.com>
8750 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Function>: Declare the
8751 padded type built for the return type if it is unconstrained.
8753 2011-04-14 Nathan Froyd <froydnj@codesourcery.com>
8755 * gcc-interface/utils.c (gnat_poplevel): Use block_chainon.
8757 2011-04-12 Nathan Froyd <froydnj@codesourcery.com>
8759 * gcc-interface/ada-tree.h (union lang_tree_node): Check for TS_COMMON
8760 before calling TREE_CHAIN.
8761 * gcc-interface/misc.c (gnat_init_ts): New function.
8762 (LANG_HOOKS_INIT_TS): Define.
8764 2011-04-12 Martin Jambor <mjambor@suse.cz>
8766 * gcc-interface/utils.c (end_subprog_body): Call cgraph_get_create_node
8767 instead of cgraph_node.
8769 2011-04-08 Eric Botcazou <ebotcazou@adacore.com>
8771 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Procedure>: Set minimum
8772 alignment on fields of the RETURN type built for the Copy-In Copy-Out
8775 2011-04-08 Eric Botcazou <ebotcazou@adacore.com>
8777 * gcc-interface/trans.c (Identifier_to_gnu): Do not return initializers
8778 of aggregate types that contain a placeholder.
8780 2011-04-08 Nathan Froyd <froydnj@codesourcery.com>
8782 * gcc-interface/utils.c (handle_sentinel_attribute): Don't use
8784 (handle_type_generic_attribute): Likewise.
8786 2011-04-04 Eric Botcazou <ebotcazou@adacore.com>
8789 * s-oscons-tmplt.c (MSG_WAITALL): Fix thinko in previous change.
8791 2011-04-04 Kai Tietz <ktietz@redhat.com>
8794 * s-oscons-tmplt.c (MSG_WAITALL): Define it for native windows targets
8797 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8799 * gcc-interface/utils2.c (build_allocator): In the unconstrained array
8800 type case, do not strip a padding type around the array type.
8802 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8804 * gcc-interface/utils.c (update_pointer_to): Finalize named pointer
8807 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8809 * gcc-interface/lang.opt (feliminate-unused-debug-types): Delete.
8810 * gcc-interface/misc.c (gnat_handle_option): Remove special handling
8811 code for -feliminate-unused-debug-types.
8812 (gnat_post_options): Likewise.
8814 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8816 * gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
8817 declaration of a pointer type, then set DECL_ORIGINAL_TYPE to a
8820 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8822 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not force the
8823 DECL_ARTIFICIAL flag on enumeration types.
8825 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8827 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Do not make
8828 fat pointer types artificial unconditionally.
8829 <E_Array_Subtype>: Attach the base array type as a parallel type if it
8832 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8834 * gcc-interface/gigi.h (get_dummy_type): Declare.
8835 (build_dummy_unc_pointer_types): Likewise.
8836 (finish_fat_pointer_type): Likewise.
8837 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: If a dummy
8838 fat pointer type has been built, complete it in place.
8839 <E_Access_Type>: Call build_dummy_unc_pointer_types to build dummy fat
8840 and thin pointers. Remove useless variable.
8841 (finish_fat_pointer_type): Make global and move to...
8842 * gcc-interface/utils.c (finish_fat_pointer_type): ...here.
8843 (get_dummy_type): New function.
8844 (build_dummy_unc_pointer_types): Likewise.
8845 (gnat_pushdecl): Propage the name to the anonymous variants only.
8846 (update_pointer_to): Only adjust the pointer types in the unconstrained
8849 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8851 * gcc-interface/ada-tree.h (DECL_TAFT_TYPE_P): New flag.
8852 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Incomplete_Type>: Set it
8853 if this is a Taft amendment type and the full declaration is available.
8854 * gcc-interface/trans.c (process_type): Likewise.
8855 If there is an old type, mark the new one as used if DECL_TAFT_TYPE_P.
8856 (process_freeze_entity): Likewise.
8857 * gcc-interface/utils.c (dummy_global): New static variable.
8858 (gnat_write_global_declarations): If there are types declared as used
8859 at the global level, insert them in the global hash table.
8861 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8863 * gcc-interface/gigi.h (record_builtin_type): Add ARTIFICIAL_P param.
8864 * gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
8865 declaration of an array type, then set DECL_ORIGINAL_TYPE to a distinct
8867 (record_builtin_type): Add ARTIFICIAL_P parameter. Set DECL_ARTIFICIAL
8868 flag of the type accordingly.
8869 * gcc-interface/trans.c (gigi): Adjust calls to record_builtin_type.
8871 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
8873 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Defer
8874 finalizing types when updating the pointers to the designated type.
8875 <all>: Finalize the deferred types even if we didn't defer processing
8876 of incomplete types in this invocation.
8878 2011-04-01 Olivier Hainque <hainque@adacore.com>
8879 Nicolas Setton <setton@adacore.com>
8880 Eric Botcazou <ebotcazou@adacore.com>
8882 * gcc-interface/misc.c (gnat_descriptive_type): New function.
8883 (LANG_HOOKS_DESCRIPTIVE_TYPE): Redefine to gnat_descriptive_type.
8885 2011-03-28 Kai Tietz <ktietz@redhat.com>
8887 * gcc-interface/Makefile.in (SO_LIB): Handle multilib build for native
8889 (EH_MECHANISM): Use GCC exception mechanism for native Windows targets.
8890 * system-mingw.ads (System): Change ZCX_By_Default default to True.
8892 * raise-gcc.c (PERSONALITY_FUNCTION): Add prototype.
8894 2011-03-28 Tristan Gingold <gingold@adacore.com>
8897 * gcc-interface/Make-lang.in (ada/b_gnat1.adb): Replace ada/b_gnat1.c.
8898 Use ada output of gnatbind.
8899 (ada/b_gnatb.adb): Ditto.
8900 (ada/b_gnat1.o, ada/b_gnatb.o): New rules.
8901 (ada.mostlyclean, ada.stage1)
8902 (ada.stage2, ada.stage3, ada.stage4, ada.stageprofile)
8903 (ada.stagefeedback): Adjust.
8904 * gcc-interface/Makefile.in (b_gnatl.adb): Replace b_gnatl.c.
8905 Use ada output of gnatbind.
8906 (b_gnatm.adb): Ditto.
8907 (b_gnatl.o, b_gnatm.o): New rules.
8909 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
8911 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Create TYPE_DECL
8912 for the padded type built to support a specified size or alignment.
8914 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
8916 * gcc-interface/gigi.h (finalize_from_with_types): Adjust comment.
8917 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Defer
8918 unconditionally to the end of the unit when the designated type is
8920 <all>: Rename local variable. Attempt to un-defer types only and do it
8921 for limited_with'ed types as well.
8922 (finalize_from_with_types): Adjust comment. Rename variable and tidy.
8923 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Use GNAT_UNIT
8924 consistently and remove redundant call to finalize_from_with_types.
8926 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
8928 * inline.adb (Back_End_Cannot_Inline): Lift restriction on calls to
8929 subprograms without a previous spec declared in the same unit.
8930 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Process inlined
8931 subprograms at the end of the unit instead of at the beginning.
8932 * gcc-interface/utils.c (create_subprog_decl): Check that the entity
8933 isn't public for the special handling of non-inline functions nested
8934 inside inline external functions.
8936 2011-03-25 Jeff Law <law@redhat.com>
8938 * gcc-interface/utils.c (def_fn_type): Add missing va_end.
8940 2011-03-24 Eric Botcazou <ebotcazou@adacore.com>
8942 * einfo.ads (Size_Depends_On_Discriminant): Adjust description.
8943 * layout.adb (Compute_Size_Depends_On_Discriminant): New procedure
8944 to compute Set_Size_Depends_On_Discriminant.
8945 (Layout_Type): Call it on array types in back-end layout mode.
8946 * sem_util.adb (Requires_Transient_Scope): Return true for array
8947 types only if the size depends on the value of discriminants.
8948 * gcc-interface/utils2.c (build_binary_op) <MODIFY_EXPR>: Use the RHS
8949 type if the RHS is a call to a function that returns an unconstrained
8950 type with default discriminant.
8952 2011-03-24 Eric Botcazou <ebotcazou@adacore.com>
8954 * gcc-interface/trans.c (gnat_to_gnu): Remove obsolete case of
8955 non-conversion to the nominal result type at the end.
8957 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
8959 * gcc-interface/trans.c (create_temporary): New function taken from...
8960 (create_init_temporary): ...here. Call it.
8961 (call_to_gnu): Create the temporary for the return value early, if any.
8962 Create it for a function with copy-in/copy-out parameters if there is
8963 no target; in other cases of copy-in/copy-out, use another temporary.
8964 Push the new binding level lazily. Add and rename local variables.
8966 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
8968 * gcc-interface/decl.c (validate_size): Improve comments and tweak
8970 (set_rm_size): Likewise.
8972 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
8974 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Create TYPE_DECL
8975 for the padded type built in order to support a specified alignment.
8976 Fix incorrect formatting.
8978 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
8981 * gcc-interface/decl.c (elaborate_expression_1): Localize GNU_DECL.
8983 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
8985 * gcc-interface/decl.c (components_to_record): Add REORDER parameter,
8986 rename DEBUG_INFO_P into DEBUG_INFO and move P_GNU_REP_LIST parameter
8987 to the end of the list. Adjust recursive call. Rename local variable.
8988 If REORDER is true, reorder components of the record type.
8989 (gnat_to_gnu_entity): Pass OK_To_Reorder_Components flag as argument to
8990 components_to_record and adjust the parameter list.
8992 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
8994 * gcc-interface/decl.c (elaborate_expression_1): When optimization is
8995 disabled, use the variable for bounds of loop iteration scheme.
8997 2011-03-21 Kai Tietz <ktietz@redhat.com>
9000 * gcc-interface/utils.c (gnat_internal_attribute_table): Add column.
9002 2011-03-17 Eric Botcazou <ebotcazou@adacore.com>
9004 * gcc-interface/decl.c (elaborate_expression_1): Try harder to find
9005 out whether the expression is read-only. Short-circuit placeholder
9006 case and rename a couple of local variables.
9008 2011-03-17 Eric Botcazou <ebotcazou@adacore.com>
9010 * gcc-interface/gigi.h (smaller_form_type_p): Declare.
9011 * gcc-interface/trans.c (smaller_form_type_p): Make global and move...
9012 * gcc-interface/utils.c (smaller_form_type_p): ...to here.
9013 (convert): Deal with conversions from a smaller form type specially.
9015 2011-02-14 Eric Botcazou <ebotcazou@adacore.com>
9017 * gcc-interface/misc.c (gnat_init_options): Do not concatenate -I and
9018 its argument, except for the special -I- switch.
9020 2011-02-12 Gerald Pfeifer <gerald@pfeifer.com>
9022 * gnat_ugn.texi (Compiling Different Versions of Ada): Update link to
9025 2011-02-08 Eric Botcazou <ebotcazou@adacore.com>
9027 * gcc-interface/Makefile.in (x86-64 darwin): Handle multilibs.
9029 2011-02-03 Eric Botcazou <ebotcazou@adacore.com>
9031 * gcc-interface/gigi.h (fill_vms_descriptor): Take GNU_TYPE instead of
9033 * gcc-interface/utils2.c (fill_vms_descriptor): Move from here to...
9034 * gcc-interface/utils.c (fill_vms_descriptor): ...here. Take GNU_TYPE
9035 instead of GNAT_FORMAL. Protect the expression against multiple uses.
9036 Do not generate the check directly, instead instantiate the template
9037 check present in the descriptor.
9038 (make_descriptor_field): Move around.
9039 (build_vms_descriptor32): Build a template check in the POINTER field.
9040 (build_vms_descriptor): Remove useless suffixes.
9041 * gcc-interface/trans.c (call_to_gnu): Adjust fill_vms_descriptor call.
9043 2011-01-26 Eric Botcazou <ebotcazou@adacore.com>
9046 * targext.c: Include target files if IN_RTS is defined.
9048 2011-01-26 Richard Guenther <rguenther@suse.de>
9051 * targext.c: Include config.h.
9052 * gcc-interface/Make-lang.in (ada/targext.o): Add $(CONFIG_H)
9055 2011-01-04 Pascal Obry <obry@adacore.com>
9056 Eric Botcazou <ebotcazou@adacore.com>
9058 * gcc-interface/decl.c: Disable Stdcall convention handling for 64-bit.
9060 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
9062 * gcc-interface/trans.c (Case_Statement_to_gnu): Put the SLOC of the
9063 end-of-case on the end label and its associated gotos, if any.
9065 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
9067 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Evaluate the
9068 expressions of the parameter cache within the statement group of
9071 2011-01-04 Olivier Hainque <hainque@adacore.com>
9072 Eric Botcazou <ebotcazou@adacore.com>
9074 * gcc-interface/trans.c (BLOCK_SOURCE_END_LOCATION): Provide default.
9075 (set_end_locus_from_node): New function.
9076 (Subprogram_Body_to_gnu): Use it to mark both the inner BIND_EXPR we
9077 make and the function end_locus.
9078 (Compilation_Unit_to_gnu): Call it instead of a straight Sloc_to_locus
9079 for the elaboration subprogram.
9080 (set_gnu_expr_location_from_node) <default case>: Use it to attempt to
9081 set the end_locus of the expression as well.
9083 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
9086 * gcc-interface/trans.c (Identifier_to_gnu): In SJLJ mode, do not make
9087 variables that are referenced in exception handlers volatile.
9091 Copyright (C) 2011 Free Software Foundation, Inc.
9093 Copying and distribution of this file, with or without modification,
9094 are permitted in any medium without royalty provided the copyright
9095 notice and this notice are preserved.
9097 * gnat_rm.texi: Ramification of pragma Eliminate documentation
9098 - fix bugs in the description of Source_Trace;
9099 - get rid of UNIT_NAME;
9101 2011-08-02 Javier Miranda <miranda@adacore.com>
9104 (Build_Dispatching_Requeue): Adding support for VM targets
9105 since we cannot directly reference the Tag entity.
9106 * exp_sel.adb (Build_K): Adding support for VM targets.
9107 (Build_S_Assignment): Adding support for VM targets.
9109 (Default_Prim_Op_Position): In VM targets do not restrict availability
9110 of predefined interface primitives to compiling in Ada 2005 mode.
9111 (Is_Predefined_Interface_Primitive): In VM targets this service is not
9112 restricted to compiling in Ada 2005 mode.
9113 (Make_VM_TSD): Generate code that declares and initializes the OSD
9114 record. Needed to support dispatching calls through synchronized
9117 (Make_Predefined_Primitive_Specs): Enable generation of predefined
9118 primitives associated with synchronized interfaces.
9119 (Make_Predefined_Primitive_Bodies): Enable generation of predefined
9120 primitives associated with synchronized interfaces.
9122 2011-08-02 Yannick Moy <moy@adacore.com>
9124 * par-ch11.adb (P_Handled_Sequence_Of_Statements): mark a sequence of
9125 statements hidden in SPARK if preceded by the HIDE directive
9126 (Parse_Exception_Handlers): mark each exception handler in a sequence of
9127 exception handlers as hidden in SPARK if preceded by the HIDE directive
9128 * par-ch6.adb (P_Subprogram): mark a subprogram body hidden in SPARK
9129 if starting with the HIDE directive
9130 * par-ch7.adb (P_Package): mark a package body hidden in SPARK if
9131 starting with the HIDE directive; mark the declarations in a private
9132 part as hidden in SPARK if the private part starts with the HIDE
9134 * restrict.adb, restrict.ads
9135 (Set_Hidden_Part_In_SPARK): record a range of slocs as hidden in SPARK
9136 (Is_In_Hidden_Part_In_SPARK): new function which returns whether its
9137 argument node belongs to a part which is hidden in SPARK
9138 (Check_SPARK_Restriction): do not issue violations on nodes in hidden
9139 parts in SPARK; protect the possibly costly call to
9140 Is_In_Hidden_Part_In_SPARK by a check that the SPARK restriction is on
9141 * scans.ads (Token_Type): new value Tok_SPARK_Hide in enumeration
9142 * scng.adb (Accumulate_Token_Checksum_GNAT_6_3,
9143 Accumulate_Token_Checksum_GNAT_5_03): add case for new token
9145 (Scan): recognize special comment starting with '#' and followed by
9146 SPARK keyword "hide" as a HIDE directive.
9148 2011-08-02 Yannick Moy <moy@adacore.com>
9150 * types.ads, erroutc.ads: Minor reformatting.
9152 2011-08-02 Vincent Celier <celier@adacore.com>
9154 * link.c: Add response file support for cross platforms.
9156 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9158 * sem_aggr.adb (Resolve_Array_Aggregate): when copying the expression
9159 in an association, set parent field of copy before partial analysis.
9160 * sem_res.adb (Resolve_Slice): create reference to itype only when
9161 expansion is enabled.
9163 2011-08-02 Yannick Moy <moy@adacore.com>
9165 * einfo.adb, einfo.ads (Body_Is_In_ALFA, Set_Body_Is_In_ALFA): get/set
9166 for new flag denoting which subprogram bodies are in ALFA
9167 * restrict.adb, sem_ch7.adb: Update comment
9168 * sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb,
9169 sem_ch9.adb, sem_res.adb: Add calls to
9170 Current_Subprogram_Body_Is_Not_In_ALFA on unsupported constructs.
9171 * sem_ch6.adb (Analyze_Function_Return): add calls to
9172 Current_Subprogram_Body_Is_Not_In_ALFA on return statement in the
9173 middle of the body, and extended return.
9174 (Check_Missing_Return): add calls to Set_Body_Is_In_ALFA with argument
9175 False when missing return.
9176 (Analyze_Subprogram_Body_Helper): initialize the flag Body_Is_In_ALFA
9177 to True for subprograms whose spec is in ALFA. Remove later on the flag
9178 on the entity used for a subprogram body when there exists a separate
9180 * sem_util.adb, sem_util.ads (Current_Subprogram_Body_Is_Not_In_ALFA):
9181 if Current_Subprogram is not Empty, set its flag Body_Is_In_ALFA to
9182 False, otherwise do nothing.
9184 2011-08-02 Robert Dewar <dewar@adacore.com>
9186 * inline.adb, stand.ads, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
9188 2011-08-02 Yannick Moy <moy@adacore.com>
9190 * sem_ch4.ads: minor formatting.
9192 2011-08-02 Yannick Moy <moy@adacore.com>
9194 * sem_aggr.adb, err_vars.ads, sem_ch3.adb, sem_ch5.adb, sem_ch9.adb,
9195 debug.adb, sem_util.adb, sem_res.adb, sem_attr.adb, gnat1drv.adb,
9196 errout.adb, errout.ads, exp_ch6.adb, sem_ch4.adb, restrict.adb,
9197 restrict.ads, sem_ch6.adb, sem_ch8.adb, sem_ch11.adb,
9198 opt.ads: cleanup of SPARK mode
9200 2011-08-02 Yannick Moy <moy@adacore.com>
9202 * cstand.adb (Create_Standard): sets Is_In_ALFA component of standard
9204 * einfo.adb, einfo.ads (Is_In_ALFA): add flag for all entities
9205 (Is_In_ALFA, Set_Is_In_ALFA): new subprograms to access flag Is_In_ALFA
9207 (Analyze_Object_Declaration): set Is_In_ALFA flag for objects
9208 (Constrain_Enumeration): set Is_In_ALFA flag for enumeration subtypes
9209 (Constrain_Integer): set Is_In_ALFA flag for integer subtypes
9210 (Enumeration_Type_Declaration): set Is_In_ALFA flag for enumeration
9212 (Set_Scalar_Range_For_Subtype): unset Is_In_ALFA flag for subtypes with
9214 * sem_ch6.adb (Analyze_Return_Type): unset Is_In_ALFA flag for
9215 functions whose return type is not in ALFA.
9216 (Analyze_Subprogram_Specification): set Is_In_ALFA flag for subprogram
9218 (Process_Formals): unset Is_In_ALFA flag for subprograms if a
9219 parameter's type is not in ALFA.
9220 * stand.ads (Standard_Type_Is_In_ALFA): array defines which standard
9223 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9225 * sem_ch6 (Analyze_Expression_Function): treat the function as
9226 Inline_Always, and introduce a subprogram declaration for it when it is
9228 * inline.adb (Add_Inlined_Body): recognize bodies that come from
9229 expression functions, so that the back-end can determine whether they
9230 can in fact be inlined.
9231 * sem_util.adb (Is_Expression_Function): predicate to determine whether
9232 a function body comes from an expression function.
9234 2011-08-02 Gary Dismukes <dismukes@adacore.com>
9236 * sem_ch6.adb (Check_Conformance): Revise the check for nonconforming
9237 null exclusions to test Can_Never_Be_Null on the anonymous access types
9238 of the formals rather than testing the formals themselves. Exclude this
9239 check in cases where the Old_Formal is marked as a controlling formal,
9240 to avoid issuing spurious errors for bodies completing dispatching
9241 operations (due to the flag not getting set on controlling access
9242 formals in body specs).
9243 (Find_Corresponding_Spec): When checking full and subtype conformance of
9244 subprogram bodies in instances, pass Designated and E in that order, for
9245 consistency with the expected order of the formals (New_Id followed by
9248 2011-08-02 Robert Dewar <dewar@adacore.com>
9250 * sem_ch8.adb: Minor reformatting.
9252 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9254 * sem_ch8.adb (Analyze_Subprogram_Renaming): new procedure
9255 Check_Class_Wide_Actual, to implement AI05-0071, on defaulted
9256 primitive operations of class-wide actuals.
9258 2011-08-02 Javier Miranda <miranda@adacore.com>
9260 * exp_atag.ads, exp_atag.adb
9261 (Build_Common_Dispatching_Select_Statements): Remove argument Loc
9262 since its value is implicitly passed in argument Typ.
9263 * exp_disp.adb (Make_Disp_Conditional_Select_Body,
9264 Make_Disp_Timed_Select_Body): Remove Loc in calls to routine
9265 Build_Common_Dispatching_Select_Statements.
9267 2011-08-02 Robert Dewar <dewar@adacore.com>
9269 * sem_ch3.adb, exp_atag.ads, get_scos.adb, get_scos.ads,
9270 exp_disp.adb, lib-xref.adb, lib-xref.ads: Update comments.
9273 2011-08-02 Robert Dewar <dewar@adacore.com>
9275 * sem_res.adb: Minor reformatting.
9276 * sem_prag.adb: Minor reformatting.
9278 2011-08-02 Javier Miranda <miranda@adacore.com>
9280 * exp_atag.adb, exp_atags.ads
9281 (Build_Common_Dispatching_Select_Statement): Replace argument DT_Ptr
9282 by the tagged type Entity. Required to use this routine in the VM
9283 targets since we do not have available the Tag entity in the VM
9286 (Expand_N_Subprogram_Body): Do not invoke Build_VM_TSDs if package
9287 Ada.Tags has not been previously loaded.
9289 (Expand_N_Package_Declaration, Expand_N_Package_Body): Do not invoke
9290 Build_VM_TSDs if package Ada.Tags has not been previously loaded.
9292 (Enclosing_Dynamic_Scope): Add missing support to handle the full
9293 view of enclosing scopes. Required to handle enclosing scopes that
9294 are synchronized types whose full view is a task type.
9296 (Build_VM_TSDs): Minor code improvement to avoid generating and
9297 analyzing lists with empty nodes.
9298 (Make_Disp_Asynchronous_Select_Body): Add support for VM targets.
9299 (Make_Disp_Conditional_Select_Body): Add support for VM targets.
9300 (Make_Disp_Get_Prim_Op_Kind): Add support for VM targets.
9301 (Make_Disp_Timed_Select_Body): Add support for VM targets.
9302 (Make_Select_Specific_Data_Table): Add support for VM targets.
9303 (Make_VM_TSD): Generate code to initialize the SSD structure of
9306 2011-08-02 Yannick Moy <moy@adacore.com>
9308 * lib-writ.adb (Write_ALI): when ALFA mode is set, write local
9309 cross-references section in ALI.
9310 * lib-xref.adb, lib-xref.ads (Xref_Entry): add components Sub
9311 (enclosing subprogram), Slc (location of Sub) and Sun (unit number of
9313 (Enclosing_Subprogram_Or_Package): new function to return the enclosing
9314 subprogram or package entity of a node
9315 (Is_Local_Reference_Type): new function returns True for references
9316 selected in local cross-references.
9317 (Lt): function extracted from Lt in Output_References
9318 (Write_Entity_Name): function extracted from Output_References
9319 (Generate_Definition): generate reference with type 'D' for definition
9320 of objects (object declaration and parameter specification), with
9321 appropriate locations and units, for use in local cross-references.
9322 (Generate_Reference): update fields Sub, Slc and Sun. Keep newly created
9323 references of type 'I' for initialization in object definition.
9324 (Output_References): move part of function Lt and procedure
9325 Write_Entity_Name outside of the body. Ignore references of types 'D'
9326 and 'I' introduced for local cross-references.
9327 (Output_Local_References): new procedure to output the local
9328 cross-references sections.
9329 (Lref_Entity_Status): new array defining whether an entity is a local
9330 * sem_ch3.adb (Analyze_Object_Declaration): call Generate_Reference
9331 with 'I' type when initialization expression is present.
9332 * get_scos.adb, get_scos.ads: Correct comments and typos
9334 2011-08-02 Javier Miranda <miranda@adacore.com>
9336 * exp_ch6.adb (Expand_N_Subprogram_Body): Enable generation of TSDs in
9338 * exp_ch7.adb (Expand_N_Package_Body): Enable generation of TSDs in
9340 * exp_disp.adb (Build_VM_TSDs): No action needed if the runtime has no
9343 2011-08-02 Vincent Celier <celier@adacore.com>
9345 * prj-nmsc.adb (File_Found): New components Excl_File and Excl_Line
9346 (No_Space_Img): New function
9347 (Find_Excluded_Sources): When reading from a file, record the file name
9348 and the line number for each excluded source.
9349 (Mark_Excluded_Sources): When reporting an error, if the excluded
9350 sources were read from a file, include file name and line number in
9353 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9355 * sem_res.adb (Resolve_Call): implement rule in RM 12.5.1 (23.3/2).
9357 2011-08-02 Robert Dewar <dewar@adacore.com>
9359 * exp_ch7.adb exp_ch6.adb, exp_disp.adb: Minor reformatting
9361 2011-08-02 Javier Miranda <miranda@adacore.com>
9363 * exp_ch6.adb (Expand_N_Subprogram_Body): Temporarily restrict the
9364 generation of TSDs to the DOTNET compiler.
9365 * exp_ch7.adb (Expand_N_Package_Body): Temporarily restrict the
9366 generation of TSDs to the DOTNET compiler.
9368 2011-08-02 Javier Miranda <miranda@adacore.com>
9370 * exp_disp.ads (Build_VM_TSDs): Build the runtime Type Specific Data
9371 record of all the tagged types declared inside library level package
9372 declarations, library level package bodies or library level subprograms.
9373 * exp_disp.adb (Make_VM_TSD): New subprogram that builds the TSD
9374 associated with a given tagged type.
9375 (Build_VM_TSDs): New subprogram.
9376 * exp_ch6.adb (Expand_N_Subprogram_Body): Generate TSDs records of main
9377 compilation units that are subprograms.
9378 * exp_ch7.adb (Expand_N_Package_Body): Generate TSDs of main
9379 compilation units that are package bodies.
9380 (Expand_N_Package_Declaration): Generate TSDs of the main compilation
9381 units that are a package declaration or a package instantiation.
9382 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Minor code
9383 reorganization to improve the error generated by the frontend when the
9384 function Ada.Tags.Secondary_Tag is not available.
9385 * rtsfind.ads (RE_Register_TSD): New runtime entity.
9386 * exp_ch4.adb (Expand_N_Type_Conversion): Minor code cleanup.
9388 2011-08-02 Javier Miranda <miranda@adacore.com>
9390 * exp_disp.adb (Make_DT): Generate call to Check_TSD in Ada 2005 mode.
9392 2011-08-02 Robert Dewar <dewar@adacore.com>
9394 * s-imenne.ads: Minor reformatting.
9396 2011-08-02 Robert Dewar <dewar@adacore.com>
9398 * a-stunau.ads: Add pragma Suppress_Initialization for Big_String
9399 * freeze.adb (Warn_Overlay): Don't warn if initialization suppressed
9400 * s-stalib.ads: Add pragma Suppress_Initialization for Big_String
9402 2011-08-02 Robert Dewar <dewar@adacore.com>
9404 * einfo.ads (Materialize_Entity): Document this is only for renamings
9405 * exp_ch3.adb (Expand_N_Object_Declaration): Make sure we generate
9406 required debug information in the case where we transform the object
9407 declaration into a renaming declaration.
9408 * exp_ch4.adb (Expand_Concatenate): Generate debug info for result
9410 * exp_dbug.ads (Debug_Renaming_Declaration): Document setting of
9413 2011-08-02 Robert Dewar <dewar@adacore.com>
9415 * einfo.ads, einfo.adb (Suppress_Initialization): Replaces
9416 Suppress_Init_Procs.
9417 * exp_ch3.adb, exp_disp.adb, freeze.adb: Use
9418 Suppress_Initialization/Initialization_Suppressed.
9419 * gnat_rm.texi: New documentation for pragma Suppress_Initialization
9420 * sem_aux.ads, sem_aux.adb (Initialization_Suppressed): New function
9421 * sem_dist.adb: Use Suppress_Initialization/Initialization_Suppressed
9422 * sem_prag.adb: New processing for pragma Suppress_Initialization.
9424 2011-08-02 Robert Dewar <dewar@adacore.com>
9426 * gnat_rm.texi, a-tags.ads, sem_prag.adb, sem_ch12.adb, exp_disp.adb:
9429 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9431 * sem_prag.adb (Chain_PPC): Implement AI04-0230: null procedures can
9432 only have inheritable classwide pre/postconditions.
9434 2011-08-02 Javier Miranda <miranda@adacore.com>
9436 * a-tags.ads, a-tags.adb (Check_TSD): New subprogram.
9437 * rtsfind.ads (RE_Check_TSD): New runtime entity.
9438 * exp_disp.adb (Make_DT): Generate call to the new runtime routine that
9439 checks if the external tag of a type is the same as the external tag
9440 of some other declaration.
9442 2011-08-02 Thomas Quinot <quinot@adacore.com>
9444 * s-taskin.ads: Minor reformatting.
9446 2011-08-02 Emmanuel Briot <briot@adacore.com>
9448 * g-comlin.adb (Display_Help): swap the order in which it prints the
9449 short help and the general usage.
9451 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9453 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration): copy properly
9454 the aspect declarations and attach them to the generic copy for
9455 subsequent analysis.
9456 (Analyze_Subprogram_Instantiation): copy explicitly the aspect
9457 declarations of the generic tree to the new subprogram declarations.
9458 * sem_attr.adb (Check_Precondition_Postcondition): recognize
9459 conditions that apply to a subprogram instance.
9461 2011-08-02 Robert Dewar <dewar@adacore.com>
9463 * gnat_rm.texi: Clarify doc on pragma Source_File_Name[_Project].
9465 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9467 * sem_ch3.adb (Derived_Type_Declaration): When checking that a untagged
9468 private type with a tagged full view is not derived in the immediate
9469 scope of the partial view, (RM 7.3 (7)) use the scope of the base type.
9471 2011-08-02 Robert Dewar <dewar@adacore.com>
9473 * exp_ch4.adb: Minor reformatting.
9475 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9477 * sem_ch5.adb (Analyze_Loop_Statement): If the iteration scheme is an
9478 Ada2012 iterator, the loop will be rewritten during expansion into a
9479 while loop with a cursor and an element declaration. Do not analyze the
9480 body in this case, because if the container is for indefinite types the
9481 actual subtype of the elements will only be determined when the cursor
9482 declaration is analyzed.
9484 2011-08-02 Arnaud Charlet <charlet@adacore.com>
9486 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Ignore
9487 size/alignment related attributes in CodePeer_Mode.
9489 2011-08-02 Gary Dismukes <dismukes@adacore.com>
9491 * sem_ch3.adb (Check_Ops_From_Incomplete_Type): Remove call to
9492 Prepend_Element, since this can result in the operation getting the
9493 wrong slot in the full type's dispatch table if the full type has
9494 inherited operations. The incomplete type's operation will get added
9495 to the proper position in the full type's primitives
9496 list later in Sem_Disp.Check_Operation_From_Incomplete_Type.
9497 (Process_Incomplete_Dependents): Add Is_Primitive test when checking for
9498 dispatching operations, since there are cases where nonprimitive
9499 subprograms can get added to the list of incomplete dependents (such
9500 as subprograms in nested packages).
9501 * sem_ch6.adb (Process_Formals): First, remove test for being in a
9502 private part when determining whether to add a primitive with a
9503 parameter of a tagged incomplete type to the Private_Dependents list.
9504 Such primitives can also occur in the visible part, and should not have
9505 been excluded from being private dependents.
9506 * sem_ch7.adb (Uninstall_Declarations): When checking the rule of
9507 RM05-3.10.1(9.3/2), test that a subprogram in the Private_Dependents
9508 list of a Taft-amendment incomplete type is a primitive before issuing
9509 an error that the full type must appear in the same unit. There are
9510 cases where nonprimitives can be in the list (such as subprograms in
9512 * sem_disp.adb (Derives_From): Use correct condition for checking that
9513 a formal's type is derived from the type of the corresponding formal in
9514 the parent subprogram (the condition was completely wrong). Add
9515 checking that was missing for controlling result types being derived
9516 from the result type of the parent operation.
9518 2011-08-02 Yannick Moy <moy@adacore.com>
9520 * errout.adb (First_Node): minor renaming
9521 * restrict.adb (Check_Formal_Restriction): put restriction warning on
9524 2011-08-02 Yannick Moy <moy@adacore.com>
9526 * sem_res.adb (Resolve_Logical_Op): ensure N is a binary operator
9527 before accessing operands.
9528 * sem_util.adb (Is_SPARK_Initialization_Expr): follow original nodes to
9529 decide whether an initialization expression respects SPARK rules, as
9530 the plain node is the expanded one. This allows for more valid warnings
9532 * gnat_rm.texi: Minor update.
9534 2011-08-02 Arnaud Charlet <charlet@adacore.com>
9536 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Revert
9539 2011-08-02 Robert Dewar <dewar@adacore.com>
9541 * sem_ch3.adb, sem_ch4.adb: Minor reformatting.
9543 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
9545 * exp_ch5.adb (Expand_Iterator_Loop): Reformatting. Wrap the original
9546 loop statements and the element renaming declaration with a block when
9547 the element type is controlled.
9549 2011-08-02 Yannick Moy <moy@adacore.com>
9551 * sinfo.ads: Minor formatting.
9553 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9555 * sem_aggr.adb (Add_Association): if the association has a box and no
9556 expression, use the Sloc of the aggregate itself for the new
9558 * errout.adb (First_Node): Exclude nodes with no Sloc, and always use
9561 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
9563 * exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and refactoring.
9564 When a container is provided via a function call, generate a renaming
9565 of the function result. This avoids the creation of a transient scope
9566 and the premature finalization of the container.
9567 * exp_ch7.adb (Is_Container_Cursor): Removed.
9568 (Wrap_Transient_Declaration): Remove the supression of the finalization
9569 of the list controller when the declaration denotes a container cursor,
9572 2011-08-02 Yannick Moy <moy@adacore.com>
9574 * restrict.adb (Check_Formal_Restriction): only issue a warning if the
9575 node is from source, instead of the original node being from source.
9577 (Resolve_Array_Aggregate): refine the check for a static expression, to
9578 recognize also static ranges
9579 * sem_ch3.adb, sem_ch3.ads (Analyze_Component_Declaration,
9580 Array_Type_Declaration): postpone the test for the type being a subtype
9581 mark after the type has been resolved, so that component-selection and
9582 expanded-name are discriminated.
9583 (Make_Index, Process_Range_Expr_In_Decl): add a parameter In_Iter_Schm
9584 to distinguish the case of an iteration scheme, so that an error is
9585 issed on a non-static range in SPARK except in an iteration scheme.
9586 * sem_ch5.adb (Analyze_Iteration_Scheme): call Make_Index with
9587 In_Iter_Schm = True.
9588 * sem_ch6.adb (Analyze_Subprogram_Specification): refine the check for
9589 user-defined operators so that they are allowed in renaming
9591 (Find_Selected_Component): refine the check for prefixing of operators
9592 so that they are allowed in renaming. Move the checks for restrictions
9593 on selector name after analysis discriminated between
9594 component-selection and expanded-name.
9595 * sem_res.adb (Resolve_Op_Concat_Arg): do not issue a warning on
9596 concatenation argument of string type if it is static.
9597 * sem_util.adb, sem_util.ads
9598 (Check_Later_Vs_Basic_Declarations): add a new function
9599 Is_Later_Declarative_Item to decice which declarations are allowed as
9600 later items, in the two different modes Ada 83 and SPARK. In the SPARK
9601 mode, add that renamings are considered as later items.
9602 (Enclosing_Package): new function to return the enclosing package
9603 (Enter_Name): correct the rule for homonyms in SPARK
9604 (Is_SPARK_Initialization_Expr): default to returning True on nodes not
9605 from source (result of expansion) to avoid issuing wrong warnings.
9607 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9609 * errout.adb: On anything but an expression First_Node returns its
9612 2011-08-02 Pascal Obry <obry@adacore.com>
9614 * prj-proc.adb, make.adb, makeutl.adb: Minor reformatting.
9616 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
9618 * exp_ch5.adb (Expand_Iterator_Loop): Code cleanup and reorganization.
9619 Set the associated loop as the related expression of internally
9621 * exp_ch7.adb (Is_Container_Cursor): New routine.
9622 (Wrap_Transient_Declaration): Supress the finalization of the list
9623 controller when the declaration denotes a container cursor.
9625 2011-08-02 Yannick Moy <moy@adacore.com>
9627 * opt.ads (SPARK_Mode): update comment, SPARK_Mode only set through
9629 * par-ch3.adb (P_Delta_Constraint): remove check in SPARK mode that the
9630 expression is a simple expression. This check cannot be performed in
9631 the semantics, so just drop it.
9632 (P_Index_Or_Discriminant_Constraint): move check that the index or
9633 discriminant is a subtype mark to Analyze_Subtype_Declaration in the
9634 semantics. Other cases were previously checked in the semantics.
9635 * par-ch4.adb (P_Name): move checks that a selector name is not
9636 character literal or an operator symbol to Find_Selected_Component in
9638 * par-ch5.adb (Parse_Decls_Begin_End): move check that basic
9639 declarations are not placed after later declarations in a separate
9640 procedure in Sem_Util (possibly not the best choice?), to be used both
9641 during parsing, for Ada 83 mode, and during semantic analysis, for
9643 * par-endh.adb (Check_End): move check that end label is not missing
9644 to Process_End_Label in the semantics
9645 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): remove
9646 the special case for SPARK restriction
9647 * par.adb: use and with Sem_Util, for use in Parse_Decls_Begin_End
9648 * restrict.adb, restrict.ads (Check_Formal_Restriction): add a
9649 parameter Force to issue the error message even on internal node (used
9650 for generated end label). Call Check_Restriction to check when an error
9651 must be issued. In SPARK mode, issue an error message even if the
9652 restriction is not set.
9653 (Check_Restriction): new procedure with an additional out parameter to
9654 inform the caller that a message has been issued
9655 * sem_aggr.adb: Minor modification of message
9656 * sem_attr.adb (Analyze_Attribute): call Check_Formal_Restriction
9657 instead of issuing an error message directly
9658 * sem_ch3.adb (Analyze_Declarations): move here the check that basic
9659 declarations are not placed after later declarations, by calling
9660 Check_Later_Vs_Basic_Declarations
9661 (Analyze_Subtype_Declaration): move here the check that an index or
9662 discriminant constraint must be a subtype mark. Change the check that
9663 a subtype of String must start at one so that it works on subtype marks.
9664 * sem_ch4.adb (Analyze_Call): move here the check that a named
9665 association cannot follow a positional one in a call
9666 * sem_ch5.adb (Check_Unreachable_Code): call Check_Formal_Restriction
9667 instead of issuing an error message directly
9668 * sem_ch8.adb (Find_Selected_Component): move here the check that a
9669 selector name is not a character literal or an operator symbol. Move
9670 here the check that the prefix of an expanded name cannot be a
9671 subprogram or a loop statement.
9672 * sem_util.adb, sem_util.ads (Check_Later_Vs_Basic_Declarations): new
9673 procedure called from parsing and semantics to check that basic
9674 declarations are not placed after later declarations
9675 (Process_End_Label): move here the check that end label is not missing
9677 2011-08-02 Arnaud Charlet <charlet@adacore.com>
9679 * sem_ch13.adb (Analyze_Enumeration_Representation_Clause): Ignore enum
9680 representation clause in codepeer mode, since it confuses CodePeer and
9681 does not bring useful info.
9683 2011-08-02 Ed Falis <falis@adacore.com>
9685 * init.c: initialize fp hw on MILS.
9687 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9689 * errout.adb (First_Node): for bodies, return the node itself (small
9690 optimization). For other nodes, do not check source_unit if the node
9691 comes from Standard.
9693 2011-08-02 Robert Dewar <dewar@adacore.com>
9695 * exp_ch3.adb: Minor comment additions.
9696 * sem_ch13.adb: Minor reformatting.
9698 2011-08-02 Pascal Obry <obry@adacore.com>
9700 * make.adb, makeutl.adb: Removes some superfluous directory separator.
9702 2011-08-02 Robert Dewar <dewar@adacore.com>
9704 * sem_attr.adb: Minor reformatting.
9706 2011-08-02 Robert Dewar <dewar@adacore.com>
9708 * einfo.adb (Has_Default_Aspect): Replaces Has_Default_Value
9709 (Has_Default_Component_Value): Removed
9710 * einfo.ads Comment updates
9711 (Has_Default_Aspect): Replaces Has_Default_Value
9712 (Has_Default_Component_Value): Removed
9714 (Expand_N_Freeze_Entity): Handle Default[_Component]_Value aspects
9716 (Build_Array_Init_Proc): Handle Default_[Component_]Value aspects
9717 (Get_Simple_Init_Val): Handle Default_Value aspect
9718 (Needs_Simple_Initialization): Handle Default_Value aspect
9719 * exp_ch3.ads: Needs_Simple_Initialization
9720 * freeze.adb (Freeze_Entity): Handle Default_[Component_]Value aspect
9721 * par-prag.adb (Pragma_Default[_Component]Value) Removed
9723 (Analyze_Aspect_Specifications): Fix Default[_Component]_Value aspects
9724 * sem_prag.adb (Pragma_Default[_Component]Value) Removed
9725 * snames.ads-tmpl (Pragma_Default[_Component]Value) Removed
9727 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9729 * sem_ch5.adb (Analyze_Iterator_Specification): use base type to locate
9730 package containing iteration primitives.
9731 exp_ch5.adb (Expand_Iterator_Loop): ditto.
9733 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9735 * sem_ch5.adb (Analyze_Iteration_Scheme): For an Ada2012 iterator with
9736 "of", pre-analyze expression in case it is a function call with
9737 finalization actions that must be placed ahead of the loop.
9738 * exp_ch5.adb (Expand_Iterator_Loop): If condition_actions are present
9739 on an Ada2012 iterator, insert them ahead of the rewritten loop.
9741 2011-08-02 Geert Bosch <bosch@adacore.com>
9743 * cstand.adb (Create_Float_Types): Only consider C's long double for
9744 Long_Long_Float, in addition to double.
9746 2011-08-02 Robert Dewar <dewar@adacore.com>
9748 * sem_ch3.adb, sem_ch5.adb, sem_type.adb, switch-c.adb, switch-c.ads,
9749 sem_prag.adb, sem_util.adb, sem_util.ads, sem_res.adb, warnsw.ads,
9750 prepcomp.ads, cstand.adb, stand.ads, a-calfor.adb, s-stusta.adb:
9753 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9755 * sem_attr.adb: handle properly 'Result when it is a prefix of an
9758 2011-08-02 Javier Miranda <miranda@adacore.com>
9760 * einfo.ads, einfo.adb
9761 (Original_Access_Type): Move this attribute to Node26 since there was
9762 an undocumented use of Node21 in E_Access_Subprogram_Type entities
9763 which causes conflicts and breaks the generation of the .NET compiler.
9764 (Interface_Name): Add missing documentation on JGNAT only uses of
9767 2011-08-02 Geert Bosch <bosch@adacore.com>
9769 * cstand.adb (Back_End_Float_Types): Use Elist instead of Nlist
9770 (Find_Back_End_Float_Type): Likewise
9771 (Create_Back_End_Float_Types): Likewise
9772 (Create_Float_Types): Likewise
9773 (Register_Float_Type): Likewise
9774 * sem_ch3.adb (Floating_Point_Type_Declaration): Use Elist instead of
9775 Nlist and split out type selection in new local Find_Base_Type function.
9776 * sem_prag.adb (Process_Import_Predefined_Type): Use Elist instead of
9778 * stand.ads (Predefined_Float_Types): Use Elist instead of Nlist
9780 2011-08-02 Robert Dewar <dewar@adacore.com>
9782 * inline.adb: Minor code reorganization (put Get_Code_Unit_Entity in
9784 * opt.ads: Minor comment change.
9785 * sem_ch12.adb: Minor code reorganization.
9787 2011-08-02 Gary Dismukes <dismukes@adacore.com>
9789 * sem_ch3.adb (Complete_Private_Subtype): Don't append the private
9790 subtype's list of rep items to the list on the full subtype in the case
9791 where the lists are the same.
9793 2011-08-02 Geert Bosch <bosch@adacore.com>
9795 * switch-c.adb (Free): New deallocation procedure to avoid implicitly
9796 using the one from System.Strings, which also deallocates all strings.
9798 2011-08-02 Geert Bosch <bosch@adacore.com>
9800 * gcc-interface/gigi.h, gcc-interface/misc.c (enumerate_modes): New
9802 * gcc-interface/Make-lang.in: Update dependencies.
9804 2011-08-02 Olivier Hainque <hainque@adacore.com>
9806 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Set the function
9809 2011-08-02 Javier Miranda <miranda@adacore.com>
9811 * sem_ch3.adb (Check_Anonymous_Access_Components): Create extra formals
9812 associated with anonymous access to subprograms.
9814 2011-08-02 Geert Bosch <bosch@adacore.com>
9817 (Preprocessing_Symbol_Defs): Move from Prepcomp.Symbol_Definitions.
9818 (Preprocessing_Symbol_Last): Move from Prepcomp.Last_Definition.
9819 * prepcomp.adb (Symbol_Definitions, Last_Definition): Move to opt.ads
9820 (Add_Symbol_Definition): Move to switch-c.adb
9821 (Process_Command_Line_Symbol_Definitions): Adjust references to above.
9822 * prepcomp.ads: Remove dependency on Ada.Unchecked_Deallocation.
9823 (Add_Symbol_Definition): Move to switch-c.adb.
9824 * sem_ch13.adb, sem_prag.adb: Add dependency on Warnsw.
9826 (Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
9828 * sem_warn.ads (Warn_On_Record_Holes, Warn_On_Overridden_Size,
9829 Set_Dot_Warning_Switch, Set_GNAT_Mode_Warnings, Set_Warning_Switch):
9831 * switch-c.adb: Replace dependency on Prepcomp and Sem_Warn by Warnsw.
9832 (Add_Symbol_Definition): Moved from Prepcomp.
9833 * switch-c.ads: Update copyright notice. Use String_List instead of
9834 Argument_List, removing dependency on System.OS_Lib.
9836 2011-08-02 Yannick Moy <moy@adacore.com>
9838 * sem_ch3.adb (Analyze_Object_Declaration): issue an error in formal
9839 mode on initialization expression which does not respect SPARK
9841 * sem_util.adb, sem_util.ads (Is_SPARK_Initialization_Expr): determines
9842 if the tree referenced by its argument represents an initialization
9843 expression in SPARK, suitable for initializing an object in an object
9846 2011-08-02 Javier Miranda <miranda@adacore.com>
9848 * exp_ch9.adb (Expand_Access_Protected_Subprogram_Type): Link the
9849 internally generated access to subprogram with its associated protected
9851 * einfo.ads, einfo.adb (Original_Access_Type): New attribute.
9853 2011-08-02 Geert Bosch <bosch@adacore.com>
9855 * cstand.adb (Register_Float_Type): Print information about type to
9856 register, if the Debug_Flag_Dot_B is set.
9857 * debug.adb (Debug_Flag_Dot_B): Document d.b debug option.
9858 * rtsfind.ads (RE_Max_Base_Digits): New run time entity.
9859 * sem_ch3.adb (Floating_Point_Type_Declaration): Allow declarations
9860 with a requested precision of more than Max_Digits digits and no more
9861 than Max_Base_Digits digits, if a range specification is present and the
9862 Predefined_Float_Types list has a suitable type to derive from.
9863 * sem_ch3.adb (Rep_Item_Too_Early): Avoid generating error in the
9864 case of type completion with pragma Import
9866 (Process_Import_Predefined_Type): Processing to complete a type
9867 with pragma Import. Currently supports floating point types only.
9868 (Set_Convention_From_Pragma): Do nothing without underlying type.
9869 (Process_Convention): Guard against absence of underlying type,
9870 which may happen when importing incomplete types.
9871 (Process_Import_Or_Interface): Handle case of importing predefined
9872 types. Tweak error message.
9874 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
9876 * inline.adb (Add_Inlined_Body): Adjust check for library-level inlined
9877 functions to previous change. Reorganize code slightly.
9879 2011-08-02 Geert Bosch <bosch@adacore.com>
9881 * back_end.ads (Register_Type_Proc): New call back procedure type for
9882 allowing the back end to provide information about available types.
9883 (Register_Back_End_Types): New procedure to register back end types.
9884 * back_end.adb (Register_Back_End_Types): Call the back end to enumerate
9886 * cstand.adb (Back_End_Float_Types): New list for floating point types
9887 supported by the back end.
9888 (Build_Float_Type): Add extra parameter for Float_Rep_Kind.
9889 (Copy_Float_Type): New procedure to make new copies of predefined types.
9890 (Register_Float_Type): New call back procedure to populate the BEFT list
9891 (Find_Back_End_Float_Type): New procedure to find a BEFT by name
9892 (Create_Back_End_Float_Types): New procedure to populate the BEFT list.
9893 (Create_Float_Types): New procedure to create entities for floating
9894 point types predefined in Standard, and put these and any remaining
9895 BEFTs on the Predefined_Float_Types list.
9896 * stand.ads (Predefined_Float_Types): New list for predefined floating
9897 point types that do not have declarations in package Standard.
9899 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
9901 * inline.adb (Get_Code_Unit_Entity): New local function. Returns the
9902 entity node for the unit containing the parameter.
9903 (Add_Inlined_Body): Use it to find the unit containing the subprogram.
9904 (Add_Inlined_Subprogram): Likewise.
9905 * gcc-interface/Make-lang.in: Update dependencies.
9907 2011-08-02 Thomas Quinot <quinot@adacore.com>
9909 * s-stusta.adb (Print): Make sure Pos is always initialized to a
9912 2011-08-02 Geert Bosch <bosch@adacore.com>
9914 * a-calfor.adb (Image): Simplify, removing unnecessary uses of 'Image.
9916 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
9918 * sem_type.adb (Covers): Move trivial case to the top and reuse the
9919 computed value of Base_Type.
9921 2011-08-02 Yannick Moy <moy@adacore.com>
9923 * restrict.adb (Check_Restriction): issue an error for any use of
9924 class-wide, even if the No_Dispatch restriction is not set.
9925 * sem_aggr.adb: Correct typos in comments and messages in formal mode
9926 * sem_ch3.adb (Process_Full_View): issue an error in formal mode is,
9927 when completing a private extension, the type named in the private part
9928 is not the same as that named in the visible part.
9929 * sem_res.adb (Resolve_Call): issue an error in formal mode on the use
9930 of an inherited primitive operations of a tagged type or type extension
9931 that returns the tagged type.
9932 * sem_util.adb, sem_util.ads (Is_Inherited_Operation_For_Type): new
9933 function which returns True for an implicit operation inherited by the
9934 derived type declaration for the argument type.
9935 (Is_SPARK_Object_Reference): move to appropriate place in alphabetic
9938 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9940 * sem_ch5.adb (Pre_Analyze_Range): new procedure extracted from
9941 Process_Bounds, to perform analysis with expansion of a range or an
9942 expression that is the iteration scheme for a loop.
9943 (Analyze_Iterator_Specification): If domain of iteration is given by a
9944 function call with a controlled result, as is the case if call returns
9945 a predefined container, ensure that finalization actions are properly
9947 * par-ch3.adb: accept Ada2012 iterator form in P_Discrete_Range.
9949 2011-08-02 Javier Miranda <miranda@adacore.com>
9951 * sem_ch5.adb (Analyze_Iteration_Scheme): Fix typo.
9952 * gcc-interface/Make-lang.in: Update dependencies.
9954 2011-08-02 Javier Miranda <miranda@adacore.com>
9956 * sem_util.ads, sem_util.adb (Is_Variable): Add a new formal to
9957 determine if the analysis is performed using N or Original_Node (N).
9958 * exp_util.adb (Side_Effect_Free): Code cleanup since the new
9959 functionality of routine Is_Variable avoids code duplication.
9960 * checks.adb (Determine_Range): Handle temporaries generated by
9961 Remove_Side_Effects.
9963 2011-08-02 Javier Miranda <miranda@adacore.com>
9965 * exp_ch4.adb (Expand_N_Quantified_Expression): Force reanalysis and
9966 expansion of the condition. Required since the previous analysis was
9967 done with expansion disabled (see Resolve_Quantified_Expression) and
9968 hence checks were not inserted and record comparisons have not been
9971 2011-08-02 Ed Falis <falis@adacore.com>
9973 * s-taprop-vxworks.adb, s-intman-vxworks.adb, s-intman-vxworks.ads:
9976 2011-08-02 Bob Duff <duff@adacore.com>
9978 * opt.ads: Minor comment fix.
9980 2011-08-02 Bob Duff <duff@adacore.com>
9982 * sem_ch12.adb (Analyze_Package_Instantiation,
9983 Analyze_Subprogram_Instantiation): Turn off style checking while
9984 analyzing an instance. Whatever style checks that apply to the generic
9985 unit should apply, so it makes no sense to apply them in an instance.
9986 This was causing trouble when compiling an instance of a runtime
9987 unit that violates the -gnatyO switch.
9988 * stylesw.adb (Set_Style_Check_Options): "when 'O' =>" was missing from
9989 one of the two case statements, causing spurious errors.
9991 2011-08-02 Robert Dewar <dewar@adacore.com>
9993 * uname.adb: Minor reformatting.
9994 * gnatcmd.adb: Minor reformatting.
9995 * exp_attr.adb: Minor reformatting.
9997 2011-08-02 Ed Schonberg <schonberg@adacore.com>
9999 * exp_ch5.adb (Expand_N_Assignment_Statement): under restriction
10000 No_Dispatching_Calls, do not look for the Assign primitive, because
10001 predefined primitives are not created in this case.
10003 2011-08-02 Bob Duff <duff@adacore.com>
10005 * stylesw.ads: Minor comment fixes.
10007 2011-08-02 Robert Dewar <dewar@adacore.com>
10009 * freeze.adb (Add_To_Result): New procedure.
10011 2011-08-02 Jose Ruiz <ruiz@adacore.com>
10013 * exp_attr.adb (Find_Stream_Subprogram): When using a configurable run
10014 time, if the specific run-time routines for handling streams of strings
10015 are not available, use the default mechanism.
10017 2011-08-02 Arnaud Charlet <charlet@adacore.com>
10019 * s-regpat.ads: Fix typo.
10021 2011-08-02 Vincent Celier <celier@adacore.com>
10023 * prj-conf.adb (Get_Or_Create_Configuration_File): If On_Load_Config is
10024 not null, call it to create the in memory config project file without
10025 parsing an existing default config project file.
10027 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
10029 * atree.adb (Allocate_Initialize_Node): Remove useless temporaries.
10031 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10033 * sem_elim.adb: an abstract subprogram does not need an eliminate
10034 pragma for its descendant to be eliminable.
10036 2011-08-02 Ed Falis <falis@adacore.com>
10038 * init.c: revert to handling before previous checkin for VxWorks
10039 * s-intman-vxworks.adb: delete unnecessary declarations related to
10040 using Ada interrupt facilities for handling signals.
10041 Delete Initialize_Interrupts. Use __gnat_install_handler instead.
10042 * s-intman-vxworks.ads: Import __gnat_install_handler as
10043 Initialize_Interrupts.
10044 * s-taprop-vxworks.adb: Delete Signal_Mask.
10045 (Abort_Handler): change construction of mask to unblock exception
10048 2011-08-02 Jerome Guitton <guitton@adacore.com>
10050 * a-except-2005.adb (Raise_From_Signal_Handler): Call
10051 Debug_Raise_Exception before propagation starts.
10053 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
10055 * exp_ch6.adb (Expand_Call): Guard restriction checks with a call
10056 to Restriction_Check_Required.
10057 * sem_ch3.adb (Analyze_Object_Declaration): Likewise.
10058 * sem_res.adb (Resolve_Call): Likewise.
10059 * sem_attr.adb (Check_Stream_Attribute): Likewise.
10061 2011-08-02 Bob Duff <duff@adacore.com>
10063 * stylesw.ads: Update comment.
10064 * style.adb: Minor: Use Error_Msg_NE instead of Error_Msg_N.
10065 * errout.ads: Remove obsolete comment.
10067 2011-08-02 Javier Miranda <miranda@adacore.com>
10069 * einfo.ads, einfo.adb (Is_Safe_To_Reevaluate): new function.
10070 (Set_Is_Safe_To_Reevaluate): new procedure.
10071 * sem_ch5.adb (Analyze_Assignment): Add one assertion to ensure that no
10072 assignment is allowed on safe-to-reevaluate variables.
10073 (Analyze_Iteration_Schine.Process_Bounds.One_Bound): Decorate the
10074 temporary created to remove side effects in expressions that use
10075 the secondary stack as safe-to-reevaluate.
10076 * exp_util.adb (Side_Effect_Free): Add missing code to handle well
10077 variables that are not true constants.
10079 2011-08-02 Robert Dewar <dewar@adacore.com>
10081 * sem_ch5.adb, sem_ch7.adb, einfo.ads, sem_util.adb, sem_util.ads,
10082 sem_res.adb, sem_ch6.adb: Minor reformatting.
10084 2011-08-02 Jerome Guitton <guitton@adacore.com>
10086 * a-except-2005.adb (Raise_Current_Excep): Remove obsolete dead code.
10088 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10090 * sem_ch6.adb (New_Overloaded_Entity, Check_Overriding_Indicator): Do
10091 not set Overridden_Operation if subprogram is an initialization
10094 2011-08-02 Yannick Moy <moy@adacore.com>
10096 * par-ch6.adb: Correct obsolete name in comments
10097 * restrict.adb, restrict.ads (Check_Formal_Restriction): new function
10098 which takes two message arguments (existing function takes one), with
10099 second message used for continuation.
10100 * sem_ch5.adb (Analyze_Block_Statement): in formal mode, only reject
10101 block statements that originate from a source block statement, not
10102 generated block statements
10103 * sem_ch6.adb (Analyze_Function_Call): rename L into Actuals, for
10104 symmetry with procedure case
10105 * sem_ch7.adb (Check_One_Tagged_Type_Or_Extension_At_Most): new
10106 function to issue an error in formal mode if a package specification
10107 contains more than one tagged type or type extension.
10108 * sem_res.adb (Resolve_Actuals): in formal mode, check that actual
10109 parameters matching formals of tagged types are objects (or ancestor
10110 type conversions of objects), not general expressions. Issue an error
10111 on view conversions that are not involving ancestor conversion of an
10113 (Resolve_Type_Conversion): in formal mode, issue an error on the
10114 operand of an ancestor type conversion which is not an object
10115 * sem_util.adb, sem_util.ads (Find_Actual): extend the behavior of the
10116 procedure so that it works also for actuals of function calls
10117 (Is_Actual_Tagged_Parameter): new function which determines if its
10118 argument is an actual parameter of a formal of tagged type in a
10120 (Is_SPARK_Object_Reference): new function which determines if the tree
10121 referenced by its argument represents an object in SPARK
10123 2011-08-02 Robert Dewar <dewar@adacore.com>
10125 * sem_ch3.adb: Minor reformatting
10126 Minor comment addition
10127 Minor error msg text change
10129 2011-08-02 Javier Miranda <miranda@adacore.com>
10131 * sem_ch5.adb (Analyze_Iteration_Scheme.Uses_Secondary_Stack): New
10132 function. Used to be more precise when we generate a variable plus one
10133 assignment to remove side effects in the evaluation of the Bound
10135 (Analyze_Iteration_Scheme): Clean attribute analyzed in all the nodes
10136 of the bound expression to force its re-analysis and thus expand the
10137 associated transient scope (if required). Code cleanup replacing the
10138 previous code that declared the constant entity by an invocation to
10139 routine Force_Evaluation which centralizes this work in the frontend.
10141 2011-08-02 Robert Dewar <dewar@adacore.com>
10143 * einfo.adb (Is_Base_Type): Improve efficiency by using a flag table
10144 (Base_Type): Now uses improved Is_Base_Type function
10145 * einfo.ads (Base_Type): Inline this function
10147 2011-08-02 Robert Dewar <dewar@adacore.com>
10149 * sem_prag.adb (Analyze_Pragma): Defend against infinite recursion
10150 (Analyze_Aspect_Specifications): Fix Sloc values for constructed pragmas
10152 2011-08-02 Arnaud Charlet <charlet@adacore.com>
10154 * gcc-interface/Make-lang.in: Update dependencies.
10155 * gcc-interface/Makefile.in: Use s-inmapop-vxworks.adb for all VxWorks
10158 2011-08-02 Yannick Moy <moy@adacore.com>
10160 * par-ch3.adb (P_Delta_Constraint): issue an error in formal mode on
10161 non-simple expression used in delta constraint
10162 (P_Index_Or_Discriminant_Constraint): issue an error in formal mode on
10163 index constraint which is not a subtype mark
10164 * par.adb: With and use Restrict
10165 * sem_ch3.adb (Analyze_Component_Declaration): issue an error in formal
10166 mode on component type which is not a subtype mark and default
10167 expression on component
10168 (Analyze_Subtype_Declaration): issue an error in formal mode on subtype
10169 of string which does not have a lower index bound equal to 1
10170 (Array_Type_Declaration): issue an error in formal mode on index or
10171 component type which is not a subtype mark, and on aliased keyword on
10173 (Derived_Type_Declaration): issue an error in formal mode on interface,
10174 limited or abstract type
10175 (Record_Type_Declaration): issue an error in formal mode on interface
10176 (Record_Type_Definition): issue an error in formal mode on tagged types
10177 and type extensions not declared in the specification of a library unit
10178 package; on null non-tagged record; on variant part
10180 2011-08-02 Vincent Celier <celier@adacore.com>
10182 * prj-nmsc.adb (Check_Library_Attributes): Do not report Library_Dir
10183 not declared for qualified library project when Library_Name is not
10184 declared, but Library_Dir is.
10186 2011-08-02 Robert Dewar <dewar@adacore.com>
10188 * sem_ch13.adb (Analyze_Aspect_Specification): Fix slocs on generated
10189 pragmas (affects aspects [Component_]Default_Value
10190 (Check_Aspect_At_Freeze_Point): For Component_Default_Value, use
10191 component type for the resolution
10193 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
10195 * einfo.adb (Base_Type): Tune implementation for speed.
10197 2011-08-02 Robert Dewar <dewar@adacore.com>
10199 * freeze.adb: Minor reformatting.
10201 2011-08-02 Thomas Quinot <quinot@adacore.com>
10203 * scos.ads: Update comments.
10205 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10207 * sem_ch3.adb (Build_Derived_Type): Inherit the convention from the
10208 base type, because the parent may be a subtype of a private type whose
10209 convention is established in a private part.
10211 2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
10213 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Wrap the return
10214 statement in a block when the expansion of the return expression has
10215 created a finalization chain.
10216 * freeze.adb (Freeze_Expression): Alphabetize all choices associated
10217 with the parent node.
10218 Add N_Extended_Return_Statement to handle the case where a transient
10219 object declaration appears in the Return_Object_Declarations list of
10220 an extended return statement.
10222 2011-08-02 Matthew Gingell <gingell@adacore.com>
10224 * adaint.c (__gnat_is_symbolic_link_attr): Supress warning on possibly
10225 unused parameter 'name'.
10227 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10229 * sem_elim.adb (Set_Eliminated): If the overridden operation is an
10230 inherited operation, check whether its alias, which is the source
10231 operastion that it renames, has been marked eliminated.
10233 2011-08-02 Javier Miranda <miranda@adacore.com>
10235 * exp_util.adb (Safe_Prefixed_Reference): Do not consider safe an
10236 in-mode parameter whose type is an access type since it can be used to
10237 modify its designated object. Enforce code that handles as safe an
10238 access type that is not access-to-constant but it is the result of a
10239 previous removal of side-effects.
10240 (Remove_Side_Effects): Minor code reorganization of cases which require
10241 no action. Done to incorporate documentation on new cases uncovered
10242 working in this ticket: no action needed if this routine was invoked
10243 too early and the nodes are not yet decorated.
10244 * sem_res.adb (Resolve_Slice): Minor code cleanup replacling two calls
10245 to routine Remove_Side_Effects by calls to Force_Evaluation since they
10246 were issued with actuals that are implicitly provided by
10249 2011-08-02 Robert Dewar <dewar@adacore.com>
10251 * sem_ch3.adb, sem_res.adb: Minor reformatting.
10253 2011-08-02 Yannick Moy <moy@adacore.com>
10255 * sem_attr.adb (Check_Formal_Restriction_On_Attribute): new procedure
10256 to issue an error in formal mode on attribute not supported in this mode
10257 (Analyze_Attribute): issue errors on standard attributes not supported
10259 * sem_ch3.adb (Modular_Type_Declaration): remove obsolete part of
10260 comment, and issue error in formal mode on modulus which is not a power
10262 (Process_Range_Expr_In_Decl): issue error in formal mode on non-static
10264 * sem_ch8.adb (Find_Type): issue error in formal mode on 'Base in
10266 * sem_res.adb (Resolve_Unary_Op): issue error in formal mode on unary
10267 operator on modular type (except 'not').
10269 2011-08-02 Robert Dewar <dewar@adacore.com>
10271 * gnat_rm.texi: Minor reformatting.
10273 2011-08-02 Arnaud Charlet <charlet@adacore.com>
10275 * s-osinte-linux.ads: Minor comment update and reformatting.
10276 * i-cexten.ads: Make this unit pure, as for its parent.
10277 Will allow its usage in more contexts if needed.
10279 2011-08-02 Robert Dewar <dewar@adacore.com>
10281 * s-utf_32.ads: Minor comment fix.
10283 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10285 * sem_res.adb (Resolve_Actuals): if the subprogram is a primitive
10286 operation of a tagged synchronized type, handle the case where the
10287 controlling argument is overloaded.
10289 2011-08-02 Yannick Moy <moy@adacore.com>
10291 * gnat_rm.texi, opt.ads, sem_prag.adb, snames.ads-tmpl:
10292 Replace pragma SPARK_95 with pragma Restrictions (SPARK)
10293 * par-prag.adb (Process_Restrictions_Or_Restriction_Warnings): set
10294 SPARK mode and formal verification mode on processing SPARK restriction
10295 * s-rident.ads (Restriction_Id): add SPARK restriction in those not
10296 requiring consistency checking.
10298 2011-08-02 Robert Dewar <dewar@adacore.com>
10300 * sem_res.adb: Minor reformatting.
10302 2011-08-02 Robert Dewar <dewar@adacore.com>
10304 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
10305 a-cforse.ads: Remove unneeded with of Ada.Containers
10306 Remove commented out pragma Inline's
10307 Move specifications of new subprograms to the actual specs
10309 2011-08-02 Yannick Moy <moy@adacore.com>
10311 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
10312 a-cforse.ads: Update comments.
10314 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10316 * sem_attr.adb: add attribute name when 'Result has the wrong prefix.
10318 2011-08-02 Robert Dewar <dewar@adacore.com>
10320 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads,
10321 a-cforse.ads, a-cofove.ads: Minor reformatting.
10323 2011-08-02 Claire Dross <dross@adacore.com>
10325 * a-cfdlli.ads, a-cfhase.ads, a-cforma.ads, a-cfhama.ads, a-cforse.ads,
10326 a-cofove.ads: Add comments.
10328 2011-08-02 Yannick Moy <moy@adacore.com>
10330 * gnat_rm.texi: Document formal containers.
10332 2011-08-02 Emmanuel Briot <briot@adacore.com>
10334 * g-comlin.adb (Goto_Section, Getopt): fix handling of "*" when there
10335 are empty sections.
10337 2011-08-02 Robert Dewar <dewar@adacore.com>
10339 * mlib-prj.adb, restrict.ads, sem_aggr.adb, sem_ch12.adb: Minor
10342 2011-08-02 Robert Dewar <dewar@adacore.com>
10344 * aspects.adb: New aspects Default_Value and Default_Component_Value
10345 New format of Aspect_Names table checks for omitted entries
10346 * aspects.ads: Remove mention of Aspect_Cancel and add documentation on
10347 handling of boolean aspects for derived types.
10348 New aspects Default_Value and Default_Component_Value
10349 New format of Aspect_Names table checks for omitted entries
10350 * einfo.ads, einfo.adb (Has_Default_Component_Value): New flag
10351 (Has_Default_Value): New flag
10352 (Has_Default_Component_Value): New flag
10353 (Has_Default_Value): New flag
10354 * par-ch13.adb (P_Aspect_Specifications): New format of Aspect_Names
10356 * par-prag.adb: New pragmas Default_Value and Default_Component_Value
10357 * sem_ch13.adb (Analyze_Aspect_Specifications): New aspects
10358 Default_Value and Default_Component_Value
10359 * sem_prag.adb: New pragmas Default_Value and Default_Component_Value
10360 New aspects Default_Value and Default_Component_Value
10361 * snames.ads-tmpl: New pragmas Default_Value and Default_Component_Value
10362 * sprint.adb: Print N_Aspect_Specification node when called from gdb
10364 2011-08-02 Vincent Celier <celier@adacore.com>
10366 * prj-nmsc.adb (Check_Library_Attributes): For virtual library project,
10367 inherit library kind.
10369 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10371 * sem_res.adb: Add guards in calls to Matching_Static_Array_Bounds.
10372 Minor reformatting.
10374 2011-08-02 Robert Dewar <dewar@adacore.com>
10376 * i-cstrin.ads: Updates to make Interfaces.C.Strings match RM
10378 2011-08-02 Yannick Moy <moy@adacore.com>
10380 * sem_aggr.adb (Resolve_Aggregate): Fix thinko.
10382 2011-08-02 Robert Dewar <dewar@adacore.com>
10384 * impunit.adb: Add comment.
10386 2011-08-02 Yannick Moy <moy@adacore.com>
10388 * sem_aggr.adb (Check_Qualified_Aggregate): new procedure which checks
10389 qualification of aggregates in formal mode
10390 (Is_Top_Level_Aggregate): returns True for an aggregate not contained in
10392 (Resolve_Aggregate): complete the test that an aggregate is adequately
10393 qualified in formal mode
10395 2011-08-02 Pascal Obry <obry@adacore.com>
10397 * make.adb, bindgen.adb, gnatbind.adb: Minor reformatting.
10398 * mlib-prj.adb: Supress warning when compiling binder generated file.
10399 (Build_Library): Supress all warnings when compiling the binder
10402 2011-08-02 Yannick Moy <moy@adacore.com>
10404 * errout.adb, errout.ads (Check_Formal_Restriction): move procedure
10406 * restrict.adb, restrict.ads (Check_Formal_Restriction): ...to here
10407 * sem_aggr.adb, sem_ch5.adb, sem_util.adb:
10408 Add with/use clauses to make Check_Formal_Restriction visible
10410 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10412 * sem_ch12.adb (Check_Generic_Actuals): handle properly actual
10413 in-parameters when type of the generic formal is private in the generic
10414 spec and non-private in the body.
10416 2011-08-02 Claire Dross <dross@adacore.com>
10418 * a-cfdlli.adb, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfhama.adb,
10419 a-cfhama.ads, a-cforse.adb, a-cforse.ads, a-cforma.adb, a-cforma.ads,
10420 a-cofove.adb, a-cofove.ads: New files implementing formal containers.
10421 * impunit.adb, Makefile.rtl: Take new files into account.
10423 2011-08-02 Robert Dewar <dewar@adacore.com>
10425 * sem_aggr.adb, sem_ch3.adb, sem_ch5.adb, make.adb, sem_res.adb,
10426 sem_attr.adb, sem_ch6.adb, sem_ch8.adb: Minor reformatting.
10428 2011-08-02 Yannick Moy <moy@adacore.com>
10430 * sem_aggr.adb (Resolve_Aggregate): disable incorrectly placed check in
10432 * sem_util.adb (Matching_Static_Array_Bounds): proper detection of
10433 matching static array bounds, taking into account the special case of
10435 * sem_ch3.adb: Typo in comment.
10437 2011-08-02 Yannick Moy <moy@adacore.com>
10439 * errout.adb, errout.ads (Check_Formal_Restriction): new procedure
10440 which issues an error in formal mode if its argument node is originally
10442 * sem_ch3.adb (Analyze_Full_Type_Declaration): move test that a type
10443 has a discriminant specification so that it does not include the case
10445 (Derived_Type_Declaration): move here the test that a derived type has a
10446 discriminant specification
10447 * sem_aggr.adb (Resolve_Record_Aggregate): test the presence of the
10448 first element of a component association before accessing its choices
10449 (presence of component association is not enough)
10450 * exp_ch6.adb (Expand_N_Subprogram_Declaration): test if a subprogram
10451 declaration is a library item before accessing the next element in a
10452 list, as library items are not member of lists
10453 * sem_attr.adb, sem_ch11.adb, sem_ch4.adb, sem_ch5.adb, sem_ch6.adb,
10454 sem_ch8.adb, sem_ch9.adb, sem_res.adb, sem_util.adb: use
10455 Check_Formal_Restriction whenever possible.
10457 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10459 * sem_ch3.adb (Find_Type_Of_Object): In ASIS mode, create an itype
10460 reference when needed.
10462 2011-08-02 Bob Duff <duff@adacore.com>
10464 * gnat_ugn.texi: Fix typo.
10466 2011-08-02 Vincent Celier <celier@adacore.com>
10468 * make.adb (Gnatmake): Use MLib.Tgt.Archive_Ext as the extension of
10469 archive file name. Do not use the full path name of archives for Open
10472 2011-08-02 Robert Dewar <dewar@adacore.com>
10474 * sem_ch12.adb, sem_ch11.adb: New calling sequence for
10475 Analyze_Aspect_Specifications
10477 (Analyze_Aspect_Specifications): New handling for boolean aspects
10478 * sem_ch13.ads (Analyze_Aspect_Specifications): New calling sequence
10479 * sem_ch3.adb, sem_ch6.adb, sem_ch7.adb, sem_ch9.adb: New calling
10480 sequence for Analyze_Aspect_Specifications
10481 * sem_prag.adb (Analyze_Pragma): Remove use of Aspect_Cancel entirely
10482 * sinfo.ads, sinfo.adb (Aspect_Cancel): Remove, no longer used
10484 2011-08-02 Robert Dewar <dewar@adacore.com>
10486 * freeze.adb (Freeze_Entity): Remove handling of delayed boolean
10487 aspects, since these no longer exist.
10489 2011-08-02 Robert Dewar <dewar@adacore.com>
10491 * par-ch13.adb (Aspect_Specifications_Present): Always return false on
10492 semicolon, do not try to see if there are aspects following it.
10493 * par-ch3.adb (P_Declarative_Items): Better message for unexpected
10496 2011-08-02 Robert Dewar <dewar@adacore.com>
10498 * sem_ch8.adb, aspects.ads: Minor reformatting.
10500 2011-08-02 Eric Botcazou <ebotcazou@adacore.com>
10502 * sem_ch13.ads (Analyze_Aspect_Specification): Add pragma Inline.
10503 * sem_ch13.adb (Analyze_Non_Null_Aspect_Specifications): New procedure
10505 (Analyze_Aspect_Specifications): ...here. Call above procedure.
10507 2011-08-02 Yannick Moy <moy@adacore.com>
10509 * exp_ch6.adb (Expand_N_Subprogram_Declaration): issue error in formal
10510 mode on subprogram declaration outside of package specification, unless
10511 it is followed by a pragma Import
10512 * sem_ch3.adb (Access_Definition, Access_Subprogram_Declaration,
10513 Access_Type_Declaration): issue error in formal mode on access type
10514 (Analyze_Incomplete_Type_Decl): issue error in formal mode on
10516 (Analyze_Object_Declaration): issue error in formal mode on object
10517 declaration which does not respect SPARK restrictions
10518 (Analyze_Subtype_Declaration): issue error in formal mode on subtype
10519 declaration which does not respect SPARK restrictions
10520 (Constrain_Decimal, Constrain_Float, Constrain_Ordinary_Fixed): issue
10521 error in formal mode on digits or delta constraint
10522 (Decimal_Fixed_Point_Type_Declaration): issue error in formal mode on
10523 decimal fixed point type
10524 (Derived_Type_Declaration): issue error in formal mode on derived type
10525 other than type extensions of tagged record types
10526 * sem_ch6.adb (Process_Formals): remove check in formal mode, redundant
10527 with check on access definition
10528 * sem_ch9.adb (Analyze_Protected_Definition): issue error in formal
10529 mode on protected definition.
10530 (Analyze_Task_Definition): issue error in formal mode on task definition
10532 2011-08-02 Robert Dewar <dewar@adacore.com>
10534 * make.adb, sem_ch8.adb, s-inmaop-vxworks.adb: Minor reformatting.
10536 2011-08-02 Javier Miranda <miranda@adacore.com>
10538 * sem_ch6.adb (Can_Override_Operator): New function.
10539 (Verify_Overriding_Indicator): Add missing code to check overriding
10540 indicator in operators. Fixes regression.
10541 (Check_Overriding_Indicator): Minor reformating after replacing the
10542 code that evaluates if the subprogram can override an operator by
10543 invocations to the above new function.
10545 (Write_Field26_Name): Add missing code to ensure that, following
10546 the documentation in einfo.ads, this field is not shown as attribute
10547 "Static_Initialization" on non-dispatching functions.
10549 2011-08-02 Jose Ruiz <ruiz@adacore.com>
10551 * sem_res.adb (Resolve_Call): A call to
10552 Ada.Real_Time.Timing_Events.Set_Handler violates restriction
10553 No_Relative_Delay (AI-0211) only when it sets a relative timing event,
10554 i.e., when the second parameter is of type Time_Span.
10556 2011-08-02 Vincent Celier <celier@adacore.com>
10558 * make.adb (Gnatmake): use <library dir>/lib<library name>.a to link
10559 with an archive instead of -L<library dir> -l<library name>.
10561 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10563 * sem_ch8.adb (Analyze_Use_Type): If the clause is being re-analyzed,
10564 mark the base types In_Use in addition to making the operations
10567 2011-08-02 Ed Falis <falis@adacore.com>
10569 * init.c: add and setup __gnat_signal_mask for the exception signals
10570 * s-inmaop-vxworks.adb: new file.
10571 * s-intman-vxworks.adb: remove unnecessary initializations and
10573 * s-intman-vxworks.ads: remove unnecessary variable
10574 * s-taprop-vxworks.adb: simplify signal initialization
10576 2011-08-02 Robert Dewar <dewar@adacore.com>
10578 * sem_ch8.adb: Minor code reorganization, comment updates.
10580 2011-08-02 Robert Dewar <dewar@adacore.com>
10582 * sem_res.adb (Matching_Static_Array_Bounds): Moved to Sem_Util
10583 * sem_util.ads, sem_util.adb (Matching_Static_Array_Bounds): Moved
10585 (Matching_Static_Array_Bounds): Use Is_Ok_Static_Expression
10586 (Matching_Static_Array_Bounds): Moved here from Sem_Res
10588 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10590 * atree.h, atree.ads, atree.adb: New subprograms to manipulate Elist5.
10591 * par_ch8.adb (P_Use_Type): initialize Used_Operations for node.
10592 * sinfo.ads, sinfo.adb (Used_Operations): new attribute of
10593 use_type_clauses, to handle more efficiently use_type and use_all_type
10595 * sem_ch8.adb: Rewrite Use_One_Type and End_Use_Type to handle the
10596 Ada2012 Use_All_Type clause.
10597 (Use_Class_Wide_Operations): new procedure.
10599 2011-08-02 Robert Dewar <dewar@adacore.com>
10601 * exp_util.adb, par-ch10.adb, par-ch6.adb, sem.adb, sem_ch6.adb,
10602 sem_ch6.ads, sinfo.adb, sinfo.ads, sprint.adb: Change parameterized
10603 expression to expression function.
10605 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10607 * sem_ch4.adb: transform simple Ada2012 membership into equality only
10608 if types are compatible.
10610 2011-08-02 Yannick Moy <moy@adacore.com>
10612 * sem_res.adb (Matching_Static_Array_Bounds): new function which
10613 returns True if its argument array types have same dimension and same
10614 static bounds at each index.
10615 (Resolve_Actuals): issue an error in formal mode on actuals passed as
10616 OUT or IN OUT paramaters which are not view conversions in SPARK.
10617 (Resolve_Arithmetic_Op): issue an error in formal mode on
10618 multiplication or division with operands of fixed point types which are
10619 not qualified or explicitly converted.
10620 (Resolve_Comparison_Op): issue an error in formal mode on comparisons of
10621 Boolean or array type (except String) operands.
10622 (Resolve_Equality_Op): issue an error in formal mode on equality
10623 operators for array types other than String with non-matching static
10625 (Resolve_Logical_Op): issue an error in formal mode on logical operators
10626 for array types with non-matching static bounds. Factorize the code in
10627 Matching_Static_Array_Bounds.
10628 (Resolve_Qualified_Expression): issue an error in formal mode on
10629 qualified expressions for array types with non-matching static bounds.
10630 (Resolve_Type_Conversion): issue an error in formal mode on type
10631 conversion for array types with non-matching static bounds
10633 2011-08-02 Robert Dewar <dewar@adacore.com>
10635 * par-ch10.adb: Minor code reorganization (use Nkind_In).
10637 2011-08-02 Ed Schonberg <schonberg@adacore.com>
10639 * par-ch9.adb: save location of entry for proper error message.
10641 2011-08-02 Javier Miranda <miranda@adacore.com>
10643 * sem_type.ads, sem_type.adb (Is_Ancestor): Addition of a new formal
10644 (Use_Full_View) which permits this routine to climb through the
10645 ancestors using the full-view of private parents.
10646 * sem_util.adb (Collect_Interfaces_Info, Implements_Interface): Set
10647 Use_Full_View to true in calls to Is_Ancestor.
10648 * sem_disp.adb (Override_Dispatching_Operation): Set Use_Full_View to
10649 true in call to Is_Ancestor.
10650 * exp_ch3.adb (Build_Offset_To_Top_Functions, Initialize_Tag): Set
10651 Use_Full_View to true in call to Is_Ancestor.
10652 * exp_ch7.adb (Controller_Component): Set Use_Full_View to true in
10653 call to Is_Ancestor.
10654 * exp_ch4.adb (Expand_N_Type_Conversion, Tagged_Membership): Set
10655 Use_Full_View to true in calls to Is_Ancestor.
10656 * exp_disp.adb (Expand_Interface_Actuals, Make_Secondary_DT, Make_DT,
10657 Make_Select_Specific_Data_Table, Register_Primitive,
10658 Set_All_DT_Position): Set Use_Full_View to true in calls to Is_Ancestor.
10659 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Set Use_Full_View
10660 to true in call to Is_Ancestor.
10661 * exp_util.adb (Find_Interface_ADT, Find_Interface_Tag): Set
10662 Use_Full_View to true in calls to Is_Ancestor.
10664 (Write_Call_Info): Set Use_Full_View to true in call to Is_Ancestor.
10665 (Write_Type_Info): Set Use_Full_View to true in call to Is_Ancestor.
10667 2011-08-02 Robert Dewar <dewar@adacore.com>
10669 * gnat_rm.texi: Minor reformatting.
10670 * sem_prag.adb: Minor reformatting.
10672 2011-08-02 Tristan Gingold <gingold@adacore.com>
10674 * vms_data.ads: Add VMS qualifier for -gnateP.
10676 2011-08-02 Robert Dewar <dewar@adacore.com>
10678 * par-ch13.adb (P_Aspect_Specification): New meaning of Decl = Empty
10679 * par-ch7.adb (P_Package): Proper placement of aspects for package
10680 decl/instantiation.
10681 * par-endh.adb (Check_End): Ad Is_Sloc parameter
10682 (End_Statements): Add Is_Sloc parameterr
10683 * par.adb (P_Aspect_Specification): New meaning of Decl = Empty
10684 (Check_End): Ad Is_Sloc parameter
10685 (End_Statements): Add Is_Sloc parameterr
10687 2011-08-02 Vincent Celier <celier@adacore.com>
10689 * ug_words: Add VMS qualifier equivalent to -gnateP:
10690 /SYMBOL_PREPROCESSING.
10692 2011-08-02 Jose Ruiz <ruiz@adacore.com>
10694 * gnat-style.texi: For hexadecimal numeric literals the typical
10695 grouping of digits is 4 to represent 2 bytes.
10696 A procedure spec which is split into several lines is indented two
10699 2011-08-02 Yannick Moy <moy@adacore.com>
10701 * exp_aggr.adb (Is_Others_Aggregate): move function to other unit.
10702 * sem_aggr.adb, sem_aggr.ads (Is_Others_Aggregate): move function here
10703 (Resolve_Aggregate): issue errors in formal modes when aggregate is not
10705 (Resolve_Array_Aggregate): issue errors in formal modes on non-static
10706 choice in array aggregate
10707 (Resolve_Extension_Aggregate): issue errors in formal modes on subtype
10709 (Resolve_Record_Aggregate): issue errors in formal modes on mixed
10710 positional and named aggregate for record, or others in record
10711 aggregate, or multiple choice in record aggregate
10712 * sem_res.adb (Resolve_Logical_Op): issue errors in formal mode when
10713 array operands to logical operations AND, OR and XOR do not have the
10714 same static lower and higher bounds
10715 * sem_ch5.adb, sinfo.ads: Correct typos in comments
10717 2011-08-01 Robert Dewar <dewar@adacore.com>
10719 * sem_util.ads, sem_util.adb, sem_ch6.adb (Last_Source_Statement):
10720 Replaces Last_Source_Node_In_Sequence.
10721 * err_vars.ads (Error_Msg_Lang): 16 is OK, don't need 4K
10722 * errout.adb (Set_Error_Msg_Lang): Takes arg with no parens, but stores
10723 parens and blank in string (this was inconsistently implemented).
10725 (Set_Error_Msg_Lang): Takes arg with no parens, but stores parens and
10726 blank in string (this was inconsistently implemented).
10728 (Set_Global_Switches): Set formal mode switches appropriately
10729 * opt.ads, opt.adb: Formal mode is now global switches, more consistent
10731 (Analyze_Pragma, case SPARK_95): Set opt switches appropriately and
10732 call Set_Error_Msg_Lang to set "spark" as language name.
10733 * par.adb: Remove unnecessary call to set formal language for errout
10734 * sem_prag.adb (P_Pragma, case SPARK_95): Set opt switches
10735 appropriately and call Set_Error_Msg_Lang to set "spark" as language
10737 * sem_ch4.adb (Analyze_Concatenation_Operand): remove procedure and
10738 calls to it, moved after resolution so that types are known
10739 * sem_res.adb (Resolve_Op_Concat): issue an error in formal mode if
10740 result of concatenation is not of type String
10741 (Resolve_Op_Concat_Arg): issue an error in formal mode if an operand of
10742 concatenation is not properly restricted
10743 * gnat_rm.texi: Add doc on pragma Spark_95.
10744 * gcc-interface/Makefile.in: Remove obsolete target pairs for
10745 Interfaces.C.* on VMS. Remove s-parame-vms-restrict.ads.
10746 * gcc-interface/Make-lang.in: Update dependencies.
10748 2011-08-01 Javier Miranda <miranda@adacore.com>
10750 * sem_disp.adb (Override_Dispatching_Operation): Enforce strictness of
10751 condition that detects if the overridden operation must replace an
10754 2011-08-01 Javier Miranda <miranda@adacore.com>
10756 * exp_ch4.adb (Expand_N_Case_Expression): Propagate to the expanded
10757 code declarations inserted by Insert_Actions in each alternative of the
10758 N_Case_Expression node.
10760 2011-08-01 Robert Dewar <dewar@adacore.com>
10762 * sem_ch6.adb: Minor code reorganization.
10763 * sem_util.adb: Minor reformatting.
10765 2011-08-01 Pascal Obry <obry@adacore.com>
10767 * prj-env.adb: Remove <prefix>/lib/gpr/<target> project search path.
10768 * gnat_ugn.texi: Add documentation for VERSIONINFO Windows resource.
10770 2011-08-01 Yannick Moy <moy@adacore.com>
10772 * par-ch4.adb (P_Name): issue a syntax error in SPARK mode on character
10773 literal or operator symbol which is prefixed
10774 * sem_attr.adb (Analyze_Access_Attribute): issue an error in formal
10775 mode on access attributes.
10776 * sem_ch4.adb (Analyze_Concatenation_Operand): new procedure to check
10777 that concatenation operands are properly restricted in formal mode
10778 (Analyze_Concatenation, Analyze_Concatenation_Rest): call new procedure
10779 Analyze_Concatenation_Operand. Issue an error in formal mode if the
10780 result of the concatenation has a type different from String.
10781 (Analyze_Conditional_Expression, Analyze_Explicit_Dereference,
10782 Analyze_Quantified_Expression, Analyze_Slice,
10783 Analyze_Null): issue an error in formal mode on unsupported constructs
10785 (Analyze_Block_Statement): only issue error on source block statement
10786 * sem_util.ads, sem_util.adb (Last_Source_Node_In_Sequence): new
10787 function which returns the last node in a list of nodes for which
10788 Comes_From_Source returns True, if any
10789 * sem_ch6.adb (Check_Missing_Return): minor refactoring to use
10790 Last_Source_Node_In_Sequence
10791 * sem_ch8.adb (Analyze_Exception_Renaming, Analyze_Generic_Renaming,
10792 Analyze_Object_Renaming, Analyze_Use_Package): issue an error in formal
10793 mode on unsupported constructs
10794 * sem_ch9.adb Do not return after issuing error in formal mode, as the
10795 rest of the actions may be needed later on since the error is marked as
10797 * sinfo.ads: Typos in comments.
10799 2011-08-01 Pascal Obry <obry@adacore.com>
10801 * projects.texi: Minor editing.
10803 2011-08-01 Yannick Moy <moy@adacore.com>
10805 * err_vars.ads (Error_Msg_Lang, Error_Msg_Langlen): new variables for
10806 insertion character ~~
10807 * errout.ads, errout.adb (Formal_Error_Msg_...): remove procedures
10808 (Set_Error_Msg_Lang): new procedure which fixes the language for use
10809 with insertion character ~~
10810 (Set_Msg_Text): treat insertion character ~~
10811 * par-ch4.adb, par-ch5.adb, par-endh.adb, sem_attr.adb, sem_ch11.adb,
10812 sem_ch3.adb, sem_ch5.adb, sem_ch9.adb, sem_util.adb: Replace calls to
10813 Formal_Error_Msg_... procedures by equivalent Error_Msg_...
10814 procedures. Favor calls to Error_Msg_F(E) over Error_Msg_N(E). Make
10815 errors related to the formal language restriction not serious
10816 (insertion character |).
10817 * par.adb (Par): set formal language for error messages if needed
10818 * sem_ch6.adb (Check_Missing_Return): take into account possible
10819 generated statements at the end of the function
10820 * snames.ads-tmpl (Name_SPARK_95, Pragma_SPARK_95): new variable and
10821 enumeration value to define a new pragma SPARK_95
10822 * opt.ads, opt.adb (SPARK_Version_Type, SPARK_Version_Default,
10823 SPARK_Version): new type and variables to store the SPARK version
10825 (SPARK_Mode): return True when SPARK_Version is set
10826 * par-prag.adb: Correct indentation
10827 (Prag): take Pragma_SPARK_95 into account
10828 * sem_prag.adb (Set_Mechanism_Value, Sig_Flags): take Pragma_SPARK_95
10831 2011-08-01 Robert Dewar <dewar@adacore.com>
10833 * sem_ch3.adb, sem_ch3.ads, sem_ch5.adb, prj-part.adb, par-ch4.adb,
10834 sem_util.adb, sem_ch4.adb, sem_ch6.adb, sem_ch6.ads, sem_ch8.adb,
10835 sem_ch8.ads, sem_ch13.ads, par-ch5.adb, prj-env.ads: Minor reformatting
10837 2011-08-01 Pascal Obry <obry@adacore.com>
10839 * prj-part.ads, prj-part.adb (Parse): Add Target_Name parameter. Pass
10840 Target_Name to Get_Path call.
10841 (Parse_Single_Project): Likewise.
10842 (Post_Parse_Context_Clause): Likewise.
10843 * prj-env.ads, prj-env.adb (Find_Project): Add Target_Name parameter.
10844 Call Initialise_Project_Path with the proper Target_Name.
10845 (Initialize_Project_Path): Add <gnat_root>/<target_name>/lib/gnat
10847 (Get_Path): Add Target_Name parameter. Call Initialise_Project_Path
10848 with the proper Target_Name.
10849 * prj-conf.adb (Get_Or_Create_Configuration_File): Pass Target_Name to
10850 Part.Parse routine.
10851 (Parse_Project_And_Apply_Config): Likewise.
10852 * prj-makr.adb (Initialize): Pass empty Target_Name to Parse routine.
10853 This is fine as this part of the code is supporting only native
10855 * prj-pars.adb (Parse): Pass empty Target_Name to Parse routine. This
10856 is fine as this part of the code is supporting only native compilation.
10858 2011-08-01 Yannick Moy <moy@adacore.com>
10860 * sem_util.adb (Enter_Name): issue error in formal mode on declaration
10861 of homonym, unless the homonym is one of the cases allowed in SPARK
10862 * par-ch5.adb (Parse_Decls_Begin_End): issue error in SPARK mode for
10863 package declaration occurring after a body.
10865 2011-08-01 Robert Dewar <dewar@adacore.com>
10867 * checks.adb, exp_ch4.adb: Minor reformatting.
10869 2011-08-01 Javier Miranda <miranda@adacore.com>
10871 * einfo.ads (Access_Disp_Table): Fix documentation.
10872 (Dispatch_Table_Wrappers): Fix documentation.
10874 2011-08-01 Pascal Obry <obry@adacore.com>
10876 * prj-env.adb, prj-env.ads: Minor reformatting.
10878 2011-08-01 Yannick Moy <moy@adacore.com>
10880 * sem_util.ads, sem_util.adb, par.adb, par_util.adb
10881 (Formal_Error_Msg, Formal_Error_Msg_N, Formal_Error_Msg_SP): move
10882 procedures out of these packages.
10883 * errout.ads, errout.adb
10884 (Formal_Error_Msg, Formal_Error_Msg_N, Formal_Error_Msg_SP): move
10885 procedures in of this package
10886 (Formal_Error_Msg_NE): new procedure for wrapper on Error_Msg_NE
10887 * par-ch5.adb (Parse_Decls_Begin_End): issue syntax error in SPARK mode
10888 on misplaced later vs initial declarations, like in Ada 83
10889 * sem_attr.adb (Processing for Analyze_Attribute): issue error in
10890 formal mode on attribute of private type whose full type declaration
10892 * sem_ch3.adb (Analyze_Declarations): issue error in formal mode on a
10893 package declaration inside a package specification
10894 (Analyze_Full_Type_Declaration): issue error in formal mode on
10895 controlled type or discriminant type
10896 * sem_ch6.adb (Analyze_Subprogram_Specification): only issue error on
10897 user-defined operator means that it should come from the source
10898 (New_Overloaded_Entity): issue error in formal mode on overloaded
10900 * sem_ch6.ads, sem_ch13.ads: typos in comments.
10902 2011-08-01 Thomas Quinot <quinot@adacore.com>
10904 * atree.adb: Minor reformatting.
10905 * checks.adb: Minor reformatting.
10907 2011-08-01 Vincent Celier <celier@adacore.com>
10909 * s-parame-vms-ia64.ads: Fix typo in comment
10911 * s-parame-vms-restrict.ads: Removed, unused.
10913 2011-08-01 Javier Miranda <miranda@adacore.com>
10916 (Is_Variable_Size_Array): Remove local subprogram Is_Constant_Bound.
10918 (Constrain_Index): Remove side effects in the evaluation of the bounds.
10919 * sem_ch3.ads, sem_ch3.adb
10920 (Is_Constant_Bound): New extended version of the subprogram that was
10921 previously located inside function Exp_Ch3.Is_Variable_Size_Array.
10922 Moved here since it is shared by routines of sem_ch3 and exp_ch3.
10923 * sem_aux.ads (Constant_Value): Fix typo in comment.
10924 * checks.adb (Generate_Index_Checks): New implementation which, for
10925 array objects with constant bounds, generates the runtime check
10926 referencing the bounds of the array type. For other cases this routine
10927 provides its previous behavior obtaining such values from the array
10929 * sem_res.adb (Set_Slice_Subtype): Link a copied range subtree with its
10931 * atree.adb (New_Copy): Reset flag Is_Overloaded in the new copy since
10932 we cannot have semantic interpretations of the new node.
10934 2011-08-01 Ed Schonberg <schonberg@adacore.com>
10936 * sem_ch6.adb (Fully_Conformant_Expressions): handle quantified
10939 2011-08-01 Arnaud Charlet <charlet@adacore.com>
10941 * sem_ch8.adb: Minor code editing.
10942 * s-vxwext.adb: Remove trailing space.
10943 * freeze.adb, freeze.ads, errout.ads, erroutc.adb: Fix GPLv3 header for
10944 consistency with other files.
10946 2011-08-01 Thomas Quinot <quinot@adacore.com>
10948 * s-auxdec.ads, s-auxdec-vms_64.ads: Minor reformatting.
10950 2011-08-01 Ed Schonberg <schonberg@adacore.com>
10952 * par-ch10.adb: reject parameterized expressions as compilation unit.
10953 * sem_ch4.adb: handle properly conditional expression with overloaded
10954 then_clause and no else_clause.
10956 2011-08-01 Tristan Gingold <gingold@adacore.com>
10958 * s-parame-vms-alpha.ads, s-parame-vms-ia64.ads: Redeclare C_Address
10959 like done by System.Aux_DEC.
10960 * env.c (__gnat_setenv) [VMS]: Put logicals into LNM$PROCESS table.
10962 2011-08-01 Yannick Moy <moy@adacore.com>
10964 * par-endh.adb (Check_End): issue a syntax error in SPARK mode for
10965 missing label at end of declaration (subprogram or package)
10966 * par-ch4.adb (P_Name): issue a syntax error in SPARK mode for mixing
10967 of positional and named parameter association
10968 * par.adb, par-util.adb (Formal_Error_Msg_SP): new wrapper on
10969 Error_Msg_SP which adds a prefix to the error message giving the name
10970 of the formal language analyzed
10971 * sem_ch6.adb (Analyze_Return_Type): issue an error in formal mode for
10972 access result type in subprogram, unconstrained array as result type,.
10973 (Analyze_Subprogram_Declaration): issue an error in formal mode for null
10975 * sem_ch8.adb: Code clean up.
10977 2011-08-01 Javier Miranda <miranda@adacore.com>
10979 * sem_ch7.adb (Uninstall_Declarations): Remove useless code.
10980 * einfo.ads (Access_Disp_Table): Fix documentation.
10981 (Dispatch_Table_Wrappers): Fix documentation.
10982 * einfo.adb (Access_Disp_Table, Dispatch_Table_Wrappers,
10983 Set_Access_Disp_Table, Set_Dispatch_Table_Wrappers): Fix the assertions
10984 to enforce the documentation of this attribute.
10985 (Set_Is_Interface): Cleanup the assertion.
10986 * exp_ch4.adb (Expand_Allocator_Expression, Tagged_Membership): Locate
10987 the Underlying_Type entity before reading attribute Access_Disp_Table.
10988 * exp_disp.adb (Expand_Dispatching_Call, Expand_Interface_Conversion):
10989 Locate the Underlying_Type before reading attribute Access_Disp_Table.
10990 * exp_aggr.adb (Build_Array_Aggr_Code, Build_Record_Aggr_Code): Locate
10991 the Underlying_Type entity before reading attribute Access_Disp_Table.
10992 * exp_ch3.adb (Build_Record_Init_Proc, Expand_N_Object_Declaration):
10993 Locate the Underlying_Type entity before reading attribute
10996 2011-08-01 Ed Schonberg <schonberg@adacore.com>
10998 * s-poosiz.ads: Additional overriding indicators.
11000 2011-08-01 Yannick Moy <moy@adacore.com>
11002 * sem_ch5.adb (Analyze_Exit_Statement): add return after error in
11004 (Analyze_Iteration_Scheme): issue error in formal mode when loop
11005 parameter specification does not include a subtype mark.
11006 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): issue error in
11007 formal mode on abstract subprogram.
11008 (Analyze_Subprogram_Specification): issue error in formal mode on
11009 user-defined operator.
11010 (Process_Formals): issue error in formal mode on access parameter and
11011 default expression.
11012 * sem_ch9.adb (Analyze_Abort_Statement,
11013 Analyze_Accept_Statement, Analyze_Asynchronous_Select,
11014 Analyze_Conditional_Entry_Call, Analyze_Delay_Relative,
11015 Analyze_Delay_Until, Analyze_Entry_Call_Alternative,
11016 Analyze_Requeue, Analyze_Selective_Accept,
11017 Analyze_Timed_Entry_Call): issue error in formal mode on such constructs
11018 * sem_ch11.adb (Analyze_Raise_Statement, Analyze_Raise_xxx_Error):
11019 issue error in formal mode on user-defined raise statement.
11021 2011-08-01 Thomas Quinot <quinot@adacore.com>
11023 * sem_ch6.adb (Enter_Overloaded_Entity): Do not warn about a
11024 declaration being hidden when overriding an implicit inherited
11026 * par-ch10.adb (P_Compilation_Unit): In syntax check only mode
11027 (-gnats), do not complain about a source file that contains only a
11030 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11032 * sem_ch5.adb (Analyze_Iterator_Scheme): Do not overwrite type of loop
11033 variable if already set.
11035 2011-08-01 Arnaud Charlet <charlet@adacore.com>
11037 * g-socket-dummy.adb, s-osinte-linux.ads, g-socket-dummy.ads,
11038 g-debuti.adb, g-tasloc.adb, g-debuti.ads, g-tasloc.ads,
11039 s-osinte-hpux.ads, g-sercom.adb, g-soliop-solaris.ads, g-sercom.ads,
11040 g-sptain.ads, g-curexc.ads, s-tasloc.adb, s-tasloc.ads, s-tataat.adb,
11041 g-ctrl_c.adb, a-reatim.adb, s-tataat.ads, g-dirope.adb, g-ctrl_c.ads,
11042 g-dirope.ads, g-boubuf.adb, g-calend.adb, g-boubuf.ads, g-souinf.ads,
11043 g-table.adb, g-bytswa-x86.adb, g-wispch.adb, g-io.adb, g-table.ads,
11044 g-wispch.ads, g-io.ads, g-memdum.adb, g-memdum.ads, g-busorg.adb,
11045 g-busorg.ads, g-regpat.adb, g-sothco-dummy.adb, g-encstr.adb,
11046 g-regpat.ads, g-sothco-dummy.ads, s-osinte-aix.ads, g-encstr.ads,
11047 g-sercom-mingw.adb, s-mastop-vms.adb, g-diopit.adb, g-diopit.ads,
11048 s-vxwext.adb, g-dyntab.adb, g-dyntab.ads, g-crc32.adb,
11049 g-sercom-linux.adb, g-crc32.ads, s-regpat.adb, g-flocon.ads,
11050 s-regpat.ads, g-stheme.adb, g-sestin.ads, s-taspri-posix-noaltstack.ads,
11051 g-soliop.ads, s-inmaop-posix.adb, g-locfil.ads, g-enblsp-vms-alpha.adb,
11052 g-socthi-dummy.adb, g-socthi-dummy.ads, gnat.ads, g-moreex.adb,
11053 g-moreex.ads, g-dynhta.adb, g-dynhta.ads, g-deutst.ads, g-htable.adb,
11054 g-cgicoo.adb, g-htable.ads, g-cgicoo.ads, a-interr.adb,
11055 g-socthi-vms.adb, g-socthi-vms.ads, g-hesora.adb, g-bubsor.adb,
11056 g-hesora.ads, g-bubsor.ads, g-md5.adb, g-md5.ads, s-intman-irix.adb,
11057 s-htable.adb, s-osinte-vms.adb, s-htable.ads, s-osinte-vms.ads,
11058 s-taprob.adb, g-bytswa.adb, g-bytswa.ads, s-osinte-solaris-posix.ads,
11059 a-suenco.adb, g-comver.adb, g-comver.ads, g-exctra.adb,
11060 s-osinte-solaris.adb, g-exctra.ads, s-osinte-irix.ads,
11061 s-osinte-solaris.ads, a-caldel-vms.adb, g-socthi-vxworks.adb,
11062 g-expect.adb, g-socthi-vxworks.ads, g-expect.ads, g-comlin.ads,
11063 g-heasor.adb, g-heasor.ads, g-traceb.adb, g-traceb.ads, g-decstr.adb,
11064 g-spipat.adb, g-decstr.ads, g-spipat.ads, s-mastop-tru64.adb,
11065 g-except.ads, g-thread.adb, g-hesorg.adb, g-thread.ads, g-hesorg.ads,
11066 g-expect-vms.adb, a-stuten.ads, g-spchge.adb, g-spchge.ads,
11067 g-u3spch.adb, g-u3spch.ads, g-spitbo.adb, g-spitbo.ads,
11068 s-osinte-dummy.ads, s-osinte-posix.adb, g-pehage.adb, g-pehage.ads,
11069 s-gloloc-mingw.adb, g-sha1.ads, s-traceb-hpux.adb,
11070 g-trasym-unimplemented.adb, g-trasym-unimplemented.ads, g-io_aux.adb,
11071 g-regexp.adb, g-io_aux.ads, g-socthi-mingw.adb, g-regexp.ads,
11072 s-osinte-hpux-dce.adb, g-socthi-mingw.ads, g-cgi.adb,
11073 s-osinte-hpux-dce.ads, g-cgi.ads, g-byorma.adb, g-boumai.ads,
11074 g-byorma.ads, a-caldel.adb, s-regexp.adb, s-regexp.ads,
11075 g-soliop-mingw.ads, g-sptavs.ads, s-osinte-tru64.ads, g-speche.adb,
11076 g-speche.ads, g-socthi.adb, g-stsifd-sockets.adb, g-socthi.ads,
11077 s-osinte-darwin.ads, i-vxwork-x86.ads, g-awk.adb, i-vxwork.ads,
11078 g-awk.ads, g-zspche.adb, g-zspche.ads, g-socket.adb, g-sptabo.ads,
11079 g-socket.ads, g-semaph.adb, g-semaph.ads, s-taspri-posix.ads,
11080 g-enblsp-vms-ia64.adb, g-cgideb.adb, g-cgideb.ads, g-sothco.adb,
11081 s-osinte-freebsd.ads, g-sothco.ads, g-catiio.adb, g-casuti.adb,
11082 g-catiio.ads, g-casuti.ads, g-trasym.adb, g-trasym.ads, s-casuti.adb,
11083 g-os_lib.adb, s-traceb-mastop.adb, g-busora.adb, s-interr-dummy.adb,
11084 g-busora.ads, g-enutst.ads, s-os_lib.adb, a-tasatt.adb,
11085 s-osinte-mingw.ads: Update to GPLv3 run-time license.
11086 Use GNAT instead of GNARL.
11088 2011-08-01 Bob Duff <duff@adacore.com>
11090 * a-cdlili.ads, a-cihama.ads, a-coinve.ads, a-ciorse.ads, a-coorma.ads,
11091 a-cidlli.ads, a-ciormu.ads, a-cihase.ads, a-cohama.ads, a-coorse.ads,
11092 a-ciorma.ads, a-coormu.ads, a-convec.ads, a-cohase.ads: Minor
11095 2011-08-01 Yannick Moy <moy@adacore.com>
11097 * debug.adb (d.D) reverve flag for the SPARK mode
11098 (d.E) reverve flag for SPARK generation mode
11099 (d.F) reverve flag for Why generation mode
11100 * opt.ads, opt.adb (ALFA_Mode, ALFA_Through_SPARK_Mode,
11101 ALFA_Through_Why_Mode, Formal_Verification_Mode, SPARK_Mode): New
11102 functions which return True when the corresponding modes are set
11103 (Formal_Language): return "spark" or "alfa" when in formal verification
11105 * sem_util.ads, sem_util.adb (Formal_Error_Msg): new wrapper on
11106 Error_Msg to prefix the error message with a tag giving the formal
11108 (Formal_Error_Msg_N): new wrapper on Error_Msg_N to prefix the error
11109 message with a tag giving the formal language
11110 * sem_ch5.adb (Analyze_Block_Statement): issue error in formal mode on
11112 (Analyze_Case_Statement): issue error in formal mode on case statement
11113 with a single "others" case alternative
11114 (Analyze_Exit_Statement): issue errors in formal mode on exit
11115 statements which do not respect SPARK restrictions
11116 (Analyze_Goto_Statement): issue error in formal mode on goto statement
11117 (Check_Unreachable_Code): always issue an error (not a warning) in
11118 formal mode on unreachable code (concerns both code after an infinite
11119 loop and after an unconditional jump, both not allowed in SPARK)
11120 * sem_ch6.adb (Analyze_Return_Statement): add call to
11121 Set_Return_Present for a procedure containing a return statement
11122 (already done for functions in Analyze_Function_Return)
11123 (Analyze_Function_Return): issue error in formal mode on extended
11124 return or if return is not last statement in function
11125 (Check_Missing_Return): issue error in formal mode if function does
11126 not end with return or if procedure contains a return
11127 * sem_ch8.ads, sem_ch8.adb (Has_Loop_In_Inner_Open_Scopes): new
11128 function to detect if there is an inner scope of its parameter S which
11131 2011-08-01 Thomas Quinot <quinot@adacore.com>
11133 * sem_ch6.ads: Minor reformatting.
11135 2011-08-01 Javier Miranda <miranda@adacore.com>
11137 * sem_util.adb (Abstract_Interface_List): Complete condition when
11138 processing private type declarations to avoid reading unavailable
11140 (Is_Synchronized_Tagged_Type): Complete condition when processing
11141 private extension declaration nodes to avoid reading unavailable
11144 2011-08-01 Thomas Quinot <quinot@adacore.com>
11146 * sem_ch3.adb: Minor reformatting.
11148 2011-08-01 Thomas Quinot <quinot@adacore.com>
11150 * s-parame-ae653.ads, s-parame-vms-alpha.ads, s-parame-hpux.ads,
11151 i-cpoint.adb, i-cstrin.adb, i-cpoint.ads, i-cstrin.ads,
11152 s-parame-vms-ia64.ads, s-parame.ads, i-c.ads, s-parame-vxworks.ads,
11153 s-parame-vms-restrict.ads: Remove duplicated Interfaces.C.* packages
11154 for VMS, instead parametrize the common implementation with
11155 System.Parameters declarations.
11157 2011-08-01 Eric Botcazou <ebotcazou@adacore.com>
11159 * gnat_rm.texi: Document limitation of Pragma No_Strict_Aliasing.
11161 2011-08-01 Tristan Gingold <gingold@adacore.com>
11163 * seh_init.c: Fix SEH handler installation on win64.
11165 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11167 * sem_ch3.adb (Access_Subprogram_Declaration): in Asis mode, prevent
11168 double analysis of an anonymous access to subprogram, because it can
11169 lead to improper sharing of profiles and a back-end crash.
11171 2011-08-01 Robert Dewar <dewar@adacore.com>
11173 * make.adb, sem_ch4.adb: Minor reformatting.
11174 * gcc-interface/Make-lang.in: Update dependencies.
11175 * sem_util.adb, exp_ch5.adb: Minor reformatting.
11177 2011-08-01 Arnaud Charlet <charlet@adacore.com>
11179 * gnat_rm.texi: Fix definition of Long_Integer.
11181 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11183 * exp_aggr.adb: check limit size of static aggregate unconditionally,
11184 to prevent storage exhaustion.
11185 * exp_ch7.adb (Clean_Simple_Protected_Objects): if the scope being
11186 finalized is a function body, insert the cleanup code before the final
11187 return statement, to prevent spurious warnings.
11188 * s-pooglo.ads: add overriding indicator.
11190 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11192 * sem_ch4.adb (Operator_Check): improve error message when both a
11193 with_clause and a use_clause are needed to make operator usage legal.
11194 * sem_util.ads, sem_util.adb (Unit_Is_Visible): new predicate to
11195 determine whether a compilation unit is visible within an other,
11196 either through a with_clause in the current unit, or a with_clause in
11197 its library unit or one one of its parents.
11199 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11201 * exp_ch5.adb (Expand_N_Iterator_Loop): handle properly an iterator
11202 over an arbitrary expression of an array or container type.
11203 * lib-xref.adb: clarify comment.
11205 2011-08-01 Bob Duff <duff@adacore.com>
11207 * einfo.ads: Minor reformatting.
11208 * debug.adb: Minor comment improvement.
11210 2011-08-01 Javier Miranda <miranda@adacore.com>
11212 * sem_ch4.adb (Try_Object_Operation): For class-wide subprograms do not
11213 consider hidden subprograms as valid candidates.
11215 2011-08-01 Arnaud Charlet <charlet@adacore.com>
11217 * make.adb (Compile): Strip -mxxx switches in CodePeer mode.
11219 2011-08-01 Vasiliy Fofanov <fofanov@adacore.com>
11221 * gnat_ugn.texi: Fix typo.
11223 2011-08-01 Robert Dewar <dewar@adacore.com>
11225 * i-cstrin.adb, sem_util.adb, exp_ch11.adb, sem_ch8.adb,
11226 lib-xref.adb: Minor reformatting
11228 2011-08-01 Gary Dismukes <dismukes@adacore.com>
11230 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Replace test of
11231 when to generate a call to Move_Final_List.
11232 (Has_Controlled_Parts): Remove this function.
11234 2011-08-01 Geert Bosch <bosch@adacore.com>
11236 * par-ch3.adb (P_Discrete_Choice_List): Improve error message for extra
11237 "," in choice list.
11239 2011-08-01 Thomas Quinot <quinot@adacore.com>
11241 * exp_ch11.adb (Expand_N_Raise_Statement): Mark N_Raise_xxx_Error for
11242 explicit raise of a predefined exception as Comes_From_Source if the
11243 original N_Raise_Statement comes from source.
11245 2011-08-01 Robert Dewar <dewar@adacore.com>
11247 * sinfo.ads: Add comment.
11248 * sem_ch6.adb: Minor reformatting.
11250 2011-08-01 Robert Dewar <dewar@adacore.com>
11252 * freeze.adb (Freeze_Entity): Refine check for bad component size
11253 clause to avoid rejecting confirming clause when atomic/aliased present.
11255 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11257 * sem_ch8.adb (Find_Direct_Name, Analyze_Expanded_Name): use Is_LHS to
11258 better determine whether an entity reference is a write.
11259 * sem_util.adb (Is_LHS): refine predicate to handle assignment to a
11261 * lib-xref.adb (Output_References): Do no suppress a read reference at
11262 the same location as an immediately preceeding modify-reference, to
11263 handle properly in-out actuals.
11265 2011-08-01 Tristan Gingold <gingold@adacore.com>
11267 * env.c (__gnat_setenv) [VMS]: Refine previous change.
11269 2011-08-01 Quentin Ochem <ochem@adacore.com>
11271 * i-cstrin.adb (New_String): Changed implementation, now uses only the
11272 heap to compute the result.
11274 2011-08-01 Robert Dewar <dewar@adacore.com>
11276 * atree.ads: Minor reformatting.
11278 2011-08-01 Emmanuel Briot <briot@adacore.com>
11280 * g-expect.adb (Get_Command_Output): Fix memory leak.
11282 2011-08-01 Geert Bosch <bosch@adacore.com>
11284 * cstand.adb (P_Float_Type): New procedure to print the definition of
11285 predefined fpt types.
11286 (P_Mixed_Name): New procedure to print a name using mixed case
11287 (Print_Standard): Use P_Float_Type for printing floating point types
11288 * einfo.adb (Machine_Emax_Value): Add preliminary support for quad
11289 precision IEEE float.
11291 2011-08-01 Thomas Quinot <quinot@adacore.com>
11293 * sem_ch3.adb: Minor reformatting.
11295 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11297 * sem_ch6.adb (Analyze_Parameterized_Expression): If the expression is
11298 the completion of a generic function, insert the new body rather than
11299 rewriting the original.
11301 2011-08-01 Yannick Moy <moy@adacore.com>
11303 * sinfo.ads, errout.ads: Typos in comments.
11305 2011-08-01 Robert Dewar <dewar@adacore.com>
11307 * par-endh.adb: Minor reformatting.
11309 2011-08-01 Robert Dewar <dewar@adacore.com>
11311 * aspects.ads, aspects.adb: Add aspects for library unit pragmas
11312 (Pre_Post_Aspects): New subtype.
11313 * par-ch12.adb (P_Generic): New syntax for aspects in packages
11314 * par-ch13.adb (P_Aspect_Specifications): Add Semicolon parameter
11315 * par-ch7.adb (P_Package): Remove Decl parameter
11316 (P_Package): Handle new syntax for aspects (before IS)
11317 * par-ch9.adb (P_Protected_Definition): Remove Decl parameter, handle
11319 (P_Task_Definition): Remove Decl parameter, handle new aspect syntax
11320 * par.adb (P_Aspect_Specifications): Add Semicolon parameter
11321 (P_Package): Remove Decl parameter
11322 * sem_ch13.adb (Analyze_Aspect_Specifications): Handle library unit
11324 * sem_ch7.adb (Analyze_Package_Declaration): Analyze new format aspect
11326 * sem_util.ads, sem_util.adb (Static_Boolean): New function
11327 * sinfo.ads: Document new syntax for aspects in packages etc.
11328 * sprint.adb: Handle new syntax of aspects before IS in package
11330 2011-08-01 Thomas Quinot <quinot@adacore.com>
11332 * atree.ads: Minor reformatting.
11333 * sem_prag.adb: Minor reformatting.
11335 2011-08-01 Robert Dewar <dewar@adacore.com>
11337 * exp_util.adb (Insert_Actions): Fix error in handling Actions for
11338 case expr alternative.
11340 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11342 * sem_ch12.adb: Fix typo.
11344 2011-08-01 Geert Bosch <bosch@adacore.com>
11346 * sem_prag.adb (Check_No_Link_Name): New procedure.
11347 (Process_Import_Or_Interface): Use Check_No_Link_Name.
11348 * cstand.adb (Create_Standard): Use Esize (Standard_Long_Long_Float)
11349 instead of Standard_Long_Long_Float_Size global. Preparation for
11350 eventual removal of per type constants.
11351 * exp_util.ads (Get_Stream_Size): New function returning the stream
11352 size value of subtype E.
11353 * exp_util.adb (Get_Stream_Size): Implement new function.
11354 * exp_strm.adb (Build_Elementary_Input_Call): Use Get_Stream_Size
11356 * exp_attr.adb (Attribute_Stream_Size): Use Get_Stream_Size
11358 (Machine_Mantissa_Value): Handle 128-bit quad precision IEEE floats
11360 2011-08-01 Geert Bosch <bosch@adacore.com>
11362 * cstand.adb: Fix comments.
11363 * sem_prag.adb (Analyze_Pragma): Use List_Length instead of explicit
11364 count of arguments.
11366 2011-08-01 Robert Dewar <dewar@adacore.com>
11368 * exp_ch4.adb, sem_cat.adb: Minor reformatting.
11370 2011-08-01 Geert Bosch <bosch@adacore.com>
11372 * atree.ads: Fix comment.
11374 2011-08-01 Robert Dewar <dewar@adacore.com>
11376 * aspects.ads, aspects.adb (Aspect_Names): Moved from body to spec.
11377 * par-ch13.adb (P_Aspect_Specifications): Check misspelled aspect name.
11378 * par.adb: Add with for Namet.Sp.
11379 * par-tchk.adb: Minor reformatting.
11381 2011-08-01 Vincent Celier <celier@adacore.com>
11383 * mlib-tgt-specific-vms-alpha.adb, mlib-tgt-specific-vms-ia64.adb
11384 (Build_Dynamic_Library): Use new function Init_Proc_Name to get the name
11385 of the init procedure of a SAL.
11386 * mlib-tgt-vms_common.ads, mlib-tgt-vms_common.adb (Init_Proc_Name):
11389 2011-08-01 Thomas Quinot <quinot@adacore.com>
11391 * exp_ch4.adb, s-tasini.ads, sem_attr.adb, s-soflin.ads: Minor
11394 2011-08-01 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
11396 * adaint.c (__gnat_file_time_name_attr): Get rid of warning.
11398 2011-08-01 Thomas Quinot <quinot@adacore.com>
11400 * sem_util.adb, sem_util.ads (Has_Overriding_Initialize): Make function
11401 conformant with its spec (return True only for types that have
11402 an overriding Initialize primitive operation that prevents them from
11403 having preelaborable initialization).
11404 * sem_cat.adb (Validate_Object_Declaration): Fix test for preelaborable
11405 initialization for controlled types in Ada 2005 or later mode.
11407 2011-08-01 Robert Dewar <dewar@adacore.com>
11409 * aspects.ads, aspects.adb: Add aspect Type_Invariant, Precondition,
11411 (Same_Aspect): New function.
11412 * sem_ch13.adb (Analyze_Aspect_Specifications): Add aspect
11413 Type_Invariant, Precondition, Postcondition.
11414 * snames.ads-tmpl: Add Name_Type_Invariant.
11416 2011-08-01 Robert Dewar <dewar@adacore.com>
11418 * freeze.adb (Freeze_Entity): Don't call Check_Aspect_At_Freeze_Point
11420 (Freeze_All_Ent): Fix error in handling inherited aspects.
11421 * sem_ch13.adb (Analyze_Aspect_Specifications): Skip aspect that is
11422 already analyzed, but don't skip entire processing of a declaration,
11423 that's wrong in some cases of declarations being rewritten.
11424 (Analyze_Aspect_Specification): Set Is_Delayed_Aspect in aspects.
11425 Don't delay for integer, string literals
11426 Treat predicates in usual manner for delay, remove special case code,
11428 (Analyze_Freeze_Entity): Make call to Check_Aspect_At_Freeze_Point
11429 (Build_Predicate_Function): Update saved expression in aspect
11430 (Build_Invariant_Procedure): Update saved expression in aspect
11431 * exp_ch4.adb (Expand_N_Selected_Component): Only do the optimization
11432 of replacement of discriminant references if the reference is simple.
11434 2011-08-01 Robert Dewar <dewar@adacore.com>
11436 * aspects.ads, aspects.adb: Add Static_Predicate and Dynamic_Predicate.
11437 * sem_ch13.adb (Analyze_Aspect_Specification): Add processing for
11438 Static_Predicate and Dynamic_Predicate.
11439 (Build_Predicate_Function): Add processing for Static_Predicate
11440 and Dynamic_Predicate.
11441 * sinfo.ads, sinfo.adb (From_Dynamic_Predicate): New flag
11442 (From_Static_Predicate): New flag
11443 * snames.ads-tmpl: Add Name_Static_Predicate and Name_Dynamic_Predicate
11445 2011-08-01 Robert Dewar <dewar@adacore.com>
11447 * usage.adb: Documentation cleanup for Ada version modes in usage.
11448 * expander.adb: Minor reformatting.
11450 2011-08-01 Robert Dewar <dewar@adacore.com>
11452 * atree.ads: Minor comment fix.
11453 * a-stwifi.adb, a-stzfix.adb, a-strfix.adb, a-ztexio.ads, a-textio.ads,
11454 a-witeio.ads, sem_prag.adb: Minor reformatting.
11456 2011-08-01 Doug Rupp <rupp@adacore.com>
11458 * env.c (__gnat_setenv) [VMS]: Force 32bit on item list structure
11459 pointers. Use descrip.h header file for convenience. Add some
11462 2011-08-01 Robert Dewar <dewar@adacore.com>
11464 * freeze.adb (Freeze_Entity): Call Check_Aspect_At_Freeze_Point
11465 (Freeze_All): Call Check_Aspect_At_End_Of_Declarations
11466 * sem_ch13.ads, sem_ch13.adb (Check_Aspect_At_Freeze_Point):
11468 (Check_Aspect_At_End_Of_Declarations): New procedure
11469 (Analye_Aspect_Specification): Minor changes for above procedures
11470 * sinfo.ads, sinfo.adb (Is_Delayed_Aspect): Now set in aspect
11471 specification node as well.
11473 2011-08-01 Pascal Obry <obry@adacore.com>
11475 * adaint.c (_gnat_stat): GetFilesAttributesEx() would fail on special
11476 Windows files. Use GetFilesAttributes() in this case to check for file
11477 existence instead of returning with an error code.
11479 2011-08-01 Vincent Celier <celier@adacore.com>
11481 * a-stzfix.adb, a-stwifi.adb (Replace_Slice): Fixed computation when
11482 High is above Source length.
11484 2011-08-01 Robert Dewar <dewar@adacore.com>
11486 * a-ztexio.ads, a-textio.ads, a-witeio.ads: Fix comment.
11488 2011-08-01 Robert Dewar <dewar@adacore.com>
11490 * aspects.ads (Boolean_Aspects): New subtype.
11491 * exp_ch13.adb (Expand_Freeze_Entity): Fix errors in handling aspects
11492 for derived types in cases where the parent type and derived type have
11494 * freeze.adb (Freeze_Entity): Fix problems in handling derived type
11495 with aspects when parent type also has aspects.
11496 (Freeze_Entity): Deal with delay of boolean aspects (must evaluate
11497 boolean expression at this point).
11498 * sem_ch13.adb (Analyze_Aspect_Specifications): Delay all aspects in
11499 accordance with final decision on the Ada 2012 feature.
11500 * sinfo.ads, sinfo.adb (Is_Boolean_Aspect): New flag.
11502 2011-08-01 Matthew Heaney <heaney@adacore.com>
11504 * a-chtgbo.adb (Delete_Node_Sans_Free): Replace iterator with selector.
11506 2011-08-01 Pascal Obry <obry@adacore.com>
11508 * a-stzunb-shared.adb, a-strunb-shared.adb, a-stwiun-shared.adb:
11509 Fix Replace_Slice when High is above current string size.
11510 (Replace_Slice): Fix DL computation when High is above current
11513 2011-08-01 Gary Dismukes <dismukes@adacore.com>
11515 * gnat_rm.texi: Add documentation for pragma Static_Elaboration_Desired.
11517 2011-08-01 Matthew Heaney <heaney@adacore.com>
11519 * a-rbtgbo.adb (Delete_Node_Sans_Free): Fixed assignment to left child
11522 2011-08-01 Pascal Obry <obry@adacore.com>
11524 * a-stzunb-shared.adb, a-strunb-shared.adb, a-stwiun-shared.adb: Minor
11527 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11529 * sem_attr.adb (Analyze_Attribute, case 'Access): Handle properly named
11530 access to protected subprograms in generic bodies.
11531 * sem_ch6.adb (Analyze_Subprogram_Declaration): If the context is a
11532 protected type, indicate that the convention of the subprogram is
11533 Convention_Protected, because it may be used in subsequent declarations
11534 within the protected declaration.
11536 2011-08-01 Vincent Celier <celier@adacore.com>
11538 * mlib-prj.adb (Build_Library): Use "ada_" as the prefix for the "init"
11539 and "final" procedures when the name of the library is "ada", to avoid
11540 duplicate symbols "adainit" and "adafinal" in executables.
11542 2011-08-01 Ed Schonberg <schonberg@adacore.com>
11544 * sem_attr.adb (Analyze_Attribute, case 'Result): Handle properly a
11545 quantified expression that appears within a postcondition and uses the
11546 Ada2012 'Result attribute.
11548 2011-07-28 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
11550 * init.c (__gnat_error_handler): Cast reason to int.
11551 (__gnat_install_handler): Explain sa_sigaction use.
11553 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
11555 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: If the
11556 subprogram has copy-in copy-out parameters, try to promote the mode of
11557 the return type if it is passed in registers.
11559 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
11561 * gcc-interface/utils2.c (build_binary_op) <ARRAY_REF>: Do not mark the
11562 left operand as addressable.
11564 2011-07-24 Eric Botcazou <ebotcazou@adacore.com>
11566 * gcc-interface/gigi.h (build_function_stub): Remove.
11567 (build_return_expr): Likewise.
11568 (convert_vms_descriptor): Declare.
11569 * gcc-interface/utils.c (convert_vms_descriptor): Make global.
11570 (build_function_stub): Move to...
11571 * gcc-interface/utils2.c (build_return_expr): Move to...
11572 * gcc-interface/trans.c (build_function_stub): ...here.
11573 (build_return_expr): ...here.
11574 (Subprogram_Body_to_gnu): Add local variable for language_function.
11575 Disconnect the parameter attributes cache, if any, once done with it.
11576 Call end_subprog_body only after setting the end_locus.
11577 Build the stub associated with the function, if any, at the very end.
11578 (gnat_to_gnu) <N_Return_Statement>: Remove couple of useless local
11579 variables and streamline control flow.
11581 2011-07-23 Arnaud Charlet <charlet@adacore.com>
11584 * gcc-interface/Makefile.in (powerpc-linux): Remove reference to
11585 g-trasym-dwarf.adb.
11587 2011-07-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
11590 * init.c [sun && __SVR4 && !__vxworks] (__gnat_install_handler):
11591 Assign to act.sa_sigaction.
11592 * tracebak.c [USE_GENERIC_UNWINDER] (__gnat_backtrace): Cast
11593 current->return_address to char * before arithmetic.
11595 2011-07-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
11597 * init.c [sgi] (__gnat_error_handler): Update sigaction(2) citation.
11598 Correct argument types.
11599 Extract code from reason.
11600 (__gnat_install_handler): Assign to act.sa_sigaction.
11602 2011-07-21 Eric Botcazou <ebotcazou@adacore.com>
11604 * gcc-interface/Make-lang.in (GNAT1_ADA_OBJS): Move ada/b_gnat1.o to...
11605 (GNAT1_OBJS): ...here.
11607 2011-07-15 Eric Botcazou <ebotcazou@adacore.com>
11610 * g-socthi-mingw.adb (Fill): Fix formatting.
11612 * gcc-interface/gigi.h: Move around comment.
11614 2011-07-14 John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
11617 * s-taprop-hpux-dce.adb (Abort_Task): Remove unnecessary cast.
11619 2011-07-14 Florian Weimer <fw@deneb.enyo.de>
11622 * g-socthi-mingw.adb (Fill): Guard against invalid MSG_WAITALL.
11624 2011-07-13 Eric Botcazou <ebotcazou@adacore.com>
11626 * gcc-interface/utils.c (build_vms_descriptor32): Skip the 32-bit
11627 range comparison if Pmode is SImode.
11629 2011-07-12 Laurent GUERBY <laurent@guerby.net>
11630 Eric Botcazou <ebotcazou@adacore.com>
11632 * adadecode.c: Wrap up in extern "C" block.
11633 * adadecode.h: Likewise.
11634 * adaint.c: Likewise. Remove 'const' keyword.
11635 * adaint.h: Likewise.
11636 * argv.c: Likewise.
11637 * atree.h: Likewise.
11639 * cstreams.c: Likewise.
11641 * exit.c: Likewise.
11643 * final.c: Likewise.
11644 * init.c: Likewise.
11645 * initialize.c: Likewise.
11646 * link.c: Likewise.
11647 * namet.h: Likewise.
11648 * nlists.h: Likewise.
11649 * raise.c: Likewise.
11650 * raise.h: Likewise.
11651 * repinfo.h: Likewise.
11652 * seh_init.c: Likewise.
11653 * targext.c: Likewise.
11654 * tracebak.c: Likewise.
11655 * uintp.h: Likewise.
11656 * urealp.h: Likewise.
11657 * xeinfo.adb: Wrap up generated C code in extern "C" block.
11658 * xsinfo.adb: Likewise.
11659 * xsnamest.adb: Likewise.
11660 * gcc-interface/gadaint.h: Wrap up in extern "C" block.
11661 * gcc-interface/gigi.h: Wrap up some prototypes in extern "C" block.
11662 * gcc-interface/misc.c: Likewise.
11663 * gcc-interface/Make-lang.in (GCC_LINK): Use LINKER.
11664 (GNAT1_C_OBJS): Remove ada/b_gnat1.o. List ada/seh_init.o and
11665 ada/targext.o here...
11666 (GNAT_ADA_OBJS): ...and not here.
11667 (GNAT1_ADA_OBJS): Add ada/b_gnat1.o.
11668 (GNATBIND_OBJS): Reorder.
11670 2011-07-07 Richard Henderson <rth@redhat.com>
11672 * gcc-interface/misc.c (gnat_init_gcc_eh): Don't call
11673 dwarf2out_frame_init.
11675 2011-07-07 Eric Botcazou <ebotcazou@adacore.com>
11677 * gcc-interface/misc.c (gnat_init): Tweak previous change.
11679 2011-07-07 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
11682 * gcc-interface/Makefile.in: Handle x86_64-solaris2.
11684 2011-07-06 Richard Guenther <rguenther@suse.de>
11686 * gcc-interface/misc.c (gnat_init): Merge calls to
11687 build_common_tree_nodes and build_common_tree_nodes_2.
11688 Re-initialize boolean_false_node.
11690 2011-07-02 Eric Botcazou <ebotcazou@adacore.com>
11691 Olivier Hainque <hainque@adacore.com>
11692 Nicolas Setton <setton@adacore.com>
11694 * gcc-interface/utils.c (record_builtin_type): Set TYPE_ARTIFICIAL on
11695 the type according to the ARTIFICIAL_P parameter.
11696 (create_type_decl): Likewise.
11697 (create_type_stub_decl): Set TYPE_ARTIFICIAL on the type to 1.
11699 2011-07-01 Eric Botcazou <ebotcazou@adacore.com>
11701 * gcc-interface/Make-lang.in (gnat1): Prepend '+' to the command.
11702 (gnatbind): Likewise.
11704 2011-06-29 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
11706 * gcc-interface/Makefile.in (TOOLS_LIBS): Add $(LIBINTL).
11708 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
11710 * gcc-interface/decl.c (gnat_to_gnu_component_type): Use GNAT_TYPE
11711 local variable throughout. Remove useless call to Base_Type.
11712 (gnat_to_gnu_field): Use GNAT_FIELD_TYPE local variable throughout.
11713 Take it also into account for the volatileness of the field. Set the
11714 TREE_SIDE_EFFECTS flag as well in this case. Reorder some warnings.
11716 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
11718 * gcc-interface/trans.c (Identifier_to_gnu): Don't set TREE_THIS_NOTRAP
11719 on a dereference built for a by-ref object if it has an address clause.
11721 2011-06-18 Eric Botcazou <ebotcazou@adacore.com>
11723 * einfo.ads (Address_Taken): Document use for the second argument of
11724 Asm_Input and Asm_Output attributes.
11725 * sem_attr.adb (Analyze_Attribute) <Attribute_Asm_Input>: If the second
11726 argument is an entity name, then set Address_Taken on it.
11727 <Attribute_Asm_Output>: Likewise.
11728 * gcc-interface/trans.c (lvalue_required_for_attribute_p): Handle the
11729 Attr_Asm_Input and Attr_Asm_Output attributes explicitly.
11730 (gnat_to_gnu) <N_Code_Statement>: If an operand is going to end up in
11731 memory and is a CONST_DECL, retrieve its corresponding VAR_DECL.
11733 2011-06-16 Joern Rennecke <joern.rennecke@embecosm.com>
11735 PR middle-end/46500
11736 * gcc-interface/decl.c (gnat_to_gnu_param): Use pack_cumulative_args.
11738 2011-06-14 Joseph Myers <joseph@codesourcery.com>
11740 * gcc-interface/Make-lang.in (gnatbind$(exeext)): Use ggc-none.o.
11741 (ada/utils.o): Update dependencies.
11742 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Add
11743 ../../../libcpp/libcpp.a.
11744 * gcc-interface/utils.c: Include common/common-target.h.
11745 (process_attributes): Use targetm_common.have_named_sections.
11747 2011-06-07 Richard Guenther <rguenther@suse.de>
11749 * gcc-interface/misc.c (gnat_init): Do not set size_type_node or call
11752 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
11754 * gcc-interface/utils2.c (gnat_stabilize_reference): Propagate the
11755 TREE_THIS_NOTRAP flag.
11757 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
11759 * gcc-interface/utils2.c (gnat_stabilize_reference) <COMPOUND_EXPR>:
11762 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
11764 * gcc-interface/trans.c (Identifier_to_gnu): Also handle deferred
11765 constants whose full view has discriminants specially.
11767 2011-06-06 Eric Botcazou <ebotcazou@adacore.com>
11769 * gcc-interface/utils.c: Include diagnostic.h.
11770 (gnat_write_global_declarations): Output debug information for all
11771 global type declarations before finalizing the compilation unit.
11772 * gcc-interface/Make-lang.in (ada/utils.o): Add dependency.
11774 2011-05-25 Jakub Jelinek <jakub@redhat.com>
11776 * gcc-interface/utils.c (def_fn_type): Remove extra va_end.
11778 2011-05-25 Kai Tietz <ktietz@redhat.com>
11780 * adaint.c (__gnat_to_canonical_file_list_next): Use array
11781 initialization instead of const/none-const pointer assignment.
11783 2011-05-24 Joseph Myers <joseph@codesourcery.com>
11785 * gcc-interface/Make-lang.in (GNAT1_OBJS): Don't include
11786 $(EXTRA_GNAT1_OBJS).
11787 (GNATBIND_OBJS): Don't include $(EXTRA_GNATBIND_OBJS).
11788 (EXTRA_GNAT1_OBJS, EXTRA_GNATBIND_OBJS): Remove.
11789 (gnat1$(exeext), gnatbind$(exeext)): Use libcommon-target.a.
11790 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Use
11791 libcommon-target.a instead of prefix.o.
11793 2011-05-21 Joseph Myers <joseph@codesourcery.com>
11796 * gcc-interface/Make-lang.in (gnatbind$(exeext)): Depend on $(LIBDEPS).
11798 2011-05-20 Joseph Myers <joseph@codesourcery.com>
11800 * gcc-interface/Make-lang.in (EXTRA_GNATBIND_OBJS): Remove version.o.
11801 * gcc-interface/Makefile.in (EXTRA_GNATTOOLS_OBJS): Use libcommon.a
11802 instead of version.o.
11804 2011-05-18 Kai Tietz <ktietz@redhat.com>
11806 * gcc-interface/trans.c (Exception_Handler_to_gnu_sjlj): Use
11807 boolean_false_node instead of integer_zero_node.
11808 (convert_with_check): Likewise.
11809 * gcc-interface/decl.c (choices_to_gnu): Likewise.
11811 2011-05-12 Eric Botcazou <ebotcazou@adacore.com>
11813 * gcc-interface/trans.c (call_to_gnu): In the by-reference case, if the
11814 type of the parameter is an unconstrained array, convert the actual to
11815 the type of the formal in the In Out and Out cases as well.
11817 2011-05-11 Nathan Froyd <froydnj@codesourcery.com>
11819 * gcc-interface/utils.c (def_fn_type): Don't call build_function_type;
11820 call build_function_type_array or build_varargs_function_type_array
11822 (create_subprog_type): Don't call build_function_type; call
11823 build_function_type_vec instead.
11825 2011-05-11 Nathan Froyd <froydnj@codesourcery.com>
11827 * gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE): Use TYPE_MINVAL.
11828 (TYPE_GCC_MIN_VALUE): Use TYPE_MINVAL.
11829 (TYPE_GCC_MAX_VALUE): Use TYPE_MAXVAL.
11831 2011-05-07 Eric Botcazou <ebotcazou@adacore.com>
11833 * gcc-interface/decl.c (intrin_arglists_compatible_p): Remove spaces.
11835 * gcc-interface/gigi.h (global_bindings_p): Adjust prototype.
11836 * gcc-interface/utils.c (global_bindings_p): Return bool and simplify.
11838 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
11840 * gcc-interface/trans.c (Case_Statement_to_gnu): Call build_case_label.
11842 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
11844 * gcc-interface/decl.c (intrin_arglists_compatible_p): Use iterators
11845 instead of accessing TYPE_ARG_TYPES directly.
11846 * gcc-interface/utils.c (handle_nonnull_attribute): Likewise.
11848 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
11851 * gcc-interface/gigi.h (get_variant_part): Declare.
11852 * gcc-interface/decl.c (get_variant_part): Make global.
11853 * gcc-interface/utils2.c (find_common_type): Do not return T1 if the
11854 types have the same constant size, are record types and T1 has a
11855 variant part while T2 doesn't.
11857 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
11859 * gcc-interface/utils.c (begin_subprog_body): Do not call
11861 (end_subprog_body): Likewise.
11863 2011-05-04 Richard Guenther <rguenther@suse.de>
11865 * gcc-interface/trans.c (gnat_to_gnu): Remove zero notrunc argument to
11867 (pos_to_constructor): Likewise.
11869 2011-05-03 Nathan Froyd <froydnj@codesourcery.com>
11870 Eric Botcazou <ebotcazou@adacore.com>
11872 * gcc-interface/trans.c (gigi): Call build_function_type_list instead
11873 of build_function_type. Adjust calls to...
11874 (build_raise_check): ...this. Do not take a void_tree parameter.
11875 Call build_function_type_list instead of build_function_type.
11876 Fix head comment and swap couple of conditional blocks.
11878 2011-04-30 Eric Botcazou <ebotcazou@adacore.com>
11880 * gnatvsn.ads (Library_Version): Bump to 4.7.
11881 (Current_Year): Bump to 2011.
11883 2011-04-29 Michael Matz <matz@suse.de>
11885 * gcc-interface/misc.c (gnat_handle_option): Set
11886 warn_maybe_uninitialized.
11888 2011-04-23 Gerald Pfeifer <gerald@pfeifer.com>
11890 * gnat_ugn.texi (Complexity Metrics Control): Update link to
11891 the Watson/McCabe paper.
11893 2011-04-23 Jim Meyering <meyering@redhat.com>
11895 * gnat_ugn.texi (Examples of gnatxref Usage): Fix typo: s/it it/it is/
11897 2011-04-22 Eric Botcazou <ebotcazou@adacore.com>
11899 * gcc-interface/decl.c (make_packable_type): Copy DECL_PARALLEL_TYPE
11902 2011-04-22 Eric Botcazou <ebotcazou@adacore.com>
11904 * gcc-interface/gigi.h (create_subprog_decl): Add ARTIFICIAL_FLAG
11906 * gcc-interface/utils.c (create_subprog_decl): Likewise. Set
11907 DECL_ARTIFICIAL and DECL_NO_INLINE_WARNING_P on the DECL accordingly.
11908 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: Add
11909 ARTIFICIAL_FLAG local variable and pass it to create_subprog_decl.
11910 <all>: Do not set flags on the reused DECL node coming from an alias.
11911 Set DECL_IGNORED_P on the DECL node built for subprograms if they
11912 don't need debug info here...
11913 * gcc-interface/trans.c (Subprogram_Body_to_gnu): ...and not here.
11914 (gigi): Adjust calls to create_subprog_decl.
11915 (build_raise_check): Likewise.
11916 (establish_gnat_vms_condition_handler): Likewise.
11917 (Compilation_Unit_to_gnu): Likewise.
11918 (gnat_to_gnu): Likewise.
11920 2011-04-21 Eric Botcazou <ebotcazou@adacore.com>
11922 * gcc-interface/Makefile.in (NO_SIBLING_ADAFLAGS): Always define.
11923 (NO_REORDER_ADAFLAGS): New variable.
11924 (EXTRA_GNATTOOLS): Always define.
11925 (../stamp-gnatlib1-$(RTSDIR): Copy tsystem.h.
11926 Clean up and adjust list of files compiled with special options.
11927 * gcc-interface/Make-lang.in: Likewise.
11928 (ada/decl.o): Cosmetical change.
11929 (ada/misc.o): Remove dependency on $(PLUGIN_H).
11931 2011-04-20 Jim Meyering <meyering@redhat.com>
11933 * initialize.c (__gnat_initialize): Remove useless if-before-free.
11935 2011-04-17 Eric Botcazou <ebotcazou@adacore.com>
11937 * gcc-interface/Make-lang.in (gnatbind): Replace $(ALL_CFLAGS) with
11938 $(CFLAGS) on the link line.
11940 2011-04-17 Eric Botcazou <ebotcazou@adacore.com>
11942 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Function>: Declare the
11943 padded type built for the return type if it is unconstrained.
11945 2011-04-14 Nathan Froyd <froydnj@codesourcery.com>
11947 * gcc-interface/utils.c (gnat_poplevel): Use block_chainon.
11949 2011-04-12 Nathan Froyd <froydnj@codesourcery.com>
11951 * gcc-interface/ada-tree.h (union lang_tree_node): Check for TS_COMMON
11952 before calling TREE_CHAIN.
11953 * gcc-interface/misc.c (gnat_init_ts): New function.
11954 (LANG_HOOKS_INIT_TS): Define.
11956 2011-04-12 Martin Jambor <mjambor@suse.cz>
11958 * gcc-interface/utils.c (end_subprog_body): Call cgraph_get_create_node
11959 instead of cgraph_node.
11961 2011-04-08 Eric Botcazou <ebotcazou@adacore.com>
11963 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Procedure>: Set minimum
11964 alignment on fields of the RETURN type built for the Copy-In Copy-Out
11967 2011-04-08 Eric Botcazou <ebotcazou@adacore.com>
11969 * gcc-interface/trans.c (Identifier_to_gnu): Do not return initializers
11970 of aggregate types that contain a placeholder.
11972 2011-04-08 Nathan Froyd <froydnj@codesourcery.com>
11974 * gcc-interface/utils.c (handle_sentinel_attribute): Don't use
11976 (handle_type_generic_attribute): Likewise.
11978 2011-04-04 Eric Botcazou <ebotcazou@adacore.com>
11981 * s-oscons-tmplt.c (MSG_WAITALL): Fix thinko in previous change.
11983 2011-04-04 Kai Tietz <ktietz@redhat.com>
11986 * s-oscons-tmplt.c (MSG_WAITALL): Define it for native windows targets
11989 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
11991 * gcc-interface/utils2.c (build_allocator): In the unconstrained array
11992 type case, do not strip a padding type around the array type.
11994 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
11996 * gcc-interface/utils.c (update_pointer_to): Finalize named pointer
11999 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
12001 * gcc-interface/lang.opt (feliminate-unused-debug-types): Delete.
12002 * gcc-interface/misc.c (gnat_handle_option): Remove special handling
12003 code for -feliminate-unused-debug-types.
12004 (gnat_post_options): Likewise.
12006 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
12008 * gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
12009 declaration of a pointer type, then set DECL_ORIGINAL_TYPE to a
12012 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
12014 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not force the
12015 DECL_ARTIFICIAL flag on enumeration types.
12017 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
12019 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Do not make
12020 fat pointer types artificial unconditionally.
12021 <E_Array_Subtype>: Attach the base array type as a parallel type if it
12024 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
12026 * gcc-interface/gigi.h (get_dummy_type): Declare.
12027 (build_dummy_unc_pointer_types): Likewise.
12028 (finish_fat_pointer_type): Likewise.
12029 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: If a dummy
12030 fat pointer type has been built, complete it in place.
12031 <E_Access_Type>: Call build_dummy_unc_pointer_types to build dummy fat
12032 and thin pointers. Remove useless variable.
12033 (finish_fat_pointer_type): Make global and move to...
12034 * gcc-interface/utils.c (finish_fat_pointer_type): ...here.
12035 (get_dummy_type): New function.
12036 (build_dummy_unc_pointer_types): Likewise.
12037 (gnat_pushdecl): Propage the name to the anonymous variants only.
12038 (update_pointer_to): Only adjust the pointer types in the unconstrained
12041 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
12043 * gcc-interface/ada-tree.h (DECL_TAFT_TYPE_P): New flag.
12044 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Incomplete_Type>: Set it
12045 if this is a Taft amendment type and the full declaration is available.
12046 * gcc-interface/trans.c (process_type): Likewise.
12047 If there is an old type, mark the new one as used if DECL_TAFT_TYPE_P.
12048 (process_freeze_entity): Likewise.
12049 * gcc-interface/utils.c (dummy_global): New static variable.
12050 (gnat_write_global_declarations): If there are types declared as used
12051 at the global level, insert them in the global hash table.
12053 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
12055 * gcc-interface/gigi.h (record_builtin_type): Add ARTIFICIAL_P param.
12056 * gcc-interface/utils.c (gnat_pushdecl): If this is a non-artificial
12057 declaration of an array type, then set DECL_ORIGINAL_TYPE to a distinct
12059 (record_builtin_type): Add ARTIFICIAL_P parameter. Set DECL_ARTIFICIAL
12060 flag of the type accordingly.
12061 * gcc-interface/trans.c (gigi): Adjust calls to record_builtin_type.
12063 2011-04-02 Eric Botcazou <ebotcazou@adacore.com>
12065 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Defer
12066 finalizing types when updating the pointers to the designated type.
12067 <all>: Finalize the deferred types even if we didn't defer processing
12068 of incomplete types in this invocation.
12070 2011-04-01 Olivier Hainque <hainque@adacore.com>
12071 Nicolas Setton <setton@adacore.com>
12072 Eric Botcazou <ebotcazou@adacore.com>
12074 * gcc-interface/misc.c (gnat_descriptive_type): New function.
12075 (LANG_HOOKS_DESCRIPTIVE_TYPE): Redefine to gnat_descriptive_type.
12077 2011-03-28 Kai Tietz <ktietz@redhat.com>
12079 * gcc-interface/Makefile.in (SO_LIB): Handle multilib build for native
12081 (EH_MECHANISM): Use GCC exception mechanism for native Windows targets.
12082 * system-mingw.ads (System): Change ZCX_By_Default default to True.
12084 * raise-gcc.c (PERSONALITY_FUNCTION): Add prototype.
12086 2011-03-28 Tristan Gingold <gingold@adacore.com>
12089 * gcc-interface/Make-lang.in (ada/b_gnat1.adb): Replace ada/b_gnat1.c.
12090 Use ada output of gnatbind.
12091 (ada/b_gnatb.adb): Ditto.
12092 (ada/b_gnat1.o, ada/b_gnatb.o): New rules.
12093 (ada.mostlyclean, ada.stage1)
12094 (ada.stage2, ada.stage3, ada.stage4, ada.stageprofile)
12095 (ada.stagefeedback): Adjust.
12096 * gcc-interface/Makefile.in (b_gnatl.adb): Replace b_gnatl.c.
12097 Use ada output of gnatbind.
12098 (b_gnatm.adb): Ditto.
12099 (b_gnatl.o, b_gnatm.o): New rules.
12101 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
12103 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Create TYPE_DECL
12104 for the padded type built to support a specified size or alignment.
12106 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
12108 * gcc-interface/gigi.h (finalize_from_with_types): Adjust comment.
12109 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Access_Type>: Defer
12110 unconditionally to the end of the unit when the designated type is
12112 <all>: Rename local variable. Attempt to un-defer types only and do it
12113 for limited_with'ed types as well.
12114 (finalize_from_with_types): Adjust comment. Rename variable and tidy.
12115 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Use GNAT_UNIT
12116 consistently and remove redundant call to finalize_from_with_types.
12118 2011-03-26 Eric Botcazou <ebotcazou@adacore.com>
12120 * inline.adb (Back_End_Cannot_Inline): Lift restriction on calls to
12121 subprograms without a previous spec declared in the same unit.
12122 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Process inlined
12123 subprograms at the end of the unit instead of at the beginning.
12124 * gcc-interface/utils.c (create_subprog_decl): Check that the entity
12125 isn't public for the special handling of non-inline functions nested
12126 inside inline external functions.
12128 2011-03-25 Jeff Law <law@redhat.com>
12130 * gcc-interface/utils.c (def_fn_type): Add missing va_end.
12132 2011-03-24 Eric Botcazou <ebotcazou@adacore.com>
12134 * einfo.ads (Size_Depends_On_Discriminant): Adjust description.
12135 * layout.adb (Compute_Size_Depends_On_Discriminant): New procedure
12136 to compute Set_Size_Depends_On_Discriminant.
12137 (Layout_Type): Call it on array types in back-end layout mode.
12138 * sem_util.adb (Requires_Transient_Scope): Return true for array
12139 types only if the size depends on the value of discriminants.
12140 * gcc-interface/utils2.c (build_binary_op) <MODIFY_EXPR>: Use the RHS
12141 type if the RHS is a call to a function that returns an unconstrained
12142 type with default discriminant.
12144 2011-03-24 Eric Botcazou <ebotcazou@adacore.com>
12146 * gcc-interface/trans.c (gnat_to_gnu): Remove obsolete case of
12147 non-conversion to the nominal result type at the end.
12149 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
12151 * gcc-interface/trans.c (create_temporary): New function taken from...
12152 (create_init_temporary): ...here. Call it.
12153 (call_to_gnu): Create the temporary for the return value early, if any.
12154 Create it for a function with copy-in/copy-out parameters if there is
12155 no target; in other cases of copy-in/copy-out, use another temporary.
12156 Push the new binding level lazily. Add and rename local variables.
12158 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
12160 * gcc-interface/decl.c (validate_size): Improve comments and tweak
12162 (set_rm_size): Likewise.
12164 2011-03-23 Eric Botcazou <ebotcazou@adacore.com>
12166 * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Create TYPE_DECL
12167 for the padded type built in order to support a specified alignment.
12168 Fix incorrect formatting.
12170 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
12173 * gcc-interface/decl.c (elaborate_expression_1): Localize GNU_DECL.
12175 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
12177 * gcc-interface/decl.c (components_to_record): Add REORDER parameter,
12178 rename DEBUG_INFO_P into DEBUG_INFO and move P_GNU_REP_LIST parameter
12179 to the end of the list. Adjust recursive call. Rename local variable.
12180 If REORDER is true, reorder components of the record type.
12181 (gnat_to_gnu_entity): Pass OK_To_Reorder_Components flag as argument to
12182 components_to_record and adjust the parameter list.
12184 2011-03-21 Eric Botcazou <ebotcazou@adacore.com>
12186 * gcc-interface/decl.c (elaborate_expression_1): When optimization is
12187 disabled, use the variable for bounds of loop iteration scheme.
12189 2011-03-21 Kai Tietz <ktietz@redhat.com>
12192 * gcc-interface/utils.c (gnat_internal_attribute_table): Add column.
12194 2011-03-17 Eric Botcazou <ebotcazou@adacore.com>
12196 * gcc-interface/decl.c (elaborate_expression_1): Try harder to find
12197 out whether the expression is read-only. Short-circuit placeholder
12198 case and rename a couple of local variables.
12200 2011-03-17 Eric Botcazou <ebotcazou@adacore.com>
12202 * gcc-interface/gigi.h (smaller_form_type_p): Declare.
12203 * gcc-interface/trans.c (smaller_form_type_p): Make global and move...
12204 * gcc-interface/utils.c (smaller_form_type_p): ...to here.
12205 (convert): Deal with conversions from a smaller form type specially.
12207 2011-02-14 Eric Botcazou <ebotcazou@adacore.com>
12209 * gcc-interface/misc.c (gnat_init_options): Do not concatenate -I and
12210 its argument, except for the special -I- switch.
12212 2011-02-12 Gerald Pfeifer <gerald@pfeifer.com>
12214 * gnat_ugn.texi (Compiling Different Versions of Ada): Update link to
12217 2011-02-08 Eric Botcazou <ebotcazou@adacore.com>
12219 * gcc-interface/Makefile.in (x86-64 darwin): Handle multilibs.
12221 2011-02-03 Eric Botcazou <ebotcazou@adacore.com>
12223 * gcc-interface/gigi.h (fill_vms_descriptor): Take GNU_TYPE instead of
12225 * gcc-interface/utils2.c (fill_vms_descriptor): Move from here to...
12226 * gcc-interface/utils.c (fill_vms_descriptor): ...here. Take GNU_TYPE
12227 instead of GNAT_FORMAL. Protect the expression against multiple uses.
12228 Do not generate the check directly, instead instantiate the template
12229 check present in the descriptor.
12230 (make_descriptor_field): Move around.
12231 (build_vms_descriptor32): Build a template check in the POINTER field.
12232 (build_vms_descriptor): Remove useless suffixes.
12233 * gcc-interface/trans.c (call_to_gnu): Adjust fill_vms_descriptor call.
12235 2011-01-26 Eric Botcazou <ebotcazou@adacore.com>
12238 * targext.c: Include target files if IN_RTS is defined.
12240 2011-01-26 Richard Guenther <rguenther@suse.de>
12243 * targext.c: Include config.h.
12244 * gcc-interface/Make-lang.in (ada/targext.o): Add $(CONFIG_H)
12247 2011-01-04 Pascal Obry <obry@adacore.com>
12248 Eric Botcazou <ebotcazou@adacore.com>
12250 * gcc-interface/decl.c: Disable Stdcall convention handling for 64-bit.
12252 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
12254 * gcc-interface/trans.c (Case_Statement_to_gnu): Put the SLOC of the
12255 end-of-case on the end label and its associated gotos, if any.
12257 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
12259 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Evaluate the
12260 expressions of the parameter cache within the statement group of
12261 the CICO mechanism.
12263 2011-01-04 Olivier Hainque <hainque@adacore.com>
12264 Eric Botcazou <ebotcazou@adacore.com>
12266 * gcc-interface/trans.c (BLOCK_SOURCE_END_LOCATION): Provide default.
12267 (set_end_locus_from_node): New function.
12268 (Subprogram_Body_to_gnu): Use it to mark both the inner BIND_EXPR we
12269 make and the function end_locus.
12270 (Compilation_Unit_to_gnu): Call it instead of a straight Sloc_to_locus
12271 for the elaboration subprogram.
12272 (set_gnu_expr_location_from_node) <default case>: Use it to attempt to
12273 set the end_locus of the expression as well.
12275 2011-01-04 Eric Botcazou <ebotcazou@adacore.com>
12278 * gcc-interface/trans.c (Identifier_to_gnu): In SJLJ mode, do not make
12279 variables that are referenced in exception handlers volatile.
12283 Copyright (C) 2011 Free Software Foundation, Inc.
12285 Copying and distribution of this file, with or without modification,
12286 are permitted in any medium without royalty provided the copyright
12287 notice and this notice are preserved.