80d119d87c798c4833e5579959b990afd6713a3f
[gcc.git] / gcc / ada / ChangeLog
1 2018-09-26 Hristian Kirtchev <kirtchev@adacore.com>
2
3 * sem_ch12.adb (Instantiate_Package_Body): Capture and restore
4 the full compilation context.
5 (Instantiate_Subprogram_Body): Capture and restore the full
6 compilation context.
7
8 2018-09-26 Yannick Moy <moy@adacore.com>
9
10 * debug.adb: Add use for -gnatd_f switch.
11 * inline.adb (Cannot_Inline): Only issue info message for
12 failure to inline in GNATprove mode when switch -gnatd_f is
13 used.
14
15 2018-09-26 Javier Miranda <miranda@adacore.com>
16
17 * exp_disp.adb (Expand_Interface_Conversion): No displacement of
18 the pointer needed when the type of the operand is an interface
19 type that maches the target type and we are compiling under
20 configurable runtime. Adding also documentation explaining why
21 this cannot be done when compiling with the full runtime.
22 * exp_intr.adb: Update comment.
23
24 2018-09-26 Hristian Kirtchev <kirtchev@adacore.com>
25
26 * sem_ch5.adb (Wrap_Loop_Statement): Annotate as No_Return.
27
28 2018-09-26 Ed Schonberg <schonberg@adacore.com>
29
30 * exp_util.adb (Make_Predicate_Call): Use OK_Convert_To when
31 applying a predicate check to prevent spurious errors when
32 private ancestors are involved.
33
34 2018-09-26 Hristian Kirtchev <kirtchev@adacore.com>
35
36 * exp_ch4.adb (Expand_N_Allocator): Ensure that the use of the
37 secondary stack does not clash with restriction
38 No_Secondary_Stack.
39 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Ensure that
40 the use of the secondary stack does not clash with restriction
41 No_Secondary_Stack.
42 * sem_ch5.adb (Analyze_Loop_Statement): Wrap the loop in a block
43 prior to analysis in order to either provide a local scope for
44 an iterator, or ensure that the secondary stack is properly
45 managed.
46 (Check_Call): Account for the case where the tree may be
47 unanalyzed or contain prior errors.
48 (Has_Call_Using_Secondary_Stack): Renamed to Has_Sec_Stack_Call.
49 Update all uses of the subprogram.
50 (Prepare_Loop_Statement): New routine.
51
52 2018-09-26 Javier Miranda <miranda@adacore.com>
53
54 * sem_res.adb (Resolve_Actuals): If the formal is a class-wide
55 type conversion then do not skip resolving and expanding the
56 conversion; required to displace the pointer to the object and
57 reference the dispatch table associated with the target
58 interface type.
59
60 2018-09-26 Hristian Kirtchev <kirtchev@adacore.com>
61
62 * libgnat/g-dynhta.adb (Prepend_Or_Replace): Update the number
63 of key-value pairs in the hash table only when adding a brand
64 new pair.
65
66 2018-09-26 Sergey Rybin <rybin@adacore.com>
67
68 * doc/gnat_ugn/gnat_utility_programs.rst: Add note about
69 processing of aggregate projects in gnatmetric and gnatstub.
70
71 2018-09-26 Hristian Kirtchev <kirtchev@adacore.com>
72
73 * contracts.adb, exp_unst.adb, exp_util.adb, gnat1drv.adb,
74 opt.ads, par-prag.adb, sem_ch3.adb, sem_ch5.adb, sem_prag.adb,
75 sinfo.ads, snames.ads-tmpl: Minor reformatting.
76
77 2018-09-26 Hristian Kirtchev <kirtchev@adacore.com>
78
79 * gcc-interface/Make-lang.in: Add unit GNAT.Sets to the list of
80 front end sources.
81 * impunit.adb: Add unit GNAT.Sets to the list of predefined
82 units.
83 * Makefile.rtl: Add unit GNAT.Sets to the list of non-tasking
84 units.
85 * libgnat/g-sets.adb: New unit.
86 * libgnat/g-sets.ads: New unit.
87 * libgnat/g-dynhta.adb (Minimum_Size): Decrease to 8 in order to
88 allow for small sets. Update all occurrences of Table_Locked to
89 Iterated.
90 (Ensure_Unlocked): Query the number of iterators.
91 (Find_Node): Use the supplied equality.
92 (Is_Empty): New routine.
93 (Lock): Update the number of iterators.
94 (Prepend_Or_Replace): Use the supplied equality.
95 (Size): Update the return type.
96 (Unlock): Update the number of iterators.
97 * libgnat/g-dynhta.ads: Update all occurrences of Table_Locked
98 to Iterated. Rename formal subprogram Equivalent_Keys to "=".
99 (Bucket_Range_Type, Pair_Count_Type): Remove types.
100 (Not_Created, Table_Locked, Iterator_Exhausted): Remove
101 exceptions.
102 (Hash_Table): Update to store the number of iterators rather
103 than locks.
104 (Is_Empty): New routine.
105 (Size): Update the return type.
106 * libgnat/g-lists.adb: Update all occurrences of List_Locked to
107 Iterated.
108 (Ensure_Unlocked): Query the number of iterators.
109 (Length): Remove.
110 (Lock): Update the number of iterators.
111 (Size): New routine.
112 (Unlock): Update the number of iterators.
113 * libgnat/g-lists.ads: Update all occurrences of List_Locked to
114 Iterated.
115 (Element_Count_Type): Remove type.
116 (Not_Created, Table_Locked, Iterator_Exhausted): Remove
117 exceptions.
118 (Linked_List): Update type to store the number of iterators
119 rather than locks.
120 (Length): Remove.
121 (Size): New routine.
122 * libgnat/gnat.ads (Bucket_Range_Type): New type.
123 (Iterated, Iterator_Exhausted, and Not_Created): New exceptions.
124
125 2018-09-26 Javier Miranda <miranda@adacore.com>
126
127 * checks.adb (Install_Null_Excluding_Check): Do not add
128 null-excluding checks when the tree may not be fully decorated.
129 This patch cascade errors.
130
131 2018-09-26 Gary Dismukes <dismukes@adacore.com>
132
133 * sem_ch3.adb (Analyze_Object_Declaration): Remove test for
134 Comes_From_Source, which prevented implicit conversions from
135 being applied to anonymous access-to-subprogram formals in
136 constant declartions that arise from instance associations for
137 generic formal objects. Add RM and AARM references to comment.
138
139 2018-09-26 Olivier Hainque <hainque@adacore.com>
140
141 * opt.ads (OpenAcc_Enabled): New flag. False by default. True
142 when OpenACC pragmas are requested to be honored, when -fopenacc
143 is found on the command line.
144 * back_end.adb (Scan_Compiler_Arguments): Set OpenACC_Enabled if
145 -fopenacc is seen on the command line.
146 * sinfo.adb, sinfo.ads (Is_OpenAcc_Environment): New
147 flag/predicate on Loop statements which embed an Acc_Kernels,
148 Acc_Parallel or Acc_Data pragma.
149 (Is_OpenAcc_Loop): New flag/predicate on Loop statements which
150 embed an Acc_Loop pragma.
151 (Set_Is_OpenAcc_Environment, Set_Is_OpenAcc_Loop): Setters for
152 the new flags.
153 * par-prag.adb (Prag): Handle Acc_Data, Acc_Loop, Acc_Parallel
154 and Acc_Kernels pragmas. Nothing to do here, all handled by
155 sem_prag.
156 * sem_prag.adb (Acc_First, Acc_Next,
157 Validate_Acc_Condition_Clause, Validate_Acc_Data_Clause,
158 Validate_Acc_Int_Expr_Clause, Validate_Acc_Int_Expr_List_Clause,
159 Validate_Acc_Loop_Collapse, Validate_Acc_Loop_Gang,
160 Validate_Acc_Loop_Vector, Validate_Acc_Loop_Worker,
161 Validate_Acc_Name_Reduction, Validate_Acc_Size_Expressions): New
162 helper for Analyze_Pragma, to handle OpenACC pragmas.
163 (Analyze_Pragma): Handle Acc_Data, Acc_Loop, Acc_Parallel and
164 Acc_Kernels pragmas.
165 * sem_ch5.adb (Disable_Constant): Unset Is_True_Constant on
166 variable entity, action for ...
167 (Disable_Constants): Helper for Analyze_Loop_Statement, to ...
168 (Analyze_Loop_Statement): Disable True_Constant on variables
169 referenced within an OpenACC environment.
170 * snames.ads-tmpl: Declare Name_Ids for the OpenACC directives
171 and clauses we can handle. Remove an exraneous whitespace before
172 columns, preventing line length overflow in the generated spec
173 with Ids now reaching beyond 999.
174 * doc/gnat_rm/implementation_defined_pragmas.rst: Document
175 pragma Acc_Parallel, Acc_Loop, Acc_Kernels and Acc_Data.
176 * gnat_rm.texi: Regenerate.
177
178 2018-09-26 Ed Schonberg <schonberg@adacore.com>
179
180 * sem_ch3.adb (Is_Onown_Limited): A derived type whose parent P
181 is a derived limited record is not itself limited if P is a
182 derived limited interface.
183
184 2018-09-26 Eric Botcazou <ebotcazou@adacore.com>
185
186 * sem_ch7.adb (Has_Referencer): Remove Top_Level parameter and
187 add In_Nested_Instance and
188 Has_Outer_Referencer_Of_Non_Subprograms parameters. Rename
189 Has_Non_Subprograms_Referencer variable into
190 Has_Referencer_Of_Non_Subprograms and initialize it with the new
191 third parameter. Adjust recursive calls and to the renaming.
192 Replace test on Top_Level with test on In_Nested_Instance to
193 decide whether to clear the Is_Public flag on entities.
194 (Hide_Public_Entities): Adjust call to Has_Referencer.
195
196 2018-09-26 Eric Botcazou <ebotcazou@adacore.com>
197
198 * exp_disp.adb (Expand_Interface_Conversion): Use Present test.
199 (Expand_Interface_Thunk): Propagate debug info setting from
200 target.
201 * exp_util.ads (Find_Interface_Tag): Adjust comment.
202 * exp_util.adb (Find_Interface_Tag): Remove assertions of
203 success.
204 * sem_util.adb (Is_Variable_Size_Record): Only look at
205 components and robustify the implementation.
206 * fe.h (Find_Interface_Tag): Declare.
207 (Is_Variable_Size_Record): Likewise.
208
209 2018-09-26 Thomas Quinot <quinot@adacore.com>
210
211 * exp_util.adb (Make_CW_Equivalent_Type): Propagate bit order
212 and scalar storage order from root type to classwide equivalent
213 type, to prevent rejection of the equivalent type by the
214 freezing circuitry.
215
216 2018-09-26 Justin Squirek <squirek@adacore.com>
217
218 * sem_ch5.adb (Analyze_Iterator_Specification): Add conditional
219 to freeze called functions within iterator specifications during
220 full analysis.
221 (Preanalyze_Range): Minor typo fix.
222
223 2018-09-26 Ed Schonberg <schonberg@adacore.com>
224
225 * sem_ch6.adb (Analyze_Function_Return): If the return type has
226 a dynamic_predicate, apply a Predicate_Check to the expression,
227 given that it is implicitly converted to the return type.
228 Exclude case expressions from the check, because in this context
229 the expression is expanded into individual return statements.
230
231 2018-09-26 Eric Botcazou <ebotcazou@adacore.com>
232
233 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Task_Type>: In
234 -gnatct mode, process the discriminants only for a definition.
235
236 2018-09-26 Eric Botcazou <ebotcazou@adacore.com>
237
238 * repinfo.adb (List_Record_Layout): Be prepared for JSON output.
239 (List_Record_Info): Use the flat representation for record
240 subtypes in the JSON format.
241
242 2018-09-26 Justin Squirek <squirek@adacore.com>
243
244 * lib-writ.adb, lib-writ.ads (Write_With_Lines): Add
245 documentation and an extra conditional check for RCI units so
246 that generated ali files will list the spec only instead of a
247 body when a body is not found.
248
249 2018-09-26 Eric Botcazou <ebotcazou@adacore.com>
250
251 * gcc-interface/gigi.h (error_gnat_node): Delete.
252 * gcc-interface/trans.c (error_gnat_node): Likewise.
253 (gigi): Replace it with Current_Error_Node.
254 (gnat_to_gnu): Likewise.
255 * gcc-interface/utils.c (rest_of_subprog_body_compilation):
256 Likewise.
257 * gcc-interface/misc.c (internal_error_function): Do not set it.
258
259 2018-09-26 Eric Botcazou <ebotcazou@adacore.com>
260
261 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Adjust
262 code retrieving the address when a clause has already been
263 processed.
264 * gcc-interface/trans.c (gnat_to_gnu)
265 <N_Attribute_Definition_Clause>: For an object with a Freeze
266 node, build a meaningful expression.
267
268 2018-09-26 Arnaud Charlet <charlet@adacore.com>
269
270 * gnat1drv.adb (Adjust_Global_Switches): -gnatd_A sets
271 Opt.Disable_ALI_File.
272 * debug.adb: Update debug flags documentation.
273
274 2018-09-26 Ed Schonberg <schonberg@adacore.com>
275
276 * contracts.adb (Analyze_Entry_Or_Subprogram_Contract): The
277 analysis of preconditions specified by pragmas (rather than
278 aspects) is not delayed, and therefore expressions functions
279 that are completions do not need special handling during
280 expansion.
281
282 2018-09-26 Ed Schonberg <schonberg@adacore.com>
283
284 * exp_unst.adb: Fix handling of up level references for entries.
285
286 2018-09-26 Ed Schonberg <schonberg@adacore.com>
287
288 * contracts.adb (Expand_Subprogram_Contract,
289 Process_Preconditions_For): Apply Freeze_Expr_Types to the
290 expression for a precondition of an expression function that is
291 a completion, when the completion appears in the private part
292 and the declaration it completes is in the visible part of the
293 same package.
294 * freeze.adb (Freeze_Expr_Types): Do not establish the scope of
295 the operation if it is already installed, as will be the case
296 when called to analyze the contract oc the subprogram (which
297 happens when generating code inside the subprogram body).
298
299 2018-09-26 Maroua Maalej <maalej@adacore.com>
300
301 * sem_spark.adb (Check_Param_In, Setup_Parameter_Or_Global):
302 Change the operation associated to assigning to an IN parameter.
303 In SPARK, IN access-to-variable is an observe operation for a
304 function, and borrow operation for a procedure.
305
306 2018-09-26 Arnaud Charlet <charlet@adacore.com>
307
308 * vxlink.adb: Minor reformatting.
309
310 2018-09-26 Gary Dismukes <dismukes@adacore.com>
311
312 * exp_ch9.adb, layout.adb, sem_attr.adb, sem_res.adb: Fix
313 miscellaneous typos.
314
315 2018-09-26 Jerome Lambourg <lambourg@adacore.com>
316
317 * vxlink.adb: Kill a CodePeer warning.
318
319 2018-09-24 Eric Botcazou <ebotcazou@adacore.com>
320
321 PR ada/87396
322 * fe.h (Get_Attribute_Definition_Clause): Use 'unsigned char' instead
323 of 'char' as the type of the second parameter.
324
325 2018-09-13 Eric Botcazou <ebotcazou@adacore.com>
326
327 * Makefile.rtl (arm% linux-gnueabi%): Always set EH_MECHANISM to -arm.
328
329 2018-09-13 Eric Botcazou <ebotcazou@adacore.com>
330
331 PR ada/81103
332 * terminals.c: Do not include termio.h.
333
334 2018-08-27 Martin Liska <mliska@suse.cz>
335
336 * gcc-interface/decl.c (update_profile): Use new function
337 fndecl_built_in_p and remove check for FUNCTION_DECL if
338 possible.
339 * gcc-interface/gigi.h (call_is_atomic_load): Likewise.
340 * gcc-interface/utils.c (gnat_pushdecl): Likewise.
341
342 2018-08-23 Giuliano Belinassi <giuliano.belinassi@usp.br>
343
344 * exp_unst.ads: Fix typo 'exapnded' to 'expanded'.
345
346 2018-08-21 Hristian Kirtchev <kirtchev@adacore.com>
347
348 * checks.adb, contracts.adb, exp_aggr.adb, exp_attr.adb,
349 exp_ch6.adb, exp_ch7.adb, exp_ch9.adb, exp_unst.adb,
350 exp_util.adb, freeze.adb, gnatlink.adb, layout.adb,
351 lib-writ.adb, lib-xref-spark_specific.adb, sem_ch13.adb,
352 sem_ch3.adb, sem_ch6.adb, sem_res.adb, sem_util.adb, sinfo.ads,
353 sprint.adb: Minor reformatting.
354
355 2018-08-21 Jerome Lambourg <lambourg@adacore.com>
356
357 * vxlink-bind.adb, vxlink-bind.ads, vxlink-link.adb,
358 vxlink-link.ads, vxlink-main.adb, vxlink.adb, vxlink.ads: Add a
359 new tool vxlink to handle VxWorks constructors in DKMs.
360 * gcc-interface/Makefile.in: add rules to build vxlink
361
362 2018-08-21 Ed Schonberg <schonberg@adacore.com>
363
364 * sem_ch6.adb (Analyze_Subprogram_Body_Helper, Mask_Type):
365 Refine the handling of freezing types for expression functions
366 that are not completions, when analyzing the generated body for
367 the function: the body is inserted at the end of the enclosing
368 declarative part, and its analysis may freeze types declared in
369 the same scope that have not been frozen yet.
370
371 2018-08-21 Ed Schonberg <schonberg@adacore.com>
372
373 * sem_ch6.adb: Remove Freeze_Expr_Types.
374 * freeze.ads, freeze.adb (Freeze_Expr_Types): Moved from
375 sem_ch6.adb, and extended to handle other expressions that may
376 contain unfrozen types that must be frozen in their proper
377 scopes.
378 * contracts.adb (Analyze_Entry_Or_Subprogram_Contract): If the
379 contract is for the generated body of an expression function
380 that is a completion, traverse the expressions for pre- and
381 postconditions to freeze all types before adding the contract
382 code within the subprogram body.
383
384 2018-08-21 Hristian Kirtchev <kirtchev@adacore.com>
385
386 * sem_ch10.adb: Remove the with and use clause for unit Ghost.
387 (Analyze_With_Clause): Do not mark a with clause which mentions
388 an ignored Ghost code for elimination.
389
390 2018-08-21 Javier Miranda <miranda@adacore.com>
391
392 * lib-writ.adb (Write_Unit_Information): Handle pragmas removed
393 by the expander.
394
395 2018-08-21 Ed Schonberg <schonberg@adacore.com>
396
397 * sem_ch6.adb (Check_Synchronized_Overriding): The conformance
398 between an overriding protected operation and the overridden
399 abstract progenitor operation requires subtype conformance;
400 requiring equality of return types in the case of a function is
401 too restrictive and leads to spurious errors when the return
402 type is a generic actual.
403
404 2018-08-21 Ed Schonberg <schonberg@adacore.com>
405
406 * exp_ch9.adb (Expand_N_Timed_Entry_Call,
407 Expand_Conditional_Entry_Call): Use Reset_Scopes_Of to set
408 properly the scope of all entities created in blocks generated
409 by the expansion of these constructs.
410
411 2018-08-21 Ed Schonberg <schonberg@adacore.com>
412
413 * sem_ch13.adb (Build_Predicate_Functioss): Apply
414 Reset_Quantified_Variables_Scope after predicate function has
415 been analyzed, so that the scope can be reset on the generated
416 loop statements that have replaced the quantified expressions.
417
418 2018-08-21 Bob Duff <duff@adacore.com>
419
420 * einfo.ads, einfo.adb (Private_View, Shadow_Entities): Remove
421 obsolete code.
422
423 2018-08-21 Maroua Maalej <maalej@adacore.com>
424
425 * sem_spark.adb (Check_Call_Statement): Check global and formal
426 parameter permissions at call sites.
427 (Check_Callable_Body): Assume permissions on globals and
428 parameters depending on their modes then analyse the body
429 operations.
430 (Check_Declaration): Consider both deep (including elementary
431 access) object declarations and normal variables. First check
432 whether the deep object is of Ownership Aspec True or not, then,
433 depending on its initialization, assign the appropriate state.
434 Check related to non access type variables deal with
435 initialization value permissions.
436 (Check_Expression): Check nodes used in the expression being
437 analyzed.
438 (Check_Globals): Call by Check_Call_Statement to perform the
439 check on globals.
440 (Check_List): Call Check_Node on each element of the list.
441 (Check_Loop_Statement): Check the Iteration_Scheme and loop
442 statements.
443 (Check_Node): Main traversal procedure to check safe pointer usage.
444 (Check_Package_Body): Check subprogram's body.
445 (Check_Param_In): Take a formal and an actual parameter and
446 Check the permission of every in-mode parameter.
447 (Check_Param_Out): Take a formal and an actual parameter and
448 check the state of out-mode and in out-mode parameters.
449 (Check_Statement): Check statements other than procedure call.
450 (Get_Perm, Get_Perm_Or_Tree, Get_Perm_Tree): Find out the state
451 related to the given name.
452 (Is_Deep): Return True if an object is of access type or has
453 subfields of access type.
454 (Perm_Error, Perm_Error_Subprogram_End): Add an error message
455 whenever the found state on the given name is different from the
456 one expected (in the statement being analyzed).
457 (Process_Path): Given an operation and a current state, call
458 Perm_Error if there is any mismatch.
459 (Return_Declarations, Return_Globals, Return_The_Global): Check
460 the state of a given name at the end of the subprogram. These
461 procedures may change depending on how we shall finally deal
462 with globals and the rhs state in a move operation.
463 (Set_Perm_Extensions, Set_Perm_Prefixes_Borrow,
464 Set_Perm_Prefixes, Setup_Globals, Setup_Parameter_Or_Global,
465 Setup_Parameters): Set up the new states to the given node and
466 up and down the tree after an operation.
467 (Has_Ownership_Aspect_True): This function may disappear later
468 when the Ownership Aspect will be implemented in the FE.
469
470 2018-08-21 Ed Schonberg <schonberg@adacore.com>
471
472 * sem_res.adb (Resolve_Call): Resolve correctly a parameterless
473 call that returns an access type whose designated type is the
474 component type of an array, when the function has no defaulted
475 parameters.
476
477 2018-08-21 Yannick Moy <moy@adacore.com>
478
479 * doc/gnat_ugn/building_executable_programs_with_gnat.rst:
480 Document entries of the target parametrization file.
481 * gnat_ugn.texi: Regenerate.
482
483 2018-08-21 Ed Schonberg <schonberg@adacore.com>
484
485 * sem_attr.adb: Set scope of elaboration flag for 'Access.
486
487 2018-08-21 Ed Schonberg <schonberg@adacore.com>
488
489 * sprint.adb: Add guard on printing aspects.
490
491 2018-08-21 Javier Miranda <miranda@adacore.com>
492
493 * exp_cg.adb (Generate_CG_Output): Handle calls removed by the
494 expander.
495
496 2018-08-21 Ed Schonberg <schonberg@adacore.com>
497
498 * layout.adb: Do not set size of access subprogram if unnesting.
499
500 2018-08-21 Ed Schonberg <schonberg@adacore.com>
501
502 * freeze.adb: Remove warnings for access to subprograms when
503 unnesting is active.
504
505 2018-08-21 Ed Schonberg <schonberg@adacore.com>
506
507 * exp_aggr.adb (Expand_Array_Aggregate): If the component type
508 is limited, the array must be constructed in place, so set flag
509 In_Place_Assign_OK_For_Declaration accordingly. This prevents
510 improper copying of an array of tasks during initialization.
511
512 2018-08-21 Eric Botcazou <ebotcazou@adacore.com>
513
514 * gcc-interface/trans.c (Call_to_gnu): Always suppress an
515 unchecked conversion around the actual for an In parameter
516 passed by copy.
517
518 2018-08-21 Eric Botcazou <ebotcazou@adacore.com>
519
520 * exp_util.adb (Is_Possibly_Unaligned_Object): For the case of a
521 selected component inherited in a record extension and subject
522 to a representation clause, retrieve the position and size from
523 the original record component.
524
525 2018-08-21 Ed Schonberg <schonberg@adacore.com>
526
527 * sem_util.ads, sem_util.adb (New_External_Entity): Type of
528 Suffix_Index must be Int, not Nat, so that a negative value can
529 be used to generate a unique name for an external object, as
530 specified in Tbuild.New_External_Name.
531 (Scope_Within): Handle private type whose completion is a
532 synchronized type (For unnesting).
533 * itypes.ads, itypes.adb (Create_Itype): Ditto
534 * sem_ch3.adb (Constrain_Corresponding_Record): Generate a
535 unique name for the created subtype, because there may be
536 several discriminated tasks present in the same scope, and each
537 needs its distinct corresponding record subtype.
538
539 2018-08-21 Yannick Moy <moy@adacore.com>
540
541 * doc/gnat_ugn/gnat_and_program_execution.rst: Update
542 documentation of dimensionality analysis.
543 * gnat_ugn.texi: Regenerate.
544 * Makefile.rtl, impunit.adb: Consider the new units.
545 * libgnat/s-dfmkio.ads, libgnat/s-dfmopr.ads,
546 libgnat/s-diflmk.ads: New units based on Float.
547 * libgnat/s-dilomk.ads, libgnat/s-dlmkio.ads,
548 libgnat/s-dlmopr.ads: New units based on Long_Float.
549 * libgnat/s-dmotpr.ads: Rename to libgnat/s-dgmgop.ads and turn
550 into an instance of
551 System.Dim.Generic_Mks.Generic_Other_Prefixes.
552 * libgnat/s-dimmks.ads: Rename to libgnat/s-digemk.ads and turn
553 into an instance of System.Dim.Generic_Mks.
554
555 2018-08-21 Hristian Kirtchev <kirtchev@adacore.com>
556
557 * impunit.adb: Add g-lists to the set of non-implementation
558 units.
559 * libgnat/g-lists.adb, libgnat/g-lists.ads: New unit.
560 * Makefile.rtl: Add g-lists to the set of non-tasking units.
561 * gcc-interface/Make-lang.in: Add g-lists to the set of files
562 used by gnat1.
563
564 2018-08-21 Ed Schonberg <schonberg@adacore.com>
565
566 * exp_ch9.adb (Reset_Scopes): Do not recurse into type
567 declarations when resetting the scope of entities declared the
568 procedures generated for entry bodies and accept alternatives.
569 Use the entity of the procedure declaration, not its body, as
570 the new scope.
571
572 2018-08-21 Hristian Kirtchev <kirtchev@adacore.com>
573
574 * einfo.adb (Elaboration_Entity): Include entries and entry
575 families in the set of legal entities.
576 (Elaboration_Entity_Required): Include entries and entry
577 families in the set of legal entities.
578 (Set_Elaboration_Entity): Include entries and entry families in
579 the set of legal entities.
580 (Set_Elaboration_Entity_Required): Include entries and entry
581 families in the set of legal entities.
582 (Write_Field13_Name): Update the output of attribute
583 Elaboration_Entity.
584 * einfo.ads: Attributes Elaboration_Entity and
585 Elaboration_Entity_Required now apply to entries and entry
586 families.
587
588 2018-08-21 Arnaud Charlet <charlet@adacore.com>
589
590 * set_targ.adb: Mark some CodePeer message as Intentional.
591
592 2018-08-21 Ed Schonberg <schonberg@adacore.com>
593
594 * sem_res.adb (Resolve_Call): Force the freezing of an
595 expression function that is called to provide a default value
596 for a defaulted discriminant in an object initialization.
597
598 2018-08-21 Hristian Kirtchev <kirtchev@adacore.com>
599
600 * libgnat/g-dynhta.adb, libgnat/g-dynhta.ads: New package
601 Dynamic_HTable.
602
603 2018-08-21 Javier Miranda <miranda@adacore.com>
604
605 * checks.ads (Determine_Range): Adding documentation.
606 * checks.adb (Determine_Range): Don't deal with enumerated types
607 with non-standard representation.
608 (Convert_And_Check_Range): For conversion of enumeration types
609 with non standard representation to an integer type perform a
610 direct conversion to the target integer type.
611
612 2018-08-21 Piotr Trojanek <trojanek@adacore.com>
613
614 * lib-xref.ads, lib-xref-spark_specific.adb
615 (Enclosing_Subprogram_Or_Library_Package): Now roughtly works
616 for pragmas that come from aspect specifications.
617
618 2018-08-21 Pierre-Marie de Rodat <derodat@adacore.com>
619
620 * sa_messages.ads, sa_messages.adb: New source files.
621
622 2018-08-03 Pierre-Marie de Rodat <derodat@adacore.com>
623
624 Reverts
625 2018-07-06 Jim Wilson <jimw@sifive.com>
626
627 * Make-generated.in (treeprs.ads): Use $(GNATMAKE) instead of gnatmake.
628 (einfo.h, sinfo.h, stamp-snames, stamp-nmake): Likewise.
629 * gcc-interface/Makefile.in (xoscons): Likewise.
630
631 2018-07-31 Alexandre Oliva <oliva@adacore.com>
632 Olivier Hainque <hainque@adacore.com>
633
634 * gcc-interface/trans.c: Include debug.h.
635 (file_map): New static variable.
636 (gigi): Set it. Create decl_to_instance_map when needed.
637 (Subprogram_Body_to_gnu): Pass gnu_subprog_decl to...
638 (Sloc_to_locus): ... this. Add decl parm, map it to instance.
639 * gcc-interface/gigi.h (Sloc_to_locus): Adjust declaration.
640
641 2018-07-31 Arnaud Charlet <charlet@adacore.com>
642
643 * clean.adb, gnatchop.adb, gnatfind.adb, gnatls.adb,
644 gnatmake.ads, gnatxref.adb, make.adb, make.ads, make_util.ads,
645 sfn_scan.adb, vxaddr2line.adb, xeinfo.adb, xoscons.adb,
646 xr_tabls.adb, xref_lib.adb: Address CodePeer messages.
647
648 2018-07-31 Arnaud Charlet <charlet@adacore.com>
649
650 * gnatlink.adb: Fix potential Constraint_Error if
651 Library_Version is too long.
652
653 2018-07-31 Arnaud Charlet <charlet@adacore.com>
654
655 * sem_elab.adb: Remove duplicate condition detected by CodePeer.
656
657 2018-07-31 Ed Schonberg <schonberg@adacore.com>
658
659 * exp_unst.adb (Subp_Index): In the case of a protected
660 operation, the relevant entry is the generated
661 protected_subprogram_body into which the original body is
662 rewritten. Assorted cleanup and optimizations.
663
664 2018-07-31 Ed Schonberg <schonberg@adacore.com>
665
666 * exp_attr.adb (Expand_Attribute, case Fixed_Value): Set the
667 base type of the result to ensure that proper overflow and range
668 checks are generated. If the target is a fixed-point tyoe,
669 generate the required overflow and range checks explicitly,
670 rather than relying on Apply_Type_Conversion_Checks, which might
671 simply set the Do_Range_Check flag and rely on the backend to
672 add the check.
673
674 2018-07-31 Hristian Kirtchev <kirtchev@adacore.com>
675
676 * sem_res.adb (Resolve_Call): Establish a transient scope to
677 manage the secondary stack when the designated type of an
678 access-to-subprogram requires it.
679
680 2018-07-31 Ed Schonberg <schonberg@adacore.com>
681
682 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): To find local
683 subprograms in the elaboration code for a package body, recurse
684 through nested statement sequences because a compiler-generated
685 procedure may appear within a condition statement.
686
687 2018-07-31 Ed Schonberg <schonberg@adacore.com>
688
689 * exp_ch6.adb (Expand_Protected_Subprogram_Call): Handle
690 properly a protected call that includes a default parameter that
691 is a call to a protected function of the same type.
692
693 2018-07-31 Justin Squirek <squirek@adacore.com>
694
695 * lib-writ.adb (Write_With_Lines): Modfiy the generation of
696 dependencies within ali files so that source unit bodies are
697 properly listed even if said bodies are missing. Perform legacy
698 behavior in GNATprove mode.
699 * lib-writ.ads: Modify documentation to reflect current behavior.
700
701 2018-07-31 Eric Botcazou <ebotcazou@adacore.com>
702
703 * libgnarl/s-osinte__solaris.ads (upad64_t): New private type.
704 (mutex_t): Use it for 'lock' and 'data' components.
705 (cond_t): Likewise for 'data' and use single 'flags' component.
706
707 2018-07-31 Justin Squirek <squirek@adacore.com>
708
709 * exp_ch5.adb (Make_Field_Assign): Force temporarily generated
710 objects for assignment of overlaid user objects to be renamings
711 instead of constant declarations.
712
713 2018-07-31 Hristian Kirtchev <kirtchev@adacore.com>
714
715 * exp_ch9.adb (Analyze_Pragmas): New routine.
716 (Build_Private_Protected_Declaration): Code clean up. Relocate
717 relevant aspects and pragmas from the stand-alone body to the
718 newly created spec. Explicitly analyze any pragmas that have
719 been either relocated or produced by the analysis of the
720 aspects.
721 (Move_Pragmas): New routine.
722 * sem_prag.adb (Find_Related_Declaration_Or_Body): Recognize the
723 case where a pragma applies to the internally created spec for a
724 stand-along subprogram body declared in a protected body.
725
726 2018-07-31 Gary Dismukes <dismukes@adacore.com>
727
728 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Replace
729 calls to Current_Scope in three assertions with calls to
730 Current_Subprogram.
731
732 2018-07-31 Ed Schonberg <schonberg@adacore.com>
733
734 * sem_eval.adb (Check_Non_Static_Context): Do not warn on an
735 integer literal greater than the upper bound of
736 Universal_Integer'Last when expansion is disabled, to avoid a
737 spurious warning over ranges involving 64-bit modular types.
738
739 2018-07-31 Arnaud Charlet <charlet@adacore.com>
740
741 * einfo.adb (Write_Entity_Flags): Also print
742 Is_Activation_Record flag.
743
744 2018-07-31 Piotr Trojanek <trojanek@adacore.com>
745
746 * exp_aggr.adb, exp_ch4.adb, exp_ch6.adb, lib-xref.adb,
747 repinfo.adb, sem_ch9.adb: Minor replace Ekind membership tests
748 with a wrapper routine.
749
750 2018-07-31 Piotr Trojanek <trojanek@adacore.com>
751
752 * ali.adb (Known_ALI_Lines): Remove 'F' as a prefix for lines
753 related to the FORMAL analysis done by GNATprove.
754
755 2018-07-31 Javier Miranda <miranda@adacore.com>
756
757 * sem.ads (Inside_Preanalysis_Without_Freezing): New global
758 counter.
759 * sem.adb (Semantics): This subprogram has now the
760 responsibility of resetting the counter before analyzing a unit,
761 and restoring its previous value before returning.
762 * freeze.adb (Freeze_Entity): Do not freeze if we are
763 preanalyzing without freezing.
764 * sem_res.adb (Preanalyze_And_Resolve): Set & restore
765 In_Preanalysis_Without_Freezing.
766
767 2018-07-31 Ed Schonberg <schonberg@adacore.com>
768
769 * sem_ch4.adb (Traverse_Homonyms): Consider generic actuals that
770 may rename a matching class-wide operation only if the renaming
771 declaration for that actual is in an enclosing scope (i.e.
772 within the corrresponding instance).
773
774 2018-07-31 Hristian Kirtchev <kirtchev@adacore.com>
775
776 * checks.adb, contracts.adb, exp_aggr.adb, exp_ch5.adb,
777 exp_disp.adb, make.adb, sem_ch4.adb, sem_eval.adb, sem_res.adb,
778 usage.adb: Minor reformatting.
779
780 2018-07-31 Bob Duff <duff@adacore.com>
781
782 * sem_res.adb (Resolve_Allocator): Do not complain about the
783 implicit allocator that occurs in the expansion of a return
784 statement for a build-in-place function.
785
786 2018-07-20 Martin Sebor <msebor@redhat.com>
787
788 PR middle-end/82063
789 * gcc-interface/misc.c (gnat_handle_option): Change function argument
790 to HOST_WIDE_INT.
791
792 2018-07-17 Eric Botcazou <ebotcazou@adacore.com>
793
794 * gcc-interface/decl.c (choices_to_gnu): Rename parameters. Deal with
795 an operand of Character type. Factor out range generation to the end.
796 Check that the bounds are literals and convert them to the type of the
797 operand before building the ranges.
798 * gcc-interface/utils.c (make_dummy_type): Minor tweak.
799 (make_packable_type): Propagate TYPE_DEBUG_TYPE.
800 (maybe_pad_type): Likewise.
801
802 2018-07-17 Ed Schonberg <schonberg@adacore.com>
803
804 * sem_ch4.adb (Try_Object_Operation): Handle properly a prefixed call
805 in an instance, when the generic parameters include an interface type
806 and a abstract operation of that type, and the actuals in the instance
807 include an interface type and a corresponding abstract operation of it,
808 with a different name than the corresponding generic subprogram
809 parameter.
810
811 2018-07-17 Arnaud Charlet <charlet@adacore.com>
812
813 * sem_eval.adb (Rewrite_In_Raise_CE): Keep the original reason in more
814 cases.
815
816 2018-07-17 Arnaud Charlet <charlet@adacore.com>
817
818 * checks.adb (Apply_Division_Check): Add provision for floating-point
819 checks.
820
821 2018-07-17 Ed Schonberg <schonberg@adacore.com>
822
823 * exp_aggr.adb (Component_OK_For_Backend): If an array component of the
824 enclosing record has a bound that is out of range (and that has been
825 rewritten as a raise statement) the aggregate is not OK for any back
826 end, and should be expanded into individual assignments.
827
828 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
829
830 * atree.adb (Relocate_Node): Simplify with Is_Rewrite_Substitution.
831
832 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
833
834 * sem_util.ads (Denotes_Same_Object): Likewise.
835 * sem_warn.adb (Warn_On_Overlapping_Actuals): Fix RM rule references.
836
837 2018-07-17 Eric Botcazou <ebotcazou@adacore.com>
838
839 * exp_disp.adb (Make_Tags): When the type has user-defined primitives,
840 build the access type that is later used by Build_Get_Prim_Op_Address
841 as pointing to a subtype of Ada.Tags.Address_Array.
842
843 2018-07-17 Patrick Bernardi <bernardi@adacore.com>
844
845 * libgnat/s-memory__mingw.adb: Remove.
846 * Makefile.rtl: Remove s-memory.adb target pair from the Cygwin/Mingw32
847 section.
848
849 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
850
851 * frontend.adb (Frontend): The removal of ignored Ghost code must be
852 the last semantic operation performed on the tree.
853
854 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
855
856 * frontend.adb (Frontend): Update the call to Register_Config_Switches.
857 * inline.ads: Add new component Config_Switches to record
858 Pending_Body_Info which captures the configuration state of the pending
859 body. Remove components Version, Version_Pragma, SPARK_Mode, and
860 SPARK_Mode_Pragma from record Pending_Body_Info because they are
861 already captured in component Config_Switches.
862 * opt.adb (Register_Opt_Config_Switches): Rename to
863 Register_Config_Switches.
864 (Restore_Opt_Config_Switches): Rename to Restore_Config_Switches.
865 (Save_Opt_Config_Switches): Rename to Save_Config_Switches. This
866 routine is now a function, and returns the saved configuration state as
867 an aggregate to avoid missing an attribute.
868 (Set_Opt_Config_Switches): Rename to Set_Config_Switches.
869 * opt.ads (Register_Opt_Config_Switches): Rename to
870 Register_Config_Switches.
871 (Restore_Opt_Config_Switches): Rename to Restore_Config_Switches.
872 (Save_Opt_Config_Switches): Rename to Save_Config_Switches. This
873 routine is now a function.
874 (Set_Opt_Config_Switches): Rename to Set_Config_Switches.
875 * par.adb (Par): Update the calls to configuration switch-related
876 subprograms.
877 * sem.adb (Semantics): Update the calls to configuration switch-related
878 subprograms.
879 * sem_ch10.adb (Analyze_Package_Body_Stub): Update the calls to
880 configuration switch-related subprograms.
881 (Analyze_Protected_Body_Stub): Update the calls to configuration
882 switch-related subprograms.
883 (Analyze_Subprogram_Body_Stub): Update calls to configuration
884 switch-related subprograms.
885 * sem_ch12.adb (Add_Pending_Instantiation): Update the capture of
886 pending instantiation attributes.
887 (Inline_Instance_Body): Update the capture of pending instantiation
888 attributes. It is no longer needed to explicitly manipulate the SPARK
889 mode.
890 (Instantiate_Package_Body): Update the restoration of the context
891 attributes.
892 (Instantiate_Subprogram_Body): Update the restoration of context
893 attributes.
894 (Load_Parent_Of_Generic): Update the capture of pending instantiation
895 attributes.
896 (Set_Instance_Env): Update the way relevant configuration attributes
897 are saved and restored.
898
899 2018-07-17 Eric Botcazou <ebotcazou@adacore.com>
900
901 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Deal with
902 more rvalues in the expression of a renaming.
903
904 2018-07-17 Eric Botcazou <ebotcazou@adacore.com>
905
906 * gcc-interface/ada-tree.h (TYPE_RETURN_BY_DIRECT_REF_P): Define for
907 METHOD_TYPE too.
908 (TYPE_RETURN_UNCONSTRAINED_P): Likewise.
909 (TYPE_CI_CO_LIST): Likewise.
910 * gcc-interface/gigi.h (is_cplusplus_method): Delete.
911 (fntype_same_flags_p): Adjust comment.
912 * gcc-interface/decl.c (Has_Thiscall_Convention): Delete.
913 (gnat_to_gnu_entity) <E_Subprogram_Type>: Do not set the "thiscall"
914 attribute directly.
915 (is_cplusplus_method): Make static and adjust head comment.
916 (gnat_to_gnu_param): Return a pointer for the "this" parameter of
917 C++ constructors.
918 (gnat_to_gnu_subprog_type): Turn imported C++ constructors into their
919 callable form. Generate a METHOD_TYPE node for imported C++ methods.
920 Set param_list at the very end of the processing.
921 (substitute_in_type) <METHOD_TYPE>: New case.
922 * gcc-interface/misc.c (gnat_print_type) <METHOD_TYPE>: Likewise.
923 (gnat_type_hash_eq): Accept METHOD_TYPE.
924 * gcc-interface/trans.c (Identifier_to_gnu): Deal with METHOD_TYPE.
925 (Attribute_to_gnu): Likewise.
926 (Call_to_gnu): Likewise.
927 (process_freeze_entity): Likewise.
928 * gcc-interface/utils.c (create_subprog_decl): Adjust head comment.
929 (fntype_same_flags_p): Likewise.
930
931 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
932
933 * inline.adb (Expand_Inlined_Call): Remove extra parentheses.
934
935 2018-07-17 Eric Botcazou <ebotcazou@adacore.com>
936
937 * exp_disp.adb (Gen_Parameters_Profile): Make the _Init parameter an
938 In/Out parameter.
939 (Set_CPP_Constructors): Adjust comment accordingly.
940
941 2018-07-17 Bob Duff <duff@adacore.com>
942
943 * exp_disp.adb (Build_Class_Wide_Check): Return early if the
944 precondition is supposed to be ignored.
945
946 2018-07-17 Ed Schonberg <schonberg@adacore.com>
947
948 * sem_ch6.adb (Check_Untagged_Equality): Extend check to operations
949 declared in the same scope as the operand type, when that scope is a
950 procedure.
951
952 2018-07-17 Ed Schonberg <schonberg@adacore.com>
953
954 * exp_unst.adb (Unnest_Subprograms): Do nothing if the expander is not
955 active. Don't use Get_Actual_Subtype for record subtypes. Ignore
956 rewritten identifiers and uplevel references to bounds of types that
957 come from the original type reference.
958
959 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
960
961 * exp_ch13.adb, exp_ch7.adb, exp_unst.adb, freeze.adb,
962 libgnat/s-os_lib.adb, sem_ch3.adb, sem_ch3.ads, sem_ch5.adb,
963 sem_eval.adb, sem_res.adb, sem_util.adb: Minor reformatting.
964
965 2018-07-17 Javier Miranda <miranda@adacore.com>
966
967 * exp_ch13.adb (Expand_N_Freeze_Entity): Handle subtype declared for an
968 iterator.
969 * freeze.adb (Freeze_Expression): Handle freeze of an entity defined
970 outside of a subprogram body. This case was previously handled during
971 preanalysis; the frozen entities were remembered and left pending until
972 we continued freezeing entities outside of the subprogram. Now, when
973 climbing the parents chain to locate the correct placement for the
974 freezeing node, we check if the entity can be frozen and only when no
975 enclosing node is marked as Must_Not_Freeze the entity is frozen.
976 * sem_ch3.ads (Preanalyze_Default_Expression): Declaration moved to the
977 package body.
978 * sem_ch3.adb (Preanalyze_Default_Expression): Code adjusted to invoke
979 the new subprogram Preanalyze_With_Freezing_And_Resolve.
980 * sem_ch6.adb (Preanalyze_Formal_Expression): New subprogram.
981 (Analyze_Expression_Function, Process_Formals): Invoke
982 Preanalyze_Formal_Expression instead of Preanalyze_Spec_Expression
983 since the analysis of the formals may freeze entities.
984 (Analyze_Subprogram_Body_Helper): Skip building the body of the
985 class-wide clone for eliminated subprograms.
986 * sem_res.ads, sem_res.adb (Preanalyze_And_Resolve): New subprogram.
987 Its code is basically the previous version of this routine but extended
988 with an additional parameter which is used to specify if during
989 preanalysis we are allowed to freeze entities. If the new parameter is
990 True then the subtree root node is marked as Must_Not_Freeze and no
991 entities are frozen during preanalysis.
992 (Preanalyze_And_Resolve): Invokes the internal version of
993 Preanalyze_And_Resolve without entity freezing.
994 (Preanalyze_With_Freezing_And_Resolve): Invokes the internal version of
995 Prenalyze_And_Resolve with freezing enabled.
996
997 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
998
999 * einfo.ads, libgnat/g-comlin.ads: Minor change "ie" to "i.e." in docs
1000 and comments.
1001
1002 2018-07-17 Justin Squirek <squirek@adacore.com>
1003
1004 * libgnat/s-os_lib.adb (Argument_String_To_List): Fix trimming of
1005 whitespace.
1006
1007 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
1008
1009 * sem_prag.adb (Has_Visible_State): Do not consider constants as
1010 visible state because it is not possible to determine whether a
1011 constant depends on variable input.
1012 (Propagate_Part_Of): Add comment clarifying the behavior with respect
1013 to constant.
1014
1015 2018-07-17 Yannick Moy <moy@adacore.com>
1016
1017 * gnat1drv.adb (Gnat1drv): Do not issue warning about exception not
1018 being propagated in GNATprove mode.
1019
1020 2018-07-17 Dmitriy Anisimkov <anisimko@adacore.com>
1021
1022 * libgnat/g-socket.adb, libgnat/g-socket.ads: Reorganize and make
1023 public components of Inet_Addr_Type. Introduce public binary
1024 operations.
1025
1026 2018-07-17 Javier Miranda <miranda@adacore.com>
1027
1028 * exp_ch7.adb (Make_Transient_Block): When determining whether an
1029 enclosing scope already handles the secondary stack, take into account
1030 transient blocks nested in a block that do not manage the secondary
1031 stack and are located within a loop.
1032
1033 2018-07-17 Ed Schonberg <schonberg@adacore.com>
1034
1035 * sem_util.adb (Enclosing_Subprogram): Protected entries and task
1036 entries must be treated separately: task entries are within the
1037 enclosing subprogram of the task type, while protected entries are
1038 transformed into the corresponding Protected_Body_Subprogram, which is
1039 the enclosing_subprogram of any subprogram declared within the entry
1040 body.
1041
1042 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
1043
1044 * doc/gnat_ugn/building_executable_programs_with_gnat.rst: Add missing
1045 sections on -gnatH and -gnatJ compiler switches.
1046 * gnat_ugn.texi: Regenerate.
1047
1048 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
1049
1050 * alloc.ads: Update the allocation metrics of the ignored Ghost nodes
1051 table.
1052 * atree.adb: Add a soft link for a procedure which is invoked whenever
1053 an ignored Ghost node or entity is created.
1054 (Change_Node): Preserve relevant attributes which come from the Flags
1055 table.
1056 (Mark_New_Ghost_Node): Record a newly created ignored Ghost node or
1057 entity.
1058 (Rewrite): Preserve relevant attributes which come from the Flags
1059 table.
1060 (Set_Ignored_Ghost_Recording_Proc): New routine.
1061 * atree.ads: Define an access-to-suprogram type for a soft link which
1062 records a newly created ignored Ghost node or entity.
1063 (Set_Ignored_Ghost_Recording_Proc): New routine.
1064 * ghost.adb: Remove with and use clause for Lib. Remove table
1065 Ignored_Ghost_Units. Add new table Ignored_Ghost_Nodes.
1066 (Add_Ignored_Ghost_Unit): Removed.
1067 (Initialize): Initialize the table which stores ignored Ghost nodes.
1068 Set the soft link which allows Atree.Mark_New_Ghost_Node to record an
1069 ignored Ghost node.
1070 (Is_Ignored_Ghost_Unit): Use the ultimate original node when checking
1071 an eliminated ignored Ghost unit.
1072 (Lock): Release and lock the table which stores ignored Ghost nodes.
1073 (Mark_And_Set_Ghost_Assignment): Record rather than propagate ignored
1074 Ghost nodes.
1075 (Mark_And_Set_Ghost_Procedure_Call): Record rather than propagate
1076 ignored Ghost nodes.
1077 (Mark_Ghost_Clause): Record rather than propagate ignored Ghost nodes.
1078 (Mark_Ghost_Declaration_Or_Body): Record rather than propagate ignored
1079 Ghost nodes.
1080 (Mark_Ghost_Pragma): Record rather than propagate ignored Ghost nodes.
1081 (Propagate_Ignored_Ghost_Code): Removed.
1082 (Record_Ignored_Ghost_Node): New routine.
1083 (Remove_Ignored_Ghost_Code): Reimplemented.
1084 (Remove_Ignored_Ghost_Node): New routine.
1085 (Ultimate_Original_Node): New routine.
1086 * ghost.ads (Check_Ghost_Completion): Removed.
1087 * sem_ch8.adb (Analyze_Use_Package): Remove obsolete code. Mark a use
1088 package clause as ignored Ghost if applicable.
1089 * sem_util.adb (Is_Body_Or_Package_Declaration): Reimplemented.
1090
1091 2018-07-17 Javier Miranda <miranda@adacore.com>
1092
1093 * sem_ch5.adb (Has_Call_Using_Secondary_Stack): Moved to library level
1094 to reuse it.
1095 (Analyze_Loop_Statement): Wrap the loop in a block when the evaluation
1096 of the loop iterator relies on the secondary stack.
1097
1098 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
1099
1100 * sem_util.adb (Next_Actual): If the parent is a N_Null_Statement,
1101 which happens for inlined calls, then fetch the next actual from the
1102 original AST.
1103
1104 2018-07-17 Ed Schonberg <schonberg@adacore.com>
1105
1106 * einfo.ads: Update documentation for Scalar_Range.
1107
1108 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
1109
1110 * lib-xref-spark_specific.adb (Create_Heap): Attach the HEAP entity to
1111 the Standard package.
1112
1113 2018-07-17 Piotr Trojanek <trojanek@adacore.com>
1114
1115 * einfo.adb (Is_Wrapper_Package): Remove extra parentheses.
1116
1117 2018-07-17 Ed Schonberg <schonberg@adacore.com>
1118
1119 * sem_util.adb (Enclosing_Subprogram): Handle properly entries, and
1120 synchronized types that are completions of limited types or private
1121 extensions.
1122 (Scope_Within): Handle properly accept statements in task bodies.
1123
1124 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
1125
1126 * sem_prag.adb (Has_Visible_State): Do not consider generic formals
1127 because they are not part of the visible state space. Add constants to
1128 the list of acceptable visible states.
1129 (Propagate_Part_Of): Do not consider generic formals when propagating
1130 the Part_Of indicator.
1131 * sem_util.adb (Entity_Of): Do not follow renaming chains which go
1132 through a generic formal because they are not visible for SPARK
1133 purposes.
1134 * sem_util.ads (Entity_Of): Update the comment on usage.
1135
1136 2018-07-17 Ed Schonberg <schonberg@adacore.com>
1137
1138 * sem_util.adb (Gather_Components): A discriminant of an ancestor may
1139 have been constrained by a later ancestor, so when looking for the
1140 value of that hidden discriminant we must examine the stored constraint
1141 of other ancestors than the immediate parent type.
1142
1143 2018-07-17 Hristian Kirtchev <kirtchev@adacore.com>
1144
1145 * exp_ch6.adb (Build_Heap_Or_Pool_Allocator): Ensure that scoping
1146 constructs and entities within receive new entities when replicating a
1147 tree.
1148 (Expand_N_Extended_Return_Statement): Ensure that scoping constructs
1149 and entities within receive new entities when replicating a tree.
1150 * sem_util.adb (New_Copy_Tree): Add new formal Scopes_In_EWA_OK.
1151 (Visit_Entity): Visit entities within scoping constructs inside
1152 expression with actions nodes when requested by the caller. Add blocks,
1153 labels, and procedures to the list of entities which need replication.
1154 * sem_util.ads (New_Copy_Tree): Add new formal Scopes_In_EWA_OK. Update
1155 the comment on usage.
1156
1157 2018-07-17 Arnaud Charlet <charlet@adacore.com>
1158
1159 * doc/gnat_ugn/about_this_guide.rst,
1160 doc/gnat_ugn/gnat_and_program_execution.rst: Remove references to gcov.
1161 * gnat_ugn.texi: Regenerate.
1162
1163 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
1164
1165 * contracts.adb (Analyze_Contracts): Add specialized processing for
1166 package instantiation contracts.
1167 (Analyze_Package_Contract): Remove the verification of a missing
1168 Part_Of indicator.
1169 (Analyze_Package_Instantiation_Contract): New routine.
1170 * contracts.ads (Analyze_Package_Contract): Update the comment on
1171 usage.
1172 * sem_prag.adb (Check_Missing_Part_Of): Ensure that the entity of the
1173 instance is being examined when trying to determine whether a package
1174 instantiation needs a Part_Of indicator.
1175
1176 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
1177
1178 * einfo.adb, exp_ch7.adb, exp_ch9.adb, exp_unst.adb, inline.adb,
1179 sem.adb, sem_ch12.adb, sem_ch13.adb, sem_ch3.adb, sem_eval.adb,
1180 sem_util.adb: Minor reformatting.
1181
1182 2018-07-16 Arnaud Charlet <charlet@adacore.com>
1183
1184 * frontend.adb: Only unnest subprograms if no previous errors were
1185 detected.
1186
1187 2018-07-16 Ed Schonberg <schonberg@adacore.com>
1188
1189 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): Handle loops that
1190 contain blocks in the elaboration code for a package body. Create the
1191 elaboration subprogram wrapper only if there is a subprogram
1192 declaration in a block or loop.
1193
1194 2018-07-16 Ed Schonberg <schonberg@adacore.com>
1195
1196 * exp_ch4.adb (Expand_Set_Membership): Use New_Copy_Tree to perform a
1197 deep copy of the left operand when building each conjuct of the
1198 expanded membership operation, to avoid sharing nodes between them.
1199 This sharing interferes with the unnesting machinery and is generally
1200 undesirable.
1201
1202 2018-07-16 Ed Schonberg <schonberg@adacore.com>
1203
1204 * exp_unst.adb (Visit_Node): Handle 'Address references that are
1205 calls.
1206
1207 2018-07-16 Ed Schonberg <schonberg@adacore.com>
1208
1209 * exp_unst.adb (Visit_Node): Handle the semantic of Storage_Pool field
1210 in relevant nodes: Allocate, Free, and return statements.
1211
1212 2018-07-16 Ed Schonberg <schonberg@adacore.com>
1213
1214 * sem_ch12.adb (Analyze_Package_Instantiation): Handle properly an
1215 instance that carries an aspect Default_Storage_Pool that overrides a
1216 default storage pool that applies to the generic unit. The aspect in
1217 the generic unit was removed before copying it in the instance, rather
1218 than removing it from the copy of the aspects that are appended to the
1219 aspects in the instance.
1220
1221 2018-07-16 Ed Schonberg <schonberg@adacore.com>
1222
1223 * einfo.adb (Set_Is_Uplevel_Referenced_Entity): Flag can appear on
1224 loop parameters.
1225 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): Handle subprogram
1226 bodies.
1227 * exp_ch9.adb (Reset_Scopes_To): Set the scopes of entities local to an
1228 entry body to be the corresponding generated subprogram, for correct
1229 analysis of uplevel references.
1230 * exp_unst.adb (Visit_Node): Handle properly binary and unary operators
1231 Ignore pragmas, fix component associations.
1232 (Register_Subprograms): Subprograms in synchronized types must be
1233 treated as reachable.
1234
1235 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
1236
1237 * sem_util.adb (Check_No_Hidden_State): Ignore internally-generated
1238 states and variables.
1239
1240 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
1241
1242 * sinfo.ads, sinfo.adb (Withed_Body): Remove.
1243 (Set_Withed_Body): Remove.
1244
1245 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
1246
1247 * sem.adb (Walk_Library_Items): Skip units with configuration pragmas
1248 when printing debug info.
1249
1250 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
1251
1252 * sem.adb (Walk_Library_Items): Reuse local constant.
1253 (Is_Subunit_Of_Main): Turn condition to positive and flip the
1254 IF-THEN-ELSE branches; avoid potentially ineffective assignment to the
1255 Lib variable.
1256
1257 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
1258
1259 * sem.adb (Walk_Library_Items): Deconstruct dead code.
1260
1261 2018-07-16 Ed Schonberg <schonberg@adacore.com>
1262
1263 * exp_ch4.adb (Expand_N_Op_Xor): Use common routine
1264 Expand_Nonbinary_Modular_Op. Needed for unnesting.
1265
1266 2018-07-16 Ed Schonberg <schonberg@adacore.com>
1267
1268 * sem_ch3.adb (Inherit_Predicate_Flags): A non-discrete type may have a
1269 static predicate (for example True) but has no
1270 static_discrete_predicate.
1271
1272 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
1273
1274 * exp_attr.adb (Build_Record_VS_Func): Handle corner cases dealing with
1275 class-wide types and record extensions.
1276
1277 2018-07-16 Justin Squirek <squirek@adacore.com>
1278
1279 * sem_eval.adb (Eval_Integer_Literal): Add exception for avoiding
1280 checks on expanded literals within if and case expressions.
1281
1282 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
1283
1284 * libgnat/s-wchwts.adb (Wide_String_To_String): Use the appropriate
1285 longest sequence factor. Code clean up.
1286 (Wide_Wide_String_To_String): Use the appropriate longest sequence
1287 factor. Code clean up.
1288
1289 2018-07-16 Javier Miranda <miranda@adacore.com>
1290
1291 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Report an error
1292 on Bit_Order when defined for a record extension.
1293
1294 2018-07-16 Arnaud Charlet <charlet@adacore.com>
1295
1296 * libgnat/s-objrea.ads: Minor code clean up.
1297
1298 2018-07-16 Piotr Trojanek <trojanek@adacore.com>
1299
1300 * sem_ch3.adb (Process_Discriminants): Adjust reference to the SPARM RM
1301 rule.
1302
1303 2018-07-16 Arnaud Charlet <charlet@adacore.com>
1304
1305 * adaint.c (__gnat_set_file_time_name): Code clean up.
1306
1307 2018-07-16 Javier Miranda <miranda@adacore.com>
1308
1309 * inline.adb (Build_Body_To_Inline): Minor code reorganization that
1310 ensures that calls to function Has_Single_Return() pass a decorated
1311 tree.
1312 (Has_Single_Return.Check_Return): Peform checks on entities (instead on
1313 relying on their characters).
1314
1315 2018-07-16 Javier Miranda <miranda@adacore.com>
1316
1317 * exp_ch5.adb (Expand_Iterator_Loop_Over_Array): Code cleanup. Required
1318 to avoid generating an ill-formed tree that confuses gnatprove causing
1319 it to blowup.
1320
1321 2018-07-16 Yannick Moy <moy@adacore.com>
1322
1323 * inline.adb (Has_Single_Return): Rewrap comment.
1324
1325 2018-07-16 Eric Botcazou <ebotcazou@adacore.com>
1326
1327 * einfo.ads: Minor tweak in comment.
1328
1329 2018-07-16 Javier Miranda <miranda@adacore.com>
1330
1331 * sem_ch4.adb (Analyze_Membership_Op): Code cleanup.
1332
1333 2018-07-16 Javier Miranda <miranda@adacore.com>
1334
1335 * exp_attr.adb (Expand_N_Attribute_Reference ['Count]): Do not
1336 transform 'Count into a function call if the current scope has been
1337 eliminated.
1338
1339 2018-07-16 Javier Miranda <miranda@adacore.com>
1340
1341 * sem_util.ads, sem_util.adb (Has_Prefix): Move this function to the
1342 public part of this package.
1343
1344 2018-07-16 Yannick Moy <moy@adacore.com>
1345
1346 * sem_res.adb (Resolve_Call): Do not inline calls inside
1347 compiler-generated functions translated as predicates in GNATprove.
1348
1349 2018-07-16 Gary Dismukes <dismukes@adacore.com>
1350
1351 * exp_ch4.adb (Expand_N_Allocator): Test for Storage_Pool being RTE in
1352 addition to the existing test for no Storage_Pool as a condition
1353 enabling generation of the call to Check_Standard_Allocator when the
1354 restriction No_Standard_Allocators_After_Elaboration is active.
1355 * libgnat/s-elaall.ads (Check_Standard_Allocator): Correct comment to
1356 say that Storage_Error will be raised (rather than Program_Error).
1357 * libgnat/s-elaall.adb (Check_Standard_Allocator): Raise Storage_Error
1358 rather than Program_Error when Elaboration_In_Progress is False.
1359
1360 2018-07-16 Gary Dismukes <dismukes@adacore.com>
1361
1362 * sem_eval.adb: Fix spelling for compile-time-known.
1363
1364 2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
1365
1366 * sem_eval.adb (Compile_Time_Known_Value): Add a guard which prevents
1367 the compiler from entering infinite recursion when trying to determine
1368 whether a deferred constant has a compile time known value, and the
1369 initialization expression of the constant is a reference to the
1370 constant itself.
1371
1372 2018-07-16 Nicolas Roche <roche@adacore.com>
1373
1374 * libgnat/a-strunb.adb, libgnat/a-strunb__shared.adb: Adjust growth
1375 factor from 1/32 to 1/2 for Unbounded_String.
1376
1377 2018-07-13 Eric Botcazou <ebotcazou@adacore.com>
1378
1379 * gcc-interface/lang.opt (funsigned-char): New option.
1380 * gcc-interface/misc.c (gnat_handle_option): Accept it.
1381 * gcc-interface/utils.c (finish_character_type): Tweak comment.
1382
1383 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
1384
1385 * gcc-interface/decl.c (gnat_to_gnu_entity): Add GNAT_DECL local
1386 variable and use it throughout.
1387 <E_Variable>: If the nominal subtype of the object is unconstrained,
1388 compute the Ada size separately and put in on the padding type if the
1389 size is not fixed.
1390 <E_Record_Type>: Minor tweak.
1391 * gcc-interface/misc.c (gnat_type_max_size): Rename max_size_unit
1392 into max_size_unit throughout.
1393
1394 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
1395
1396 * gcc-interface/gigi.h (add_decl_expr): Adjust prototype.
1397 * gcc-interface/decl.c (gnat_to_gnu_entity): Remove useless test.
1398 * gcc-interface/trans.c (add_stmt_with_node): Remove exceptions.
1399 (add_decl_expr): Change type of second parameter and rename it.
1400 (renaming_from_instantiation_p): New function moved from...
1401 (set_expr_location_from_node): Test for exceptions here and add one
1402 for actual subtypes built for unconstrained composite actuals.
1403 * gcc-interface/utils.c (renaming_from_instantiation_p): ...here.
1404
1405 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
1406
1407 * gcc-interface/trans.c (lvalue_required_p): Remove ALIASED parameter
1408 and adjust recursive calls.
1409 (Identifier_to_gnu): Adjust calls to lvalue_required_p.
1410 (gnat_to_gnu): Likewise.
1411
1412 2018-07-07 Eric Botcazou <ebotcazou@adacore.com>
1413
1414 * gcc-interface/decl.c (gnat_to_gnu_param): Minor tweak.
1415 (gnat_to_gnu_subprog_type): New pure_flag local variable. Set it for
1416 a pure Ada function with a by-ref In parameter. Propagate it onto the
1417 function type by means of the TYPE_QUAL_RESTRICT flag.
1418 * gcc-interface/utils.c (finish_subprog_decl): Set DECL_PURE_P if the
1419 function type has the TYPE_QUAL_RESTRICT flag set.
1420
1421 2018-07-06 Jim Wilson <jimw@sifive.com>
1422
1423 * Makefile.rtl: Add riscv*-linux* support.
1424 * libgnarl/s-linux__riscv.ads: New.
1425 * libgnat/system-linux-riscv.ads: New.
1426
1427 * Make-generated.in (treeprs.ads): Use $(GNATMAKE) instead of gnatmake.
1428 (einfo.h, sinfo.h, stamp-snames, stamp-nmake): Likewise.
1429 * gcc-interface/Makefile.in (xoscons): Likewise.
1430
1431 2018-07-06 Sebastian Huber <sebastian.huber@embedded-brains.de>
1432
1433 * libgnat/system-rtems.ads (Frontend_Exceptions): Set to False.
1434 (ZCX_By_Default): Set to True.
1435
1436 2018-07-02 Martin Liska <mliska@suse.cz>
1437
1438 * gnatvsn.ads: Bump Library_Version to 9.
1439
1440 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
1441
1442 * gcc-interface/ada-tree.h (TYPE_RETURN_BY_DIRECT_REF_P): Change from
1443 using TYPE_LANG_FLAG_4 to using TYPE_LANG_FLAG_0.
1444 (TYPE_ALIGN_OK): Move around.
1445 (TYPE_PADDING_FOR_COMPONENT): Remove superfluous parentheses.
1446 * gcc-interface/decl.c (change_qualified_type): Move to...
1447 (gnat_to_gnu_entity): Adjust comment.
1448 * gcc-interface/gigi.h (change_qualified_type): ...here; make inline.
1449 (ceil_pow2): Use ceil_log2.
1450 * gcc-interface/utils.c (finish_subprog_decl): Add couple of comments
1451 and do not set TREE_SIDE_EFFECTS.
1452 (handle_noreturn_attribute): Use change_qualified_type.
1453
1454 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
1455
1456 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Constant>: Do not get
1457 the expression of a dispatch table that is not being defined.
1458 <E_Record_Subtype>: Remove obsolete kludge.
1459
1460 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
1461
1462 * gcc-interface/decl.c (warn_on_field_placement): Use specific wording
1463 for discriminants.
1464 (warn_on_list_placement): New static function.
1465 (components_to_record): Use it to warn on multiple fields in list.
1466
1467 2018-06-12 Eric Botcazou <ebotcazou@adacore.com>
1468
1469 * gcc-interface/decl.c (variant_desc): Add AUX field.
1470 (gnat_to_gnu_entity) <discrete_type>: Do not call compute_record_mode
1471 directly.
1472 (reverse_sort_field_list): New static function.
1473 (components_to_record): Place the variant part at the beginning of the
1474 field list when there is an obvious order of increasing position.
1475 (build_variant_list): Initialize it.
1476 (create_variant_part_from): Do not call compute_record_mode directly.
1477 (copy_and_substitute_in_layout): Likewise. Always sort the fields with
1478 fixed position in order of increasing position, in the record and all
1479 the variants, in any. Call reverse_sort_field_list.
1480 * gcc-interface/utils.c (make_packable_type): Compute the sizes before
1481 calling finish_record_type. Do not call compute_record_mode directly.
1482 (finish_record_type): Overhaul final processing depending on REP_LEVEL
1483 and call finish_bitfield_layout if it is equal to one or two.
1484
1485 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
1486
1487 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Reuse the
1488 existing fields of a dummy fat pointer type, if any. Clear the
1489 TYPE_DECL_SUPPRESS_DEBUG on the fat pointer type after completing it.
1490
1491 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
1492
1493 * contracts.adb (Process_Body_Postconditions): Expand only checked
1494 postconditions.
1495 (Process_Contract_Cases_For): Expand only checked contract cases.
1496 (Process_Inherited_Preconditions): Ignored class-wide preconditions are
1497 partially expanded because some of their semantic checks are tied to
1498 the expansion.
1499 (Process_Preconditions_For): Expand only checked preconditions.
1500 (Process_Spec_Postconditions): Expand only checked preconditions.
1501 Ignored class-wide preconditions are partially expanded because some of
1502 their semantic checks are tied to the expansion.
1503 * exp_prag.adb (Expand_N_Pragma): Suppress the expansion of ignored
1504 assertion pragmas.
1505 * exp_util.adb (Add_Inherited_Invariants): Code clean up.
1506 * sem_util.adb (Propagate_Invariant_Attributes): Code clean up.
1507
1508 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
1509
1510 * exp_ch9.adb, exp_unst.adb, inline.adb, libgnat/a-ciorma.adb,
1511 libgnat/a-ciormu.adb, libgnat/a-ciorse.adb, libgnat/a-coorma.adb,
1512 libgnat/a-coormu.adb, libgnat/a-coorse.adb, sem_prag.adb: Minor
1513 reformatting.
1514
1515 2018-06-11 Gary Dismukes <dismukes@adacore.com>
1516
1517 * exp_unst.ads, exp_unst.adb: Typo fixes and minor reformatting.
1518
1519 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
1520
1521 * exp_ch6.adb (Add_Unconstrained_Actuals_To_Build_In_Place_Call): Do
1522 not add any actuals when the size of the object is known, and the
1523 caller will allocate it.
1524 (Build_Heap_Allocator): Rename to Build_Heap_Or_Pool_Allocator to
1525 better illustrate its functionality. Update the comment on the
1526 generated code. Generate a branch for the heap and pool cases where
1527 the object is not necessarity controlled.
1528 (Expand_N_Extended_Return_Statement): Expand the extended return
1529 statement into four branches depending the requested mode if the caller
1530 will not allocate the object on its side.
1531 (Make_Build_In_Place_Call_In_Allocator): Do not allocate a controlled
1532 object on the caller side because this will violate the semantics of
1533 finalizable types. Instead notify the function to allocate the object
1534 on the heap or a user-defined storage pool.
1535 (Needs_BIP_Alloc_Form): A build-in-place function needs to be notified
1536 which of the four modes to employ when returning a limited controlled
1537 result.
1538 * exp_util.adb (Build_Allocate_Deallocate_Proc): Remove a redundant
1539 guard which is already covered in Needs_Finalization.
1540
1541 2018-06-11 Olivier Hainque <hainque@adacore.com>
1542
1543 * libgnat/s-excmac*.ads: Factorize Unwind_Action definitions ...
1544 * libgnat/a-exexpr.adb: ... Here, then add comments describing the
1545 major datastructures associated with the current exception raised.
1546 (Setup_Current_Excep): Accept a "Phase" argument conveying the
1547 unwinding phase during which this subprogram is called. For an Ada
1548 exception, don't update the current exception buffer from the raised
1549 exception object during SEARCH_PHASE, as this is redundant with the
1550 call now issued just before propagation starts.
1551 (Propagate_GCC_Exception): Move call to Setup_Current_Excep ahead of
1552 the unwinding start, conveying Phase 0.
1553 (Unhandled_Except_Handler): Pass UA_CLEANUP_PHASE as the Phase value on
1554 the call to Setup_Current_Excep.
1555 * raise-gcc.c (personality_body): Pass uw_phases as the Phase argument
1556 on calls to Setup_Current_Excep.
1557
1558 2018-06-11 Ed Schonberg <schonberg@adacore.com>
1559
1560 * exp_unst.ads, exp_unst.adb (Needs_Fat_Pointer,
1561 Build_Access_Type_Decl): New subprograms to handle uplevel references
1562 to formals of an unconstrained array type. The activation record
1563 component for these is an access type, and the reference is rewritten
1564 as an explicit derefenrence of that component.
1565
1566 2018-06-11 Bob Duff <duff@adacore.com>
1567
1568 * libgnat/a-ciorma.adb, libgnat/a-ciormu.adb, libgnat/a-ciorse.adb,
1569 libgnat/a-coorma.adb, libgnat/a-coormu.adb, libgnat/a-coorse.adb:
1570 (Element): Add code to detect dangling cursors in some cases.
1571
1572 2018-06-11 Yannick Moy <moy@adacore.com>
1573
1574 * sem_ch6.adb (Build_Subprogram_Declaration): Mark parameters as coming
1575 from source.
1576
1577 2018-06-11 Ed Schonberg <schonberg@adacore.com>
1578
1579 * sem_ch13.adb (Build_Predicate_Functions): For a derived type, ensure
1580 that its parent is already frozen so that its predicate function, if
1581 any, has already been constructed.
1582
1583 2018-06-11 Yannick Moy <moy@adacore.com>
1584
1585 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Adapt for
1586 possible task unit as the enclosing context.
1587
1588 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
1589
1590 * gnat1drv.adb: Remove use clause for Repinfo.
1591 (Gnat1drv): Beef up comment about the interplay between -gnatc and
1592 back-end annotations. Use full qualified name for List_Rep_Info.
1593
1594 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
1595
1596 * libgnat/g-arrspl.ads: Add pragma Preelaborate.
1597
1598 2018-06-11 Arnaud Charlet <charlet@adacore.com>
1599
1600 * exp_ch4.adb (Expand_Record_Equality): Remove extraneous "True and
1601 then" and general logical "ada" in codepeer mode.
1602
1603 2018-06-11 Javier Miranda <miranda@adacore.com>
1604
1605 * exp_ch9.adb (Expand_N_Protected_Body): Add missing handling of
1606 N_Call_Marker nodes.
1607
1608 2018-06-11 Arnaud Charlet <charlet@adacore.com>
1609
1610 * exp_ch3.adb, exp_unst.adb, inline.adb, sem_prag.adb: Minor
1611 reformatting.
1612
1613 2018-06-11 Yannick Moy <moy@adacore.com>
1614
1615 * doc/gnat_rm/implementation_defined_pragmas.rst: Add Suppressible
1616 argument to Assertion_Policy
1617 * gnat_rm.texi: Regenerate.
1618
1619 2018-06-11 Yannick Moy <moy@adacore.com>
1620
1621 * gnat1drv.adb: Do not check representation information in CodePeer and
1622 GNATprove modes, as these modes call a special backend instead of gigi,
1623 so do not have the information.
1624
1625 2018-06-11 Yannick Moy <moy@adacore.com>
1626
1627 * inline.adb (Build_Body_To_Inline): Consider case of extended return
1628 of unconstrained type as one case where inlining is not supported.
1629 (Expand_Inlined_Call): Remove special case for body as extended return
1630 of unconstrained type.
1631
1632 2018-06-11 Yannick Moy <moy@adacore.com>
1633
1634 * sem_prag.adb (Analyze_Part_Of): Only allow Part_Of on non-generic
1635 unit.
1636 (Check_Missing_Part_Of): Do not force Part_Of on generic unit.
1637
1638 2018-06-11 Piotr Trojanek <trojanek@adacore.com>
1639
1640 * sem_ch13.adb (Analyze_Aspect_Specifications): Don't split AND THEN
1641 expressions in Pre/Post contracts while in GNATprove_Mode.
1642
1643 2018-06-11 Piotr Trojanek <trojanek@adacore.com>
1644
1645 * sem_util.adb (Is_Potentially_Unevaluated): Fix detection of contracts
1646 with AND THEN expressions broken down into individual conjuncts.
1647
1648 2018-06-11 Ed Schonberg <schonberg@adacore.com>
1649
1650 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): Add guard.
1651
1652 2018-06-11 Ed Schonberg <schonberg@adacore.com>
1653
1654 * exp_unst.adb (Visit_Node): Skip generic associations.
1655
1656 2018-06-11 Arnaud Charlet <charlet@adacore.com>
1657
1658 * libgnat/memtrack.adb (fwrite): Remove second definition.
1659
1660 2018-06-11 Javier Miranda <miranda@adacore.com>
1661
1662 * sinfo.ads (Is_Dynamic_Coextension): Adding documentation.
1663 (Is_Static_Coextension): Adding documentation.
1664 * sinfo.adb (Is_Dynamic_Coextension): Extending the assertion.
1665 (Is_Static_Coextension): Extending the assertion.
1666 * sem_util.adb (Mark_Allocator): Clear Is_Static_Coextension when
1667 setting flag Is_Dynamic_Coextension (and vice versa).
1668
1669 2018-06-11 Ed Schonberg <schonberg@adacore.com>
1670
1671 * exp_unst.adb (Search_Subprograms): Handle explicitly stubs at the top
1672 level of a compilation unit, becuase they may contain nested
1673 subprograms that need an activation record.
1674
1675 2018-06-11 Arnaud Charlet <charlet@adacore.com>
1676
1677 * Makefile.rtl: Compile Ada files with $(ADAC) instead of $(CC).
1678
1679 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
1680
1681 * exp_ch11.adb, exp_unst.adb, inline.adb, sem_ch12.adb, sem_util.adb:
1682 Minor reformatting.
1683 * sinfo.ads: Fix a typo.
1684
1685 2018-06-11 Ed Schonberg <schonberg@adacore.com>
1686
1687 * inline.adb (Expand_Inlined_Call): If no optimization level is
1688 specified, the expansion of a call to an Inline_Always function is
1689 fully performed in the front-end even on a target that support back-end
1690 inlining.
1691
1692 2018-06-11 Arnaud Charlet <charlet@adacore.com>
1693
1694 * bindgen.adb (Gen_Adainit): Protect reference to System.Parameters
1695 with Sec_Stack_Used.
1696
1697 2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
1698
1699 * sem_ch8.adb (Find_Direct_Name): Mode the declaration of
1700 Is_Assignment_LHS further in. Use predicate
1701 Needs_Variable_Reference_Marker to determine whether to create a
1702 variable marker.
1703 (Find_Expanded_Name): Mode the declaration of Is_Assignment_LHS further
1704 in. Use predicate Needs_Variable_Reference_Marker to determine whether
1705 to create a variable marker.
1706 * sem_elab.adb (Build_Variable_Reference_Marker): Remove the various
1707 checks that determine whether the identifier or expanded name is a
1708 suitable variable reference. The checks are now performed by
1709 Needs_Variable_Reference_Marker.
1710 * sem_res.adb (Resolve_Actuals): Use predicate
1711 Needs_Variable_Reference_Marker to determine whether to create a
1712 variable marker.
1713 * sem_util.adb (Needs_Variable_Reference_Marker): New routine.
1714 * sem_util.ads (Needs_Variable_Reference_Marker): New routine.
1715
1716 2018-06-11 Valentine Reboul <reboul@adacore.com>
1717
1718 * doc/gnat_rm.rst, doc/gnat_ugn.rst: Rename "GPL Edition" into
1719 "Community Edition".
1720
1721 2018-06-11 Ed Schonberg <schonberg@adacore.com>
1722
1723 * sem_ch12.adb (Install_Body): In order to determine the placement of
1724 the freeze node for an instance of a generic nested within another
1725 instance, take into account that the outer instance may be declared in
1726 the visible part of a package and the inner intance may be in the
1727 private part of the same package.
1728
1729 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
1730
1731 * errout.adb (Special_Msg_Delete): Remove handling of Atomic and VFA.
1732
1733 2018-06-11 Nicolas Roche <roche@adacore.com>
1734
1735 * libgnat/s-valuti.adb (Bad_Value): Ensure that we do not generate a
1736 stack overflow while raising a constraint error.
1737
1738 2018-06-11 Eric Botcazou <ebotcazou@adacore.com>
1739
1740 * repinfo.ads (Rep_Value): Use a single line.
1741 * repinfo.adb (Rep_Value): Likewise.
1742 (List_Attr): Do not use string concatenation.
1743
1744 2018-06-11 Ed Schonberg <schonberg@adacore.com>
1745
1746 * exp_unst.adb (Visit_Node): Check reference to formal parameter of
1747 current procedure, because the bounds of its type may be uplevel
1748 references.
1749
1750 2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
1751
1752 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Constant>: If this is
1753 not a definition, retrieve the expression only if it's a compile-time
1754 known value if we are just annotating types.
1755
1756 * gcc-interface/utils.c (convert): Do not try to upcast properly for a
1757 conversion between tagged types in type_annotate_only mode.
1758
1759 2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
1760
1761 * gcc-interface/ada-tree.h (TYPE_PADDING_FOR_COMPONENT): New macro.
1762 * gcc-interface/decl.c (gnat_to_gnu_component_type): Cache the padding
1763 type built for an aliased component with variable size.
1764
1765 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
1766
1767 * doc/gnat_ugn/project-manager-figure.png: Delete.
1768
1769 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
1770
1771 * vxworks-arm-link.spec, vxworks-e500-link.spec,
1772 vxworks-gnat-crtbe-link.spec, vxworks-smp-arm-link.spec,
1773 vxworks-smp-e500-link.spec, vxworks-smp-ppc-link.spec,
1774 vxworks-smp-x86-link.spec: New files.
1775
1776 2018-05-31 Pierre-Marie de Rodat <derodat@adacore.com>
1777
1778 * gnatvsn.adb: Re-center the copyright header.
1779 * indepsw-darwin.adb: Adjust the starting copyright year to 2011.
1780
1781 2018-05-31 Fedor Rybin <frybin@adacore.com>
1782
1783 * doc/gnat_ugn/gnat_utility_programs.rst: Document Stubs_Subdir in
1784 gnattest section on user guide.
1785
1786 2018-05-31 Ed Schonberg <schonberg@adacore.com>
1787
1788 * sem_res.adb (Resolve_String_Literal): If the type is a string type
1789 whose component subtype has a static predicate, ensure that the
1790 predicate is applied to each character by expanding the string into the
1791 equivalent aggregate. This is also done if the component subtype is
1792 constrained.
1793
1794 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
1795
1796 * gcc-interface/trans.c (Call_to_gnu): Remove obsolete code.
1797
1798 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
1799
1800 * sem_ch6.adb (Check_Missing_Return): Handle procedures with no
1801 explicit spec.
1802
1803 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
1804
1805 * gcc-interface/trans.c (Call_to_gnu): In the by-reference case, if
1806 the type of the parameter is an unconstrained array type, convert
1807 to the type of the actual before the type of the formal only if the
1808 conversion was suppressed earlier. Use in_param and gnu_actual_type
1809 local variables throughout, and uniform spelling for In Out or Out.
1810 Also remove dead code in the component-by-reference case.
1811
1812 2018-05-31 Frederic Konrad <konrad@adacore.com>
1813
1814 * tracebak.c (STOP_FRAME): Harden condition.
1815 (is_return_from, EXTRA_STOP_CONDITION): New helpers for VxWorks in RTP
1816 mode.
1817
1818 2018-05-31 Ed Schonberg <schonberg@adacore.com>
1819
1820 * checks.adb (Apply_Discriminant_Check): Do not apply discriminant
1821 check to a call to a build-in-place function, given that the return
1822 object is limited and cannot be copied.
1823
1824 2018-05-31 Olivier Hainque <hainque@adacore.com>
1825
1826 * libgnat/s-atopri.ads: Update comment on __atomic_compare_exchange
1827 builtins.
1828
1829 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
1830
1831 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
1832 there is no target, also create a temporary for the return value for
1833 an allocator if the type is an unconstrained record type with default
1834 discriminant.
1835
1836 2018-05-31 Hristian Kirtchev <kirtchev@adacore.com>
1837
1838 * exp_ch7.adb (Find_Transient_Context): An iteration scheme is a valid
1839 boudary for a transient scope.
1840
1841 2018-05-31 Valentine Reboul <reboul@adacore.com>
1842
1843 * gnatvsn.ads: Rename "GPL" version to "Community".
1844
1845 2018-05-31 Ed Schonberg <schonberg@adacore.com>
1846
1847 * einfo.ads: Improve documentation for the Is_Unsigned_Type entity
1848 flag.
1849
1850 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
1851
1852 * sem_prag.adb (Analyze_Pragma): Replace call to Unique_Defining_Entity
1853 with a semantically equivalent call to Defining_Entity.
1854
1855 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
1856
1857 * sem_prag.adb (Analyze_Pragma): Set Etype on the rewritten
1858 Max_Queue_Length expression.
1859
1860 2018-05-31 Sergey Rybin <rybin@adacore.com>
1861
1862 * doc/gnat_ugn/gnat_and_program_execution.rst: gnatelim does not need
1863 that the main unit to be built before the call, now it computes the
1864 closure of the main unit itself.
1865 * gnat_ugn.texi: Regenerate.
1866
1867 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
1868
1869 * repinfo.adb (List_Structural_Record_Layout): Set First to false
1870 after having listed the fields of the parent type, if any.
1871
1872 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
1873
1874 * gcc-interface/decl.c (gnat_to_gnu_entity) <discrete_type>: Do not
1875 deal with the ___XP suffix for packed array types here...
1876 <E_Array_Subtype>: ...or here when processing the implementation type
1877 but when processing the original type instead. Do not reuse the DECL
1878 of the implementation type for the original type. Tidy up.
1879
1880 2018-05-31 Eric Botcazou <ebotcazou@adacore.com>
1881
1882 * einfo.ads (Object_Size_Clause): Declare.
1883 * einfo.adb (Object_Size_Clause): New function.
1884 * gcc-interface/utils.c (maybe_pad_type): Test Has_Size_Clause before
1885 retrieving Size_Clause and post the warning on the object size clause
1886 if Has_Object_Size_Clause is true.
1887
1888 2018-05-31 Javier Miranda <miranda@adacore.com>
1889
1890 * sem_util.ads, sem_util.adb (Find_Primitive_Eq): New subprogram.
1891 * exp_ch4.adb (Expand_Composite_Equality): Use the new subprogram
1892 Find_Primitive_Eq to search for the primitive of types whose underlying
1893 type is a tagged type.
1894
1895 2018-05-31 Yannick Moy <moy@adacore.com>
1896
1897 * sem_prag.adb (Analyze_Pragma.Check_Loop_Pragma_Placement): Inverse
1898 order of treatment between nodes recognized as loop pragmas (or
1899 generated from one) and block statements.
1900
1901 2018-05-31 Doug Rupp <rupp@adacore.com>
1902
1903 * libgnat/s-osprim__posix2008.adb (Clock): Implement using
1904 clock_gettime.
1905
1906 2018-05-31 Ed Schonberg <schonberg@adacore.com>
1907
1908 * exp_unst.ads, exp_unst.adb (In_Synchronized_Unit): New predicate to
1909 mark subprograms that cannot be eliminated because they must be treated
1910 as reachable from outside the current unit. This includes entry bodies
1911 and protected operations.
1912
1913 2018-05-31 Ed Schonberg <schonberg@adacore.com>
1914
1915 * exp_ch4.adb (Expand_Modular_Addition, Expand_Modular_Subtraction):
1916 Convert all operands of the generated code to Standard.Unsigned, to
1917 prevent spurious visibility errors. This is needed when the generated
1918 expansion involves a modular index type of an array type, and the index
1919 type is not immediately visible.
1920
1921 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
1922
1923 * einfo.ads (Package_Instantiation): Update comment after a routine
1924 that uses this field has been renamed.
1925
1926 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1927
1928 * exp_ch11.adb (Replace_Raise_By_Goto): The transfomation is legal even
1929 if the local raise statement includes a string expression. This
1930 expression might be picked up by an outer handler or discarded, but
1931 plays no role in this transformation.
1932
1933 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
1934
1935 * exp_aggr.adb, exp_unst.adb, freeze.adb, libgnat/a-direct.adb: Minor
1936 reformatting.
1937
1938 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1939
1940 * exp_unst.adb (Visit_Node): Handle the semantic Procedure_To_Call
1941 field in relevant nodes: Allocate, Free, and return statements.
1942
1943 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1944
1945 * exp_unst.adb (Visit_Node): Do not traverse a Component_Association
1946 that has not been analyzed, as will be the case for a nested aggregate
1947 that is expanded into individual assignments.
1948
1949 2018-05-30 Justin Squirek <squirek@adacore.com>
1950
1951 * aspects.adb, aspects.ads: Register new aspect.
1952 * par-prag.adb (Prag): Register new pragma.
1953 * sem_ch13.adb (Analyze_Aspect_Specifications): Add processing for new
1954 aspect similar to Aspect_Max_Queue_Length.
1955 * sem_prag.adb, sem_prag.ads (Analyze_Pragma): Register new pragma and
1956 set it to use the same processing as Pragma_Max_Queue_Length.
1957 * snames.ads-tmpl: Move definition of Name_Max_Entry_Queue_Depth so
1958 that it can be processed as a pragma in addition to a restriction and
1959 add an entry for the pragma itself.
1960
1961 2018-05-30 Ed Schonberg <schonberg@adacore.com>
1962
1963 * freeze.adb (Freeze_Object_Declaration): A pragma Thread_Local_Storage
1964 is now legal on a variable of composite type initialized with an
1965 aggregate that is fully static and requires no elaboration code.
1966 * exp_aggr.adb (Convert_To_Positional): Recognize additional cases of
1967 nested aggregates that are compile-time static, so they can be used to
1968 initialize variables declared with Threqd_Local_Storage.
1969 * doc/gnat_rm/implementation_defined_pragmas.rst: Add documentation on
1970 Thread_Local_Storage.
1971 * gnat_rm.texi: Regenerate.
1972
1973 2018-05-30 Yannick Moy <moy@adacore.com>
1974
1975 * sem_util.adb (Policy_In_Effect): Take into account CodePeer and
1976 GNATprove modes.
1977
1978 2018-05-30 Justin Squirek <squirek@adacore.com>
1979
1980 * libgnat/a-direct.adb, libgnat/a-direct.ads (Name_Case_Equivalence):
1981 Add implementation.
1982 (Start_Search): Modify to use Start_Search_Internal
1983 (Start_Search_Internal): Add to break out an extra flag for searching
1984 case insensative due to the potential for directories within the same
1985 OS to allow different casing schemes.
1986 * sysdep.c (__gnat_name_case_equivalence): Add as a default fallback
1987 for when the more precise solution fails.
1988
1989 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
1990
1991 * checks.adb, exp_ch5.adb, exp_ch7.adb, exp_unst.adb, sem_eval.adb:
1992 Minor reformatting.
1993
1994 2018-05-30 Pascal Obry <obry@adacore.com>
1995
1996 * libgnat/g-comlin.ads (Value_Callback, Define_Switch): New.
1997 * libgnat/g-comlin.adb: Add corresponding implementation.
1998
1999 2018-05-30 Gary Dismukes <dismukes@adacore.com>
2000
2001 * sem_res.adb, sem_util.adb: Fix several typos.
2002
2003 2018-05-30 Olivier Hainque <hainque@adacore.com>
2004
2005 * vx_crtbegin_attr.c (CTOR_ATTRIBUTE, DTOR_ATTRIBUTE): Empty.
2006 (eh_registration_ctors, eh_registration_tors): New static variables,
2007 forced in a .ctors/.dtors section, respectively, with priority.
2008
2009 2018-05-30 Bob Duff <duff@adacore.com>
2010
2011 * aspects.ads, contracts.adb, exp_util.adb, expander.adb, expander.ads,
2012 freeze.adb, inline.adb, lib-xref.adb, sem.ads, sem_aggr.adb,
2013 sem_attr.adb, sem_ch13.adb, sem_ch3.adb, sem_ch5.adb, sem_ch6.adb,
2014 sem_ch8.adb, sem_dim.adb, sem_elab.adb, sem_res.adb, sem_res.ads,
2015 sinfo.ads: Spell preanalysis, preanalyze correctly.
2016
2017 2018-05-30 Bob Duff <duff@adacore.com>
2018
2019 * libgnat/g-sestin.ads: Rework documentation comments.
2020
2021 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
2022
2023 * errout.adb, exp_aggr.adb, exp_ch7.adb, exp_util.adb, lib.adb,
2024 sem_ch13.adb, sem_ch4.adb, sem_res.adb, sem_util.adb
2025 (Has_Original_Node): Refactor to use Is_Rewrite_Substitution.
2026
2027 2018-05-30 Piotr Trojanek <trojanek@adacore.com>
2028
2029 * sem_prag.adb (Analyze_Pragma): Remove conjuncts that are always true.
2030
2031 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
2032
2033 * sem_util.adb (Is_Atomic_Object): Cleaned up. Split the entity logic
2034 in a separate routine.
2035 (Is_Atomic_Object_Entity): New routine.
2036 (Is_Atomic_Prefix): Cleaned up.
2037 (Is_Synchronized_Object): Check that the object is atomic, or its type
2038 is atomic.
2039 (Object_Has_Atomic_Components): Removed.
2040 * sem_util.ads (Is_Atomic_Object): Reword the comment on usage.
2041 (Is_Atomic_Object_Entity): New routine.
2042
2043 2018-05-30 Ed Schonberg <schonberg@adacore.com>
2044
2045 * sem_ch3.adb (Access_Subprogram_Declaration): The flag
2046 Needs_Activation_Record is only needed on a subprogram type, not on a
2047 pointer to such.
2048 * sem_res.adb (Resolve_Selected_Component): If the context type and the
2049 component type are anonymous access to subprograms, use the component
2050 type to obtain the proper value of Needs_Activation_Record flag for the
2051 expression.
2052
2053 2018-05-30 Eric Botcazou <ebotcazou@adacore.com>
2054
2055 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>: Add
2056 comment about the memset case.
2057
2058 2018-05-30 Bob Duff <duff@adacore.com>
2059
2060 * exp_ch5.adb (Expand_Formal_Container_Element_Loop): Remove the code
2061 to analyze the Elmt_Decl, because it gets analyzed in the wrong scope.
2062 We need to analyze it as part of analyzing the block, so that if the
2063 call to Element that initializes Elmt_Decl returns on the secondary
2064 stack, the block will ss_mark/ss_release. This block is inside the
2065 loop; we don't want to leak memory until the loop exits. The purpose
2066 of analyzing Elmt_Decl first was to catch the error of modifying it,
2067 which is illegal because it's a loop parameter. The above causes us to
2068 miss that error. Therefore, we add a flag Is_Loop_Parameter, and set
2069 it on the Element entity, so we end up with an E_Variable node with the
2070 flag set.
2071 * einfo.ads, einfo.adb (Is_Loop_Parameter): New flag.
2072 * sem_ch5.adb (Diagnose_Non_Variable_Lhs): Give the "assignment to loop
2073 parameter not allowed" error if Is_Loop_Parameter.
2074 * sem_util.adb (Is_Variable): Return False if Is_Loop_Parameter, to
2075 trigger the call to Diagnose_Non_Variable_Lhs.
2076
2077 2018-05-30 Arnaud Charlet <charlet@adacore.com>
2078
2079 * checks.adb (Apply_Scalar_Range_Check):
2080 * sem_eval.adb (Check_Non_Static_Context, Out_Of_Range): Ignore out of
2081 range values for System.Priority in CodePeer mode since the actual
2082 target compiler may provide a wider range.
2083
2084 2018-05-30 Ed Schonberg <schonberg@adacore.com>
2085
2086 * exp_unst.adb: Search specification of main unit as well, for
2087 unnesting.
2088
2089 2018-05-30 Ed Schonberg <schonberg@adacore.com>
2090
2091 * exp_ch7.adb (Check_Unnesting_Elaboration_Code): The statement part of
2092 a package body that is a compilation unit may contain blocks that
2093 declare local subprograms. In Subprogram_Unnesting Mode such
2094 subprograms must be handled as nested inside the (implicit) elaboration
2095 procedure that executes that statement part. To handle properly uplevel
2096 references we construct that subprogram explicitly, to contain blocks
2097 and inner subprograms, The statement part of the compilation unit
2098 becomes a call to this subprogram. This is only done if blocks are
2099 present in the statement list of the body.
2100
2101 2018-05-30 Bob Duff <duff@adacore.com>
2102
2103 * exp_ch7.adb: Minor comment fix.
2104
2105 2018-05-30 Ed Schonberg <schonberg@adacore.com>
2106
2107 * exp_unst.adb (Visit_Node): Handle properly subprogram instantiations
2108 that have no corresponding body and appear as attributes of the
2109 corresponding wrapper package declaration.
2110 (Register_Subprogram): New subprogram, used for subprogram bodies and
2111 for subprogram instantiations to enter callable entity into Subp table.
2112
2113 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
2114
2115 * libgnat/s-secsta.adb: Reimplement the secondary stack support.
2116 * libgnat/s-secsta.ads: Update the documentation of all routines in the
2117 public part of the package. Reimplement the private part of the
2118 package to account for the new secondary stack structure. Add types
2119 and subprograms for testing purposes. Add several documentation
2120 sections.
2121
2122 2018-05-30 Hristian Kirtchev <kirtchev@adacore.com>
2123
2124 * exp_aggr.adb, exp_ch3.adb, exp_ch4.adb, exp_ch7.adb, exp_unst.adb,
2125 exp_util.adb, exp_util.ads, libgnat/a-calcon.adb, libgnat/a-calcon.ads,
2126 libgnat/s-os_lib.adb, repinfo.adb, sem_ch3.adb, sem_disp.adb,
2127 sem_disp.ads, sem_util.adb: Minor reformatting.
2128
2129 2018-05-30 Arnaud Charlet <charlet@adacore.com>
2130
2131 * gcc-interface/Makefile.in: Move special flags for Ada runtime files
2132 from here...
2133 * Makefile.rtl: ... to here. Update comments. Protect call to
2134 "GCC_FOR_TARGET" in case target_os isn't defined.
2135
2136 2018-05-30 Arnaud Charlet <charlet@adacore.com>
2137
2138 * gcc-interface/Makefile.in: Move target pair settings from here...
2139 * Makefile.rtl: ... to here.
2140 (setup-rts): New target.
2141
2142 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
2143
2144 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Alphabetical
2145 List of All Switches): Replace "modules" with "units".
2146 (Subprogram Inlining Control): Likewise.
2147 * gnat_ugn.texi: Regenerate.
2148 * usage.adb (Usage): Fix description of -gnatn switch.
2149
2150 2018-05-29 Arnaud Charlet <charlet@adacore.com>
2151
2152 * gcc-interface/Makefile.in: Fix typos.
2153
2154 2018-05-29 Ed Schonberg <schonberg@adacore.com>
2155
2156 * exp_ch7.adb (Build_Finalizer_Call): Attach to tree the reference to
2157 the finalizer procedure in the At_End handler, for use in LLVM
2158 generation.
2159
2160 2018-05-29 Javier Miranda <miranda@adacore.com>
2161
2162 * exp_ch4.adb (Expand_N_Op_Eq, Expand_Composite_Equality): Use the new
2163 subprogram Inherits_From_Tagged_Full_View to identify more reliably
2164 untagged private types completed with a derivation of an untagged
2165 private whose full view is a tagged type.
2166 * sem_util.ads, sem_util.adb (Inherits_From_Tagged_Full_View): New
2167 subprogram.
2168 (Collect_Primitive_Operations): Handle untagged private types completed
2169 with a derivation of an untagged private type whose full view is a
2170 tagged type. In such case, collecting the list of primitives we may
2171 find two equality primitives: one associated with the untagged private
2172 and another associated with the ultimate tagged type (and we must
2173 remove from the returned list this latter one).
2174
2175 2018-05-29 Ed Schonberg <schonberg@adacore.com>
2176
2177 * exp_unst.adb (Visit_Node): Handle statement sequences that include an
2178 At_End handler.
2179
2180 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
2181
2182 * repinfo.adb (List_Entities): Also recurse into blocks without label.
2183
2184 2018-05-29 Ed Schonberg <schonberg@adacore.com>
2185
2186 * exp_ch6.adb (Expand_N_Subprogram_Body): Do not generate push/pop for
2187 exceptions if subprogram unnesting is in effect, because these branch
2188 nodes are relevant only in the presence of nested subprograms.
2189
2190 2018-05-29 Ed Schonberg <schonberg@adacore.com>
2191
2192 * libgnat/s-fatgen.adb (Succ, Pred): Raise Constraint_Error
2193 unconditionally when applied to the largest positive (resp. largest
2194 negative) value of a floating-point type.
2195
2196 2018-05-29 Ed Schonberg <schonberg@adacore.com>
2197
2198 * einfo.ads, einfo.adb: Clarify use of Activation_Record_Component:
2199 discriminants and exceptions are never components of such. The flag
2200 Needs_Activation_Record is set on subprogram types, not on access to
2201 them.
2202
2203 2018-05-29 Ed Schonberg <schonberg@adacore.com>
2204
2205 * sem_ch3.adb: Set scope of component of subtype.
2206
2207 2018-05-29 Ed Schonberg <schonberg@adacore.com>
2208
2209 * exp_unst.adb (Visit_Node): Exclude selected components whose prefix
2210 carry no type. Such selected components appear in unit names that are
2211 child units, both in the specification and possibly in an end label for
2212 the unit, and they do not contain any relevant uplevel references.
2213
2214 2018-05-29 Arnaud Charlet <charlet@adacore.com>
2215
2216 * libgnat/a-calend.ads, libgnat/a-calend.adb (Epoch_Offset): Make it a
2217 function.
2218
2219 2018-05-29 Olivier Hainque <hainque@adacore.com>
2220
2221 * libgnat/system-vxworks7-ppc-rtp.ads: New file.
2222 * libgnat/system-vxworks7-ppc-kernel.ads: New file.
2223 * libgnat/system-vxworks7-e500-rtp.ads: New file.
2224 * libgnat/system-vxworks7-e500-kernel.ads: New file.
2225 * libgnat/system-vxworks7-x86-rtp.ads: New file.
2226 * libgnat/system-vxworks-ppc64-kernel.ads: Rename as ...
2227 * libgnat/system-vxworks7-ppc64-kernel.ads: and adjust name of
2228 gnat-crtbe link spec to use the vx7 variant.
2229
2230 2018-05-29 Olivier Hainque <hainque@adacore.com>
2231
2232 * vx_crtbegin.inc: Use a consistent naming convention for the
2233 registration/deregistration functions across RTP or kernel. Remove the
2234 ctor/dtor attribute setting based on RTP/kernel, expect the optional
2235 attribute extension to be provided by includers instead.
2236 * vx_crtbegin.c: Mere inclusion of vx_crtbegin.inc with empty attribute
2237 extension for the registration/deregistration functions.
2238 * vx_crtbegin_attr.c: New file. Include vx_crtbegin.inc with explicit
2239 constructor/destructor attribute extensions.
2240 * vx_crtbegin_array.c: New file. Include vx_crtbegin.inc with empty
2241 attribute extensions and declare _ctors/_dtors arrays.
2242 * vx_crtbegin_auto.c: Remove.
2243 * libgnat/system-vxworks7-aarch64-rtp-smp.ads: Use
2244 vxworks7-gnat-crtbe-link.spec.
2245 * libgnat/system-vxworks7-aarch64.ads: Likewise.
2246 * libgnat/system-vxworks7-e500-rtp-smp.ads: Likewise.
2247 * libgnat/system-vxworks7-ppc-rtp-smp.ads: Likewise.
2248 * libgnat/system-vxworks7-ppc64-rtp-smp.ads: Likewise.
2249 * libgnat/system-vxworks7-x86-kernel.ads: Likewise.
2250 * libgnat/system-vxworks7-x86-rtp-smp.ads: Likewise.
2251 * libgnat/system-vxworks7-x86_64-kernel.ads: Likewise.
2252 * libgnat/system-vxworks7-x86_64-rtp-smp.ads: Likewise.
2253
2254 2018-05-29 Piotr Trojanek <trojanek@adacore.com>
2255
2256 * ali.adb: Minor reformatting.
2257
2258 2018-05-29 Joel Brobecker <brobecker@adacore.com>
2259
2260 * doc/gnat_ugn/platform_specific_information.rst: Update package
2261 requirements for 32bit GNAT on x86_64-linux.
2262 * gnat_ugn.texi: Regenerate.
2263
2264 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
2265
2266 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Debugging
2267 Control): Adjust description of -gnatRj.
2268 * gnat_ugn.texi: Regenerate.
2269 * opt.ads (List_Representation_Info_To_JSON): Likewise.
2270 * repinfo.adb (List_Rep_Info): Do not automatically create a file
2271 if List_Representation_Info_To_JSON is true.
2272 * switch-c.adb (Scan_Front_End_Switches) <R>: Remove incompatibility
2273 check between -gnatRj and -gnatRs.
2274 * usage.adb (Usage): Adjust description of -gnatRj.
2275
2276 2018-05-29 Pascal Obry <obry@adacore.com>
2277
2278 * libgnat/s-os_lib.adb (Normalize_Pathname): Fix handling of ".." in
2279 the root directory.
2280
2281 2018-05-29 Pascal Obry <obry@adacore.com>
2282
2283 * libgnat/s-os_lib.adb: Minor reformatting.
2284
2285 2018-05-29 Doug Rupp <rupp@adacore.com>
2286
2287 * libgnat/a-calend.adb (Epoch_Offset): Move from body to ...
2288 * libgnat/a-calend.ads (Epoch_Offset): to private part of spec
2289 * libgnat/a-calcon.ads (To_Unix_Nano_Time): New function spec.
2290 * libgnat/a-calcon.adb (To_Unix_Nano_Time): New function body.
2291
2292 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
2293
2294 * repinfo.ads (JSON format): Document new pair for components.
2295 * repinfo.adb (Derived_Discriminant): New function.
2296 (List_Structural_Record_Layout): Add Outer_Ent parameter and pass it
2297 in recursive calls. If the record type is the parent of an extension,
2298 find and list the derived discriminant from the extension, if any.
2299 (List_Component_Layout): List the Discriminant_Number in JSON mode.
2300 (List_Record_Info): Adjust call to List_Structural_Record_Layout.
2301
2302 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
2303
2304 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (Alphabetical
2305 List of All Switches): Document -gnatRj.
2306 (Debugging Control): Likewise.
2307 * gnat_ugn.texi: Regenerate.
2308 * opt.ads (List_Representation_Info_To_JSON): New boolean variable.
2309 * osint-c.adb (Create_Repinfo_File): Use the .json instead of .rep
2310 extension if List_Representation_Info_To_JSON is true.
2311 * repinfo.ads: Document the JSON output format.
2312 * repinfo.adb (List_Location): New procedure.
2313 (List_Array_Info): Add support for JSON output.
2314 (List_Entities): Likewise.
2315 (Unop): Likewise.
2316 (Binop): Likewise.
2317 (Print_Expr): Likewise.
2318 (List_Linker_Section): Likewise.
2319 (List_Mechanisms): Likewise.
2320 (List_Name): Likewise.
2321 (List_Object_Info): Likewise.
2322 (List_Record_Info): Likewise.
2323 (List_Component_Layout): Likewise. Add Indent parameter.
2324 (List_Structural_Record_Layout): New procedure.
2325 (List_Attr): Add support for JSON output.
2326 (List_Type_Info): Likewise.
2327 (Write_Unknown_Val): Likewise.
2328 * switch-c.adb (Scan_Front_End_Switches) <R>: Deal with 'j'.
2329 * usage.adb (Usage): List -gnatRj.
2330
2331 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
2332
2333 * repinfo.adb (List_Component_Layout): New procedure extracted from...
2334 (List_Record_Layout): ...here. Invoke it.
2335
2336 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
2337
2338 * repinfo.adb (Write_Unknown_Val): New procedure.
2339 (List_GCC_Expression): Call it.
2340 (List_Record_Layout): Likewise.
2341 (Write_Val): Likewise.
2342
2343 2018-05-29 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
2344
2345 * exp_ch4.adb (Expand_N_Op_Abs): Clear Do_Overflow_Check when inserting
2346 code to do check.
2347
2348 2018-05-29 Arnaud Charlet <charlet@adacore.com>
2349
2350 * lib-writ.adb (Write_ALI): Do not use new function from s-casuti yet.
2351 This breaks build of cross compilers with older versions of GNAT, so
2352 better avoid it.
2353
2354 2018-05-29 Doug Rupp <rupp@adacore.com>
2355
2356 * libgnarl/s-taprop.ads (Monotonic_Clock): Refine documentation to
2357 reflect reality.
2358
2359 2018-05-29 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
2360
2361 * exp_ch4.adb (Expand_N_Op_Abs): Always do range check against 'First.
2362
2363 2018-05-29 Eric Botcazou <ebotcazou@adacore.com>
2364
2365 * repinfo.adb (List_Entities): Do not list the Linker_Section for
2366 subprograms here...
2367 (List_Mechanisms): ...but here instead. Use consistent name output
2368 and formatting conventions.
2369
2370 2018-05-29 Bob Duff <duff@adacore.com>
2371
2372 * lib-writ.adb (Write_ALI): Cleanup: avoid use of global var; call new
2373 To_Lower function.
2374 * libgnat/s-casuti.ads, libgnat/s-casuti.adb (To_Upper, To_Lower,
2375 To_Mixed): New functions.
2376 * osint.adb: Cleanup: use Is_Directory_Separator, which correctly
2377 allows both '\' and '/' on Windows.
2378
2379 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
2380
2381 * repinfo.ads: Minor fixes and tweaks in comments.
2382
2383 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
2384
2385 * repinfo.adb (List_GCC_Expression): Remove Valop and replace calls to
2386 it with calls to Unop.
2387
2388 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
2389
2390 * repinfo.ads (TCode): Adjust range.
2391 (Truth_Andif_Expr): Remove.
2392 (Truth_Orif_Expr): Likewise.
2393 (Truth_And_Expr .. Dynamic_Val): Adjust value.
2394 * repinfo.adb (Print_Expr): Remove handling of Truth_{And,Or}if_Expr.
2395 (Rep_Value): Likewise.
2396 * repinfo.h (Truth_Andif_Expr): Remove.
2397 (Truth_Orif_Expr): Likewise.
2398 (Truth_And_Expr .. Dynamic_Val): Adjust value.
2399 * gcc-interface/decl.c (annotate_value) <TRUTH_ANDIF_EXPR>: Fall
2400 through to TRUTH_AND_EXPR case.
2401 <TRUTH_ORIF_EXPR>: Fall through to TRUTH_OR_EXPR case.
2402
2403 2018-05-28 Ed Schonberg <schonberg@adacore.com>
2404
2405 * exp_unst.adb (Visit_Node): For indexed components and attribute
2406 references, examine index expressions or associated expressions as well
2407 to record uplevel references.
2408 (Vist_Node): For function and procedure calls, if a formal is an
2409 unconstrained array and the actual is constrained, check whether bounds
2410 of actual have uplevel references.
2411
2412 2018-05-28 Ed Schonberg <schonberg@adacore.com>
2413
2414 * einfo.ads, einfo.adb: Exceptions can be uplevel references, and thus
2415 they can appear as components of activation records.
2416 * exp_unst.adb (Visit_Node): A reference to an exception may be an
2417 uplevel reference.
2418
2419 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
2420
2421 * exp_ch4.adb (Expand_Composite_Equality): Compute whether the size
2422 depends on a discriminant manually instead of using the predicate
2423 Size_Depends_On_Discriminant in the array type case.
2424
2425 2018-05-28 Ed Schonberg <schonberg@adacore.com>
2426
2427 * exp_unst.adb (Check_Static_Type): For a record subtype, check
2428 discriminant constraints as well.
2429 (Visit_Node): For a selected component, check type of prefix, as is
2430 done for indexed components and slices.
2431
2432 2018-05-28 Javier Miranda <miranda@adacore.com>
2433
2434 * exp_ch4.adb (Real_Range_Check): Add a temporary to store the integer
2435 value when converting a float value to a fixed-point value. This is
2436 required for CCG because it handles fixed-point types by means of
2437 unsigned integer type variables. The range check is now performed using
2438 the integer value stored in this temporary.
2439
2440 2018-05-28 Yannick Moy <moy@adacore.com>
2441
2442 * sem_util.adb (Is_OK_Volatile_Context): Add attributes First, Last and
2443 Length as valid non-interfering contexts for SPARK.
2444
2445 2018-05-28 Claire Dross <dross@adacore.com>
2446
2447 * sem_disp.ads, sem_disp.adb (Inheritance_Utilities): Package for
2448 generic inheritance utilities.
2449 (Generic_Inherited_Subprograms): Generic version of
2450 Inherited_Subprograms, generic in Find_Dispatching_Type function.
2451 (Generic_Is_Overriding_Subprogram): Generic version of
2452 Is_Overriding_Subprogram, generic in Find_Dispatching_Type function.
2453 (Inherited_Subprograms): Instance of Generic_Inherited_Subprograms with
2454 Sem_Disp.Find_Dispatching_Type.
2455 (Is_Overriding_Subprogram): Instance of
2456 Generic_Is_Overriding_Subprogram with Sem_Disp.Find_Dispatching_Type.
2457 (Inheritance_Utilities_Inst): Instance of Inheritance_Utilities
2458 with Sem_Disp.Find_Dispatching_Type.
2459
2460 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
2461
2462 * exp_ch4.adb (Expand_Composite_Equality): For a composite (or FP)
2463 component type, do not expand array equality using the unconstrained
2464 base type, except for the case where the bounds of the type depend on a
2465 discriminant.
2466
2467 2018-05-28 Ed Schonberg <schonberg@adacore.com>
2468
2469 * einfo.ads, einfo.adb (Needs_Activation_Record): New flag on
2470 access-to-subprogram types, to indicate that an indirect call through
2471 such a type requires an activation record when compiling for LLVM.
2472 * sem_ch3.adb (Access_Subprogram_Declaration): Set new flag as needed.
2473
2474 2018-05-28 Ed Schonberg <schonberg@adacore.com>
2475
2476 * exp_ch4.adb (Real_Range_Check): Specialize float-to-fixed conversions
2477 when bounds of fixed type are static, to remove some spuerfluous
2478 implicit conversions and provide an accurate result when converting
2479 back and forth between the fixed point type and a floating point type.
2480
2481 2018-05-28 Ed Schonberg <schonberg@adacore.com>
2482
2483 * exp_unst.adb (Unnest_Subprogram): Prevent creation of empty
2484 activation records.
2485
2486 2018-05-28 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
2487
2488 * exp_unst.adb (Check_Static_Type): Add argument to indicate node to be
2489 replaced, if any; all callers changed.
2490 (Note_Uplevel_Ref): Likewise. Also replace reference to deferred
2491 constant with private view so we take the address of that entity.
2492 (Note_Uplevel_Bound): Add argument to indicate node to be replaced, if
2493 any; all callers changed. Handle N_Indexed_Component like
2494 N_Attribute_Reference. Add N_Type_Conversion case.
2495 (Visit_Node): Indexed references can be uplevel if the type isn't
2496 static.
2497 (Unnest_Subprograms): Don't rewrite if no reference given. If call has
2498 been relocated, set first_named pointer in original node as well.
2499
2500 2018-05-28 Ed Schonberg <schonberg@adacore.com>
2501
2502 * exp_aggr.adb (Flatten): Copy tree of expression in a component
2503 association with a range or a set of discrete choices, rather than
2504 relocating the node. This avoids inconsistencies in the tree when
2505 handling nested subprograms with uplevel references for LLVM.
2506
2507 2018-05-28 Arnaud Charlet <charlet@adacore.com>
2508
2509 * exp_util.adb (Possible_Bit_Aligned_Component): Always return False in
2510 codepeer mode.
2511
2512 2018-05-28 Arnaud Charlet <charlet@adacore.com>
2513
2514 * exp_unst.adb: Fix typo.
2515
2516 2018-05-28 Bob Duff <duff@adacore.com>
2517
2518 * libgnat/a-convec.adb (Query_Element): Minor cleanup: remove an
2519 unnecessary use of 'Unrestricted_Access.
2520
2521 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
2522
2523 * repinfo.adb (Expr_Value_S): New routine.
2524 (List_Linker_Section): Properly extract the value of the section
2525 argument.
2526
2527 2018-05-28 Patrick Bernardi <bernardi@adacore.com>
2528
2529 * doc/gnat_ugn/building_executable_programs_with_gnat.rst: Update the
2530 description of the -D binder switch to reflect current usage.
2531 * gnat_ugn.texi: Regenerate.
2532
2533 2018-05-28 Gary Dismukes <dismukes@adacore.com>
2534
2535 * exp_ch3.adb: Minor reformatting
2536
2537 2018-05-28 Justin Squirek <squirek@adacore.com>
2538
2539 * exp_ch3.adb
2540 (Build_Initialization_Call): Add logic to pass the appropriate actual to match
2541 new formal.
2542 (Init_Formals): Add new formal *_skip_null_excluding_check
2543 * exp_util.adb, exp_util.ads
2544 (Enclosing_Init_Proc): Added to fetch the enclosing Init_Proc from the current
2545 scope.
2546 (Inside_Init_Proc): Refactored to use Enclosing_Init_Proc
2547 (Needs_Conditional_Null_Excluding_Check): Added to factorize the predicate
2548 used to determine how to generate an Init_Proc for a given type.
2549 (Needs_Constant_Address): Minor reformatting
2550 * sem_res.adb
2551 (Resolve_Null): Add logic to generate a conditional check in certain cases
2552
2553 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
2554
2555 * exp_aggr.adb, gnatlink.adb, sem_ch6.adb, sem_res.adb, sem_util.adb:
2556 Minor reformatting.
2557
2558 2018-05-28 Hristian Kirtchev <kirtchev@adacore.com>
2559
2560 * sem_prag.adb (Process_Atomic_Independent_Shared_Volatile): Include
2561 the declarations of single concurrent types because they fall in the
2562 category of full type and object declarations.
2563
2564 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
2565
2566 * repinfo.adb (Compute_Max_Length): Skip _Parent component.
2567 (List_Record_Layout): Likewise.
2568
2569 2018-05-28 Ed Schonberg <schonberg@adacore.com>
2570
2571 * sem_util.adb (Is_Function_Result): Add a warning if a postcondition
2572 includes a call to function to which it applies. This may mean an
2573 omission of an attribute reference 'Result, in particular if the
2574 function is pqrameterless.
2575
2576 2018-05-28 Justin Squirek <squirek@adacore.com>
2577
2578 * sem_ch8.adb (Find_Expanded_Name): Add extra guard to make sure the
2579 misresolved package name is not a case of mistaken identity.
2580
2581 2018-05-28 Yannick Moy <moy@adacore.com>
2582
2583 * sem_res.adb (Resolve_Range): Re-resolve the low bound of a range in
2584 GNATprove mode, as the order of resolution (low then high) means that
2585 all the information is not available when resolving the low bound the
2586 first time.
2587
2588 2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
2589
2590 * repinfo.adb (List_Array_Info): Start with an explicit blank line and
2591 end with the linker section, if any.
2592 (List_Entities): Do not output the linker section for record types,
2593 array types and variables.
2594 (Print_Expr): Factor out common processing for unary operators and
2595 special values. Adjust and reorder the various cases.
2596 (List_Object_Info): End with the linker section, if any.
2597 (List_Record_Info): Likewise.
2598 (List_Type_Info): Do not start with a blank line.
2599
2600 2018-05-25 Nicolas Roche <roche@adacore.com>
2601
2602 * libgnat/s-valrea.adb (Scan_Real): Abort computation once it is sure
2603 that the result will be either -infinite or +infinite.
2604
2605 2018-05-25 Patrick Bernardi <bernardi@adacore.com>
2606
2607 * libgnat/s-parame.ads, libgnat/s-parame__vxworks.ads,
2608 libgnat/s-parame__ae653.ads, libgnat/s-parame__hpux.ads (Size_Type):
2609 Expand range of type to match the address space of the target.
2610 (Task_Storage_Size): Remove unused type.
2611
2612 2018-05-25 Ed Schonberg <schonberg@adacore.com>
2613
2614 * sem_res.adb (Set_Mixed_Mode_Operand): If the operand is an expression
2615 of a fixed point type and the parent is a multiplying operation,
2616 resolve the operand with its own type because the context will impose a
2617 resulting type on the result of the multiplication by means of
2618 approriate conversion.
2619
2620 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
2621
2622 * exp_ch3.adb (Default_Initialize_Object): Ensure that the analysis of
2623 the in-place initialization aggregate created for pragmas
2624 Initialize_Scalars or Normalize_Scalars is performed with checks
2625 suppressed.
2626
2627 2018-05-25 Arnaud Charlet <charlet@adacore.com>
2628
2629 * exp_aggr.adb (Convert_To_Positional): Bump default for
2630 Max_Others_Replicate to 32. Update comments.
2631 * osint.ads (Unknown_Attributes): No longer pretend this is a constant.
2632 (No_File_Info_Cache): Initialize separately.
2633 * osint.adb (No_File_Info_Cache): Update initializer.
2634
2635 2018-05-25 Javier Miranda <miranda@adacore.com>
2636
2637 * sem_res.adb (Resolve_Membership_Op): Allow the use of the membership
2638 test when the left operand is a class-wide interface and the right
2639 operand is not a class-wide type.
2640 * exp_ch4.adb (Tagged_Membership): Adding support for interface as the
2641 left operand.
2642
2643 2018-05-25 Ed Schonberg <schonberg@adacore.com>
2644
2645 * exp_aggr.adb (Flatten): A quantified expression cannot be duplicated
2646 in an others clause to prevent visibility issues with the generated
2647 loop variable.
2648 (Component_OK_For_Backend): Return false for a quantified expression.
2649 (Check_Static_Component): Ditto.
2650
2651 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
2652
2653 * libgnat/s-secsta.adb (SS_Allocate): Reimplemented.
2654 (SS_Allocate_Dynamic): New routine. The allocation logic is now split
2655 into three distring cases rather than in one loop which attempts to
2656 handle all three cases. This rewrite eliminates an issue where the last
2657 frame of the stack cannot be freed, thus causing the memory range of a
2658 new frame to approach the overflow point of the memory index type.
2659 Since the overflow is logically treated as a
2660 too-much-memory-on-the-stack scenario, it causes a bogus Storage_Error.
2661 (SS_Allocate_Static): New routine. The routine factorizes the static
2662 secondary stack-related code from the former SS_Allocate.
2663
2664 2018-05-25 Sergey Rybin <rybin@adacore.com>
2665
2666 * doc/gnat_ugn/gnat_and_program_execution.rst: Add description of '-U'
2667 option for gnatelim.
2668
2669 2018-05-25 Ed Schonberg <schonberg@adacore.com>
2670
2671 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Do not create
2672 Class_Wide_Clone_Body when analyzing a subprogram_body_stub: the clone
2673 is created when the proper body of the stub is analyzed.
2674 * sem_util.adb (ZBuild_Class_Wide_Clone_Body): If the subprogram body
2675 is the proper body of a subunit, the cloned body must be inserted in
2676 the declarative list that contains the stub.
2677
2678 2018-05-25 Justin Squirek <squirek@adacore.com>
2679
2680 * exp_ch6.adb (Expand_Simple_Function_Return): Add guard in check to
2681 generate code for 6.5(8-10) so that we don't get an assertion error
2682 when dealing with an incomplete return type.
2683
2684 2018-05-25 Arnaud Charlet <charlet@adacore.com>
2685
2686 * pprint.adb (Expression_Name): Strip too long expressions to avoid
2687 carrying very large strings.
2688
2689 2018-05-25 Patrick Bernardi <bernardi@adacore.com>
2690
2691 * switch-b.adb (Scan_Binder_Switches): binder switch -Q accepts Natural
2692 numbers.
2693
2694 2018-05-25 Doug Rupp <rupp@adacore.com>
2695
2696 * tracebak.c (aarch64-linux): Implement.
2697
2698 2018-05-25 Justin Squirek <squirek@adacore.com>
2699
2700 * sem_ch8.adb: Minor reformatting.
2701
2702 2018-05-25 Piotr Trojanek <trojanek@adacore.com>
2703
2704 * sem_util.adb (Iterate_Call_Parameters): Fix code convention and
2705 assertions.
2706
2707 2018-05-25 Hristian Kirtchev <kirtchev@adacore.com>
2708
2709 * einfo.adb, einfo.ads, exp_ch3.adb, exp_ch8.adb, exp_unst.adb,
2710 pprint.adb, sem_ch12.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb:
2711 Minor reformatting.
2712
2713 2018-05-25 Ed Schonberg <schonberg@adacore.com>
2714
2715 * sem_ch12.adb (Instance_Exists): New function, subsidiary of
2716 Validate_Derived_Type_Instance, to verify that all interfaces
2717 implemented by the formal type are also implemented by the actual. The
2718 verification is complicated when an interface of the formal is declared
2719 in a generic unit and the actual is declared in an instance of it.
2720 There is currently no mechanism to relate an interface declared within
2721 a generic to the corresponding interface in an instance, so we must
2722 traverse the list of interfaces of the actual, looking for a name
2723 match, and verifying that that interface is declared in an instance.
2724
2725 2018-05-25 Piotr Trojanek <trojanek@adacore.com>
2726
2727 * sem_util.adb (Iterate_Call_Parameters): Rewrite with extra
2728 assertions; replace function versions of Next_Formal/Next_Actual with
2729 their procedural versions (which are more concise).
2730
2731 2018-05-25 Doug Rupp <rupp@adacore.com>
2732
2733 * libgnarl/s-osinte__aix.ads, libgnarl/s-osinte__android.ads,
2734 libgnarl/s-osinte__darwin.ads, libgnarl/s-osinte__freebsd.ads,
2735 libgnarl/s-osinte__hpux.ads, libgnarl/s-osinte__kfreebsd-gnu.ads,
2736 libgnarl/s-osinte__linux.ads, libgnarl/s-osinte__lynxos178e.ads,
2737 libgnarl/s-osinte__qnx.ads, libgnarl/s-osinte__rtems.ads
2738 (Relative_Timed_Wait): Remove.
2739 * libgnarl/s-tpopmo.adb (Timed_Sleep, Timed_Delay): Rewrite to allow
2740 for incremental looping. Remove references to Rel_Time and
2741 Relative_Timed_Wait.
2742 * libgnat/s-osprim__posix.adb, libgnat/s-osprim__posix2008.adb
2743 (Timed_Delay): Make separate.
2744 * libgnat/s-optide.adb: New separate procedure.
2745 * libgnat/s-osprim.ads (Max_System_Delay): New constant.
2746 * libgnat/s-osprim__lynxos.ads (Max_Sensible_Delay): Set to 6 months.
2747 (Max_System_Delay): New constant.
2748
2749 2018-05-25 Ed Schonberg <schonberg@adacore.com>
2750
2751 * sem_ch12.adb (Validate_Derived_Type_Instance): Verify that the actual
2752 for a formal derived type implements all the interfaces declared for
2753 the formal.
2754
2755 2018-05-25 Yannick Moy <moy@adacore.com>
2756
2757 * sem_prag.adb (Check_Applicable_Policy): Deal specially with CodePeer
2758 and GNATprove modes when applicable policy is Ignore.
2759
2760 2018-05-25 Eric Botcazou <ebotcazou@adacore.com>
2761
2762 * freeze.adb (Freeze_Enumeration_Type): Do not give integer size to a
2763 boolean type with convention C.
2764 * libgnat/i-cexten.ads (bool): Change to boolean with convention C.
2765 * gcc-interface/decl.c (gnat_to_gnu_entity): Add new local variable
2766 FOREIGN and use it throughout the function.
2767 <E_Enumeration_Type>: Set precision 1 on boolean types with foreign
2768 convention.
2769 <E_Enumeration_Subtype>: Likewise for subtypes.
2770 <E_Record_Type>: Force the size of a storage unit on empty classes.
2771 * gcc-interface/utils.c (make_type_from_size) <BOOLEAN_TYPE>: Skip
2772 boolean types with precision 1 if the size is the expected one.
2773
2774 2018-05-25 Arnaud Charlet <charlet@adacore.com>
2775
2776 * pprint.adb (Expression_Name): Do not print non ASCII characters.
2777
2778 2018-05-25 Bob Duff <duff@adacore.com>
2779
2780 * libgnat/a-strunb__shared.ads, libgnat/a-stwiun__shared.ads,
2781 libgnat/a-stzunb__shared.ads: (Initialize, Adjust): Add pragma Inline.
2782
2783 2018-05-25 Bob Duff <duff@adacore.com>
2784
2785 * sem_util.ads: Minor comment fix.
2786
2787 2018-05-25 Ed Schonberg <schonberg@adacore.com>
2788
2789 * exp_unst.adb (Visit_Node): Restrict check for uplevel references in
2790 prefixes of array attributes, to prefixes that are entity names whose
2791 type is constrained.
2792 (Note_Uplevel_Bound): Verify that the bound is declared in an enclosing
2793 subprogram, as itype created for loops in pre/postcondition may appear
2794 in loops at the library level.
2795
2796 2018-05-25 Ed Schonberg <schonberg@adacore.com>
2797
2798 * sem_ch13.adb (Build_Predicate_Functions): The predicate function
2799 declaration is inserted into the tree and analyzed at that point, so
2800 should not be reinserted when the body is constructed. Inside a
2801 generic, ensure that the body is not inserted twice in the tree.
2802
2803 2018-05-25 Yannick Moy <moy@adacore.com>
2804
2805 * sem_prag.adb (Check_Grouping): Modify test to ignore statements and
2806 declarations not coming from source.
2807
2808 2018-05-25 Fedor Rybin <frybin@adacore.com>
2809
2810 * doc/gnat_ugn/gnat_utility_programs.rst: Document new switch
2811 --copy-environment for gnattest.
2812
2813 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
2814
2815 * sem_elab.adb (Non_Private_View): Simplify by removing a local Result
2816 variable.
2817 * sem_prag.adb (Get_Base_Subprogram): Same as above.
2818
2819 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
2820
2821 * fe.h (Set_Normalized_First_Bit): Declare.
2822 (Set_Normalized_Position): Likewise.
2823 * repinfo.adb (List_Record_Layout): Do not use irregular output for a
2824 variable position. Fix minor spacing issue.
2825 * gcc-interface/decl.c (annotate_rep): If a field has a variable
2826 offset, compute the normalized position and annotate it in addition to
2827 the bit offset.
2828
2829 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
2830
2831 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu):
2832 Constify and rename variables. Fix formatting.
2833 (gnat_to_gnu) <N_Exception_Handler>: Minor tweak.
2834 <N_Raise_Statement>: Likewise.
2835
2836 2018-05-24 Javier Miranda <miranda@adacore.com>
2837
2838 * exp_ch8.adb (Build_Body_For_Renaming): Adding support to build the
2839 body of a variant record equality renaming.
2840 (Expand_N_Subprogram_Renaming_Declaration): Adapt the code to the new
2841 implementation of Build_Body_For_Renaming.
2842 * exp_ch3.ads (Build_Variant_Record_Equality): New library level
2843 function that factorizes the functionality needed by
2844 Build_Body_For_Renaming and Expand_Freeze_Record_Type to build the body
2845 of a variant record equality subprogram.
2846 * exp_ch3.adb (Build_Variant_Record_Equality): New subprogram.
2847 (Build_Variant_Record_Equality): New local procedure of
2848 Expand_Freeze_Record_Type containing all the code specific for freezing
2849 the record type that cannot be place in the new library level function.
2850
2851 2018-05-24 Ed Schonberg <schonberg@adacore.com>
2852
2853 * einfo.ads, einfo.adb (Is_Activation_Record): New flag on
2854 in_parameters, used when unesting subprograms for LLVM, to indicate
2855 that a generated parameter carries the activation record from the
2856 enclosing subprogram.
2857 * exp_unst.adb (Check_Static_Type): Handle array attributes of types
2858 whose bounds may contain up-level references that need to be added to
2859 an activation recoord.
2860 (Add_Extra_Formal): Set Is_Activation_Record on new formal.
2861
2862 2018-05-24 Yannick Moy <moy@adacore.com>
2863
2864 * pprint.adb (Expression_Image): Improve the printing of expressions,
2865 by taking more cases into account, in particular qualified expressions
2866 and aggregates. Also count more the number of parentheses to close
2867 after the expression.
2868
2869 2018-05-24 Javier Miranda <miranda@adacore.com>
2870
2871 * sem_ch3.adb (Is_Visible_Component): For untagged types add missing
2872 check for renamed discriminants.
2873 * sem_ch4.adb (Analyze_Overloaded_Selected_Component,
2874 Analyze_Selected_Component, Check_Misspelled_Selector): For calls to
2875 Is_Visible_Component pass the associated selector node to allow
2876 checking renamed discriminants on untagged types.
2877
2878 2018-05-24 Ed Schonberg <schonberg@adacore.com>
2879
2880 * sem_ch8.adb (Analyze_Use_Type): Do not assign the Prev_Use_Clause
2881 link to a use_type clause if this would cause an infinite loop in the
2882 machinery that detects redundant use clauses. This may happen when the
2883 redundant clauses appear in the context of a child unit and the context
2884 of its parent.
2885
2886 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
2887
2888 * sinfo.ads: Fix grammar in comment.
2889
2890 2018-05-24 Justin Squirek <squirek@adacore.com>
2891
2892 * einfo.ads, einfo.adb (Append_Entity): Modified to use Link_Entities
2893 and manage doubly-linked entity chain.
2894 (Nested_Scenarios): Removed entity field used for optimization during
2895 elaboration to make room for the new field Prev_Entity.
2896 (Link_Entities): Added to replace redundant calls to Set_Next_Entity
2897 and Set_Prev_Entity as well as centralize changes to the entity chain.
2898 (Predicated_Parent): Modified to use Node38.
2899 (Prev_Entity): Added to fetch new node field Prev_Entity in all entity
2900 types.
2901 (Remove_Entity): Moved from sem_util.
2902 (Set_Nested_Scenarios): Deleted.
2903 (Set_Predicated_Parent): Modified to use Node38.
2904 (Set_Prev_Entity): Added to set Prev_Entity field.
2905 (Set_Validated_Object): Modified to use Node38.
2906 (Unlink_Next_Entity): Added to process Prev_Entity when an unlinking
2907 action is required.
2908 (Validated_Object): Modified to use Node38.
2909 (Write_Field36_Name): Remove Nested_Scenarios, Validated_Object, and
2910 predicated parent cases.
2911 (Write_Field38_Name): Add predicated parent and Validated_Object cases.
2912 * sem_ch3.adb (Process_Subtype): Add guard to protect against
2913 inappropriate marking of Predicated_Parent to non-itype subtypes.
2914 (Make_Class_Wide_Type): Preserve Prev_Entity field and set in new type.
2915 (Copy_And_Swap): Add setting of Prev_Entity.
2916 (Build_derived_Record_Type): Replace Set_Next_Entity w/ Link_Entities.
2917 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Replace Set_Next_Entity
2918 w/ Link_Entities.
2919 (New_Overloaded_Entity): Remove block created to search for previous
2920 entities in the entity chain with relevant calls to Prev_Entity as well
2921 as replace duplicated code from Remove_Entity_And_Homonym with a call
2922 to that subprogram.
2923 * sem_ch7.adb (Exchange_Declarations): Replace Set_Next_Entity w/
2924 Link_Entities.
2925 * sem_elab.adb (Find_And_Process_Nested_Scenarios): Remove global and
2926 initial subprogram declarations related to Nested_Scenarios.
2927 (Process_Nested_Scenarios): Deleted.
2928 (Save_Scenario): Deleted.
2929 (Traverse_Body): Remove optimization for Nested_Scenarios so as to free
2930 node space in the entity tree.
2931 * sem_util.adb, sem_util.ads (Remove_Entity): Moved to einfo.
2932 (Remove_Entity_And_Homonym): Added to separate functionality of
2933 Remove_Entity from the homonym chain directly.
2934 * exp_attr.adb (Expand_N_Attribute_Reference): Replace Set_Next_Entity
2935 w/ Link_Entities and Unlink_Next_Entity.
2936 * exp_ch3.adb (Expand_N_Object_Declaration): Replace Set_Next_Entity w/
2937 Link_Entities.
2938 * exp_ch6.adb (Replace_Renaming_Declaration_Id): Replace
2939 Set_Next_Entity w/ Link_Entities.
2940 * exp_disp.adb (Expand_Dispatching_Call): Replace Set_Next_Entity w/
2941 Link_Entities and Unlink_Next_Entity.
2942 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration): Replace
2943 call to Remove_Entity with its new incarnation.
2944 * exp_util.adb (New_Class_Wide_Subtype): Add setting of Prev_Entity.
2945 * freeze.adb (Freeze_Record_Type): Replace Set_Next_Entity w/
2946 Link_Entities.
2947
2948 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2949
2950 * sem_ch10.adb (Expand_Limited_With_Clause): Update the call to
2951 Install_Limited_Withed_Unit.
2952 (Expand_With_Clause): Update the call to Install_Withed_Unit.
2953 (Implicit_With_On_Parent): Update the call to Install_Withed_Unit.
2954 (Install_Context_Clauses): Update the call to Install_Withed_Unit.
2955 (Install_Limited_Context_Clauses): Update the calls to
2956 Install_Limited_Withed_Unit.
2957 (Install_Limited_Withed_Unit): Renamed to better illustrate its
2958 purpose.
2959 (Install_Private_With_Clauses): Update the calls to Install_Withed_Unit
2960 and Install_Limited_Withed_Unit.
2961 (Install_With_Clause): Uninstall a limited with clause if a [private]
2962 with clause is given for the same package.
2963 (Install_Withed_Unit): Renamed to better illustrate its purpose.
2964 (Remove_Limited_With_Unit): New routine.
2965
2966 2018-05-24 Eric Botcazou <ebotcazou@adacore.com>
2967
2968 * raise-gcc.c (__gnat_SEH_error_handler): Remove prototype.
2969 (__gnat_personality_seh0): Adjust and beef up comments, and
2970 fix formatting throughout.
2971 (__gnat_adjust_context): Deal minimally with version 2.
2972 * seh_init.c (__gnat_map_SEH): Fix formatting.
2973 (_gnat_SEH_error_handler): Adjust comments.
2974 (__gnat_install_SEH_handler): Fix formatting.
2975
2976 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
2977
2978 * exp_ch7.adb, sem_ch3.adb, sem_res.adb: Minor reformatting.
2979
2980 2018-05-24 Ed Schonberg <schonberg@adacore.com>
2981
2982 * exp_aggr.adb (Flatten): Add a warning on an others clause in an array
2983 aggregate with static bounds when named associations cover all index
2984 positions and the others clause is redundant.
2985
2986 2018-05-24 Raphael Amiard <amiard@adacore.com>
2987
2988 * libgnat/a-cohama.ads: Add documentation.
2989
2990 2018-05-24 Raphael Amiard <amiard@adacore.com>
2991
2992 * libgnat/a-convec.ads: Add documentation.
2993
2994 2018-05-24 Justin Squirek <squirek@adacore.com>
2995
2996 * exp_ch3.adb (Expand_N_Object_Declaration): Ignore raising an error in
2997 expansion for limited tagged types when the node to be expanded is a
2998 raise expression due to it not representing a valid object.
2999 * exp_ch5.adb (Expand_N_Assignment_Statement): Add exception to error
3000 message regarding assignments to limited types to ignore genereated
3001 code.
3002
3003 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
3004
3005 * exp_util.adb (New_Class_Wide_Subtype): Capture and restore relevant
3006 Ghost-related attributes of the class-wide subtype because the copy
3007 clobbers them.
3008
3009 2018-05-24 Justin Squirek <squirek@adacore.com>
3010
3011 * sem_res.adb (Resolve_Entity_Name): Add guard to protect against
3012 marking use clauses as effective when the reference appears within
3013 generated code.
3014
3015 2018-05-24 Cyrille Comar <comar@adacore.com>
3016
3017 * doc/gnat_rm/the_gnat_library.rst: Fix typos.
3018 * gnat_rm.texi: Regenerate.
3019
3020 2018-05-24 Bob Duff <duff@adacore.com>
3021
3022 * exp_ch7.adb (Expand_Cleanup_Actions): Create a mark unconditionally
3023 for build-in-place functions with a caller-unknown-size result.
3024 (Create_Finalizer): For build-in-place functions with a
3025 caller-unknown-size result, check at run time whether we need to
3026 release the secondary stack.
3027
3028 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
3029
3030 * sem_prag.adb (Analyze_Pragma): Use the full view of an internally
3031 generated incomplete type.
3032
3033 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
3034
3035 * expander.adb (Expand): Update the save and restore of the Ghost
3036 region.
3037 * exp_ch3.adb (Freeze_Type): Likewise.
3038 * exp_disp.adb (Make_DT): Likewise.
3039 * exp_util.adb (Build_DIC_Procedure_Body): Likewise.
3040 (Build_DIC_Procedure_Declaration): Likewise.
3041 (Build_Invariant_Procedure_Body): Likewise.
3042 (Build_Invariant_Procedure_Declaration): Likewise.
3043 (Make_Predicate_Call): Likewise.
3044 * freeze.adb (Add_To_Result): Insert the freeze action of a living
3045 entity prior to the start of the enclosing ignored Ghost region.
3046 (Freeze_Entity): Update the save and restore of the Ghost region.
3047 * ghost.adb (Install_Ghost_Mode): Reimplemented.
3048 (Install_Ghost_Region): New routine.
3049 (Mark_And_Set_Ghost_Assignment): Install a region rather than a mode.
3050 (Mark_And_Set_Ghost_Body): Likewise.
3051 (Mark_And_Set_Ghost_Completion): Likewise.
3052 (Mark_And_Set_Ghost_Declaration): Likewise.
3053 (Mark_And_Set_Ghost_Instantiation): Likewise.
3054 (Mark_And_Set_Ghost_Procedure_Call): Likewise.
3055 (Name_To_Ghost_Mode): New routine.
3056 (Restore_Ghost_Region): New routine.
3057 * ghost.ads (Install_Ghost_Region): New routine.
3058 (Restore_Ghost_Region): New routine.
3059 * opt.ads: Add new global variable Ignored_Ghost_Region.
3060 * rtsfind.adb (Load_RTU): Update the save and restore of the Ghost
3061 region. Install a clean region.
3062 * sem.adb (Analyze): Likewise.
3063 (Do_Analyze): Likewise.
3064 * sem_ch3.adb (Analyze_Object_Declaration): Likewise
3065 (Derive_Progenitor_Subprograms): Use local variable Iface_Alias to
3066 capture the ultimate alias of the current primitive.
3067 (Process_Full_View): Update the save and restore of the Ghost region.
3068 Do not inherit DIC and invariant procedures.
3069 * sem_ch5.adb (Analyze_Assignment): Update the save and restore of the
3070 Ghost region.
3071 * sem_ch6.adb (Analyze_Procedure_Call): Likewise.
3072 (Analyze_Subprogram_Body_Helper): Likewise.
3073 * sem_ch7.adb (Analyze_Package_Body_Helper): Likewise.
3074 * sem_ch12.adb (Analyze_Package_Instantiation): Likewise.
3075 (Analyze_Subprogram_Instantiation): Likewise.
3076 (Instantiate_Package_Body): Likewise.
3077 (Instantiate_Subprogram_Body): Likewise.
3078 * sem_ch13.adb (Build_Predicate_Functions): Likewise.
3079 (Build_Predicate_Function_Declaration): Likewise.
3080 * sem_disp.adb
3081 (Add_Dispatching_Operation): Do not consider DIC and invariant
3082 procedures.
3083 (Check_Dispatching_Operation): Use Add_Dispatching_Operation to collect
3084 a dispatching subprogram.
3085 (Check_Operation_From_Private_View): Likewise.
3086 (Override_Dispatching_Operation): Likewise.
3087 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part): Update the save
3088 and restore of the Ghost region.
3089 (Analyze_Initial_Condition_In_Decl_Part): Likewise.
3090 (Analyze_Pragma): Update the save and restore of the Ghost region.
3091 (Analyze_Pre_Post_Condition_In_Decl_Part): Likewise.
3092 * sem_util.adb (Is_Suitable_Primitive): New routine.
3093 * sem_util.ads (Is_Suitable_Primitive): New routine.
3094 * sinfo.ads: Update the section of Ghost regions.
3095
3096 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
3097
3098 * doc/gnat_rm/implementation_defined_pragmas.rst (Contract_Cases):
3099 Change "condition" to "case guard" after renaming in the contract
3100 grammar.
3101 * gnat_rm.texi: Regenerate.
3102
3103 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
3104
3105 * exp_util.adb (Expand_Static_Predicates_In_Choices): Indicate that the
3106 construct with discrete choices no longer contains a subtype with
3107 predicates since the expansion already handled this case.
3108
3109 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
3110
3111 * freeze.adb (Wrap_Imported_Subprogram): Generate an unchecked
3112 conversion to the return type to avoid a side effect where an imported
3113 relocated function generates a new anonymous access type, whose
3114 accessibility level does not agree with with that of the wrapper.
3115
3116 2018-05-24 Javier Miranda <miranda@adacore.com>
3117
3118 * sem_util.adb (Abstract_Interface_List): Add missing support for
3119 private types whose full view is a synchronized type.
3120 * sem_ch3.adb (Build_Derived_Private_Type): Skip building the full
3121 derivation of a private type parent type is a task type with
3122 discriminants as gigi does not use such type directly.
3123
3124 2018-05-24 Hristian Kirtchev <kirtchev@adacore.com>
3125
3126 * sem_elab.adb (Build_Variable_Reference_Marker): Do not create a
3127 variable marker when the reference appears in the formal part of a
3128 compilation unit instance because there is no place to insert it.
3129 (In_Compilation_Instance_Formal_Part): New routine.
3130
3131 2018-05-24 Piotr Trojanek <trojanek@adacore.com>
3132
3133 * layout.ads, repinfo.ads: Fix references to renamed Backend_Layout
3134 configuration parameter.
3135
3136 2018-05-24 Doug Rupp <rupp@adacore.com>
3137
3138 * argv-lynxos178-raven-cert.c: New file.
3139 * libgnat/system-lynxos178-x86.ads: New file.
3140
3141 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
3142
3143 * exp_disp.adb, freeze.adb, gnat1drv.adb, sem_ch5.adb, sem_spark.adb:
3144 Minor reformattings.
3145
3146 2018-05-23 Pascal Obry <obry@adacore.com>
3147
3148 * adaint.c (win32_wait): Properly free the handle/pid lists when
3149 WaitForMultipleObjects fails (return WAIT_FAILED).
3150
3151 2018-05-23 Pascal Obry <obry@adacore.com>
3152
3153 * adaint.c (win32_wait): Add missing parentheses.
3154
3155 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
3156
3157 * exp_ch3.adb (Check_Large_Modular_Array): Moved to Freeze.
3158 (Expand_N_Object_Declaration): Do not check for a large modular array
3159 here.
3160 * freeze.adb (Check_Large_Modular_Array): Moved from Exp_Ch3.
3161 (Freeze_Object_Declaration): Code cleanup. Check for a large modular
3162 array.
3163 * sem_ch3.adb: Minor reformatting.
3164
3165 2018-05-23 Ed Schonberg <schonberg@adacore.com>
3166
3167 * einfo.ads: New attribute on types: Predicated_Parent, to simplify the
3168 retrieval of the applicable predicate function to an itype created for
3169 a constrained array component.
3170 * einfo.adb: Subprograms for Predicated_Parent.
3171 (Predicate_Function): Use new attribute.
3172 * exp_util.adb (Make_Predicate_Call): If the predicate function is not
3173 available for a subtype, retrieve it from the base type, which may have
3174 been frozen after the subtype declaration and not captured by the
3175 subtype declaration.
3176 * sem_aggr.adb (Resolve_Array_Aggregate): An Others association is
3177 legal within a generated initiqlization procedure, as may happen with a
3178 predicate check on a component, when the predicate function applies to
3179 the base type of the component.
3180 * sem_ch3.adb (Analyze_Subtype_Declaration): Clean up inheritance of
3181 predicates for subtype declarations and for subtype indications in
3182 other contexts.
3183 (Process_Subtype): Likewise. Handle properly the case of a private type
3184 with unknown discriminants whose full view is an unconstrained array.
3185 Use Predicated_Parent to indicate source of predicate function on an
3186 itype whose parent is itself an itype.
3187 (Complete_Private_Subtype): If the private view has unknown
3188 discriminants and the full view is an unconstrained array, set base
3189 type of completion to the full view of parent.
3190 (Inherit_Predicate_Flags): Prevent double assignment of predicate
3191 function and flags.
3192 (Build_Subtype): For a constrained array component, propagate predicate
3193 information from original component type declaration.
3194
3195 2018-05-23 Boris Yakobowski <yakobowski@adacore.com>
3196
3197 * libgnat/a-ngelfu.ads (Arctanh, Arccoth): Fix faulty preconditions.
3198
3199 2018-05-23 Arnaud Charlet <charlet@adacore.com>
3200
3201 * checks.adb (Minimize_Eliminate_Overflows): Default initialize Lo and
3202 Hi.
3203 * sem_elab.adb: Make "out" parameters instead of "in out" when
3204 relevant.
3205
3206 2018-05-23 Bob Duff <duff@adacore.com>
3207
3208 * gnatbind.adb (List_Applicable_Restrictions): Add
3209 No_Implementation_Restrictions to the list of restrictions not to list.
3210 Remove double negative "not No_Restriction_List". Comment the
3211 commentary that is output, so it won't cause errors if used directly in
3212 a gnat.adc.
3213
3214 2018-05-23 Ed Schonberg <schonberg@adacore.com>
3215
3216 * sem_prag.adb (Inherit_Class_Wide_Pre): Refine legality check on
3217 class-wide precondition on a type extension when ancestor does not have
3218 a class-wide precondition. Previously the compiler accepted such a
3219 precondition when the ancestor had a class-wide postcondition.
3220
3221 2018-05-23 Javier Miranda <miranda@adacore.com>
3222
3223 * sem_attr.adb (Valid_Scalars): Do not invoke Error_Attr_P to report
3224 the warning on occurrences of this attribute whose evaluation is always
3225 true (since that subprogram aborts processing the attribute). In
3226 addition, replace the node by its boolean result 'True' (required
3227 because the backend has no knowledge of this attribute).
3228
3229 2018-05-23 Bob Duff <duff@adacore.com>
3230
3231 * libgnat/a-convec.adb: (Insert, Insert_Space): Suppress warnings. The
3232 code in question is not reachable in the case where Count_Type'Last is
3233 out of range.
3234
3235 2018-05-23 Yannick Moy <moy@adacore.com>
3236
3237 * doc/gnat_rm/implementation_defined_pragmas.rst: Clarify meaning of
3238 local pragma Warnings Off without On.
3239 * gnat_rm.texi: Regenerate.
3240
3241 2018-05-23 Olivier Hainque <hainque@adacore.com>
3242
3243 * libgnat/g-excact.ads (Is_Foreign_Exception): New predicate.
3244 * libgnat/g-excact.adb: Implement.
3245
3246 2018-05-23 Ed Schonberg <schonberg@adacore.com>
3247
3248 * sem_ch5.adb (Analyze_Iterator_Specification): If a subtype indication
3249 is present, verify its legality when the domain of iteration is a
3250 GNAT-specific formal container, as is already done for arrays and
3251 predefined containers.
3252
3253 2018-05-23 Yannick Moy <moy@adacore.com>
3254
3255 * sem_util.adb (Enclosing_Declaration): Fix the case of a named number
3256 declaration, which was not taken into account.
3257
3258 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
3259
3260 * debug.adb: Switch -gnatd_s is now used to stop elaboration checks on
3261 synchronized suspension.
3262 * rtsfind.ads: Add entries for units Ada.Synchronous_Barriers and
3263 Ada.Synchronous_Task_Control and routines Suspend_Until_True and
3264 Wait_For_Release.
3265 * sem_elab.adb: Document switch -gnatd_s.
3266 (In_Task_Body): New routine.
3267 (Is_Potential_Scenario): Code cleanup. Stop the traversal of a task
3268 body when the current construct denotes a synchronous suspension call,
3269 and restriction No_Entry_Calls_In_Elaboration_Code or switch -gnatd_s
3270 is in effect.
3271 (Is_Synchronous_Suspension_Call): New routine.
3272 * switch-c.adb (Scan_Front_End_Switches): Switch -gnatJ now sets switch
3273 -gnatd_s.
3274
3275 2018-05-23 Javier Miranda <miranda@adacore.com>
3276
3277 * exp_disp.adb (Make_DT): Restrict the initialization of
3278 External_Tag and Expanded_Name to an empty string to the case where
3279 both pragmas apply (i.e. No_Tagged_Streams and Discard_Names), since
3280 restricted runtimes are compiled with pragma Discard_Names.
3281 * doc/gnat_rm/implementation_defined_pragmas.rst,
3282 doc/gnat_rm/implementation_defined_characteristics.rst: Add
3283 documentation.
3284 * gnat_rm.texi: Regenerate.
3285
3286 2018-05-23 Maroua Maalej <maalej@adacore.com>
3287
3288 * sem_spark.adb: Fix of some permission rules of pointers in SPARK.
3289
3290 2018-05-23 Ed Schonberg <schonberg@adacore.com>
3291
3292 * sem_ch5.adb (Preanalyze_Range): The pre-analysis of the domain of
3293 iteration of an Ada2012 loop is performed to determine the type of the
3294 domain, but full analysis is performed once the loop is rewritten as a
3295 while-loop during expansion. The pre-analysis suppresses expansion; it
3296 must also suppress the generation of freeze nodes, which may otherwise
3297 appear in the wrong scope before rewritting.
3298
3299 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
3300
3301 * sem_elab.adb: Update the section on suppressing elaboration warnings.
3302
3303 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
3304
3305 * einfo.adb (Is_Elaboration_Checks_OK_Id): Use predicate
3306 Is_Elaboration_Target.
3307 (Is_Elaboration_Target): New routine.
3308 (Is_Elaboration_Warnings_OK_Id): Use predicate Is_Elaboration_Target.
3309 (Set_Is_Elaboration_Checks_OK_Id): Use predicate Is_Elaboration_Target.
3310 (Set_Is_Elaboration_Warnings_OK_Id): Use predicate
3311 Is_Elaboration_Target.
3312 * einfo.ads: Add new synthesized attribute Is_Elaboration_Target along
3313 with occurrences in nodes.
3314 (Is_Elaboration_Target): New routine.
3315 * sem_prag.adb (Analyze_Pragma): Suppress elaboration warnings when an
3316 elaboration target is subject to pragma Warnings (Off, ...).
3317
3318 2018-05-23 Eric Botcazou <ebotcazou@adacore.com>
3319
3320 * repinfo.adb (List_Type_Info): Remove obsolete stuff.
3321
3322 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
3323
3324 * einfo.adb: Flag304 is now Is_Elaboration_Warnings_OK_Id.
3325 (Is_Elaboration_Warnings_OK_Id): New routine.
3326 (Set_Is_Elaboration_Warnings_OK_Id): New routine.
3327 (Write_Entity_Flags): Output Flag304.
3328 * einfo.ads: Add new attribute Is_Elaboration_Warnings_OK_Id along with
3329 occurrences in entities.
3330 (Is_Elaboration_Warnings_OK_Id): New routine along with pragma Inline.
3331 (Set_Is_Elaboration_Warnings_OK_Id): New routine along with pragma
3332 Inline.
3333 * sem_attr.adb (Analyze_Access_Attribute): Capture the state of
3334 elaboration warnings.
3335 * sem_ch3.adb (Analyze_Object_Declaration): Capture the state of
3336 elaboration warnings.
3337 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Capture the
3338 state of elaboration warnings.
3339 (Analyze_Subprogram_Body_Helper): Capture the state of elaboration
3340 warnings.
3341 (Analyze_Subprogram_Declaration): Capture the state of elaboration
3342 warnings.
3343 * sem_ch9.adb (Analyze_Entry_Declaration): Capture the state of
3344 elaboration warnings.
3345 (Analyze_Single_Task_Declaration): Capture the state of elaboration
3346 warnings.
3347 (Analyze_Task_Type_Declaration): Capture the state of elaboration
3348 warnings.
3349 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Capture the state
3350 of elaboration warnings.
3351 (Analyze_Generic_Subprogram_Declaration): Capture the state of
3352 elaboration warnings.
3353 * sem_elab.adb: Add a section on suppressing elaboration warnings.
3354 Type Processing_Attributes includes component Suppress_Warnings
3355 intended to suppress any elaboration warnings along a path in the
3356 graph. Update Initial_State to include a value for this component.
3357 Types Target_Attributes and Task_Attriutes include component
3358 Elab_Warnings_OK to indicate whether the target or task has elaboration
3359 warnings enabled. component Elab_Warnings_OK.
3360 (Build_Access_Marker): Propagate attribute
3361 Is_Elaboration_Warnings_OK_Node from the attribute to the generated
3362 call marker.
3363 (Extract_Instantiation_Attributes): Set the value for Elab_Warnings_OK.
3364 (Extract_Target_Attributes): Set the value for Elab_Warnings_OK.
3365 (Extract_Task_Attributes): Set the value for Elab_Warnings_OK.
3366 (Process_Conditional_ABE_Access): Suppress futher elaboration warnings
3367 when already in this mode or when the attribute or target have warnings
3368 suppressed.
3369 (Process_Conditional_ABE_Activation_Impl): Do not emit any diagnostics
3370 if warnings are suppressed.
3371 (Process_Conditional_ABE_Call): Suppress further elaboration warnings
3372 when already in this mode, or the target or call have warnings
3373 suppressed.
3374 (Process_Conditional_ABE_Call_Ada): Do not emit any diagnostics if
3375 warnings are suppressed.
3376 (Process_Conditional_ABE_Call_SPARK): Do not emit any diagnostics if
3377 warnings are suppressed.
3378 (Process_Conditional_ABE_Instantiation): Suppress further elaboration
3379 warnings when already in this mode or when the instantiation has
3380 warnings suppressed.
3381 (Process_Conditional_ABE_Instantiation_Ada): Do not emit any
3382 diagnostics if warnings are suppressed.
3383 (Process_Conditional_ABE_Variable_Assignment_Ada): Use the more
3384 specific Is_Elaboration_Warnings_OK_Id rather than Warnings_Off.
3385 (Process_Conditional_ABE_Variable_Assignment_SPARK): Use the more
3386 specific Is_Elaboration_Warnings_OK_Id rather than Warnings_Off.
3387 (Process_Task_Object): Suppress further elaboration warnings when
3388 already in this mode, or when the object, activation call, or task type
3389 have warnings suppressed. Update the processing state to indicate that
3390 the path goes through a task body.
3391 * sinfo.adb (Is_Elaboration_Warnings_OK_Node): Accept attribute
3392 references.
3393 (Set_Is_Elaboration_Warnings_OK_Node): Accept attribute references.
3394 * sinfo.ads: Attribute Is_Elaboration_Warnings_OK_Node now applies to
3395 attribute references.
3396
3397 2018-05-23 Piotr Trojanek <trojanek@adacore.com>
3398
3399 * einfo.ads: Minor reformatting.
3400
3401 2018-05-23 Ed Schonberg <schonberg@adacore.com>
3402
3403 * sem_ch3.adb (Analyze_Object_Declaration): If expression is an
3404 anonymous_access_to_ subprogram formal, apply a conversion to force an
3405 accsssibility check that will fail statically, enforcing 3.10.2 (13).
3406
3407 2018-05-23 Daniel Mercier <mercier@adacore.com>
3408
3409 * gnat1drv.adb: Turn off length expansion in CodePeer mode.
3410
3411 2018-05-23 Bob Duff <duff@adacore.com>
3412
3413 * freeze.adb: (Check_Address_Clause): Deal with build-in-place
3414 aggregates in addition to build-in-place calls.
3415
3416 2018-05-23 Bob Duff <duff@adacore.com>
3417
3418 * einfo.ads: Minor reformatting.
3419 * sem_ch3.adb: Likewise.
3420 * sinfo.ads: Likewise.
3421
3422 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
3423
3424 * exp_ch3.adb (Default_Initialize_Object): Do not optimize scalar array
3425 initialization when the component type has predicates.
3426 * exp_ch4.adb (Expand_N_Allocator): Do not optimize scalar array
3427 allocation when the component type has predicates.
3428
3429 2018-05-23 Hristian Kirtchev <kirtchev@adacore.com>
3430
3431 * einfo.adb, exp_disp.adb, sem_ch3.adb, sem_ch6.adb, sem_prag.adb:
3432 Minor reformatting.
3433
3434 2018-05-22 Justin Squirek <squirek@adacore.com>
3435
3436 * sem_ch6.adb (Analyze_Expression_Function): Propagate flags from the
3437 original function spec into the generated function spec due to
3438 expansion of expression functions during analysis.
3439 (Analyze_Subprogram_Body_Helper): Modify check on formal parameter
3440 references from the body to the subprogram spec in the case of
3441 expression functions because of inconsistances related to having a
3442 generated body.
3443 * libgnarl/s-osinte__android.ads: Flag parameters as unused.
3444 * libgnarl/s-osinte__lynxos178e.ads: Likewise.
3445 * libgnarl/s-osinte__qnx.adb: Likewise.
3446 * libgnarl/s-osinte__qnx.ads: Likewise.
3447
3448 2018-05-22 Doug Rupp <rupp@adacore.com>
3449
3450 * init.c (HAVE_ADJUST_CONTEXT_FOR_RAISE): Don't define on VxWorks7 for
3451 AArch64.
3452
3453 2018-05-22 Olivier Hainque <hainque@adacore.com>
3454
3455 * libgnat/a-except.adb (Exception_Propagation.Propagate_Exception):
3456 Expect an Exception_Occurence object, not an Access.
3457 (Complete_And_Propagate_Occurrence): Adjust accordingly.
3458 (Raise_From_Signal_Handler): Likewise.
3459 (Reraise_Occurrence_No_Defer): If we have a Machine_Occurrence
3460 available in the provided occurrence object, just re-propagate the
3461 latter as a bare "raise;" would do.
3462 * libgnat/a-exexpr.adb (Propagate_Exception): Adjust to spec change.
3463 * libgnat/a-exstat.adb (String_To_EO): Initialize X.Machine_Occurrence
3464 to null, to mark that the occurrence we're crafting from the stream
3465 contents is not being propagated (yet).
3466
3467 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
3468
3469 * exp_aggr.adb (Initialize_Ctrl_Record_Component): Insert the generated
3470 code for a transient component in line with the rest of the
3471 initialization code, rather than before the aggregate. This ensures
3472 that the component has proper visibility of the discriminants.
3473
3474 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
3475
3476 * adaint.c: Reorganize QNX-specific macros, use syspage to retreive the
3477 number of CPUs.
3478
3479 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
3480
3481 * sigtramp-qnx.c: Properly restore link register in signal trampoline.
3482
3483 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
3484
3485 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): Strip away any
3486 conversions before extracting the value of the expression.
3487 * exp_ch3.adb (Default_Initialize_Object): Optimize the default
3488 initialization of an array of scalars.
3489 (Get_Simple_Init_Val): Add processing for array types. Remove the
3490 processing of strings because this case is already handled by the array
3491 case.
3492 (Needs_Simple_Initialization): Moved to Sem_Util.
3493 (Simple_Init_Array_Type): New routine.
3494 (Simple_Init_Initialize_Scalars_Type): Reimplemented to use the new
3495 facilities from Sem_Util.
3496 (Simple_Initialization_OK): New routine.
3497 * exp_ch3.ads (Needs_Simple_Initialization): Moved to Sem_Util.
3498 * exp_ch4.adb (Expand_N_Allocator): Optimize the default allocation of
3499 an array of scalars.
3500 * sem_prag.adb (Analyze_Float_Value): New routine.
3501 (Analyze_Integer_Value): New routine.
3502 (Analyze_Pragma): Reimplement the analysis of pragma Initialize_Scalars
3503 to handled the extended form of the pragma.
3504 (Analyze_Type_Value_Pair): New routine.
3505 * sem_util.adb: Add invalid value-related data structures.
3506 (Examine_Array_Bounds): New routine.
3507 (Has_Static_Array_Bounds): Reimplemented.
3508 (Has_Static_Non_Empty_Array_Bounds): New routine.
3509 (Invalid_Scalar_Value): New routine.
3510 (Needs_Simple_Initialization): Moved from Exp_Ch3.
3511 (Set_Invalid_Scalar_Value): New routines.
3512 * sem_util.ads (Has_Static_Non_Empty_Array_Bounds): New routine.
3513 (Invalid_Scalar_Value): New routine.
3514 (Needs_Simple_Initialization): Moved from Exp_Ch3.
3515 (Set_Invalid_Scalar_Value): New routines.
3516 * snames.ads-tmpl: Add names for the salar type families used by pragma
3517 Initialize_Scalars.
3518
3519 2018-05-22 Javier Miranda <miranda@adacore.com>
3520
3521 * exp_disp.adb (Make_DT): Initialize the External_Tag with an empty
3522 string when pragma No_Tagged_Streams is applicable to the tagged type,
3523 and initialize the Expanded_Name with an empty string when pragma
3524 Discard_Names is applicable to the tagged type.
3525
3526 2018-05-22 Ed Schonberg <schonberg@adacore.com>
3527
3528 * sem_ch6.adb (Check_Conformance): Add RM reference for rule that a
3529 formal subprogram is never subtype conformqnt, and thus cannot be the
3530 prefix of 'Access. Reject as well the attribute when applied to a
3531 renaming of a formal subprogram.
3532
3533 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
3534
3535 * exp_ch3.adb (Build_Array_Init_Proc): Update the call to
3536 Needs_Simple_Initialization.
3537 (Build_Init_Statements): Update the call to Get_Simple_Init_Val.
3538 (Check_Subtype_Bounds): Renamed to Extract_Subtype_Bounds. Update the
3539 profile and comment on usage.
3540 (Default_Initialize_Object): Do not use New_Copy_Tree to set the proper
3541 Sloc of a value obtained from aspect Default_Value because this could
3542 potentially replicate large trees. The proper Sloc is now set in
3543 Get_Simple_Init_Val.
3544 (Get_Simple_Init_Val): Reorganized by breaking the various cases into
3545 separate routines. Eliminate the use of global variables.
3546 (Init_Component): Update the call to Get_Simple_Init_Val.
3547 (Needs_Simple_Initialization): Update the parameter profile and all
3548 uses of T.
3549 (Simple_Init_Defaulted_Type): Copy the value of aspect Default_Value
3550 and set the proper Sloc.
3551 * exp_ch3.ads (Get_Simple_Init_Val): Update the parameter profile and
3552 comment on usage.
3553 (Needs_Simple_Initialization): Update the parameter profile.
3554
3555 2018-05-22 Patrick Bernardi <bernardi@adacore.com>
3556
3557 * sem_ch3.adb (Build_Discriminant_Constraints): Raise an error if the
3558 user tries to use a subtype indication as a discriminant constraint.
3559
3560 2018-05-22 Ed Schonberg <schonberg@adacore.com>
3561
3562 * exp_ch4.ads, exp_ch4.adb, exp_util.adb, expander.adb: Remove mention
3563 of N_Reduction_Expression and N_Reduction_Expression_Parameter.
3564 * par-ch4.adb: Remove parsing routines for reduction expressions.
3565 * sem.adb, sinfo.ads, sinfo.adb, sem_ch4.ads, sem_ch4.adb, sem_res.adb,
3566 sem_spark.adb, sprint.adb: Remove analysis routines for reduction
3567 expressions.
3568
3569 2018-05-22 Arnaud Charlet <charlet@adacore.com>
3570
3571 * sem_ch8.adb (Check_Frozen_Renaming): Do not emit error in
3572 Relaxed_RM_Semantics mode.
3573
3574 2018-05-22 Arnaud Charlet <charlet@adacore.com>
3575
3576 * comperr.adb (Delete_SCIL_Files): Take into account
3577 N_Generic_Package_Renaming_Declaration.
3578
3579 2018-05-22 Ed Schonberg <schonberg@adacore.com>
3580
3581 * sem_ch3.adb (Search_Derivation_Levels): Whenever a parent type is
3582 private, use the full view if available, because it may include renamed
3583 discriminants whose values are stored in the corresponding
3584 Stored_Constraint.
3585
3586 2018-05-22 Ed Schonberg <schonberg@adacore.com>
3587
3588 * einfo.ads, einfo.adb: New attribute Hidden_In_Formal_Instance,
3589 defined on packages that are actuals for formal packages, in order to
3590 set/reset the visibility of the formals of a formal package with given
3591 actuals, when there are subsequent uses of those formals in the
3592 enclosing generic, as required by RN 12.7 (10).
3593 * atree.ads, atree.adb: Add operations for Elist30.
3594 * atree.h: Add Elist30.
3595 * sem_ch12.adb (Analyze_Formal_Package_Instantiation): Collect formals
3596 that are not defaulted and are thus not visible within the current
3597 instance.
3598 (Check_Formal_Packages): Reset visibility of formals of a formal
3599 package that are not defaulted, on exit from current instance.
3600
3601 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
3602
3603 * sem_prag.adb (Analyze_Input_Output): Emit an error when a non-null,
3604 non-'Result output appears in the output list of a function.
3605
3606 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
3607
3608 * exp_attr.adb (Build_Array_VS_Func): Reimplemented.
3609 (Build_Record_VS_Func): Reimplemented.
3610 (Expand_N_Attribute): Reimplement the handling of attribute
3611 'Valid_Scalars.
3612 * sem_attr.adb (Analyze_Attribute): Reimplement the handling of
3613 attribute 'Valid_Scalars.
3614 * sem_util.adb (Scalar_Part_Present): Reimplemented.
3615 (Validated_View): New routine.
3616 * sem_util.ads (Scalar_Part_Present): Update the parameter profile and
3617 comment on usage.
3618 (Validated_View): New routine.
3619 * doc/gnat_rm/implementation_defined_attributes.rst: Update the
3620 documentation of attribute 'Valid_Scalars.
3621 * gnat_rm.texi: Regenerate.
3622
3623 2018-05-22 Bob Duff <duff@adacore.com>
3624
3625 * binde.adb: (Choose): Ignore a pragma Elaborate_Body that appears in
3626 the spec of a SAL_Interface package.
3627
3628 2018-05-22 Ed Schonberg <schonberg@adacore.com>
3629
3630 * freeze.adb (Freeze_Entity): When analyzing delayed aspects of an
3631 entity E within a generic unit, indicate that there are no remaining
3632 delayed aspects after invoking Analyze_Aspects_At_Freeze_Point. The
3633 entity E is not frozen yet but the aspects should not be reanalyzed at
3634 the freeze point, which may be outside of the generic and may not have
3635 the proper visibility.
3636
3637 2018-05-22 Bob Duff <duff@adacore.com>
3638
3639 * doc/gnat_ugn/gnat_utility_programs.rst: Add documentation for
3640 the new --split-line-before-record, --indent-named-statements and
3641 --no-align-modes gnatpp switches.
3642
3643 2018-05-22 Ed Schonberg <schonberg@adacore.com>
3644
3645 * sem_prag.adb (Process_Compile_Time_Warning_Or_Error): Handle properly
3646 a second argument that is a constant of a given string value.
3647
3648 2018-05-22 Doug Rupp <rupp@adacore.com>
3649
3650 * sigtramp-vxworks-target.inc: Align stack to 128bits on AArch64.
3651
3652 2018-05-22 Jerome Lambourg <lambourg@adacore.com>
3653
3654 * sigtramp-qnx.c: Fix stack alignment issue in the signal trampoline.
3655
3656 2018-05-22 Ed Schonberg <schonberg@adacore.com>
3657
3658 * freeze.adb (Freeze_Fixed_Point_Type): If the first subtype has
3659 delayed aspects, analyze them now, os that the representation of the
3660 type (size, bounds) can be computed and validated.
3661
3662 2018-05-22 Olivier Hainque <hainque@adacore.com>
3663
3664 * libgnat/s-dwalin.adb (Enable_Cache): Skip symbols outside of the
3665 executable code section boundaries.
3666
3667 2018-05-22 Javier Miranda <miranda@adacore.com>
3668
3669 * locales.c: New implementation for the Ada.Locales package.
3670 * libgnat/a-locale.ads: Remove comment indicating that this is not
3671 implemented.
3672 * doc/gnat_rm/standard_library_routines.rst: Remove comment indicating
3673 that this is not implemented.
3674 * gnat_rm.texi: Regenerate.
3675
3676 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
3677
3678 * exp_ch5.adb, freeze.adb, pprint.adb, sem_ch4.adb, sem_res.adb: Minor
3679 reformattings.
3680
3681 2018-05-22 Justin Squirek <squirek@adacore.com>
3682
3683 * sem_ch12.adb (In_Same_Declarative_Part): Moved to sem_util.
3684 (Freeze_Subprogram_Body, Install_Body): Modify calls to
3685 In_Same_Declarative_Part.
3686 * sem_prag.adb (Analyze_Pragma-Pragma_Pure_Function): Add check to
3687 verify pragma declaration is within the same declarative list with
3688 corresponding error message.
3689 * sem_util.adb, sem_util.ads (In_Same_Declarative_Part): Moved from
3690 sem_ch12.adb and generalized to be useful outside the scope of
3691 freezing.
3692
3693 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
3694
3695 * sem_ch6.adb (Analyze_Subprogram_Declaration): Set the proper
3696 categorization of the unit after processing the aspects in case one of
3697 its aspects is converted into a categorization pragma.
3698
3699 2018-05-21 Ed Schonberg <schonberg@adacore.com>
3700
3701 * freeze.adb (Warn_Overlay): Do not emit a wawrning on an object
3702 declaration with an explicit address clause and a type with default
3703 initialization, if the declaration carries an aspect
3704 Suppress_Initialization.
3705
3706 2018-05-21 Daniel Mercier <mercier@adacore.com>
3707
3708 * pprint.adb: Use mixed case for attribute names.
3709
3710 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
3711
3712 * sem_ch6.adb (Analyze_Generic_Subprogram_Body): Rename the call to
3713 Analyze_Aspect_Specifications_On_Body_Or_Stub.
3714 (Analyze_Subprogram_Body_Helper): Rename the calls to
3715 Analyze_Aspect_Specifications_On_Body_Or_Stub.
3716 * sem_ch9.adb (Analyze_Entry_Body): Rename the call to
3717 Analyze_Aspect_Specifications_On_Body_Or_Stub.
3718 * sem_ch10.adb: Add with and use clause for Sem_Ch13.
3719 (Analyze_Package_Body_Stub): Add constant Id. Decorate the package stub
3720 prior to analyzing its aspects.
3721 (Analyze_Protected_Body_Stub): Add constant Id. Decorate the package
3722 stub prior to analyzing its aspects. Save and restore the configuration
3723 switches.
3724 (Analyze_Task_Body_Stub): Add constant Id. Decorate the package stub
3725 prior to analyzing its aspects.
3726 * sem_ch13.adb (Analyze_Aspect_Specifications_On_Body_Or_Stub): Renamed
3727 to Analyze_Aspects_On_Subprogram_Body_Or_Stub.
3728 * sem_ch13.ads (Analyze_Aspect_Specifications_On_Body_Or_Stub): Renamed
3729 to Analyze_Aspects_On_Subprogram_Body_Or_Stub.
3730 * sem_prag.adb: Code reformatting.
3731 (Analyze_Refined_Depends_Global_Post): Consider task body stubs.
3732
3733 2018-05-21 Jerome Lambourg <lambourg@adacore.com>
3734
3735 * gcc-interface/Makefile.in: Add g-soliop__qnx.ads to the runtime build
3736 for QNX.
3737
3738 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
3739
3740 * exp_cg.adb: Remove with and use clause for Exp_Disp.
3741 * exp_ch9.adb: Remove with and use clause for Exp_Disp.
3742 * exp_disp.adb (Is_Predefined_Dispatching_Operation): Moved to Sem_Util.
3743 (Is_Predefined_Interface_Primitive): Moved to Sem_Util.
3744 (Is_Predefined_Internal_Operation): Moved to Sem_Util.
3745 * exp_disp.ads (Is_Predefined_Dispatching_Operation): Moved to Sem_Util.
3746 (Is_Predefined_Interface_Primitive): Moved to Sem_Util.
3747 (Is_Predefined_Internal_Operation): Moved to Sem_Util.
3748 * exp_dist.adb: Remove with and use clause for Exp_Disp.
3749 * freeze.adb: Remove with and use clause for Exp_Disp.
3750 * sem_cat.adb: Remove with and use clause for Exp_Disp.
3751 * sem_ch6.adb: Remove with and use clause for Exp_Disp.
3752 * sem_ch12.adb: Remove with and use clause for Exp_Disp.
3753 * sem_elab.adb (Check_Overriding_Primitive): Do not process predefined
3754 primitives.
3755 * sem_util.adb: Remove with and use clause for Exp_Disp.
3756 (Is_Predefined_Dispatching_Operation): Moved from Exp_Disp.
3757 (Is_Predefined_Interface_Primitive): Moved from Exp_Disp.
3758 (Is_Predefined_Internal_Operation): Moved from Exp_Disp.
3759 * sem_util.ads (Is_Predefined_Dispatching_Operation): Moved from
3760 Exp_Disp.
3761 (Is_Predefined_Interface_Primitive): Moved from Exp_Disp.
3762 (Is_Predefined_Internal_Operation): Moved from Exp_Disp.
3763
3764 2018-05-21 Ed Schonberg <schonberg@adacore.com>
3765
3766 * sem_res.adb (Valid_Conversion): Improve error message on an illegal
3767 type conversion whose expression has a limited view of a type.
3768
3769 2018-05-21 Ed Schonberg <schonberg@adacore.com>
3770
3771 * exp_ch5.adb (Build_Formal_Container_Iteration): If source has
3772 explicit name for iterator loop, preserve that name in expanded
3773 construct, for possible use in exit statements.
3774
3775 2018-05-21 Javier Miranda <miranda@adacore.com>
3776
3777 * sem_ch4.adb (Analyze_Membership_Op): Avoid compiler crash when the
3778 spec of a unit has Ada 2012 membership tests with multiple choices and
3779 the unit body is not compiled under Ada 2012 mode.
3780
3781 2018-05-21 Doug Rupp <rupp@adacore.com>
3782
3783 * sigtramp-vxworks-target.inc: Set cfa_reg properly from sigcontext
3784 pregs.
3785 (CFI_COMMON_REGS): Restore LR jic probed from prologue.
3786 (REGNO_PC_OFFSET): Change to correct value for Aarch64.
3787
3788 2018-05-21 Jose Ruiz <ruiz@adacore.com>
3789
3790 * doc/gnat_ugn/gnat_utility_programs.rst, exp_attr.adb,
3791 libgnarl/s-tassta.adb: Minor typo fixes
3792
3793 2018-05-21 Ed Schonberg <schonberg@adacore.com>
3794
3795 * sem_ch4.adb (Analyze_One_Call): Recognize complex cases where an
3796 indexed call originally in prefix forn is itself the prefix of a
3797 further call.
3798
3799 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
3800
3801 * sem_eval.adb (Is_Null_Range): Clarify access to the full view of a
3802 type.
3803 (Not_Null_Range): Same as above.
3804
3805 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
3806
3807 * exp_ch3.adb: Minor reformatting.
3808 * exp_ch6.adb: Likewise.
3809 * freeze.adb: Likewise.
3810 * inline.adb: Likewise.
3811 * sem_util.adb: Likewise.
3812
3813 2018-05-21 Yannick Moy <moy@adacore.com>
3814
3815 * inline.adb (Expand_Inlined_Call.Process_Formals): Use a type
3816 conversion instead of an unchecked type conversion when inlining a
3817 return statement, unless type qualification is required (for character
3818 and string literal) or no check can result from the conversion (for
3819 access types).
3820 * opt.ads: Update comment.
3821
3822 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
3823
3824 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Install the elaboration
3825 model of the compilation unit spec, if any.
3826 * sem_ch7.adb (Analyze_Package_Body_Helper): Install the elaboration
3827 model of the compilation unit spec, if any.
3828 * sem_ch10.adb (Analyze_Subunit): Install the elaboration model of the
3829 parent compilation unit spec, if any.
3830 * sem_elab.adb (Check_Elaboration_Scenarios): Restore the elaboration
3831 model of the main unit.
3832 (Is_Same_Unit): The routine now uses Unit_Entity.
3833 (Is_Subunit): Removed.
3834 (Normalize_Unit): Removed.
3835 (Unit_Entity): New routine.
3836 * sem_prag.adb (Analyze_Pragma): Reimplement the handling of pragma
3837 Elaboration_Checks. The analysis now ensures that the pragma appears at
3838 the configuration level, and on the initial declaration of a unit.
3839 Other placements are either flagged as illegal, or ignored.
3840 (Check_Duplicate_Elaboration_Checks_Pragma): New routine.
3841 (Ignore_Elaboration_Checks_Pragma): New routine.
3842 * sem_util.adb (Install_Elaboration_Model): New routine.
3843 * sem_util.ads (Install_Elaboration_Model): New routine.
3844 * doc/gnat_rm/implementation_defined_pragmas.rst: Update the
3845 documentation of pragma Elaboration_Checks.
3846 * gnat_rm.texi: Regenerate.
3847
3848 2018-05-21 Olivier Hainque <hainque@adacore.com>
3849
3850 * libgnat/s-trasym__dwarf.adb (Executable_Name): Return argv[0] instead
3851 of empty string when argv[0] couldn't be found on PATH.
3852 (Enable_Cache): Raise Program_Error instead of attempting a null
3853 pointer dereference when the Exec_Module initialization failed.
3854
3855 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
3856
3857 * libgnarl/a-reatim.ads (Clock_Time): Remove External aspect.
3858 * libgnarl/a-taside.ads (Tasking_State): Likewise.
3859 * libgnat/a-calend.ads (Clock_Time): Likewise.
3860
3861 2018-05-21 Yannick Moy <moy@adacore.com>
3862
3863 * sem_ch6.adb (Analyze_Procedure_Call): Refine test to recognize prefix
3864 call notation in inlined call in GNATprove mode.
3865
3866 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
3867
3868 * einfo.adb (Is_External_State): An abstract state is also external
3869 when it is declared with option "synchronous".
3870 * einfo.ads: Update the documentation of synthesized attribute
3871 Is_External_State.
3872 * sem_util.adb (Find_Simple_Properties): New routine.
3873 (Is_Enabled_External_Property): New routine.
3874 (State_Has_Enabled_Property): Reimplemented. The two flavors of option
3875 External have precedence over option Synchronous when determining
3876 whether a property is in effect.
3877
3878 2018-05-21 Yannick Moy <moy@adacore.com>
3879
3880 * sem_eval.adb (Static_Length): Take into account case of variable of
3881 subtype string literal.
3882
3883 2018-05-21 Olivier Hainque <hainque@adacore.com>
3884
3885 * libgnat/s-objrea.ads (Get_Memory_Bounds): Rename as Get_Xcode_Bounds.
3886 (Object_Section): Rename Flag_Alloc component as Flag_Xcode.
3887 * libgnat/s-objrea.adb (Get_Xcode_Bounds): Adjust to new subprogram and
3888 component name.
3889 (Get_Section, ELF case): Set Flag_Xcode from SHF_EXECINSTR.
3890 * libgnat/s-dwalin.adb (Open): Adjust to the Get_Memory_Bounds name
3891 change.
3892
3893 2018-05-21 Olivier Hainque <hainque@adacore.com>
3894
3895 * libgnat/s-dwalin.ads (Dwarf_Context): Change type of Load_Address to
3896 Address, and type of Low, High to Storage_Offset.
3897 (Low): Rename as Low_Address and convey that the return value is a
3898 runtime reference accounting for a load address.
3899 * libgnat/s-dwalin.adb (Read_Aranges_Entry): Adjust to the
3900 address/offset type changes.
3901 (Aranges_Lookup): Likewise.
3902 (Symbolic_Address): Likewise.
3903 (Symbolic_Traceback): Likewise.
3904 (Dump_Cache): Likewise.
3905 (Is_Inside): Likewise.
3906 (Open): Likewise.
3907 (Set_Load_Address): Likewise.
3908 (Low_Address): Likewise, and account for C.Load_Address.
3909 * libgnat/s-trasym__dwarf.adb (Lt): Use Low_Address instead of Low.
3910 (Multi_Module_Symbolic_Traceback): Compare address in traceback
3911 with module Low_Address instead of Low.
3912
3913 2018-05-21 Olivier Hainque <hainque@adacore.com>
3914
3915 * libgnat/s-dwalin.ads (Dwarf_Context): Rename Load_Slide as
3916 Load_Address.
3917 * libgnat/s-dwalin.adb (Is_Inside): Adjust accordingly.
3918 (Set_Load_Address): Likewise.
3919 (Symbolic_Traceback): Likewise.
3920
3921 2018-05-21 Olivier Hainque <hainque@adacore.com>
3922
3923 * libgnat/s-trasym__dwarf.adb (Add_Module_To_Cache): Expect a
3924 Load_Address argument and pass it down to Init_Module.
3925 * libgnat/s-tsmona__linux.adb (Build_Cache_For_All_Modules): Pass
3926 lm.l_addr as the Load_Address to Add_Module_To_Cache.
3927
3928 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
3929
3930 * einfo.adb (Has_Discriminants): Stronger assertion.
3931 (Set_Has_Discriminants): Stronger assertion.
3932 * sem_ch13.adb (Push_Scope_And_Install_Discriminants): Adapt to respect
3933 the stronger assertion on Has_Discriminant.
3934 (Uninstall_Discriminants_And_Pop_Scope): Same as above.
3935 * sem_util.adb (New_Copy_Tree): Same as above.
3936 * sem_ch7.adb (Generate_Parent_References): Prevent calls to
3937 Has_Discriminant on non-type entities that might happen when the
3938 compiled code has errors.
3939 * sem_ch3.adb (Derived_Type_Declaration): Only call
3940 Set_Has_Discriminant on type entities.
3941
3942 2018-05-21 Arnaud Charlet <charlet@adacore.com>
3943
3944 * exp_unst.adb (Unnest_Subprogram): Unnest all subprograms relevant for
3945 code generation.
3946
3947 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
3948
3949 * lib.ads: Fix typo in enumeration in comment.
3950
3951 2018-05-21 Ed Schonberg <schonberg@adacore.com>
3952
3953 * sem_attr.adb (Analyze_Attribute, case Scalar_Storage_Order): The
3954 attribute reference is legal within a generic unit when the prefix is a
3955 formal private type.
3956
3957 2018-05-21 Hristian Kirtchev <kirtchev@adacore.com>
3958
3959 * exp_ch7.adb (Establish_Transient_Scope): Code cleanup. Do not
3960 delegate the secondary stack management when there is no suitable
3961 transient context, and the transient scope was intended to manage the
3962 secondary stack because this causes premature reclamation. Change the
3963 transient scope creation logic by special casing assignment statements
3964 of controlled components for type initialization procedures.
3965 (Find_Node_To_Be_Wrapped): Renamed to Find_Transient_Context. Update
3966 the comment on usage.
3967 (Find_Transient_Context): Change the initinte loop into a while loop.
3968 Iterations schemes and iterator specifications are not valid transient
3969 contexts because they rely on special processing. Assignment statements
3970 are now treated as a normal transient context, special cases are
3971 handled by the caller. Add special processing for pragma Check.
3972 (Is_OK_Construct): Removed. Its functionality has been merged in
3973 routine Find_Transient_Context.
3974 * sem_ch5.adb (Check_Call): Reimplemented. Add code to properly
3975 retrieve the subprogram being invoked. Use a more accurate predicate
3976 (Requires_Transient_Scope) to determine that the function will emply
3977 the secondary stack.
3978
3979 2018-05-21 Piotr Trojanek <trojanek@adacore.com>
3980
3981 * ada_get_targ.adb: Fix subprogram body headers.
3982 * adabkend.adb: Likewise.
3983 * checks.adb: Likewise.
3984 * exp_ch3.adb: Likewise.
3985 * exp_ch5.adb: Likewise.
3986 * exp_ch9.adb: Likewise.
3987 * exp_dist.adb: Likewise.
3988 * exp_tss.adb: Likewise.
3989 * inline.adb: Likewise.
3990 * lib-writ.adb: Likewise.
3991 * lib-xref-spark_specific.adb: Likewise.
3992 * libgnarl/s-osinte__darwin.adb: Likewise.
3993 * libgnarl/s-stusta.adb: Likewise.
3994 * libgnarl/s-taprop__solaris.adb: Likewise.
3995 * libgnarl/s-tposen.adb: Likewise.
3996 * libgnarl/s-vxwext__kernel-smp.adb: Likewise.
3997 * libgnarl/s-vxwext__kernel.adb: Likewise.
3998 * libgnat/a-btgbso.adb: Likewise.
3999 * libgnat/a-cfdlli.adb: Likewise.
4000 * libgnat/a-cfhama.adb: Likewise.
4001 * libgnat/a-cfinve.adb: Likewise.
4002 * libgnat/a-cimutr.adb: Likewise.
4003 * libgnat/a-coboho.adb: Likewise.
4004 * libgnat/a-cofove.adb: Likewise.
4005 * libgnat/a-cofuve.adb: Likewise.
4006 * libgnat/a-comutr.adb: Likewise.
4007 * libgnat/a-exexda.adb: Likewise.
4008 * libgnat/a-tags.adb: Likewise.
4009 * libgnat/a-tideau.adb: Likewise.
4010 * libgnat/a-wtdeau.adb: Likewise.
4011 * libgnat/a-ztdeau.adb: Likewise.
4012 * libgnat/g-alleve.adb: Likewise.
4013 * libgnat/s-excdeb.adb: Likewise.
4014 * libgnat/s-parint.adb: Likewise.
4015 * libgnat/s-shasto.adb: Likewise.
4016 * libgnat/s-traceb__hpux.adb: Likewise.
4017 * prepcomp.adb: Likewise.
4018 * sem_ch4.adb: Likewise.
4019 * sem_ch6.adb: Likewise.
4020 * sem_dist.adb: Likewise.
4021 * sem_prag.adb: Likewise.
4022 * sem_util.adb: Likewise.
4023 * sinfo.adb: Likewise.
4024 * switch.adb: Likewise.
4025
4026 2018-05-04 John Marino <gnugcc@marino.st>
4027
4028 PR ada/85635
4029 * link.c (BSD platforms): Add missing backslash.
4030
4031 2018-04-27 Eric Botcazou <ebotcazou@adacore.com>
4032
4033 PR ada/85540
4034 * init.c (__gnat_handle_vms_condition): Add missing parentheses.
4035
4036 2018-04-25 Eric Botcazou <ebotcazou@adacore.com>
4037
4038 PR ada/85007
4039 * gnat_ugn.texi: Regenerate.
4040
4041 2018-03-23 Eric Botcazou <ebotcazou@adacore.com>
4042
4043 PR ada/85007
4044 * gnatlink.adb (Gnatlink): Remove handling of -b switch.
4045 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (gnatlink):
4046 Remove documentation of -b switch.
4047
4048 2018-03-23 Eric Botcazou <ebotcazou@adacore.com>
4049
4050 PR ada/85036
4051 * gnatlink.adb (Process_Args): Drop existing link switches if multiple
4052 switches are passed for --LINK.
4053
4054 2018-03-12 Eric Botcazou <ebotcazou@adacore.com>
4055
4056 PR ada/82813
4057 * gcc-interface/misc.c (gnat_post_options): Disable string overflow
4058 warnings.
4059
4060 2018-03-10 Eric Botcazou <ebotcazou@adacore.com>
4061
4062 * gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
4063 Consider only entities for objects.
4064
4065 2018-03-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
4066
4067 * gcc-interface/Makefile.in (OSCONS_CPP): Remove redundant
4068 $(GNATLIBCFLAGS).
4069 (OSCONS_EXTRACT): Add $(GNATLIBCFLAGS_FOR_C).
4070
4071 2018-03-06 Eric Botcazou <ebotcazou@adacore.com>
4072
4073 * gcc-interface/trans.c (convert_with_check): Fix typo in the condition
4074 guarding the overflow check emitted for the upper bound of a floating-
4075 point conversion.
4076
4077 2018-03-06 Eric Botcazou <ebotcazou@adacore.com>
4078
4079 * gcc-interface/utils.c (def_builtin_1): Bail out on error_mark_node.
4080
4081 2018-02-28 Eric Botcazou <ebotcazou@adacore.com>
4082
4083 * libgnat/i-cexten.ads (Float_128): New type.
4084
4085 2018-02-02 Eric Botcazou <ebotcazou@adacore.com>
4086
4087 * gcc-interface/decl.c (array_type_has_nonaliased_component): Return
4088 false if the component type is a pointer.
4089
4090 2018-01-11 Gary Dismukes <dismukes@adacore.com>
4091
4092 * exp_ch3.adb (Default_Initialize_Object): Call New_Copy_Tree on the
4093 result of Get_Simple_Init_Value and pass the source location of the
4094 object declaration's object_definition.
4095
4096 2018-01-11 Ed Schonberg <schonberg@adacore.com>
4097
4098 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration): Handle
4099 properly object declarations with initializations that are
4100 build-in-place function calls, when there is an address specification,
4101 either as an aspect specification or an explicit attribute
4102 specification clause, for the initialized object.
4103 * freeze.adb (Check_Address_Clause): Do not remove side-effects from
4104 initial expressions in the case of a build-in-place call.
4105
4106 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
4107
4108 * sem_eval.adb (Is_Null_Range): Retrieve the full view when called on a
4109 private (sub)type; refactor to avoid early return statement.
4110 (Not_Null_Range): Same as above.
4111
4112 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4113
4114 * freeze.adb (Freeze_Entity): Ensure that a Ghost type is not
4115 concurrent, nor effectively volatile.
4116 * ghost.adb (Check_Ghost_Type): New routine.
4117 * ghost.ads (Check_Ghost_Type): New routine.
4118 * sem_util.adb (Is_Declaration): Reimplemented. The routine can now
4119 consider specific subsets of declarations.
4120 (Is_Declaration_Other_Than_Renaming): Removed. Its functionality is
4121 replicated by Is_Declaration.
4122 * sem_util.ads (Is_Declaration): New parameter profile. Update the
4123 comment on usage.
4124 (Is_Declaration_Other_Than_Renaming): Removed.
4125
4126 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4127
4128 * sem_ch5.adb (Analyze_Assignment): Assignments to variables that act
4129 as Part_Of consituents of single protected types are illegal when they
4130 take place inside a protected function.
4131 (Diagnose_Non_Variable_Lhs): Use Within_Function to check for an
4132 enclosing function.
4133 (Is_Protected_Part_Of_Constituent): New routine.
4134 (Within_Function): New routine.
4135
4136 2018-01-11 Arnaud Charlet <charlet@adacore.com>
4137
4138 Bump copyright notices to 2018.
4139
4140 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4141
4142 * binde.adb, par-ch6.adb, par-ch9.adb, sem_ch12.adb, sem_ch13.adb:
4143 Minor reformatting.
4144
4145 2018-01-11 Justin Squirek <squirek@adacore.com>
4146
4147 * par-ch6.adb (Scan_Body_Or_Expression_Function): Add additional check
4148 to make sure a given expression function is properly parenthesized.
4149
4150 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4151
4152 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Check the
4153 categorization of a subprogram body which does not complete a previous
4154 declaration.
4155
4156 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4157
4158 * sem_ch10.adb (Check_Private_Child_Unit): Ensure that the enclosing
4159 scope of package Ada is Standard.
4160
4161 2018-01-11 Ed Schonberg <schonberg@adacore.com>
4162
4163 * sem_ch13.adb (Replace_Type_Ref): Handle properly reference to a
4164 subcomponent of the current entity when building the body for a dynamic
4165 predicate function for a record with composite subcomponents.
4166
4167 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4168
4169 * exp_aggr.adb (Convert_Aggr_In_Object_Decl): Update the call to
4170 Establish_Transient_Scope.
4171 (Convert_To_Assignments): Update the call to Establish_Transient_Scope.
4172 (Expand_Array_Aggregate): Update the call to Establish_Transient_Scope.
4173 * exp_ch6.adb (Expand_Call_Helper): Update the call to
4174 Establish_Transient_Scope.
4175 (Make_Build_In_Place_Call_In_Object_Declaration): Update the call to
4176 Establish_Transient_Scope.
4177 * exp_ch7.adb (Establish_Transient_Scope): Restructured. Delegate the
4178 management of the secondary stack to an enclosing scope if there is no
4179 suitable construct to wrap, and the transient scope was intended to
4180 manage the secondary stack.
4181 (Find_Node_To_Be_Wrapped): Restructured. A case_statement_alternative
4182 is a valid boundary for a transient expression which comes from the
4183 statements of the alternative, otherwise alternatives cannot be
4184 wrapped. Assignments of controlled objects which have controlled
4185 actions suppressed now stop the traversal as there is no point in
4186 looking for an enclosing construct. Add several N_xxx_Body choices to
4187 the termination conditions for completeness.
4188 * exp_ch7.ads (Establish_Transient_Scope): Update the parameter profile
4189 and the associated comment on usage.
4190 * exp_smem.adb (Add_Shared_Var_Lock_Procs): Update the call to
4191 Establish_Transient_Scope.
4192 (Add_Write_After): Update the call to Establish_Transient_Scope.
4193 * sem_res.adb (Check_Initialization_Call): Removed.
4194 (Resolve_Actuals): Account for additional cases where finalization
4195 actions are required by utilizing predicate Needs_Finalization rather
4196 than Is_Controlled.
4197 (Resolve_Call): Type initialization procedures can now utilize
4198 transient scopes to manage the secondary stack, thus preventing leaks
4199 during initialization. Remove the previous kludgy algorithm which
4200 attempts to manage the secondary stack at the object creation site.
4201
4202 2018-01-11 Jerome Lambourg <lambourg@adacore.com>
4203
4204 * libgnat/g-soliop__qnx.ads: New.
4205 * adaint.c, adaint.h, cstreams.c, s-oscons-tmplt.c, sysdep.c: Update
4206 for QNX.
4207
4208 2018-01-11 Bob Duff <duff@adacore.com>
4209
4210 * par-ch9.adb (P_Protected_Operation_Declaration_Opt): Give an error if
4211 a null procedure occurs in a protected definition.
4212
4213 2018-01-11 Bob Duff <duff@adacore.com>
4214
4215 * binderr.ads, namet.ads: Minor reformatting.
4216
4217 2018-01-11 Bob Duff <duff@adacore.com>
4218
4219 * doc/gnat_ugn/gnat_utility_programs.rst: Improve documentation of
4220 xml2gnat.
4221
4222 2018-01-11 Bob Duff <duff@adacore.com>
4223
4224 * binde.adb (Force_Elab_Order): Give an error if there are duplicate
4225 unit names.
4226
4227 2018-01-11 Ed Schonberg <schonberg@adacore.com>
4228
4229 * sem_ch6.adb (Freeze_Expr_Types): If an access value is the
4230 controlling argument of a dispatching call. freeze the corresponding
4231 designated type.
4232
4233 2018-01-11 Ben Brosgol <brosgol@adacore.com>
4234
4235 * doc/Makefile: Add Sphinx option -W to treat warnings as errors.
4236
4237 2018-01-11 Ben Brosgol <brosgol@adacore.com>
4238
4239 * doc/gnat_rm/implementation_defined_aspects.rst: Minor type/wording
4240 corrections.
4241 * gnat_rm.texi: Regenerate.
4242
4243 2018-01-11 Ed Schonberg <schonberg@adacore.com>
4244
4245 * sem_ch12.adb (Check_Fixed_Point_Type): Do not apply check if the
4246 formsl type corresponding to the actual fixed point type is private,
4247 because in this case there can be no suspicious arithmetic operations
4248 in the generic unless they reference a formal subprogram. Clarify
4249 warning.
4250
4251 2018-01-11 Javier Miranda <miranda@adacore.com>
4252
4253 * exp_util.adb (Remove_Side_Effects): No action done for functions
4254 returning class-wide types since it requires generating code using
4255 'reference and the CCG target has no secondary stack.
4256 * gnat1drv.adb: Disable building static dispatch tables when generating
4257 C code.
4258
4259 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
4260
4261 * libgnat/a-direio.ads, libgnat/a-sequio.ads, libgnat/a-ststio.ads,
4262 libgnat/a-textio.ads, libgnat/a-witeio.ads, libgnat/a-ztexio.ads
4263 (File_Type): Add Default_Initial_Condition aspect.
4264
4265 2018-01-11 Pascal Obry <obry@adacore.com>
4266
4267 * libgnat/s-os_lib.adb (Normalize_Pathname): New implementation.
4268
4269 2018-01-11 Bob Duff <duff@adacore.com>
4270
4271 * doc/gnat_ugn/gnat_utility_programs.rst: Rewrite gnatpp documentation
4272 to match what the Libadalang-based version does.
4273 * doc/gnat_ugn/about_this_guide.rst: Update reference.
4274
4275 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4276
4277 * sem_res.adb (Uses_SS): A controlled type requires the secondary stack
4278 if it contains at least one component declaration employing a function
4279 call returning on the secondary stack.
4280
4281 2018-01-11 Yannick Moy <moy@adacore.com>
4282
4283 * doc/gnat_rm/standard_and_implementation_defined_restrictions.rst:
4284 Update description of restriction SPARK_05 with SPARK 2014.
4285 * gnat_rm.texi: Regenerate.
4286
4287 2018-01-11 Vasiliy Fofanov <fofanov@adacore.com>
4288
4289 * doc/gnat_ugn/gnat_utility_programs.rst: Fix layout.
4290
4291 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4292
4293 * exp_aggr.adb, exp_ch9.adb, exp_util.adb, sem_aggr.adb, sem_ch3.adb,
4294 sem_res.adb, sem_util.adb: Minor reformatting.
4295
4296 2018-01-11 Ed Schonberg <schonberg@adacore.com>
4297
4298 * sem_prag.adb (Analyze_Pragma, case Predicate): Indicate that the type
4299 has a delayed aspect which must be processed at the point the type is
4300 frozen. This mimics what is done when the predicate is provided by a
4301 source aspect.
4302
4303 2018-01-11 Doug Rupp <rupp@adacore.com>
4304
4305 * init.c (vxworks): Add macro checks for __aarch64__.
4306
4307 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4308
4309 * exp_util.adb (Add_Failure_Expression): New routine.
4310 (Make_Predicate_Check): Reimplement the handling of Predicate_Failure.
4311 * sem_util.adb (Is_Current_Instance): Code cleanup.
4312
4313 2018-01-11 Patrick Bernardi <bernardi@adacore.com>
4314
4315 * libgnat/s-parame*.adb, libgnat/s-parame*.ads: Remove unneeded
4316 Default_Sec_Stack_Size.
4317 * libgnat/s-secsta.adb (SS_Allocate): Handle the fixed secondary stack
4318 limit check so that the integer index does not overflow. Check the
4319 dynamic stack allocation does not cause the secondary stack pointer to
4320 overflow.
4321 (SS_Info): Align colons.
4322 (SS_Init): Cover the case when bootstraping with an old compiler that
4323 does not set Default_SS_Size.
4324
4325 2018-01-11 Ed Schonberg <schonberg@adacore.com>
4326
4327 * sem_ch3.adb (Add_Internal_Interface_Entities): When checking the
4328 legality of an inherited operation that may require overriding, ignore
4329 primitive_wrappers that correspond to explicit operations that override
4330 an interface primitive.
4331 * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity): If the
4332 operation to which the class-wide expression applies is a protected op.
4333 with a primitive_wrapper, verify that the updated inherited expression
4334 does not contain an internal call to a protected function. This
4335 completes the implementation of AI12-0166.
4336
4337 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4338
4339 * ali.adb: Document the remaining letters available for ALI lines.
4340 (Scan_ALI): A with clause is internal when it is encoded on a 'Z' line.
4341 * ali.ads: Update type With_Record. Field
4342 Implicit_With_From_Instantiation is no longer in use. Add field
4343 Implicit_With.
4344 * csinfo.adb (CSinfo): Remove the setup for attribute
4345 Implicit_With_From_Instantiation.
4346 * lib-writ.adb (Collect_Withs): Correct the logic which marks a unit as
4347 either implicitly or explicitly withed.
4348 (Is_Implicit_With_Clause): New routine.
4349 (Write_ALI): Rename array Implicit_With to Has_Implicit_With to avoid
4350 confusion with the with clause attribute by the same name.
4351 (Write_With_Lines): Update the emission of 'W', 'Y', and 'Z' headers.
4352 * rtsfind.adb (Maybe_Add_With): Code cleanup.
4353 * sem_ch8.adb (Present_System_Aux): Code cleanup.
4354 * sem_ch10.adb (Expand_With_Clause): Mark the with clause as generated
4355 for a parent unit.
4356 (Implicit_With_On_Parent): Mark the with clause as generated for a
4357 parent unit.
4358 * sem_ch12.adb (Inherit_Context): With clauses inherited by an
4359 instantiation are no longer marked as Implicit_With_From_Instantiation
4360 because they are already marked as implicit.
4361 * sem_elab.adb (Ensure_Prior_Elaboration_Static): Remove the kludge
4362 which marks implicit with clauses as related to an instantiation.
4363 * sinfo.adb (Implicit_With_From_Instantiation): Removed.
4364 (Parent_With): New routine.
4365 (Set_Implicit_With_From_Instantiation): Removed.
4366 (Set_Parent_With): New routine.
4367 * sinfo.ads: Update the documentation of attribute Implicit_With.
4368 Remove attribute Implicit_With_From_Instantiation along with
4369 occurrences in nodes. Add attribute Parent_With along with occurrences
4370 in nodes.
4371 (Implicit_With_From_Instantiation): Removed along with pragma Inline.
4372 (Parent_With): New routine along with pragma Inline.
4373 (Set_Implicit_With_From_Instantiation): Removed along with pragma Inline.
4374 (Set_Parent_With): New routine along with pragma Inline.
4375
4376 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4377
4378 * sem_util.adb (Find_Enclosing_Scope): Return the unique defining
4379 entity when the enclosing construct is a body.
4380
4381 2018-01-11 Patrick Bernardi <bernardi@adacore.com>
4382
4383 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Simplified
4384 Secondary_Stack_Size handling as a pragma is now generated for the
4385 corresponding aspect instead of an attribute. Pragma expression is
4386 relocated instead of evaluated. Discriminant of the corresponding
4387 record type is referenced rather than the type discriminant.
4388 (Create_Secondary_Stack_For_Task, Make_Task_Create_Call): Update
4389 Secondary_Stack_Size rep item checks to only look for the pragma rep.
4390 * sem_ch13.adb (Analyze_One_Aspect): Transform
4391 Aspect_Secondary_Stack_Size into a pragma instead of an attribute
4392 because the attribute does not have visibility on a task type's
4393 discriminants when the type's definition is expanded.
4394 (Analyze_Attribute_Definition_Clause): Remove handling of
4395 Attribute_Secondary_Stack_Size.
4396 * snames.adb-tmpl, snames.ads-tmpl: Remove
4397 Attribute_Secondary_Stack_Size, no longer used.
4398
4399 2018-01-11 Justin Squirek <squirek@adacore.com>
4400
4401 * sem_ch8.adb: Minor comment fix.
4402
4403 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4404
4405 * exp_ch4.adb (Process_Action): Do not abandon the inspection of an
4406 individual action because the action may denote a complex expression,
4407 such as a case statement, which in turn may contain additional
4408 transient objects.
4409
4410 2018-01-11 Ed Schonberg <schonberg@adacore.com>
4411
4412 * sem_aggr.adb (Resolve_Iterated_Component_Association): Perform
4413 analysis on a copy of the expression with a copy of the index variable,
4414 because full expansion will rewrite construct into a loop with the
4415 original loop variable.
4416 * exp_aggr.adb (Gen_Assign): Defer analysis and resolution if the
4417 expression is an iterated component association. Full analysis takes
4418 place when construct is rewritten as a loop.
4419 (In_Place_Assign_OK, Safe_Component): An iterated_component_association
4420 is not safe for in-place assignment.
4421 * sem_util.adb (Remove_Entity): Handle properly the case of an isolated
4422 entity with no homonym and no other entity in the scope.
4423
4424 2018-01-11 Justin Squirek <squirek@adacore.com>
4425
4426 * sem_prag.adb (Analyze_Pragma:Pragma_Loop_Variant): Modify error
4427 message to be printed on the pragma argument identifier.
4428
4429 2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
4430
4431 * exp_util.adb (Build_Invariant_Procedure_Declaration): Set the last
4432 entity of the generated invariant procedure in order to construct a
4433 proper entity chain.
4434
4435 2018-01-11 Piotr Trojanek <trojanek@adacore.com>
4436
4437 * sem_ch13.adb (Build_Predicate_Functions): Fix minor issues in
4438 comment.
4439
4440 2018-01-11 Arnaud Charlet <charlet@adacore.com>
4441
4442 * einfo.ads, einfo.adb (Activation_Record_Component,
4443 Set_Activation_Record_Component, Set_Is_Uplevel_Referenced_Entity):
4444 Allow E_Discriminant.
4445
4446 2018-01-10 Eric Botcazou <ebotcazou@adacore.com>
4447
4448 * gcc-interface/decl.c (gnat_to_gnu_component_type): Apply the check
4449 for atomic access once the component size is taken into account and
4450 also do it if the component type is Atomic or Volatile_Full_Access.
4451
4452 2018-01-04 Eric Botcazou <ebotcazou@adacore.com>
4453
4454 * gnatvsn.ads: Bump copyright year.
4455
4456 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
4457 Alan Hayward <alan.hayward@arm.com>
4458 David Sherwood <david.sherwood@arm.com>
4459
4460 * gcc-interface/misc.c (enumerate_modes): Treat GET_MODE_BITSIZE
4461 as polynomial.
4462
4463 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
4464 Alan Hayward <alan.hayward@arm.com>
4465 David Sherwood <david.sherwood@arm.com>
4466
4467 * gcc-interface/misc.c (enumerate_modes): Treat GET_MODE_PRECISION
4468 as polynomial.
4469
4470 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
4471 Alan Hayward <alan.hayward@arm.com>
4472 David Sherwood <david.sherwood@arm.com>
4473
4474 * gcc-interface/utils.c (gnat_types_compatible_p): Handle
4475 polynomial TYPE_VECTOR_SUBPARTS.
4476
4477 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
4478 Alan Hayward <alan.hayward@arm.com>
4479 David Sherwood <david.sherwood@arm.com>
4480
4481 * gcc-interface/misc.c (enumerate_modes): Handle polynomial
4482 GET_MODE_NUNITS.
4483
4484 2018-01-03 Jakub Jelinek <jakub@redhat.com>
4485
4486 Update copyright years.
4487
4488 * gnat_ugn.texi: Bump @copying's copyright year.
4489 * gnat_rm.texi: Likewise.
4490 \f
4491 Copyright (C) 2018 Free Software Foundation, Inc.
4492
4493 Copying and distribution of this file, with or without modification,
4494 are permitted in any medium without royalty provided the copyright
4495 notice and this notice are preserved.