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