1 2018-07-16 Gary Dismukes <dismukes@adacore.com>
3 * exp_ch4.adb (Expand_N_Allocator): Test for Storage_Pool being RTE in
4 addition to the existing test for no Storage_Pool as a condition
5 enabling generation of the call to Check_Standard_Allocator when the
6 restriction No_Standard_Allocators_After_Elaboration is active.
7 * libgnat/s-elaall.ads (Check_Standard_Allocator): Correct comment to
8 say that Storage_Error will be raised (rather than Program_Error).
9 * libgnat/s-elaall.adb (Check_Standard_Allocator): Raise Storage_Error
10 rather than Program_Error when Elaboration_In_Progress is False.
12 2018-07-16 Gary Dismukes <dismukes@adacore.com>
14 * sem_eval.adb: Fix spelling for compile-time-known.
16 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
18 * sem_eval.adb (Compile_Time_Known_Value): Add a guard which prevents
19 the compiler from entering infinite recursion when trying to determine
20 whether a deferred constant has a compile time known value, and the
21 initialization expression of the constant is a reference to the
24 2018-07-16 Nicolas Roche <roche@adacore.com>
26 * libgnat/a-strunb.adb, libgnat/a-strunb__shared.adb: Adjust growth
27 factor from 1/32 to 1/2 for Unbounded_String.
29 2018-07-13 Eric Botcazou <ebotcazou@adacore.com>
31 * gcc-interface/lang.opt (funsigned-char): New option.
32 * gcc-interface/misc.c (gnat_handle_option): Accept it.
33 * gcc-interface/utils.c (finish_character_type): Tweak comment.
35 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
37 * gcc-interface/decl.c (gnat_to_gnu_entity): Add GNAT_DECL local
38 variable and use it throughout.
39 <E_Variable>: If the nominal subtype of the object is unconstrained,
40 compute the Ada size separately and put in on the padding type if the
42 <E_Record_Type>: Minor tweak.
43 * gcc-interface/misc.c (gnat_type_max_size): Rename max_size_unit
44 into max_size_unit throughout.
46 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
48 * gcc-interface/gigi.h (add_decl_expr): Adjust prototype.
49 * gcc-interface/decl.c (gnat_to_gnu_entity): Remove useless test.
50 * gcc-interface/trans.c (add_stmt_with_node): Remove exceptions.
51 (add_decl_expr): Change type of second parameter and rename it.
52 (renaming_from_instantiation_p): New function moved from...
53 (set_expr_location_from_node): Test for exceptions here and add one
54 for actual subtypes built for unconstrained composite actuals.
55 * gcc-interface/utils.c (renaming_from_instantiation_p): ...here.
57 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
59 * gcc-interface/trans.c (lvalue_required_p): Remove ALIASED parameter
60 and adjust recursive calls.
61 (Identifier_to_gnu): Adjust calls to lvalue_required_p.
62 (gnat_to_gnu): Likewise.
64 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
66 * gcc-interface/decl.c (gnat_to_gnu_param): Minor tweak.
67 (gnat_to_gnu_subprog_type): New pure_flag local variable. Set it for
68 a pure Ada function with a by-ref In parameter. Propagate it onto the
69 function type by means of the TYPE_QUAL_RESTRICT flag.
70 * gcc-interface/utils.c (finish_subprog_decl): Set DECL_PURE_P if the
71 function type has the TYPE_QUAL_RESTRICT flag set.
73 2018-07-06 Jim Wilson <jimw@sifive.com>
75 * Makefile.rtl: Add riscv*-linux* support.
76 * libgnarl/s-linux__riscv.ads: New.
77 * libgnat/system-linux-riscv.ads: New.
79 * Make-generated.in (treeprs.ads): Use $(GNATMAKE) instead of gnatmake.
80 (einfo.h, sinfo.h, stamp-snames, stamp-nmake): Likewise.
81 * gcc-interface/Makefile.in (xoscons): Likewise.
83 2018-07-06 Sebastian Huber <sebastian.huber@embedded-brains.de>
85 * libgnat/system-rtems.ads (Frontend_Exceptions): Set to False.
86 (ZCX_By_Default): Set to True.
88 2018-07-02 Martin Liska <mliska@suse.cz>
90 * gnatvsn.ads: Bump Library_Version to 9.
92 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
94 * gcc-interface/ada-tree.h (TYPE_RETURN_BY_DIRECT_REF_P): Change from
95 using TYPE_LANG_FLAG_4 to using TYPE_LANG_FLAG_0.
96 (TYPE_ALIGN_OK): Move around.
97 (TYPE_PADDING_FOR_COMPONENT): Remove superfluous parentheses.
98 * gcc-interface/decl.c (change_qualified_type): Move to...
99 (gnat_to_gnu_entity): Adjust comment.
100 * gcc-interface/gigi.h (change_qualified_type): ...here; make inline.
101 (ceil_pow2): Use ceil_log2.
102 * gcc-interface/utils.c (finish_subprog_decl): Add couple of comments
103 and do not set TREE_SIDE_EFFECTS.
104 (handle_noreturn_attribute): Use change_qualified_type.
106 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
108 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Constant>: Do not get
109 the expression of a dispatch table that is not being defined.
110 <E_Record_Subtype>: Remove obsolete kludge.
112 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
114 * gcc-interface/decl.c (warn_on_field_placement): Use specific wording
116 (warn_on_list_placement): New static function.
117 (components_to_record): Use it to warn on multiple fields in list.
119 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
121 * gcc-interface/decl.c (variant_desc): Add AUX field.
122 (gnat_to_gnu_entity) <discrete_type>: Do not call compute_record_mode
124 (reverse_sort_field_list): New static function.
125 (components_to_record): Place the variant part at the beginning of the
126 field list when there is an obvious order of increasing position.
127 (build_variant_list): Initialize it.
128 (create_variant_part_from): Do not call compute_record_mode directly.
129 (copy_and_substitute_in_layout): Likewise. Always sort the fields with
130 fixed position in order of increasing position, in the record and all
131 the variants, in any. Call reverse_sort_field_list.
132 * gcc-interface/utils.c (make_packable_type): Compute the sizes before
133 calling finish_record_type. Do not call compute_record_mode directly.
134 (finish_record_type): Overhaul final processing depending on REP_LEVEL
135 and call finish_bitfield_layout if it is equal to one or two.
137 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
139 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Reuse the
140 existing fields of a dummy fat pointer type, if any. Clear the
141 TYPE_DECL_SUPPRESS_DEBUG on the fat pointer type after completing it.
143 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
145 * contracts.adb (Process_Body_Postconditions): Expand only checked
147 (Process_Contract_Cases_For): Expand only checked contract cases.
148 (Process_Inherited_Preconditions): Ignored class-wide preconditions are
149 partially expanded because some of their semantic checks are tied to
151 (Process_Preconditions_For): Expand only checked preconditions.
152 (Process_Spec_Postconditions): Expand only checked preconditions.
153 Ignored class-wide preconditions are partially expanded because some of
154 their semantic checks are tied to the expansion.
155 * exp_prag.adb (Expand_N_Pragma): Suppress the expansion of ignored
157 * exp_util.adb (Add_Inherited_Invariants): Code clean up.
158 * sem_util.adb (Propagate_Invariant_Attributes): Code clean up.
160 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
162 * exp_ch9.adb, exp_unst.adb, inline.adb, libgnat/a-ciorma.adb,
163 libgnat/a-ciormu.adb, libgnat/a-ciorse.adb, libgnat/a-coorma.adb,
164 libgnat/a-coormu.adb, libgnat/a-coorse.adb, sem_prag.adb: Minor
167 2018-06-11 Gary Dismukes <dismukes@adacore.com>
169 * exp_unst.ads, exp_unst.adb: Typo fixes and minor reformatting.
171 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
173 * exp_ch6.adb (Add_Unconstrained_Actuals_To_Build_In_Place_Call): Do
174 not add any actuals when the size of the object is known, and the
175 caller will allocate it.
176 (Build_Heap_Allocator): Rename to Build_Heap_Or_Pool_Allocator to
177 better illustrate its functionality. Update the comment on the
178 generated code. Generate a branch for the heap and pool cases where
179 the object is not necessarity controlled.
180 (Expand_N_Extended_Return_Statement): Expand the extended return
181 statement into four branches depending the requested mode if the caller
182 will not allocate the object on its side.
183 (Make_Build_In_Place_Call_In_Allocator): Do not allocate a controlled
184 object on the caller side because this will violate the semantics of
185 finalizable types. Instead notify the function to allocate the object
186 on the heap or a user-defined storage pool.
187 (Needs_BIP_Alloc_Form): A build-in-place function needs to be notified
188 which of the four modes to employ when returning a limited controlled
190 * exp_util.adb (Build_Allocate_Deallocate_Proc): Remove a redundant
191 guard which is already covered in Needs_Finalization.
193 2018-06-11 Olivier Hainque <hainque@adacore.com>
195 * libgnat/s-excmac*.ads: Factorize Unwind_Action definitions ...
196 * libgnat/a-exexpr.adb: ... Here, then add comments describing the
197 major datastructures associated with the current exception raised.
198 (Setup_Current_Excep): Accept a "Phase" argument conveying the
199 unwinding phase during which this subprogram is called. For an Ada
200 exception, don't update the current exception buffer from the raised
201 exception object during SEARCH_PHASE, as this is redundant with the
202 call now issued just before propagation starts.
203 (Propagate_GCC_Exception): Move call to Setup_Current_Excep ahead of
204 the unwinding start, conveying Phase 0.
205 (Unhandled_Except_Handler): Pass UA_CLEANUP_PHASE as the Phase value on
206 the call to Setup_Current_Excep.
207 * raise-gcc.c (personality_body): Pass uw_phases as the Phase argument
208 on calls to Setup_Current_Excep.
210 2018-06-11 Ed Schonberg <schonberg@adacore.com>
212 * exp_unst.ads, exp_unst.adb (Needs_Fat_Pointer,
213 Build_Access_Type_Decl): New subprograms to handle uplevel references
214 to formals of an unconstrained array type. The activation record
215 component for these is an access type, and the reference is rewritten
216 as an explicit derefenrence of that component.
218 2018-06-11 Bob Duff <duff@adacore.com>
220 * libgnat/a-ciorma.adb, libgnat/a-ciormu.adb, libgnat/a-ciorse.adb,
221 libgnat/a-coorma.adb, libgnat/a-coormu.adb, libgnat/a-coorse.adb:
222 (Element): Add code to detect dangling cursors in some cases.
224 2018-06-11 Yannick Moy <moy@adacore.com>
226 * sem_ch6.adb (Build_Subprogram_Declaration): Mark parameters as coming
229 2018-06-11 Ed Schonberg <schonberg@adacore.com>
231 * sem_ch13.adb (Build_Predicate_Functions): For a derived type, ensure
232 that its parent is already frozen so that its predicate function, if
233 any, has already been constructed.
235 2018-06-11 Yannick Moy <moy@adacore.com>
237 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Adapt for
238 possible task unit as the enclosing context.
240 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
242 * gnat1drv.adb: Remove use clause for Repinfo.
243 (Gnat1drv): Beef up comment about the interplay between -gnatc and
244 back-end annotations. Use full qualified name for List_Rep_Info.
246 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
248 * libgnat/g-arrspl.ads: Add pragma Preelaborate.
250 2018-06-11 Arnaud Charlet <charlet@adacore.com>
252 * exp_ch4.adb (Expand_Record_Equality): Remove extraneous "True and
253 then" and general logical "ada" in codepeer mode.
255 2018-06-11 Javier Miranda <miranda@adacore.com>
257 * exp_ch9.adb (Expand_N_Protected_Body): Add missing handling of
260 2018-06-11 Arnaud Charlet <charlet@adacore.com>
262 * exp_ch3.adb, exp_unst.adb, inline.adb, sem_prag.adb: Minor
265 2018-06-11 Yannick Moy <moy@adacore.com>
267 * doc/gnat_rm/implementation_defined_pragmas.rst: Add Suppressible
268 argument to Assertion_Policy
269 * gnat_rm.texi: Regenerate.
271 2018-06-11 Yannick Moy <moy@adacore.com>
273 * gnat1drv.adb: Do not check representation information in CodePeer and
274 GNATprove modes, as these modes call a special backend instead of gigi,
275 so do not have the information.
277 2018-06-11 Yannick Moy <moy@adacore.com>
279 * inline.adb (Build_Body_To_Inline): Consider case of extended return
280 of unconstrained type as one case where inlining is not supported.
281 (Expand_Inlined_Call): Remove special case for body as extended return
282 of unconstrained type.
284 2018-06-11 Yannick Moy <moy@adacore.com>
286 * sem_prag.adb (Analyze_Part_Of): Only allow Part_Of on non-generic
288 (Check_Missing_Part_Of): Do not force Part_Of on generic unit.
290 2018-06-11 Piotr Trojanek <trojanek@adacore.com>
292 * sem_ch13.adb (Analyze_Aspect_Specifications): Don't split AND THEN
293 expressions in Pre/Post contracts while in GNATprove_Mode.
295 2018-06-11 Piotr Trojanek <trojanek@adacore.com>
297 * sem_util.adb (Is_Potentially_Unevaluated): Fix detection of contracts
298 with AND THEN expressions broken down into individual conjuncts.
300 2018-06-11 Ed Schonberg <schonberg@adacore.com>
302 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): Add guard.
304 2018-06-11 Ed Schonberg <schonberg@adacore.com>
306 * exp_unst.adb (Visit_Node): Skip generic associations.
308 2018-06-11 Arnaud Charlet <charlet@adacore.com>
310 * libgnat/memtrack.adb (fwrite): Remove second definition.
312 2018-06-11 Javier Miranda <miranda@adacore.com>
314 * sinfo.ads (Is_Dynamic_Coextension): Adding documentation.
315 (Is_Static_Coextension): Adding documentation.
316 * sinfo.adb (Is_Dynamic_Coextension): Extending the assertion.
317 (Is_Static_Coextension): Extending the assertion.
318 * sem_util.adb (Mark_Allocator): Clear Is_Static_Coextension when
319 setting flag Is_Dynamic_Coextension (and vice versa).
321 2018-06-11 Ed Schonberg <schonberg@adacore.com>
323 * exp_unst.adb (Search_Subprograms): Handle explicitly stubs at the top
324 level of a compilation unit, becuase they may contain nested
325 subprograms that need an activation record.
327 2018-06-11 Arnaud Charlet <charlet@adacore.com>
329 * Makefile.rtl: Compile Ada files with $(ADAC) instead of $(CC).
331 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
333 * exp_ch11.adb, exp_unst.adb, inline.adb, sem_ch12.adb, sem_util.adb:
335 * sinfo.ads: Fix a typo.
337 2018-06-11 Ed Schonberg <schonberg@adacore.com>
339 * inline.adb (Expand_Inlined_Call): If no optimization level is
340 specified, the expansion of a call to an Inline_Always function is
341 fully performed in the front-end even on a target that support back-end
344 2018-06-11 Arnaud Charlet <charlet@adacore.com>
346 * bindgen.adb (Gen_Adainit): Protect reference to System.Parameters
349 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
351 * sem_ch8.adb (Find_Direct_Name): Mode the declaration of
352 Is_Assignment_LHS further in. Use predicate
353 Needs_Variable_Reference_Marker to determine whether to create a
355 (Find_Expanded_Name): Mode the declaration of Is_Assignment_LHS further
356 in. Use predicate Needs_Variable_Reference_Marker to determine whether
357 to create a variable marker.
358 * sem_elab.adb (Build_Variable_Reference_Marker): Remove the various
359 checks that determine whether the identifier or expanded name is a
360 suitable variable reference. The checks are now performed by
361 Needs_Variable_Reference_Marker.
362 * sem_res.adb (Resolve_Actuals): Use predicate
363 Needs_Variable_Reference_Marker to determine whether to create a
365 * sem_util.adb (Needs_Variable_Reference_Marker): New routine.
366 * sem_util.ads (Needs_Variable_Reference_Marker): New routine.
368 2018-06-11 Valentine Reboul <reboul@adacore.com>
370 * doc/gnat_rm.rst, doc/gnat_ugn.rst: Rename "GPL Edition" into
373 2018-06-11 Ed Schonberg <schonberg@adacore.com>
375 * sem_ch12.adb (Install_Body): In order to determine the placement of
376 the freeze node for an instance of a generic nested within another
377 instance, take into account that the outer instance may be declared in
378 the visible part of a package and the inner intance may be in the
379 private part of the same package.
381 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
383 * errout.adb (Special_Msg_Delete): Remove handling of Atomic and VFA.
385 2018-06-11 Nicolas Roche <roche@adacore.com>
387 * libgnat/s-valuti.adb (Bad_Value): Ensure that we do not generate a
388 stack overflow while raising a constraint error.
390 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
392 * repinfo.ads (Rep_Value): Use a single line.
393 * repinfo.adb (Rep_Value): Likewise.
394 (List_Attr): Do not use string concatenation.
396 2018-06-11 Ed Schonberg <schonberg@adacore.com>
398 * exp_unst.adb (Visit_Node): Check reference to formal parameter of
399 current procedure, because the bounds of its type may be uplevel
402 2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
404 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Constant>: If this is
405 not a definition, retrieve the expression only if it's a compile-time
406 known value if we are just annotating types.
408 * gcc-interface/utils.c (convert): Do not try to upcast properly for a
409 conversion between tagged types in type_annotate_only mode.
411 2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
413 * gcc-interface/ada-tree.h (TYPE_PADDING_FOR_COMPONENT): New macro.
414 * gcc-interface/decl.c (gnat_to_gnu_component_type): Cache the padding
415 type built for an aliased component with variable size.
417 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
419 * doc/gnat_ugn/project-manager-figure.png: Delete.
421 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
423 * vxworks-arm-link.spec, vxworks-e500-link.spec,
424 vxworks-gnat-crtbe-link.spec, vxworks-smp-arm-link.spec,
425 vxworks-smp-e500-link.spec, vxworks-smp-ppc-link.spec,
426 vxworks-smp-x86-link.spec: New files.
428 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
430 * gnatvsn.adb: Re-center the copyright header.
431 * indepsw-darwin.adb: Adjust the starting copyright year to 2011.
433 2018-05-31 Fedor Rybin <frybin@adacore.com>
435 * doc/gnat_ugn/gnat_utility_programs.rst: Document Stubs_Subdir in
436 gnattest section on user guide.
438 2018-05-31 Ed Schonberg <schonberg@adacore.com>
440 * sem_res.adb (Resolve_String_Literal): If the type is a string type
441 whose component subtype has a static predicate, ensure that the
442 predicate is applied to each character by expanding the string into the
443 equivalent aggregate. This is also done if the component subtype is
446 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
448 * gcc-interface/trans.c (Call_to_gnu): Remove obsolete code.
450 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
452 * sem_ch6.adb (Check_Missing_Return): Handle procedures with no
455 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
457 * gcc-interface/trans.c (Call_to_gnu): In the by-reference case, if
458 the type of the parameter is an unconstrained array type, convert
459 to the type of the actual before the type of the formal only if the
460 conversion was suppressed earlier. Use in_param and gnu_actual_type
461 local variables throughout, and uniform spelling for In Out or Out.
462 Also remove dead code in the component-by-reference case.
464 2018-05-31 Frederic Konrad <konrad@adacore.com>
466 * tracebak.c (STOP_FRAME): Harden condition.
467 (is_return_from, EXTRA_STOP_CONDITION): New helpers for VxWorks in RTP
470 2018-05-31 Ed Schonberg <schonberg@adacore.com>
472 * checks.adb (Apply_Discriminant_Check): Do not apply discriminant
473 check to a call to a build-in-place function, given that the return
474 object is limited and cannot be copied.
476 2018-05-31 Olivier Hainque <hainque@adacore.com>
478 * libgnat/s-atopri.ads: Update comment on __atomic_compare_exchange
481 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
483 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
484 there is no target, also create a temporary for the return value for
485 an allocator if the type is an unconstrained record type with default
488 2018-05-31 Hristian Kirtchev <kirtchev@adacore.com>
490 * exp_ch7.adb (Find_Transient_Context): An iteration scheme is a valid
491 boudary for a transient scope.
493 2018-05-31 Valentine Reboul <reboul@adacore.com>
495 * gnatvsn.ads: Rename "GPL" version to "Community".
497 2018-05-31 Ed Schonberg <schonberg@adacore.com>
499 * einfo.ads: Improve documentation for the Is_Unsigned_Type entity
502 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
504 * sem_prag.adb (Analyze_Pragma): Replace call to Unique_Defining_Entity
505 with a semantically equivalent call to Defining_Entity.
507 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
509 * sem_prag.adb (Analyze_Pragma): Set Etype on the rewritten
510 Max_Queue_Length expression.
512 2018-05-31 Sergey Rybin <rybin@adacore.com>
514 * doc/gnat_ugn/gnat_and_program_execution.rst: gnatelim does not need
515 that the main unit to be built before the call, now it computes the
516 closure of the main unit itself.
517 * gnat_ugn.texi: Regenerate.
519 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
521 * repinfo.adb (List_Structural_Record_Layout): Set First to false
522 after having listed the fields of the parent type, if any.
524 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
526 * gcc-interface/decl.c (gnat_to_gnu_entity) <discrete_type>: Do not
527 deal with the ___XP suffix for packed array types here...
528 <E_Array_Subtype>: ...or here when processing the implementation type
529 but when processing the original type instead. Do not reuse the DECL
530 of the implementation type for the original type. Tidy up.
532 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
534 * einfo.ads (Object_Size_Clause): Declare.
535 * einfo.adb (Object_Size_Clause): New function.
536 * gcc-interface/utils.c (maybe_pad_type): Test Has_Size_Clause before
537 retrieving Size_Clause and post the warning on the object size clause
538 if Has_Object_Size_Clause is true.
540 2018-05-31 Javier Miranda <miranda@adacore.com>
542 * sem_util.ads, sem_util.adb (Find_Primitive_Eq): New subprogram.
543 * exp_ch4.adb (Expand_Composite_Equality): Use the new subprogram
544 Find_Primitive_Eq to search for the primitive of types whose underlying
545 type is a tagged type.
547 2018-05-31 Yannick Moy <moy@adacore.com>
549 * sem_prag.adb (Analyze_Pragma.Check_Loop_Pragma_Placement): Inverse
550 order of treatment between nodes recognized as loop pragmas (or
551 generated from one) and block statements.
553 2018-05-31 Doug Rupp <rupp@adacore.com>
555 * libgnat/s-osprim__posix2008.adb (Clock): Implement using
558 2018-05-31 Ed Schonberg <schonberg@adacore.com>
560 * exp_unst.ads, exp_unst.adb (In_Synchronized_Unit): New predicate to
561 mark subprograms that cannot be eliminated because they must be treated
562 as reachable from outside the current unit. This includes entry bodies
563 and protected operations.
565 2018-05-31 Ed Schonberg <schonberg@adacore.com>
567 * exp_ch4.adb (Expand_Modular_Addition, Expand_Modular_Subtraction):
568 Convert all operands of the generated code to Standard.Unsigned, to
569 prevent spurious visibility errors. This is needed when the generated
570 expansion involves a modular index type of an array type, and the index
571 type is not immediately visible.
573 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
575 * einfo.ads (Package_Instantiation): Update comment after a routine
576 that uses this field has been renamed.
578 2018-05-30 Ed Schonberg <schonberg@adacore.com>
580 * exp_ch11.adb (Replace_Raise_By_Goto): The transfomation is legal even
581 if the local raise statement includes a string expression. This
582 expression might be picked up by an outer handler or discarded, but
583 plays no role in this transformation.
585 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
587 * exp_aggr.adb, exp_unst.adb, freeze.adb, libgnat/a-direct.adb: Minor
590 2018-05-30 Ed Schonberg <schonberg@adacore.com>
592 * exp_unst.adb (Visit_Node): Handle the semantic Procedure_To_Call
593 field in relevant nodes: Allocate, Free, and return statements.
595 2018-05-30 Ed Schonberg <schonberg@adacore.com>
597 * exp_unst.adb (Visit_Node): Do not traverse a Component_Association
598 that has not been analyzed, as will be the case for a nested aggregate
599 that is expanded into individual assignments.
601 2018-05-30 Justin Squirek <squirek@adacore.com>
603 * aspects.adb, aspects.ads: Register new aspect.
604 * par-prag.adb (Prag): Register new pragma.
605 * sem_ch13.adb (Analyze_Aspect_Specifications): Add processing for new
606 aspect similar to Aspect_Max_Queue_Length.
607 * sem_prag.adb, sem_prag.ads (Analyze_Pragma): Register new pragma and
608 set it to use the same processing as Pragma_Max_Queue_Length.
609 * snames.ads-tmpl: Move definition of Name_Max_Entry_Queue_Depth so
610 that it can be processed as a pragma in addition to a restriction and
611 add an entry for the pragma itself.
613 2018-05-30 Ed Schonberg <schonberg@adacore.com>
615 * freeze.adb (Freeze_Object_Declaration): A pragma Thread_Local_Storage
616 is now legal on a variable of composite type initialized with an
617 aggregate that is fully static and requires no elaboration code.
618 * exp_aggr.adb (Convert_To_Positional): Recognize additional cases of
619 nested aggregates that are compile-time static, so they can be used to
620 initialize variables declared with Threqd_Local_Storage.
621 * doc/gnat_rm/implementation_defined_pragmas.rst: Add documentation on
622 Thread_Local_Storage.
623 * gnat_rm.texi: Regenerate.
625 2018-05-30 Yannick Moy <moy@adacore.com>
627 * sem_util.adb (Policy_In_Effect): Take into account CodePeer and
630 2018-05-30 Justin Squirek <squirek@adacore.com>
632 * libgnat/a-direct.adb, libgnat/a-direct.ads (Name_Case_Equivalence):
634 (Start_Search): Modify to use Start_Search_Internal
635 (Start_Search_Internal): Add to break out an extra flag for searching
636 case insensative due to the potential for directories within the same
637 OS to allow different casing schemes.
638 * sysdep.c (__gnat_name_case_equivalence): Add as a default fallback
639 for when the more precise solution fails.
641 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
643 * checks.adb, exp_ch5.adb, exp_ch7.adb, exp_unst.adb, sem_eval.adb:
646 2018-05-30 Pascal Obry <obry@adacore.com>
648 * libgnat/g-comlin.ads (Value_Callback, Define_Switch): New.
649 * libgnat/g-comlin.adb: Add corresponding implementation.
651 2018-05-30 Gary Dismukes <dismukes@adacore.com>
653 * sem_res.adb, sem_util.adb: Fix several typos.
655 2018-05-30 Olivier Hainque <hainque@adacore.com>
657 * vx_crtbegin_attr.c (CTOR_ATTRIBUTE, DTOR_ATTRIBUTE): Empty.
658 (eh_registration_ctors, eh_registration_tors): New static variables,
659 forced in a .ctors/.dtors section, respectively, with priority.
661 2018-05-30 Bob Duff <duff@adacore.com>
663 * aspects.ads, contracts.adb, exp_util.adb, expander.adb, expander.ads,
664 freeze.adb, inline.adb, lib-xref.adb, sem.ads, sem_aggr.adb,
665 sem_attr.adb, sem_ch13.adb, sem_ch3.adb, sem_ch5.adb, sem_ch6.adb,
666 sem_ch8.adb, sem_dim.adb, sem_elab.adb, sem_res.adb, sem_res.ads,
667 sinfo.ads: Spell preanalysis, preanalyze correctly.
669 2018-05-30 Bob Duff <duff@adacore.com>
671 * libgnat/g-sestin.ads: Rework documentation comments.
673 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
675 * errout.adb, exp_aggr.adb, exp_ch7.adb, exp_util.adb, lib.adb,
676 sem_ch13.adb, sem_ch4.adb, sem_res.adb, sem_util.adb
677 (Has_Original_Node): Refactor to use Is_Rewrite_Substitution.
679 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
681 * sem_prag.adb (Analyze_Pragma): Remove conjuncts that are always true.
683 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
685 * sem_util.adb (Is_Atomic_Object): Cleaned up. Split the entity logic
686 in a separate routine.
687 (Is_Atomic_Object_Entity): New routine.
688 (Is_Atomic_Prefix): Cleaned up.
689 (Is_Synchronized_Object): Check that the object is atomic, or its type
691 (Object_Has_Atomic_Components): Removed.
692 * sem_util.ads (Is_Atomic_Object): Reword the comment on usage.
693 (Is_Atomic_Object_Entity): New routine.
695 2018-05-30 Ed Schonberg <schonberg@adacore.com>
697 * sem_ch3.adb (Access_Subprogram_Declaration): The flag
698 Needs_Activation_Record is only needed on a subprogram type, not on a
700 * sem_res.adb (Resolve_Selected_Component): If the context type and the
701 component type are anonymous access to subprograms, use the component
702 type to obtain the proper value of Needs_Activation_Record flag for the
705 2018-05-30 Eric Botcazou <ebotcazou@adacore.com>
707 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>: Add
708 comment about the memset case.
710 2018-05-30 Bob Duff <duff@adacore.com>
712 * exp_ch5.adb (Expand_Formal_Container_Element_Loop): Remove the code
713 to analyze the Elmt_Decl, because it gets analyzed in the wrong scope.
714 We need to analyze it as part of analyzing the block, so that if the
715 call to Element that initializes Elmt_Decl returns on the secondary
716 stack, the block will ss_mark/ss_release. This block is inside the
717 loop; we don't want to leak memory until the loop exits. The purpose
718 of analyzing Elmt_Decl first was to catch the error of modifying it,
719 which is illegal because it's a loop parameter. The above causes us to
720 miss that error. Therefore, we add a flag Is_Loop_Parameter, and set
721 it on the Element entity, so we end up with an E_Variable node with the
723 * einfo.ads, einfo.adb (Is_Loop_Parameter): New flag.
724 * sem_ch5.adb (Diagnose_Non_Variable_Lhs): Give the "assignment to loop
725 parameter not allowed" error if Is_Loop_Parameter.
726 * sem_util.adb (Is_Variable): Return False if Is_Loop_Parameter, to
727 trigger the call to Diagnose_Non_Variable_Lhs.
729 2018-05-30 Arnaud Charlet <charlet@adacore.com>
731 * checks.adb (Apply_Scalar_Range_Check):
732 * sem_eval.adb (Check_Non_Static_Context, Out_Of_Range): Ignore out of
733 range values for System.Priority in CodePeer mode since the actual
734 target compiler may provide a wider range.
736 2018-05-30 Ed Schonberg <schonberg@adacore.com>
738 * exp_unst.adb: Search specification of main unit as well, for
741 2018-05-30 Ed Schonberg <schonberg@adacore.com>
743 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): The statement part of
744 a package body that is a compilation unit may contain blocks that
745 declare local subprograms. In Subprogram_Unnesting Mode such
746 subprograms must be handled as nested inside the (implicit) elaboration
747 procedure that executes that statement part. To handle properly uplevel
748 references we construct that subprogram explicitly, to contain blocks
749 and inner subprograms, The statement part of the compilation unit
750 becomes a call to this subprogram. This is only done if blocks are
751 present in the statement list of the body.
753 2018-05-30 Bob Duff <duff@adacore.com>
755 * exp_ch7.adb: Minor comment fix.
757 2018-05-30 Ed Schonberg <schonberg@adacore.com>
759 * exp_unst.adb (Visit_Node): Handle properly subprogram instantiations
760 that have no corresponding body and appear as attributes of the
761 corresponding wrapper package declaration.
762 (Register_Subprogram): New subprogram, used for subprogram bodies and
763 for subprogram instantiations to enter callable entity into Subp table.
765 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
767 * libgnat/s-secsta.adb: Reimplement the secondary stack support.
768 * libgnat/s-secsta.ads: Update the documentation of all routines in the
769 public part of the package. Reimplement the private part of the
770 package to account for the new secondary stack structure. Add types
771 and subprograms for testing purposes. Add several documentation
774 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
776 * exp_aggr.adb, exp_ch3.adb, exp_ch4.adb, exp_ch7.adb, exp_unst.adb,
777 exp_util.adb, exp_util.ads, libgnat/a-calcon.adb, libgnat/a-calcon.ads,
778 libgnat/s-os_lib.adb, repinfo.adb, sem_ch3.adb, sem_disp.adb,
779 sem_disp.ads, sem_util.adb: Minor reformatting.
781 2018-05-30 Arnaud Charlet <charlet@adacore.com>
783 * gcc-interface/Makefile.in: Move special flags for Ada runtime files
785 * Makefile.rtl: ... to here. Update comments. Protect call to
786 "GCC_FOR_TARGET" in case target_os isn't defined.
788 2018-05-30 Arnaud Charlet <charlet@adacore.com>
790 * gcc-interface/Makefile.in: Move target pair settings from here...
791 * Makefile.rtl: ... to here.
792 (setup-rts): New target.
794 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
796 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Alphabetical
797 List of All Switches): Replace "modules" with "units".
798 (Subprogram Inlining Control): Likewise.
799 * gnat_ugn.texi: Regenerate.
800 * usage.adb (Usage): Fix description of -gnatn switch.
802 2018-05-29 Arnaud Charlet <charlet@adacore.com>
804 * gcc-interface/Makefile.in: Fix typos.
806 2018-05-29 Ed Schonberg <schonberg@adacore.com>
808 * exp_ch7.adb (Build_Finalizer_Call): Attach to tree the reference to
809 the finalizer procedure in the At_End handler, for use in LLVM
812 2018-05-29 Javier Miranda <miranda@adacore.com>
814 * exp_ch4.adb (Expand_N_Op_Eq, Expand_Composite_Equality): Use the new
815 subprogram Inherits_From_Tagged_Full_View to identify more reliably
816 untagged private types completed with a derivation of an untagged
817 private whose full view is a tagged type.
818 * sem_util.ads, sem_util.adb (Inherits_From_Tagged_Full_View): New
820 (Collect_Primitive_Operations): Handle untagged private types completed
821 with a derivation of an untagged private type whose full view is a
822 tagged type. In such case, collecting the list of primitives we may
823 find two equality primitives: one associated with the untagged private
824 and another associated with the ultimate tagged type (and we must
825 remove from the returned list this latter one).
827 2018-05-29 Ed Schonberg <schonberg@adacore.com>
829 * exp_unst.adb (Visit_Node): Handle statement sequences that include an
832 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
834 * repinfo.adb (List_Entities): Also recurse into blocks without label.
836 2018-05-29 Ed Schonberg <schonberg@adacore.com>
838 * exp_ch6.adb (Expand_N_Subprogram_Body): Do not generate push/pop for
839 exceptions if subprogram unnesting is in effect, because these branch
840 nodes are relevant only in the presence of nested subprograms.
842 2018-05-29 Ed Schonberg <schonberg@adacore.com>
844 * libgnat/s-fatgen.adb (Succ, Pred): Raise Constraint_Error
845 unconditionally when applied to the largest positive (resp. largest
846 negative) value of a floating-point type.
848 2018-05-29 Ed Schonberg <schonberg@adacore.com>
850 * einfo.ads, einfo.adb: Clarify use of Activation_Record_Component:
851 discriminants and exceptions are never components of such. The flag
852 Needs_Activation_Record is set on subprogram types, not on access to
855 2018-05-29 Ed Schonberg <schonberg@adacore.com>
857 * sem_ch3.adb: Set scope of component of subtype.
859 2018-05-29 Ed Schonberg <schonberg@adacore.com>
861 * exp_unst.adb (Visit_Node): Exclude selected components whose prefix
862 carry no type. Such selected components appear in unit names that are
863 child units, both in the specification and possibly in an end label for
864 the unit, and they do not contain any relevant uplevel references.
866 2018-05-29 Arnaud Charlet <charlet@adacore.com>
868 * libgnat/a-calend.ads, libgnat/a-calend.adb (Epoch_Offset): Make it a
871 2018-05-29 Olivier Hainque <hainque@adacore.com>
873 * libgnat/system-vxworks7-ppc-rtp.ads: New file.
874 * libgnat/system-vxworks7-ppc-kernel.ads: New file.
875 * libgnat/system-vxworks7-e500-rtp.ads: New file.
876 * libgnat/system-vxworks7-e500-kernel.ads: New file.
877 * libgnat/system-vxworks7-x86-rtp.ads: New file.
878 * libgnat/system-vxworks-ppc64-kernel.ads: Rename as ...
879 * libgnat/system-vxworks7-ppc64-kernel.ads: and adjust name of
880 gnat-crtbe link spec to use the vx7 variant.
882 2018-05-29 Olivier Hainque <hainque@adacore.com>
884 * vx_crtbegin.inc: Use a consistent naming convention for the
885 registration/deregistration functions across RTP or kernel. Remove the
886 ctor/dtor attribute setting based on RTP/kernel, expect the optional
887 attribute extension to be provided by includers instead.
888 * vx_crtbegin.c: Mere inclusion of vx_crtbegin.inc with empty attribute
889 extension for the registration/deregistration functions.
890 * vx_crtbegin_attr.c: New file. Include vx_crtbegin.inc with explicit
891 constructor/destructor attribute extensions.
892 * vx_crtbegin_array.c: New file. Include vx_crtbegin.inc with empty
893 attribute extensions and declare _ctors/_dtors arrays.
894 * vx_crtbegin_auto.c: Remove.
895 * libgnat/system-vxworks7-aarch64-rtp-smp.ads: Use
896 vxworks7-gnat-crtbe-link.spec.
897 * libgnat/system-vxworks7-aarch64.ads: Likewise.
898 * libgnat/system-vxworks7-e500-rtp-smp.ads: Likewise.
899 * libgnat/system-vxworks7-ppc-rtp-smp.ads: Likewise.
900 * libgnat/system-vxworks7-ppc64-rtp-smp.ads: Likewise.
901 * libgnat/system-vxworks7-x86-kernel.ads: Likewise.
902 * libgnat/system-vxworks7-x86-rtp-smp.ads: Likewise.
903 * libgnat/system-vxworks7-x86_64-kernel.ads: Likewise.
904 * libgnat/system-vxworks7-x86_64-rtp-smp.ads: Likewise.
906 2018-05-29 Piotr Trojanek <trojanek@adacore.com>
908 * ali.adb: Minor reformatting.
910 2018-05-29 Joel Brobecker <brobecker@adacore.com>
912 * doc/gnat_ugn/platform_specific_information.rst: Update package
913 requirements for 32bit GNAT on x86_64-linux.
914 * gnat_ugn.texi: Regenerate.
916 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
918 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Debugging
919 Control): Adjust description of -gnatRj.
920 * gnat_ugn.texi: Regenerate.
921 * opt.ads (List_Representation_Info_To_JSON): Likewise.
922 * repinfo.adb (List_Rep_Info): Do not automatically create a file
923 if List_Representation_Info_To_JSON is true.
924 * switch-c.adb (Scan_Front_End_Switches) <R>: Remove incompatibility
925 check between -gnatRj and -gnatRs.
926 * usage.adb (Usage): Adjust description of -gnatRj.
928 2018-05-29 Pascal Obry <obry@adacore.com>
930 * libgnat/s-os_lib.adb (Normalize_Pathname): Fix handling of ".." in
933 2018-05-29 Pascal Obry <obry@adacore.com>
935 * libgnat/s-os_lib.adb: Minor reformatting.
937 2018-05-29 Doug Rupp <rupp@adacore.com>
939 * libgnat/a-calend.adb (Epoch_Offset): Move from body to ...
940 * libgnat/a-calend.ads (Epoch_Offset): to private part of spec
941 * libgnat/a-calcon.ads (To_Unix_Nano_Time): New function spec.
942 * libgnat/a-calcon.adb (To_Unix_Nano_Time): New function body.
944 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
946 * repinfo.ads (JSON format): Document new pair for components.
947 * repinfo.adb (Derived_Discriminant): New function.
948 (List_Structural_Record_Layout): Add Outer_Ent parameter and pass it
949 in recursive calls. If the record type is the parent of an extension,
950 find and list the derived discriminant from the extension, if any.
951 (List_Component_Layout): List the Discriminant_Number in JSON mode.
952 (List_Record_Info): Adjust call to List_Structural_Record_Layout.
954 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
956 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Alphabetical
957 List of All Switches): Document -gnatRj.
958 (Debugging Control): Likewise.
959 * gnat_ugn.texi: Regenerate.
960 * opt.ads (List_Representation_Info_To_JSON): New boolean variable.
961 * osint-c.adb (Create_Repinfo_File): Use the .json instead of .rep
962 extension if List_Representation_Info_To_JSON is true.
963 * repinfo.ads: Document the JSON output format.
964 * repinfo.adb (List_Location): New procedure.
965 (List_Array_Info): Add support for JSON output.
966 (List_Entities): Likewise.
969 (Print_Expr): Likewise.
970 (List_Linker_Section): Likewise.
971 (List_Mechanisms): Likewise.
972 (List_Name): Likewise.
973 (List_Object_Info): Likewise.
974 (List_Record_Info): Likewise.
975 (List_Component_Layout): Likewise. Add Indent parameter.
976 (List_Structural_Record_Layout): New procedure.
977 (List_Attr): Add support for JSON output.
978 (List_Type_Info): Likewise.
979 (Write_Unknown_Val): Likewise.
980 * switch-c.adb (Scan_Front_End_Switches) <R>: Deal with 'j'.
981 * usage.adb (Usage): List -gnatRj.
983 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
985 * repinfo.adb (List_Component_Layout): New procedure extracted from...
986 (List_Record_Layout): ...here. Invoke it.
988 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
990 * repinfo.adb (Write_Unknown_Val): New procedure.
991 (List_GCC_Expression): Call it.
992 (List_Record_Layout): Likewise.
993 (Write_Val): Likewise.
995 2018-05-29 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
997 * exp_ch4.adb (Expand_N_Op_Abs): Clear Do_Overflow_Check when inserting
1000 2018-05-29 Arnaud Charlet <charlet@adacore.com>
1002 * lib-writ.adb (Write_ALI): Do not use new function from s-casuti yet.
1003 This breaks build of cross compilers with older versions of GNAT, so
1006 2018-05-29 Doug Rupp <rupp@adacore.com>
1008 * libgnarl/s-taprop.ads (Monotonic_Clock): Refine documentation to
1011 2018-05-29 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1013 * exp_ch4.adb (Expand_N_Op_Abs): Always do range check against 'First.
1015 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1017 * repinfo.adb (List_Entities): Do not list the Linker_Section for
1019 (List_Mechanisms): ...but here instead. Use consistent name output
1020 and formatting conventions.
1022 2018-05-29 Bob Duff <duff@adacore.com>
1024 * lib-writ.adb (Write_ALI): Cleanup: avoid use of global var; call new
1026 * libgnat/s-casuti.ads, libgnat/s-casuti.adb (To_Upper, To_Lower,
1027 To_Mixed): New functions.
1028 * osint.adb: Cleanup: use Is_Directory_Separator, which correctly
1029 allows both '\' and '/' on Windows.
1031 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1033 * repinfo.ads: Minor fixes and tweaks in comments.
1035 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1037 * repinfo.adb (List_GCC_Expression): Remove Valop and replace calls to
1038 it with calls to Unop.
1040 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1042 * repinfo.ads (TCode): Adjust range.
1043 (Truth_Andif_Expr): Remove.
1044 (Truth_Orif_Expr): Likewise.
1045 (Truth_And_Expr .. Dynamic_Val): Adjust value.
1046 * repinfo.adb (Print_Expr): Remove handling of Truth_{And,Or}if_Expr.
1047 (Rep_Value): Likewise.
1048 * repinfo.h (Truth_Andif_Expr): Remove.
1049 (Truth_Orif_Expr): Likewise.
1050 (Truth_And_Expr .. Dynamic_Val): Adjust value.
1051 * gcc-interface/decl.c (annotate_value) <TRUTH_ANDIF_EXPR>: Fall
1052 through to TRUTH_AND_EXPR case.
1053 <TRUTH_ORIF_EXPR>: Fall through to TRUTH_OR_EXPR case.
1055 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1057 * exp_unst.adb (Visit_Node): For indexed components and attribute
1058 references, examine index expressions or associated expressions as well
1059 to record uplevel references.
1060 (Vist_Node): For function and procedure calls, if a formal is an
1061 unconstrained array and the actual is constrained, check whether bounds
1062 of actual have uplevel references.
1064 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1066 * einfo.ads, einfo.adb: Exceptions can be uplevel references, and thus
1067 they can appear as components of activation records.
1068 * exp_unst.adb (Visit_Node): A reference to an exception may be an
1071 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1073 * exp_ch4.adb (Expand_Composite_Equality): Compute whether the size
1074 depends on a discriminant manually instead of using the predicate
1075 Size_Depends_On_Discriminant in the array type case.
1077 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1079 * exp_unst.adb (Check_Static_Type): For a record subtype, check
1080 discriminant constraints as well.
1081 (Visit_Node): For a selected component, check type of prefix, as is
1082 done for indexed components and slices.
1084 2018-05-28 Javier Miranda <miranda@adacore.com>
1086 * exp_ch4.adb (Real_Range_Check): Add a temporary to store the integer
1087 value when converting a float value to a fixed-point value. This is
1088 required for CCG because it handles fixed-point types by means of
1089 unsigned integer type variables. The range check is now performed using
1090 the integer value stored in this temporary.
1092 2018-05-28 Yannick Moy <moy@adacore.com>
1094 * sem_util.adb (Is_OK_Volatile_Context): Add attributes First, Last and
1095 Length as valid non-interfering contexts for SPARK.
1097 2018-05-28 Claire Dross <dross@adacore.com>
1099 * sem_disp.ads, sem_disp.adb (Inheritance_Utilities): Package for
1100 generic inheritance utilities.
1101 (Generic_Inherited_Subprograms): Generic version of
1102 Inherited_Subprograms, generic in Find_Dispatching_Type function.
1103 (Generic_Is_Overriding_Subprogram): Generic version of
1104 Is_Overriding_Subprogram, generic in Find_Dispatching_Type function.
1105 (Inherited_Subprograms): Instance of Generic_Inherited_Subprograms with
1106 Sem_Disp.Find_Dispatching_Type.
1107 (Is_Overriding_Subprogram): Instance of
1108 Generic_Is_Overriding_Subprogram with Sem_Disp.Find_Dispatching_Type.
1109 (Inheritance_Utilities_Inst): Instance of Inheritance_Utilities
1110 with Sem_Disp.Find_Dispatching_Type.
1112 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1114 * exp_ch4.adb (Expand_Composite_Equality): For a composite (or FP)
1115 component type, do not expand array equality using the unconstrained
1116 base type, except for the case where the bounds of the type depend on a
1119 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1121 * einfo.ads, einfo.adb (Needs_Activation_Record): New flag on
1122 access-to-subprogram types, to indicate that an indirect call through
1123 such a type requires an activation record when compiling for LLVM.
1124 * sem_ch3.adb (Access_Subprogram_Declaration): Set new flag as needed.
1126 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1128 * exp_ch4.adb (Real_Range_Check): Specialize float-to-fixed conversions
1129 when bounds of fixed type are static, to remove some spuerfluous
1130 implicit conversions and provide an accurate result when converting
1131 back and forth between the fixed point type and a floating point type.
1133 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1135 * exp_unst.adb (Unnest_Subprogram): Prevent creation of empty
1138 2018-05-28 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1140 * exp_unst.adb (Check_Static_Type): Add argument to indicate node to be
1141 replaced, if any; all callers changed.
1142 (Note_Uplevel_Ref): Likewise. Also replace reference to deferred
1143 constant with private view so we take the address of that entity.
1144 (Note_Uplevel_Bound): Add argument to indicate node to be replaced, if
1145 any; all callers changed. Handle N_Indexed_Component like
1146 N_Attribute_Reference. Add N_Type_Conversion case.
1147 (Visit_Node): Indexed references can be uplevel if the type isn't
1149 (Unnest_Subprograms): Don't rewrite if no reference given. If call has
1150 been relocated, set first_named pointer in original node as well.
1152 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1154 * exp_aggr.adb (Flatten): Copy tree of expression in a component
1155 association with a range or a set of discrete choices, rather than
1156 relocating the node. This avoids inconsistencies in the tree when
1157 handling nested subprograms with uplevel references for LLVM.
1159 2018-05-28 Arnaud Charlet <charlet@adacore.com>
1161 * exp_util.adb (Possible_Bit_Aligned_Component): Always return False in
1164 2018-05-28 Arnaud Charlet <charlet@adacore.com>
1166 * exp_unst.adb: Fix typo.
1168 2018-05-28 Bob Duff <duff@adacore.com>
1170 * libgnat/a-convec.adb (Query_Element): Minor cleanup: remove an
1171 unnecessary use of 'Unrestricted_Access.
1173 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1175 * repinfo.adb (Expr_Value_S): New routine.
1176 (List_Linker_Section): Properly extract the value of the section
1179 2018-05-28 Patrick Bernardi <bernardi@adacore.com>
1181 * doc/gnat_ugn/building_executable_programs_with_gnat.rst: Update the
1182 description of the -D binder switch to reflect current usage.
1183 * gnat_ugn.texi: Regenerate.
1185 2018-05-28 Gary Dismukes <dismukes@adacore.com>
1187 * exp_ch3.adb: Minor reformatting
1189 2018-05-28 Justin Squirek <squirek@adacore.com>
1192 (Build_Initialization_Call): Add logic to pass the appropriate actual to match
1194 (Init_Formals): Add new formal *_skip_null_excluding_check
1195 * exp_util.adb, exp_util.ads
1196 (Enclosing_Init_Proc): Added to fetch the enclosing Init_Proc from the current
1198 (Inside_Init_Proc): Refactored to use Enclosing_Init_Proc
1199 (Needs_Conditional_Null_Excluding_Check): Added to factorize the predicate
1200 used to determine how to generate an Init_Proc for a given type.
1201 (Needs_Constant_Address): Minor reformatting
1203 (Resolve_Null): Add logic to generate a conditional check in certain cases
1205 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1207 * exp_aggr.adb, gnatlink.adb, sem_ch6.adb, sem_res.adb, sem_util.adb:
1210 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1212 * sem_prag.adb (Process_Atomic_Independent_Shared_Volatile): Include
1213 the declarations of single concurrent types because they fall in the
1214 category of full type and object declarations.
1216 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1218 * repinfo.adb (Compute_Max_Length): Skip _Parent component.
1219 (List_Record_Layout): Likewise.
1221 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1223 * sem_util.adb (Is_Function_Result): Add a warning if a postcondition
1224 includes a call to function to which it applies. This may mean an
1225 omission of an attribute reference 'Result, in particular if the
1226 function is pqrameterless.
1228 2018-05-28 Justin Squirek <squirek@adacore.com>
1230 * sem_ch8.adb (Find_Expanded_Name): Add extra guard to make sure the
1231 misresolved package name is not a case of mistaken identity.
1233 2018-05-28 Yannick Moy <moy@adacore.com>
1235 * sem_res.adb (Resolve_Range): Re-resolve the low bound of a range in
1236 GNATprove mode, as the order of resolution (low then high) means that
1237 all the information is not available when resolving the low bound the
1240 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1242 * repinfo.adb (List_Array_Info): Start with an explicit blank line and
1243 end with the linker section, if any.
1244 (List_Entities): Do not output the linker section for record types,
1245 array types and variables.
1246 (Print_Expr): Factor out common processing for unary operators and
1247 special values. Adjust and reorder the various cases.
1248 (List_Object_Info): End with the linker section, if any.
1249 (List_Record_Info): Likewise.
1250 (List_Type_Info): Do not start with a blank line.
1252 2018-05-25 Nicolas Roche <roche@adacore.com>
1254 * libgnat/s-valrea.adb (Scan_Real): Abort computation once it is sure
1255 that the result will be either -infinite or +infinite.
1257 2018-05-25 Patrick Bernardi <bernardi@adacore.com>
1259 * libgnat/s-parame.ads, libgnat/s-parame__vxworks.ads,
1260 libgnat/s-parame__ae653.ads, libgnat/s-parame__hpux.ads (Size_Type):
1261 Expand range of type to match the address space of the target.
1262 (Task_Storage_Size): Remove unused type.
1264 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1266 * sem_res.adb (Set_Mixed_Mode_Operand): If the operand is an expression
1267 of a fixed point type and the parent is a multiplying operation,
1268 resolve the operand with its own type because the context will impose a
1269 resulting type on the result of the multiplication by means of
1270 approriate conversion.
1272 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1274 * exp_ch3.adb (Default_Initialize_Object): Ensure that the analysis of
1275 the in-place initialization aggregate created for pragmas
1276 Initialize_Scalars or Normalize_Scalars is performed with checks
1279 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1281 * exp_aggr.adb (Convert_To_Positional): Bump default for
1282 Max_Others_Replicate to 32. Update comments.
1283 * osint.ads (Unknown_Attributes): No longer pretend this is a constant.
1284 (No_File_Info_Cache): Initialize separately.
1285 * osint.adb (No_File_Info_Cache): Update initializer.
1287 2018-05-25 Javier Miranda <miranda@adacore.com>
1289 * sem_res.adb (Resolve_Membership_Op): Allow the use of the membership
1290 test when the left operand is a class-wide interface and the right
1291 operand is not a class-wide type.
1292 * exp_ch4.adb (Tagged_Membership): Adding support for interface as the
1295 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1297 * exp_aggr.adb (Flatten): A quantified expression cannot be duplicated
1298 in an others clause to prevent visibility issues with the generated
1300 (Component_OK_For_Backend): Return false for a quantified expression.
1301 (Check_Static_Component): Ditto.
1303 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1305 * libgnat/s-secsta.adb (SS_Allocate): Reimplemented.
1306 (SS_Allocate_Dynamic): New routine. The allocation logic is now split
1307 into three distring cases rather than in one loop which attempts to
1308 handle all three cases. This rewrite eliminates an issue where the last
1309 frame of the stack cannot be freed, thus causing the memory range of a
1310 new frame to approach the overflow point of the memory index type.
1311 Since the overflow is logically treated as a
1312 too-much-memory-on-the-stack scenario, it causes a bogus Storage_Error.
1313 (SS_Allocate_Static): New routine. The routine factorizes the static
1314 secondary stack-related code from the former SS_Allocate.
1316 2018-05-25 Sergey Rybin <rybin@adacore.com>
1318 * doc/gnat_ugn/gnat_and_program_execution.rst: Add description of '-U'
1319 option for gnatelim.
1321 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1323 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Do not create
1324 Class_Wide_Clone_Body when analyzing a subprogram_body_stub: the clone
1325 is created when the proper body of the stub is analyzed.
1326 * sem_util.adb (ZBuild_Class_Wide_Clone_Body): If the subprogram body
1327 is the proper body of a subunit, the cloned body must be inserted in
1328 the declarative list that contains the stub.
1330 2018-05-25 Justin Squirek <squirek@adacore.com>
1332 * exp_ch6.adb (Expand_Simple_Function_Return): Add guard in check to
1333 generate code for 6.5(8-10) so that we don't get an assertion error
1334 when dealing with an incomplete return type.
1336 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1338 * pprint.adb (Expression_Name): Strip too long expressions to avoid
1339 carrying very large strings.
1341 2018-05-25 Patrick Bernardi <bernardi@adacore.com>
1343 * switch-b.adb (Scan_Binder_Switches): binder switch -Q accepts Natural
1346 2018-05-25 Doug Rupp <rupp@adacore.com>
1348 * tracebak.c (aarch64-linux): Implement.
1350 2018-05-25 Justin Squirek <squirek@adacore.com>
1352 * sem_ch8.adb: Minor reformatting.
1354 2018-05-25 Piotr Trojanek <trojanek@adacore.com>
1356 * sem_util.adb (Iterate_Call_Parameters): Fix code convention and
1359 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1361 * einfo.adb, einfo.ads, exp_ch3.adb, exp_ch8.adb, exp_unst.adb,
1362 pprint.adb, sem_ch12.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb:
1365 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1367 * sem_ch12.adb (Instance_Exists): New function, subsidiary of
1368 Validate_Derived_Type_Instance, to verify that all interfaces
1369 implemented by the formal type are also implemented by the actual. The
1370 verification is complicated when an interface of the formal is declared
1371 in a generic unit and the actual is declared in an instance of it.
1372 There is currently no mechanism to relate an interface declared within
1373 a generic to the corresponding interface in an instance, so we must
1374 traverse the list of interfaces of the actual, looking for a name
1375 match, and verifying that that interface is declared in an instance.
1377 2018-05-25 Piotr Trojanek <trojanek@adacore.com>
1379 * sem_util.adb (Iterate_Call_Parameters): Rewrite with extra
1380 assertions; replace function versions of Next_Formal/Next_Actual with
1381 their procedural versions (which are more concise).
1383 2018-05-25 Doug Rupp <rupp@adacore.com>
1385 * libgnarl/s-osinte__aix.ads, libgnarl/s-osinte__android.ads,
1386 libgnarl/s-osinte__darwin.ads, libgnarl/s-osinte__freebsd.ads,
1387 libgnarl/s-osinte__hpux.ads, libgnarl/s-osinte__kfreebsd-gnu.ads,
1388 libgnarl/s-osinte__linux.ads, libgnarl/s-osinte__lynxos178e.ads,
1389 libgnarl/s-osinte__qnx.ads, libgnarl/s-osinte__rtems.ads
1390 (Relative_Timed_Wait): Remove.
1391 * libgnarl/s-tpopmo.adb (Timed_Sleep, Timed_Delay): Rewrite to allow
1392 for incremental looping. Remove references to Rel_Time and
1393 Relative_Timed_Wait.
1394 * libgnat/s-osprim__posix.adb, libgnat/s-osprim__posix2008.adb
1395 (Timed_Delay): Make separate.
1396 * libgnat/s-optide.adb: New separate procedure.
1397 * libgnat/s-osprim.ads (Max_System_Delay): New constant.
1398 * libgnat/s-osprim__lynxos.ads (Max_Sensible_Delay): Set to 6 months.
1399 (Max_System_Delay): New constant.
1401 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1403 * sem_ch12.adb (Validate_Derived_Type_Instance): Verify that the actual
1404 for a formal derived type implements all the interfaces declared for
1407 2018-05-25 Yannick Moy <moy@adacore.com>
1409 * sem_prag.adb (Check_Applicable_Policy): Deal specially with CodePeer
1410 and GNATprove modes when applicable policy is Ignore.
1412 2018-05-25 Eric Botcazou <ebotcazou@adacore.com>
1414 * freeze.adb (Freeze_Enumeration_Type): Do not give integer size to a
1415 boolean type with convention C.
1416 * libgnat/i-cexten.ads (bool): Change to boolean with convention C.
1417 * gcc-interface/decl.c (gnat_to_gnu_entity): Add new local variable
1418 FOREIGN and use it throughout the function.
1419 <E_Enumeration_Type>: Set precision 1 on boolean types with foreign
1421 <E_Enumeration_Subtype>: Likewise for subtypes.
1422 <E_Record_Type>: Force the size of a storage unit on empty classes.
1423 * gcc-interface/utils.c (make_type_from_size) <BOOLEAN_TYPE>: Skip
1424 boolean types with precision 1 if the size is the expected one.
1426 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1428 * pprint.adb (Expression_Name): Do not print non ASCII characters.
1430 2018-05-25 Bob Duff <duff@adacore.com>
1432 * libgnat/a-strunb__shared.ads, libgnat/a-stwiun__shared.ads,
1433 libgnat/a-stzunb__shared.ads: (Initialize, Adjust): Add pragma Inline.
1435 2018-05-25 Bob Duff <duff@adacore.com>
1437 * sem_util.ads: Minor comment fix.
1439 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1441 * exp_unst.adb (Visit_Node): Restrict check for uplevel references in
1442 prefixes of array attributes, to prefixes that are entity names whose
1443 type is constrained.
1444 (Note_Uplevel_Bound): Verify that the bound is declared in an enclosing
1445 subprogram, as itype created for loops in pre/postcondition may appear
1446 in loops at the library level.
1448 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1450 * sem_ch13.adb (Build_Predicate_Functions): The predicate function
1451 declaration is inserted into the tree and analyzed at that point, so
1452 should not be reinserted when the body is constructed. Inside a
1453 generic, ensure that the body is not inserted twice in the tree.
1455 2018-05-25 Yannick Moy <moy@adacore.com>
1457 * sem_prag.adb (Check_Grouping): Modify test to ignore statements and
1458 declarations not coming from source.
1460 2018-05-25 Fedor Rybin <frybin@adacore.com>
1462 * doc/gnat_ugn/gnat_utility_programs.rst: Document new switch
1463 --copy-environment for gnattest.
1465 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1467 * sem_elab.adb (Non_Private_View): Simplify by removing a local Result
1469 * sem_prag.adb (Get_Base_Subprogram): Same as above.
1471 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
1473 * fe.h (Set_Normalized_First_Bit): Declare.
1474 (Set_Normalized_Position): Likewise.
1475 * repinfo.adb (List_Record_Layout): Do not use irregular output for a
1476 variable position. Fix minor spacing issue.
1477 * gcc-interface/decl.c (annotate_rep): If a field has a variable
1478 offset, compute the normalized position and annotate it in addition to
1481 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
1483 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu):
1484 Constify and rename variables. Fix formatting.
1485 (gnat_to_gnu) <N_Exception_Handler>: Minor tweak.
1486 <N_Raise_Statement>: Likewise.
1488 2018-05-24 Javier Miranda <miranda@adacore.com>
1490 * exp_ch8.adb (Build_Body_For_Renaming): Adding support to build the
1491 body of a variant record equality renaming.
1492 (Expand_N_Subprogram_Renaming_Declaration): Adapt the code to the new
1493 implementation of Build_Body_For_Renaming.
1494 * exp_ch3.ads (Build_Variant_Record_Equality): New library level
1495 function that factorizes the functionality needed by
1496 Build_Body_For_Renaming and Expand_Freeze_Record_Type to build the body
1497 of a variant record equality subprogram.
1498 * exp_ch3.adb (Build_Variant_Record_Equality): New subprogram.
1499 (Build_Variant_Record_Equality): New local procedure of
1500 Expand_Freeze_Record_Type containing all the code specific for freezing
1501 the record type that cannot be place in the new library level function.
1503 2018-05-24 Ed Schonberg <schonberg@adacore.com>
1505 * einfo.ads, einfo.adb (Is_Activation_Record): New flag on
1506 in_parameters, used when unesting subprograms for LLVM, to indicate
1507 that a generated parameter carries the activation record from the
1508 enclosing subprogram.
1509 * exp_unst.adb (Check_Static_Type): Handle array attributes of types
1510 whose bounds may contain up-level references that need to be added to
1511 an activation recoord.
1512 (Add_Extra_Formal): Set Is_Activation_Record on new formal.
1514 2018-05-24 Yannick Moy <moy@adacore.com>
1516 * pprint.adb (Expression_Image): Improve the printing of expressions,
1517 by taking more cases into account, in particular qualified expressions
1518 and aggregates. Also count more the number of parentheses to close
1519 after the expression.
1521 2018-05-24 Javier Miranda <miranda@adacore.com>
1523 * sem_ch3.adb (Is_Visible_Component): For untagged types add missing
1524 check for renamed discriminants.
1525 * sem_ch4.adb (Analyze_Overloaded_Selected_Component,
1526 Analyze_Selected_Component, Check_Misspelled_Selector): For calls to
1527 Is_Visible_Component pass the associated selector node to allow
1528 checking renamed discriminants on untagged types.
1530 2018-05-24 Ed Schonberg <schonberg@adacore.com>
1532 * sem_ch8.adb (Analyze_Use_Type): Do not assign the Prev_Use_Clause
1533 link to a use_type clause if this would cause an infinite loop in the
1534 machinery that detects redundant use clauses. This may happen when the
1535 redundant clauses appear in the context of a child unit and the context
1538 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1540 * sinfo.ads: Fix grammar in comment.
1542 2018-05-24 Justin Squirek <squirek@adacore.com>
1544 * einfo.ads, einfo.adb (Append_Entity): Modified to use Link_Entities
1545 and manage doubly-linked entity chain.
1546 (Nested_Scenarios): Removed entity field used for optimization during
1547 elaboration to make room for the new field Prev_Entity.
1548 (Link_Entities): Added to replace redundant calls to Set_Next_Entity
1549 and Set_Prev_Entity as well as centralize changes to the entity chain.
1550 (Predicated_Parent): Modified to use Node38.
1551 (Prev_Entity): Added to fetch new node field Prev_Entity in all entity
1553 (Remove_Entity): Moved from sem_util.
1554 (Set_Nested_Scenarios): Deleted.
1555 (Set_Predicated_Parent): Modified to use Node38.
1556 (Set_Prev_Entity): Added to set Prev_Entity field.
1557 (Set_Validated_Object): Modified to use Node38.
1558 (Unlink_Next_Entity): Added to process Prev_Entity when an unlinking
1560 (Validated_Object): Modified to use Node38.
1561 (Write_Field36_Name): Remove Nested_Scenarios, Validated_Object, and
1562 predicated parent cases.
1563 (Write_Field38_Name): Add predicated parent and Validated_Object cases.
1564 * sem_ch3.adb (Process_Subtype): Add guard to protect against
1565 inappropriate marking of Predicated_Parent to non-itype subtypes.
1566 (Make_Class_Wide_Type): Preserve Prev_Entity field and set in new type.
1567 (Copy_And_Swap): Add setting of Prev_Entity.
1568 (Build_derived_Record_Type): Replace Set_Next_Entity w/ Link_Entities.
1569 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Replace Set_Next_Entity
1571 (New_Overloaded_Entity): Remove block created to search for previous
1572 entities in the entity chain with relevant calls to Prev_Entity as well
1573 as replace duplicated code from Remove_Entity_And_Homonym with a call
1575 * sem_ch7.adb (Exchange_Declarations): Replace Set_Next_Entity w/
1577 * sem_elab.adb (Find_And_Process_Nested_Scenarios): Remove global and
1578 initial subprogram declarations related to Nested_Scenarios.
1579 (Process_Nested_Scenarios): Deleted.
1580 (Save_Scenario): Deleted.
1581 (Traverse_Body): Remove optimization for Nested_Scenarios so as to free
1582 node space in the entity tree.
1583 * sem_util.adb, sem_util.ads (Remove_Entity): Moved to einfo.
1584 (Remove_Entity_And_Homonym): Added to separate functionality of
1585 Remove_Entity from the homonym chain directly.
1586 * exp_attr.adb (Expand_N_Attribute_Reference): Replace Set_Next_Entity
1587 w/ Link_Entities and Unlink_Next_Entity.
1588 * exp_ch3.adb (Expand_N_Object_Declaration): Replace Set_Next_Entity w/
1590 * exp_ch6.adb (Replace_Renaming_Declaration_Id): Replace
1591 Set_Next_Entity w/ Link_Entities.
1592 * exp_disp.adb (Expand_Dispatching_Call): Replace Set_Next_Entity w/
1593 Link_Entities and Unlink_Next_Entity.
1594 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration): Replace
1595 call to Remove_Entity with its new incarnation.
1596 * exp_util.adb (New_Class_Wide_Subtype): Add setting of Prev_Entity.
1597 * freeze.adb (Freeze_Record_Type): Replace Set_Next_Entity w/
1600 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1602 * sem_ch10.adb (Expand_Limited_With_Clause): Update the call to
1603 Install_Limited_Withed_Unit.
1604 (Expand_With_Clause): Update the call to Install_Withed_Unit.
1605 (Implicit_With_On_Parent): Update the call to Install_Withed_Unit.
1606 (Install_Context_Clauses): Update the call to Install_Withed_Unit.
1607 (Install_Limited_Context_Clauses): Update the calls to
1608 Install_Limited_Withed_Unit.
1609 (Install_Limited_Withed_Unit): Renamed to better illustrate its
1611 (Install_Private_With_Clauses): Update the calls to Install_Withed_Unit
1612 and Install_Limited_Withed_Unit.
1613 (Install_With_Clause): Uninstall a limited with clause if a [private]
1614 with clause is given for the same package.
1615 (Install_Withed_Unit): Renamed to better illustrate its purpose.
1616 (Remove_Limited_With_Unit): New routine.
1618 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
1620 * raise-gcc.c (__gnat_SEH_error_handler): Remove prototype.
1621 (__gnat_personality_seh0): Adjust and beef up comments, and
1622 fix formatting throughout.
1623 (__gnat_adjust_context): Deal minimally with version 2.
1624 * seh_init.c (__gnat_map_SEH): Fix formatting.
1625 (_gnat_SEH_error_handler): Adjust comments.
1626 (__gnat_install_SEH_handler): Fix formatting.
1628 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1630 * exp_ch7.adb, sem_ch3.adb, sem_res.adb: Minor reformatting.
1632 2018-05-24 Ed Schonberg <schonberg@adacore.com>
1634 * exp_aggr.adb (Flatten): Add a warning on an others clause in an array
1635 aggregate with static bounds when named associations cover all index
1636 positions and the others clause is redundant.
1638 2018-05-24 Raphael Amiard <amiard@adacore.com>
1640 * libgnat/a-cohama.ads: Add documentation.
1642 2018-05-24 Raphael Amiard <amiard@adacore.com>
1644 * libgnat/a-convec.ads: Add documentation.
1646 2018-05-24 Justin Squirek <squirek@adacore.com>
1648 * exp_ch3.adb (Expand_N_Object_Declaration): Ignore raising an error in
1649 expansion for limited tagged types when the node to be expanded is a
1650 raise expression due to it not representing a valid object.
1651 * exp_ch5.adb (Expand_N_Assignment_Statement): Add exception to error
1652 message regarding assignments to limited types to ignore genereated
1655 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1657 * exp_util.adb (New_Class_Wide_Subtype): Capture and restore relevant
1658 Ghost-related attributes of the class-wide subtype because the copy
1661 2018-05-24 Justin Squirek <squirek@adacore.com>
1663 * sem_res.adb (Resolve_Entity_Name): Add guard to protect against
1664 marking use clauses as effective when the reference appears within
1667 2018-05-24 Cyrille Comar <comar@adacore.com>
1669 * doc/gnat_rm/the_gnat_library.rst: Fix typos.
1670 * gnat_rm.texi: Regenerate.
1672 2018-05-24 Bob Duff <duff@adacore.com>
1674 * exp_ch7.adb (Expand_Cleanup_Actions): Create a mark unconditionally
1675 for build-in-place functions with a caller-unknown-size result.
1676 (Create_Finalizer): For build-in-place functions with a
1677 caller-unknown-size result, check at run time whether we need to
1678 release the secondary stack.
1680 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1682 * sem_prag.adb (Analyze_Pragma): Use the full view of an internally
1683 generated incomplete type.
1685 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1687 * expander.adb (Expand): Update the save and restore of the Ghost
1689 * exp_ch3.adb (Freeze_Type): Likewise.
1690 * exp_disp.adb (Make_DT): Likewise.
1691 * exp_util.adb (Build_DIC_Procedure_Body): Likewise.
1692 (Build_DIC_Procedure_Declaration): Likewise.
1693 (Build_Invariant_Procedure_Body): Likewise.
1694 (Build_Invariant_Procedure_Declaration): Likewise.
1695 (Make_Predicate_Call): Likewise.
1696 * freeze.adb (Add_To_Result): Insert the freeze action of a living
1697 entity prior to the start of the enclosing ignored Ghost region.
1698 (Freeze_Entity): Update the save and restore of the Ghost region.
1699 * ghost.adb (Install_Ghost_Mode): Reimplemented.
1700 (Install_Ghost_Region): New routine.
1701 (Mark_And_Set_Ghost_Assignment): Install a region rather than a mode.
1702 (Mark_And_Set_Ghost_Body): Likewise.
1703 (Mark_And_Set_Ghost_Completion): Likewise.
1704 (Mark_And_Set_Ghost_Declaration): Likewise.
1705 (Mark_And_Set_Ghost_Instantiation): Likewise.
1706 (Mark_And_Set_Ghost_Procedure_Call): Likewise.
1707 (Name_To_Ghost_Mode): New routine.
1708 (Restore_Ghost_Region): New routine.
1709 * ghost.ads (Install_Ghost_Region): New routine.
1710 (Restore_Ghost_Region): New routine.
1711 * opt.ads: Add new global variable Ignored_Ghost_Region.
1712 * rtsfind.adb (Load_RTU): Update the save and restore of the Ghost
1713 region. Install a clean region.
1714 * sem.adb (Analyze): Likewise.
1715 (Do_Analyze): Likewise.
1716 * sem_ch3.adb (Analyze_Object_Declaration): Likewise
1717 (Derive_Progenitor_Subprograms): Use local variable Iface_Alias to
1718 capture the ultimate alias of the current primitive.
1719 (Process_Full_View): Update the save and restore of the Ghost region.
1720 Do not inherit DIC and invariant procedures.
1721 * sem_ch5.adb (Analyze_Assignment): Update the save and restore of the
1723 * sem_ch6.adb (Analyze_Procedure_Call): Likewise.
1724 (Analyze_Subprogram_Body_Helper): Likewise.
1725 * sem_ch7.adb (Analyze_Package_Body_Helper): Likewise.
1726 * sem_ch12.adb (Analyze_Package_Instantiation): Likewise.
1727 (Analyze_Subprogram_Instantiation): Likewise.
1728 (Instantiate_Package_Body): Likewise.
1729 (Instantiate_Subprogram_Body): Likewise.
1730 * sem_ch13.adb (Build_Predicate_Functions): Likewise.
1731 (Build_Predicate_Function_Declaration): Likewise.
1733 (Add_Dispatching_Operation): Do not consider DIC and invariant
1735 (Check_Dispatching_Operation): Use Add_Dispatching_Operation to collect
1736 a dispatching subprogram.
1737 (Check_Operation_From_Private_View): Likewise.
1738 (Override_Dispatching_Operation): Likewise.
1739 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part): Update the save
1740 and restore of the Ghost region.
1741 (Analyze_Initial_Condition_In_Decl_Part): Likewise.
1742 (Analyze_Pragma): Update the save and restore of the Ghost region.
1743 (Analyze_Pre_Post_Condition_In_Decl_Part): Likewise.
1744 * sem_util.adb (Is_Suitable_Primitive): New routine.
1745 * sem_util.ads (Is_Suitable_Primitive): New routine.
1746 * sinfo.ads: Update the section of Ghost regions.
1748 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1750 * doc/gnat_rm/implementation_defined_pragmas.rst (Contract_Cases):
1751 Change "condition" to "case guard" after renaming in the contract
1753 * gnat_rm.texi: Regenerate.
1755 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1757 * exp_util.adb (Expand_Static_Predicates_In_Choices): Indicate that the
1758 construct with discrete choices no longer contains a subtype with
1759 predicates since the expansion already handled this case.
1761 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1763 * freeze.adb (Wrap_Imported_Subprogram): Generate an unchecked
1764 conversion to the return type to avoid a side effect where an imported
1765 relocated function generates a new anonymous access type, whose
1766 accessibility level does not agree with with that of the wrapper.
1768 2018-05-24 Javier Miranda <miranda@adacore.com>
1770 * sem_util.adb (Abstract_Interface_List): Add missing support for
1771 private types whose full view is a synchronized type.
1772 * sem_ch3.adb (Build_Derived_Private_Type): Skip building the full
1773 derivation of a private type parent type is a task type with
1774 discriminants as gigi does not use such type directly.
1776 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1778 * sem_elab.adb (Build_Variable_Reference_Marker): Do not create a
1779 variable marker when the reference appears in the formal part of a
1780 compilation unit instance because there is no place to insert it.
1781 (In_Compilation_Instance_Formal_Part): New routine.
1783 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1785 * layout.ads, repinfo.ads: Fix references to renamed Backend_Layout
1786 configuration parameter.
1788 2018-05-24 Doug Rupp <rupp@adacore.com>
1790 * argv-lynxos178-raven-cert.c: New file.
1791 * libgnat/system-lynxos178-x86.ads: New file.
1793 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1795 * exp_disp.adb, freeze.adb, gnat1drv.adb, sem_ch5.adb, sem_spark.adb:
1796 Minor reformattings.
1798 2018-05-23 Pascal Obry <obry@adacore.com>
1800 * adaint.c (win32_wait): Properly free the handle/pid lists when
1801 WaitForMultipleObjects fails (return WAIT_FAILED).
1803 2018-05-23 Pascal Obry <obry@adacore.com>
1805 * adaint.c (win32_wait): Add missing parentheses.
1807 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1809 * exp_ch3.adb (Check_Large_Modular_Array): Moved to Freeze.
1810 (Expand_N_Object_Declaration): Do not check for a large modular array
1812 * freeze.adb (Check_Large_Modular_Array): Moved from Exp_Ch3.
1813 (Freeze_Object_Declaration): Code cleanup. Check for a large modular
1815 * sem_ch3.adb: Minor reformatting.
1817 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1819 * einfo.ads: New attribute on types: Predicated_Parent, to simplify the
1820 retrieval of the applicable predicate function to an itype created for
1821 a constrained array component.
1822 * einfo.adb: Subprograms for Predicated_Parent.
1823 (Predicate_Function): Use new attribute.
1824 * exp_util.adb (Make_Predicate_Call): If the predicate function is not
1825 available for a subtype, retrieve it from the base type, which may have
1826 been frozen after the subtype declaration and not captured by the
1827 subtype declaration.
1828 * sem_aggr.adb (Resolve_Array_Aggregate): An Others association is
1829 legal within a generated initiqlization procedure, as may happen with a
1830 predicate check on a component, when the predicate function applies to
1831 the base type of the component.
1832 * sem_ch3.adb (Analyze_Subtype_Declaration): Clean up inheritance of
1833 predicates for subtype declarations and for subtype indications in
1835 (Process_Subtype): Likewise. Handle properly the case of a private type
1836 with unknown discriminants whose full view is an unconstrained array.
1837 Use Predicated_Parent to indicate source of predicate function on an
1838 itype whose parent is itself an itype.
1839 (Complete_Private_Subtype): If the private view has unknown
1840 discriminants and the full view is an unconstrained array, set base
1841 type of completion to the full view of parent.
1842 (Inherit_Predicate_Flags): Prevent double assignment of predicate
1844 (Build_Subtype): For a constrained array component, propagate predicate
1845 information from original component type declaration.
1847 2018-05-23 Boris Yakobowski <yakobowski@adacore.com>
1849 * libgnat/a-ngelfu.ads (Arctanh, Arccoth): Fix faulty preconditions.
1851 2018-05-23 Arnaud Charlet <charlet@adacore.com>
1853 * checks.adb (Minimize_Eliminate_Overflows): Default initialize Lo and
1855 * sem_elab.adb: Make "out" parameters instead of "in out" when
1858 2018-05-23 Bob Duff <duff@adacore.com>
1860 * gnatbind.adb (List_Applicable_Restrictions): Add
1861 No_Implementation_Restrictions to the list of restrictions not to list.
1862 Remove double negative "not No_Restriction_List". Comment the
1863 commentary that is output, so it won't cause errors if used directly in
1866 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1868 * sem_prag.adb (Inherit_Class_Wide_Pre): Refine legality check on
1869 class-wide precondition on a type extension when ancestor does not have
1870 a class-wide precondition. Previously the compiler accepted such a
1871 precondition when the ancestor had a class-wide postcondition.
1873 2018-05-23 Javier Miranda <miranda@adacore.com>
1875 * sem_attr.adb (Valid_Scalars): Do not invoke Error_Attr_P to report
1876 the warning on occurrences of this attribute whose evaluation is always
1877 true (since that subprogram aborts processing the attribute). In
1878 addition, replace the node by its boolean result 'True' (required
1879 because the backend has no knowledge of this attribute).
1881 2018-05-23 Bob Duff <duff@adacore.com>
1883 * libgnat/a-convec.adb: (Insert, Insert_Space): Suppress warnings. The
1884 code in question is not reachable in the case where Count_Type'Last is
1887 2018-05-23 Yannick Moy <moy@adacore.com>
1889 * doc/gnat_rm/implementation_defined_pragmas.rst: Clarify meaning of
1890 local pragma Warnings Off without On.
1891 * gnat_rm.texi: Regenerate.
1893 2018-05-23 Olivier Hainque <hainque@adacore.com>
1895 * libgnat/g-excact.ads (Is_Foreign_Exception): New predicate.
1896 * libgnat/g-excact.adb: Implement.
1898 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1900 * sem_ch5.adb (Analyze_Iterator_Specification): If a subtype indication
1901 is present, verify its legality when the domain of iteration is a
1902 GNAT-specific formal container, as is already done for arrays and
1903 predefined containers.
1905 2018-05-23 Yannick Moy <moy@adacore.com>
1907 * sem_util.adb (Enclosing_Declaration): Fix the case of a named number
1908 declaration, which was not taken into account.
1910 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1912 * debug.adb: Switch -gnatd_s is now used to stop elaboration checks on
1913 synchronized suspension.
1914 * rtsfind.ads: Add entries for units Ada.Synchronous_Barriers and
1915 Ada.Synchronous_Task_Control and routines Suspend_Until_True and
1917 * sem_elab.adb: Document switch -gnatd_s.
1918 (In_Task_Body): New routine.
1919 (Is_Potential_Scenario): Code cleanup. Stop the traversal of a task
1920 body when the current construct denotes a synchronous suspension call,
1921 and restriction No_Entry_Calls_In_Elaboration_Code or switch -gnatd_s
1923 (Is_Synchronous_Suspension_Call): New routine.
1924 * switch-c.adb (Scan_Front_End_Switches): Switch -gnatJ now sets switch
1927 2018-05-23 Javier Miranda <miranda@adacore.com>
1929 * exp_disp.adb (Make_DT): Restrict the initialization of
1930 External_Tag and Expanded_Name to an empty string to the case where
1931 both pragmas apply (i.e. No_Tagged_Streams and Discard_Names), since
1932 restricted runtimes are compiled with pragma Discard_Names.
1933 * doc/gnat_rm/implementation_defined_pragmas.rst,
1934 doc/gnat_rm/implementation_defined_characteristics.rst: Add
1936 * gnat_rm.texi: Regenerate.
1938 2018-05-23 Maroua Maalej <maalej@adacore.com>
1940 * sem_spark.adb: Fix of some permission rules of pointers in SPARK.
1942 2018-05-23 Ed Schonberg <schonberg@adacore.com>
1944 * sem_ch5.adb (Preanalyze_Range): The pre-analysis of the domain of
1945 iteration of an Ada2012 loop is performed to determine the type of the
1946 domain, but full analysis is performed once the loop is rewritten as a
1947 while-loop during expansion. The pre-analysis suppresses expansion; it
1948 must also suppress the generation of freeze nodes, which may otherwise
1949 appear in the wrong scope before rewritting.
1951 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1953 * sem_elab.adb: Update the section on suppressing elaboration warnings.
1955 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1957 * einfo.adb (Is_Elaboration_Checks_OK_Id): Use predicate
1958 Is_Elaboration_Target.
1959 (Is_Elaboration_Target): New routine.
1960 (Is_Elaboration_Warnings_OK_Id): Use predicate Is_Elaboration_Target.
1961 (Set_Is_Elaboration_Checks_OK_Id): Use predicate Is_Elaboration_Target.
1962 (Set_Is_Elaboration_Warnings_OK_Id): Use predicate
1963 Is_Elaboration_Target.
1964 * einfo.ads: Add new synthesized attribute Is_Elaboration_Target along
1965 with occurrences in nodes.
1966 (Is_Elaboration_Target): New routine.
1967 * sem_prag.adb (Analyze_Pragma): Suppress elaboration warnings when an
1968 elaboration target is subject to pragma Warnings (Off, ...).
1970 2018-05-23 Eric Botcazou <ebotcazou@adacore.com>
1972 * repinfo.adb (List_Type_Info): Remove obsolete stuff.
1974 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
1976 * einfo.adb: Flag304 is now Is_Elaboration_Warnings_OK_Id.
1977 (Is_Elaboration_Warnings_OK_Id): New routine.
1978 (Set_Is_Elaboration_Warnings_OK_Id): New routine.
1979 (Write_Entity_Flags): Output Flag304.
1980 * einfo.ads: Add new attribute Is_Elaboration_Warnings_OK_Id along with
1981 occurrences in entities.
1982 (Is_Elaboration_Warnings_OK_Id): New routine along with pragma Inline.
1983 (Set_Is_Elaboration_Warnings_OK_Id): New routine along with pragma
1985 * sem_attr.adb (Analyze_Access_Attribute): Capture the state of
1986 elaboration warnings.
1987 * sem_ch3.adb (Analyze_Object_Declaration): Capture the state of
1988 elaboration warnings.
1989 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Capture the
1990 state of elaboration warnings.
1991 (Analyze_Subprogram_Body_Helper): Capture the state of elaboration
1993 (Analyze_Subprogram_Declaration): Capture the state of elaboration
1995 * sem_ch9.adb (Analyze_Entry_Declaration): Capture the state of
1996 elaboration warnings.
1997 (Analyze_Single_Task_Declaration): Capture the state of elaboration
1999 (Analyze_Task_Type_Declaration): Capture the state of elaboration
2001 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Capture the state
2002 of elaboration warnings.
2003 (Analyze_Generic_Subprogram_Declaration): Capture the state of
2004 elaboration warnings.
2005 * sem_elab.adb: Add a section on suppressing elaboration warnings.
2006 Type Processing_Attributes includes component Suppress_Warnings
2007 intended to suppress any elaboration warnings along a path in the
2008 graph. Update Initial_State to include a value for this component.
2009 Types Target_Attributes and Task_Attriutes include component
2010 Elab_Warnings_OK to indicate whether the target or task has elaboration
2011 warnings enabled. component Elab_Warnings_OK.
2012 (Build_Access_Marker): Propagate attribute
2013 Is_Elaboration_Warnings_OK_Node from the attribute to the generated
2015 (Extract_Instantiation_Attributes): Set the value for Elab_Warnings_OK.
2016 (Extract_Target_Attributes): Set the value for Elab_Warnings_OK.
2017 (Extract_Task_Attributes): Set the value for Elab_Warnings_OK.
2018 (Process_Conditional_ABE_Access): Suppress futher elaboration warnings
2019 when already in this mode or when the attribute or target have warnings
2021 (Process_Conditional_ABE_Activation_Impl): Do not emit any diagnostics
2022 if warnings are suppressed.
2023 (Process_Conditional_ABE_Call): Suppress further elaboration warnings
2024 when already in this mode, or the target or call have warnings
2026 (Process_Conditional_ABE_Call_Ada): Do not emit any diagnostics if
2027 warnings are suppressed.
2028 (Process_Conditional_ABE_Call_SPARK): Do not emit any diagnostics if
2029 warnings are suppressed.
2030 (Process_Conditional_ABE_Instantiation): Suppress further elaboration
2031 warnings when already in this mode or when the instantiation has
2032 warnings suppressed.
2033 (Process_Conditional_ABE_Instantiation_Ada): Do not emit any
2034 diagnostics if warnings are suppressed.
2035 (Process_Conditional_ABE_Variable_Assignment_Ada): Use the more
2036 specific Is_Elaboration_Warnings_OK_Id rather than Warnings_Off.
2037 (Process_Conditional_ABE_Variable_Assignment_SPARK): Use the more
2038 specific Is_Elaboration_Warnings_OK_Id rather than Warnings_Off.
2039 (Process_Task_Object): Suppress further elaboration warnings when
2040 already in this mode, or when the object, activation call, or task type
2041 have warnings suppressed. Update the processing state to indicate that
2042 the path goes through a task body.
2043 * sinfo.adb (Is_Elaboration_Warnings_OK_Node): Accept attribute
2045 (Set_Is_Elaboration_Warnings_OK_Node): Accept attribute references.
2046 * sinfo.ads: Attribute Is_Elaboration_Warnings_OK_Node now applies to
2047 attribute references.
2049 2018-05-23 Piotr Trojanek <trojanek@adacore.com>
2051 * einfo.ads: Minor reformatting.
2053 2018-05-23 Ed Schonberg <schonberg@adacore.com>
2055 * sem_ch3.adb (Analyze_Object_Declaration): If expression is an
2056 anonymous_access_to_ subprogram formal, apply a conversion to force an
2057 accsssibility check that will fail statically, enforcing 3.10.2 (13).
2059 2018-05-23 Daniel Mercier <mercier@adacore.com>
2061 * gnat1drv.adb: Turn off length expansion in CodePeer mode.
2063 2018-05-23 Bob Duff <duff@adacore.com>
2065 * freeze.adb: (Check_Address_Clause): Deal with build-in-place
2066 aggregates in addition to build-in-place calls.
2068 2018-05-23 Bob Duff <duff@adacore.com>
2070 * einfo.ads: Minor reformatting.
2071 * sem_ch3.adb: Likewise.
2072 * sinfo.ads: Likewise.
2074 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2076 * exp_ch3.adb (Default_Initialize_Object): Do not optimize scalar array
2077 initialization when the component type has predicates.
2078 * exp_ch4.adb (Expand_N_Allocator): Do not optimize scalar array
2079 allocation when the component type has predicates.
2081 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2083 * einfo.adb, exp_disp.adb, sem_ch3.adb, sem_ch6.adb, sem_prag.adb:
2086 2018-05-22 Justin Squirek <squirek@adacore.com>
2088 * sem_ch6.adb (Analyze_Expression_Function): Propagate flags from the
2089 original function spec into the generated function spec due to
2090 expansion of expression functions during analysis.
2091 (Analyze_Subprogram_Body_Helper): Modify check on formal parameter
2092 references from the body to the subprogram spec in the case of
2093 expression functions because of inconsistances related to having a
2095 * libgnarl/s-osinte__android.ads: Flag parameters as unused.
2096 * libgnarl/s-osinte__lynxos178e.ads: Likewise.
2097 * libgnarl/s-osinte__qnx.adb: Likewise.
2098 * libgnarl/s-osinte__qnx.ads: Likewise.
2100 2018-05-22 Doug Rupp <rupp@adacore.com>
2102 * init.c (HAVE_ADJUST_CONTEXT_FOR_RAISE): Don't define on VxWorks7 for
2105 2018-05-22 Olivier Hainque <hainque@adacore.com>
2107 * libgnat/a-except.adb (Exception_Propagation.Propagate_Exception):
2108 Expect an Exception_Occurence object, not an Access.
2109 (Complete_And_Propagate_Occurrence): Adjust accordingly.
2110 (Raise_From_Signal_Handler): Likewise.
2111 (Reraise_Occurrence_No_Defer): If we have a Machine_Occurrence
2112 available in the provided occurrence object, just re-propagate the
2113 latter as a bare "raise;" would do.
2114 * libgnat/a-exexpr.adb (Propagate_Exception): Adjust to spec change.
2115 * libgnat/a-exstat.adb (String_To_EO): Initialize X.Machine_Occurrence
2116 to null, to mark that the occurrence we're crafting from the stream
2117 contents is not being propagated (yet).
2119 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2121 * exp_aggr.adb (Initialize_Ctrl_Record_Component): Insert the generated
2122 code for a transient component in line with the rest of the
2123 initialization code, rather than before the aggregate. This ensures
2124 that the component has proper visibility of the discriminants.
2126 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2128 * adaint.c: Reorganize QNX-specific macros, use syspage to retreive the
2131 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2133 * sigtramp-qnx.c: Properly restore link register in signal trampoline.
2135 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2137 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): Strip away any
2138 conversions before extracting the value of the expression.
2139 * exp_ch3.adb (Default_Initialize_Object): Optimize the default
2140 initialization of an array of scalars.
2141 (Get_Simple_Init_Val): Add processing for array types. Remove the
2142 processing of strings because this case is already handled by the array
2144 (Needs_Simple_Initialization): Moved to Sem_Util.
2145 (Simple_Init_Array_Type): New routine.
2146 (Simple_Init_Initialize_Scalars_Type): Reimplemented to use the new
2147 facilities from Sem_Util.
2148 (Simple_Initialization_OK): New routine.
2149 * exp_ch3.ads (Needs_Simple_Initialization): Moved to Sem_Util.
2150 * exp_ch4.adb (Expand_N_Allocator): Optimize the default allocation of
2151 an array of scalars.
2152 * sem_prag.adb (Analyze_Float_Value): New routine.
2153 (Analyze_Integer_Value): New routine.
2154 (Analyze_Pragma): Reimplement the analysis of pragma Initialize_Scalars
2155 to handled the extended form of the pragma.
2156 (Analyze_Type_Value_Pair): New routine.
2157 * sem_util.adb: Add invalid value-related data structures.
2158 (Examine_Array_Bounds): New routine.
2159 (Has_Static_Array_Bounds): Reimplemented.
2160 (Has_Static_Non_Empty_Array_Bounds): New routine.
2161 (Invalid_Scalar_Value): New routine.
2162 (Needs_Simple_Initialization): Moved from Exp_Ch3.
2163 (Set_Invalid_Scalar_Value): New routines.
2164 * sem_util.ads (Has_Static_Non_Empty_Array_Bounds): New routine.
2165 (Invalid_Scalar_Value): New routine.
2166 (Needs_Simple_Initialization): Moved from Exp_Ch3.
2167 (Set_Invalid_Scalar_Value): New routines.
2168 * snames.ads-tmpl: Add names for the salar type families used by pragma
2171 2018-05-22 Javier Miranda <miranda@adacore.com>
2173 * exp_disp.adb (Make_DT): Initialize the External_Tag with an empty
2174 string when pragma No_Tagged_Streams is applicable to the tagged type,
2175 and initialize the Expanded_Name with an empty string when pragma
2176 Discard_Names is applicable to the tagged type.
2178 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2180 * sem_ch6.adb (Check_Conformance): Add RM reference for rule that a
2181 formal subprogram is never subtype conformqnt, and thus cannot be the
2182 prefix of 'Access. Reject as well the attribute when applied to a
2183 renaming of a formal subprogram.
2185 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2187 * exp_ch3.adb (Build_Array_Init_Proc): Update the call to
2188 Needs_Simple_Initialization.
2189 (Build_Init_Statements): Update the call to Get_Simple_Init_Val.
2190 (Check_Subtype_Bounds): Renamed to Extract_Subtype_Bounds. Update the
2191 profile and comment on usage.
2192 (Default_Initialize_Object): Do not use New_Copy_Tree to set the proper
2193 Sloc of a value obtained from aspect Default_Value because this could
2194 potentially replicate large trees. The proper Sloc is now set in
2195 Get_Simple_Init_Val.
2196 (Get_Simple_Init_Val): Reorganized by breaking the various cases into
2197 separate routines. Eliminate the use of global variables.
2198 (Init_Component): Update the call to Get_Simple_Init_Val.
2199 (Needs_Simple_Initialization): Update the parameter profile and all
2201 (Simple_Init_Defaulted_Type): Copy the value of aspect Default_Value
2202 and set the proper Sloc.
2203 * exp_ch3.ads (Get_Simple_Init_Val): Update the parameter profile and
2205 (Needs_Simple_Initialization): Update the parameter profile.
2207 2018-05-22 Patrick Bernardi <bernardi@adacore.com>
2209 * sem_ch3.adb (Build_Discriminant_Constraints): Raise an error if the
2210 user tries to use a subtype indication as a discriminant constraint.
2212 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2214 * exp_ch4.ads, exp_ch4.adb, exp_util.adb, expander.adb: Remove mention
2215 of N_Reduction_Expression and N_Reduction_Expression_Parameter.
2216 * par-ch4.adb: Remove parsing routines for reduction expressions.
2217 * sem.adb, sinfo.ads, sinfo.adb, sem_ch4.ads, sem_ch4.adb, sem_res.adb,
2218 sem_spark.adb, sprint.adb: Remove analysis routines for reduction
2221 2018-05-22 Arnaud Charlet <charlet@adacore.com>
2223 * sem_ch8.adb (Check_Frozen_Renaming): Do not emit error in
2224 Relaxed_RM_Semantics mode.
2226 2018-05-22 Arnaud Charlet <charlet@adacore.com>
2228 * comperr.adb (Delete_SCIL_Files): Take into account
2229 N_Generic_Package_Renaming_Declaration.
2231 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2233 * sem_ch3.adb (Search_Derivation_Levels): Whenever a parent type is
2234 private, use the full view if available, because it may include renamed
2235 discriminants whose values are stored in the corresponding
2238 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2240 * einfo.ads, einfo.adb: New attribute Hidden_In_Formal_Instance,
2241 defined on packages that are actuals for formal packages, in order to
2242 set/reset the visibility of the formals of a formal package with given
2243 actuals, when there are subsequent uses of those formals in the
2244 enclosing generic, as required by RN 12.7 (10).
2245 * atree.ads, atree.adb: Add operations for Elist30.
2246 * atree.h: Add Elist30.
2247 * sem_ch12.adb (Analyze_Formal_Package_Instantiation): Collect formals
2248 that are not defaulted and are thus not visible within the current
2250 (Check_Formal_Packages): Reset visibility of formals of a formal
2251 package that are not defaulted, on exit from current instance.
2253 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2255 * sem_prag.adb (Analyze_Input_Output): Emit an error when a non-null,
2256 non-'Result output appears in the output list of a function.
2258 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2260 * exp_attr.adb (Build_Array_VS_Func): Reimplemented.
2261 (Build_Record_VS_Func): Reimplemented.
2262 (Expand_N_Attribute): Reimplement the handling of attribute
2264 * sem_attr.adb (Analyze_Attribute): Reimplement the handling of
2265 attribute 'Valid_Scalars.
2266 * sem_util.adb (Scalar_Part_Present): Reimplemented.
2267 (Validated_View): New routine.
2268 * sem_util.ads (Scalar_Part_Present): Update the parameter profile and
2270 (Validated_View): New routine.
2271 * doc/gnat_rm/implementation_defined_attributes.rst: Update the
2272 documentation of attribute 'Valid_Scalars.
2273 * gnat_rm.texi: Regenerate.
2275 2018-05-22 Bob Duff <duff@adacore.com>
2277 * binde.adb: (Choose): Ignore a pragma Elaborate_Body that appears in
2278 the spec of a SAL_Interface package.
2280 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2282 * freeze.adb (Freeze_Entity): When analyzing delayed aspects of an
2283 entity E within a generic unit, indicate that there are no remaining
2284 delayed aspects after invoking Analyze_Aspects_At_Freeze_Point. The
2285 entity E is not frozen yet but the aspects should not be reanalyzed at
2286 the freeze point, which may be outside of the generic and may not have
2287 the proper visibility.
2289 2018-05-22 Bob Duff <duff@adacore.com>
2291 * doc/gnat_ugn/gnat_utility_programs.rst: Add documentation for
2292 the new --split-line-before-record, --indent-named-statements and
2293 --no-align-modes gnatpp switches.
2295 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2297 * sem_prag.adb (Process_Compile_Time_Warning_Or_Error): Handle properly
2298 a second argument that is a constant of a given string value.
2300 2018-05-22 Doug Rupp <rupp@adacore.com>
2302 * sigtramp-vxworks-target.inc: Align stack to 128bits on AArch64.
2304 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2306 * sigtramp-qnx.c: Fix stack alignment issue in the signal trampoline.
2308 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2310 * freeze.adb (Freeze_Fixed_Point_Type): If the first subtype has
2311 delayed aspects, analyze them now, os that the representation of the
2312 type (size, bounds) can be computed and validated.
2314 2018-05-22 Olivier Hainque <hainque@adacore.com>
2316 * libgnat/s-dwalin.adb (Enable_Cache): Skip symbols outside of the
2317 executable code section boundaries.
2319 2018-05-22 Javier Miranda <miranda@adacore.com>
2321 * locales.c: New implementation for the Ada.Locales package.
2322 * libgnat/a-locale.ads: Remove comment indicating that this is not
2324 * doc/gnat_rm/standard_library_routines.rst: Remove comment indicating
2325 that this is not implemented.
2326 * gnat_rm.texi: Regenerate.
2328 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2330 * exp_ch5.adb, freeze.adb, pprint.adb, sem_ch4.adb, sem_res.adb: Minor
2333 2018-05-22 Justin Squirek <squirek@adacore.com>
2335 * sem_ch12.adb (In_Same_Declarative_Part): Moved to sem_util.
2336 (Freeze_Subprogram_Body, Install_Body): Modify calls to
2337 In_Same_Declarative_Part.
2338 * sem_prag.adb (Analyze_Pragma-Pragma_Pure_Function): Add check to
2339 verify pragma declaration is within the same declarative list with
2340 corresponding error message.
2341 * sem_util.adb, sem_util.ads (In_Same_Declarative_Part): Moved from
2342 sem_ch12.adb and generalized to be useful outside the scope of
2345 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2347 * sem_ch6.adb (Analyze_Subprogram_Declaration): Set the proper
2348 categorization of the unit after processing the aspects in case one of
2349 its aspects is converted into a categorization pragma.
2351 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2353 * freeze.adb (Warn_Overlay): Do not emit a wawrning on an object
2354 declaration with an explicit address clause and a type with default
2355 initialization, if the declaration carries an aspect
2356 Suppress_Initialization.
2358 2018-05-21 Daniel Mercier <mercier@adacore.com>
2360 * pprint.adb: Use mixed case for attribute names.
2362 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2364 * sem_ch6.adb (Analyze_Generic_Subprogram_Body): Rename the call to
2365 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2366 (Analyze_Subprogram_Body_Helper): Rename the calls to
2367 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2368 * sem_ch9.adb (Analyze_Entry_Body): Rename the call to
2369 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2370 * sem_ch10.adb: Add with and use clause for Sem_Ch13.
2371 (Analyze_Package_Body_Stub): Add constant Id. Decorate the package stub
2372 prior to analyzing its aspects.
2373 (Analyze_Protected_Body_Stub): Add constant Id. Decorate the package
2374 stub prior to analyzing its aspects. Save and restore the configuration
2376 (Analyze_Task_Body_Stub): Add constant Id. Decorate the package stub
2377 prior to analyzing its aspects.
2378 * sem_ch13.adb (Analyze_Aspect_Specifications_On_Body_Or_Stub): Renamed
2379 to Analyze_Aspects_On_Subprogram_Body_Or_Stub.
2380 * sem_ch13.ads (Analyze_Aspect_Specifications_On_Body_Or_Stub): Renamed
2381 to Analyze_Aspects_On_Subprogram_Body_Or_Stub.
2382 * sem_prag.adb: Code reformatting.
2383 (Analyze_Refined_Depends_Global_Post): Consider task body stubs.
2385 2018-05-21 Jerome Lambourg <lambourg@adacore.com>
2387 * gcc-interface/Makefile.in: Add g-soliop__qnx.ads to the runtime build
2390 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2392 * exp_cg.adb: Remove with and use clause for Exp_Disp.
2393 * exp_ch9.adb: Remove with and use clause for Exp_Disp.
2394 * exp_disp.adb (Is_Predefined_Dispatching_Operation): Moved to Sem_Util.
2395 (Is_Predefined_Interface_Primitive): Moved to Sem_Util.
2396 (Is_Predefined_Internal_Operation): Moved to Sem_Util.
2397 * exp_disp.ads (Is_Predefined_Dispatching_Operation): Moved to Sem_Util.
2398 (Is_Predefined_Interface_Primitive): Moved to Sem_Util.
2399 (Is_Predefined_Internal_Operation): Moved to Sem_Util.
2400 * exp_dist.adb: Remove with and use clause for Exp_Disp.
2401 * freeze.adb: Remove with and use clause for Exp_Disp.
2402 * sem_cat.adb: Remove with and use clause for Exp_Disp.
2403 * sem_ch6.adb: Remove with and use clause for Exp_Disp.
2404 * sem_ch12.adb: Remove with and use clause for Exp_Disp.
2405 * sem_elab.adb (Check_Overriding_Primitive): Do not process predefined
2407 * sem_util.adb: Remove with and use clause for Exp_Disp.
2408 (Is_Predefined_Dispatching_Operation): Moved from Exp_Disp.
2409 (Is_Predefined_Interface_Primitive): Moved from Exp_Disp.
2410 (Is_Predefined_Internal_Operation): Moved from Exp_Disp.
2411 * sem_util.ads (Is_Predefined_Dispatching_Operation): Moved from
2413 (Is_Predefined_Interface_Primitive): Moved from Exp_Disp.
2414 (Is_Predefined_Internal_Operation): Moved from Exp_Disp.
2416 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2418 * sem_res.adb (Valid_Conversion): Improve error message on an illegal
2419 type conversion whose expression has a limited view of a type.
2421 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2423 * exp_ch5.adb (Build_Formal_Container_Iteration): If source has
2424 explicit name for iterator loop, preserve that name in expanded
2425 construct, for possible use in exit statements.
2427 2018-05-21 Javier Miranda <miranda@adacore.com>
2429 * sem_ch4.adb (Analyze_Membership_Op): Avoid compiler crash when the
2430 spec of a unit has Ada 2012 membership tests with multiple choices and
2431 the unit body is not compiled under Ada 2012 mode.
2433 2018-05-21 Doug Rupp <rupp@adacore.com>
2435 * sigtramp-vxworks-target.inc: Set cfa_reg properly from sigcontext
2437 (CFI_COMMON_REGS): Restore LR jic probed from prologue.
2438 (REGNO_PC_OFFSET): Change to correct value for Aarch64.
2440 2018-05-21 Jose Ruiz <ruiz@adacore.com>
2442 * doc/gnat_ugn/gnat_utility_programs.rst, exp_attr.adb,
2443 libgnarl/s-tassta.adb: Minor typo fixes
2445 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2447 * sem_ch4.adb (Analyze_One_Call): Recognize complex cases where an
2448 indexed call originally in prefix forn is itself the prefix of a
2451 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2453 * sem_eval.adb (Is_Null_Range): Clarify access to the full view of a
2455 (Not_Null_Range): Same as above.
2457 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2459 * exp_ch3.adb: Minor reformatting.
2460 * exp_ch6.adb: Likewise.
2461 * freeze.adb: Likewise.
2462 * inline.adb: Likewise.
2463 * sem_util.adb: Likewise.
2465 2018-05-21 Yannick Moy <moy@adacore.com>
2467 * inline.adb (Expand_Inlined_Call.Process_Formals): Use a type
2468 conversion instead of an unchecked type conversion when inlining a
2469 return statement, unless type qualification is required (for character
2470 and string literal) or no check can result from the conversion (for
2472 * opt.ads: Update comment.
2474 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2476 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Install the elaboration
2477 model of the compilation unit spec, if any.
2478 * sem_ch7.adb (Analyze_Package_Body_Helper): Install the elaboration
2479 model of the compilation unit spec, if any.
2480 * sem_ch10.adb (Analyze_Subunit): Install the elaboration model of the
2481 parent compilation unit spec, if any.
2482 * sem_elab.adb (Check_Elaboration_Scenarios): Restore the elaboration
2483 model of the main unit.
2484 (Is_Same_Unit): The routine now uses Unit_Entity.
2485 (Is_Subunit): Removed.
2486 (Normalize_Unit): Removed.
2487 (Unit_Entity): New routine.
2488 * sem_prag.adb (Analyze_Pragma): Reimplement the handling of pragma
2489 Elaboration_Checks. The analysis now ensures that the pragma appears at
2490 the configuration level, and on the initial declaration of a unit.
2491 Other placements are either flagged as illegal, or ignored.
2492 (Check_Duplicate_Elaboration_Checks_Pragma): New routine.
2493 (Ignore_Elaboration_Checks_Pragma): New routine.
2494 * sem_util.adb (Install_Elaboration_Model): New routine.
2495 * sem_util.ads (Install_Elaboration_Model): New routine.
2496 * doc/gnat_rm/implementation_defined_pragmas.rst: Update the
2497 documentation of pragma Elaboration_Checks.
2498 * gnat_rm.texi: Regenerate.
2500 2018-05-21 Olivier Hainque <hainque@adacore.com>
2502 * libgnat/s-trasym__dwarf.adb (Executable_Name): Return argv[0] instead
2503 of empty string when argv[0] couldn't be found on PATH.
2504 (Enable_Cache): Raise Program_Error instead of attempting a null
2505 pointer dereference when the Exec_Module initialization failed.
2507 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2509 * libgnarl/a-reatim.ads (Clock_Time): Remove External aspect.
2510 * libgnarl/a-taside.ads (Tasking_State): Likewise.
2511 * libgnat/a-calend.ads (Clock_Time): Likewise.
2513 2018-05-21 Yannick Moy <moy@adacore.com>
2515 * sem_ch6.adb (Analyze_Procedure_Call): Refine test to recognize prefix
2516 call notation in inlined call in GNATprove mode.
2518 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2520 * einfo.adb (Is_External_State): An abstract state is also external
2521 when it is declared with option "synchronous".
2522 * einfo.ads: Update the documentation of synthesized attribute
2524 * sem_util.adb (Find_Simple_Properties): New routine.
2525 (Is_Enabled_External_Property): New routine.
2526 (State_Has_Enabled_Property): Reimplemented. The two flavors of option
2527 External have precedence over option Synchronous when determining
2528 whether a property is in effect.
2530 2018-05-21 Yannick Moy <moy@adacore.com>
2532 * sem_eval.adb (Static_Length): Take into account case of variable of
2533 subtype string literal.
2535 2018-05-21 Olivier Hainque <hainque@adacore.com>
2537 * libgnat/s-objrea.ads (Get_Memory_Bounds): Rename as Get_Xcode_Bounds.
2538 (Object_Section): Rename Flag_Alloc component as Flag_Xcode.
2539 * libgnat/s-objrea.adb (Get_Xcode_Bounds): Adjust to new subprogram and
2541 (Get_Section, ELF case): Set Flag_Xcode from SHF_EXECINSTR.
2542 * libgnat/s-dwalin.adb (Open): Adjust to the Get_Memory_Bounds name
2545 2018-05-21 Olivier Hainque <hainque@adacore.com>
2547 * libgnat/s-dwalin.ads (Dwarf_Context): Change type of Load_Address to
2548 Address, and type of Low, High to Storage_Offset.
2549 (Low): Rename as Low_Address and convey that the return value is a
2550 runtime reference accounting for a load address.
2551 * libgnat/s-dwalin.adb (Read_Aranges_Entry): Adjust to the
2552 address/offset type changes.
2553 (Aranges_Lookup): Likewise.
2554 (Symbolic_Address): Likewise.
2555 (Symbolic_Traceback): Likewise.
2556 (Dump_Cache): Likewise.
2557 (Is_Inside): Likewise.
2559 (Set_Load_Address): Likewise.
2560 (Low_Address): Likewise, and account for C.Load_Address.
2561 * libgnat/s-trasym__dwarf.adb (Lt): Use Low_Address instead of Low.
2562 (Multi_Module_Symbolic_Traceback): Compare address in traceback
2563 with module Low_Address instead of Low.
2565 2018-05-21 Olivier Hainque <hainque@adacore.com>
2567 * libgnat/s-dwalin.ads (Dwarf_Context): Rename Load_Slide as
2569 * libgnat/s-dwalin.adb (Is_Inside): Adjust accordingly.
2570 (Set_Load_Address): Likewise.
2571 (Symbolic_Traceback): Likewise.
2573 2018-05-21 Olivier Hainque <hainque@adacore.com>
2575 * libgnat/s-trasym__dwarf.adb (Add_Module_To_Cache): Expect a
2576 Load_Address argument and pass it down to Init_Module.
2577 * libgnat/s-tsmona__linux.adb (Build_Cache_For_All_Modules): Pass
2578 lm.l_addr as the Load_Address to Add_Module_To_Cache.
2580 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2582 * einfo.adb (Has_Discriminants): Stronger assertion.
2583 (Set_Has_Discriminants): Stronger assertion.
2584 * sem_ch13.adb (Push_Scope_And_Install_Discriminants): Adapt to respect
2585 the stronger assertion on Has_Discriminant.
2586 (Uninstall_Discriminants_And_Pop_Scope): Same as above.
2587 * sem_util.adb (New_Copy_Tree): Same as above.
2588 * sem_ch7.adb (Generate_Parent_References): Prevent calls to
2589 Has_Discriminant on non-type entities that might happen when the
2590 compiled code has errors.
2591 * sem_ch3.adb (Derived_Type_Declaration): Only call
2592 Set_Has_Discriminant on type entities.
2594 2018-05-21 Arnaud Charlet <charlet@adacore.com>
2596 * exp_unst.adb (Unnest_Subprogram): Unnest all subprograms relevant for
2599 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2601 * lib.ads: Fix typo in enumeration in comment.
2603 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2605 * sem_attr.adb (Analyze_Attribute, case Scalar_Storage_Order): The
2606 attribute reference is legal within a generic unit when the prefix is a
2607 formal private type.
2609 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2611 * exp_ch7.adb (Establish_Transient_Scope): Code cleanup. Do not
2612 delegate the secondary stack management when there is no suitable
2613 transient context, and the transient scope was intended to manage the
2614 secondary stack because this causes premature reclamation. Change the
2615 transient scope creation logic by special casing assignment statements
2616 of controlled components for type initialization procedures.
2617 (Find_Node_To_Be_Wrapped): Renamed to Find_Transient_Context. Update
2618 the comment on usage.
2619 (Find_Transient_Context): Change the initinte loop into a while loop.
2620 Iterations schemes and iterator specifications are not valid transient
2621 contexts because they rely on special processing. Assignment statements
2622 are now treated as a normal transient context, special cases are
2623 handled by the caller. Add special processing for pragma Check.
2624 (Is_OK_Construct): Removed. Its functionality has been merged in
2625 routine Find_Transient_Context.
2626 * sem_ch5.adb (Check_Call): Reimplemented. Add code to properly
2627 retrieve the subprogram being invoked. Use a more accurate predicate
2628 (Requires_Transient_Scope) to determine that the function will emply
2629 the secondary stack.
2631 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2633 * ada_get_targ.adb: Fix subprogram body headers.
2634 * adabkend.adb: Likewise.
2635 * checks.adb: Likewise.
2636 * exp_ch3.adb: Likewise.
2637 * exp_ch5.adb: Likewise.
2638 * exp_ch9.adb: Likewise.
2639 * exp_dist.adb: Likewise.
2640 * exp_tss.adb: Likewise.
2641 * inline.adb: Likewise.
2642 * lib-writ.adb: Likewise.
2643 * lib-xref-spark_specific.adb: Likewise.
2644 * libgnarl/s-osinte__darwin.adb: Likewise.
2645 * libgnarl/s-stusta.adb: Likewise.
2646 * libgnarl/s-taprop__solaris.adb: Likewise.
2647 * libgnarl/s-tposen.adb: Likewise.
2648 * libgnarl/s-vxwext__kernel-smp.adb: Likewise.
2649 * libgnarl/s-vxwext__kernel.adb: Likewise.
2650 * libgnat/a-btgbso.adb: Likewise.
2651 * libgnat/a-cfdlli.adb: Likewise.
2652 * libgnat/a-cfhama.adb: Likewise.
2653 * libgnat/a-cfinve.adb: Likewise.
2654 * libgnat/a-cimutr.adb: Likewise.
2655 * libgnat/a-coboho.adb: Likewise.
2656 * libgnat/a-cofove.adb: Likewise.
2657 * libgnat/a-cofuve.adb: Likewise.
2658 * libgnat/a-comutr.adb: Likewise.
2659 * libgnat/a-exexda.adb: Likewise.
2660 * libgnat/a-tags.adb: Likewise.
2661 * libgnat/a-tideau.adb: Likewise.
2662 * libgnat/a-wtdeau.adb: Likewise.
2663 * libgnat/a-ztdeau.adb: Likewise.
2664 * libgnat/g-alleve.adb: Likewise.
2665 * libgnat/s-excdeb.adb: Likewise.
2666 * libgnat/s-parint.adb: Likewise.
2667 * libgnat/s-shasto.adb: Likewise.
2668 * libgnat/s-traceb__hpux.adb: Likewise.
2669 * prepcomp.adb: Likewise.
2670 * sem_ch4.adb: Likewise.
2671 * sem_ch6.adb: Likewise.
2672 * sem_dist.adb: Likewise.
2673 * sem_prag.adb: Likewise.
2674 * sem_util.adb: Likewise.
2675 * sinfo.adb: Likewise.
2676 * switch.adb: Likewise.
2678 2018-05-04 John Marino <gnugcc@marino.st>
2681 * link.c (BSD platforms): Add missing backslash.
2683 2018-04-27 Eric Botcazou <ebotcazou@adacore.com>
2686 * init.c (__gnat_handle_vms_condition): Add missing parentheses.
2688 2018-04-25 Eric Botcazou <ebotcazou@adacore.com>
2691 * gnat_ugn.texi: Regenerate.
2693 2018-03-23 Eric Botcazou <ebotcazou@adacore.com>
2696 * gnatlink.adb (Gnatlink): Remove handling of -b switch.
2697 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (gnatlink):
2698 Remove documentation of -b switch.
2700 2018-03-23 Eric Botcazou <ebotcazou@adacore.com>
2703 * gnatlink.adb (Process_Args): Drop existing link switches if multiple
2704 switches are passed for --LINK.
2706 2018-03-12 Eric Botcazou <ebotcazou@adacore.com>
2709 * gcc-interface/misc.c (gnat_post_options): Disable string overflow
2712 2018-03-10 Eric Botcazou <ebotcazou@adacore.com>
2714 * gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
2715 Consider only entities for objects.
2717 2018-03-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
2719 * gcc-interface/Makefile.in (OSCONS_CPP): Remove redundant
2721 (OSCONS_EXTRACT): Add $(GNATLIBCFLAGS_FOR_C).
2723 2018-03-06 Eric Botcazou <ebotcazou@adacore.com>
2725 * gcc-interface/trans.c (convert_with_check): Fix typo in the condition
2726 guarding the overflow check emitted for the upper bound of a floating-
2729 2018-03-06 Eric Botcazou <ebotcazou@adacore.com>
2731 * gcc-interface/utils.c (def_builtin_1): Bail out on error_mark_node.
2733 2018-02-28 Eric Botcazou <ebotcazou@adacore.com>
2735 * libgnat/i-cexten.ads (Float_128): New type.
2737 2018-02-02 Eric Botcazou <ebotcazou@adacore.com>
2739 * gcc-interface/decl.c (array_type_has_nonaliased_component): Return
2740 false if the component type is a pointer.
2742 2018-01-11 Gary Dismukes <dismukes@adacore.com>
2744 * exp_ch3.adb (Default_Initialize_Object): Call New_Copy_Tree on the
2745 result of Get_Simple_Init_Value and pass the source location of the
2746 object declaration's object_definition.
2748 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2750 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration): Handle
2751 properly object declarations with initializations that are
2752 build-in-place function calls, when there is an address specification,
2753 either as an aspect specification or an explicit attribute
2754 specification clause, for the initialized object.
2755 * freeze.adb (Check_Address_Clause): Do not remove side-effects from
2756 initial expressions in the case of a build-in-place call.
2758 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
2760 * sem_eval.adb (Is_Null_Range): Retrieve the full view when called on a
2761 private (sub)type; refactor to avoid early return statement.
2762 (Not_Null_Range): Same as above.
2764 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2766 * freeze.adb (Freeze_Entity): Ensure that a Ghost type is not
2767 concurrent, nor effectively volatile.
2768 * ghost.adb (Check_Ghost_Type): New routine.
2769 * ghost.ads (Check_Ghost_Type): New routine.
2770 * sem_util.adb (Is_Declaration): Reimplemented. The routine can now
2771 consider specific subsets of declarations.
2772 (Is_Declaration_Other_Than_Renaming): Removed. Its functionality is
2773 replicated by Is_Declaration.
2774 * sem_util.ads (Is_Declaration): New parameter profile. Update the
2776 (Is_Declaration_Other_Than_Renaming): Removed.
2778 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2780 * sem_ch5.adb (Analyze_Assignment): Assignments to variables that act
2781 as Part_Of consituents of single protected types are illegal when they
2782 take place inside a protected function.
2783 (Diagnose_Non_Variable_Lhs): Use Within_Function to check for an
2785 (Is_Protected_Part_Of_Constituent): New routine.
2786 (Within_Function): New routine.
2788 2018-01-11 Arnaud Charlet <charlet@adacore.com>
2790 Bump copyright notices to 2018.
2792 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2794 * binde.adb, par-ch6.adb, par-ch9.adb, sem_ch12.adb, sem_ch13.adb:
2797 2018-01-11 Justin Squirek <squirek@adacore.com>
2799 * par-ch6.adb (Scan_Body_Or_Expression_Function): Add additional check
2800 to make sure a given expression function is properly parenthesized.
2802 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2804 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Check the
2805 categorization of a subprogram body which does not complete a previous
2808 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2810 * sem_ch10.adb (Check_Private_Child_Unit): Ensure that the enclosing
2811 scope of package Ada is Standard.
2813 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2815 * sem_ch13.adb (Replace_Type_Ref): Handle properly reference to a
2816 subcomponent of the current entity when building the body for a dynamic
2817 predicate function for a record with composite subcomponents.
2819 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2821 * exp_aggr.adb (Convert_Aggr_In_Object_Decl): Update the call to
2822 Establish_Transient_Scope.
2823 (Convert_To_Assignments): Update the call to Establish_Transient_Scope.
2824 (Expand_Array_Aggregate): Update the call to Establish_Transient_Scope.
2825 * exp_ch6.adb (Expand_Call_Helper): Update the call to
2826 Establish_Transient_Scope.
2827 (Make_Build_In_Place_Call_In_Object_Declaration): Update the call to
2828 Establish_Transient_Scope.
2829 * exp_ch7.adb (Establish_Transient_Scope): Restructured. Delegate the
2830 management of the secondary stack to an enclosing scope if there is no
2831 suitable construct to wrap, and the transient scope was intended to
2832 manage the secondary stack.
2833 (Find_Node_To_Be_Wrapped): Restructured. A case_statement_alternative
2834 is a valid boundary for a transient expression which comes from the
2835 statements of the alternative, otherwise alternatives cannot be
2836 wrapped. Assignments of controlled objects which have controlled
2837 actions suppressed now stop the traversal as there is no point in
2838 looking for an enclosing construct. Add several N_xxx_Body choices to
2839 the termination conditions for completeness.
2840 * exp_ch7.ads (Establish_Transient_Scope): Update the parameter profile
2841 and the associated comment on usage.
2842 * exp_smem.adb (Add_Shared_Var_Lock_Procs): Update the call to
2843 Establish_Transient_Scope.
2844 (Add_Write_After): Update the call to Establish_Transient_Scope.
2845 * sem_res.adb (Check_Initialization_Call): Removed.
2846 (Resolve_Actuals): Account for additional cases where finalization
2847 actions are required by utilizing predicate Needs_Finalization rather
2849 (Resolve_Call): Type initialization procedures can now utilize
2850 transient scopes to manage the secondary stack, thus preventing leaks
2851 during initialization. Remove the previous kludgy algorithm which
2852 attempts to manage the secondary stack at the object creation site.
2854 2018-01-11 Jerome Lambourg <lambourg@adacore.com>
2856 * libgnat/g-soliop__qnx.ads: New.
2857 * adaint.c, adaint.h, cstreams.c, s-oscons-tmplt.c, sysdep.c: Update
2860 2018-01-11 Bob Duff <duff@adacore.com>
2862 * par-ch9.adb (P_Protected_Operation_Declaration_Opt): Give an error if
2863 a null procedure occurs in a protected definition.
2865 2018-01-11 Bob Duff <duff@adacore.com>
2867 * binderr.ads, namet.ads: Minor reformatting.
2869 2018-01-11 Bob Duff <duff@adacore.com>
2871 * doc/gnat_ugn/gnat_utility_programs.rst: Improve documentation of
2874 2018-01-11 Bob Duff <duff@adacore.com>
2876 * binde.adb (Force_Elab_Order): Give an error if there are duplicate
2879 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2881 * sem_ch6.adb (Freeze_Expr_Types): If an access value is the
2882 controlling argument of a dispatching call. freeze the corresponding
2885 2018-01-11 Ben Brosgol <brosgol@adacore.com>
2887 * doc/Makefile: Add Sphinx option -W to treat warnings as errors.
2889 2018-01-11 Ben Brosgol <brosgol@adacore.com>
2891 * doc/gnat_rm/implementation_defined_aspects.rst: Minor type/wording
2893 * gnat_rm.texi: Regenerate.
2895 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2897 * sem_ch12.adb (Check_Fixed_Point_Type): Do not apply check if the
2898 formsl type corresponding to the actual fixed point type is private,
2899 because in this case there can be no suspicious arithmetic operations
2900 in the generic unless they reference a formal subprogram. Clarify
2903 2018-01-11 Javier Miranda <miranda@adacore.com>
2905 * exp_util.adb (Remove_Side_Effects): No action done for functions
2906 returning class-wide types since it requires generating code using
2907 'reference and the CCG target has no secondary stack.
2908 * gnat1drv.adb: Disable building static dispatch tables when generating
2911 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
2913 * libgnat/a-direio.ads, libgnat/a-sequio.ads, libgnat/a-ststio.ads,
2914 libgnat/a-textio.ads, libgnat/a-witeio.ads, libgnat/a-ztexio.ads
2915 (File_Type): Add Default_Initial_Condition aspect.
2917 2018-01-11 Pascal Obry <obry@adacore.com>
2919 * libgnat/s-os_lib.adb (Normalize_Pathname): New implementation.
2921 2018-01-11 Bob Duff <duff@adacore.com>
2923 * doc/gnat_ugn/gnat_utility_programs.rst: Rewrite gnatpp documentation
2924 to match what the Libadalang-based version does.
2925 * doc/gnat_ugn/about_this_guide.rst: Update reference.
2927 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2929 * sem_res.adb (Uses_SS): A controlled type requires the secondary stack
2930 if it contains at least one component declaration employing a function
2931 call returning on the secondary stack.
2933 2018-01-11 Yannick Moy <moy@adacore.com>
2935 * doc/gnat_rm/standard_and_implementation_defined_restrictions.rst:
2936 Update description of restriction SPARK_05 with SPARK 2014.
2937 * gnat_rm.texi: Regenerate.
2939 2018-01-11 Vasiliy Fofanov <fofanov@adacore.com>
2941 * doc/gnat_ugn/gnat_utility_programs.rst: Fix layout.
2943 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2945 * exp_aggr.adb, exp_ch9.adb, exp_util.adb, sem_aggr.adb, sem_ch3.adb,
2946 sem_res.adb, sem_util.adb: Minor reformatting.
2948 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2950 * sem_prag.adb (Analyze_Pragma, case Predicate): Indicate that the type
2951 has a delayed aspect which must be processed at the point the type is
2952 frozen. This mimics what is done when the predicate is provided by a
2955 2018-01-11 Doug Rupp <rupp@adacore.com>
2957 * init.c (vxworks): Add macro checks for __aarch64__.
2959 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2961 * exp_util.adb (Add_Failure_Expression): New routine.
2962 (Make_Predicate_Check): Reimplement the handling of Predicate_Failure.
2963 * sem_util.adb (Is_Current_Instance): Code cleanup.
2965 2018-01-11 Patrick Bernardi <bernardi@adacore.com>
2967 * libgnat/s-parame*.adb, libgnat/s-parame*.ads: Remove unneeded
2968 Default_Sec_Stack_Size.
2969 * libgnat/s-secsta.adb (SS_Allocate): Handle the fixed secondary stack
2970 limit check so that the integer index does not overflow. Check the
2971 dynamic stack allocation does not cause the secondary stack pointer to
2973 (SS_Info): Align colons.
2974 (SS_Init): Cover the case when bootstraping with an old compiler that
2975 does not set Default_SS_Size.
2977 2018-01-11 Ed Schonberg <schonberg@adacore.com>
2979 * sem_ch3.adb (Add_Internal_Interface_Entities): When checking the
2980 legality of an inherited operation that may require overriding, ignore
2981 primitive_wrappers that correspond to explicit operations that override
2982 an interface primitive.
2983 * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity): If the
2984 operation to which the class-wide expression applies is a protected op.
2985 with a primitive_wrapper, verify that the updated inherited expression
2986 does not contain an internal call to a protected function. This
2987 completes the implementation of AI12-0166.
2989 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
2991 * ali.adb: Document the remaining letters available for ALI lines.
2992 (Scan_ALI): A with clause is internal when it is encoded on a 'Z' line.
2993 * ali.ads: Update type With_Record. Field
2994 Implicit_With_From_Instantiation is no longer in use. Add field
2996 * csinfo.adb (CSinfo): Remove the setup for attribute
2997 Implicit_With_From_Instantiation.
2998 * lib-writ.adb (Collect_Withs): Correct the logic which marks a unit as
2999 either implicitly or explicitly withed.
3000 (Is_Implicit_With_Clause): New routine.
3001 (Write_ALI): Rename array Implicit_With to Has_Implicit_With to avoid
3002 confusion with the with clause attribute by the same name.
3003 (Write_With_Lines): Update the emission of 'W', 'Y', and 'Z' headers.
3004 * rtsfind.adb (Maybe_Add_With): Code cleanup.
3005 * sem_ch8.adb (Present_System_Aux): Code cleanup.
3006 * sem_ch10.adb (Expand_With_Clause): Mark the with clause as generated
3008 (Implicit_With_On_Parent): Mark the with clause as generated for a
3010 * sem_ch12.adb (Inherit_Context): With clauses inherited by an
3011 instantiation are no longer marked as Implicit_With_From_Instantiation
3012 because they are already marked as implicit.
3013 * sem_elab.adb (Ensure_Prior_Elaboration_Static): Remove the kludge
3014 which marks implicit with clauses as related to an instantiation.
3015 * sinfo.adb (Implicit_With_From_Instantiation): Removed.
3016 (Parent_With): New routine.
3017 (Set_Implicit_With_From_Instantiation): Removed.
3018 (Set_Parent_With): New routine.
3019 * sinfo.ads: Update the documentation of attribute Implicit_With.
3020 Remove attribute Implicit_With_From_Instantiation along with
3021 occurrences in nodes. Add attribute Parent_With along with occurrences
3023 (Implicit_With_From_Instantiation): Removed along with pragma Inline.
3024 (Parent_With): New routine along with pragma Inline.
3025 (Set_Implicit_With_From_Instantiation): Removed along with pragma Inline.
3026 (Set_Parent_With): New routine along with pragma Inline.
3028 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3030 * sem_util.adb (Find_Enclosing_Scope): Return the unique defining
3031 entity when the enclosing construct is a body.
3033 2018-01-11 Patrick Bernardi <bernardi@adacore.com>
3035 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Simplified
3036 Secondary_Stack_Size handling as a pragma is now generated for the
3037 corresponding aspect instead of an attribute. Pragma expression is
3038 relocated instead of evaluated. Discriminant of the corresponding
3039 record type is referenced rather than the type discriminant.
3040 (Create_Secondary_Stack_For_Task, Make_Task_Create_Call): Update
3041 Secondary_Stack_Size rep item checks to only look for the pragma rep.
3042 * sem_ch13.adb (Analyze_One_Aspect): Transform
3043 Aspect_Secondary_Stack_Size into a pragma instead of an attribute
3044 because the attribute does not have visibility on a task type's
3045 discriminants when the type's definition is expanded.
3046 (Analyze_Attribute_Definition_Clause): Remove handling of
3047 Attribute_Secondary_Stack_Size.
3048 * snames.adb-tmpl, snames.ads-tmpl: Remove
3049 Attribute_Secondary_Stack_Size, no longer used.
3051 2018-01-11 Justin Squirek <squirek@adacore.com>
3053 * sem_ch8.adb: Minor comment fix.
3055 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3057 * exp_ch4.adb (Process_Action): Do not abandon the inspection of an
3058 individual action because the action may denote a complex expression,
3059 such as a case statement, which in turn may contain additional
3062 2018-01-11 Ed Schonberg <schonberg@adacore.com>
3064 * sem_aggr.adb (Resolve_Iterated_Component_Association): Perform
3065 analysis on a copy of the expression with a copy of the index variable,
3066 because full expansion will rewrite construct into a loop with the
3067 original loop variable.
3068 * exp_aggr.adb (Gen_Assign): Defer analysis and resolution if the
3069 expression is an iterated component association. Full analysis takes
3070 place when construct is rewritten as a loop.
3071 (In_Place_Assign_OK, Safe_Component): An iterated_component_association
3072 is not safe for in-place assignment.
3073 * sem_util.adb (Remove_Entity): Handle properly the case of an isolated
3074 entity with no homonym and no other entity in the scope.
3076 2018-01-11 Justin Squirek <squirek@adacore.com>
3078 * sem_prag.adb (Analyze_Pragma:Pragma_Loop_Variant): Modify error
3079 message to be printed on the pragma argument identifier.
3081 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3083 * exp_util.adb (Build_Invariant_Procedure_Declaration): Set the last
3084 entity of the generated invariant procedure in order to construct a
3085 proper entity chain.
3087 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
3089 * sem_ch13.adb (Build_Predicate_Functions): Fix minor issues in
3092 2018-01-11 Arnaud Charlet <charlet@adacore.com>
3094 * einfo.ads, einfo.adb (Activation_Record_Component,
3095 Set_Activation_Record_Component, Set_Is_Uplevel_Referenced_Entity):
3096 Allow E_Discriminant.
3098 2018-01-10 Eric Botcazou <ebotcazou@adacore.com>
3100 * gcc-interface/decl.c (gnat_to_gnu_component_type): Apply the check
3101 for atomic access once the component size is taken into account and
3102 also do it if the component type is Atomic or Volatile_Full_Access.
3104 2018-01-04 Eric Botcazou <ebotcazou@adacore.com>
3106 * gnatvsn.ads: Bump copyright year.
3108 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3109 Alan Hayward <alan.hayward@arm.com>
3110 David Sherwood <david.sherwood@arm.com>
3112 * gcc-interface/misc.c (enumerate_modes): Treat GET_MODE_BITSIZE
3115 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3116 Alan Hayward <alan.hayward@arm.com>
3117 David Sherwood <david.sherwood@arm.com>
3119 * gcc-interface/misc.c (enumerate_modes): Treat GET_MODE_PRECISION
3122 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3123 Alan Hayward <alan.hayward@arm.com>
3124 David Sherwood <david.sherwood@arm.com>
3126 * gcc-interface/utils.c (gnat_types_compatible_p): Handle
3127 polynomial TYPE_VECTOR_SUBPARTS.
3129 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3130 Alan Hayward <alan.hayward@arm.com>
3131 David Sherwood <david.sherwood@arm.com>
3133 * gcc-interface/misc.c (enumerate_modes): Handle polynomial
3136 2018-01-03 Jakub Jelinek <jakub@redhat.com>
3138 Update copyright years.
3140 * gnat_ugn.texi: Bump @copying's copyright year.
3141 * gnat_rm.texi: Likewise.
3143 Copyright (C) 2018 Free Software Foundation, Inc.
3145 Copying and distribution of this file, with or without modification,
3146 are permitted in any medium without royalty provided the copyright
3147 notice and this notice are preserved.