1 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
3 * gcc-interface/decl.c (variant_desc): Add AUX field.
4 (gnat_to_gnu_entity) <discrete_type>: Do not call compute_record_mode
6 (reverse_sort_field_list): New static function.
7 (components_to_record): Place the variant part at the beginning of the
8 field list when there is an obvious order of increasing position.
9 (build_variant_list): Initialize it.
10 (create_variant_part_from): Do not call compute_record_mode directly.
11 (copy_and_substitute_in_layout): Likewise. Always sort the fields with
12 fixed position in order of increasing position, in the record and all
13 the variants, in any. Call reverse_sort_field_list.
14 * gcc-interface/utils.c (make_packable_type): Compute the sizes before
15 calling finish_record_type. Do not call compute_record_mode directly.
16 (finish_record_type): Overhaul final processing depending on REP_LEVEL
17 and call finish_bitfield_layout if it is equal to one or two.
19 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
21 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Reuse the
22 existing fields of a dummy fat pointer type, if any. Clear the
23 TYPE_DECL_SUPPRESS_DEBUG on the fat pointer type after completing it.
25 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
27 * contracts.adb (Process_Body_Postconditions): Expand only checked
29 (Process_Contract_Cases_For): Expand only checked contract cases.
30 (Process_Inherited_Preconditions): Ignored class-wide preconditions are
31 partially expanded because some of their semantic checks are tied to
33 (Process_Preconditions_For): Expand only checked preconditions.
34 (Process_Spec_Postconditions): Expand only checked preconditions.
35 Ignored class-wide preconditions are partially expanded because some of
36 their semantic checks are tied to the expansion.
37 * exp_prag.adb (Expand_N_Pragma): Suppress the expansion of ignored
39 * exp_util.adb (Add_Inherited_Invariants): Code clean up.
40 * sem_util.adb (Propagate_Invariant_Attributes): Code clean up.
42 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
44 * exp_ch9.adb, exp_unst.adb, inline.adb, libgnat/a-ciorma.adb,
45 libgnat/a-ciormu.adb, libgnat/a-ciorse.adb, libgnat/a-coorma.adb,
46 libgnat/a-coormu.adb, libgnat/a-coorse.adb, sem_prag.adb: Minor
49 2018-06-11 Gary Dismukes <dismukes@adacore.com>
51 * exp_unst.ads, exp_unst.adb: Typo fixes and minor reformatting.
53 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
55 * exp_ch6.adb (Add_Unconstrained_Actuals_To_Build_In_Place_Call): Do
56 not add any actuals when the size of the object is known, and the
57 caller will allocate it.
58 (Build_Heap_Allocator): Rename to Build_Heap_Or_Pool_Allocator to
59 better illustrate its functionality. Update the comment on the
60 generated code. Generate a branch for the heap and pool cases where
61 the object is not necessarity controlled.
62 (Expand_N_Extended_Return_Statement): Expand the extended return
63 statement into four branches depending the requested mode if the caller
64 will not allocate the object on its side.
65 (Make_Build_In_Place_Call_In_Allocator): Do not allocate a controlled
66 object on the caller side because this will violate the semantics of
67 finalizable types. Instead notify the function to allocate the object
68 on the heap or a user-defined storage pool.
69 (Needs_BIP_Alloc_Form): A build-in-place function needs to be notified
70 which of the four modes to employ when returning a limited controlled
72 * exp_util.adb (Build_Allocate_Deallocate_Proc): Remove a redundant
73 guard which is already covered in Needs_Finalization.
75 2018-06-11 Olivier Hainque <hainque@adacore.com>
77 * libgnat/s-excmac*.ads: Factorize Unwind_Action definitions ...
78 * libgnat/a-exexpr.adb: ... Here, then add comments describing the
79 major datastructures associated with the current exception raised.
80 (Setup_Current_Excep): Accept a "Phase" argument conveying the
81 unwinding phase during which this subprogram is called. For an Ada
82 exception, don't update the current exception buffer from the raised
83 exception object during SEARCH_PHASE, as this is redundant with the
84 call now issued just before propagation starts.
85 (Propagate_GCC_Exception): Move call to Setup_Current_Excep ahead of
86 the unwinding start, conveying Phase 0.
87 (Unhandled_Except_Handler): Pass UA_CLEANUP_PHASE as the Phase value on
88 the call to Setup_Current_Excep.
89 * raise-gcc.c (personality_body): Pass uw_phases as the Phase argument
90 on calls to Setup_Current_Excep.
92 2018-06-11 Ed Schonberg <schonberg@adacore.com>
94 * exp_unst.ads, exp_unst.adb (Needs_Fat_Pointer,
95 Build_Access_Type_Decl): New subprograms to handle uplevel references
96 to formals of an unconstrained array type. The activation record
97 component for these is an access type, and the reference is rewritten
98 as an explicit derefenrence of that component.
100 2018-06-11 Bob Duff <duff@adacore.com>
102 * libgnat/a-ciorma.adb, libgnat/a-ciormu.adb, libgnat/a-ciorse.adb,
103 libgnat/a-coorma.adb, libgnat/a-coormu.adb, libgnat/a-coorse.adb:
104 (Element): Add code to detect dangling cursors in some cases.
106 2018-06-11 Yannick Moy <moy@adacore.com>
108 * sem_ch6.adb (Build_Subprogram_Declaration): Mark parameters as coming
111 2018-06-11 Ed Schonberg <schonberg@adacore.com>
113 * sem_ch13.adb (Build_Predicate_Functions): For a derived type, ensure
114 that its parent is already frozen so that its predicate function, if
115 any, has already been constructed.
117 2018-06-11 Yannick Moy <moy@adacore.com>
119 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Adapt for
120 possible task unit as the enclosing context.
122 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
124 * gnat1drv.adb: Remove use clause for Repinfo.
125 (Gnat1drv): Beef up comment about the interplay between -gnatc and
126 back-end annotations. Use full qualified name for List_Rep_Info.
128 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
130 * libgnat/g-arrspl.ads: Add pragma Preelaborate.
132 2018-06-11 Arnaud Charlet <charlet@adacore.com>
134 * exp_ch4.adb (Expand_Record_Equality): Remove extraneous "True and
135 then" and general logical "ada" in codepeer mode.
137 2018-06-11 Javier Miranda <miranda@adacore.com>
139 * exp_ch9.adb (Expand_N_Protected_Body): Add missing handling of
142 2018-06-11 Arnaud Charlet <charlet@adacore.com>
144 * exp_ch3.adb, exp_unst.adb, inline.adb, sem_prag.adb: Minor
147 2018-06-11 Yannick Moy <moy@adacore.com>
149 * doc/gnat_rm/implementation_defined_pragmas.rst: Add Suppressible
150 argument to Assertion_Policy
151 * gnat_rm.texi: Regenerate.
153 2018-06-11 Yannick Moy <moy@adacore.com>
155 * gnat1drv.adb: Do not check representation information in CodePeer and
156 GNATprove modes, as these modes call a special backend instead of gigi,
157 so do not have the information.
159 2018-06-11 Yannick Moy <moy@adacore.com>
161 * inline.adb (Build_Body_To_Inline): Consider case of extended return
162 of unconstrained type as one case where inlining is not supported.
163 (Expand_Inlined_Call): Remove special case for body as extended return
164 of unconstrained type.
166 2018-06-11 Yannick Moy <moy@adacore.com>
168 * sem_prag.adb (Analyze_Part_Of): Only allow Part_Of on non-generic
170 (Check_Missing_Part_Of): Do not force Part_Of on generic unit.
172 2018-06-11 Piotr Trojanek <trojanek@adacore.com>
174 * sem_ch13.adb (Analyze_Aspect_Specifications): Don't split AND THEN
175 expressions in Pre/Post contracts while in GNATprove_Mode.
177 2018-06-11 Piotr Trojanek <trojanek@adacore.com>
179 * sem_util.adb (Is_Potentially_Unevaluated): Fix detection of contracts
180 with AND THEN expressions broken down into individual conjuncts.
182 2018-06-11 Ed Schonberg <schonberg@adacore.com>
184 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): Add guard.
186 2018-06-11 Ed Schonberg <schonberg@adacore.com>
188 * exp_unst.adb (Visit_Node): Skip generic associations.
190 2018-06-11 Arnaud Charlet <charlet@adacore.com>
192 * libgnat/memtrack.adb (fwrite): Remove second definition.
194 2018-06-11 Javier Miranda <miranda@adacore.com>
196 * sinfo.ads (Is_Dynamic_Coextension): Adding documentation.
197 (Is_Static_Coextension): Adding documentation.
198 * sinfo.adb (Is_Dynamic_Coextension): Extending the assertion.
199 (Is_Static_Coextension): Extending the assertion.
200 * sem_util.adb (Mark_Allocator): Clear Is_Static_Coextension when
201 setting flag Is_Dynamic_Coextension (and vice versa).
203 2018-06-11 Ed Schonberg <schonberg@adacore.com>
205 * exp_unst.adb (Search_Subprograms): Handle explicitly stubs at the top
206 level of a compilation unit, becuase they may contain nested
207 subprograms that need an activation record.
209 2018-06-11 Arnaud Charlet <charlet@adacore.com>
211 * Makefile.rtl: Compile Ada files with $(ADAC) instead of $(CC).
213 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
215 * exp_ch11.adb, exp_unst.adb, inline.adb, sem_ch12.adb, sem_util.adb:
217 * sinfo.ads: Fix a typo.
219 2018-06-11 Ed Schonberg <schonberg@adacore.com>
221 * inline.adb (Expand_Inlined_Call): If no optimization level is
222 specified, the expansion of a call to an Inline_Always function is
223 fully performed in the front-end even on a target that support back-end
226 2018-06-11 Arnaud Charlet <charlet@adacore.com>
228 * bindgen.adb (Gen_Adainit): Protect reference to System.Parameters
231 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
233 * sem_ch8.adb (Find_Direct_Name): Mode the declaration of
234 Is_Assignment_LHS further in. Use predicate
235 Needs_Variable_Reference_Marker to determine whether to create a
237 (Find_Expanded_Name): Mode the declaration of Is_Assignment_LHS further
238 in. Use predicate Needs_Variable_Reference_Marker to determine whether
239 to create a variable marker.
240 * sem_elab.adb (Build_Variable_Reference_Marker): Remove the various
241 checks that determine whether the identifier or expanded name is a
242 suitable variable reference. The checks are now performed by
243 Needs_Variable_Reference_Marker.
244 * sem_res.adb (Resolve_Actuals): Use predicate
245 Needs_Variable_Reference_Marker to determine whether to create a
247 * sem_util.adb (Needs_Variable_Reference_Marker): New routine.
248 * sem_util.ads (Needs_Variable_Reference_Marker): New routine.
250 2018-06-11 Valentine Reboul <reboul@adacore.com>
252 * doc/gnat_rm.rst, doc/gnat_ugn.rst: Rename "GPL Edition" into
255 2018-06-11 Ed Schonberg <schonberg@adacore.com>
257 * sem_ch12.adb (Install_Body): In order to determine the placement of
258 the freeze node for an instance of a generic nested within another
259 instance, take into account that the outer instance may be declared in
260 the visible part of a package and the inner intance may be in the
261 private part of the same package.
263 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
265 * errout.adb (Special_Msg_Delete): Remove handling of Atomic and VFA.
267 2018-06-11 Nicolas Roche <roche@adacore.com>
269 * libgnat/s-valuti.adb (Bad_Value): Ensure that we do not generate a
270 stack overflow while raising a constraint error.
272 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
274 * repinfo.ads (Rep_Value): Use a single line.
275 * repinfo.adb (Rep_Value): Likewise.
276 (List_Attr): Do not use string concatenation.
278 2018-06-11 Ed Schonberg <schonberg@adacore.com>
280 * exp_unst.adb (Visit_Node): Check reference to formal parameter of
281 current procedure, because the bounds of its type may be uplevel
284 2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
286 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Constant>: If this is
287 not a definition, retrieve the expression only if it's a compile-time
288 known value if we are just annotating types.
290 * gcc-interface/utils.c (convert): Do not try to upcast properly for a
291 conversion between tagged types in type_annotate_only mode.
293 2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
295 * gcc-interface/ada-tree.h (TYPE_PADDING_FOR_COMPONENT): New macro.
296 * gcc-interface/decl.c (gnat_to_gnu_component_type): Cache the padding
297 type built for an aliased component with variable size.
299 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
301 * doc/gnat_ugn/project-manager-figure.png: Delete.
303 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
305 * vxworks-arm-link.spec, vxworks-e500-link.spec,
306 vxworks-gnat-crtbe-link.spec, vxworks-smp-arm-link.spec,
307 vxworks-smp-e500-link.spec, vxworks-smp-ppc-link.spec,
308 vxworks-smp-x86-link.spec: New files.
310 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
312 * gnatvsn.adb: Re-center the copyright header.
313 * indepsw-darwin.adb: Adjust the starting copyright year to 2011.
315 2018-05-31 Fedor Rybin <frybin@adacore.com>
317 * doc/gnat_ugn/gnat_utility_programs.rst: Document Stubs_Subdir in
318 gnattest section on user guide.
320 2018-05-31 Ed Schonberg <schonberg@adacore.com>
322 * sem_res.adb (Resolve_String_Literal): If the type is a string type
323 whose component subtype has a static predicate, ensure that the
324 predicate is applied to each character by expanding the string into the
325 equivalent aggregate. This is also done if the component subtype is
328 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
330 * gcc-interface/trans.c (Call_to_gnu): Remove obsolete code.
332 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
334 * sem_ch6.adb (Check_Missing_Return): Handle procedures with no
337 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
339 * gcc-interface/trans.c (Call_to_gnu): In the by-reference case, if
340 the type of the parameter is an unconstrained array type, convert
341 to the type of the actual before the type of the formal only if the
342 conversion was suppressed earlier. Use in_param and gnu_actual_type
343 local variables throughout, and uniform spelling for In Out or Out.
344 Also remove dead code in the component-by-reference case.
346 2018-05-31 Frederic Konrad <konrad@adacore.com>
348 * tracebak.c (STOP_FRAME): Harden condition.
349 (is_return_from, EXTRA_STOP_CONDITION): New helpers for VxWorks in RTP
352 2018-05-31 Ed Schonberg <schonberg@adacore.com>
354 * checks.adb (Apply_Discriminant_Check): Do not apply discriminant
355 check to a call to a build-in-place function, given that the return
356 object is limited and cannot be copied.
358 2018-05-31 Olivier Hainque <hainque@adacore.com>
360 * libgnat/s-atopri.ads: Update comment on __atomic_compare_exchange
363 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
365 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
366 there is no target, also create a temporary for the return value for
367 an allocator if the type is an unconstrained record type with default
370 2018-05-31 Hristian Kirtchev <kirtchev@adacore.com>
372 * exp_ch7.adb (Find_Transient_Context): An iteration scheme is a valid
373 boudary for a transient scope.
375 2018-05-31 Valentine Reboul <reboul@adacore.com>
377 * gnatvsn.ads: Rename "GPL" version to "Community".
379 2018-05-31 Ed Schonberg <schonberg@adacore.com>
381 * einfo.ads: Improve documentation for the Is_Unsigned_Type entity
384 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
386 * sem_prag.adb (Analyze_Pragma): Replace call to Unique_Defining_Entity
387 with a semantically equivalent call to Defining_Entity.
389 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
391 * sem_prag.adb (Analyze_Pragma): Set Etype on the rewritten
392 Max_Queue_Length expression.
394 2018-05-31 Sergey Rybin <rybin@adacore.com>
396 * doc/gnat_ugn/gnat_and_program_execution.rst: gnatelim does not need
397 that the main unit to be built before the call, now it computes the
398 closure of the main unit itself.
399 * gnat_ugn.texi: Regenerate.
401 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
403 * repinfo.adb (List_Structural_Record_Layout): Set First to false
404 after having listed the fields of the parent type, if any.
406 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
408 * gcc-interface/decl.c (gnat_to_gnu_entity) <discrete_type>: Do not
409 deal with the ___XP suffix for packed array types here...
410 <E_Array_Subtype>: ...or here when processing the implementation type
411 but when processing the original type instead. Do not reuse the DECL
412 of the implementation type for the original type. Tidy up.
414 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
416 * einfo.ads (Object_Size_Clause): Declare.
417 * einfo.adb (Object_Size_Clause): New function.
418 * gcc-interface/utils.c (maybe_pad_type): Test Has_Size_Clause before
419 retrieving Size_Clause and post the warning on the object size clause
420 if Has_Object_Size_Clause is true.
422 2018-05-31 Javier Miranda <miranda@adacore.com>
424 * sem_util.ads, sem_util.adb (Find_Primitive_Eq): New subprogram.
425 * exp_ch4.adb (Expand_Composite_Equality): Use the new subprogram
426 Find_Primitive_Eq to search for the primitive of types whose underlying
427 type is a tagged type.
429 2018-05-31 Yannick Moy <moy@adacore.com>
431 * sem_prag.adb (Analyze_Pragma.Check_Loop_Pragma_Placement): Inverse
432 order of treatment between nodes recognized as loop pragmas (or
433 generated from one) and block statements.
435 2018-05-31 Doug Rupp <rupp@adacore.com>
437 * libgnat/s-osprim__posix2008.adb (Clock): Implement using
440 2018-05-31 Ed Schonberg <schonberg@adacore.com>
442 * exp_unst.ads, exp_unst.adb (In_Synchronized_Unit): New predicate to
443 mark subprograms that cannot be eliminated because they must be treated
444 as reachable from outside the current unit. This includes entry bodies
445 and protected operations.
447 2018-05-31 Ed Schonberg <schonberg@adacore.com>
449 * exp_ch4.adb (Expand_Modular_Addition, Expand_Modular_Subtraction):
450 Convert all operands of the generated code to Standard.Unsigned, to
451 prevent spurious visibility errors. This is needed when the generated
452 expansion involves a modular index type of an array type, and the index
453 type is not immediately visible.
455 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
457 * einfo.ads (Package_Instantiation): Update comment after a routine
458 that uses this field has been renamed.
460 2018-05-30 Ed Schonberg <schonberg@adacore.com>
462 * exp_ch11.adb (Replace_Raise_By_Goto): The transfomation is legal even
463 if the local raise statement includes a string expression. This
464 expression might be picked up by an outer handler or discarded, but
465 plays no role in this transformation.
467 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
469 * exp_aggr.adb, exp_unst.adb, freeze.adb, libgnat/a-direct.adb: Minor
472 2018-05-30 Ed Schonberg <schonberg@adacore.com>
474 * exp_unst.adb (Visit_Node): Handle the semantic Procedure_To_Call
475 field in relevant nodes: Allocate, Free, and return statements.
477 2018-05-30 Ed Schonberg <schonberg@adacore.com>
479 * exp_unst.adb (Visit_Node): Do not traverse a Component_Association
480 that has not been analyzed, as will be the case for a nested aggregate
481 that is expanded into individual assignments.
483 2018-05-30 Justin Squirek <squirek@adacore.com>
485 * aspects.adb, aspects.ads: Register new aspect.
486 * par-prag.adb (Prag): Register new pragma.
487 * sem_ch13.adb (Analyze_Aspect_Specifications): Add processing for new
488 aspect similar to Aspect_Max_Queue_Length.
489 * sem_prag.adb, sem_prag.ads (Analyze_Pragma): Register new pragma and
490 set it to use the same processing as Pragma_Max_Queue_Length.
491 * snames.ads-tmpl: Move definition of Name_Max_Entry_Queue_Depth so
492 that it can be processed as a pragma in addition to a restriction and
493 add an entry for the pragma itself.
495 2018-05-30 Ed Schonberg <schonberg@adacore.com>
497 * freeze.adb (Freeze_Object_Declaration): A pragma Thread_Local_Storage
498 is now legal on a variable of composite type initialized with an
499 aggregate that is fully static and requires no elaboration code.
500 * exp_aggr.adb (Convert_To_Positional): Recognize additional cases of
501 nested aggregates that are compile-time static, so they can be used to
502 initialize variables declared with Threqd_Local_Storage.
503 * doc/gnat_rm/implementation_defined_pragmas.rst: Add documentation on
504 Thread_Local_Storage.
505 * gnat_rm.texi: Regenerate.
507 2018-05-30 Yannick Moy <moy@adacore.com>
509 * sem_util.adb (Policy_In_Effect): Take into account CodePeer and
512 2018-05-30 Justin Squirek <squirek@adacore.com>
514 * libgnat/a-direct.adb, libgnat/a-direct.ads (Name_Case_Equivalence):
516 (Start_Search): Modify to use Start_Search_Internal
517 (Start_Search_Internal): Add to break out an extra flag for searching
518 case insensative due to the potential for directories within the same
519 OS to allow different casing schemes.
520 * sysdep.c (__gnat_name_case_equivalence): Add as a default fallback
521 for when the more precise solution fails.
523 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
525 * checks.adb, exp_ch5.adb, exp_ch7.adb, exp_unst.adb, sem_eval.adb:
528 2018-05-30 Pascal Obry <obry@adacore.com>
530 * libgnat/g-comlin.ads (Value_Callback, Define_Switch): New.
531 * libgnat/g-comlin.adb: Add corresponding implementation.
533 2018-05-30 Gary Dismukes <dismukes@adacore.com>
535 * sem_res.adb, sem_util.adb: Fix several typos.
537 2018-05-30 Olivier Hainque <hainque@adacore.com>
539 * vx_crtbegin_attr.c (CTOR_ATTRIBUTE, DTOR_ATTRIBUTE): Empty.
540 (eh_registration_ctors, eh_registration_tors): New static variables,
541 forced in a .ctors/.dtors section, respectively, with priority.
543 2018-05-30 Bob Duff <duff@adacore.com>
545 * aspects.ads, contracts.adb, exp_util.adb, expander.adb, expander.ads,
546 freeze.adb, inline.adb, lib-xref.adb, sem.ads, sem_aggr.adb,
547 sem_attr.adb, sem_ch13.adb, sem_ch3.adb, sem_ch5.adb, sem_ch6.adb,
548 sem_ch8.adb, sem_dim.adb, sem_elab.adb, sem_res.adb, sem_res.ads,
549 sinfo.ads: Spell preanalysis, preanalyze correctly.
551 2018-05-30 Bob Duff <duff@adacore.com>
553 * libgnat/g-sestin.ads: Rework documentation comments.
555 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
557 * errout.adb, exp_aggr.adb, exp_ch7.adb, exp_util.adb, lib.adb,
558 sem_ch13.adb, sem_ch4.adb, sem_res.adb, sem_util.adb
559 (Has_Original_Node): Refactor to use Is_Rewrite_Substitution.
561 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
563 * sem_prag.adb (Analyze_Pragma): Remove conjuncts that are always true.
565 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
567 * sem_util.adb (Is_Atomic_Object): Cleaned up. Split the entity logic
568 in a separate routine.
569 (Is_Atomic_Object_Entity): New routine.
570 (Is_Atomic_Prefix): Cleaned up.
571 (Is_Synchronized_Object): Check that the object is atomic, or its type
573 (Object_Has_Atomic_Components): Removed.
574 * sem_util.ads (Is_Atomic_Object): Reword the comment on usage.
575 (Is_Atomic_Object_Entity): New routine.
577 2018-05-30 Ed Schonberg <schonberg@adacore.com>
579 * sem_ch3.adb (Access_Subprogram_Declaration): The flag
580 Needs_Activation_Record is only needed on a subprogram type, not on a
582 * sem_res.adb (Resolve_Selected_Component): If the context type and the
583 component type are anonymous access to subprograms, use the component
584 type to obtain the proper value of Needs_Activation_Record flag for the
587 2018-05-30 Eric Botcazou <ebotcazou@adacore.com>
589 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>: Add
590 comment about the memset case.
592 2018-05-30 Bob Duff <duff@adacore.com>
594 * exp_ch5.adb (Expand_Formal_Container_Element_Loop): Remove the code
595 to analyze the Elmt_Decl, because it gets analyzed in the wrong scope.
596 We need to analyze it as part of analyzing the block, so that if the
597 call to Element that initializes Elmt_Decl returns on the secondary
598 stack, the block will ss_mark/ss_release. This block is inside the
599 loop; we don't want to leak memory until the loop exits. The purpose
600 of analyzing Elmt_Decl first was to catch the error of modifying it,
601 which is illegal because it's a loop parameter. The above causes us to
602 miss that error. Therefore, we add a flag Is_Loop_Parameter, and set
603 it on the Element entity, so we end up with an E_Variable node with the
605 * einfo.ads, einfo.adb (Is_Loop_Parameter): New flag.
606 * sem_ch5.adb (Diagnose_Non_Variable_Lhs): Give the "assignment to loop
607 parameter not allowed" error if Is_Loop_Parameter.
608 * sem_util.adb (Is_Variable): Return False if Is_Loop_Parameter, to
609 trigger the call to Diagnose_Non_Variable_Lhs.
611 2018-05-30 Arnaud Charlet <charlet@adacore.com>
613 * checks.adb (Apply_Scalar_Range_Check):
614 * sem_eval.adb (Check_Non_Static_Context, Out_Of_Range): Ignore out of
615 range values for System.Priority in CodePeer mode since the actual
616 target compiler may provide a wider range.
618 2018-05-30 Ed Schonberg <schonberg@adacore.com>
620 * exp_unst.adb: Search specification of main unit as well, for
623 2018-05-30 Ed Schonberg <schonberg@adacore.com>
625 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): The statement part of
626 a package body that is a compilation unit may contain blocks that
627 declare local subprograms. In Subprogram_Unnesting Mode such
628 subprograms must be handled as nested inside the (implicit) elaboration
629 procedure that executes that statement part. To handle properly uplevel
630 references we construct that subprogram explicitly, to contain blocks
631 and inner subprograms, The statement part of the compilation unit
632 becomes a call to this subprogram. This is only done if blocks are
633 present in the statement list of the body.
635 2018-05-30 Bob Duff <duff@adacore.com>
637 * exp_ch7.adb: Minor comment fix.
639 2018-05-30 Ed Schonberg <schonberg@adacore.com>
641 * exp_unst.adb (Visit_Node): Handle properly subprogram instantiations
642 that have no corresponding body and appear as attributes of the
643 corresponding wrapper package declaration.
644 (Register_Subprogram): New subprogram, used for subprogram bodies and
645 for subprogram instantiations to enter callable entity into Subp table.
647 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
649 * libgnat/s-secsta.adb: Reimplement the secondary stack support.
650 * libgnat/s-secsta.ads: Update the documentation of all routines in the
651 public part of the package. Reimplement the private part of the
652 package to account for the new secondary stack structure. Add types
653 and subprograms for testing purposes. Add several documentation
656 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
658 * exp_aggr.adb, exp_ch3.adb, exp_ch4.adb, exp_ch7.adb, exp_unst.adb,
659 exp_util.adb, exp_util.ads, libgnat/a-calcon.adb, libgnat/a-calcon.ads,
660 libgnat/s-os_lib.adb, repinfo.adb, sem_ch3.adb, sem_disp.adb,
661 sem_disp.ads, sem_util.adb: Minor reformatting.
663 2018-05-30 Arnaud Charlet <charlet@adacore.com>
665 * gcc-interface/Makefile.in: Move special flags for Ada runtime files
667 * Makefile.rtl: ... to here. Update comments. Protect call to
668 "GCC_FOR_TARGET" in case target_os isn't defined.
670 2018-05-30 Arnaud Charlet <charlet@adacore.com>
672 * gcc-interface/Makefile.in: Move target pair settings from here...
673 * Makefile.rtl: ... to here.
674 (setup-rts): New target.
676 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
678 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Alphabetical
679 List of All Switches): Replace "modules" with "units".
680 (Subprogram Inlining Control): Likewise.
681 * gnat_ugn.texi: Regenerate.
682 * usage.adb (Usage): Fix description of -gnatn switch.
684 2018-05-29 Arnaud Charlet <charlet@adacore.com>
686 * gcc-interface/Makefile.in: Fix typos.
688 2018-05-29 Ed Schonberg <schonberg@adacore.com>
690 * exp_ch7.adb (Build_Finalizer_Call): Attach to tree the reference to
691 the finalizer procedure in the At_End handler, for use in LLVM
694 2018-05-29 Javier Miranda <miranda@adacore.com>
696 * exp_ch4.adb (Expand_N_Op_Eq, Expand_Composite_Equality): Use the new
697 subprogram Inherits_From_Tagged_Full_View to identify more reliably
698 untagged private types completed with a derivation of an untagged
699 private whose full view is a tagged type.
700 * sem_util.ads, sem_util.adb (Inherits_From_Tagged_Full_View): New
702 (Collect_Primitive_Operations): Handle untagged private types completed
703 with a derivation of an untagged private type whose full view is a
704 tagged type. In such case, collecting the list of primitives we may
705 find two equality primitives: one associated with the untagged private
706 and another associated with the ultimate tagged type (and we must
707 remove from the returned list this latter one).
709 2018-05-29 Ed Schonberg <schonberg@adacore.com>
711 * exp_unst.adb (Visit_Node): Handle statement sequences that include an
714 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
716 * repinfo.adb (List_Entities): Also recurse into blocks without label.
718 2018-05-29 Ed Schonberg <schonberg@adacore.com>
720 * exp_ch6.adb (Expand_N_Subprogram_Body): Do not generate push/pop for
721 exceptions if subprogram unnesting is in effect, because these branch
722 nodes are relevant only in the presence of nested subprograms.
724 2018-05-29 Ed Schonberg <schonberg@adacore.com>
726 * libgnat/s-fatgen.adb (Succ, Pred): Raise Constraint_Error
727 unconditionally when applied to the largest positive (resp. largest
728 negative) value of a floating-point type.
730 2018-05-29 Ed Schonberg <schonberg@adacore.com>
732 * einfo.ads, einfo.adb: Clarify use of Activation_Record_Component:
733 discriminants and exceptions are never components of such. The flag
734 Needs_Activation_Record is set on subprogram types, not on access to
737 2018-05-29 Ed Schonberg <schonberg@adacore.com>
739 * sem_ch3.adb: Set scope of component of subtype.
741 2018-05-29 Ed Schonberg <schonberg@adacore.com>
743 * exp_unst.adb (Visit_Node): Exclude selected components whose prefix
744 carry no type. Such selected components appear in unit names that are
745 child units, both in the specification and possibly in an end label for
746 the unit, and they do not contain any relevant uplevel references.
748 2018-05-29 Arnaud Charlet <charlet@adacore.com>
750 * libgnat/a-calend.ads, libgnat/a-calend.adb (Epoch_Offset): Make it a
753 2018-05-29 Olivier Hainque <hainque@adacore.com>
755 * libgnat/system-vxworks7-ppc-rtp.ads: New file.
756 * libgnat/system-vxworks7-ppc-kernel.ads: New file.
757 * libgnat/system-vxworks7-e500-rtp.ads: New file.
758 * libgnat/system-vxworks7-e500-kernel.ads: New file.
759 * libgnat/system-vxworks7-x86-rtp.ads: New file.
760 * libgnat/system-vxworks-ppc64-kernel.ads: Rename as ...
761 * libgnat/system-vxworks7-ppc64-kernel.ads: and adjust name of
762 gnat-crtbe link spec to use the vx7 variant.
764 2018-05-29 Olivier Hainque <hainque@adacore.com>
766 * vx_crtbegin.inc: Use a consistent naming convention for the
767 registration/deregistration functions across RTP or kernel. Remove the
768 ctor/dtor attribute setting based on RTP/kernel, expect the optional
769 attribute extension to be provided by includers instead.
770 * vx_crtbegin.c: Mere inclusion of vx_crtbegin.inc with empty attribute
771 extension for the registration/deregistration functions.
772 * vx_crtbegin_attr.c: New file. Include vx_crtbegin.inc with explicit
773 constructor/destructor attribute extensions.
774 * vx_crtbegin_array.c: New file. Include vx_crtbegin.inc with empty
775 attribute extensions and declare _ctors/_dtors arrays.
776 * vx_crtbegin_auto.c: Remove.
777 * libgnat/system-vxworks7-aarch64-rtp-smp.ads: Use
778 vxworks7-gnat-crtbe-link.spec.
779 * libgnat/system-vxworks7-aarch64.ads: Likewise.
780 * libgnat/system-vxworks7-e500-rtp-smp.ads: Likewise.
781 * libgnat/system-vxworks7-ppc-rtp-smp.ads: Likewise.
782 * libgnat/system-vxworks7-ppc64-rtp-smp.ads: Likewise.
783 * libgnat/system-vxworks7-x86-kernel.ads: Likewise.
784 * libgnat/system-vxworks7-x86-rtp-smp.ads: Likewise.
785 * libgnat/system-vxworks7-x86_64-kernel.ads: Likewise.
786 * libgnat/system-vxworks7-x86_64-rtp-smp.ads: Likewise.
788 2018-05-29 Piotr Trojanek <trojanek@adacore.com>
790 * ali.adb: Minor reformatting.
792 2018-05-29 Joel Brobecker <brobecker@adacore.com>
794 * doc/gnat_ugn/platform_specific_information.rst: Update package
795 requirements for 32bit GNAT on x86_64-linux.
796 * gnat_ugn.texi: Regenerate.
798 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
800 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Debugging
801 Control): Adjust description of -gnatRj.
802 * gnat_ugn.texi: Regenerate.
803 * opt.ads (List_Representation_Info_To_JSON): Likewise.
804 * repinfo.adb (List_Rep_Info): Do not automatically create a file
805 if List_Representation_Info_To_JSON is true.
806 * switch-c.adb (Scan_Front_End_Switches) <R>: Remove incompatibility
807 check between -gnatRj and -gnatRs.
808 * usage.adb (Usage): Adjust description of -gnatRj.
810 2018-05-29 Pascal Obry <obry@adacore.com>
812 * libgnat/s-os_lib.adb (Normalize_Pathname): Fix handling of ".." in
815 2018-05-29 Pascal Obry <obry@adacore.com>
817 * libgnat/s-os_lib.adb: Minor reformatting.
819 2018-05-29 Doug Rupp <rupp@adacore.com>
821 * libgnat/a-calend.adb (Epoch_Offset): Move from body to ...
822 * libgnat/a-calend.ads (Epoch_Offset): to private part of spec
823 * libgnat/a-calcon.ads (To_Unix_Nano_Time): New function spec.
824 * libgnat/a-calcon.adb (To_Unix_Nano_Time): New function body.
826 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
828 * repinfo.ads (JSON format): Document new pair for components.
829 * repinfo.adb (Derived_Discriminant): New function.
830 (List_Structural_Record_Layout): Add Outer_Ent parameter and pass it
831 in recursive calls. If the record type is the parent of an extension,
832 find and list the derived discriminant from the extension, if any.
833 (List_Component_Layout): List the Discriminant_Number in JSON mode.
834 (List_Record_Info): Adjust call to List_Structural_Record_Layout.
836 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
838 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Alphabetical
839 List of All Switches): Document -gnatRj.
840 (Debugging Control): Likewise.
841 * gnat_ugn.texi: Regenerate.
842 * opt.ads (List_Representation_Info_To_JSON): New boolean variable.
843 * osint-c.adb (Create_Repinfo_File): Use the .json instead of .rep
844 extension if List_Representation_Info_To_JSON is true.
845 * repinfo.ads: Document the JSON output format.
846 * repinfo.adb (List_Location): New procedure.
847 (List_Array_Info): Add support for JSON output.
848 (List_Entities): Likewise.
851 (Print_Expr): Likewise.
852 (List_Linker_Section): Likewise.
853 (List_Mechanisms): Likewise.
854 (List_Name): Likewise.
855 (List_Object_Info): Likewise.
856 (List_Record_Info): Likewise.
857 (List_Component_Layout): Likewise. Add Indent parameter.
858 (List_Structural_Record_Layout): New procedure.
859 (List_Attr): Add support for JSON output.
860 (List_Type_Info): Likewise.
861 (Write_Unknown_Val): Likewise.
862 * switch-c.adb (Scan_Front_End_Switches) <R>: Deal with 'j'.
863 * usage.adb (Usage): List -gnatRj.
865 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
867 * repinfo.adb (List_Component_Layout): New procedure extracted from...
868 (List_Record_Layout): ...here. Invoke it.
870 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
872 * repinfo.adb (Write_Unknown_Val): New procedure.
873 (List_GCC_Expression): Call it.
874 (List_Record_Layout): Likewise.
875 (Write_Val): Likewise.
877 2018-05-29 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
879 * exp_ch4.adb (Expand_N_Op_Abs): Clear Do_Overflow_Check when inserting
882 2018-05-29 Arnaud Charlet <charlet@adacore.com>
884 * lib-writ.adb (Write_ALI): Do not use new function from s-casuti yet.
885 This breaks build of cross compilers with older versions of GNAT, so
888 2018-05-29 Doug Rupp <rupp@adacore.com>
890 * libgnarl/s-taprop.ads (Monotonic_Clock): Refine documentation to
893 2018-05-29 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
895 * exp_ch4.adb (Expand_N_Op_Abs): Always do range check against 'First.
897 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
899 * repinfo.adb (List_Entities): Do not list the Linker_Section for
901 (List_Mechanisms): ...but here instead. Use consistent name output
902 and formatting conventions.
904 2018-05-29 Bob Duff <duff@adacore.com>
906 * lib-writ.adb (Write_ALI): Cleanup: avoid use of global var; call new
908 * libgnat/s-casuti.ads, libgnat/s-casuti.adb (To_Upper, To_Lower,
909 To_Mixed): New functions.
910 * osint.adb: Cleanup: use Is_Directory_Separator, which correctly
911 allows both '\' and '/' on Windows.
913 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
915 * repinfo.ads: Minor fixes and tweaks in comments.
917 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
919 * repinfo.adb (List_GCC_Expression): Remove Valop and replace calls to
920 it with calls to Unop.
922 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
924 * repinfo.ads (TCode): Adjust range.
925 (Truth_Andif_Expr): Remove.
926 (Truth_Orif_Expr): Likewise.
927 (Truth_And_Expr .. Dynamic_Val): Adjust value.
928 * repinfo.adb (Print_Expr): Remove handling of Truth_{And,Or}if_Expr.
929 (Rep_Value): Likewise.
930 * repinfo.h (Truth_Andif_Expr): Remove.
931 (Truth_Orif_Expr): Likewise.
932 (Truth_And_Expr .. Dynamic_Val): Adjust value.
933 * gcc-interface/decl.c (annotate_value) <TRUTH_ANDIF_EXPR>: Fall
934 through to TRUTH_AND_EXPR case.
935 <TRUTH_ORIF_EXPR>: Fall through to TRUTH_OR_EXPR case.
937 2018-05-28 Ed Schonberg <schonberg@adacore.com>
939 * exp_unst.adb (Visit_Node): For indexed components and attribute
940 references, examine index expressions or associated expressions as well
941 to record uplevel references.
942 (Vist_Node): For function and procedure calls, if a formal is an
943 unconstrained array and the actual is constrained, check whether bounds
944 of actual have uplevel references.
946 2018-05-28 Ed Schonberg <schonberg@adacore.com>
948 * einfo.ads, einfo.adb: Exceptions can be uplevel references, and thus
949 they can appear as components of activation records.
950 * exp_unst.adb (Visit_Node): A reference to an exception may be an
953 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
955 * exp_ch4.adb (Expand_Composite_Equality): Compute whether the size
956 depends on a discriminant manually instead of using the predicate
957 Size_Depends_On_Discriminant in the array type case.
959 2018-05-28 Ed Schonberg <schonberg@adacore.com>
961 * exp_unst.adb (Check_Static_Type): For a record subtype, check
962 discriminant constraints as well.
963 (Visit_Node): For a selected component, check type of prefix, as is
964 done for indexed components and slices.
966 2018-05-28 Javier Miranda <miranda@adacore.com>
968 * exp_ch4.adb (Real_Range_Check): Add a temporary to store the integer
969 value when converting a float value to a fixed-point value. This is
970 required for CCG because it handles fixed-point types by means of
971 unsigned integer type variables. The range check is now performed using
972 the integer value stored in this temporary.
974 2018-05-28 Yannick Moy <moy@adacore.com>
976 * sem_util.adb (Is_OK_Volatile_Context): Add attributes First, Last and
977 Length as valid non-interfering contexts for SPARK.
979 2018-05-28 Claire Dross <dross@adacore.com>
981 * sem_disp.ads, sem_disp.adb (Inheritance_Utilities): Package for
982 generic inheritance utilities.
983 (Generic_Inherited_Subprograms): Generic version of
984 Inherited_Subprograms, generic in Find_Dispatching_Type function.
985 (Generic_Is_Overriding_Subprogram): Generic version of
986 Is_Overriding_Subprogram, generic in Find_Dispatching_Type function.
987 (Inherited_Subprograms): Instance of Generic_Inherited_Subprograms with
988 Sem_Disp.Find_Dispatching_Type.
989 (Is_Overriding_Subprogram): Instance of
990 Generic_Is_Overriding_Subprogram with Sem_Disp.Find_Dispatching_Type.
991 (Inheritance_Utilities_Inst): Instance of Inheritance_Utilities
992 with Sem_Disp.Find_Dispatching_Type.
994 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
996 * exp_ch4.adb (Expand_Composite_Equality): For a composite (or FP)
997 component type, do not expand array equality using the unconstrained
998 base type, except for the case where the bounds of the type depend on a
1001 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1003 * einfo.ads, einfo.adb (Needs_Activation_Record): New flag on
1004 access-to-subprogram types, to indicate that an indirect call through
1005 such a type requires an activation record when compiling for LLVM.
1006 * sem_ch3.adb (Access_Subprogram_Declaration): Set new flag as needed.
1008 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1010 * exp_ch4.adb (Real_Range_Check): Specialize float-to-fixed conversions
1011 when bounds of fixed type are static, to remove some spuerfluous
1012 implicit conversions and provide an accurate result when converting
1013 back and forth between the fixed point type and a floating point type.
1015 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1017 * exp_unst.adb (Unnest_Subprogram): Prevent creation of empty
1020 2018-05-28 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1022 * exp_unst.adb (Check_Static_Type): Add argument to indicate node to be
1023 replaced, if any; all callers changed.
1024 (Note_Uplevel_Ref): Likewise. Also replace reference to deferred
1025 constant with private view so we take the address of that entity.
1026 (Note_Uplevel_Bound): Add argument to indicate node to be replaced, if
1027 any; all callers changed. Handle N_Indexed_Component like
1028 N_Attribute_Reference. Add N_Type_Conversion case.
1029 (Visit_Node): Indexed references can be uplevel if the type isn't
1031 (Unnest_Subprograms): Don't rewrite if no reference given. If call has
1032 been relocated, set first_named pointer in original node as well.
1034 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1036 * exp_aggr.adb (Flatten): Copy tree of expression in a component
1037 association with a range or a set of discrete choices, rather than
1038 relocating the node. This avoids inconsistencies in the tree when
1039 handling nested subprograms with uplevel references for LLVM.
1041 2018-05-28 Arnaud Charlet <charlet@adacore.com>
1043 * exp_util.adb (Possible_Bit_Aligned_Component): Always return False in
1046 2018-05-28 Arnaud Charlet <charlet@adacore.com>
1048 * exp_unst.adb: Fix typo.
1050 2018-05-28 Bob Duff <duff@adacore.com>
1052 * libgnat/a-convec.adb (Query_Element): Minor cleanup: remove an
1053 unnecessary use of 'Unrestricted_Access.
1055 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1057 * repinfo.adb (Expr_Value_S): New routine.
1058 (List_Linker_Section): Properly extract the value of the section
1061 2018-05-28 Patrick Bernardi <bernardi@adacore.com>
1063 * doc/gnat_ugn/building_executable_programs_with_gnat.rst: Update the
1064 description of the -D binder switch to reflect current usage.
1065 * gnat_ugn.texi: Regenerate.
1067 2018-05-28 Gary Dismukes <dismukes@adacore.com>
1069 * exp_ch3.adb: Minor reformatting
1071 2018-05-28 Justin Squirek <squirek@adacore.com>
1074 (Build_Initialization_Call): Add logic to pass the appropriate actual to match
1076 (Init_Formals): Add new formal *_skip_null_excluding_check
1077 * exp_util.adb, exp_util.ads
1078 (Enclosing_Init_Proc): Added to fetch the enclosing Init_Proc from the current
1080 (Inside_Init_Proc): Refactored to use Enclosing_Init_Proc
1081 (Needs_Conditional_Null_Excluding_Check): Added to factorize the predicate
1082 used to determine how to generate an Init_Proc for a given type.
1083 (Needs_Constant_Address): Minor reformatting
1085 (Resolve_Null): Add logic to generate a conditional check in certain cases
1087 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1089 * exp_aggr.adb, gnatlink.adb, sem_ch6.adb, sem_res.adb, sem_util.adb:
1092 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1094 * sem_prag.adb (Process_Atomic_Independent_Shared_Volatile): Include
1095 the declarations of single concurrent types because they fall in the
1096 category of full type and object declarations.
1098 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1100 * repinfo.adb (Compute_Max_Length): Skip _Parent component.
1101 (List_Record_Layout): Likewise.
1103 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1105 * sem_util.adb (Is_Function_Result): Add a warning if a postcondition
1106 includes a call to function to which it applies. This may mean an
1107 omission of an attribute reference 'Result, in particular if the
1108 function is pqrameterless.
1110 2018-05-28 Justin Squirek <squirek@adacore.com>
1112 * sem_ch8.adb (Find_Expanded_Name): Add extra guard to make sure the
1113 misresolved package name is not a case of mistaken identity.
1115 2018-05-28 Yannick Moy <moy@adacore.com>
1117 * sem_res.adb (Resolve_Range): Re-resolve the low bound of a range in
1118 GNATprove mode, as the order of resolution (low then high) means that
1119 all the information is not available when resolving the low bound the
1122 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1124 * repinfo.adb (List_Array_Info): Start with an explicit blank line and
1125 end with the linker section, if any.
1126 (List_Entities): Do not output the linker section for record types,
1127 array types and variables.
1128 (Print_Expr): Factor out common processing for unary operators and
1129 special values. Adjust and reorder the various cases.
1130 (List_Object_Info): End with the linker section, if any.
1131 (List_Record_Info): Likewise.
1132 (List_Type_Info): Do not start with a blank line.
1134 2018-05-25 Nicolas Roche <roche@adacore.com>
1136 * libgnat/s-valrea.adb (Scan_Real): Abort computation once it is sure
1137 that the result will be either -infinite or +infinite.
1139 2018-05-25 Patrick Bernardi <bernardi@adacore.com>
1141 * libgnat/s-parame.ads, libgnat/s-parame__vxworks.ads,
1142 libgnat/s-parame__ae653.ads, libgnat/s-parame__hpux.ads (Size_Type):
1143 Expand range of type to match the address space of the target.
1144 (Task_Storage_Size): Remove unused type.
1146 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1148 * sem_res.adb (Set_Mixed_Mode_Operand): If the operand is an expression
1149 of a fixed point type and the parent is a multiplying operation,
1150 resolve the operand with its own type because the context will impose a
1151 resulting type on the result of the multiplication by means of
1152 approriate conversion.
1154 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1156 * exp_ch3.adb (Default_Initialize_Object): Ensure that the analysis of
1157 the in-place initialization aggregate created for pragmas
1158 Initialize_Scalars or Normalize_Scalars is performed with checks
1161 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1163 * exp_aggr.adb (Convert_To_Positional): Bump default for
1164 Max_Others_Replicate to 32. Update comments.
1165 * osint.ads (Unknown_Attributes): No longer pretend this is a constant.
1166 (No_File_Info_Cache): Initialize separately.
1167 * osint.adb (No_File_Info_Cache): Update initializer.
1169 2018-05-25 Javier Miranda <miranda@adacore.com>
1171 * sem_res.adb (Resolve_Membership_Op): Allow the use of the membership
1172 test when the left operand is a class-wide interface and the right
1173 operand is not a class-wide type.
1174 * exp_ch4.adb (Tagged_Membership): Adding support for interface as the
1177 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1179 * exp_aggr.adb (Flatten): A quantified expression cannot be duplicated
1180 in an others clause to prevent visibility issues with the generated
1182 (Component_OK_For_Backend): Return false for a quantified expression.
1183 (Check_Static_Component): Ditto.
1185 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1187 * libgnat/s-secsta.adb (SS_Allocate): Reimplemented.
1188 (SS_Allocate_Dynamic): New routine. The allocation logic is now split
1189 into three distring cases rather than in one loop which attempts to
1190 handle all three cases. This rewrite eliminates an issue where the last
1191 frame of the stack cannot be freed, thus causing the memory range of a
1192 new frame to approach the overflow point of the memory index type.
1193 Since the overflow is logically treated as a
1194 too-much-memory-on-the-stack scenario, it causes a bogus Storage_Error.
1195 (SS_Allocate_Static): New routine. The routine factorizes the static
1196 secondary stack-related code from the former SS_Allocate.
1198 2018-05-25 Sergey Rybin <rybin@adacore.com>
1200 * doc/gnat_ugn/gnat_and_program_execution.rst: Add description of '-U'
1201 option for gnatelim.
1203 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1205 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Do not create
1206 Class_Wide_Clone_Body when analyzing a subprogram_body_stub: the clone
1207 is created when the proper body of the stub is analyzed.
1208 * sem_util.adb (ZBuild_Class_Wide_Clone_Body): If the subprogram body
1209 is the proper body of a subunit, the cloned body must be inserted in
1210 the declarative list that contains the stub.
1212 2018-05-25 Justin Squirek <squirek@adacore.com>
1214 * exp_ch6.adb (Expand_Simple_Function_Return): Add guard in check to
1215 generate code for 6.5(8-10) so that we don't get an assertion error
1216 when dealing with an incomplete return type.
1218 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1220 * pprint.adb (Expression_Name): Strip too long expressions to avoid
1221 carrying very large strings.
1223 2018-05-25 Patrick Bernardi <bernardi@adacore.com>
1225 * switch-b.adb (Scan_Binder_Switches): binder switch -Q accepts Natural
1228 2018-05-25 Doug Rupp <rupp@adacore.com>
1230 * tracebak.c (aarch64-linux): Implement.
1232 2018-05-25 Justin Squirek <squirek@adacore.com>
1234 * sem_ch8.adb: Minor reformatting.
1236 2018-05-25 Piotr Trojanek <trojanek@adacore.com>
1238 * sem_util.adb (Iterate_Call_Parameters): Fix code convention and
1241 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1243 * einfo.adb, einfo.ads, exp_ch3.adb, exp_ch8.adb, exp_unst.adb,
1244 pprint.adb, sem_ch12.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb:
1247 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1249 * sem_ch12.adb (Instance_Exists): New function, subsidiary of
1250 Validate_Derived_Type_Instance, to verify that all interfaces
1251 implemented by the formal type are also implemented by the actual. The
1252 verification is complicated when an interface of the formal is declared
1253 in a generic unit and the actual is declared in an instance of it.
1254 There is currently no mechanism to relate an interface declared within
1255 a generic to the corresponding interface in an instance, so we must
1256 traverse the list of interfaces of the actual, looking for a name
1257 match, and verifying that that interface is declared in an instance.
1259 2018-05-25 Piotr Trojanek <trojanek@adacore.com>
1261 * sem_util.adb (Iterate_Call_Parameters): Rewrite with extra
1262 assertions; replace function versions of Next_Formal/Next_Actual with
1263 their procedural versions (which are more concise).
1265 2018-05-25 Doug Rupp <rupp@adacore.com>
1267 * libgnarl/s-osinte__aix.ads, libgnarl/s-osinte__android.ads,
1268 libgnarl/s-osinte__darwin.ads, libgnarl/s-osinte__freebsd.ads,
1269 libgnarl/s-osinte__hpux.ads, libgnarl/s-osinte__kfreebsd-gnu.ads,
1270 libgnarl/s-osinte__linux.ads, libgnarl/s-osinte__lynxos178e.ads,
1271 libgnarl/s-osinte__qnx.ads, libgnarl/s-osinte__rtems.ads
1272 (Relative_Timed_Wait): Remove.
1273 * libgnarl/s-tpopmo.adb (Timed_Sleep, Timed_Delay): Rewrite to allow
1274 for incremental looping. Remove references to Rel_Time and
1275 Relative_Timed_Wait.
1276 * libgnat/s-osprim__posix.adb, libgnat/s-osprim__posix2008.adb
1277 (Timed_Delay): Make separate.
1278 * libgnat/s-optide.adb: New separate procedure.
1279 * libgnat/s-osprim.ads (Max_System_Delay): New constant.
1280 * libgnat/s-osprim__lynxos.ads (Max_Sensible_Delay): Set to 6 months.
1281 (Max_System_Delay): New constant.
1283 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1285 * sem_ch12.adb (Validate_Derived_Type_Instance): Verify that the actual
1286 for a formal derived type implements all the interfaces declared for
1289 2018-05-25 Yannick Moy <moy@adacore.com>
1291 * sem_prag.adb (Check_Applicable_Policy): Deal specially with CodePeer
1292 and GNATprove modes when applicable policy is Ignore.
1294 2018-05-25 Eric Botcazou <ebotcazou@adacore.com>
1296 * freeze.adb (Freeze_Enumeration_Type): Do not give integer size to a
1297 boolean type with convention C.
1298 * libgnat/i-cexten.ads (bool): Change to boolean with convention C.
1299 * gcc-interface/decl.c (gnat_to_gnu_entity): Add new local variable
1300 FOREIGN and use it throughout the function.
1301 <E_Enumeration_Type>: Set precision 1 on boolean types with foreign
1303 <E_Enumeration_Subtype>: Likewise for subtypes.
1304 <E_Record_Type>: Force the size of a storage unit on empty classes.
1305 * gcc-interface/utils.c (make_type_from_size) <BOOLEAN_TYPE>: Skip
1306 boolean types with precision 1 if the size is the expected one.
1308 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1310 * pprint.adb (Expression_Name): Do not print non ASCII characters.
1312 2018-05-25 Bob Duff <duff@adacore.com>
1314 * libgnat/a-strunb__shared.ads, libgnat/a-stwiun__shared.ads,
1315 libgnat/a-stzunb__shared.ads: (Initialize, Adjust): Add pragma Inline.
1317 2018-05-25 Bob Duff <duff@adacore.com>
1319 * sem_util.ads: Minor comment fix.
1321 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1323 * exp_unst.adb (Visit_Node): Restrict check for uplevel references in
1324 prefixes of array attributes, to prefixes that are entity names whose
1325 type is constrained.
1326 (Note_Uplevel_Bound): Verify that the bound is declared in an enclosing
1327 subprogram, as itype created for loops in pre/postcondition may appear
1328 in loops at the library level.
1330 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1332 * sem_ch13.adb (Build_Predicate_Functions): The predicate function
1333 declaration is inserted into the tree and analyzed at that point, so
1334 should not be reinserted when the body is constructed. Inside a
1335 generic, ensure that the body is not inserted twice in the tree.
1337 2018-05-25 Yannick Moy <moy@adacore.com>
1339 * sem_prag.adb (Check_Grouping): Modify test to ignore statements and
1340 declarations not coming from source.
1342 2018-05-25 Fedor Rybin <frybin@adacore.com>
1344 * doc/gnat_ugn/gnat_utility_programs.rst: Document new switch
1345 --copy-environment for gnattest.
1347 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1349 * sem_elab.adb (Non_Private_View): Simplify by removing a local Result
1351 * sem_prag.adb (Get_Base_Subprogram): Same as above.
1353 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
1355 * fe.h (Set_Normalized_First_Bit): Declare.
1356 (Set_Normalized_Position): Likewise.
1357 * repinfo.adb (List_Record_Layout): Do not use irregular output for a
1358 variable position. Fix minor spacing issue.
1359 * gcc-interface/decl.c (annotate_rep): If a field has a variable
1360 offset, compute the normalized position and annotate it in addition to
1363 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
1365 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu):
1366 Constify and rename variables. Fix formatting.
1367 (gnat_to_gnu) <N_Exception_Handler>: Minor tweak.
1368 <N_Raise_Statement>: Likewise.
1370 2018-05-24 Javier Miranda <miranda@adacore.com>
1372 * exp_ch8.adb (Build_Body_For_Renaming): Adding support to build the
1373 body of a variant record equality renaming.
1374 (Expand_N_Subprogram_Renaming_Declaration): Adapt the code to the new
1375 implementation of Build_Body_For_Renaming.
1376 * exp_ch3.ads (Build_Variant_Record_Equality): New library level
1377 function that factorizes the functionality needed by
1378 Build_Body_For_Renaming and Expand_Freeze_Record_Type to build the body
1379 of a variant record equality subprogram.
1380 * exp_ch3.adb (Build_Variant_Record_Equality): New subprogram.
1381 (Build_Variant_Record_Equality): New local procedure of
1382 Expand_Freeze_Record_Type containing all the code specific for freezing
1383 the record type that cannot be place in the new library level function.
1385 2018-05-24 Ed Schonberg <schonberg@adacore.com>
1387 * einfo.ads, einfo.adb (Is_Activation_Record): New flag on
1388 in_parameters, used when unesting subprograms for LLVM, to indicate
1389 that a generated parameter carries the activation record from the
1390 enclosing subprogram.
1391 * exp_unst.adb (Check_Static_Type): Handle array attributes of types
1392 whose bounds may contain up-level references that need to be added to
1393 an activation recoord.
1394 (Add_Extra_Formal): Set Is_Activation_Record on new formal.
1396 2018-05-24 Yannick Moy <moy@adacore.com>
1398 * pprint.adb (Expression_Image): Improve the printing of expressions,
1399 by taking more cases into account, in particular qualified expressions
1400 and aggregates. Also count more the number of parentheses to close
1401 after the expression.
1403 2018-05-24 Javier Miranda <miranda@adacore.com>
1405 * sem_ch3.adb (Is_Visible_Component): For untagged types add missing
1406 check for renamed discriminants.
1407 * sem_ch4.adb (Analyze_Overloaded_Selected_Component,
1408 Analyze_Selected_Component, Check_Misspelled_Selector): For calls to
1409 Is_Visible_Component pass the associated selector node to allow
1410 checking renamed discriminants on untagged types.
1412 2018-05-24 Ed Schonberg <schonberg@adacore.com>
1414 * sem_ch8.adb (Analyze_Use_Type): Do not assign the Prev_Use_Clause
1415 link to a use_type clause if this would cause an infinite loop in the
1416 machinery that detects redundant use clauses. This may happen when the
1417 redundant clauses appear in the context of a child unit and the context
1420 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1422 * sinfo.ads: Fix grammar in comment.
1424 2018-05-24 Justin Squirek <squirek@adacore.com>
1426 * einfo.ads, einfo.adb (Append_Entity): Modified to use Link_Entities
1427 and manage doubly-linked entity chain.
1428 (Nested_Scenarios): Removed entity field used for optimization during
1429 elaboration to make room for the new field Prev_Entity.
1430 (Link_Entities): Added to replace redundant calls to Set_Next_Entity
1431 and Set_Prev_Entity as well as centralize changes to the entity chain.
1432 (Predicated_Parent): Modified to use Node38.
1433 (Prev_Entity): Added to fetch new node field Prev_Entity in all entity
1435 (Remove_Entity): Moved from sem_util.
1436 (Set_Nested_Scenarios): Deleted.
1437 (Set_Predicated_Parent): Modified to use Node38.
1438 (Set_Prev_Entity): Added to set Prev_Entity field.
1439 (Set_Validated_Object): Modified to use Node38.
1440 (Unlink_Next_Entity): Added to process Prev_Entity when an unlinking
1442 (Validated_Object): Modified to use Node38.
1443 (Write_Field36_Name): Remove Nested_Scenarios, Validated_Object, and
1444 predicated parent cases.
1445 (Write_Field38_Name): Add predicated parent and Validated_Object cases.
1446 * sem_ch3.adb (Process_Subtype): Add guard to protect against
1447 inappropriate marking of Predicated_Parent to non-itype subtypes.
1448 (Make_Class_Wide_Type): Preserve Prev_Entity field and set in new type.
1449 (Copy_And_Swap): Add setting of Prev_Entity.
1450 (Build_derived_Record_Type): Replace Set_Next_Entity w/ Link_Entities.
1451 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Replace Set_Next_Entity
1453 (New_Overloaded_Entity): Remove block created to search for previous
1454 entities in the entity chain with relevant calls to Prev_Entity as well
1455 as replace duplicated code from Remove_Entity_And_Homonym with a call
1457 * sem_ch7.adb (Exchange_Declarations): Replace Set_Next_Entity w/
1459 * sem_elab.adb (Find_And_Process_Nested_Scenarios): Remove global and
1460 initial subprogram declarations related to Nested_Scenarios.
1461 (Process_Nested_Scenarios): Deleted.
1462 (Save_Scenario): Deleted.
1463 (Traverse_Body): Remove optimization for Nested_Scenarios so as to free
1464 node space in the entity tree.
1465 * sem_util.adb, sem_util.ads (Remove_Entity): Moved to einfo.
1466 (Remove_Entity_And_Homonym): Added to separate functionality of
1467 Remove_Entity from the homonym chain directly.
1468 * exp_attr.adb (Expand_N_Attribute_Reference): Replace Set_Next_Entity
1469 w/ Link_Entities and Unlink_Next_Entity.
1470 * exp_ch3.adb (Expand_N_Object_Declaration): Replace Set_Next_Entity w/
1472 * exp_ch6.adb (Replace_Renaming_Declaration_Id): Replace
1473 Set_Next_Entity w/ Link_Entities.
1474 * exp_disp.adb (Expand_Dispatching_Call): Replace Set_Next_Entity w/
1475 Link_Entities and Unlink_Next_Entity.
1476 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration): Replace
1477 call to Remove_Entity with its new incarnation.
1478 * exp_util.adb (New_Class_Wide_Subtype): Add setting of Prev_Entity.
1479 * freeze.adb (Freeze_Record_Type): Replace Set_Next_Entity w/
1482 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1484 * sem_ch10.adb (Expand_Limited_With_Clause): Update the call to
1485 Install_Limited_Withed_Unit.
1486 (Expand_With_Clause): Update the call to Install_Withed_Unit.
1487 (Implicit_With_On_Parent): Update the call to Install_Withed_Unit.
1488 (Install_Context_Clauses): Update the call to Install_Withed_Unit.
1489 (Install_Limited_Context_Clauses): Update the calls to
1490 Install_Limited_Withed_Unit.
1491 (Install_Limited_Withed_Unit): Renamed to better illustrate its
1493 (Install_Private_With_Clauses): Update the calls to Install_Withed_Unit
1494 and Install_Limited_Withed_Unit.
1495 (Install_With_Clause): Uninstall a limited with clause if a [private]
1496 with clause is given for the same package.
1497 (Install_Withed_Unit): Renamed to better illustrate its purpose.
1498 (Remove_Limited_With_Unit): New routine.
1500 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
1502 * raise-gcc.c (__gnat_SEH_error_handler): Remove prototype.
1503 (__gnat_personality_seh0): Adjust and beef up comments, and
1504 fix formatting throughout.
1505 (__gnat_adjust_context): Deal minimally with version 2.
1506 * seh_init.c (__gnat_map_SEH): Fix formatting.
1507 (_gnat_SEH_error_handler): Adjust comments.
1508 (__gnat_install_SEH_handler): Fix formatting.
1510 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1512 * exp_ch7.adb, sem_ch3.adb, sem_res.adb: Minor reformatting.
1514 2018-05-24 Ed Schonberg <schonberg@adacore.com>
1516 * exp_aggr.adb (Flatten): Add a warning on an others clause in an array
1517 aggregate with static bounds when named associations cover all index
1518 positions and the others clause is redundant.
1520 2018-05-24 Raphael Amiard <amiard@adacore.com>
1522 * libgnat/a-cohama.ads: Add documentation.
1524 2018-05-24 Raphael Amiard <amiard@adacore.com>
1526 * libgnat/a-convec.ads: Add documentation.
1528 2018-05-24 Justin Squirek <squirek@adacore.com>
1530 * exp_ch3.adb (Expand_N_Object_Declaration): Ignore raising an error in
1531 expansion for limited tagged types when the node to be expanded is a
1532 raise expression due to it not representing a valid object.
1533 * exp_ch5.adb (Expand_N_Assignment_Statement): Add exception to error
1534 message regarding assignments to limited types to ignore genereated
1537 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1539 * exp_util.adb (New_Class_Wide_Subtype): Capture and restore relevant
1540 Ghost-related attributes of the class-wide subtype because the copy
1543 2018-05-24 Justin Squirek <squirek@adacore.com>
1545 * sem_res.adb (Resolve_Entity_Name): Add guard to protect against
1546 marking use clauses as effective when the reference appears within
1549 2018-05-24 Cyrille Comar <comar@adacore.com>
1551 * doc/gnat_rm/the_gnat_library.rst: Fix typos.
1552 * gnat_rm.texi: Regenerate.
1554 2018-05-24 Bob Duff <duff@adacore.com>
1556 * exp_ch7.adb (Expand_Cleanup_Actions): Create a mark unconditionally
1557 for build-in-place functions with a caller-unknown-size result.
1558 (Create_Finalizer): For build-in-place functions with a
1559 caller-unknown-size result, check at run time whether we need to
1560 release the secondary stack.
1562 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1564 * sem_prag.adb (Analyze_Pragma): Use the full view of an internally
1565 generated incomplete type.
1567 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1569 * expander.adb (Expand): Update the save and restore of the Ghost
1571 * exp_ch3.adb (Freeze_Type): Likewise.
1572 * exp_disp.adb (Make_DT): Likewise.
1573 * exp_util.adb (Build_DIC_Procedure_Body): Likewise.
1574 (Build_DIC_Procedure_Declaration): Likewise.
1575 (Build_Invariant_Procedure_Body): Likewise.
1576 (Build_Invariant_Procedure_Declaration): Likewise.
1577 (Make_Predicate_Call): Likewise.
1578 * freeze.adb (Add_To_Result): Insert the freeze action of a living
1579 entity prior to the start of the enclosing ignored Ghost region.
1580 (Freeze_Entity): Update the save and restore of the Ghost region.
1581 * ghost.adb (Install_Ghost_Mode): Reimplemented.
1582 (Install_Ghost_Region): New routine.
1583 (Mark_And_Set_Ghost_Assignment): Install a region rather than a mode.
1584 (Mark_And_Set_Ghost_Body): Likewise.
1585 (Mark_And_Set_Ghost_Completion): Likewise.
1586 (Mark_And_Set_Ghost_Declaration): Likewise.
1587 (Mark_And_Set_Ghost_Instantiation): Likewise.
1588 (Mark_And_Set_Ghost_Procedure_Call): Likewise.
1589 (Name_To_Ghost_Mode): New routine.
1590 (Restore_Ghost_Region): New routine.
1591 * ghost.ads (Install_Ghost_Region): New routine.
1592 (Restore_Ghost_Region): New routine.
1593 * opt.ads: Add new global variable Ignored_Ghost_Region.
1594 * rtsfind.adb (Load_RTU): Update the save and restore of the Ghost
1595 region. Install a clean region.
1596 * sem.adb (Analyze): Likewise.
1597 (Do_Analyze): Likewise.
1598 * sem_ch3.adb (Analyze_Object_Declaration): Likewise
1599 (Derive_Progenitor_Subprograms): Use local variable Iface_Alias to
1600 capture the ultimate alias of the current primitive.
1601 (Process_Full_View): Update the save and restore of the Ghost region.
1602 Do not inherit DIC and invariant procedures.
1603 * sem_ch5.adb (Analyze_Assignment): Update the save and restore of the
1605 * sem_ch6.adb (Analyze_Procedure_Call): Likewise.
1606 (Analyze_Subprogram_Body_Helper): Likewise.
1607 * sem_ch7.adb (Analyze_Package_Body_Helper): Likewise.
1608 * sem_ch12.adb (Analyze_Package_Instantiation): Likewise.
1609 (Analyze_Subprogram_Instantiation): Likewise.
1610 (Instantiate_Package_Body): Likewise.
1611 (Instantiate_Subprogram_Body): Likewise.
1612 * sem_ch13.adb (Build_Predicate_Functions): Likewise.
1613 (Build_Predicate_Function_Declaration): Likewise.
1615 (Add_Dispatching_Operation): Do not consider DIC and invariant
1617 (Check_Dispatching_Operation): Use Add_Dispatching_Operation to collect
1618 a dispatching subprogram.
1619 (Check_Operation_From_Private_View): Likewise.
1620 (Override_Dispatching_Operation): Likewise.
1621 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part): Update the save
1622 and restore of the Ghost region.
1623 (Analyze_Initial_Condition_In_Decl_Part): Likewise.
1624 (Analyze_Pragma): Update the save and restore of the Ghost region.
1625 (Analyze_Pre_Post_Condition_In_Decl_Part): Likewise.
1626 * sem_util.adb (Is_Suitable_Primitive): New routine.
1627 * sem_util.ads (Is_Suitable_Primitive): New routine.
1628 * sinfo.ads: Update the section of Ghost regions.
1630 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1632 * doc/gnat_rm/implementation_defined_pragmas.rst (Contract_Cases):
1633 Change "condition" to "case guard" after renaming in the contract
1635 * gnat_rm.texi: Regenerate.
1637 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1639 * exp_util.adb (Expand_Static_Predicates_In_Choices): Indicate that the
1640 construct with discrete choices no longer contains a subtype with
1641 predicates since the expansion already handled this case.
1643 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1645 * freeze.adb (Wrap_Imported_Subprogram): Generate an unchecked
1646 conversion to the return type to avoid a side effect where an imported
1647 relocated function generates a new anonymous access type, whose
1648 accessibility level does not agree with with that of the wrapper.
1650 2018-05-24 Javier Miranda <miranda@adacore.com>
1652 * sem_util.adb (Abstract_Interface_List): Add missing support for
1653 private types whose full view is a synchronized type.
1654 * sem_ch3.adb (Build_Derived_Private_Type): Skip building the full
1655 derivation of a private type parent type is a task type with
1656 discriminants as gigi does not use such type directly.
1658 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1660 * sem_elab.adb (Build_Variable_Reference_Marker): Do not create a
1661 variable marker when the reference appears in the formal part of a
1662 compilation unit instance because there is no place to insert it.
1663 (In_Compilation_Instance_Formal_Part): New routine.
1665 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1667 * layout.ads, repinfo.ads: Fix references to renamed Backend_Layout
1668 configuration parameter.
1670 2018-05-24 Doug Rupp <rupp@adacore.com>
1672 * argv-lynxos178-raven-cert.c: New file.
1673 * libgnat/system-lynxos178-x86.ads: New file.
1675 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1677 * exp_disp.adb, freeze.adb, gnat1drv.adb, sem_ch5.adb, sem_spark.adb:
1678 Minor reformattings.
1680 2018-05-23 Pascal Obry <obry@adacore.com>
1682 * adaint.c (win32_wait): Properly free the handle/pid lists when
1683 WaitForMultipleObjects fails (return WAIT_FAILED).
1685 2018-05-23 Pascal Obry <obry@adacore.com>
1687 * adaint.c (win32_wait): Add missing parentheses.
1689 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1691 * exp_ch3.adb (Check_Large_Modular_Array): Moved to Freeze.
1692 (Expand_N_Object_Declaration): Do not check for a large modular array
1694 * freeze.adb (Check_Large_Modular_Array): Moved from Exp_Ch3.
1695 (Freeze_Object_Declaration): Code cleanup. Check for a large modular
1697 * sem_ch3.adb: Minor reformatting.
1699 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1701 * einfo.ads: New attribute on types: Predicated_Parent, to simplify the
1702 retrieval of the applicable predicate function to an itype created for
1703 a constrained array component.
1704 * einfo.adb: Subprograms for Predicated_Parent.
1705 (Predicate_Function): Use new attribute.
1706 * exp_util.adb (Make_Predicate_Call): If the predicate function is not
1707 available for a subtype, retrieve it from the base type, which may have
1708 been frozen after the subtype declaration and not captured by the
1709 subtype declaration.
1710 * sem_aggr.adb (Resolve_Array_Aggregate): An Others association is
1711 legal within a generated initiqlization procedure, as may happen with a
1712 predicate check on a component, when the predicate function applies to
1713 the base type of the component.
1714 * sem_ch3.adb (Analyze_Subtype_Declaration): Clean up inheritance of
1715 predicates for subtype declarations and for subtype indications in
1717 (Process_Subtype): Likewise. Handle properly the case of a private type
1718 with unknown discriminants whose full view is an unconstrained array.
1719 Use Predicated_Parent to indicate source of predicate function on an
1720 itype whose parent is itself an itype.
1721 (Complete_Private_Subtype): If the private view has unknown
1722 discriminants and the full view is an unconstrained array, set base
1723 type of completion to the full view of parent.
1724 (Inherit_Predicate_Flags): Prevent double assignment of predicate
1726 (Build_Subtype): For a constrained array component, propagate predicate
1727 information from original component type declaration.
1729 2018-05-23 Boris Yakobowski <yakobowski@adacore.com>
1731 * libgnat/a-ngelfu.ads (Arctanh, Arccoth): Fix faulty preconditions.
1733 2018-05-23 Arnaud Charlet <charlet@adacore.com>
1735 * checks.adb (Minimize_Eliminate_Overflows): Default initialize Lo and
1737 * sem_elab.adb: Make "out" parameters instead of "in out" when
1740 2018-05-23 Bob Duff <duff@adacore.com>
1742 * gnatbind.adb (List_Applicable_Restrictions): Add
1743 No_Implementation_Restrictions to the list of restrictions not to list.
1744 Remove double negative "not No_Restriction_List". Comment the
1745 commentary that is output, so it won't cause errors if used directly in
1748 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1750 * sem_prag.adb (Inherit_Class_Wide_Pre): Refine legality check on
1751 class-wide precondition on a type extension when ancestor does not have
1752 a class-wide precondition. Previously the compiler accepted such a
1753 precondition when the ancestor had a class-wide postcondition.
1755 2018-05-23 Javier Miranda <miranda@adacore.com>
1757 * sem_attr.adb (Valid_Scalars): Do not invoke Error_Attr_P to report
1758 the warning on occurrences of this attribute whose evaluation is always
1759 true (since that subprogram aborts processing the attribute). In
1760 addition, replace the node by its boolean result 'True' (required
1761 because the backend has no knowledge of this attribute).
1763 2018-05-23 Bob Duff <duff@adacore.com>
1765 * libgnat/a-convec.adb: (Insert, Insert_Space): Suppress warnings. The
1766 code in question is not reachable in the case where Count_Type'Last is
1769 2018-05-23 Yannick Moy <moy@adacore.com>
1771 * doc/gnat_rm/implementation_defined_pragmas.rst: Clarify meaning of
1772 local pragma Warnings Off without On.
1773 * gnat_rm.texi: Regenerate.
1775 2018-05-23 Olivier Hainque <hainque@adacore.com>
1777 * libgnat/g-excact.ads (Is_Foreign_Exception): New predicate.
1778 * libgnat/g-excact.adb: Implement.
1780 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1782 * sem_ch5.adb (Analyze_Iterator_Specification): If a subtype indication
1783 is present, verify its legality when the domain of iteration is a
1784 GNAT-specific formal container, as is already done for arrays and
1785 predefined containers.
1787 2018-05-23 Yannick Moy <moy@adacore.com>
1789 * sem_util.adb (Enclosing_Declaration): Fix the case of a named number
1790 declaration, which was not taken into account.
1792 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1794 * debug.adb: Switch -gnatd_s is now used to stop elaboration checks on
1795 synchronized suspension.
1796 * rtsfind.ads: Add entries for units Ada.Synchronous_Barriers and
1797 Ada.Synchronous_Task_Control and routines Suspend_Until_True and
1799 * sem_elab.adb: Document switch -gnatd_s.
1800 (In_Task_Body): New routine.
1801 (Is_Potential_Scenario): Code cleanup. Stop the traversal of a task
1802 body when the current construct denotes a synchronous suspension call,
1803 and restriction No_Entry_Calls_In_Elaboration_Code or switch -gnatd_s
1805 (Is_Synchronous_Suspension_Call): New routine.
1806 * switch-c.adb (Scan_Front_End_Switches): Switch -gnatJ now sets switch
1809 2018-05-23 Javier Miranda <miranda@adacore.com>
1811 * exp_disp.adb (Make_DT): Restrict the initialization of
1812 External_Tag and Expanded_Name to an empty string to the case where
1813 both pragmas apply (i.e. No_Tagged_Streams and Discard_Names), since
1814 restricted runtimes are compiled with pragma Discard_Names.
1815 * doc/gnat_rm/implementation_defined_pragmas.rst,
1816 doc/gnat_rm/implementation_defined_characteristics.rst: Add
1818 * gnat_rm.texi: Regenerate.
1820 2018-05-23 Maroua Maalej <maalej@adacore.com>
1822 * sem_spark.adb: Fix of some permission rules of pointers in SPARK.
1824 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1826 * sem_ch5.adb (Preanalyze_Range): The pre-analysis of the domain of
1827 iteration of an Ada2012 loop is performed to determine the type of the
1828 domain, but full analysis is performed once the loop is rewritten as a
1829 while-loop during expansion. The pre-analysis suppresses expansion; it
1830 must also suppress the generation of freeze nodes, which may otherwise
1831 appear in the wrong scope before rewritting.
1833 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1835 * sem_elab.adb: Update the section on suppressing elaboration warnings.
1837 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1839 * einfo.adb (Is_Elaboration_Checks_OK_Id): Use predicate
1840 Is_Elaboration_Target.
1841 (Is_Elaboration_Target): New routine.
1842 (Is_Elaboration_Warnings_OK_Id): Use predicate Is_Elaboration_Target.
1843 (Set_Is_Elaboration_Checks_OK_Id): Use predicate Is_Elaboration_Target.
1844 (Set_Is_Elaboration_Warnings_OK_Id): Use predicate
1845 Is_Elaboration_Target.
1846 * einfo.ads: Add new synthesized attribute Is_Elaboration_Target along
1847 with occurrences in nodes.
1848 (Is_Elaboration_Target): New routine.
1849 * sem_prag.adb (Analyze_Pragma): Suppress elaboration warnings when an
1850 elaboration target is subject to pragma Warnings (Off, ...).
1852 2018-05-23 Eric Botcazou <ebotcazou@adacore.com>
1854 * repinfo.adb (List_Type_Info): Remove obsolete stuff.
1856 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1858 * einfo.adb: Flag304 is now Is_Elaboration_Warnings_OK_Id.
1859 (Is_Elaboration_Warnings_OK_Id): New routine.
1860 (Set_Is_Elaboration_Warnings_OK_Id): New routine.
1861 (Write_Entity_Flags): Output Flag304.
1862 * einfo.ads: Add new attribute Is_Elaboration_Warnings_OK_Id along with
1863 occurrences in entities.
1864 (Is_Elaboration_Warnings_OK_Id): New routine along with pragma Inline.
1865 (Set_Is_Elaboration_Warnings_OK_Id): New routine along with pragma
1867 * sem_attr.adb (Analyze_Access_Attribute): Capture the state of
1868 elaboration warnings.
1869 * sem_ch3.adb (Analyze_Object_Declaration): Capture the state of
1870 elaboration warnings.
1871 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Capture the
1872 state of elaboration warnings.
1873 (Analyze_Subprogram_Body_Helper): Capture the state of elaboration
1875 (Analyze_Subprogram_Declaration): Capture the state of elaboration
1877 * sem_ch9.adb (Analyze_Entry_Declaration): Capture the state of
1878 elaboration warnings.
1879 (Analyze_Single_Task_Declaration): Capture the state of elaboration
1881 (Analyze_Task_Type_Declaration): Capture the state of elaboration
1883 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Capture the state
1884 of elaboration warnings.
1885 (Analyze_Generic_Subprogram_Declaration): Capture the state of
1886 elaboration warnings.
1887 * sem_elab.adb: Add a section on suppressing elaboration warnings.
1888 Type Processing_Attributes includes component Suppress_Warnings
1889 intended to suppress any elaboration warnings along a path in the
1890 graph. Update Initial_State to include a value for this component.
1891 Types Target_Attributes and Task_Attriutes include component
1892 Elab_Warnings_OK to indicate whether the target or task has elaboration
1893 warnings enabled. component Elab_Warnings_OK.
1894 (Build_Access_Marker): Propagate attribute
1895 Is_Elaboration_Warnings_OK_Node from the attribute to the generated
1897 (Extract_Instantiation_Attributes): Set the value for Elab_Warnings_OK.
1898 (Extract_Target_Attributes): Set the value for Elab_Warnings_OK.
1899 (Extract_Task_Attributes): Set the value for Elab_Warnings_OK.
1900 (Process_Conditional_ABE_Access): Suppress futher elaboration warnings
1901 when already in this mode or when the attribute or target have warnings
1903 (Process_Conditional_ABE_Activation_Impl): Do not emit any diagnostics
1904 if warnings are suppressed.
1905 (Process_Conditional_ABE_Call): Suppress further elaboration warnings
1906 when already in this mode, or the target or call have warnings
1908 (Process_Conditional_ABE_Call_Ada): Do not emit any diagnostics if
1909 warnings are suppressed.
1910 (Process_Conditional_ABE_Call_SPARK): Do not emit any diagnostics if
1911 warnings are suppressed.
1912 (Process_Conditional_ABE_Instantiation): Suppress further elaboration
1913 warnings when already in this mode or when the instantiation has
1914 warnings suppressed.
1915 (Process_Conditional_ABE_Instantiation_Ada): Do not emit any
1916 diagnostics if warnings are suppressed.
1917 (Process_Conditional_ABE_Variable_Assignment_Ada): Use the more
1918 specific Is_Elaboration_Warnings_OK_Id rather than Warnings_Off.
1919 (Process_Conditional_ABE_Variable_Assignment_SPARK): Use the more
1920 specific Is_Elaboration_Warnings_OK_Id rather than Warnings_Off.
1921 (Process_Task_Object): Suppress further elaboration warnings when
1922 already in this mode, or when the object, activation call, or task type
1923 have warnings suppressed. Update the processing state to indicate that
1924 the path goes through a task body.
1925 * sinfo.adb (Is_Elaboration_Warnings_OK_Node): Accept attribute
1927 (Set_Is_Elaboration_Warnings_OK_Node): Accept attribute references.
1928 * sinfo.ads: Attribute Is_Elaboration_Warnings_OK_Node now applies to
1929 attribute references.
1931 2018-05-23 Piotr Trojanek <trojanek@adacore.com>
1933 * einfo.ads: Minor reformatting.
1935 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1937 * sem_ch3.adb (Analyze_Object_Declaration): If expression is an
1938 anonymous_access_to_ subprogram formal, apply a conversion to force an
1939 accsssibility check that will fail statically, enforcing 3.10.2 (13).
1941 2018-05-23 Daniel Mercier <mercier@adacore.com>
1943 * gnat1drv.adb: Turn off length expansion in CodePeer mode.
1945 2018-05-23 Bob Duff <duff@adacore.com>
1947 * freeze.adb: (Check_Address_Clause): Deal with build-in-place
1948 aggregates in addition to build-in-place calls.
1950 2018-05-23 Bob Duff <duff@adacore.com>
1952 * einfo.ads: Minor reformatting.
1953 * sem_ch3.adb: Likewise.
1954 * sinfo.ads: Likewise.
1956 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1958 * exp_ch3.adb (Default_Initialize_Object): Do not optimize scalar array
1959 initialization when the component type has predicates.
1960 * exp_ch4.adb (Expand_N_Allocator): Do not optimize scalar array
1961 allocation when the component type has predicates.
1963 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1965 * einfo.adb, exp_disp.adb, sem_ch3.adb, sem_ch6.adb, sem_prag.adb:
1968 2018-05-22 Justin Squirek <squirek@adacore.com>
1970 * sem_ch6.adb (Analyze_Expression_Function): Propagate flags from the
1971 original function spec into the generated function spec due to
1972 expansion of expression functions during analysis.
1973 (Analyze_Subprogram_Body_Helper): Modify check on formal parameter
1974 references from the body to the subprogram spec in the case of
1975 expression functions because of inconsistances related to having a
1977 * libgnarl/s-osinte__android.ads: Flag parameters as unused.
1978 * libgnarl/s-osinte__lynxos178e.ads: Likewise.
1979 * libgnarl/s-osinte__qnx.adb: Likewise.
1980 * libgnarl/s-osinte__qnx.ads: Likewise.
1982 2018-05-22 Doug Rupp <rupp@adacore.com>
1984 * init.c (HAVE_ADJUST_CONTEXT_FOR_RAISE): Don't define on VxWorks7 for
1987 2018-05-22 Olivier Hainque <hainque@adacore.com>
1989 * libgnat/a-except.adb (Exception_Propagation.Propagate_Exception):
1990 Expect an Exception_Occurence object, not an Access.
1991 (Complete_And_Propagate_Occurrence): Adjust accordingly.
1992 (Raise_From_Signal_Handler): Likewise.
1993 (Reraise_Occurrence_No_Defer): If we have a Machine_Occurrence
1994 available in the provided occurrence object, just re-propagate the
1995 latter as a bare "raise;" would do.
1996 * libgnat/a-exexpr.adb (Propagate_Exception): Adjust to spec change.
1997 * libgnat/a-exstat.adb (String_To_EO): Initialize X.Machine_Occurrence
1998 to null, to mark that the occurrence we're crafting from the stream
1999 contents is not being propagated (yet).
2001 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2003 * exp_aggr.adb (Initialize_Ctrl_Record_Component): Insert the generated
2004 code for a transient component in line with the rest of the
2005 initialization code, rather than before the aggregate. This ensures
2006 that the component has proper visibility of the discriminants.
2008 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2010 * adaint.c: Reorganize QNX-specific macros, use syspage to retreive the
2013 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2015 * sigtramp-qnx.c: Properly restore link register in signal trampoline.
2017 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2019 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): Strip away any
2020 conversions before extracting the value of the expression.
2021 * exp_ch3.adb (Default_Initialize_Object): Optimize the default
2022 initialization of an array of scalars.
2023 (Get_Simple_Init_Val): Add processing for array types. Remove the
2024 processing of strings because this case is already handled by the array
2026 (Needs_Simple_Initialization): Moved to Sem_Util.
2027 (Simple_Init_Array_Type): New routine.
2028 (Simple_Init_Initialize_Scalars_Type): Reimplemented to use the new
2029 facilities from Sem_Util.
2030 (Simple_Initialization_OK): New routine.
2031 * exp_ch3.ads (Needs_Simple_Initialization): Moved to Sem_Util.
2032 * exp_ch4.adb (Expand_N_Allocator): Optimize the default allocation of
2033 an array of scalars.
2034 * sem_prag.adb (Analyze_Float_Value): New routine.
2035 (Analyze_Integer_Value): New routine.
2036 (Analyze_Pragma): Reimplement the analysis of pragma Initialize_Scalars
2037 to handled the extended form of the pragma.
2038 (Analyze_Type_Value_Pair): New routine.
2039 * sem_util.adb: Add invalid value-related data structures.
2040 (Examine_Array_Bounds): New routine.
2041 (Has_Static_Array_Bounds): Reimplemented.
2042 (Has_Static_Non_Empty_Array_Bounds): New routine.
2043 (Invalid_Scalar_Value): New routine.
2044 (Needs_Simple_Initialization): Moved from Exp_Ch3.
2045 (Set_Invalid_Scalar_Value): New routines.
2046 * sem_util.ads (Has_Static_Non_Empty_Array_Bounds): New routine.
2047 (Invalid_Scalar_Value): New routine.
2048 (Needs_Simple_Initialization): Moved from Exp_Ch3.
2049 (Set_Invalid_Scalar_Value): New routines.
2050 * snames.ads-tmpl: Add names for the salar type families used by pragma
2053 2018-05-22 Javier Miranda <miranda@adacore.com>
2055 * exp_disp.adb (Make_DT): Initialize the External_Tag with an empty
2056 string when pragma No_Tagged_Streams is applicable to the tagged type,
2057 and initialize the Expanded_Name with an empty string when pragma
2058 Discard_Names is applicable to the tagged type.
2060 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2062 * sem_ch6.adb (Check_Conformance): Add RM reference for rule that a
2063 formal subprogram is never subtype conformqnt, and thus cannot be the
2064 prefix of 'Access. Reject as well the attribute when applied to a
2065 renaming of a formal subprogram.
2067 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2069 * exp_ch3.adb (Build_Array_Init_Proc): Update the call to
2070 Needs_Simple_Initialization.
2071 (Build_Init_Statements): Update the call to Get_Simple_Init_Val.
2072 (Check_Subtype_Bounds): Renamed to Extract_Subtype_Bounds. Update the
2073 profile and comment on usage.
2074 (Default_Initialize_Object): Do not use New_Copy_Tree to set the proper
2075 Sloc of a value obtained from aspect Default_Value because this could
2076 potentially replicate large trees. The proper Sloc is now set in
2077 Get_Simple_Init_Val.
2078 (Get_Simple_Init_Val): Reorganized by breaking the various cases into
2079 separate routines. Eliminate the use of global variables.
2080 (Init_Component): Update the call to Get_Simple_Init_Val.
2081 (Needs_Simple_Initialization): Update the parameter profile and all
2083 (Simple_Init_Defaulted_Type): Copy the value of aspect Default_Value
2084 and set the proper Sloc.
2085 * exp_ch3.ads (Get_Simple_Init_Val): Update the parameter profile and
2087 (Needs_Simple_Initialization): Update the parameter profile.
2089 2018-05-22 Patrick Bernardi <bernardi@adacore.com>
2091 * sem_ch3.adb (Build_Discriminant_Constraints): Raise an error if the
2092 user tries to use a subtype indication as a discriminant constraint.
2094 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2096 * exp_ch4.ads, exp_ch4.adb, exp_util.adb, expander.adb: Remove mention
2097 of N_Reduction_Expression and N_Reduction_Expression_Parameter.
2098 * par-ch4.adb: Remove parsing routines for reduction expressions.
2099 * sem.adb, sinfo.ads, sinfo.adb, sem_ch4.ads, sem_ch4.adb, sem_res.adb,
2100 sem_spark.adb, sprint.adb: Remove analysis routines for reduction
2103 2018-05-22 Arnaud Charlet <charlet@adacore.com>
2105 * sem_ch8.adb (Check_Frozen_Renaming): Do not emit error in
2106 Relaxed_RM_Semantics mode.
2108 2018-05-22 Arnaud Charlet <charlet@adacore.com>
2110 * comperr.adb (Delete_SCIL_Files): Take into account
2111 N_Generic_Package_Renaming_Declaration.
2113 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2115 * sem_ch3.adb (Search_Derivation_Levels): Whenever a parent type is
2116 private, use the full view if available, because it may include renamed
2117 discriminants whose values are stored in the corresponding
2120 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2122 * einfo.ads, einfo.adb: New attribute Hidden_In_Formal_Instance,
2123 defined on packages that are actuals for formal packages, in order to
2124 set/reset the visibility of the formals of a formal package with given
2125 actuals, when there are subsequent uses of those formals in the
2126 enclosing generic, as required by RN 12.7 (10).
2127 * atree.ads, atree.adb: Add operations for Elist30.
2128 * atree.h: Add Elist30.
2129 * sem_ch12.adb (Analyze_Formal_Package_Instantiation): Collect formals
2130 that are not defaulted and are thus not visible within the current
2132 (Check_Formal_Packages): Reset visibility of formals of a formal
2133 package that are not defaulted, on exit from current instance.
2135 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2137 * sem_prag.adb (Analyze_Input_Output): Emit an error when a non-null,
2138 non-'Result output appears in the output list of a function.
2140 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2142 * exp_attr.adb (Build_Array_VS_Func): Reimplemented.
2143 (Build_Record_VS_Func): Reimplemented.
2144 (Expand_N_Attribute): Reimplement the handling of attribute
2146 * sem_attr.adb (Analyze_Attribute): Reimplement the handling of
2147 attribute 'Valid_Scalars.
2148 * sem_util.adb (Scalar_Part_Present): Reimplemented.
2149 (Validated_View): New routine.
2150 * sem_util.ads (Scalar_Part_Present): Update the parameter profile and
2152 (Validated_View): New routine.
2153 * doc/gnat_rm/implementation_defined_attributes.rst: Update the
2154 documentation of attribute 'Valid_Scalars.
2155 * gnat_rm.texi: Regenerate.
2157 2018-05-22 Bob Duff <duff@adacore.com>
2159 * binde.adb: (Choose): Ignore a pragma Elaborate_Body that appears in
2160 the spec of a SAL_Interface package.
2162 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2164 * freeze.adb (Freeze_Entity): When analyzing delayed aspects of an
2165 entity E within a generic unit, indicate that there are no remaining
2166 delayed aspects after invoking Analyze_Aspects_At_Freeze_Point. The
2167 entity E is not frozen yet but the aspects should not be reanalyzed at
2168 the freeze point, which may be outside of the generic and may not have
2169 the proper visibility.
2171 2018-05-22 Bob Duff <duff@adacore.com>
2173 * doc/gnat_ugn/gnat_utility_programs.rst: Add documentation for
2174 the new --split-line-before-record, --indent-named-statements and
2175 --no-align-modes gnatpp switches.
2177 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2179 * sem_prag.adb (Process_Compile_Time_Warning_Or_Error): Handle properly
2180 a second argument that is a constant of a given string value.
2182 2018-05-22 Doug Rupp <rupp@adacore.com>
2184 * sigtramp-vxworks-target.inc: Align stack to 128bits on AArch64.
2186 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2188 * sigtramp-qnx.c: Fix stack alignment issue in the signal trampoline.
2190 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2192 * freeze.adb (Freeze_Fixed_Point_Type): If the first subtype has
2193 delayed aspects, analyze them now, os that the representation of the
2194 type (size, bounds) can be computed and validated.
2196 2018-05-22 Olivier Hainque <hainque@adacore.com>
2198 * libgnat/s-dwalin.adb (Enable_Cache): Skip symbols outside of the
2199 executable code section boundaries.
2201 2018-05-22 Javier Miranda <miranda@adacore.com>
2203 * locales.c: New implementation for the Ada.Locales package.
2204 * libgnat/a-locale.ads: Remove comment indicating that this is not
2206 * doc/gnat_rm/standard_library_routines.rst: Remove comment indicating
2207 that this is not implemented.
2208 * gnat_rm.texi: Regenerate.
2210 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2212 * exp_ch5.adb, freeze.adb, pprint.adb, sem_ch4.adb, sem_res.adb: Minor
2215 2018-05-22 Justin Squirek <squirek@adacore.com>
2217 * sem_ch12.adb (In_Same_Declarative_Part): Moved to sem_util.
2218 (Freeze_Subprogram_Body, Install_Body): Modify calls to
2219 In_Same_Declarative_Part.
2220 * sem_prag.adb (Analyze_Pragma-Pragma_Pure_Function): Add check to
2221 verify pragma declaration is within the same declarative list with
2222 corresponding error message.
2223 * sem_util.adb, sem_util.ads (In_Same_Declarative_Part): Moved from
2224 sem_ch12.adb and generalized to be useful outside the scope of
2227 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2229 * sem_ch6.adb (Analyze_Subprogram_Declaration): Set the proper
2230 categorization of the unit after processing the aspects in case one of
2231 its aspects is converted into a categorization pragma.
2233 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2235 * freeze.adb (Warn_Overlay): Do not emit a wawrning on an object
2236 declaration with an explicit address clause and a type with default
2237 initialization, if the declaration carries an aspect
2238 Suppress_Initialization.
2240 2018-05-21 Daniel Mercier <mercier@adacore.com>
2242 * pprint.adb: Use mixed case for attribute names.
2244 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2246 * sem_ch6.adb (Analyze_Generic_Subprogram_Body): Rename the call to
2247 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2248 (Analyze_Subprogram_Body_Helper): Rename the calls to
2249 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2250 * sem_ch9.adb (Analyze_Entry_Body): Rename the call to
2251 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2252 * sem_ch10.adb: Add with and use clause for Sem_Ch13.
2253 (Analyze_Package_Body_Stub): Add constant Id. Decorate the package stub
2254 prior to analyzing its aspects.
2255 (Analyze_Protected_Body_Stub): Add constant Id. Decorate the package
2256 stub prior to analyzing its aspects. Save and restore the configuration
2258 (Analyze_Task_Body_Stub): Add constant Id. Decorate the package stub
2259 prior to analyzing its aspects.
2260 * sem_ch13.adb (Analyze_Aspect_Specifications_On_Body_Or_Stub): Renamed
2261 to Analyze_Aspects_On_Subprogram_Body_Or_Stub.
2262 * sem_ch13.ads (Analyze_Aspect_Specifications_On_Body_Or_Stub): Renamed
2263 to Analyze_Aspects_On_Subprogram_Body_Or_Stub.
2264 * sem_prag.adb: Code reformatting.
2265 (Analyze_Refined_Depends_Global_Post): Consider task body stubs.
2267 2018-05-21 Jerome Lambourg <lambourg@adacore.com>
2269 * gcc-interface/Makefile.in: Add g-soliop__qnx.ads to the runtime build
2272 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2274 * exp_cg.adb: Remove with and use clause for Exp_Disp.
2275 * exp_ch9.adb: Remove with and use clause for Exp_Disp.
2276 * exp_disp.adb (Is_Predefined_Dispatching_Operation): Moved to Sem_Util.
2277 (Is_Predefined_Interface_Primitive): Moved to Sem_Util.
2278 (Is_Predefined_Internal_Operation): Moved to Sem_Util.
2279 * exp_disp.ads (Is_Predefined_Dispatching_Operation): Moved to Sem_Util.
2280 (Is_Predefined_Interface_Primitive): Moved to Sem_Util.
2281 (Is_Predefined_Internal_Operation): Moved to Sem_Util.
2282 * exp_dist.adb: Remove with and use clause for Exp_Disp.
2283 * freeze.adb: Remove with and use clause for Exp_Disp.
2284 * sem_cat.adb: Remove with and use clause for Exp_Disp.
2285 * sem_ch6.adb: Remove with and use clause for Exp_Disp.
2286 * sem_ch12.adb: Remove with and use clause for Exp_Disp.
2287 * sem_elab.adb (Check_Overriding_Primitive): Do not process predefined
2289 * sem_util.adb: Remove with and use clause for Exp_Disp.
2290 (Is_Predefined_Dispatching_Operation): Moved from Exp_Disp.
2291 (Is_Predefined_Interface_Primitive): Moved from Exp_Disp.
2292 (Is_Predefined_Internal_Operation): Moved from Exp_Disp.
2293 * sem_util.ads (Is_Predefined_Dispatching_Operation): Moved from
2295 (Is_Predefined_Interface_Primitive): Moved from Exp_Disp.
2296 (Is_Predefined_Internal_Operation): Moved from Exp_Disp.
2298 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2300 * sem_res.adb (Valid_Conversion): Improve error message on an illegal
2301 type conversion whose expression has a limited view of a type.
2303 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2305 * exp_ch5.adb (Build_Formal_Container_Iteration): If source has
2306 explicit name for iterator loop, preserve that name in expanded
2307 construct, for possible use in exit statements.
2309 2018-05-21 Javier Miranda <miranda@adacore.com>
2311 * sem_ch4.adb (Analyze_Membership_Op): Avoid compiler crash when the
2312 spec of a unit has Ada 2012 membership tests with multiple choices and
2313 the unit body is not compiled under Ada 2012 mode.
2315 2018-05-21 Doug Rupp <rupp@adacore.com>
2317 * sigtramp-vxworks-target.inc: Set cfa_reg properly from sigcontext
2319 (CFI_COMMON_REGS): Restore LR jic probed from prologue.
2320 (REGNO_PC_OFFSET): Change to correct value for Aarch64.
2322 2018-05-21 Jose Ruiz <ruiz@adacore.com>
2324 * doc/gnat_ugn/gnat_utility_programs.rst, exp_attr.adb,
2325 libgnarl/s-tassta.adb: Minor typo fixes
2327 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2329 * sem_ch4.adb (Analyze_One_Call): Recognize complex cases where an
2330 indexed call originally in prefix forn is itself the prefix of a
2333 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2335 * sem_eval.adb (Is_Null_Range): Clarify access to the full view of a
2337 (Not_Null_Range): Same as above.
2339 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2341 * exp_ch3.adb: Minor reformatting.
2342 * exp_ch6.adb: Likewise.
2343 * freeze.adb: Likewise.
2344 * inline.adb: Likewise.
2345 * sem_util.adb: Likewise.
2347 2018-05-21 Yannick Moy <moy@adacore.com>
2349 * inline.adb (Expand_Inlined_Call.Process_Formals): Use a type
2350 conversion instead of an unchecked type conversion when inlining a
2351 return statement, unless type qualification is required (for character
2352 and string literal) or no check can result from the conversion (for
2354 * opt.ads: Update comment.
2356 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2358 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Install the elaboration
2359 model of the compilation unit spec, if any.
2360 * sem_ch7.adb (Analyze_Package_Body_Helper): Install the elaboration
2361 model of the compilation unit spec, if any.
2362 * sem_ch10.adb (Analyze_Subunit): Install the elaboration model of the
2363 parent compilation unit spec, if any.
2364 * sem_elab.adb (Check_Elaboration_Scenarios): Restore the elaboration
2365 model of the main unit.
2366 (Is_Same_Unit): The routine now uses Unit_Entity.
2367 (Is_Subunit): Removed.
2368 (Normalize_Unit): Removed.
2369 (Unit_Entity): New routine.
2370 * sem_prag.adb (Analyze_Pragma): Reimplement the handling of pragma
2371 Elaboration_Checks. The analysis now ensures that the pragma appears at
2372 the configuration level, and on the initial declaration of a unit.
2373 Other placements are either flagged as illegal, or ignored.
2374 (Check_Duplicate_Elaboration_Checks_Pragma): New routine.
2375 (Ignore_Elaboration_Checks_Pragma): New routine.
2376 * sem_util.adb (Install_Elaboration_Model): New routine.
2377 * sem_util.ads (Install_Elaboration_Model): New routine.
2378 * doc/gnat_rm/implementation_defined_pragmas.rst: Update the
2379 documentation of pragma Elaboration_Checks.
2380 * gnat_rm.texi: Regenerate.
2382 2018-05-21 Olivier Hainque <hainque@adacore.com>
2384 * libgnat/s-trasym__dwarf.adb (Executable_Name): Return argv[0] instead
2385 of empty string when argv[0] couldn't be found on PATH.
2386 (Enable_Cache): Raise Program_Error instead of attempting a null
2387 pointer dereference when the Exec_Module initialization failed.
2389 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2391 * libgnarl/a-reatim.ads (Clock_Time): Remove External aspect.
2392 * libgnarl/a-taside.ads (Tasking_State): Likewise.
2393 * libgnat/a-calend.ads (Clock_Time): Likewise.
2395 2018-05-21 Yannick Moy <moy@adacore.com>
2397 * sem_ch6.adb (Analyze_Procedure_Call): Refine test to recognize prefix
2398 call notation in inlined call in GNATprove mode.
2400 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2402 * einfo.adb (Is_External_State): An abstract state is also external
2403 when it is declared with option "synchronous".
2404 * einfo.ads: Update the documentation of synthesized attribute
2406 * sem_util.adb (Find_Simple_Properties): New routine.
2407 (Is_Enabled_External_Property): New routine.
2408 (State_Has_Enabled_Property): Reimplemented. The two flavors of option
2409 External have precedence over option Synchronous when determining
2410 whether a property is in effect.
2412 2018-05-21 Yannick Moy <moy@adacore.com>
2414 * sem_eval.adb (Static_Length): Take into account case of variable of
2415 subtype string literal.
2417 2018-05-21 Olivier Hainque <hainque@adacore.com>
2419 * libgnat/s-objrea.ads (Get_Memory_Bounds): Rename as Get_Xcode_Bounds.
2420 (Object_Section): Rename Flag_Alloc component as Flag_Xcode.
2421 * libgnat/s-objrea.adb (Get_Xcode_Bounds): Adjust to new subprogram and
2423 (Get_Section, ELF case): Set Flag_Xcode from SHF_EXECINSTR.
2424 * libgnat/s-dwalin.adb (Open): Adjust to the Get_Memory_Bounds name
2427 2018-05-21 Olivier Hainque <hainque@adacore.com>
2429 * libgnat/s-dwalin.ads (Dwarf_Context): Change type of Load_Address to
2430 Address, and type of Low, High to Storage_Offset.
2431 (Low): Rename as Low_Address and convey that the return value is a
2432 runtime reference accounting for a load address.
2433 * libgnat/s-dwalin.adb (Read_Aranges_Entry): Adjust to the
2434 address/offset type changes.
2435 (Aranges_Lookup): Likewise.
2436 (Symbolic_Address): Likewise.
2437 (Symbolic_Traceback): Likewise.
2438 (Dump_Cache): Likewise.
2439 (Is_Inside): Likewise.
2441 (Set_Load_Address): Likewise.
2442 (Low_Address): Likewise, and account for C.Load_Address.
2443 * libgnat/s-trasym__dwarf.adb (Lt): Use Low_Address instead of Low.
2444 (Multi_Module_Symbolic_Traceback): Compare address in traceback
2445 with module Low_Address instead of Low.
2447 2018-05-21 Olivier Hainque <hainque@adacore.com>
2449 * libgnat/s-dwalin.ads (Dwarf_Context): Rename Load_Slide as
2451 * libgnat/s-dwalin.adb (Is_Inside): Adjust accordingly.
2452 (Set_Load_Address): Likewise.
2453 (Symbolic_Traceback): Likewise.
2455 2018-05-21 Olivier Hainque <hainque@adacore.com>
2457 * libgnat/s-trasym__dwarf.adb (Add_Module_To_Cache): Expect a
2458 Load_Address argument and pass it down to Init_Module.
2459 * libgnat/s-tsmona__linux.adb (Build_Cache_For_All_Modules): Pass
2460 lm.l_addr as the Load_Address to Add_Module_To_Cache.
2462 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2464 * einfo.adb (Has_Discriminants): Stronger assertion.
2465 (Set_Has_Discriminants): Stronger assertion.
2466 * sem_ch13.adb (Push_Scope_And_Install_Discriminants): Adapt to respect
2467 the stronger assertion on Has_Discriminant.
2468 (Uninstall_Discriminants_And_Pop_Scope): Same as above.
2469 * sem_util.adb (New_Copy_Tree): Same as above.
2470 * sem_ch7.adb (Generate_Parent_References): Prevent calls to
2471 Has_Discriminant on non-type entities that might happen when the
2472 compiled code has errors.
2473 * sem_ch3.adb (Derived_Type_Declaration): Only call
2474 Set_Has_Discriminant on type entities.
2476 2018-05-21 Arnaud Charlet <charlet@adacore.com>
2478 * exp_unst.adb (Unnest_Subprogram): Unnest all subprograms relevant for
2481 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2483 * lib.ads: Fix typo in enumeration in comment.
2485 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2487 * sem_attr.adb (Analyze_Attribute, case Scalar_Storage_Order): The
2488 attribute reference is legal within a generic unit when the prefix is a
2489 formal private type.
2491 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2493 * exp_ch7.adb (Establish_Transient_Scope): Code cleanup. Do not
2494 delegate the secondary stack management when there is no suitable
2495 transient context, and the transient scope was intended to manage the
2496 secondary stack because this causes premature reclamation. Change the
2497 transient scope creation logic by special casing assignment statements
2498 of controlled components for type initialization procedures.
2499 (Find_Node_To_Be_Wrapped): Renamed to Find_Transient_Context. Update
2500 the comment on usage.
2501 (Find_Transient_Context): Change the initinte loop into a while loop.
2502 Iterations schemes and iterator specifications are not valid transient
2503 contexts because they rely on special processing. Assignment statements
2504 are now treated as a normal transient context, special cases are
2505 handled by the caller. Add special processing for pragma Check.
2506 (Is_OK_Construct): Removed. Its functionality has been merged in
2507 routine Find_Transient_Context.
2508 * sem_ch5.adb (Check_Call): Reimplemented. Add code to properly
2509 retrieve the subprogram being invoked. Use a more accurate predicate
2510 (Requires_Transient_Scope) to determine that the function will emply
2511 the secondary stack.
2513 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2515 * ada_get_targ.adb: Fix subprogram body headers.
2516 * adabkend.adb: Likewise.
2517 * checks.adb: Likewise.
2518 * exp_ch3.adb: Likewise.
2519 * exp_ch5.adb: Likewise.
2520 * exp_ch9.adb: Likewise.
2521 * exp_dist.adb: Likewise.
2522 * exp_tss.adb: Likewise.
2523 * inline.adb: Likewise.
2524 * lib-writ.adb: Likewise.
2525 * lib-xref-spark_specific.adb: Likewise.
2526 * libgnarl/s-osinte__darwin.adb: Likewise.
2527 * libgnarl/s-stusta.adb: Likewise.
2528 * libgnarl/s-taprop__solaris.adb: Likewise.
2529 * libgnarl/s-tposen.adb: Likewise.
2530 * libgnarl/s-vxwext__kernel-smp.adb: Likewise.
2531 * libgnarl/s-vxwext__kernel.adb: Likewise.
2532 * libgnat/a-btgbso.adb: Likewise.
2533 * libgnat/a-cfdlli.adb: Likewise.
2534 * libgnat/a-cfhama.adb: Likewise.
2535 * libgnat/a-cfinve.adb: Likewise.
2536 * libgnat/a-cimutr.adb: Likewise.
2537 * libgnat/a-coboho.adb: Likewise.
2538 * libgnat/a-cofove.adb: Likewise.
2539 * libgnat/a-cofuve.adb: Likewise.
2540 * libgnat/a-comutr.adb: Likewise.
2541 * libgnat/a-exexda.adb: Likewise.
2542 * libgnat/a-tags.adb: Likewise.
2543 * libgnat/a-tideau.adb: Likewise.
2544 * libgnat/a-wtdeau.adb: Likewise.
2545 * libgnat/a-ztdeau.adb: Likewise.
2546 * libgnat/g-alleve.adb: Likewise.
2547 * libgnat/s-excdeb.adb: Likewise.
2548 * libgnat/s-parint.adb: Likewise.
2549 * libgnat/s-shasto.adb: Likewise.
2550 * libgnat/s-traceb__hpux.adb: Likewise.
2551 * prepcomp.adb: Likewise.
2552 * sem_ch4.adb: Likewise.
2553 * sem_ch6.adb: Likewise.
2554 * sem_dist.adb: Likewise.
2555 * sem_prag.adb: Likewise.
2556 * sem_util.adb: Likewise.
2557 * sinfo.adb: Likewise.
2558 * switch.adb: Likewise.
2560 2018-05-04 John Marino <gnugcc@marino.st>
2563 * link.c (BSD platforms): Add missing backslash.
2565 2018-04-27 Eric Botcazou <ebotcazou@adacore.com>
2568 * init.c (__gnat_handle_vms_condition): Add missing parentheses.
2570 2018-04-25 Eric Botcazou <ebotcazou@adacore.com>
2573 * gnat_ugn.texi: Regenerate.
2575 2018-03-23 Eric Botcazou <ebotcazou@adacore.com>
2578 * gnatlink.adb (Gnatlink): Remove handling of -b switch.
2579 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (gnatlink):
2580 Remove documentation of -b switch.
2582 2018-03-23 Eric Botcazou <ebotcazou@adacore.com>
2585 * gnatlink.adb (Process_Args): Drop existing link switches if multiple
2586 switches are passed for --LINK.
2588 2018-03-12 Eric Botcazou <ebotcazou@adacore.com>
2591 * gcc-interface/misc.c (gnat_post_options): Disable string overflow
2594 2018-03-10 Eric Botcazou <ebotcazou@adacore.com>
2596 * gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
2597 Consider only entities for objects.
2599 2018-03-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
2601 * gcc-interface/Makefile.in (OSCONS_CPP): Remove redundant
2603 (OSCONS_EXTRACT): Add $(GNATLIBCFLAGS_FOR_C).
2605 2018-03-06 Eric Botcazou <ebotcazou@adacore.com>
2607 * gcc-interface/trans.c (convert_with_check): Fix typo in the condition
2608 guarding the overflow check emitted for the upper bound of a floating-
2611 2018-03-06 Eric Botcazou <ebotcazou@adacore.com>
2613 * gcc-interface/utils.c (def_builtin_1): Bail out on error_mark_node.
2615 2018-02-28 Eric Botcazou <ebotcazou@adacore.com>
2617 * libgnat/i-cexten.ads (Float_128): New type.
2619 2018-02-02 Eric Botcazou <ebotcazou@adacore.com>
2621 * gcc-interface/decl.c (array_type_has_nonaliased_component): Return
2622 false if the component type is a pointer.
2624 2018-01-11 Gary Dismukes <dismukes@adacore.com>
2626 * exp_ch3.adb (Default_Initialize_Object): Call New_Copy_Tree on the
2627 result of Get_Simple_Init_Value and pass the source location of the
2628 object declaration's object_definition.
2630 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2632 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration): Handle
2633 properly object declarations with initializations that are
2634 build-in-place function calls, when there is an address specification,
2635 either as an aspect specification or an explicit attribute
2636 specification clause, for the initialized object.
2637 * freeze.adb (Check_Address_Clause): Do not remove side-effects from
2638 initial expressions in the case of a build-in-place call.
2640 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
2642 * sem_eval.adb (Is_Null_Range): Retrieve the full view when called on a
2643 private (sub)type; refactor to avoid early return statement.
2644 (Not_Null_Range): Same as above.
2646 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2648 * freeze.adb (Freeze_Entity): Ensure that a Ghost type is not
2649 concurrent, nor effectively volatile.
2650 * ghost.adb (Check_Ghost_Type): New routine.
2651 * ghost.ads (Check_Ghost_Type): New routine.
2652 * sem_util.adb (Is_Declaration): Reimplemented. The routine can now
2653 consider specific subsets of declarations.
2654 (Is_Declaration_Other_Than_Renaming): Removed. Its functionality is
2655 replicated by Is_Declaration.
2656 * sem_util.ads (Is_Declaration): New parameter profile. Update the
2658 (Is_Declaration_Other_Than_Renaming): Removed.
2660 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2662 * sem_ch5.adb (Analyze_Assignment): Assignments to variables that act
2663 as Part_Of consituents of single protected types are illegal when they
2664 take place inside a protected function.
2665 (Diagnose_Non_Variable_Lhs): Use Within_Function to check for an
2667 (Is_Protected_Part_Of_Constituent): New routine.
2668 (Within_Function): New routine.
2670 2018-01-11 Arnaud Charlet <charlet@adacore.com>
2672 Bump copyright notices to 2018.
2674 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2676 * binde.adb, par-ch6.adb, par-ch9.adb, sem_ch12.adb, sem_ch13.adb:
2679 2018-01-11 Justin Squirek <squirek@adacore.com>
2681 * par-ch6.adb (Scan_Body_Or_Expression_Function): Add additional check
2682 to make sure a given expression function is properly parenthesized.
2684 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2686 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Check the
2687 categorization of a subprogram body which does not complete a previous
2690 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2692 * sem_ch10.adb (Check_Private_Child_Unit): Ensure that the enclosing
2693 scope of package Ada is Standard.
2695 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2697 * sem_ch13.adb (Replace_Type_Ref): Handle properly reference to a
2698 subcomponent of the current entity when building the body for a dynamic
2699 predicate function for a record with composite subcomponents.
2701 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2703 * exp_aggr.adb (Convert_Aggr_In_Object_Decl): Update the call to
2704 Establish_Transient_Scope.
2705 (Convert_To_Assignments): Update the call to Establish_Transient_Scope.
2706 (Expand_Array_Aggregate): Update the call to Establish_Transient_Scope.
2707 * exp_ch6.adb (Expand_Call_Helper): Update the call to
2708 Establish_Transient_Scope.
2709 (Make_Build_In_Place_Call_In_Object_Declaration): Update the call to
2710 Establish_Transient_Scope.
2711 * exp_ch7.adb (Establish_Transient_Scope): Restructured. Delegate the
2712 management of the secondary stack to an enclosing scope if there is no
2713 suitable construct to wrap, and the transient scope was intended to
2714 manage the secondary stack.
2715 (Find_Node_To_Be_Wrapped): Restructured. A case_statement_alternative
2716 is a valid boundary for a transient expression which comes from the
2717 statements of the alternative, otherwise alternatives cannot be
2718 wrapped. Assignments of controlled objects which have controlled
2719 actions suppressed now stop the traversal as there is no point in
2720 looking for an enclosing construct. Add several N_xxx_Body choices to
2721 the termination conditions for completeness.
2722 * exp_ch7.ads (Establish_Transient_Scope): Update the parameter profile
2723 and the associated comment on usage.
2724 * exp_smem.adb (Add_Shared_Var_Lock_Procs): Update the call to
2725 Establish_Transient_Scope.
2726 (Add_Write_After): Update the call to Establish_Transient_Scope.
2727 * sem_res.adb (Check_Initialization_Call): Removed.
2728 (Resolve_Actuals): Account for additional cases where finalization
2729 actions are required by utilizing predicate Needs_Finalization rather
2731 (Resolve_Call): Type initialization procedures can now utilize
2732 transient scopes to manage the secondary stack, thus preventing leaks
2733 during initialization. Remove the previous kludgy algorithm which
2734 attempts to manage the secondary stack at the object creation site.
2736 2018-01-11 Jerome Lambourg <lambourg@adacore.com>
2738 * libgnat/g-soliop__qnx.ads: New.
2739 * adaint.c, adaint.h, cstreams.c, s-oscons-tmplt.c, sysdep.c: Update
2742 2018-01-11 Bob Duff <duff@adacore.com>
2744 * par-ch9.adb (P_Protected_Operation_Declaration_Opt): Give an error if
2745 a null procedure occurs in a protected definition.
2747 2018-01-11 Bob Duff <duff@adacore.com>
2749 * binderr.ads, namet.ads: Minor reformatting.
2751 2018-01-11 Bob Duff <duff@adacore.com>
2753 * doc/gnat_ugn/gnat_utility_programs.rst: Improve documentation of
2756 2018-01-11 Bob Duff <duff@adacore.com>
2758 * binde.adb (Force_Elab_Order): Give an error if there are duplicate
2761 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2763 * sem_ch6.adb (Freeze_Expr_Types): If an access value is the
2764 controlling argument of a dispatching call. freeze the corresponding
2767 2018-01-11 Ben Brosgol <brosgol@adacore.com>
2769 * doc/Makefile: Add Sphinx option -W to treat warnings as errors.
2771 2018-01-11 Ben Brosgol <brosgol@adacore.com>
2773 * doc/gnat_rm/implementation_defined_aspects.rst: Minor type/wording
2775 * gnat_rm.texi: Regenerate.
2777 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2779 * sem_ch12.adb (Check_Fixed_Point_Type): Do not apply check if the
2780 formsl type corresponding to the actual fixed point type is private,
2781 because in this case there can be no suspicious arithmetic operations
2782 in the generic unless they reference a formal subprogram. Clarify
2785 2018-01-11 Javier Miranda <miranda@adacore.com>
2787 * exp_util.adb (Remove_Side_Effects): No action done for functions
2788 returning class-wide types since it requires generating code using
2789 'reference and the CCG target has no secondary stack.
2790 * gnat1drv.adb: Disable building static dispatch tables when generating
2793 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
2795 * libgnat/a-direio.ads, libgnat/a-sequio.ads, libgnat/a-ststio.ads,
2796 libgnat/a-textio.ads, libgnat/a-witeio.ads, libgnat/a-ztexio.ads
2797 (File_Type): Add Default_Initial_Condition aspect.
2799 2018-01-11 Pascal Obry <obry@adacore.com>
2801 * libgnat/s-os_lib.adb (Normalize_Pathname): New implementation.
2803 2018-01-11 Bob Duff <duff@adacore.com>
2805 * doc/gnat_ugn/gnat_utility_programs.rst: Rewrite gnatpp documentation
2806 to match what the Libadalang-based version does.
2807 * doc/gnat_ugn/about_this_guide.rst: Update reference.
2809 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2811 * sem_res.adb (Uses_SS): A controlled type requires the secondary stack
2812 if it contains at least one component declaration employing a function
2813 call returning on the secondary stack.
2815 2018-01-11 Yannick Moy <moy@adacore.com>
2817 * doc/gnat_rm/standard_and_implementation_defined_restrictions.rst:
2818 Update description of restriction SPARK_05 with SPARK 2014.
2819 * gnat_rm.texi: Regenerate.
2821 2018-01-11 Vasiliy Fofanov <fofanov@adacore.com>
2823 * doc/gnat_ugn/gnat_utility_programs.rst: Fix layout.
2825 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2827 * exp_aggr.adb, exp_ch9.adb, exp_util.adb, sem_aggr.adb, sem_ch3.adb,
2828 sem_res.adb, sem_util.adb: Minor reformatting.
2830 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2832 * sem_prag.adb (Analyze_Pragma, case Predicate): Indicate that the type
2833 has a delayed aspect which must be processed at the point the type is
2834 frozen. This mimics what is done when the predicate is provided by a
2837 2018-01-11 Doug Rupp <rupp@adacore.com>
2839 * init.c (vxworks): Add macro checks for __aarch64__.
2841 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2843 * exp_util.adb (Add_Failure_Expression): New routine.
2844 (Make_Predicate_Check): Reimplement the handling of Predicate_Failure.
2845 * sem_util.adb (Is_Current_Instance): Code cleanup.
2847 2018-01-11 Patrick Bernardi <bernardi@adacore.com>
2849 * libgnat/s-parame*.adb, libgnat/s-parame*.ads: Remove unneeded
2850 Default_Sec_Stack_Size.
2851 * libgnat/s-secsta.adb (SS_Allocate): Handle the fixed secondary stack
2852 limit check so that the integer index does not overflow. Check the
2853 dynamic stack allocation does not cause the secondary stack pointer to
2855 (SS_Info): Align colons.
2856 (SS_Init): Cover the case when bootstraping with an old compiler that
2857 does not set Default_SS_Size.
2859 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2861 * sem_ch3.adb (Add_Internal_Interface_Entities): When checking the
2862 legality of an inherited operation that may require overriding, ignore
2863 primitive_wrappers that correspond to explicit operations that override
2864 an interface primitive.
2865 * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity): If the
2866 operation to which the class-wide expression applies is a protected op.
2867 with a primitive_wrapper, verify that the updated inherited expression
2868 does not contain an internal call to a protected function. This
2869 completes the implementation of AI12-0166.
2871 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2873 * ali.adb: Document the remaining letters available for ALI lines.
2874 (Scan_ALI): A with clause is internal when it is encoded on a 'Z' line.
2875 * ali.ads: Update type With_Record. Field
2876 Implicit_With_From_Instantiation is no longer in use. Add field
2878 * csinfo.adb (CSinfo): Remove the setup for attribute
2879 Implicit_With_From_Instantiation.
2880 * lib-writ.adb (Collect_Withs): Correct the logic which marks a unit as
2881 either implicitly or explicitly withed.
2882 (Is_Implicit_With_Clause): New routine.
2883 (Write_ALI): Rename array Implicit_With to Has_Implicit_With to avoid
2884 confusion with the with clause attribute by the same name.
2885 (Write_With_Lines): Update the emission of 'W', 'Y', and 'Z' headers.
2886 * rtsfind.adb (Maybe_Add_With): Code cleanup.
2887 * sem_ch8.adb (Present_System_Aux): Code cleanup.
2888 * sem_ch10.adb (Expand_With_Clause): Mark the with clause as generated
2890 (Implicit_With_On_Parent): Mark the with clause as generated for a
2892 * sem_ch12.adb (Inherit_Context): With clauses inherited by an
2893 instantiation are no longer marked as Implicit_With_From_Instantiation
2894 because they are already marked as implicit.
2895 * sem_elab.adb (Ensure_Prior_Elaboration_Static): Remove the kludge
2896 which marks implicit with clauses as related to an instantiation.
2897 * sinfo.adb (Implicit_With_From_Instantiation): Removed.
2898 (Parent_With): New routine.
2899 (Set_Implicit_With_From_Instantiation): Removed.
2900 (Set_Parent_With): New routine.
2901 * sinfo.ads: Update the documentation of attribute Implicit_With.
2902 Remove attribute Implicit_With_From_Instantiation along with
2903 occurrences in nodes. Add attribute Parent_With along with occurrences
2905 (Implicit_With_From_Instantiation): Removed along with pragma Inline.
2906 (Parent_With): New routine along with pragma Inline.
2907 (Set_Implicit_With_From_Instantiation): Removed along with pragma Inline.
2908 (Set_Parent_With): New routine along with pragma Inline.
2910 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2912 * sem_util.adb (Find_Enclosing_Scope): Return the unique defining
2913 entity when the enclosing construct is a body.
2915 2018-01-11 Patrick Bernardi <bernardi@adacore.com>
2917 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Simplified
2918 Secondary_Stack_Size handling as a pragma is now generated for the
2919 corresponding aspect instead of an attribute. Pragma expression is
2920 relocated instead of evaluated. Discriminant of the corresponding
2921 record type is referenced rather than the type discriminant.
2922 (Create_Secondary_Stack_For_Task, Make_Task_Create_Call): Update
2923 Secondary_Stack_Size rep item checks to only look for the pragma rep.
2924 * sem_ch13.adb (Analyze_One_Aspect): Transform
2925 Aspect_Secondary_Stack_Size into a pragma instead of an attribute
2926 because the attribute does not have visibility on a task type's
2927 discriminants when the type's definition is expanded.
2928 (Analyze_Attribute_Definition_Clause): Remove handling of
2929 Attribute_Secondary_Stack_Size.
2930 * snames.adb-tmpl, snames.ads-tmpl: Remove
2931 Attribute_Secondary_Stack_Size, no longer used.
2933 2018-01-11 Justin Squirek <squirek@adacore.com>
2935 * sem_ch8.adb: Minor comment fix.
2937 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2939 * exp_ch4.adb (Process_Action): Do not abandon the inspection of an
2940 individual action because the action may denote a complex expression,
2941 such as a case statement, which in turn may contain additional
2944 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2946 * sem_aggr.adb (Resolve_Iterated_Component_Association): Perform
2947 analysis on a copy of the expression with a copy of the index variable,
2948 because full expansion will rewrite construct into a loop with the
2949 original loop variable.
2950 * exp_aggr.adb (Gen_Assign): Defer analysis and resolution if the
2951 expression is an iterated component association. Full analysis takes
2952 place when construct is rewritten as a loop.
2953 (In_Place_Assign_OK, Safe_Component): An iterated_component_association
2954 is not safe for in-place assignment.
2955 * sem_util.adb (Remove_Entity): Handle properly the case of an isolated
2956 entity with no homonym and no other entity in the scope.
2958 2018-01-11 Justin Squirek <squirek@adacore.com>
2960 * sem_prag.adb (Analyze_Pragma:Pragma_Loop_Variant): Modify error
2961 message to be printed on the pragma argument identifier.
2963 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2965 * exp_util.adb (Build_Invariant_Procedure_Declaration): Set the last
2966 entity of the generated invariant procedure in order to construct a
2967 proper entity chain.
2969 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
2971 * sem_ch13.adb (Build_Predicate_Functions): Fix minor issues in
2974 2018-01-11 Arnaud Charlet <charlet@adacore.com>
2976 * einfo.ads, einfo.adb (Activation_Record_Component,
2977 Set_Activation_Record_Component, Set_Is_Uplevel_Referenced_Entity):
2978 Allow E_Discriminant.
2980 2018-01-10 Eric Botcazou <ebotcazou@adacore.com>
2982 * gcc-interface/decl.c (gnat_to_gnu_component_type): Apply the check
2983 for atomic access once the component size is taken into account and
2984 also do it if the component type is Atomic or Volatile_Full_Access.
2986 2018-01-04 Eric Botcazou <ebotcazou@adacore.com>
2988 * gnatvsn.ads: Bump copyright year.
2990 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
2991 Alan Hayward <alan.hayward@arm.com>
2992 David Sherwood <david.sherwood@arm.com>
2994 * gcc-interface/misc.c (enumerate_modes): Treat GET_MODE_BITSIZE
2997 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
2998 Alan Hayward <alan.hayward@arm.com>
2999 David Sherwood <david.sherwood@arm.com>
3001 * gcc-interface/misc.c (enumerate_modes): Treat GET_MODE_PRECISION
3004 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3005 Alan Hayward <alan.hayward@arm.com>
3006 David Sherwood <david.sherwood@arm.com>
3008 * gcc-interface/utils.c (gnat_types_compatible_p): Handle
3009 polynomial TYPE_VECTOR_SUBPARTS.
3011 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3012 Alan Hayward <alan.hayward@arm.com>
3013 David Sherwood <david.sherwood@arm.com>
3015 * gcc-interface/misc.c (enumerate_modes): Handle polynomial
3018 2018-01-03 Jakub Jelinek <jakub@redhat.com>
3020 Update copyright years.
3022 * gnat_ugn.texi: Bump @copying's copyright year.
3023 * gnat_rm.texi: Likewise.
3025 Copyright (C) 2018 Free Software Foundation, Inc.
3027 Copying and distribution of this file, with or without modification,
3028 are permitted in any medium without royalty provided the copyright
3029 notice and this notice are preserved.