1 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
3 * exp_ch13.adb, exp_ch7.adb, exp_unst.adb, freeze.adb,
4 libgnat/s-os_lib.adb, sem_ch3.adb, sem_ch3.ads, sem_ch5.adb,
5 sem_eval.adb, sem_res.adb, sem_util.adb: Minor reformatting.
7 2018-07-17 Javier Miranda <miranda@adacore.com>
9 * exp_ch13.adb (Expand_N_Freeze_Entity): Handle subtype declared for an
11 * freeze.adb (Freeze_Expression): Handle freeze of an entity defined
12 outside of a subprogram body. This case was previously handled during
13 preanalysis; the frozen entities were remembered and left pending until
14 we continued freezeing entities outside of the subprogram. Now, when
15 climbing the parents chain to locate the correct placement for the
16 freezeing node, we check if the entity can be frozen and only when no
17 enclosing node is marked as Must_Not_Freeze the entity is frozen.
18 * sem_ch3.ads (Preanalyze_Default_Expression): Declaration moved to the
20 * sem_ch3.adb (Preanalyze_Default_Expression): Code adjusted to invoke
21 the new subprogram Preanalyze_With_Freezing_And_Resolve.
22 * sem_ch6.adb (Preanalyze_Formal_Expression): New subprogram.
23 (Analyze_Expression_Function, Process_Formals): Invoke
24 Preanalyze_Formal_Expression instead of Preanalyze_Spec_Expression
25 since the analysis of the formals may freeze entities.
26 (Analyze_Subprogram_Body_Helper): Skip building the body of the
27 class-wide clone for eliminated subprograms.
28 * sem_res.ads, sem_res.adb (Preanalyze_And_Resolve): New subprogram.
29 Its code is basically the previous version of this routine but extended
30 with an additional parameter which is used to specify if during
31 preanalysis we are allowed to freeze entities. If the new parameter is
32 True then the subtree root node is marked as Must_Not_Freeze and no
33 entities are frozen during preanalysis.
34 (Preanalyze_And_Resolve): Invokes the internal version of
35 Preanalyze_And_Resolve without entity freezing.
36 (Preanalyze_With_Freezing_And_Resolve): Invokes the internal version of
37 Prenalyze_And_Resolve with freezing enabled.
39 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
41 * einfo.ads, libgnat/g-comlin.ads: Minor change "ie" to "i.e." in docs
44 2018-07-17 Justin Squirek <squirek@adacore.com>
46 * libgnat/s-os_lib.adb (Argument_String_To_List): Fix trimming of
49 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
51 * sem_prag.adb (Has_Visible_State): Do not consider constants as
52 visible state because it is not possible to determine whether a
53 constant depends on variable input.
54 (Propagate_Part_Of): Add comment clarifying the behavior with respect
57 2018-07-17 Yannick Moy <moy@adacore.com>
59 * gnat1drv.adb (Gnat1drv): Do not issue warning about exception not
60 being propagated in GNATprove mode.
62 2018-07-17 Dmitriy Anisimkov <anisimko@adacore.com>
64 * libgnat/g-socket.adb, libgnat/g-socket.ads: Reorganize and make
65 public components of Inet_Addr_Type. Introduce public binary
68 2018-07-17 Javier Miranda <miranda@adacore.com>
70 * exp_ch7.adb (Make_Transient_Block): When determining whether an
71 enclosing scope already handles the secondary stack, take into account
72 transient blocks nested in a block that do not manage the secondary
73 stack and are located within a loop.
75 2018-07-17 Ed Schonberg <schonberg@adacore.com>
77 * sem_util.adb (Enclosing_Subprogram): Protected entries and task
78 entries must be treated separately: task entries are within the
79 enclosing subprogram of the task type, while protected entries are
80 transformed into the corresponding Protected_Body_Subprogram, which is
81 the enclosing_subprogram of any subprogram declared within the entry
84 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
86 * doc/gnat_ugn/building_executable_programs_with_gnat.rst: Add missing
87 sections on -gnatH and -gnatJ compiler switches.
88 * gnat_ugn.texi: Regenerate.
90 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
92 * alloc.ads: Update the allocation metrics of the ignored Ghost nodes
94 * atree.adb: Add a soft link for a procedure which is invoked whenever
95 an ignored Ghost node or entity is created.
96 (Change_Node): Preserve relevant attributes which come from the Flags
98 (Mark_New_Ghost_Node): Record a newly created ignored Ghost node or
100 (Rewrite): Preserve relevant attributes which come from the Flags
102 (Set_Ignored_Ghost_Recording_Proc): New routine.
103 * atree.ads: Define an access-to-suprogram type for a soft link which
104 records a newly created ignored Ghost node or entity.
105 (Set_Ignored_Ghost_Recording_Proc): New routine.
106 * ghost.adb: Remove with and use clause for Lib. Remove table
107 Ignored_Ghost_Units. Add new table Ignored_Ghost_Nodes.
108 (Add_Ignored_Ghost_Unit): Removed.
109 (Initialize): Initialize the table which stores ignored Ghost nodes.
110 Set the soft link which allows Atree.Mark_New_Ghost_Node to record an
112 (Is_Ignored_Ghost_Unit): Use the ultimate original node when checking
113 an eliminated ignored Ghost unit.
114 (Lock): Release and lock the table which stores ignored Ghost nodes.
115 (Mark_And_Set_Ghost_Assignment): Record rather than propagate ignored
117 (Mark_And_Set_Ghost_Procedure_Call): Record rather than propagate
119 (Mark_Ghost_Clause): Record rather than propagate ignored Ghost nodes.
120 (Mark_Ghost_Declaration_Or_Body): Record rather than propagate ignored
122 (Mark_Ghost_Pragma): Record rather than propagate ignored Ghost nodes.
123 (Propagate_Ignored_Ghost_Code): Removed.
124 (Record_Ignored_Ghost_Node): New routine.
125 (Remove_Ignored_Ghost_Code): Reimplemented.
126 (Remove_Ignored_Ghost_Node): New routine.
127 (Ultimate_Original_Node): New routine.
128 * ghost.ads (Check_Ghost_Completion): Removed.
129 * sem_ch8.adb (Analyze_Use_Package): Remove obsolete code. Mark a use
130 package clause as ignored Ghost if applicable.
131 * sem_util.adb (Is_Body_Or_Package_Declaration): Reimplemented.
133 2018-07-17 Javier Miranda <miranda@adacore.com>
135 * sem_ch5.adb (Has_Call_Using_Secondary_Stack): Moved to library level
137 (Analyze_Loop_Statement): Wrap the loop in a block when the evaluation
138 of the loop iterator relies on the secondary stack.
140 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
142 * sem_util.adb (Next_Actual): If the parent is a N_Null_Statement,
143 which happens for inlined calls, then fetch the next actual from the
146 2018-07-17 Ed Schonberg <schonberg@adacore.com>
148 * einfo.ads: Update documentation for Scalar_Range.
150 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
152 * lib-xref-spark_specific.adb (Create_Heap): Attach the HEAP entity to
153 the Standard package.
155 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
157 * einfo.adb (Is_Wrapper_Package): Remove extra parentheses.
159 2018-07-17 Ed Schonberg <schonberg@adacore.com>
161 * sem_util.adb (Enclosing_Subprogram): Handle properly entries, and
162 synchronized types that are completions of limited types or private
164 (Scope_Within): Handle properly accept statements in task bodies.
166 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
168 * sem_prag.adb (Has_Visible_State): Do not consider generic formals
169 because they are not part of the visible state space. Add constants to
170 the list of acceptable visible states.
171 (Propagate_Part_Of): Do not consider generic formals when propagating
172 the Part_Of indicator.
173 * sem_util.adb (Entity_Of): Do not follow renaming chains which go
174 through a generic formal because they are not visible for SPARK
176 * sem_util.ads (Entity_Of): Update the comment on usage.
178 2018-07-17 Ed Schonberg <schonberg@adacore.com>
180 * sem_util.adb (Gather_Components): A discriminant of an ancestor may
181 have been constrained by a later ancestor, so when looking for the
182 value of that hidden discriminant we must examine the stored constraint
183 of other ancestors than the immediate parent type.
185 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
187 * exp_ch6.adb (Build_Heap_Or_Pool_Allocator): Ensure that scoping
188 constructs and entities within receive new entities when replicating a
190 (Expand_N_Extended_Return_Statement): Ensure that scoping constructs
191 and entities within receive new entities when replicating a tree.
192 * sem_util.adb (New_Copy_Tree): Add new formal Scopes_In_EWA_OK.
193 (Visit_Entity): Visit entities within scoping constructs inside
194 expression with actions nodes when requested by the caller. Add blocks,
195 labels, and procedures to the list of entities which need replication.
196 * sem_util.ads (New_Copy_Tree): Add new formal Scopes_In_EWA_OK. Update
197 the comment on usage.
199 2018-07-17 Arnaud Charlet <charlet@adacore.com>
201 * doc/gnat_ugn/about_this_guide.rst,
202 doc/gnat_ugn/gnat_and_program_execution.rst: Remove references to gcov.
203 * gnat_ugn.texi: Regenerate.
205 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
207 * contracts.adb (Analyze_Contracts): Add specialized processing for
208 package instantiation contracts.
209 (Analyze_Package_Contract): Remove the verification of a missing
211 (Analyze_Package_Instantiation_Contract): New routine.
212 * contracts.ads (Analyze_Package_Contract): Update the comment on
214 * sem_prag.adb (Check_Missing_Part_Of): Ensure that the entity of the
215 instance is being examined when trying to determine whether a package
216 instantiation needs a Part_Of indicator.
218 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
220 * einfo.adb, exp_ch7.adb, exp_ch9.adb, exp_unst.adb, inline.adb,
221 sem.adb, sem_ch12.adb, sem_ch13.adb, sem_ch3.adb, sem_eval.adb,
222 sem_util.adb: Minor reformatting.
224 2018-07-16 Arnaud Charlet <charlet@adacore.com>
226 * frontend.adb: Only unnest subprograms if no previous errors were
229 2018-07-16 Ed Schonberg <schonberg@adacore.com>
231 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): Handle loops that
232 contain blocks in the elaboration code for a package body. Create the
233 elaboration subprogram wrapper only if there is a subprogram
234 declaration in a block or loop.
236 2018-07-16 Ed Schonberg <schonberg@adacore.com>
238 * exp_ch4.adb (Expand_Set_Membership): Use New_Copy_Tree to perform a
239 deep copy of the left operand when building each conjuct of the
240 expanded membership operation, to avoid sharing nodes between them.
241 This sharing interferes with the unnesting machinery and is generally
244 2018-07-16 Ed Schonberg <schonberg@adacore.com>
246 * exp_unst.adb (Visit_Node): Handle 'Address references that are
249 2018-07-16 Ed Schonberg <schonberg@adacore.com>
251 * exp_unst.adb (Visit_Node): Handle the semantic of Storage_Pool field
252 in relevant nodes: Allocate, Free, and return statements.
254 2018-07-16 Ed Schonberg <schonberg@adacore.com>
256 * sem_ch12.adb (Analyze_Package_Instantiation): Handle properly an
257 instance that carries an aspect Default_Storage_Pool that overrides a
258 default storage pool that applies to the generic unit. The aspect in
259 the generic unit was removed before copying it in the instance, rather
260 than removing it from the copy of the aspects that are appended to the
261 aspects in the instance.
263 2018-07-16 Ed Schonberg <schonberg@adacore.com>
265 * einfo.adb (Set_Is_Uplevel_Referenced_Entity): Flag can appear on
267 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): Handle subprogram
269 * exp_ch9.adb (Reset_Scopes_To): Set the scopes of entities local to an
270 entry body to be the corresponding generated subprogram, for correct
271 analysis of uplevel references.
272 * exp_unst.adb (Visit_Node): Handle properly binary and unary operators
273 Ignore pragmas, fix component associations.
274 (Register_Subprograms): Subprograms in synchronized types must be
275 treated as reachable.
277 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
279 * sem_util.adb (Check_No_Hidden_State): Ignore internally-generated
280 states and variables.
282 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
284 * sinfo.ads, sinfo.adb (Withed_Body): Remove.
285 (Set_Withed_Body): Remove.
287 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
289 * sem.adb (Walk_Library_Items): Skip units with configuration pragmas
290 when printing debug info.
292 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
294 * sem.adb (Walk_Library_Items): Reuse local constant.
295 (Is_Subunit_Of_Main): Turn condition to positive and flip the
296 IF-THEN-ELSE branches; avoid potentially ineffective assignment to the
299 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
301 * sem.adb (Walk_Library_Items): Deconstruct dead code.
303 2018-07-16 Ed Schonberg <schonberg@adacore.com>
305 * exp_ch4.adb (Expand_N_Op_Xor): Use common routine
306 Expand_Nonbinary_Modular_Op. Needed for unnesting.
308 2018-07-16 Ed Schonberg <schonberg@adacore.com>
310 * sem_ch3.adb (Inherit_Predicate_Flags): A non-discrete type may have a
311 static predicate (for example True) but has no
312 static_discrete_predicate.
314 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
316 * exp_attr.adb (Build_Record_VS_Func): Handle corner cases dealing with
317 class-wide types and record extensions.
319 2018-07-16 Justin Squirek <squirek@adacore.com>
321 * sem_eval.adb (Eval_Integer_Literal): Add exception for avoiding
322 checks on expanded literals within if and case expressions.
324 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
326 * libgnat/s-wchwts.adb (Wide_String_To_String): Use the appropriate
327 longest sequence factor. Code clean up.
328 (Wide_Wide_String_To_String): Use the appropriate longest sequence
329 factor. Code clean up.
331 2018-07-16 Javier Miranda <miranda@adacore.com>
333 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Report an error
334 on Bit_Order when defined for a record extension.
336 2018-07-16 Arnaud Charlet <charlet@adacore.com>
338 * libgnat/s-objrea.ads: Minor code clean up.
340 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
342 * sem_ch3.adb (Process_Discriminants): Adjust reference to the SPARM RM
345 2018-07-16 Arnaud Charlet <charlet@adacore.com>
347 * adaint.c (__gnat_set_file_time_name): Code clean up.
349 2018-07-16 Javier Miranda <miranda@adacore.com>
351 * inline.adb (Build_Body_To_Inline): Minor code reorganization that
352 ensures that calls to function Has_Single_Return() pass a decorated
354 (Has_Single_Return.Check_Return): Peform checks on entities (instead on
355 relying on their characters).
357 2018-07-16 Javier Miranda <miranda@adacore.com>
359 * exp_ch5.adb (Expand_Iterator_Loop_Over_Array): Code cleanup. Required
360 to avoid generating an ill-formed tree that confuses gnatprove causing
363 2018-07-16 Yannick Moy <moy@adacore.com>
365 * inline.adb (Has_Single_Return): Rewrap comment.
367 2018-07-16 Eric Botcazou <ebotcazou@adacore.com>
369 * einfo.ads: Minor tweak in comment.
371 2018-07-16 Javier Miranda <miranda@adacore.com>
373 * sem_ch4.adb (Analyze_Membership_Op): Code cleanup.
375 2018-07-16 Javier Miranda <miranda@adacore.com>
377 * exp_attr.adb (Expand_N_Attribute_Reference ['Count]): Do not
378 transform 'Count into a function call if the current scope has been
381 2018-07-16 Javier Miranda <miranda@adacore.com>
383 * sem_util.ads, sem_util.adb (Has_Prefix): Move this function to the
384 public part of this package.
386 2018-07-16 Yannick Moy <moy@adacore.com>
388 * sem_res.adb (Resolve_Call): Do not inline calls inside
389 compiler-generated functions translated as predicates in GNATprove.
391 2018-07-16 Gary Dismukes <dismukes@adacore.com>
393 * exp_ch4.adb (Expand_N_Allocator): Test for Storage_Pool being RTE in
394 addition to the existing test for no Storage_Pool as a condition
395 enabling generation of the call to Check_Standard_Allocator when the
396 restriction No_Standard_Allocators_After_Elaboration is active.
397 * libgnat/s-elaall.ads (Check_Standard_Allocator): Correct comment to
398 say that Storage_Error will be raised (rather than Program_Error).
399 * libgnat/s-elaall.adb (Check_Standard_Allocator): Raise Storage_Error
400 rather than Program_Error when Elaboration_In_Progress is False.
402 2018-07-16 Gary Dismukes <dismukes@adacore.com>
404 * sem_eval.adb: Fix spelling for compile-time-known.
406 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
408 * sem_eval.adb (Compile_Time_Known_Value): Add a guard which prevents
409 the compiler from entering infinite recursion when trying to determine
410 whether a deferred constant has a compile time known value, and the
411 initialization expression of the constant is a reference to the
414 2018-07-16 Nicolas Roche <roche@adacore.com>
416 * libgnat/a-strunb.adb, libgnat/a-strunb__shared.adb: Adjust growth
417 factor from 1/32 to 1/2 for Unbounded_String.
419 2018-07-13 Eric Botcazou <ebotcazou@adacore.com>
421 * gcc-interface/lang.opt (funsigned-char): New option.
422 * gcc-interface/misc.c (gnat_handle_option): Accept it.
423 * gcc-interface/utils.c (finish_character_type): Tweak comment.
425 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
427 * gcc-interface/decl.c (gnat_to_gnu_entity): Add GNAT_DECL local
428 variable and use it throughout.
429 <E_Variable>: If the nominal subtype of the object is unconstrained,
430 compute the Ada size separately and put in on the padding type if the
432 <E_Record_Type>: Minor tweak.
433 * gcc-interface/misc.c (gnat_type_max_size): Rename max_size_unit
434 into max_size_unit throughout.
436 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
438 * gcc-interface/gigi.h (add_decl_expr): Adjust prototype.
439 * gcc-interface/decl.c (gnat_to_gnu_entity): Remove useless test.
440 * gcc-interface/trans.c (add_stmt_with_node): Remove exceptions.
441 (add_decl_expr): Change type of second parameter and rename it.
442 (renaming_from_instantiation_p): New function moved from...
443 (set_expr_location_from_node): Test for exceptions here and add one
444 for actual subtypes built for unconstrained composite actuals.
445 * gcc-interface/utils.c (renaming_from_instantiation_p): ...here.
447 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
449 * gcc-interface/trans.c (lvalue_required_p): Remove ALIASED parameter
450 and adjust recursive calls.
451 (Identifier_to_gnu): Adjust calls to lvalue_required_p.
452 (gnat_to_gnu): Likewise.
454 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
456 * gcc-interface/decl.c (gnat_to_gnu_param): Minor tweak.
457 (gnat_to_gnu_subprog_type): New pure_flag local variable. Set it for
458 a pure Ada function with a by-ref In parameter. Propagate it onto the
459 function type by means of the TYPE_QUAL_RESTRICT flag.
460 * gcc-interface/utils.c (finish_subprog_decl): Set DECL_PURE_P if the
461 function type has the TYPE_QUAL_RESTRICT flag set.
463 2018-07-06 Jim Wilson <jimw@sifive.com>
465 * Makefile.rtl: Add riscv*-linux* support.
466 * libgnarl/s-linux__riscv.ads: New.
467 * libgnat/system-linux-riscv.ads: New.
469 * Make-generated.in (treeprs.ads): Use $(GNATMAKE) instead of gnatmake.
470 (einfo.h, sinfo.h, stamp-snames, stamp-nmake): Likewise.
471 * gcc-interface/Makefile.in (xoscons): Likewise.
473 2018-07-06 Sebastian Huber <sebastian.huber@embedded-brains.de>
475 * libgnat/system-rtems.ads (Frontend_Exceptions): Set to False.
476 (ZCX_By_Default): Set to True.
478 2018-07-02 Martin Liska <mliska@suse.cz>
480 * gnatvsn.ads: Bump Library_Version to 9.
482 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
484 * gcc-interface/ada-tree.h (TYPE_RETURN_BY_DIRECT_REF_P): Change from
485 using TYPE_LANG_FLAG_4 to using TYPE_LANG_FLAG_0.
486 (TYPE_ALIGN_OK): Move around.
487 (TYPE_PADDING_FOR_COMPONENT): Remove superfluous parentheses.
488 * gcc-interface/decl.c (change_qualified_type): Move to...
489 (gnat_to_gnu_entity): Adjust comment.
490 * gcc-interface/gigi.h (change_qualified_type): ...here; make inline.
491 (ceil_pow2): Use ceil_log2.
492 * gcc-interface/utils.c (finish_subprog_decl): Add couple of comments
493 and do not set TREE_SIDE_EFFECTS.
494 (handle_noreturn_attribute): Use change_qualified_type.
496 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
498 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Constant>: Do not get
499 the expression of a dispatch table that is not being defined.
500 <E_Record_Subtype>: Remove obsolete kludge.
502 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
504 * gcc-interface/decl.c (warn_on_field_placement): Use specific wording
506 (warn_on_list_placement): New static function.
507 (components_to_record): Use it to warn on multiple fields in list.
509 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
511 * gcc-interface/decl.c (variant_desc): Add AUX field.
512 (gnat_to_gnu_entity) <discrete_type>: Do not call compute_record_mode
514 (reverse_sort_field_list): New static function.
515 (components_to_record): Place the variant part at the beginning of the
516 field list when there is an obvious order of increasing position.
517 (build_variant_list): Initialize it.
518 (create_variant_part_from): Do not call compute_record_mode directly.
519 (copy_and_substitute_in_layout): Likewise. Always sort the fields with
520 fixed position in order of increasing position, in the record and all
521 the variants, in any. Call reverse_sort_field_list.
522 * gcc-interface/utils.c (make_packable_type): Compute the sizes before
523 calling finish_record_type. Do not call compute_record_mode directly.
524 (finish_record_type): Overhaul final processing depending on REP_LEVEL
525 and call finish_bitfield_layout if it is equal to one or two.
527 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
529 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Reuse the
530 existing fields of a dummy fat pointer type, if any. Clear the
531 TYPE_DECL_SUPPRESS_DEBUG on the fat pointer type after completing it.
533 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
535 * contracts.adb (Process_Body_Postconditions): Expand only checked
537 (Process_Contract_Cases_For): Expand only checked contract cases.
538 (Process_Inherited_Preconditions): Ignored class-wide preconditions are
539 partially expanded because some of their semantic checks are tied to
541 (Process_Preconditions_For): Expand only checked preconditions.
542 (Process_Spec_Postconditions): Expand only checked preconditions.
543 Ignored class-wide preconditions are partially expanded because some of
544 their semantic checks are tied to the expansion.
545 * exp_prag.adb (Expand_N_Pragma): Suppress the expansion of ignored
547 * exp_util.adb (Add_Inherited_Invariants): Code clean up.
548 * sem_util.adb (Propagate_Invariant_Attributes): Code clean up.
550 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
552 * exp_ch9.adb, exp_unst.adb, inline.adb, libgnat/a-ciorma.adb,
553 libgnat/a-ciormu.adb, libgnat/a-ciorse.adb, libgnat/a-coorma.adb,
554 libgnat/a-coormu.adb, libgnat/a-coorse.adb, sem_prag.adb: Minor
557 2018-06-11 Gary Dismukes <dismukes@adacore.com>
559 * exp_unst.ads, exp_unst.adb: Typo fixes and minor reformatting.
561 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
563 * exp_ch6.adb (Add_Unconstrained_Actuals_To_Build_In_Place_Call): Do
564 not add any actuals when the size of the object is known, and the
565 caller will allocate it.
566 (Build_Heap_Allocator): Rename to Build_Heap_Or_Pool_Allocator to
567 better illustrate its functionality. Update the comment on the
568 generated code. Generate a branch for the heap and pool cases where
569 the object is not necessarity controlled.
570 (Expand_N_Extended_Return_Statement): Expand the extended return
571 statement into four branches depending the requested mode if the caller
572 will not allocate the object on its side.
573 (Make_Build_In_Place_Call_In_Allocator): Do not allocate a controlled
574 object on the caller side because this will violate the semantics of
575 finalizable types. Instead notify the function to allocate the object
576 on the heap or a user-defined storage pool.
577 (Needs_BIP_Alloc_Form): A build-in-place function needs to be notified
578 which of the four modes to employ when returning a limited controlled
580 * exp_util.adb (Build_Allocate_Deallocate_Proc): Remove a redundant
581 guard which is already covered in Needs_Finalization.
583 2018-06-11 Olivier Hainque <hainque@adacore.com>
585 * libgnat/s-excmac*.ads: Factorize Unwind_Action definitions ...
586 * libgnat/a-exexpr.adb: ... Here, then add comments describing the
587 major datastructures associated with the current exception raised.
588 (Setup_Current_Excep): Accept a "Phase" argument conveying the
589 unwinding phase during which this subprogram is called. For an Ada
590 exception, don't update the current exception buffer from the raised
591 exception object during SEARCH_PHASE, as this is redundant with the
592 call now issued just before propagation starts.
593 (Propagate_GCC_Exception): Move call to Setup_Current_Excep ahead of
594 the unwinding start, conveying Phase 0.
595 (Unhandled_Except_Handler): Pass UA_CLEANUP_PHASE as the Phase value on
596 the call to Setup_Current_Excep.
597 * raise-gcc.c (personality_body): Pass uw_phases as the Phase argument
598 on calls to Setup_Current_Excep.
600 2018-06-11 Ed Schonberg <schonberg@adacore.com>
602 * exp_unst.ads, exp_unst.adb (Needs_Fat_Pointer,
603 Build_Access_Type_Decl): New subprograms to handle uplevel references
604 to formals of an unconstrained array type. The activation record
605 component for these is an access type, and the reference is rewritten
606 as an explicit derefenrence of that component.
608 2018-06-11 Bob Duff <duff@adacore.com>
610 * libgnat/a-ciorma.adb, libgnat/a-ciormu.adb, libgnat/a-ciorse.adb,
611 libgnat/a-coorma.adb, libgnat/a-coormu.adb, libgnat/a-coorse.adb:
612 (Element): Add code to detect dangling cursors in some cases.
614 2018-06-11 Yannick Moy <moy@adacore.com>
616 * sem_ch6.adb (Build_Subprogram_Declaration): Mark parameters as coming
619 2018-06-11 Ed Schonberg <schonberg@adacore.com>
621 * sem_ch13.adb (Build_Predicate_Functions): For a derived type, ensure
622 that its parent is already frozen so that its predicate function, if
623 any, has already been constructed.
625 2018-06-11 Yannick Moy <moy@adacore.com>
627 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Adapt for
628 possible task unit as the enclosing context.
630 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
632 * gnat1drv.adb: Remove use clause for Repinfo.
633 (Gnat1drv): Beef up comment about the interplay between -gnatc and
634 back-end annotations. Use full qualified name for List_Rep_Info.
636 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
638 * libgnat/g-arrspl.ads: Add pragma Preelaborate.
640 2018-06-11 Arnaud Charlet <charlet@adacore.com>
642 * exp_ch4.adb (Expand_Record_Equality): Remove extraneous "True and
643 then" and general logical "ada" in codepeer mode.
645 2018-06-11 Javier Miranda <miranda@adacore.com>
647 * exp_ch9.adb (Expand_N_Protected_Body): Add missing handling of
650 2018-06-11 Arnaud Charlet <charlet@adacore.com>
652 * exp_ch3.adb, exp_unst.adb, inline.adb, sem_prag.adb: Minor
655 2018-06-11 Yannick Moy <moy@adacore.com>
657 * doc/gnat_rm/implementation_defined_pragmas.rst: Add Suppressible
658 argument to Assertion_Policy
659 * gnat_rm.texi: Regenerate.
661 2018-06-11 Yannick Moy <moy@adacore.com>
663 * gnat1drv.adb: Do not check representation information in CodePeer and
664 GNATprove modes, as these modes call a special backend instead of gigi,
665 so do not have the information.
667 2018-06-11 Yannick Moy <moy@adacore.com>
669 * inline.adb (Build_Body_To_Inline): Consider case of extended return
670 of unconstrained type as one case where inlining is not supported.
671 (Expand_Inlined_Call): Remove special case for body as extended return
672 of unconstrained type.
674 2018-06-11 Yannick Moy <moy@adacore.com>
676 * sem_prag.adb (Analyze_Part_Of): Only allow Part_Of on non-generic
678 (Check_Missing_Part_Of): Do not force Part_Of on generic unit.
680 2018-06-11 Piotr Trojanek <trojanek@adacore.com>
682 * sem_ch13.adb (Analyze_Aspect_Specifications): Don't split AND THEN
683 expressions in Pre/Post contracts while in GNATprove_Mode.
685 2018-06-11 Piotr Trojanek <trojanek@adacore.com>
687 * sem_util.adb (Is_Potentially_Unevaluated): Fix detection of contracts
688 with AND THEN expressions broken down into individual conjuncts.
690 2018-06-11 Ed Schonberg <schonberg@adacore.com>
692 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): Add guard.
694 2018-06-11 Ed Schonberg <schonberg@adacore.com>
696 * exp_unst.adb (Visit_Node): Skip generic associations.
698 2018-06-11 Arnaud Charlet <charlet@adacore.com>
700 * libgnat/memtrack.adb (fwrite): Remove second definition.
702 2018-06-11 Javier Miranda <miranda@adacore.com>
704 * sinfo.ads (Is_Dynamic_Coextension): Adding documentation.
705 (Is_Static_Coextension): Adding documentation.
706 * sinfo.adb (Is_Dynamic_Coextension): Extending the assertion.
707 (Is_Static_Coextension): Extending the assertion.
708 * sem_util.adb (Mark_Allocator): Clear Is_Static_Coextension when
709 setting flag Is_Dynamic_Coextension (and vice versa).
711 2018-06-11 Ed Schonberg <schonberg@adacore.com>
713 * exp_unst.adb (Search_Subprograms): Handle explicitly stubs at the top
714 level of a compilation unit, becuase they may contain nested
715 subprograms that need an activation record.
717 2018-06-11 Arnaud Charlet <charlet@adacore.com>
719 * Makefile.rtl: Compile Ada files with $(ADAC) instead of $(CC).
721 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
723 * exp_ch11.adb, exp_unst.adb, inline.adb, sem_ch12.adb, sem_util.adb:
725 * sinfo.ads: Fix a typo.
727 2018-06-11 Ed Schonberg <schonberg@adacore.com>
729 * inline.adb (Expand_Inlined_Call): If no optimization level is
730 specified, the expansion of a call to an Inline_Always function is
731 fully performed in the front-end even on a target that support back-end
734 2018-06-11 Arnaud Charlet <charlet@adacore.com>
736 * bindgen.adb (Gen_Adainit): Protect reference to System.Parameters
739 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
741 * sem_ch8.adb (Find_Direct_Name): Mode the declaration of
742 Is_Assignment_LHS further in. Use predicate
743 Needs_Variable_Reference_Marker to determine whether to create a
745 (Find_Expanded_Name): Mode the declaration of Is_Assignment_LHS further
746 in. Use predicate Needs_Variable_Reference_Marker to determine whether
747 to create a variable marker.
748 * sem_elab.adb (Build_Variable_Reference_Marker): Remove the various
749 checks that determine whether the identifier or expanded name is a
750 suitable variable reference. The checks are now performed by
751 Needs_Variable_Reference_Marker.
752 * sem_res.adb (Resolve_Actuals): Use predicate
753 Needs_Variable_Reference_Marker to determine whether to create a
755 * sem_util.adb (Needs_Variable_Reference_Marker): New routine.
756 * sem_util.ads (Needs_Variable_Reference_Marker): New routine.
758 2018-06-11 Valentine Reboul <reboul@adacore.com>
760 * doc/gnat_rm.rst, doc/gnat_ugn.rst: Rename "GPL Edition" into
763 2018-06-11 Ed Schonberg <schonberg@adacore.com>
765 * sem_ch12.adb (Install_Body): In order to determine the placement of
766 the freeze node for an instance of a generic nested within another
767 instance, take into account that the outer instance may be declared in
768 the visible part of a package and the inner intance may be in the
769 private part of the same package.
771 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
773 * errout.adb (Special_Msg_Delete): Remove handling of Atomic and VFA.
775 2018-06-11 Nicolas Roche <roche@adacore.com>
777 * libgnat/s-valuti.adb (Bad_Value): Ensure that we do not generate a
778 stack overflow while raising a constraint error.
780 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
782 * repinfo.ads (Rep_Value): Use a single line.
783 * repinfo.adb (Rep_Value): Likewise.
784 (List_Attr): Do not use string concatenation.
786 2018-06-11 Ed Schonberg <schonberg@adacore.com>
788 * exp_unst.adb (Visit_Node): Check reference to formal parameter of
789 current procedure, because the bounds of its type may be uplevel
792 2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
794 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Constant>: If this is
795 not a definition, retrieve the expression only if it's a compile-time
796 known value if we are just annotating types.
798 * gcc-interface/utils.c (convert): Do not try to upcast properly for a
799 conversion between tagged types in type_annotate_only mode.
801 2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
803 * gcc-interface/ada-tree.h (TYPE_PADDING_FOR_COMPONENT): New macro.
804 * gcc-interface/decl.c (gnat_to_gnu_component_type): Cache the padding
805 type built for an aliased component with variable size.
807 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
809 * doc/gnat_ugn/project-manager-figure.png: Delete.
811 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
813 * vxworks-arm-link.spec, vxworks-e500-link.spec,
814 vxworks-gnat-crtbe-link.spec, vxworks-smp-arm-link.spec,
815 vxworks-smp-e500-link.spec, vxworks-smp-ppc-link.spec,
816 vxworks-smp-x86-link.spec: New files.
818 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
820 * gnatvsn.adb: Re-center the copyright header.
821 * indepsw-darwin.adb: Adjust the starting copyright year to 2011.
823 2018-05-31 Fedor Rybin <frybin@adacore.com>
825 * doc/gnat_ugn/gnat_utility_programs.rst: Document Stubs_Subdir in
826 gnattest section on user guide.
828 2018-05-31 Ed Schonberg <schonberg@adacore.com>
830 * sem_res.adb (Resolve_String_Literal): If the type is a string type
831 whose component subtype has a static predicate, ensure that the
832 predicate is applied to each character by expanding the string into the
833 equivalent aggregate. This is also done if the component subtype is
836 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
838 * gcc-interface/trans.c (Call_to_gnu): Remove obsolete code.
840 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
842 * sem_ch6.adb (Check_Missing_Return): Handle procedures with no
845 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
847 * gcc-interface/trans.c (Call_to_gnu): In the by-reference case, if
848 the type of the parameter is an unconstrained array type, convert
849 to the type of the actual before the type of the formal only if the
850 conversion was suppressed earlier. Use in_param and gnu_actual_type
851 local variables throughout, and uniform spelling for In Out or Out.
852 Also remove dead code in the component-by-reference case.
854 2018-05-31 Frederic Konrad <konrad@adacore.com>
856 * tracebak.c (STOP_FRAME): Harden condition.
857 (is_return_from, EXTRA_STOP_CONDITION): New helpers for VxWorks in RTP
860 2018-05-31 Ed Schonberg <schonberg@adacore.com>
862 * checks.adb (Apply_Discriminant_Check): Do not apply discriminant
863 check to a call to a build-in-place function, given that the return
864 object is limited and cannot be copied.
866 2018-05-31 Olivier Hainque <hainque@adacore.com>
868 * libgnat/s-atopri.ads: Update comment on __atomic_compare_exchange
871 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
873 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
874 there is no target, also create a temporary for the return value for
875 an allocator if the type is an unconstrained record type with default
878 2018-05-31 Hristian Kirtchev <kirtchev@adacore.com>
880 * exp_ch7.adb (Find_Transient_Context): An iteration scheme is a valid
881 boudary for a transient scope.
883 2018-05-31 Valentine Reboul <reboul@adacore.com>
885 * gnatvsn.ads: Rename "GPL" version to "Community".
887 2018-05-31 Ed Schonberg <schonberg@adacore.com>
889 * einfo.ads: Improve documentation for the Is_Unsigned_Type entity
892 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
894 * sem_prag.adb (Analyze_Pragma): Replace call to Unique_Defining_Entity
895 with a semantically equivalent call to Defining_Entity.
897 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
899 * sem_prag.adb (Analyze_Pragma): Set Etype on the rewritten
900 Max_Queue_Length expression.
902 2018-05-31 Sergey Rybin <rybin@adacore.com>
904 * doc/gnat_ugn/gnat_and_program_execution.rst: gnatelim does not need
905 that the main unit to be built before the call, now it computes the
906 closure of the main unit itself.
907 * gnat_ugn.texi: Regenerate.
909 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
911 * repinfo.adb (List_Structural_Record_Layout): Set First to false
912 after having listed the fields of the parent type, if any.
914 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
916 * gcc-interface/decl.c (gnat_to_gnu_entity) <discrete_type>: Do not
917 deal with the ___XP suffix for packed array types here...
918 <E_Array_Subtype>: ...or here when processing the implementation type
919 but when processing the original type instead. Do not reuse the DECL
920 of the implementation type for the original type. Tidy up.
922 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
924 * einfo.ads (Object_Size_Clause): Declare.
925 * einfo.adb (Object_Size_Clause): New function.
926 * gcc-interface/utils.c (maybe_pad_type): Test Has_Size_Clause before
927 retrieving Size_Clause and post the warning on the object size clause
928 if Has_Object_Size_Clause is true.
930 2018-05-31 Javier Miranda <miranda@adacore.com>
932 * sem_util.ads, sem_util.adb (Find_Primitive_Eq): New subprogram.
933 * exp_ch4.adb (Expand_Composite_Equality): Use the new subprogram
934 Find_Primitive_Eq to search for the primitive of types whose underlying
935 type is a tagged type.
937 2018-05-31 Yannick Moy <moy@adacore.com>
939 * sem_prag.adb (Analyze_Pragma.Check_Loop_Pragma_Placement): Inverse
940 order of treatment between nodes recognized as loop pragmas (or
941 generated from one) and block statements.
943 2018-05-31 Doug Rupp <rupp@adacore.com>
945 * libgnat/s-osprim__posix2008.adb (Clock): Implement using
948 2018-05-31 Ed Schonberg <schonberg@adacore.com>
950 * exp_unst.ads, exp_unst.adb (In_Synchronized_Unit): New predicate to
951 mark subprograms that cannot be eliminated because they must be treated
952 as reachable from outside the current unit. This includes entry bodies
953 and protected operations.
955 2018-05-31 Ed Schonberg <schonberg@adacore.com>
957 * exp_ch4.adb (Expand_Modular_Addition, Expand_Modular_Subtraction):
958 Convert all operands of the generated code to Standard.Unsigned, to
959 prevent spurious visibility errors. This is needed when the generated
960 expansion involves a modular index type of an array type, and the index
961 type is not immediately visible.
963 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
965 * einfo.ads (Package_Instantiation): Update comment after a routine
966 that uses this field has been renamed.
968 2018-05-30 Ed Schonberg <schonberg@adacore.com>
970 * exp_ch11.adb (Replace_Raise_By_Goto): The transfomation is legal even
971 if the local raise statement includes a string expression. This
972 expression might be picked up by an outer handler or discarded, but
973 plays no role in this transformation.
975 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
977 * exp_aggr.adb, exp_unst.adb, freeze.adb, libgnat/a-direct.adb: Minor
980 2018-05-30 Ed Schonberg <schonberg@adacore.com>
982 * exp_unst.adb (Visit_Node): Handle the semantic Procedure_To_Call
983 field in relevant nodes: Allocate, Free, and return statements.
985 2018-05-30 Ed Schonberg <schonberg@adacore.com>
987 * exp_unst.adb (Visit_Node): Do not traverse a Component_Association
988 that has not been analyzed, as will be the case for a nested aggregate
989 that is expanded into individual assignments.
991 2018-05-30 Justin Squirek <squirek@adacore.com>
993 * aspects.adb, aspects.ads: Register new aspect.
994 * par-prag.adb (Prag): Register new pragma.
995 * sem_ch13.adb (Analyze_Aspect_Specifications): Add processing for new
996 aspect similar to Aspect_Max_Queue_Length.
997 * sem_prag.adb, sem_prag.ads (Analyze_Pragma): Register new pragma and
998 set it to use the same processing as Pragma_Max_Queue_Length.
999 * snames.ads-tmpl: Move definition of Name_Max_Entry_Queue_Depth so
1000 that it can be processed as a pragma in addition to a restriction and
1001 add an entry for the pragma itself.
1003 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1005 * freeze.adb (Freeze_Object_Declaration): A pragma Thread_Local_Storage
1006 is now legal on a variable of composite type initialized with an
1007 aggregate that is fully static and requires no elaboration code.
1008 * exp_aggr.adb (Convert_To_Positional): Recognize additional cases of
1009 nested aggregates that are compile-time static, so they can be used to
1010 initialize variables declared with Threqd_Local_Storage.
1011 * doc/gnat_rm/implementation_defined_pragmas.rst: Add documentation on
1012 Thread_Local_Storage.
1013 * gnat_rm.texi: Regenerate.
1015 2018-05-30 Yannick Moy <moy@adacore.com>
1017 * sem_util.adb (Policy_In_Effect): Take into account CodePeer and
1020 2018-05-30 Justin Squirek <squirek@adacore.com>
1022 * libgnat/a-direct.adb, libgnat/a-direct.ads (Name_Case_Equivalence):
1024 (Start_Search): Modify to use Start_Search_Internal
1025 (Start_Search_Internal): Add to break out an extra flag for searching
1026 case insensative due to the potential for directories within the same
1027 OS to allow different casing schemes.
1028 * sysdep.c (__gnat_name_case_equivalence): Add as a default fallback
1029 for when the more precise solution fails.
1031 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
1033 * checks.adb, exp_ch5.adb, exp_ch7.adb, exp_unst.adb, sem_eval.adb:
1036 2018-05-30 Pascal Obry <obry@adacore.com>
1038 * libgnat/g-comlin.ads (Value_Callback, Define_Switch): New.
1039 * libgnat/g-comlin.adb: Add corresponding implementation.
1041 2018-05-30 Gary Dismukes <dismukes@adacore.com>
1043 * sem_res.adb, sem_util.adb: Fix several typos.
1045 2018-05-30 Olivier Hainque <hainque@adacore.com>
1047 * vx_crtbegin_attr.c (CTOR_ATTRIBUTE, DTOR_ATTRIBUTE): Empty.
1048 (eh_registration_ctors, eh_registration_tors): New static variables,
1049 forced in a .ctors/.dtors section, respectively, with priority.
1051 2018-05-30 Bob Duff <duff@adacore.com>
1053 * aspects.ads, contracts.adb, exp_util.adb, expander.adb, expander.ads,
1054 freeze.adb, inline.adb, lib-xref.adb, sem.ads, sem_aggr.adb,
1055 sem_attr.adb, sem_ch13.adb, sem_ch3.adb, sem_ch5.adb, sem_ch6.adb,
1056 sem_ch8.adb, sem_dim.adb, sem_elab.adb, sem_res.adb, sem_res.ads,
1057 sinfo.ads: Spell preanalysis, preanalyze correctly.
1059 2018-05-30 Bob Duff <duff@adacore.com>
1061 * libgnat/g-sestin.ads: Rework documentation comments.
1063 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
1065 * errout.adb, exp_aggr.adb, exp_ch7.adb, exp_util.adb, lib.adb,
1066 sem_ch13.adb, sem_ch4.adb, sem_res.adb, sem_util.adb
1067 (Has_Original_Node): Refactor to use Is_Rewrite_Substitution.
1069 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
1071 * sem_prag.adb (Analyze_Pragma): Remove conjuncts that are always true.
1073 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
1075 * sem_util.adb (Is_Atomic_Object): Cleaned up. Split the entity logic
1076 in a separate routine.
1077 (Is_Atomic_Object_Entity): New routine.
1078 (Is_Atomic_Prefix): Cleaned up.
1079 (Is_Synchronized_Object): Check that the object is atomic, or its type
1081 (Object_Has_Atomic_Components): Removed.
1082 * sem_util.ads (Is_Atomic_Object): Reword the comment on usage.
1083 (Is_Atomic_Object_Entity): New routine.
1085 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1087 * sem_ch3.adb (Access_Subprogram_Declaration): The flag
1088 Needs_Activation_Record is only needed on a subprogram type, not on a
1090 * sem_res.adb (Resolve_Selected_Component): If the context type and the
1091 component type are anonymous access to subprograms, use the component
1092 type to obtain the proper value of Needs_Activation_Record flag for the
1095 2018-05-30 Eric Botcazou <ebotcazou@adacore.com>
1097 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>: Add
1098 comment about the memset case.
1100 2018-05-30 Bob Duff <duff@adacore.com>
1102 * exp_ch5.adb (Expand_Formal_Container_Element_Loop): Remove the code
1103 to analyze the Elmt_Decl, because it gets analyzed in the wrong scope.
1104 We need to analyze it as part of analyzing the block, so that if the
1105 call to Element that initializes Elmt_Decl returns on the secondary
1106 stack, the block will ss_mark/ss_release. This block is inside the
1107 loop; we don't want to leak memory until the loop exits. The purpose
1108 of analyzing Elmt_Decl first was to catch the error of modifying it,
1109 which is illegal because it's a loop parameter. The above causes us to
1110 miss that error. Therefore, we add a flag Is_Loop_Parameter, and set
1111 it on the Element entity, so we end up with an E_Variable node with the
1113 * einfo.ads, einfo.adb (Is_Loop_Parameter): New flag.
1114 * sem_ch5.adb (Diagnose_Non_Variable_Lhs): Give the "assignment to loop
1115 parameter not allowed" error if Is_Loop_Parameter.
1116 * sem_util.adb (Is_Variable): Return False if Is_Loop_Parameter, to
1117 trigger the call to Diagnose_Non_Variable_Lhs.
1119 2018-05-30 Arnaud Charlet <charlet@adacore.com>
1121 * checks.adb (Apply_Scalar_Range_Check):
1122 * sem_eval.adb (Check_Non_Static_Context, Out_Of_Range): Ignore out of
1123 range values for System.Priority in CodePeer mode since the actual
1124 target compiler may provide a wider range.
1126 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1128 * exp_unst.adb: Search specification of main unit as well, for
1131 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1133 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): The statement part of
1134 a package body that is a compilation unit may contain blocks that
1135 declare local subprograms. In Subprogram_Unnesting Mode such
1136 subprograms must be handled as nested inside the (implicit) elaboration
1137 procedure that executes that statement part. To handle properly uplevel
1138 references we construct that subprogram explicitly, to contain blocks
1139 and inner subprograms, The statement part of the compilation unit
1140 becomes a call to this subprogram. This is only done if blocks are
1141 present in the statement list of the body.
1143 2018-05-30 Bob Duff <duff@adacore.com>
1145 * exp_ch7.adb: Minor comment fix.
1147 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1149 * exp_unst.adb (Visit_Node): Handle properly subprogram instantiations
1150 that have no corresponding body and appear as attributes of the
1151 corresponding wrapper package declaration.
1152 (Register_Subprogram): New subprogram, used for subprogram bodies and
1153 for subprogram instantiations to enter callable entity into Subp table.
1155 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
1157 * libgnat/s-secsta.adb: Reimplement the secondary stack support.
1158 * libgnat/s-secsta.ads: Update the documentation of all routines in the
1159 public part of the package. Reimplement the private part of the
1160 package to account for the new secondary stack structure. Add types
1161 and subprograms for testing purposes. Add several documentation
1164 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
1166 * exp_aggr.adb, exp_ch3.adb, exp_ch4.adb, exp_ch7.adb, exp_unst.adb,
1167 exp_util.adb, exp_util.ads, libgnat/a-calcon.adb, libgnat/a-calcon.ads,
1168 libgnat/s-os_lib.adb, repinfo.adb, sem_ch3.adb, sem_disp.adb,
1169 sem_disp.ads, sem_util.adb: Minor reformatting.
1171 2018-05-30 Arnaud Charlet <charlet@adacore.com>
1173 * gcc-interface/Makefile.in: Move special flags for Ada runtime files
1175 * Makefile.rtl: ... to here. Update comments. Protect call to
1176 "GCC_FOR_TARGET" in case target_os isn't defined.
1178 2018-05-30 Arnaud Charlet <charlet@adacore.com>
1180 * gcc-interface/Makefile.in: Move target pair settings from here...
1181 * Makefile.rtl: ... to here.
1182 (setup-rts): New target.
1184 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1186 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Alphabetical
1187 List of All Switches): Replace "modules" with "units".
1188 (Subprogram Inlining Control): Likewise.
1189 * gnat_ugn.texi: Regenerate.
1190 * usage.adb (Usage): Fix description of -gnatn switch.
1192 2018-05-29 Arnaud Charlet <charlet@adacore.com>
1194 * gcc-interface/Makefile.in: Fix typos.
1196 2018-05-29 Ed Schonberg <schonberg@adacore.com>
1198 * exp_ch7.adb (Build_Finalizer_Call): Attach to tree the reference to
1199 the finalizer procedure in the At_End handler, for use in LLVM
1202 2018-05-29 Javier Miranda <miranda@adacore.com>
1204 * exp_ch4.adb (Expand_N_Op_Eq, Expand_Composite_Equality): Use the new
1205 subprogram Inherits_From_Tagged_Full_View to identify more reliably
1206 untagged private types completed with a derivation of an untagged
1207 private whose full view is a tagged type.
1208 * sem_util.ads, sem_util.adb (Inherits_From_Tagged_Full_View): New
1210 (Collect_Primitive_Operations): Handle untagged private types completed
1211 with a derivation of an untagged private type whose full view is a
1212 tagged type. In such case, collecting the list of primitives we may
1213 find two equality primitives: one associated with the untagged private
1214 and another associated with the ultimate tagged type (and we must
1215 remove from the returned list this latter one).
1217 2018-05-29 Ed Schonberg <schonberg@adacore.com>
1219 * exp_unst.adb (Visit_Node): Handle statement sequences that include an
1222 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1224 * repinfo.adb (List_Entities): Also recurse into blocks without label.
1226 2018-05-29 Ed Schonberg <schonberg@adacore.com>
1228 * exp_ch6.adb (Expand_N_Subprogram_Body): Do not generate push/pop for
1229 exceptions if subprogram unnesting is in effect, because these branch
1230 nodes are relevant only in the presence of nested subprograms.
1232 2018-05-29 Ed Schonberg <schonberg@adacore.com>
1234 * libgnat/s-fatgen.adb (Succ, Pred): Raise Constraint_Error
1235 unconditionally when applied to the largest positive (resp. largest
1236 negative) value of a floating-point type.
1238 2018-05-29 Ed Schonberg <schonberg@adacore.com>
1240 * einfo.ads, einfo.adb: Clarify use of Activation_Record_Component:
1241 discriminants and exceptions are never components of such. The flag
1242 Needs_Activation_Record is set on subprogram types, not on access to
1245 2018-05-29 Ed Schonberg <schonberg@adacore.com>
1247 * sem_ch3.adb: Set scope of component of subtype.
1249 2018-05-29 Ed Schonberg <schonberg@adacore.com>
1251 * exp_unst.adb (Visit_Node): Exclude selected components whose prefix
1252 carry no type. Such selected components appear in unit names that are
1253 child units, both in the specification and possibly in an end label for
1254 the unit, and they do not contain any relevant uplevel references.
1256 2018-05-29 Arnaud Charlet <charlet@adacore.com>
1258 * libgnat/a-calend.ads, libgnat/a-calend.adb (Epoch_Offset): Make it a
1261 2018-05-29 Olivier Hainque <hainque@adacore.com>
1263 * libgnat/system-vxworks7-ppc-rtp.ads: New file.
1264 * libgnat/system-vxworks7-ppc-kernel.ads: New file.
1265 * libgnat/system-vxworks7-e500-rtp.ads: New file.
1266 * libgnat/system-vxworks7-e500-kernel.ads: New file.
1267 * libgnat/system-vxworks7-x86-rtp.ads: New file.
1268 * libgnat/system-vxworks-ppc64-kernel.ads: Rename as ...
1269 * libgnat/system-vxworks7-ppc64-kernel.ads: and adjust name of
1270 gnat-crtbe link spec to use the vx7 variant.
1272 2018-05-29 Olivier Hainque <hainque@adacore.com>
1274 * vx_crtbegin.inc: Use a consistent naming convention for the
1275 registration/deregistration functions across RTP or kernel. Remove the
1276 ctor/dtor attribute setting based on RTP/kernel, expect the optional
1277 attribute extension to be provided by includers instead.
1278 * vx_crtbegin.c: Mere inclusion of vx_crtbegin.inc with empty attribute
1279 extension for the registration/deregistration functions.
1280 * vx_crtbegin_attr.c: New file. Include vx_crtbegin.inc with explicit
1281 constructor/destructor attribute extensions.
1282 * vx_crtbegin_array.c: New file. Include vx_crtbegin.inc with empty
1283 attribute extensions and declare _ctors/_dtors arrays.
1284 * vx_crtbegin_auto.c: Remove.
1285 * libgnat/system-vxworks7-aarch64-rtp-smp.ads: Use
1286 vxworks7-gnat-crtbe-link.spec.
1287 * libgnat/system-vxworks7-aarch64.ads: Likewise.
1288 * libgnat/system-vxworks7-e500-rtp-smp.ads: Likewise.
1289 * libgnat/system-vxworks7-ppc-rtp-smp.ads: Likewise.
1290 * libgnat/system-vxworks7-ppc64-rtp-smp.ads: Likewise.
1291 * libgnat/system-vxworks7-x86-kernel.ads: Likewise.
1292 * libgnat/system-vxworks7-x86-rtp-smp.ads: Likewise.
1293 * libgnat/system-vxworks7-x86_64-kernel.ads: Likewise.
1294 * libgnat/system-vxworks7-x86_64-rtp-smp.ads: Likewise.
1296 2018-05-29 Piotr Trojanek <trojanek@adacore.com>
1298 * ali.adb: Minor reformatting.
1300 2018-05-29 Joel Brobecker <brobecker@adacore.com>
1302 * doc/gnat_ugn/platform_specific_information.rst: Update package
1303 requirements for 32bit GNAT on x86_64-linux.
1304 * gnat_ugn.texi: Regenerate.
1306 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1308 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Debugging
1309 Control): Adjust description of -gnatRj.
1310 * gnat_ugn.texi: Regenerate.
1311 * opt.ads (List_Representation_Info_To_JSON): Likewise.
1312 * repinfo.adb (List_Rep_Info): Do not automatically create a file
1313 if List_Representation_Info_To_JSON is true.
1314 * switch-c.adb (Scan_Front_End_Switches) <R>: Remove incompatibility
1315 check between -gnatRj and -gnatRs.
1316 * usage.adb (Usage): Adjust description of -gnatRj.
1318 2018-05-29 Pascal Obry <obry@adacore.com>
1320 * libgnat/s-os_lib.adb (Normalize_Pathname): Fix handling of ".." in
1323 2018-05-29 Pascal Obry <obry@adacore.com>
1325 * libgnat/s-os_lib.adb: Minor reformatting.
1327 2018-05-29 Doug Rupp <rupp@adacore.com>
1329 * libgnat/a-calend.adb (Epoch_Offset): Move from body to ...
1330 * libgnat/a-calend.ads (Epoch_Offset): to private part of spec
1331 * libgnat/a-calcon.ads (To_Unix_Nano_Time): New function spec.
1332 * libgnat/a-calcon.adb (To_Unix_Nano_Time): New function body.
1334 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1336 * repinfo.ads (JSON format): Document new pair for components.
1337 * repinfo.adb (Derived_Discriminant): New function.
1338 (List_Structural_Record_Layout): Add Outer_Ent parameter and pass it
1339 in recursive calls. If the record type is the parent of an extension,
1340 find and list the derived discriminant from the extension, if any.
1341 (List_Component_Layout): List the Discriminant_Number in JSON mode.
1342 (List_Record_Info): Adjust call to List_Structural_Record_Layout.
1344 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1346 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Alphabetical
1347 List of All Switches): Document -gnatRj.
1348 (Debugging Control): Likewise.
1349 * gnat_ugn.texi: Regenerate.
1350 * opt.ads (List_Representation_Info_To_JSON): New boolean variable.
1351 * osint-c.adb (Create_Repinfo_File): Use the .json instead of .rep
1352 extension if List_Representation_Info_To_JSON is true.
1353 * repinfo.ads: Document the JSON output format.
1354 * repinfo.adb (List_Location): New procedure.
1355 (List_Array_Info): Add support for JSON output.
1356 (List_Entities): Likewise.
1359 (Print_Expr): Likewise.
1360 (List_Linker_Section): Likewise.
1361 (List_Mechanisms): Likewise.
1362 (List_Name): Likewise.
1363 (List_Object_Info): Likewise.
1364 (List_Record_Info): Likewise.
1365 (List_Component_Layout): Likewise. Add Indent parameter.
1366 (List_Structural_Record_Layout): New procedure.
1367 (List_Attr): Add support for JSON output.
1368 (List_Type_Info): Likewise.
1369 (Write_Unknown_Val): Likewise.
1370 * switch-c.adb (Scan_Front_End_Switches) <R>: Deal with 'j'.
1371 * usage.adb (Usage): List -gnatRj.
1373 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1375 * repinfo.adb (List_Component_Layout): New procedure extracted from...
1376 (List_Record_Layout): ...here. Invoke it.
1378 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1380 * repinfo.adb (Write_Unknown_Val): New procedure.
1381 (List_GCC_Expression): Call it.
1382 (List_Record_Layout): Likewise.
1383 (Write_Val): Likewise.
1385 2018-05-29 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1387 * exp_ch4.adb (Expand_N_Op_Abs): Clear Do_Overflow_Check when inserting
1390 2018-05-29 Arnaud Charlet <charlet@adacore.com>
1392 * lib-writ.adb (Write_ALI): Do not use new function from s-casuti yet.
1393 This breaks build of cross compilers with older versions of GNAT, so
1396 2018-05-29 Doug Rupp <rupp@adacore.com>
1398 * libgnarl/s-taprop.ads (Monotonic_Clock): Refine documentation to
1401 2018-05-29 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1403 * exp_ch4.adb (Expand_N_Op_Abs): Always do range check against 'First.
1405 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
1407 * repinfo.adb (List_Entities): Do not list the Linker_Section for
1409 (List_Mechanisms): ...but here instead. Use consistent name output
1410 and formatting conventions.
1412 2018-05-29 Bob Duff <duff@adacore.com>
1414 * lib-writ.adb (Write_ALI): Cleanup: avoid use of global var; call new
1416 * libgnat/s-casuti.ads, libgnat/s-casuti.adb (To_Upper, To_Lower,
1417 To_Mixed): New functions.
1418 * osint.adb: Cleanup: use Is_Directory_Separator, which correctly
1419 allows both '\' and '/' on Windows.
1421 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1423 * repinfo.ads: Minor fixes and tweaks in comments.
1425 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1427 * repinfo.adb (List_GCC_Expression): Remove Valop and replace calls to
1428 it with calls to Unop.
1430 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1432 * repinfo.ads (TCode): Adjust range.
1433 (Truth_Andif_Expr): Remove.
1434 (Truth_Orif_Expr): Likewise.
1435 (Truth_And_Expr .. Dynamic_Val): Adjust value.
1436 * repinfo.adb (Print_Expr): Remove handling of Truth_{And,Or}if_Expr.
1437 (Rep_Value): Likewise.
1438 * repinfo.h (Truth_Andif_Expr): Remove.
1439 (Truth_Orif_Expr): Likewise.
1440 (Truth_And_Expr .. Dynamic_Val): Adjust value.
1441 * gcc-interface/decl.c (annotate_value) <TRUTH_ANDIF_EXPR>: Fall
1442 through to TRUTH_AND_EXPR case.
1443 <TRUTH_ORIF_EXPR>: Fall through to TRUTH_OR_EXPR case.
1445 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1447 * exp_unst.adb (Visit_Node): For indexed components and attribute
1448 references, examine index expressions or associated expressions as well
1449 to record uplevel references.
1450 (Vist_Node): For function and procedure calls, if a formal is an
1451 unconstrained array and the actual is constrained, check whether bounds
1452 of actual have uplevel references.
1454 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1456 * einfo.ads, einfo.adb: Exceptions can be uplevel references, and thus
1457 they can appear as components of activation records.
1458 * exp_unst.adb (Visit_Node): A reference to an exception may be an
1461 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1463 * exp_ch4.adb (Expand_Composite_Equality): Compute whether the size
1464 depends on a discriminant manually instead of using the predicate
1465 Size_Depends_On_Discriminant in the array type case.
1467 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1469 * exp_unst.adb (Check_Static_Type): For a record subtype, check
1470 discriminant constraints as well.
1471 (Visit_Node): For a selected component, check type of prefix, as is
1472 done for indexed components and slices.
1474 2018-05-28 Javier Miranda <miranda@adacore.com>
1476 * exp_ch4.adb (Real_Range_Check): Add a temporary to store the integer
1477 value when converting a float value to a fixed-point value. This is
1478 required for CCG because it handles fixed-point types by means of
1479 unsigned integer type variables. The range check is now performed using
1480 the integer value stored in this temporary.
1482 2018-05-28 Yannick Moy <moy@adacore.com>
1484 * sem_util.adb (Is_OK_Volatile_Context): Add attributes First, Last and
1485 Length as valid non-interfering contexts for SPARK.
1487 2018-05-28 Claire Dross <dross@adacore.com>
1489 * sem_disp.ads, sem_disp.adb (Inheritance_Utilities): Package for
1490 generic inheritance utilities.
1491 (Generic_Inherited_Subprograms): Generic version of
1492 Inherited_Subprograms, generic in Find_Dispatching_Type function.
1493 (Generic_Is_Overriding_Subprogram): Generic version of
1494 Is_Overriding_Subprogram, generic in Find_Dispatching_Type function.
1495 (Inherited_Subprograms): Instance of Generic_Inherited_Subprograms with
1496 Sem_Disp.Find_Dispatching_Type.
1497 (Is_Overriding_Subprogram): Instance of
1498 Generic_Is_Overriding_Subprogram with Sem_Disp.Find_Dispatching_Type.
1499 (Inheritance_Utilities_Inst): Instance of Inheritance_Utilities
1500 with Sem_Disp.Find_Dispatching_Type.
1502 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1504 * exp_ch4.adb (Expand_Composite_Equality): For a composite (or FP)
1505 component type, do not expand array equality using the unconstrained
1506 base type, except for the case where the bounds of the type depend on a
1509 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1511 * einfo.ads, einfo.adb (Needs_Activation_Record): New flag on
1512 access-to-subprogram types, to indicate that an indirect call through
1513 such a type requires an activation record when compiling for LLVM.
1514 * sem_ch3.adb (Access_Subprogram_Declaration): Set new flag as needed.
1516 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1518 * exp_ch4.adb (Real_Range_Check): Specialize float-to-fixed conversions
1519 when bounds of fixed type are static, to remove some spuerfluous
1520 implicit conversions and provide an accurate result when converting
1521 back and forth between the fixed point type and a floating point type.
1523 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1525 * exp_unst.adb (Unnest_Subprogram): Prevent creation of empty
1528 2018-05-28 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
1530 * exp_unst.adb (Check_Static_Type): Add argument to indicate node to be
1531 replaced, if any; all callers changed.
1532 (Note_Uplevel_Ref): Likewise. Also replace reference to deferred
1533 constant with private view so we take the address of that entity.
1534 (Note_Uplevel_Bound): Add argument to indicate node to be replaced, if
1535 any; all callers changed. Handle N_Indexed_Component like
1536 N_Attribute_Reference. Add N_Type_Conversion case.
1537 (Visit_Node): Indexed references can be uplevel if the type isn't
1539 (Unnest_Subprograms): Don't rewrite if no reference given. If call has
1540 been relocated, set first_named pointer in original node as well.
1542 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1544 * exp_aggr.adb (Flatten): Copy tree of expression in a component
1545 association with a range or a set of discrete choices, rather than
1546 relocating the node. This avoids inconsistencies in the tree when
1547 handling nested subprograms with uplevel references for LLVM.
1549 2018-05-28 Arnaud Charlet <charlet@adacore.com>
1551 * exp_util.adb (Possible_Bit_Aligned_Component): Always return False in
1554 2018-05-28 Arnaud Charlet <charlet@adacore.com>
1556 * exp_unst.adb: Fix typo.
1558 2018-05-28 Bob Duff <duff@adacore.com>
1560 * libgnat/a-convec.adb (Query_Element): Minor cleanup: remove an
1561 unnecessary use of 'Unrestricted_Access.
1563 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1565 * repinfo.adb (Expr_Value_S): New routine.
1566 (List_Linker_Section): Properly extract the value of the section
1569 2018-05-28 Patrick Bernardi <bernardi@adacore.com>
1571 * doc/gnat_ugn/building_executable_programs_with_gnat.rst: Update the
1572 description of the -D binder switch to reflect current usage.
1573 * gnat_ugn.texi: Regenerate.
1575 2018-05-28 Gary Dismukes <dismukes@adacore.com>
1577 * exp_ch3.adb: Minor reformatting
1579 2018-05-28 Justin Squirek <squirek@adacore.com>
1582 (Build_Initialization_Call): Add logic to pass the appropriate actual to match
1584 (Init_Formals): Add new formal *_skip_null_excluding_check
1585 * exp_util.adb, exp_util.ads
1586 (Enclosing_Init_Proc): Added to fetch the enclosing Init_Proc from the current
1588 (Inside_Init_Proc): Refactored to use Enclosing_Init_Proc
1589 (Needs_Conditional_Null_Excluding_Check): Added to factorize the predicate
1590 used to determine how to generate an Init_Proc for a given type.
1591 (Needs_Constant_Address): Minor reformatting
1593 (Resolve_Null): Add logic to generate a conditional check in certain cases
1595 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1597 * exp_aggr.adb, gnatlink.adb, sem_ch6.adb, sem_res.adb, sem_util.adb:
1600 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
1602 * sem_prag.adb (Process_Atomic_Independent_Shared_Volatile): Include
1603 the declarations of single concurrent types because they fall in the
1604 category of full type and object declarations.
1606 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1608 * repinfo.adb (Compute_Max_Length): Skip _Parent component.
1609 (List_Record_Layout): Likewise.
1611 2018-05-28 Ed Schonberg <schonberg@adacore.com>
1613 * sem_util.adb (Is_Function_Result): Add a warning if a postcondition
1614 includes a call to function to which it applies. This may mean an
1615 omission of an attribute reference 'Result, in particular if the
1616 function is pqrameterless.
1618 2018-05-28 Justin Squirek <squirek@adacore.com>
1620 * sem_ch8.adb (Find_Expanded_Name): Add extra guard to make sure the
1621 misresolved package name is not a case of mistaken identity.
1623 2018-05-28 Yannick Moy <moy@adacore.com>
1625 * sem_res.adb (Resolve_Range): Re-resolve the low bound of a range in
1626 GNATprove mode, as the order of resolution (low then high) means that
1627 all the information is not available when resolving the low bound the
1630 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
1632 * repinfo.adb (List_Array_Info): Start with an explicit blank line and
1633 end with the linker section, if any.
1634 (List_Entities): Do not output the linker section for record types,
1635 array types and variables.
1636 (Print_Expr): Factor out common processing for unary operators and
1637 special values. Adjust and reorder the various cases.
1638 (List_Object_Info): End with the linker section, if any.
1639 (List_Record_Info): Likewise.
1640 (List_Type_Info): Do not start with a blank line.
1642 2018-05-25 Nicolas Roche <roche@adacore.com>
1644 * libgnat/s-valrea.adb (Scan_Real): Abort computation once it is sure
1645 that the result will be either -infinite or +infinite.
1647 2018-05-25 Patrick Bernardi <bernardi@adacore.com>
1649 * libgnat/s-parame.ads, libgnat/s-parame__vxworks.ads,
1650 libgnat/s-parame__ae653.ads, libgnat/s-parame__hpux.ads (Size_Type):
1651 Expand range of type to match the address space of the target.
1652 (Task_Storage_Size): Remove unused type.
1654 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1656 * sem_res.adb (Set_Mixed_Mode_Operand): If the operand is an expression
1657 of a fixed point type and the parent is a multiplying operation,
1658 resolve the operand with its own type because the context will impose a
1659 resulting type on the result of the multiplication by means of
1660 approriate conversion.
1662 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1664 * exp_ch3.adb (Default_Initialize_Object): Ensure that the analysis of
1665 the in-place initialization aggregate created for pragmas
1666 Initialize_Scalars or Normalize_Scalars is performed with checks
1669 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1671 * exp_aggr.adb (Convert_To_Positional): Bump default for
1672 Max_Others_Replicate to 32. Update comments.
1673 * osint.ads (Unknown_Attributes): No longer pretend this is a constant.
1674 (No_File_Info_Cache): Initialize separately.
1675 * osint.adb (No_File_Info_Cache): Update initializer.
1677 2018-05-25 Javier Miranda <miranda@adacore.com>
1679 * sem_res.adb (Resolve_Membership_Op): Allow the use of the membership
1680 test when the left operand is a class-wide interface and the right
1681 operand is not a class-wide type.
1682 * exp_ch4.adb (Tagged_Membership): Adding support for interface as the
1685 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1687 * exp_aggr.adb (Flatten): A quantified expression cannot be duplicated
1688 in an others clause to prevent visibility issues with the generated
1690 (Component_OK_For_Backend): Return false for a quantified expression.
1691 (Check_Static_Component): Ditto.
1693 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1695 * libgnat/s-secsta.adb (SS_Allocate): Reimplemented.
1696 (SS_Allocate_Dynamic): New routine. The allocation logic is now split
1697 into three distring cases rather than in one loop which attempts to
1698 handle all three cases. This rewrite eliminates an issue where the last
1699 frame of the stack cannot be freed, thus causing the memory range of a
1700 new frame to approach the overflow point of the memory index type.
1701 Since the overflow is logically treated as a
1702 too-much-memory-on-the-stack scenario, it causes a bogus Storage_Error.
1703 (SS_Allocate_Static): New routine. The routine factorizes the static
1704 secondary stack-related code from the former SS_Allocate.
1706 2018-05-25 Sergey Rybin <rybin@adacore.com>
1708 * doc/gnat_ugn/gnat_and_program_execution.rst: Add description of '-U'
1709 option for gnatelim.
1711 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1713 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Do not create
1714 Class_Wide_Clone_Body when analyzing a subprogram_body_stub: the clone
1715 is created when the proper body of the stub is analyzed.
1716 * sem_util.adb (ZBuild_Class_Wide_Clone_Body): If the subprogram body
1717 is the proper body of a subunit, the cloned body must be inserted in
1718 the declarative list that contains the stub.
1720 2018-05-25 Justin Squirek <squirek@adacore.com>
1722 * exp_ch6.adb (Expand_Simple_Function_Return): Add guard in check to
1723 generate code for 6.5(8-10) so that we don't get an assertion error
1724 when dealing with an incomplete return type.
1726 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1728 * pprint.adb (Expression_Name): Strip too long expressions to avoid
1729 carrying very large strings.
1731 2018-05-25 Patrick Bernardi <bernardi@adacore.com>
1733 * switch-b.adb (Scan_Binder_Switches): binder switch -Q accepts Natural
1736 2018-05-25 Doug Rupp <rupp@adacore.com>
1738 * tracebak.c (aarch64-linux): Implement.
1740 2018-05-25 Justin Squirek <squirek@adacore.com>
1742 * sem_ch8.adb: Minor reformatting.
1744 2018-05-25 Piotr Trojanek <trojanek@adacore.com>
1746 * sem_util.adb (Iterate_Call_Parameters): Fix code convention and
1749 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
1751 * einfo.adb, einfo.ads, exp_ch3.adb, exp_ch8.adb, exp_unst.adb,
1752 pprint.adb, sem_ch12.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb:
1755 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1757 * sem_ch12.adb (Instance_Exists): New function, subsidiary of
1758 Validate_Derived_Type_Instance, to verify that all interfaces
1759 implemented by the formal type are also implemented by the actual. The
1760 verification is complicated when an interface of the formal is declared
1761 in a generic unit and the actual is declared in an instance of it.
1762 There is currently no mechanism to relate an interface declared within
1763 a generic to the corresponding interface in an instance, so we must
1764 traverse the list of interfaces of the actual, looking for a name
1765 match, and verifying that that interface is declared in an instance.
1767 2018-05-25 Piotr Trojanek <trojanek@adacore.com>
1769 * sem_util.adb (Iterate_Call_Parameters): Rewrite with extra
1770 assertions; replace function versions of Next_Formal/Next_Actual with
1771 their procedural versions (which are more concise).
1773 2018-05-25 Doug Rupp <rupp@adacore.com>
1775 * libgnarl/s-osinte__aix.ads, libgnarl/s-osinte__android.ads,
1776 libgnarl/s-osinte__darwin.ads, libgnarl/s-osinte__freebsd.ads,
1777 libgnarl/s-osinte__hpux.ads, libgnarl/s-osinte__kfreebsd-gnu.ads,
1778 libgnarl/s-osinte__linux.ads, libgnarl/s-osinte__lynxos178e.ads,
1779 libgnarl/s-osinte__qnx.ads, libgnarl/s-osinte__rtems.ads
1780 (Relative_Timed_Wait): Remove.
1781 * libgnarl/s-tpopmo.adb (Timed_Sleep, Timed_Delay): Rewrite to allow
1782 for incremental looping. Remove references to Rel_Time and
1783 Relative_Timed_Wait.
1784 * libgnat/s-osprim__posix.adb, libgnat/s-osprim__posix2008.adb
1785 (Timed_Delay): Make separate.
1786 * libgnat/s-optide.adb: New separate procedure.
1787 * libgnat/s-osprim.ads (Max_System_Delay): New constant.
1788 * libgnat/s-osprim__lynxos.ads (Max_Sensible_Delay): Set to 6 months.
1789 (Max_System_Delay): New constant.
1791 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1793 * sem_ch12.adb (Validate_Derived_Type_Instance): Verify that the actual
1794 for a formal derived type implements all the interfaces declared for
1797 2018-05-25 Yannick Moy <moy@adacore.com>
1799 * sem_prag.adb (Check_Applicable_Policy): Deal specially with CodePeer
1800 and GNATprove modes when applicable policy is Ignore.
1802 2018-05-25 Eric Botcazou <ebotcazou@adacore.com>
1804 * freeze.adb (Freeze_Enumeration_Type): Do not give integer size to a
1805 boolean type with convention C.
1806 * libgnat/i-cexten.ads (bool): Change to boolean with convention C.
1807 * gcc-interface/decl.c (gnat_to_gnu_entity): Add new local variable
1808 FOREIGN and use it throughout the function.
1809 <E_Enumeration_Type>: Set precision 1 on boolean types with foreign
1811 <E_Enumeration_Subtype>: Likewise for subtypes.
1812 <E_Record_Type>: Force the size of a storage unit on empty classes.
1813 * gcc-interface/utils.c (make_type_from_size) <BOOLEAN_TYPE>: Skip
1814 boolean types with precision 1 if the size is the expected one.
1816 2018-05-25 Arnaud Charlet <charlet@adacore.com>
1818 * pprint.adb (Expression_Name): Do not print non ASCII characters.
1820 2018-05-25 Bob Duff <duff@adacore.com>
1822 * libgnat/a-strunb__shared.ads, libgnat/a-stwiun__shared.ads,
1823 libgnat/a-stzunb__shared.ads: (Initialize, Adjust): Add pragma Inline.
1825 2018-05-25 Bob Duff <duff@adacore.com>
1827 * sem_util.ads: Minor comment fix.
1829 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1831 * exp_unst.adb (Visit_Node): Restrict check for uplevel references in
1832 prefixes of array attributes, to prefixes that are entity names whose
1833 type is constrained.
1834 (Note_Uplevel_Bound): Verify that the bound is declared in an enclosing
1835 subprogram, as itype created for loops in pre/postcondition may appear
1836 in loops at the library level.
1838 2018-05-25 Ed Schonberg <schonberg@adacore.com>
1840 * sem_ch13.adb (Build_Predicate_Functions): The predicate function
1841 declaration is inserted into the tree and analyzed at that point, so
1842 should not be reinserted when the body is constructed. Inside a
1843 generic, ensure that the body is not inserted twice in the tree.
1845 2018-05-25 Yannick Moy <moy@adacore.com>
1847 * sem_prag.adb (Check_Grouping): Modify test to ignore statements and
1848 declarations not coming from source.
1850 2018-05-25 Fedor Rybin <frybin@adacore.com>
1852 * doc/gnat_ugn/gnat_utility_programs.rst: Document new switch
1853 --copy-environment for gnattest.
1855 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1857 * sem_elab.adb (Non_Private_View): Simplify by removing a local Result
1859 * sem_prag.adb (Get_Base_Subprogram): Same as above.
1861 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
1863 * fe.h (Set_Normalized_First_Bit): Declare.
1864 (Set_Normalized_Position): Likewise.
1865 * repinfo.adb (List_Record_Layout): Do not use irregular output for a
1866 variable position. Fix minor spacing issue.
1867 * gcc-interface/decl.c (annotate_rep): If a field has a variable
1868 offset, compute the normalized position and annotate it in addition to
1871 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
1873 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu):
1874 Constify and rename variables. Fix formatting.
1875 (gnat_to_gnu) <N_Exception_Handler>: Minor tweak.
1876 <N_Raise_Statement>: Likewise.
1878 2018-05-24 Javier Miranda <miranda@adacore.com>
1880 * exp_ch8.adb (Build_Body_For_Renaming): Adding support to build the
1881 body of a variant record equality renaming.
1882 (Expand_N_Subprogram_Renaming_Declaration): Adapt the code to the new
1883 implementation of Build_Body_For_Renaming.
1884 * exp_ch3.ads (Build_Variant_Record_Equality): New library level
1885 function that factorizes the functionality needed by
1886 Build_Body_For_Renaming and Expand_Freeze_Record_Type to build the body
1887 of a variant record equality subprogram.
1888 * exp_ch3.adb (Build_Variant_Record_Equality): New subprogram.
1889 (Build_Variant_Record_Equality): New local procedure of
1890 Expand_Freeze_Record_Type containing all the code specific for freezing
1891 the record type that cannot be place in the new library level function.
1893 2018-05-24 Ed Schonberg <schonberg@adacore.com>
1895 * einfo.ads, einfo.adb (Is_Activation_Record): New flag on
1896 in_parameters, used when unesting subprograms for LLVM, to indicate
1897 that a generated parameter carries the activation record from the
1898 enclosing subprogram.
1899 * exp_unst.adb (Check_Static_Type): Handle array attributes of types
1900 whose bounds may contain up-level references that need to be added to
1901 an activation recoord.
1902 (Add_Extra_Formal): Set Is_Activation_Record on new formal.
1904 2018-05-24 Yannick Moy <moy@adacore.com>
1906 * pprint.adb (Expression_Image): Improve the printing of expressions,
1907 by taking more cases into account, in particular qualified expressions
1908 and aggregates. Also count more the number of parentheses to close
1909 after the expression.
1911 2018-05-24 Javier Miranda <miranda@adacore.com>
1913 * sem_ch3.adb (Is_Visible_Component): For untagged types add missing
1914 check for renamed discriminants.
1915 * sem_ch4.adb (Analyze_Overloaded_Selected_Component,
1916 Analyze_Selected_Component, Check_Misspelled_Selector): For calls to
1917 Is_Visible_Component pass the associated selector node to allow
1918 checking renamed discriminants on untagged types.
1920 2018-05-24 Ed Schonberg <schonberg@adacore.com>
1922 * sem_ch8.adb (Analyze_Use_Type): Do not assign the Prev_Use_Clause
1923 link to a use_type clause if this would cause an infinite loop in the
1924 machinery that detects redundant use clauses. This may happen when the
1925 redundant clauses appear in the context of a child unit and the context
1928 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
1930 * sinfo.ads: Fix grammar in comment.
1932 2018-05-24 Justin Squirek <squirek@adacore.com>
1934 * einfo.ads, einfo.adb (Append_Entity): Modified to use Link_Entities
1935 and manage doubly-linked entity chain.
1936 (Nested_Scenarios): Removed entity field used for optimization during
1937 elaboration to make room for the new field Prev_Entity.
1938 (Link_Entities): Added to replace redundant calls to Set_Next_Entity
1939 and Set_Prev_Entity as well as centralize changes to the entity chain.
1940 (Predicated_Parent): Modified to use Node38.
1941 (Prev_Entity): Added to fetch new node field Prev_Entity in all entity
1943 (Remove_Entity): Moved from sem_util.
1944 (Set_Nested_Scenarios): Deleted.
1945 (Set_Predicated_Parent): Modified to use Node38.
1946 (Set_Prev_Entity): Added to set Prev_Entity field.
1947 (Set_Validated_Object): Modified to use Node38.
1948 (Unlink_Next_Entity): Added to process Prev_Entity when an unlinking
1950 (Validated_Object): Modified to use Node38.
1951 (Write_Field36_Name): Remove Nested_Scenarios, Validated_Object, and
1952 predicated parent cases.
1953 (Write_Field38_Name): Add predicated parent and Validated_Object cases.
1954 * sem_ch3.adb (Process_Subtype): Add guard to protect against
1955 inappropriate marking of Predicated_Parent to non-itype subtypes.
1956 (Make_Class_Wide_Type): Preserve Prev_Entity field and set in new type.
1957 (Copy_And_Swap): Add setting of Prev_Entity.
1958 (Build_derived_Record_Type): Replace Set_Next_Entity w/ Link_Entities.
1959 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Replace Set_Next_Entity
1961 (New_Overloaded_Entity): Remove block created to search for previous
1962 entities in the entity chain with relevant calls to Prev_Entity as well
1963 as replace duplicated code from Remove_Entity_And_Homonym with a call
1965 * sem_ch7.adb (Exchange_Declarations): Replace Set_Next_Entity w/
1967 * sem_elab.adb (Find_And_Process_Nested_Scenarios): Remove global and
1968 initial subprogram declarations related to Nested_Scenarios.
1969 (Process_Nested_Scenarios): Deleted.
1970 (Save_Scenario): Deleted.
1971 (Traverse_Body): Remove optimization for Nested_Scenarios so as to free
1972 node space in the entity tree.
1973 * sem_util.adb, sem_util.ads (Remove_Entity): Moved to einfo.
1974 (Remove_Entity_And_Homonym): Added to separate functionality of
1975 Remove_Entity from the homonym chain directly.
1976 * exp_attr.adb (Expand_N_Attribute_Reference): Replace Set_Next_Entity
1977 w/ Link_Entities and Unlink_Next_Entity.
1978 * exp_ch3.adb (Expand_N_Object_Declaration): Replace Set_Next_Entity w/
1980 * exp_ch6.adb (Replace_Renaming_Declaration_Id): Replace
1981 Set_Next_Entity w/ Link_Entities.
1982 * exp_disp.adb (Expand_Dispatching_Call): Replace Set_Next_Entity w/
1983 Link_Entities and Unlink_Next_Entity.
1984 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration): Replace
1985 call to Remove_Entity with its new incarnation.
1986 * exp_util.adb (New_Class_Wide_Subtype): Add setting of Prev_Entity.
1987 * freeze.adb (Freeze_Record_Type): Replace Set_Next_Entity w/
1990 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
1992 * sem_ch10.adb (Expand_Limited_With_Clause): Update the call to
1993 Install_Limited_Withed_Unit.
1994 (Expand_With_Clause): Update the call to Install_Withed_Unit.
1995 (Implicit_With_On_Parent): Update the call to Install_Withed_Unit.
1996 (Install_Context_Clauses): Update the call to Install_Withed_Unit.
1997 (Install_Limited_Context_Clauses): Update the calls to
1998 Install_Limited_Withed_Unit.
1999 (Install_Limited_Withed_Unit): Renamed to better illustrate its
2001 (Install_Private_With_Clauses): Update the calls to Install_Withed_Unit
2002 and Install_Limited_Withed_Unit.
2003 (Install_With_Clause): Uninstall a limited with clause if a [private]
2004 with clause is given for the same package.
2005 (Install_Withed_Unit): Renamed to better illustrate its purpose.
2006 (Remove_Limited_With_Unit): New routine.
2008 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
2010 * raise-gcc.c (__gnat_SEH_error_handler): Remove prototype.
2011 (__gnat_personality_seh0): Adjust and beef up comments, and
2012 fix formatting throughout.
2013 (__gnat_adjust_context): Deal minimally with version 2.
2014 * seh_init.c (__gnat_map_SEH): Fix formatting.
2015 (_gnat_SEH_error_handler): Adjust comments.
2016 (__gnat_install_SEH_handler): Fix formatting.
2018 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2020 * exp_ch7.adb, sem_ch3.adb, sem_res.adb: Minor reformatting.
2022 2018-05-24 Ed Schonberg <schonberg@adacore.com>
2024 * exp_aggr.adb (Flatten): Add a warning on an others clause in an array
2025 aggregate with static bounds when named associations cover all index
2026 positions and the others clause is redundant.
2028 2018-05-24 Raphael Amiard <amiard@adacore.com>
2030 * libgnat/a-cohama.ads: Add documentation.
2032 2018-05-24 Raphael Amiard <amiard@adacore.com>
2034 * libgnat/a-convec.ads: Add documentation.
2036 2018-05-24 Justin Squirek <squirek@adacore.com>
2038 * exp_ch3.adb (Expand_N_Object_Declaration): Ignore raising an error in
2039 expansion for limited tagged types when the node to be expanded is a
2040 raise expression due to it not representing a valid object.
2041 * exp_ch5.adb (Expand_N_Assignment_Statement): Add exception to error
2042 message regarding assignments to limited types to ignore genereated
2045 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2047 * exp_util.adb (New_Class_Wide_Subtype): Capture and restore relevant
2048 Ghost-related attributes of the class-wide subtype because the copy
2051 2018-05-24 Justin Squirek <squirek@adacore.com>
2053 * sem_res.adb (Resolve_Entity_Name): Add guard to protect against
2054 marking use clauses as effective when the reference appears within
2057 2018-05-24 Cyrille Comar <comar@adacore.com>
2059 * doc/gnat_rm/the_gnat_library.rst: Fix typos.
2060 * gnat_rm.texi: Regenerate.
2062 2018-05-24 Bob Duff <duff@adacore.com>
2064 * exp_ch7.adb (Expand_Cleanup_Actions): Create a mark unconditionally
2065 for build-in-place functions with a caller-unknown-size result.
2066 (Create_Finalizer): For build-in-place functions with a
2067 caller-unknown-size result, check at run time whether we need to
2068 release the secondary stack.
2070 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2072 * sem_prag.adb (Analyze_Pragma): Use the full view of an internally
2073 generated incomplete type.
2075 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2077 * expander.adb (Expand): Update the save and restore of the Ghost
2079 * exp_ch3.adb (Freeze_Type): Likewise.
2080 * exp_disp.adb (Make_DT): Likewise.
2081 * exp_util.adb (Build_DIC_Procedure_Body): Likewise.
2082 (Build_DIC_Procedure_Declaration): Likewise.
2083 (Build_Invariant_Procedure_Body): Likewise.
2084 (Build_Invariant_Procedure_Declaration): Likewise.
2085 (Make_Predicate_Call): Likewise.
2086 * freeze.adb (Add_To_Result): Insert the freeze action of a living
2087 entity prior to the start of the enclosing ignored Ghost region.
2088 (Freeze_Entity): Update the save and restore of the Ghost region.
2089 * ghost.adb (Install_Ghost_Mode): Reimplemented.
2090 (Install_Ghost_Region): New routine.
2091 (Mark_And_Set_Ghost_Assignment): Install a region rather than a mode.
2092 (Mark_And_Set_Ghost_Body): Likewise.
2093 (Mark_And_Set_Ghost_Completion): Likewise.
2094 (Mark_And_Set_Ghost_Declaration): Likewise.
2095 (Mark_And_Set_Ghost_Instantiation): Likewise.
2096 (Mark_And_Set_Ghost_Procedure_Call): Likewise.
2097 (Name_To_Ghost_Mode): New routine.
2098 (Restore_Ghost_Region): New routine.
2099 * ghost.ads (Install_Ghost_Region): New routine.
2100 (Restore_Ghost_Region): New routine.
2101 * opt.ads: Add new global variable Ignored_Ghost_Region.
2102 * rtsfind.adb (Load_RTU): Update the save and restore of the Ghost
2103 region. Install a clean region.
2104 * sem.adb (Analyze): Likewise.
2105 (Do_Analyze): Likewise.
2106 * sem_ch3.adb (Analyze_Object_Declaration): Likewise
2107 (Derive_Progenitor_Subprograms): Use local variable Iface_Alias to
2108 capture the ultimate alias of the current primitive.
2109 (Process_Full_View): Update the save and restore of the Ghost region.
2110 Do not inherit DIC and invariant procedures.
2111 * sem_ch5.adb (Analyze_Assignment): Update the save and restore of the
2113 * sem_ch6.adb (Analyze_Procedure_Call): Likewise.
2114 (Analyze_Subprogram_Body_Helper): Likewise.
2115 * sem_ch7.adb (Analyze_Package_Body_Helper): Likewise.
2116 * sem_ch12.adb (Analyze_Package_Instantiation): Likewise.
2117 (Analyze_Subprogram_Instantiation): Likewise.
2118 (Instantiate_Package_Body): Likewise.
2119 (Instantiate_Subprogram_Body): Likewise.
2120 * sem_ch13.adb (Build_Predicate_Functions): Likewise.
2121 (Build_Predicate_Function_Declaration): Likewise.
2123 (Add_Dispatching_Operation): Do not consider DIC and invariant
2125 (Check_Dispatching_Operation): Use Add_Dispatching_Operation to collect
2126 a dispatching subprogram.
2127 (Check_Operation_From_Private_View): Likewise.
2128 (Override_Dispatching_Operation): Likewise.
2129 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part): Update the save
2130 and restore of the Ghost region.
2131 (Analyze_Initial_Condition_In_Decl_Part): Likewise.
2132 (Analyze_Pragma): Update the save and restore of the Ghost region.
2133 (Analyze_Pre_Post_Condition_In_Decl_Part): Likewise.
2134 * sem_util.adb (Is_Suitable_Primitive): New routine.
2135 * sem_util.ads (Is_Suitable_Primitive): New routine.
2136 * sinfo.ads: Update the section of Ghost regions.
2138 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
2140 * doc/gnat_rm/implementation_defined_pragmas.rst (Contract_Cases):
2141 Change "condition" to "case guard" after renaming in the contract
2143 * gnat_rm.texi: Regenerate.
2145 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2147 * exp_util.adb (Expand_Static_Predicates_In_Choices): Indicate that the
2148 construct with discrete choices no longer contains a subtype with
2149 predicates since the expansion already handled this case.
2151 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2153 * freeze.adb (Wrap_Imported_Subprogram): Generate an unchecked
2154 conversion to the return type to avoid a side effect where an imported
2155 relocated function generates a new anonymous access type, whose
2156 accessibility level does not agree with with that of the wrapper.
2158 2018-05-24 Javier Miranda <miranda@adacore.com>
2160 * sem_util.adb (Abstract_Interface_List): Add missing support for
2161 private types whose full view is a synchronized type.
2162 * sem_ch3.adb (Build_Derived_Private_Type): Skip building the full
2163 derivation of a private type parent type is a task type with
2164 discriminants as gigi does not use such type directly.
2166 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2168 * sem_elab.adb (Build_Variable_Reference_Marker): Do not create a
2169 variable marker when the reference appears in the formal part of a
2170 compilation unit instance because there is no place to insert it.
2171 (In_Compilation_Instance_Formal_Part): New routine.
2173 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
2175 * layout.ads, repinfo.ads: Fix references to renamed Backend_Layout
2176 configuration parameter.
2178 2018-05-24 Doug Rupp <rupp@adacore.com>
2180 * argv-lynxos178-raven-cert.c: New file.
2181 * libgnat/system-lynxos178-x86.ads: New file.
2183 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2185 * exp_disp.adb, freeze.adb, gnat1drv.adb, sem_ch5.adb, sem_spark.adb:
2186 Minor reformattings.
2188 2018-05-23 Pascal Obry <obry@adacore.com>
2190 * adaint.c (win32_wait): Properly free the handle/pid lists when
2191 WaitForMultipleObjects fails (return WAIT_FAILED).
2193 2018-05-23 Pascal Obry <obry@adacore.com>
2195 * adaint.c (win32_wait): Add missing parentheses.
2197 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2199 * exp_ch3.adb (Check_Large_Modular_Array): Moved to Freeze.
2200 (Expand_N_Object_Declaration): Do not check for a large modular array
2202 * freeze.adb (Check_Large_Modular_Array): Moved from Exp_Ch3.
2203 (Freeze_Object_Declaration): Code cleanup. Check for a large modular
2205 * sem_ch3.adb: Minor reformatting.
2207 2018-05-23 Ed Schonberg <schonberg@adacore.com>
2209 * einfo.ads: New attribute on types: Predicated_Parent, to simplify the
2210 retrieval of the applicable predicate function to an itype created for
2211 a constrained array component.
2212 * einfo.adb: Subprograms for Predicated_Parent.
2213 (Predicate_Function): Use new attribute.
2214 * exp_util.adb (Make_Predicate_Call): If the predicate function is not
2215 available for a subtype, retrieve it from the base type, which may have
2216 been frozen after the subtype declaration and not captured by the
2217 subtype declaration.
2218 * sem_aggr.adb (Resolve_Array_Aggregate): An Others association is
2219 legal within a generated initiqlization procedure, as may happen with a
2220 predicate check on a component, when the predicate function applies to
2221 the base type of the component.
2222 * sem_ch3.adb (Analyze_Subtype_Declaration): Clean up inheritance of
2223 predicates for subtype declarations and for subtype indications in
2225 (Process_Subtype): Likewise. Handle properly the case of a private type
2226 with unknown discriminants whose full view is an unconstrained array.
2227 Use Predicated_Parent to indicate source of predicate function on an
2228 itype whose parent is itself an itype.
2229 (Complete_Private_Subtype): If the private view has unknown
2230 discriminants and the full view is an unconstrained array, set base
2231 type of completion to the full view of parent.
2232 (Inherit_Predicate_Flags): Prevent double assignment of predicate
2234 (Build_Subtype): For a constrained array component, propagate predicate
2235 information from original component type declaration.
2237 2018-05-23 Boris Yakobowski <yakobowski@adacore.com>
2239 * libgnat/a-ngelfu.ads (Arctanh, Arccoth): Fix faulty preconditions.
2241 2018-05-23 Arnaud Charlet <charlet@adacore.com>
2243 * checks.adb (Minimize_Eliminate_Overflows): Default initialize Lo and
2245 * sem_elab.adb: Make "out" parameters instead of "in out" when
2248 2018-05-23 Bob Duff <duff@adacore.com>
2250 * gnatbind.adb (List_Applicable_Restrictions): Add
2251 No_Implementation_Restrictions to the list of restrictions not to list.
2252 Remove double negative "not No_Restriction_List". Comment the
2253 commentary that is output, so it won't cause errors if used directly in
2256 2018-05-23 Ed Schonberg <schonberg@adacore.com>
2258 * sem_prag.adb (Inherit_Class_Wide_Pre): Refine legality check on
2259 class-wide precondition on a type extension when ancestor does not have
2260 a class-wide precondition. Previously the compiler accepted such a
2261 precondition when the ancestor had a class-wide postcondition.
2263 2018-05-23 Javier Miranda <miranda@adacore.com>
2265 * sem_attr.adb (Valid_Scalars): Do not invoke Error_Attr_P to report
2266 the warning on occurrences of this attribute whose evaluation is always
2267 true (since that subprogram aborts processing the attribute). In
2268 addition, replace the node by its boolean result 'True' (required
2269 because the backend has no knowledge of this attribute).
2271 2018-05-23 Bob Duff <duff@adacore.com>
2273 * libgnat/a-convec.adb: (Insert, Insert_Space): Suppress warnings. The
2274 code in question is not reachable in the case where Count_Type'Last is
2277 2018-05-23 Yannick Moy <moy@adacore.com>
2279 * doc/gnat_rm/implementation_defined_pragmas.rst: Clarify meaning of
2280 local pragma Warnings Off without On.
2281 * gnat_rm.texi: Regenerate.
2283 2018-05-23 Olivier Hainque <hainque@adacore.com>
2285 * libgnat/g-excact.ads (Is_Foreign_Exception): New predicate.
2286 * libgnat/g-excact.adb: Implement.
2288 2018-05-23 Ed Schonberg <schonberg@adacore.com>
2290 * sem_ch5.adb (Analyze_Iterator_Specification): If a subtype indication
2291 is present, verify its legality when the domain of iteration is a
2292 GNAT-specific formal container, as is already done for arrays and
2293 predefined containers.
2295 2018-05-23 Yannick Moy <moy@adacore.com>
2297 * sem_util.adb (Enclosing_Declaration): Fix the case of a named number
2298 declaration, which was not taken into account.
2300 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2302 * debug.adb: Switch -gnatd_s is now used to stop elaboration checks on
2303 synchronized suspension.
2304 * rtsfind.ads: Add entries for units Ada.Synchronous_Barriers and
2305 Ada.Synchronous_Task_Control and routines Suspend_Until_True and
2307 * sem_elab.adb: Document switch -gnatd_s.
2308 (In_Task_Body): New routine.
2309 (Is_Potential_Scenario): Code cleanup. Stop the traversal of a task
2310 body when the current construct denotes a synchronous suspension call,
2311 and restriction No_Entry_Calls_In_Elaboration_Code or switch -gnatd_s
2313 (Is_Synchronous_Suspension_Call): New routine.
2314 * switch-c.adb (Scan_Front_End_Switches): Switch -gnatJ now sets switch
2317 2018-05-23 Javier Miranda <miranda@adacore.com>
2319 * exp_disp.adb (Make_DT): Restrict the initialization of
2320 External_Tag and Expanded_Name to an empty string to the case where
2321 both pragmas apply (i.e. No_Tagged_Streams and Discard_Names), since
2322 restricted runtimes are compiled with pragma Discard_Names.
2323 * doc/gnat_rm/implementation_defined_pragmas.rst,
2324 doc/gnat_rm/implementation_defined_characteristics.rst: Add
2326 * gnat_rm.texi: Regenerate.
2328 2018-05-23 Maroua Maalej <maalej@adacore.com>
2330 * sem_spark.adb: Fix of some permission rules of pointers in SPARK.
2332 2018-05-23 Ed Schonberg <schonberg@adacore.com>
2334 * sem_ch5.adb (Preanalyze_Range): The pre-analysis of the domain of
2335 iteration of an Ada2012 loop is performed to determine the type of the
2336 domain, but full analysis is performed once the loop is rewritten as a
2337 while-loop during expansion. The pre-analysis suppresses expansion; it
2338 must also suppress the generation of freeze nodes, which may otherwise
2339 appear in the wrong scope before rewritting.
2341 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2343 * sem_elab.adb: Update the section on suppressing elaboration warnings.
2345 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2347 * einfo.adb (Is_Elaboration_Checks_OK_Id): Use predicate
2348 Is_Elaboration_Target.
2349 (Is_Elaboration_Target): New routine.
2350 (Is_Elaboration_Warnings_OK_Id): Use predicate Is_Elaboration_Target.
2351 (Set_Is_Elaboration_Checks_OK_Id): Use predicate Is_Elaboration_Target.
2352 (Set_Is_Elaboration_Warnings_OK_Id): Use predicate
2353 Is_Elaboration_Target.
2354 * einfo.ads: Add new synthesized attribute Is_Elaboration_Target along
2355 with occurrences in nodes.
2356 (Is_Elaboration_Target): New routine.
2357 * sem_prag.adb (Analyze_Pragma): Suppress elaboration warnings when an
2358 elaboration target is subject to pragma Warnings (Off, ...).
2360 2018-05-23 Eric Botcazou <ebotcazou@adacore.com>
2362 * repinfo.adb (List_Type_Info): Remove obsolete stuff.
2364 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2366 * einfo.adb: Flag304 is now Is_Elaboration_Warnings_OK_Id.
2367 (Is_Elaboration_Warnings_OK_Id): New routine.
2368 (Set_Is_Elaboration_Warnings_OK_Id): New routine.
2369 (Write_Entity_Flags): Output Flag304.
2370 * einfo.ads: Add new attribute Is_Elaboration_Warnings_OK_Id along with
2371 occurrences in entities.
2372 (Is_Elaboration_Warnings_OK_Id): New routine along with pragma Inline.
2373 (Set_Is_Elaboration_Warnings_OK_Id): New routine along with pragma
2375 * sem_attr.adb (Analyze_Access_Attribute): Capture the state of
2376 elaboration warnings.
2377 * sem_ch3.adb (Analyze_Object_Declaration): Capture the state of
2378 elaboration warnings.
2379 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Capture the
2380 state of elaboration warnings.
2381 (Analyze_Subprogram_Body_Helper): Capture the state of elaboration
2383 (Analyze_Subprogram_Declaration): Capture the state of elaboration
2385 * sem_ch9.adb (Analyze_Entry_Declaration): Capture the state of
2386 elaboration warnings.
2387 (Analyze_Single_Task_Declaration): Capture the state of elaboration
2389 (Analyze_Task_Type_Declaration): Capture the state of elaboration
2391 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Capture the state
2392 of elaboration warnings.
2393 (Analyze_Generic_Subprogram_Declaration): Capture the state of
2394 elaboration warnings.
2395 * sem_elab.adb: Add a section on suppressing elaboration warnings.
2396 Type Processing_Attributes includes component Suppress_Warnings
2397 intended to suppress any elaboration warnings along a path in the
2398 graph. Update Initial_State to include a value for this component.
2399 Types Target_Attributes and Task_Attriutes include component
2400 Elab_Warnings_OK to indicate whether the target or task has elaboration
2401 warnings enabled. component Elab_Warnings_OK.
2402 (Build_Access_Marker): Propagate attribute
2403 Is_Elaboration_Warnings_OK_Node from the attribute to the generated
2405 (Extract_Instantiation_Attributes): Set the value for Elab_Warnings_OK.
2406 (Extract_Target_Attributes): Set the value for Elab_Warnings_OK.
2407 (Extract_Task_Attributes): Set the value for Elab_Warnings_OK.
2408 (Process_Conditional_ABE_Access): Suppress futher elaboration warnings
2409 when already in this mode or when the attribute or target have warnings
2411 (Process_Conditional_ABE_Activation_Impl): Do not emit any diagnostics
2412 if warnings are suppressed.
2413 (Process_Conditional_ABE_Call): Suppress further elaboration warnings
2414 when already in this mode, or the target or call have warnings
2416 (Process_Conditional_ABE_Call_Ada): Do not emit any diagnostics if
2417 warnings are suppressed.
2418 (Process_Conditional_ABE_Call_SPARK): Do not emit any diagnostics if
2419 warnings are suppressed.
2420 (Process_Conditional_ABE_Instantiation): Suppress further elaboration
2421 warnings when already in this mode or when the instantiation has
2422 warnings suppressed.
2423 (Process_Conditional_ABE_Instantiation_Ada): Do not emit any
2424 diagnostics if warnings are suppressed.
2425 (Process_Conditional_ABE_Variable_Assignment_Ada): Use the more
2426 specific Is_Elaboration_Warnings_OK_Id rather than Warnings_Off.
2427 (Process_Conditional_ABE_Variable_Assignment_SPARK): Use the more
2428 specific Is_Elaboration_Warnings_OK_Id rather than Warnings_Off.
2429 (Process_Task_Object): Suppress further elaboration warnings when
2430 already in this mode, or when the object, activation call, or task type
2431 have warnings suppressed. Update the processing state to indicate that
2432 the path goes through a task body.
2433 * sinfo.adb (Is_Elaboration_Warnings_OK_Node): Accept attribute
2435 (Set_Is_Elaboration_Warnings_OK_Node): Accept attribute references.
2436 * sinfo.ads: Attribute Is_Elaboration_Warnings_OK_Node now applies to
2437 attribute references.
2439 2018-05-23 Piotr Trojanek <trojanek@adacore.com>
2441 * einfo.ads: Minor reformatting.
2443 2018-05-23 Ed Schonberg <schonberg@adacore.com>
2445 * sem_ch3.adb (Analyze_Object_Declaration): If expression is an
2446 anonymous_access_to_ subprogram formal, apply a conversion to force an
2447 accsssibility check that will fail statically, enforcing 3.10.2 (13).
2449 2018-05-23 Daniel Mercier <mercier@adacore.com>
2451 * gnat1drv.adb: Turn off length expansion in CodePeer mode.
2453 2018-05-23 Bob Duff <duff@adacore.com>
2455 * freeze.adb: (Check_Address_Clause): Deal with build-in-place
2456 aggregates in addition to build-in-place calls.
2458 2018-05-23 Bob Duff <duff@adacore.com>
2460 * einfo.ads: Minor reformatting.
2461 * sem_ch3.adb: Likewise.
2462 * sinfo.ads: Likewise.
2464 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2466 * exp_ch3.adb (Default_Initialize_Object): Do not optimize scalar array
2467 initialization when the component type has predicates.
2468 * exp_ch4.adb (Expand_N_Allocator): Do not optimize scalar array
2469 allocation when the component type has predicates.
2471 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
2473 * einfo.adb, exp_disp.adb, sem_ch3.adb, sem_ch6.adb, sem_prag.adb:
2476 2018-05-22 Justin Squirek <squirek@adacore.com>
2478 * sem_ch6.adb (Analyze_Expression_Function): Propagate flags from the
2479 original function spec into the generated function spec due to
2480 expansion of expression functions during analysis.
2481 (Analyze_Subprogram_Body_Helper): Modify check on formal parameter
2482 references from the body to the subprogram spec in the case of
2483 expression functions because of inconsistances related to having a
2485 * libgnarl/s-osinte__android.ads: Flag parameters as unused.
2486 * libgnarl/s-osinte__lynxos178e.ads: Likewise.
2487 * libgnarl/s-osinte__qnx.adb: Likewise.
2488 * libgnarl/s-osinte__qnx.ads: Likewise.
2490 2018-05-22 Doug Rupp <rupp@adacore.com>
2492 * init.c (HAVE_ADJUST_CONTEXT_FOR_RAISE): Don't define on VxWorks7 for
2495 2018-05-22 Olivier Hainque <hainque@adacore.com>
2497 * libgnat/a-except.adb (Exception_Propagation.Propagate_Exception):
2498 Expect an Exception_Occurence object, not an Access.
2499 (Complete_And_Propagate_Occurrence): Adjust accordingly.
2500 (Raise_From_Signal_Handler): Likewise.
2501 (Reraise_Occurrence_No_Defer): If we have a Machine_Occurrence
2502 available in the provided occurrence object, just re-propagate the
2503 latter as a bare "raise;" would do.
2504 * libgnat/a-exexpr.adb (Propagate_Exception): Adjust to spec change.
2505 * libgnat/a-exstat.adb (String_To_EO): Initialize X.Machine_Occurrence
2506 to null, to mark that the occurrence we're crafting from the stream
2507 contents is not being propagated (yet).
2509 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2511 * exp_aggr.adb (Initialize_Ctrl_Record_Component): Insert the generated
2512 code for a transient component in line with the rest of the
2513 initialization code, rather than before the aggregate. This ensures
2514 that the component has proper visibility of the discriminants.
2516 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2518 * adaint.c: Reorganize QNX-specific macros, use syspage to retreive the
2521 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2523 * sigtramp-qnx.c: Properly restore link register in signal trampoline.
2525 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2527 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): Strip away any
2528 conversions before extracting the value of the expression.
2529 * exp_ch3.adb (Default_Initialize_Object): Optimize the default
2530 initialization of an array of scalars.
2531 (Get_Simple_Init_Val): Add processing for array types. Remove the
2532 processing of strings because this case is already handled by the array
2534 (Needs_Simple_Initialization): Moved to Sem_Util.
2535 (Simple_Init_Array_Type): New routine.
2536 (Simple_Init_Initialize_Scalars_Type): Reimplemented to use the new
2537 facilities from Sem_Util.
2538 (Simple_Initialization_OK): New routine.
2539 * exp_ch3.ads (Needs_Simple_Initialization): Moved to Sem_Util.
2540 * exp_ch4.adb (Expand_N_Allocator): Optimize the default allocation of
2541 an array of scalars.
2542 * sem_prag.adb (Analyze_Float_Value): New routine.
2543 (Analyze_Integer_Value): New routine.
2544 (Analyze_Pragma): Reimplement the analysis of pragma Initialize_Scalars
2545 to handled the extended form of the pragma.
2546 (Analyze_Type_Value_Pair): New routine.
2547 * sem_util.adb: Add invalid value-related data structures.
2548 (Examine_Array_Bounds): New routine.
2549 (Has_Static_Array_Bounds): Reimplemented.
2550 (Has_Static_Non_Empty_Array_Bounds): New routine.
2551 (Invalid_Scalar_Value): New routine.
2552 (Needs_Simple_Initialization): Moved from Exp_Ch3.
2553 (Set_Invalid_Scalar_Value): New routines.
2554 * sem_util.ads (Has_Static_Non_Empty_Array_Bounds): New routine.
2555 (Invalid_Scalar_Value): New routine.
2556 (Needs_Simple_Initialization): Moved from Exp_Ch3.
2557 (Set_Invalid_Scalar_Value): New routines.
2558 * snames.ads-tmpl: Add names for the salar type families used by pragma
2561 2018-05-22 Javier Miranda <miranda@adacore.com>
2563 * exp_disp.adb (Make_DT): Initialize the External_Tag with an empty
2564 string when pragma No_Tagged_Streams is applicable to the tagged type,
2565 and initialize the Expanded_Name with an empty string when pragma
2566 Discard_Names is applicable to the tagged type.
2568 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2570 * sem_ch6.adb (Check_Conformance): Add RM reference for rule that a
2571 formal subprogram is never subtype conformqnt, and thus cannot be the
2572 prefix of 'Access. Reject as well the attribute when applied to a
2573 renaming of a formal subprogram.
2575 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2577 * exp_ch3.adb (Build_Array_Init_Proc): Update the call to
2578 Needs_Simple_Initialization.
2579 (Build_Init_Statements): Update the call to Get_Simple_Init_Val.
2580 (Check_Subtype_Bounds): Renamed to Extract_Subtype_Bounds. Update the
2581 profile and comment on usage.
2582 (Default_Initialize_Object): Do not use New_Copy_Tree to set the proper
2583 Sloc of a value obtained from aspect Default_Value because this could
2584 potentially replicate large trees. The proper Sloc is now set in
2585 Get_Simple_Init_Val.
2586 (Get_Simple_Init_Val): Reorganized by breaking the various cases into
2587 separate routines. Eliminate the use of global variables.
2588 (Init_Component): Update the call to Get_Simple_Init_Val.
2589 (Needs_Simple_Initialization): Update the parameter profile and all
2591 (Simple_Init_Defaulted_Type): Copy the value of aspect Default_Value
2592 and set the proper Sloc.
2593 * exp_ch3.ads (Get_Simple_Init_Val): Update the parameter profile and
2595 (Needs_Simple_Initialization): Update the parameter profile.
2597 2018-05-22 Patrick Bernardi <bernardi@adacore.com>
2599 * sem_ch3.adb (Build_Discriminant_Constraints): Raise an error if the
2600 user tries to use a subtype indication as a discriminant constraint.
2602 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2604 * exp_ch4.ads, exp_ch4.adb, exp_util.adb, expander.adb: Remove mention
2605 of N_Reduction_Expression and N_Reduction_Expression_Parameter.
2606 * par-ch4.adb: Remove parsing routines for reduction expressions.
2607 * sem.adb, sinfo.ads, sinfo.adb, sem_ch4.ads, sem_ch4.adb, sem_res.adb,
2608 sem_spark.adb, sprint.adb: Remove analysis routines for reduction
2611 2018-05-22 Arnaud Charlet <charlet@adacore.com>
2613 * sem_ch8.adb (Check_Frozen_Renaming): Do not emit error in
2614 Relaxed_RM_Semantics mode.
2616 2018-05-22 Arnaud Charlet <charlet@adacore.com>
2618 * comperr.adb (Delete_SCIL_Files): Take into account
2619 N_Generic_Package_Renaming_Declaration.
2621 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2623 * sem_ch3.adb (Search_Derivation_Levels): Whenever a parent type is
2624 private, use the full view if available, because it may include renamed
2625 discriminants whose values are stored in the corresponding
2628 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2630 * einfo.ads, einfo.adb: New attribute Hidden_In_Formal_Instance,
2631 defined on packages that are actuals for formal packages, in order to
2632 set/reset the visibility of the formals of a formal package with given
2633 actuals, when there are subsequent uses of those formals in the
2634 enclosing generic, as required by RN 12.7 (10).
2635 * atree.ads, atree.adb: Add operations for Elist30.
2636 * atree.h: Add Elist30.
2637 * sem_ch12.adb (Analyze_Formal_Package_Instantiation): Collect formals
2638 that are not defaulted and are thus not visible within the current
2640 (Check_Formal_Packages): Reset visibility of formals of a formal
2641 package that are not defaulted, on exit from current instance.
2643 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2645 * sem_prag.adb (Analyze_Input_Output): Emit an error when a non-null,
2646 non-'Result output appears in the output list of a function.
2648 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2650 * exp_attr.adb (Build_Array_VS_Func): Reimplemented.
2651 (Build_Record_VS_Func): Reimplemented.
2652 (Expand_N_Attribute): Reimplement the handling of attribute
2654 * sem_attr.adb (Analyze_Attribute): Reimplement the handling of
2655 attribute 'Valid_Scalars.
2656 * sem_util.adb (Scalar_Part_Present): Reimplemented.
2657 (Validated_View): New routine.
2658 * sem_util.ads (Scalar_Part_Present): Update the parameter profile and
2660 (Validated_View): New routine.
2661 * doc/gnat_rm/implementation_defined_attributes.rst: Update the
2662 documentation of attribute 'Valid_Scalars.
2663 * gnat_rm.texi: Regenerate.
2665 2018-05-22 Bob Duff <duff@adacore.com>
2667 * binde.adb: (Choose): Ignore a pragma Elaborate_Body that appears in
2668 the spec of a SAL_Interface package.
2670 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2672 * freeze.adb (Freeze_Entity): When analyzing delayed aspects of an
2673 entity E within a generic unit, indicate that there are no remaining
2674 delayed aspects after invoking Analyze_Aspects_At_Freeze_Point. The
2675 entity E is not frozen yet but the aspects should not be reanalyzed at
2676 the freeze point, which may be outside of the generic and may not have
2677 the proper visibility.
2679 2018-05-22 Bob Duff <duff@adacore.com>
2681 * doc/gnat_ugn/gnat_utility_programs.rst: Add documentation for
2682 the new --split-line-before-record, --indent-named-statements and
2683 --no-align-modes gnatpp switches.
2685 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2687 * sem_prag.adb (Process_Compile_Time_Warning_Or_Error): Handle properly
2688 a second argument that is a constant of a given string value.
2690 2018-05-22 Doug Rupp <rupp@adacore.com>
2692 * sigtramp-vxworks-target.inc: Align stack to 128bits on AArch64.
2694 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
2696 * sigtramp-qnx.c: Fix stack alignment issue in the signal trampoline.
2698 2018-05-22 Ed Schonberg <schonberg@adacore.com>
2700 * freeze.adb (Freeze_Fixed_Point_Type): If the first subtype has
2701 delayed aspects, analyze them now, os that the representation of the
2702 type (size, bounds) can be computed and validated.
2704 2018-05-22 Olivier Hainque <hainque@adacore.com>
2706 * libgnat/s-dwalin.adb (Enable_Cache): Skip symbols outside of the
2707 executable code section boundaries.
2709 2018-05-22 Javier Miranda <miranda@adacore.com>
2711 * locales.c: New implementation for the Ada.Locales package.
2712 * libgnat/a-locale.ads: Remove comment indicating that this is not
2714 * doc/gnat_rm/standard_library_routines.rst: Remove comment indicating
2715 that this is not implemented.
2716 * gnat_rm.texi: Regenerate.
2718 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2720 * exp_ch5.adb, freeze.adb, pprint.adb, sem_ch4.adb, sem_res.adb: Minor
2723 2018-05-22 Justin Squirek <squirek@adacore.com>
2725 * sem_ch12.adb (In_Same_Declarative_Part): Moved to sem_util.
2726 (Freeze_Subprogram_Body, Install_Body): Modify calls to
2727 In_Same_Declarative_Part.
2728 * sem_prag.adb (Analyze_Pragma-Pragma_Pure_Function): Add check to
2729 verify pragma declaration is within the same declarative list with
2730 corresponding error message.
2731 * sem_util.adb, sem_util.ads (In_Same_Declarative_Part): Moved from
2732 sem_ch12.adb and generalized to be useful outside the scope of
2735 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
2737 * sem_ch6.adb (Analyze_Subprogram_Declaration): Set the proper
2738 categorization of the unit after processing the aspects in case one of
2739 its aspects is converted into a categorization pragma.
2741 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2743 * freeze.adb (Warn_Overlay): Do not emit a wawrning on an object
2744 declaration with an explicit address clause and a type with default
2745 initialization, if the declaration carries an aspect
2746 Suppress_Initialization.
2748 2018-05-21 Daniel Mercier <mercier@adacore.com>
2750 * pprint.adb: Use mixed case for attribute names.
2752 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2754 * sem_ch6.adb (Analyze_Generic_Subprogram_Body): Rename the call to
2755 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2756 (Analyze_Subprogram_Body_Helper): Rename the calls to
2757 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2758 * sem_ch9.adb (Analyze_Entry_Body): Rename the call to
2759 Analyze_Aspect_Specifications_On_Body_Or_Stub.
2760 * sem_ch10.adb: Add with and use clause for Sem_Ch13.
2761 (Analyze_Package_Body_Stub): Add constant Id. Decorate the package stub
2762 prior to analyzing its aspects.
2763 (Analyze_Protected_Body_Stub): Add constant Id. Decorate the package
2764 stub prior to analyzing its aspects. Save and restore the configuration
2766 (Analyze_Task_Body_Stub): Add constant Id. Decorate the package stub
2767 prior to analyzing its aspects.
2768 * sem_ch13.adb (Analyze_Aspect_Specifications_On_Body_Or_Stub): Renamed
2769 to Analyze_Aspects_On_Subprogram_Body_Or_Stub.
2770 * sem_ch13.ads (Analyze_Aspect_Specifications_On_Body_Or_Stub): Renamed
2771 to Analyze_Aspects_On_Subprogram_Body_Or_Stub.
2772 * sem_prag.adb: Code reformatting.
2773 (Analyze_Refined_Depends_Global_Post): Consider task body stubs.
2775 2018-05-21 Jerome Lambourg <lambourg@adacore.com>
2777 * gcc-interface/Makefile.in: Add g-soliop__qnx.ads to the runtime build
2780 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2782 * exp_cg.adb: Remove with and use clause for Exp_Disp.
2783 * exp_ch9.adb: Remove with and use clause for Exp_Disp.
2784 * exp_disp.adb (Is_Predefined_Dispatching_Operation): Moved to Sem_Util.
2785 (Is_Predefined_Interface_Primitive): Moved to Sem_Util.
2786 (Is_Predefined_Internal_Operation): Moved to Sem_Util.
2787 * exp_disp.ads (Is_Predefined_Dispatching_Operation): Moved to Sem_Util.
2788 (Is_Predefined_Interface_Primitive): Moved to Sem_Util.
2789 (Is_Predefined_Internal_Operation): Moved to Sem_Util.
2790 * exp_dist.adb: Remove with and use clause for Exp_Disp.
2791 * freeze.adb: Remove with and use clause for Exp_Disp.
2792 * sem_cat.adb: Remove with and use clause for Exp_Disp.
2793 * sem_ch6.adb: Remove with and use clause for Exp_Disp.
2794 * sem_ch12.adb: Remove with and use clause for Exp_Disp.
2795 * sem_elab.adb (Check_Overriding_Primitive): Do not process predefined
2797 * sem_util.adb: Remove with and use clause for Exp_Disp.
2798 (Is_Predefined_Dispatching_Operation): Moved from Exp_Disp.
2799 (Is_Predefined_Interface_Primitive): Moved from Exp_Disp.
2800 (Is_Predefined_Internal_Operation): Moved from Exp_Disp.
2801 * sem_util.ads (Is_Predefined_Dispatching_Operation): Moved from
2803 (Is_Predefined_Interface_Primitive): Moved from Exp_Disp.
2804 (Is_Predefined_Internal_Operation): Moved from Exp_Disp.
2806 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2808 * sem_res.adb (Valid_Conversion): Improve error message on an illegal
2809 type conversion whose expression has a limited view of a type.
2811 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2813 * exp_ch5.adb (Build_Formal_Container_Iteration): If source has
2814 explicit name for iterator loop, preserve that name in expanded
2815 construct, for possible use in exit statements.
2817 2018-05-21 Javier Miranda <miranda@adacore.com>
2819 * sem_ch4.adb (Analyze_Membership_Op): Avoid compiler crash when the
2820 spec of a unit has Ada 2012 membership tests with multiple choices and
2821 the unit body is not compiled under Ada 2012 mode.
2823 2018-05-21 Doug Rupp <rupp@adacore.com>
2825 * sigtramp-vxworks-target.inc: Set cfa_reg properly from sigcontext
2827 (CFI_COMMON_REGS): Restore LR jic probed from prologue.
2828 (REGNO_PC_OFFSET): Change to correct value for Aarch64.
2830 2018-05-21 Jose Ruiz <ruiz@adacore.com>
2832 * doc/gnat_ugn/gnat_utility_programs.rst, exp_attr.adb,
2833 libgnarl/s-tassta.adb: Minor typo fixes
2835 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2837 * sem_ch4.adb (Analyze_One_Call): Recognize complex cases where an
2838 indexed call originally in prefix forn is itself the prefix of a
2841 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2843 * sem_eval.adb (Is_Null_Range): Clarify access to the full view of a
2845 (Not_Null_Range): Same as above.
2847 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2849 * exp_ch3.adb: Minor reformatting.
2850 * exp_ch6.adb: Likewise.
2851 * freeze.adb: Likewise.
2852 * inline.adb: Likewise.
2853 * sem_util.adb: Likewise.
2855 2018-05-21 Yannick Moy <moy@adacore.com>
2857 * inline.adb (Expand_Inlined_Call.Process_Formals): Use a type
2858 conversion instead of an unchecked type conversion when inlining a
2859 return statement, unless type qualification is required (for character
2860 and string literal) or no check can result from the conversion (for
2862 * opt.ads: Update comment.
2864 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2866 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Install the elaboration
2867 model of the compilation unit spec, if any.
2868 * sem_ch7.adb (Analyze_Package_Body_Helper): Install the elaboration
2869 model of the compilation unit spec, if any.
2870 * sem_ch10.adb (Analyze_Subunit): Install the elaboration model of the
2871 parent compilation unit spec, if any.
2872 * sem_elab.adb (Check_Elaboration_Scenarios): Restore the elaboration
2873 model of the main unit.
2874 (Is_Same_Unit): The routine now uses Unit_Entity.
2875 (Is_Subunit): Removed.
2876 (Normalize_Unit): Removed.
2877 (Unit_Entity): New routine.
2878 * sem_prag.adb (Analyze_Pragma): Reimplement the handling of pragma
2879 Elaboration_Checks. The analysis now ensures that the pragma appears at
2880 the configuration level, and on the initial declaration of a unit.
2881 Other placements are either flagged as illegal, or ignored.
2882 (Check_Duplicate_Elaboration_Checks_Pragma): New routine.
2883 (Ignore_Elaboration_Checks_Pragma): New routine.
2884 * sem_util.adb (Install_Elaboration_Model): New routine.
2885 * sem_util.ads (Install_Elaboration_Model): New routine.
2886 * doc/gnat_rm/implementation_defined_pragmas.rst: Update the
2887 documentation of pragma Elaboration_Checks.
2888 * gnat_rm.texi: Regenerate.
2890 2018-05-21 Olivier Hainque <hainque@adacore.com>
2892 * libgnat/s-trasym__dwarf.adb (Executable_Name): Return argv[0] instead
2893 of empty string when argv[0] couldn't be found on PATH.
2894 (Enable_Cache): Raise Program_Error instead of attempting a null
2895 pointer dereference when the Exec_Module initialization failed.
2897 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2899 * libgnarl/a-reatim.ads (Clock_Time): Remove External aspect.
2900 * libgnarl/a-taside.ads (Tasking_State): Likewise.
2901 * libgnat/a-calend.ads (Clock_Time): Likewise.
2903 2018-05-21 Yannick Moy <moy@adacore.com>
2905 * sem_ch6.adb (Analyze_Procedure_Call): Refine test to recognize prefix
2906 call notation in inlined call in GNATprove mode.
2908 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
2910 * einfo.adb (Is_External_State): An abstract state is also external
2911 when it is declared with option "synchronous".
2912 * einfo.ads: Update the documentation of synthesized attribute
2914 * sem_util.adb (Find_Simple_Properties): New routine.
2915 (Is_Enabled_External_Property): New routine.
2916 (State_Has_Enabled_Property): Reimplemented. The two flavors of option
2917 External have precedence over option Synchronous when determining
2918 whether a property is in effect.
2920 2018-05-21 Yannick Moy <moy@adacore.com>
2922 * sem_eval.adb (Static_Length): Take into account case of variable of
2923 subtype string literal.
2925 2018-05-21 Olivier Hainque <hainque@adacore.com>
2927 * libgnat/s-objrea.ads (Get_Memory_Bounds): Rename as Get_Xcode_Bounds.
2928 (Object_Section): Rename Flag_Alloc component as Flag_Xcode.
2929 * libgnat/s-objrea.adb (Get_Xcode_Bounds): Adjust to new subprogram and
2931 (Get_Section, ELF case): Set Flag_Xcode from SHF_EXECINSTR.
2932 * libgnat/s-dwalin.adb (Open): Adjust to the Get_Memory_Bounds name
2935 2018-05-21 Olivier Hainque <hainque@adacore.com>
2937 * libgnat/s-dwalin.ads (Dwarf_Context): Change type of Load_Address to
2938 Address, and type of Low, High to Storage_Offset.
2939 (Low): Rename as Low_Address and convey that the return value is a
2940 runtime reference accounting for a load address.
2941 * libgnat/s-dwalin.adb (Read_Aranges_Entry): Adjust to the
2942 address/offset type changes.
2943 (Aranges_Lookup): Likewise.
2944 (Symbolic_Address): Likewise.
2945 (Symbolic_Traceback): Likewise.
2946 (Dump_Cache): Likewise.
2947 (Is_Inside): Likewise.
2949 (Set_Load_Address): Likewise.
2950 (Low_Address): Likewise, and account for C.Load_Address.
2951 * libgnat/s-trasym__dwarf.adb (Lt): Use Low_Address instead of Low.
2952 (Multi_Module_Symbolic_Traceback): Compare address in traceback
2953 with module Low_Address instead of Low.
2955 2018-05-21 Olivier Hainque <hainque@adacore.com>
2957 * libgnat/s-dwalin.ads (Dwarf_Context): Rename Load_Slide as
2959 * libgnat/s-dwalin.adb (Is_Inside): Adjust accordingly.
2960 (Set_Load_Address): Likewise.
2961 (Symbolic_Traceback): Likewise.
2963 2018-05-21 Olivier Hainque <hainque@adacore.com>
2965 * libgnat/s-trasym__dwarf.adb (Add_Module_To_Cache): Expect a
2966 Load_Address argument and pass it down to Init_Module.
2967 * libgnat/s-tsmona__linux.adb (Build_Cache_For_All_Modules): Pass
2968 lm.l_addr as the Load_Address to Add_Module_To_Cache.
2970 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2972 * einfo.adb (Has_Discriminants): Stronger assertion.
2973 (Set_Has_Discriminants): Stronger assertion.
2974 * sem_ch13.adb (Push_Scope_And_Install_Discriminants): Adapt to respect
2975 the stronger assertion on Has_Discriminant.
2976 (Uninstall_Discriminants_And_Pop_Scope): Same as above.
2977 * sem_util.adb (New_Copy_Tree): Same as above.
2978 * sem_ch7.adb (Generate_Parent_References): Prevent calls to
2979 Has_Discriminant on non-type entities that might happen when the
2980 compiled code has errors.
2981 * sem_ch3.adb (Derived_Type_Declaration): Only call
2982 Set_Has_Discriminant on type entities.
2984 2018-05-21 Arnaud Charlet <charlet@adacore.com>
2986 * exp_unst.adb (Unnest_Subprogram): Unnest all subprograms relevant for
2989 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
2991 * lib.ads: Fix typo in enumeration in comment.
2993 2018-05-21 Ed Schonberg <schonberg@adacore.com>
2995 * sem_attr.adb (Analyze_Attribute, case Scalar_Storage_Order): The
2996 attribute reference is legal within a generic unit when the prefix is a
2997 formal private type.
2999 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
3001 * exp_ch7.adb (Establish_Transient_Scope): Code cleanup. Do not
3002 delegate the secondary stack management when there is no suitable
3003 transient context, and the transient scope was intended to manage the
3004 secondary stack because this causes premature reclamation. Change the
3005 transient scope creation logic by special casing assignment statements
3006 of controlled components for type initialization procedures.
3007 (Find_Node_To_Be_Wrapped): Renamed to Find_Transient_Context. Update
3008 the comment on usage.
3009 (Find_Transient_Context): Change the initinte loop into a while loop.
3010 Iterations schemes and iterator specifications are not valid transient
3011 contexts because they rely on special processing. Assignment statements
3012 are now treated as a normal transient context, special cases are
3013 handled by the caller. Add special processing for pragma Check.
3014 (Is_OK_Construct): Removed. Its functionality has been merged in
3015 routine Find_Transient_Context.
3016 * sem_ch5.adb (Check_Call): Reimplemented. Add code to properly
3017 retrieve the subprogram being invoked. Use a more accurate predicate
3018 (Requires_Transient_Scope) to determine that the function will emply
3019 the secondary stack.
3021 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
3023 * ada_get_targ.adb: Fix subprogram body headers.
3024 * adabkend.adb: Likewise.
3025 * checks.adb: Likewise.
3026 * exp_ch3.adb: Likewise.
3027 * exp_ch5.adb: Likewise.
3028 * exp_ch9.adb: Likewise.
3029 * exp_dist.adb: Likewise.
3030 * exp_tss.adb: Likewise.
3031 * inline.adb: Likewise.
3032 * lib-writ.adb: Likewise.
3033 * lib-xref-spark_specific.adb: Likewise.
3034 * libgnarl/s-osinte__darwin.adb: Likewise.
3035 * libgnarl/s-stusta.adb: Likewise.
3036 * libgnarl/s-taprop__solaris.adb: Likewise.
3037 * libgnarl/s-tposen.adb: Likewise.
3038 * libgnarl/s-vxwext__kernel-smp.adb: Likewise.
3039 * libgnarl/s-vxwext__kernel.adb: Likewise.
3040 * libgnat/a-btgbso.adb: Likewise.
3041 * libgnat/a-cfdlli.adb: Likewise.
3042 * libgnat/a-cfhama.adb: Likewise.
3043 * libgnat/a-cfinve.adb: Likewise.
3044 * libgnat/a-cimutr.adb: Likewise.
3045 * libgnat/a-coboho.adb: Likewise.
3046 * libgnat/a-cofove.adb: Likewise.
3047 * libgnat/a-cofuve.adb: Likewise.
3048 * libgnat/a-comutr.adb: Likewise.
3049 * libgnat/a-exexda.adb: Likewise.
3050 * libgnat/a-tags.adb: Likewise.
3051 * libgnat/a-tideau.adb: Likewise.
3052 * libgnat/a-wtdeau.adb: Likewise.
3053 * libgnat/a-ztdeau.adb: Likewise.
3054 * libgnat/g-alleve.adb: Likewise.
3055 * libgnat/s-excdeb.adb: Likewise.
3056 * libgnat/s-parint.adb: Likewise.
3057 * libgnat/s-shasto.adb: Likewise.
3058 * libgnat/s-traceb__hpux.adb: Likewise.
3059 * prepcomp.adb: Likewise.
3060 * sem_ch4.adb: Likewise.
3061 * sem_ch6.adb: Likewise.
3062 * sem_dist.adb: Likewise.
3063 * sem_prag.adb: Likewise.
3064 * sem_util.adb: Likewise.
3065 * sinfo.adb: Likewise.
3066 * switch.adb: Likewise.
3068 2018-05-04 John Marino <gnugcc@marino.st>
3071 * link.c (BSD platforms): Add missing backslash.
3073 2018-04-27 Eric Botcazou <ebotcazou@adacore.com>
3076 * init.c (__gnat_handle_vms_condition): Add missing parentheses.
3078 2018-04-25 Eric Botcazou <ebotcazou@adacore.com>
3081 * gnat_ugn.texi: Regenerate.
3083 2018-03-23 Eric Botcazou <ebotcazou@adacore.com>
3086 * gnatlink.adb (Gnatlink): Remove handling of -b switch.
3087 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (gnatlink):
3088 Remove documentation of -b switch.
3090 2018-03-23 Eric Botcazou <ebotcazou@adacore.com>
3093 * gnatlink.adb (Process_Args): Drop existing link switches if multiple
3094 switches are passed for --LINK.
3096 2018-03-12 Eric Botcazou <ebotcazou@adacore.com>
3099 * gcc-interface/misc.c (gnat_post_options): Disable string overflow
3102 2018-03-10 Eric Botcazou <ebotcazou@adacore.com>
3104 * gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
3105 Consider only entities for objects.
3107 2018-03-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
3109 * gcc-interface/Makefile.in (OSCONS_CPP): Remove redundant
3111 (OSCONS_EXTRACT): Add $(GNATLIBCFLAGS_FOR_C).
3113 2018-03-06 Eric Botcazou <ebotcazou@adacore.com>
3115 * gcc-interface/trans.c (convert_with_check): Fix typo in the condition
3116 guarding the overflow check emitted for the upper bound of a floating-
3119 2018-03-06 Eric Botcazou <ebotcazou@adacore.com>
3121 * gcc-interface/utils.c (def_builtin_1): Bail out on error_mark_node.
3123 2018-02-28 Eric Botcazou <ebotcazou@adacore.com>
3125 * libgnat/i-cexten.ads (Float_128): New type.
3127 2018-02-02 Eric Botcazou <ebotcazou@adacore.com>
3129 * gcc-interface/decl.c (array_type_has_nonaliased_component): Return
3130 false if the component type is a pointer.
3132 2018-01-11 Gary Dismukes <dismukes@adacore.com>
3134 * exp_ch3.adb (Default_Initialize_Object): Call New_Copy_Tree on the
3135 result of Get_Simple_Init_Value and pass the source location of the
3136 object declaration's object_definition.
3138 2018-01-11 Ed Schonberg <schonberg@adacore.com>
3140 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration): Handle
3141 properly object declarations with initializations that are
3142 build-in-place function calls, when there is an address specification,
3143 either as an aspect specification or an explicit attribute
3144 specification clause, for the initialized object.
3145 * freeze.adb (Check_Address_Clause): Do not remove side-effects from
3146 initial expressions in the case of a build-in-place call.
3148 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
3150 * sem_eval.adb (Is_Null_Range): Retrieve the full view when called on a
3151 private (sub)type; refactor to avoid early return statement.
3152 (Not_Null_Range): Same as above.
3154 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3156 * freeze.adb (Freeze_Entity): Ensure that a Ghost type is not
3157 concurrent, nor effectively volatile.
3158 * ghost.adb (Check_Ghost_Type): New routine.
3159 * ghost.ads (Check_Ghost_Type): New routine.
3160 * sem_util.adb (Is_Declaration): Reimplemented. The routine can now
3161 consider specific subsets of declarations.
3162 (Is_Declaration_Other_Than_Renaming): Removed. Its functionality is
3163 replicated by Is_Declaration.
3164 * sem_util.ads (Is_Declaration): New parameter profile. Update the
3166 (Is_Declaration_Other_Than_Renaming): Removed.
3168 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3170 * sem_ch5.adb (Analyze_Assignment): Assignments to variables that act
3171 as Part_Of consituents of single protected types are illegal when they
3172 take place inside a protected function.
3173 (Diagnose_Non_Variable_Lhs): Use Within_Function to check for an
3175 (Is_Protected_Part_Of_Constituent): New routine.
3176 (Within_Function): New routine.
3178 2018-01-11 Arnaud Charlet <charlet@adacore.com>
3180 Bump copyright notices to 2018.
3182 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3184 * binde.adb, par-ch6.adb, par-ch9.adb, sem_ch12.adb, sem_ch13.adb:
3187 2018-01-11 Justin Squirek <squirek@adacore.com>
3189 * par-ch6.adb (Scan_Body_Or_Expression_Function): Add additional check
3190 to make sure a given expression function is properly parenthesized.
3192 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3194 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Check the
3195 categorization of a subprogram body which does not complete a previous
3198 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3200 * sem_ch10.adb (Check_Private_Child_Unit): Ensure that the enclosing
3201 scope of package Ada is Standard.
3203 2018-01-11 Ed Schonberg <schonberg@adacore.com>
3205 * sem_ch13.adb (Replace_Type_Ref): Handle properly reference to a
3206 subcomponent of the current entity when building the body for a dynamic
3207 predicate function for a record with composite subcomponents.
3209 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3211 * exp_aggr.adb (Convert_Aggr_In_Object_Decl): Update the call to
3212 Establish_Transient_Scope.
3213 (Convert_To_Assignments): Update the call to Establish_Transient_Scope.
3214 (Expand_Array_Aggregate): Update the call to Establish_Transient_Scope.
3215 * exp_ch6.adb (Expand_Call_Helper): Update the call to
3216 Establish_Transient_Scope.
3217 (Make_Build_In_Place_Call_In_Object_Declaration): Update the call to
3218 Establish_Transient_Scope.
3219 * exp_ch7.adb (Establish_Transient_Scope): Restructured. Delegate the
3220 management of the secondary stack to an enclosing scope if there is no
3221 suitable construct to wrap, and the transient scope was intended to
3222 manage the secondary stack.
3223 (Find_Node_To_Be_Wrapped): Restructured. A case_statement_alternative
3224 is a valid boundary for a transient expression which comes from the
3225 statements of the alternative, otherwise alternatives cannot be
3226 wrapped. Assignments of controlled objects which have controlled
3227 actions suppressed now stop the traversal as there is no point in
3228 looking for an enclosing construct. Add several N_xxx_Body choices to
3229 the termination conditions for completeness.
3230 * exp_ch7.ads (Establish_Transient_Scope): Update the parameter profile
3231 and the associated comment on usage.
3232 * exp_smem.adb (Add_Shared_Var_Lock_Procs): Update the call to
3233 Establish_Transient_Scope.
3234 (Add_Write_After): Update the call to Establish_Transient_Scope.
3235 * sem_res.adb (Check_Initialization_Call): Removed.
3236 (Resolve_Actuals): Account for additional cases where finalization
3237 actions are required by utilizing predicate Needs_Finalization rather
3239 (Resolve_Call): Type initialization procedures can now utilize
3240 transient scopes to manage the secondary stack, thus preventing leaks
3241 during initialization. Remove the previous kludgy algorithm which
3242 attempts to manage the secondary stack at the object creation site.
3244 2018-01-11 Jerome Lambourg <lambourg@adacore.com>
3246 * libgnat/g-soliop__qnx.ads: New.
3247 * adaint.c, adaint.h, cstreams.c, s-oscons-tmplt.c, sysdep.c: Update
3250 2018-01-11 Bob Duff <duff@adacore.com>
3252 * par-ch9.adb (P_Protected_Operation_Declaration_Opt): Give an error if
3253 a null procedure occurs in a protected definition.
3255 2018-01-11 Bob Duff <duff@adacore.com>
3257 * binderr.ads, namet.ads: Minor reformatting.
3259 2018-01-11 Bob Duff <duff@adacore.com>
3261 * doc/gnat_ugn/gnat_utility_programs.rst: Improve documentation of
3264 2018-01-11 Bob Duff <duff@adacore.com>
3266 * binde.adb (Force_Elab_Order): Give an error if there are duplicate
3269 2018-01-11 Ed Schonberg <schonberg@adacore.com>
3271 * sem_ch6.adb (Freeze_Expr_Types): If an access value is the
3272 controlling argument of a dispatching call. freeze the corresponding
3275 2018-01-11 Ben Brosgol <brosgol@adacore.com>
3277 * doc/Makefile: Add Sphinx option -W to treat warnings as errors.
3279 2018-01-11 Ben Brosgol <brosgol@adacore.com>
3281 * doc/gnat_rm/implementation_defined_aspects.rst: Minor type/wording
3283 * gnat_rm.texi: Regenerate.
3285 2018-01-11 Ed Schonberg <schonberg@adacore.com>
3287 * sem_ch12.adb (Check_Fixed_Point_Type): Do not apply check if the
3288 formsl type corresponding to the actual fixed point type is private,
3289 because in this case there can be no suspicious arithmetic operations
3290 in the generic unless they reference a formal subprogram. Clarify
3293 2018-01-11 Javier Miranda <miranda@adacore.com>
3295 * exp_util.adb (Remove_Side_Effects): No action done for functions
3296 returning class-wide types since it requires generating code using
3297 'reference and the CCG target has no secondary stack.
3298 * gnat1drv.adb: Disable building static dispatch tables when generating
3301 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
3303 * libgnat/a-direio.ads, libgnat/a-sequio.ads, libgnat/a-ststio.ads,
3304 libgnat/a-textio.ads, libgnat/a-witeio.ads, libgnat/a-ztexio.ads
3305 (File_Type): Add Default_Initial_Condition aspect.
3307 2018-01-11 Pascal Obry <obry@adacore.com>
3309 * libgnat/s-os_lib.adb (Normalize_Pathname): New implementation.
3311 2018-01-11 Bob Duff <duff@adacore.com>
3313 * doc/gnat_ugn/gnat_utility_programs.rst: Rewrite gnatpp documentation
3314 to match what the Libadalang-based version does.
3315 * doc/gnat_ugn/about_this_guide.rst: Update reference.
3317 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3319 * sem_res.adb (Uses_SS): A controlled type requires the secondary stack
3320 if it contains at least one component declaration employing a function
3321 call returning on the secondary stack.
3323 2018-01-11 Yannick Moy <moy@adacore.com>
3325 * doc/gnat_rm/standard_and_implementation_defined_restrictions.rst:
3326 Update description of restriction SPARK_05 with SPARK 2014.
3327 * gnat_rm.texi: Regenerate.
3329 2018-01-11 Vasiliy Fofanov <fofanov@adacore.com>
3331 * doc/gnat_ugn/gnat_utility_programs.rst: Fix layout.
3333 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3335 * exp_aggr.adb, exp_ch9.adb, exp_util.adb, sem_aggr.adb, sem_ch3.adb,
3336 sem_res.adb, sem_util.adb: Minor reformatting.
3338 2018-01-11 Ed Schonberg <schonberg@adacore.com>
3340 * sem_prag.adb (Analyze_Pragma, case Predicate): Indicate that the type
3341 has a delayed aspect which must be processed at the point the type is
3342 frozen. This mimics what is done when the predicate is provided by a
3345 2018-01-11 Doug Rupp <rupp@adacore.com>
3347 * init.c (vxworks): Add macro checks for __aarch64__.
3349 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3351 * exp_util.adb (Add_Failure_Expression): New routine.
3352 (Make_Predicate_Check): Reimplement the handling of Predicate_Failure.
3353 * sem_util.adb (Is_Current_Instance): Code cleanup.
3355 2018-01-11 Patrick Bernardi <bernardi@adacore.com>
3357 * libgnat/s-parame*.adb, libgnat/s-parame*.ads: Remove unneeded
3358 Default_Sec_Stack_Size.
3359 * libgnat/s-secsta.adb (SS_Allocate): Handle the fixed secondary stack
3360 limit check so that the integer index does not overflow. Check the
3361 dynamic stack allocation does not cause the secondary stack pointer to
3363 (SS_Info): Align colons.
3364 (SS_Init): Cover the case when bootstraping with an old compiler that
3365 does not set Default_SS_Size.
3367 2018-01-11 Ed Schonberg <schonberg@adacore.com>
3369 * sem_ch3.adb (Add_Internal_Interface_Entities): When checking the
3370 legality of an inherited operation that may require overriding, ignore
3371 primitive_wrappers that correspond to explicit operations that override
3372 an interface primitive.
3373 * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity): If the
3374 operation to which the class-wide expression applies is a protected op.
3375 with a primitive_wrapper, verify that the updated inherited expression
3376 does not contain an internal call to a protected function. This
3377 completes the implementation of AI12-0166.
3379 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3381 * ali.adb: Document the remaining letters available for ALI lines.
3382 (Scan_ALI): A with clause is internal when it is encoded on a 'Z' line.
3383 * ali.ads: Update type With_Record. Field
3384 Implicit_With_From_Instantiation is no longer in use. Add field
3386 * csinfo.adb (CSinfo): Remove the setup for attribute
3387 Implicit_With_From_Instantiation.
3388 * lib-writ.adb (Collect_Withs): Correct the logic which marks a unit as
3389 either implicitly or explicitly withed.
3390 (Is_Implicit_With_Clause): New routine.
3391 (Write_ALI): Rename array Implicit_With to Has_Implicit_With to avoid
3392 confusion with the with clause attribute by the same name.
3393 (Write_With_Lines): Update the emission of 'W', 'Y', and 'Z' headers.
3394 * rtsfind.adb (Maybe_Add_With): Code cleanup.
3395 * sem_ch8.adb (Present_System_Aux): Code cleanup.
3396 * sem_ch10.adb (Expand_With_Clause): Mark the with clause as generated
3398 (Implicit_With_On_Parent): Mark the with clause as generated for a
3400 * sem_ch12.adb (Inherit_Context): With clauses inherited by an
3401 instantiation are no longer marked as Implicit_With_From_Instantiation
3402 because they are already marked as implicit.
3403 * sem_elab.adb (Ensure_Prior_Elaboration_Static): Remove the kludge
3404 which marks implicit with clauses as related to an instantiation.
3405 * sinfo.adb (Implicit_With_From_Instantiation): Removed.
3406 (Parent_With): New routine.
3407 (Set_Implicit_With_From_Instantiation): Removed.
3408 (Set_Parent_With): New routine.
3409 * sinfo.ads: Update the documentation of attribute Implicit_With.
3410 Remove attribute Implicit_With_From_Instantiation along with
3411 occurrences in nodes. Add attribute Parent_With along with occurrences
3413 (Implicit_With_From_Instantiation): Removed along with pragma Inline.
3414 (Parent_With): New routine along with pragma Inline.
3415 (Set_Implicit_With_From_Instantiation): Removed along with pragma Inline.
3416 (Set_Parent_With): New routine along with pragma Inline.
3418 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3420 * sem_util.adb (Find_Enclosing_Scope): Return the unique defining
3421 entity when the enclosing construct is a body.
3423 2018-01-11 Patrick Bernardi <bernardi@adacore.com>
3425 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Simplified
3426 Secondary_Stack_Size handling as a pragma is now generated for the
3427 corresponding aspect instead of an attribute. Pragma expression is
3428 relocated instead of evaluated. Discriminant of the corresponding
3429 record type is referenced rather than the type discriminant.
3430 (Create_Secondary_Stack_For_Task, Make_Task_Create_Call): Update
3431 Secondary_Stack_Size rep item checks to only look for the pragma rep.
3432 * sem_ch13.adb (Analyze_One_Aspect): Transform
3433 Aspect_Secondary_Stack_Size into a pragma instead of an attribute
3434 because the attribute does not have visibility on a task type's
3435 discriminants when the type's definition is expanded.
3436 (Analyze_Attribute_Definition_Clause): Remove handling of
3437 Attribute_Secondary_Stack_Size.
3438 * snames.adb-tmpl, snames.ads-tmpl: Remove
3439 Attribute_Secondary_Stack_Size, no longer used.
3441 2018-01-11 Justin Squirek <squirek@adacore.com>
3443 * sem_ch8.adb: Minor comment fix.
3445 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3447 * exp_ch4.adb (Process_Action): Do not abandon the inspection of an
3448 individual action because the action may denote a complex expression,
3449 such as a case statement, which in turn may contain additional
3452 2018-01-11 Ed Schonberg <schonberg@adacore.com>
3454 * sem_aggr.adb (Resolve_Iterated_Component_Association): Perform
3455 analysis on a copy of the expression with a copy of the index variable,
3456 because full expansion will rewrite construct into a loop with the
3457 original loop variable.
3458 * exp_aggr.adb (Gen_Assign): Defer analysis and resolution if the
3459 expression is an iterated component association. Full analysis takes
3460 place when construct is rewritten as a loop.
3461 (In_Place_Assign_OK, Safe_Component): An iterated_component_association
3462 is not safe for in-place assignment.
3463 * sem_util.adb (Remove_Entity): Handle properly the case of an isolated
3464 entity with no homonym and no other entity in the scope.
3466 2018-01-11 Justin Squirek <squirek@adacore.com>
3468 * sem_prag.adb (Analyze_Pragma:Pragma_Loop_Variant): Modify error
3469 message to be printed on the pragma argument identifier.
3471 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
3473 * exp_util.adb (Build_Invariant_Procedure_Declaration): Set the last
3474 entity of the generated invariant procedure in order to construct a
3475 proper entity chain.
3477 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
3479 * sem_ch13.adb (Build_Predicate_Functions): Fix minor issues in
3482 2018-01-11 Arnaud Charlet <charlet@adacore.com>
3484 * einfo.ads, einfo.adb (Activation_Record_Component,
3485 Set_Activation_Record_Component, Set_Is_Uplevel_Referenced_Entity):
3486 Allow E_Discriminant.
3488 2018-01-10 Eric Botcazou <ebotcazou@adacore.com>
3490 * gcc-interface/decl.c (gnat_to_gnu_component_type): Apply the check
3491 for atomic access once the component size is taken into account and
3492 also do it if the component type is Atomic or Volatile_Full_Access.
3494 2018-01-04 Eric Botcazou <ebotcazou@adacore.com>
3496 * gnatvsn.ads: Bump copyright year.
3498 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3499 Alan Hayward <alan.hayward@arm.com>
3500 David Sherwood <david.sherwood@arm.com>
3502 * gcc-interface/misc.c (enumerate_modes): Treat GET_MODE_BITSIZE
3505 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3506 Alan Hayward <alan.hayward@arm.com>
3507 David Sherwood <david.sherwood@arm.com>
3509 * gcc-interface/misc.c (enumerate_modes): Treat GET_MODE_PRECISION
3512 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3513 Alan Hayward <alan.hayward@arm.com>
3514 David Sherwood <david.sherwood@arm.com>
3516 * gcc-interface/utils.c (gnat_types_compatible_p): Handle
3517 polynomial TYPE_VECTOR_SUBPARTS.
3519 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
3520 Alan Hayward <alan.hayward@arm.com>
3521 David Sherwood <david.sherwood@arm.com>
3523 * gcc-interface/misc.c (enumerate_modes): Handle polynomial
3526 2018-01-03 Jakub Jelinek <jakub@redhat.com>
3528 Update copyright years.
3530 * gnat_ugn.texi: Bump @copying's copyright year.
3531 * gnat_rm.texi: Likewise.
3533 Copyright (C) 2018 Free Software Foundation, Inc.
3535 Copying and distribution of this file, with or without modification,
3536 are permitted in any medium without royalty provided the copyright
3537 notice and this notice are preserved.