1 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
3 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Initialize locus.
5 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
7 * gcc-interface/trans.c (process_freeze_entity): Be prepared for a
10 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
12 * gcc-interface/decl.c (gnat_to_gnu_entity): Robustify test for types
13 descendant of System.Address.
14 (gnat_to_gnu_subprog_type): Likewise.
16 2017-12-08 Jakub Jelinek <jakub@redhat.com>
18 * gcc-interface/utils.c (gnat_internal_attribute_table): Add
19 exclusions to the comment.
21 2017-12-07 Martin Sebor <msebor@redhat.com>
24 * gcc-interface/utils.c (gnat_internal_attribute_table): Initialize
25 new member of struct attribute_spec.
27 2017-12-06 Simon Wright <simon@pushface.org>
30 * bindgen.adb (Gen_AdaFinal): If the restriction No_Task_Termination is
31 set, generate a null body.
33 2017-12-05 Piotr Trojanek <trojanek@adacore.com>
35 * sem_util.adb (Contains_Refined_State): Remove.
37 2017-12-05 Ed Schonberg <schonberg@adacore.com>
39 * sem_ch13.adb (Analyze_Aspect_Specifications, case Predicate): A
40 predicate cannot apply to a formal type.
42 2017-12-05 Arnaud Charlet <charlet@adacore.com>
44 * exp_unst.ads: Fix typos.
46 2017-12-05 Jerome Lambourg <lambourg@adacore.com>
48 * libgnarl/s-taprop__qnx.adb: Better detect priority ceiling bug in
49 QNX. At startup, the first mutex created has a non-zero ceiling
50 priority whatever its actual policy. This makes some tests fail
51 (c940013 for example).
53 2017-12-05 Bob Duff <duff@adacore.com>
55 * exp_ch11.adb (Expand_N_Handled_Sequence_Of_Statements): Call
56 Expand_Cleanup_Actions for N_Extended_Return_Statement.
57 * exp_ch7.adb (Expand_Cleanup_Actions): Handle
58 N_Extended_Return_Statement by transforming the statements into a
59 block, and (indirectly) calling Expand_Cleanup_Actions on the block.
60 It's too hard for Expand_Cleanup_Actions to operate directly on the
61 N_Extended_Return_Statement, because it has a different structure than
62 the other node kinds that Expand_Cleanup_Actions.
63 * exp_util.adb (Requires_Cleanup_Actions): Add support for
64 N_Extended_Return_Statement. Change "when others => return False;" to
65 "when others => raise ...;" so it's clear what nodes this function
66 handles. Use named notation where appropriate.
67 * exp_util.ads: Mark incorrect comment with ???.
69 2017-12-05 Javier Miranda <miranda@adacore.com>
71 * exp_ch9.adb (Install_Private_Data_Declarations): Add missing
72 Debug_Info_Needed decoration of internally generated discriminal
75 2017-12-05 Arnaud Charlet <charlet@adacore.com>
77 * exp_unst.adb (Unnest_Subprogram): Add handling of 'Access on
80 2017-12-05 Sergey Rybin <rybin@adacore.com>
82 * doc/gnat_ugn/gnat_utility_programs.rst: Add description of '--ignore'
83 option for gnatmetric, gnatpp, gnat2xml, and gnattest.
85 2017-12-05 Piotr Trojanek <trojanek@adacore.com>
87 * sem_util.adb (Contains_Refined_State): Remove.
89 2017-12-05 Piotr Trojanek <trojanek@adacore.com>
91 * rtsfind.ads: Add new enumeration literals: RE_Clock_Time (for
92 Ada.Real_Time.Clock_Time) and RO_CA_Clock_Time (for
93 Ada.Calendar.Clock_Time).
95 2017-12-05 Ed Schonberg <schonberg@adacore.com>
97 * sem_ch4.adb (Is_Private_Overriding): If the candidate private
98 subprogram is overloaded, scan the list of homonyms in the same
99 scope, to find the inherited operation that may be overridden
101 * exp_ch11.adb, exp_ch7.adb: Minor reformatting.
103 2017-12-05 Bob Duff <duff@adacore.com>
105 * exp_ch6.adb (Expand_N_Extended_Return_Statement): If the
106 Init_Assignment is rewritten, we need to set Assignment_OK on the new
107 node. Otherwise, we will get spurious errors when initializing via
108 assignment statement.
110 2017-12-05 Hristian Kirtchev <kirtchev@adacore.com>
112 * sem_elab.adb: Update the terminology and switch sections.
113 (Check_SPARK_Model_In_Effect): New routine.
114 (Check_SPARK_Scenario): Verify the model in effect for SPARK.
115 (Process_Conditional_ABE_Call_SPARK): Verify the model in effect for
117 (Process_Conditional_ABE_Instantiation_SPARK): Verify the model in
119 (Process_Conditional_ABE_Variable_Assignment_SPARK): Verify the model
122 2017-12-05 Nicolas Setton <setton@adacore.com>
124 * terminals.c (__gnat_setup_child_communication): As documented,
125 __gnat_setup_child_communication should not terminate - it is intended
126 to be used as the child process of a call to fork(). However, execvp
127 might actually return in some cases, for instance when attempting to
128 run a 32-bit binary on a 64-bit Linux distribution when the
129 compatibility packages are not installed. In these cases, exit the
130 program to conform to the documentation.
132 2017-12-05 Olivier Hainque <hainque@adacore.com>
134 * libgnat/s-tsmona.adb: Fix for oversight in the tsmona interface
137 2017-12-05 Gary Dismukes <dismukes@adacore.com>
139 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst: Minor typo fix
141 * gnat_ugn.texi: Regenerate.
143 2017-12-05 Olivier Hainque <hainque@adacore.com>
145 * sem_util.adb (Set_Convention): Always clear Can_Use_Internal_Rep
146 on access to subprogram types with foreign convention.
148 2017-12-05 Yannick Moy <moy@adacore.com>
150 * doc/gnat_ugn/building_executable_programs_with_gnat.rst: Fix User's
151 Guide description of default settings of warnings.
153 2017-12-05 Olivier Hainque <hainque@adacore.com>
155 * s-dwalin.adb (Read_And_Execute_Isn): Adjust test checking for the end
156 of section. Add comments explaining the rationale of the computation.
158 2017-12-05 Bob Duff <duff@adacore.com>
160 * exp_ch11.adb: Minor refactoring.
162 2017-12-05 Hristian Kirtchev <kirtchev@adacore.com>
164 * debug.adb: Add debug switches d_a, d_e, and d_p, along with
166 (Set_Underscored_Debug_Flag): New routine.
167 * debug.ads: Add the flags for all underscore switches.
168 (Set_Underscored_Debug_Flag): New routine.
169 * einfo.adb: Flag303 is now Suppress_Elaboration_Warnings.
170 (Suppress_Elaboration_Warnings): New routine.
171 (Set_Suppress_Elaboration_Warnings): New routine.
172 (Write_Entity_Flags): Add output for Suppress_Elaboration_Warnings.
173 * einfo.ads: Add new flag Suppress_Elaboration_Warnings.
174 (Suppress_Elaboration_Warnings): New routine along with pragma Inline.
175 (Set_Suppress_Elaboration_Warnings): New routine along with pragma
177 * exp_ch3.adb (Build_Init_Procedure): Restore the behavior of the
178 legacy elaboration model.
179 (Default_Initialize_Object): Restore the behavior of the legacy
181 * exp_ch9.adb: Add with and use clause for Sem_Elab.
182 (Build_Task_Activation_Call): Restore the behavior of the legacy
184 * frontend.adb (Frontend): Restore the behavior of the legacy
186 * opt.ads: Add new flags Legacy_Elaboration_Checks and
187 Relaxed_Elaboration_Checks, along with documentation.
188 * sem_attr.adb (Analyze_Access_Attribute): Restore the behavior of the
189 legacy elaboration model.
190 * sem_ch5.adb (Analyze_Assignment): Restore the behavior of the legacy
192 * sem_ch7.adb (Analyze_Package_Declaration): Restore the behavior of
193 the legacy elaboration model.
194 * sem_ch8.adb (Attribute_Renaming): Restore the behavior of the legacy
196 * sem_ch12.adb (Analyze_Instance_And_Renamings): Restore the behavior
197 of the legacy elaboration model.
198 (Analyze_Package_Instantiation): Restore the behavior of the legacy
200 (Analyze_Subprogram_Instantiation): Restore the behavior of the legacy
202 * sem_elab.adb: Update the documentation of the Processing phase.
203 Update the documentation on elaboration-related compilation
204 switches. Update the documentation on adding a new target. Add
205 Processing_Attributes which represent the state of the Processing
206 phase. Resurrect the previous elaboration model as "legacy elaboration
208 (Build_Call_Marker): This routine does not function when the legacy
209 elaboration model is in effect. Do not consider entry calls and requeue
210 statements when debug flag d_e is in effect. Do not consider calls to
211 subprograms which verify the runtime semantics of certain assertion
212 pragmas when debug flag d_p is in effect.
213 (Build_Variable_Reference_Marker): This routine does not function when
214 the legacy elaboration model is in effect.
215 (Check_Elaboration_Scenarios): This routine does not function when the
216 legacy elaboration model is in effect.
217 (Ensure_Prior_Elaboration): The various flags have now been replaced
218 with a state. Do not generate implicit Elaborate[_All] pragmas when
219 their creation has been suppressed.
220 (Ensure_Prior_Elaboration_Static): The with clause is marked based on
221 the requested pragma, not on the nature of the scenario.
222 (In_External_Context): Removed.
223 (Is_Assertion_Pragma_Target): New routine.
224 (Is_Potential_Scenario): Stop the traversal of a task body when
225 reaching an accept or select statement, and debug switch d_a is in
227 (Kill_Elaboration_Scenario): This routine does not function when the
228 legacy elaboration model is in effect.
229 (Process_Activation_Generic): The various flags have now been replaced
231 (Process_Conditional_ABE): The various flags have now been replaced
233 (Process_Conditional_ABE_Access): The various flags have now been
234 replaced with a state.
235 (Process_Conditional_ABE_Activation_Impl): The various flags have now
236 been replaced with a state. Do not process an activation call which
237 activates a task whose type is defined in an external instance, and
238 debug switch dL is in effect. Suppress the generation of implicit
239 Elaborate[_All] pragmas once a conditional ABE check has been
241 (Process_Conditional_ABE_Call): The various flags have now been
242 replaced with a state. Do not process a call which invokes a subprogram
243 defined in an external instance, and debug switch dL is in effect.
244 (Process_Conditional_ABE_Call_Ada): The various flags have now been
245 replaced with a state. Suppress the generation of implicit
246 Elaborate[_All] pragmas once a conditional ABE check has been
248 (Process_Conditional_ABE_Call_SPARK): The various flags have now been
249 replaced with a state.
250 (Process_Conditional_ABE_Instantiation): The various flags have now
251 been replaced with a state.
252 (Process_Conditional_ABE_Instantiation_Ada): The various flags have now
253 been replaced with a state. Suppress the generation of implicit
254 Elaborate[_All] pragmas once a conditional ABE check has been
256 (Process_Conditional_ABE_Instantiation_SPARK): The various flags have
257 now been replaced with a state.
258 (Process_Guaranteed_ABE_Activation_Impl): The various flags have now
259 been replaced with a state.
260 (Process_Single_Activation): The various flags have now been replaced
262 (Record_Elaboration_Scenario): This routine does not function when the
263 legacy elaboration model is in effect.
264 (Traverse_Body): The various flags have now been replaced with a state.
265 * sem_elab.ads: Resurrect the pre-18.x elaboration model as "legacy
267 * sem_prag.adb (Analyze_Pragma): Restore the behavior of the legacy
269 * sem_res.adb (Resolve_Call): Restore the behavior of the legacy
271 (Resolve_Entity_Name): Restore the behavior of the legacy elaboration
273 * sem_util.adb (Mark_Elaboration_Attributes): This routine does not
274 function when the legacy elaboration model is in effect.
275 * sinfo.adb (Is_Known_Guaranteed_ABE): Update the assertion check.
276 (No_Elaboration_Check): New routine.
277 (Set_Is_Known_Guaranteed_ABE): Update the assertion check.
278 (Set_No_Elaboration_Check): New routine.
279 * sinfo.ads: Update the documentation of flag Is_Known_Guaranteed_ABE
280 along with occurrences in nodes. Add new flag No_Elaboration_Check
281 along with occurrences in nodes.
282 * switch-c.adb (Scan_Front_End_Switches): Add processing for debug
283 switches with underscores. Add processing for switches -gnatH and
285 * usage.adb (Usage): Add output for switches -gnatH and -gnatJ.
286 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst: Update the
287 documentation to include the legacy and relaxed elaboration models.
288 * gnat_ugn.texi:Â Regenerate.
290 2017-12-05 Arnaud Charlet <charlet@adacore.com>
292 * doc/gnat_ugn/platform_specific_information.rst: Minor edit.
293 Improve doc on required packages for linux 32bits.
295 2017-12-05 Doug Rupp <rupp@adacore.com>
297 * tracebak.c (ppc64-vx7): USE_GCC_UNWINDER for 64bit.
299 2017-12-05 Javier Miranda <miranda@adacore.com>
301 * checks.adb (Generate_Range_Check): Force evaluation of the node in
302 more cases. This patch was written to improve the code generated by
303 the CCG compiler but it is enabled for all targets since double
304 evaluation is always a potential source of inefficiency.
306 2017-12-05 Gary Dismukes <dismukes@adacore.com>
308 * doc/gnat_ugn/gnat_utility_programs.rst: Remove reference to obsolete
311 2017-12-05 Eric Botcazou <ebotcazou@adacore.com>
313 * exp_ch5.adb (Expand_Iterator_Loop_Over_Array): Use the SLOC of the
314 iteration scheme throughout, except for the new loop statement(s).
316 2017-12-05 Ed Schonberg <schonberg@adacore.com>
318 * exp_aggr.adb (Gen_Assign): Do not analyze the expressionn of the
319 assignment if it is part of an Iterated_Component_Association: the
320 analysis needs to take place once the loop structure is analyzed and
321 the loop parameter made visible, because references to it typically
322 appear in the corresponding expression. This is necessary if the
323 expression is an aggregate, because previous pre-analysis of the
324 expression does not handle nested aggregates properly.
326 2017-12-05 Bob Duff <duff@adacore.com>
328 * sem_res.adb (Resolve_Allocator): Avoid coextension processing for an
329 allocator that is the expansion of a build-in-place function call.
331 2017-12-05 Olivier Hainque <hainque@adacore.com>
334 * s-trasym__dwarf.adb (spec of Module_Name.Get): Instead of
335 possibly adjusting the lookup address by a load address, expect
336 a extra argument through which the load address can be conveyed
338 (Multi_Module_Symbolic_Traceback): Adjust accordingly. Pass the
339 retrieved load address to Init_Module.
340 * s-tsmona__linux.adb (Get): Honor the new interface.
341 * s-tsmona__mingw.adb (Get): Likewise.
342 * s-dwalin.ads: Adjust comments to be explicit about which
343 addresses are from module info and which are run-time addresses,
344 offsetted by the module load address.
345 * s-dwalin.adb (Set_Load_Address): Simply set C.Load_Slide.
346 Do not alter the module Low and High (relative) addresses.
347 (Is_Inside): Improve documentation regarding the kinds of addresses
348 at hand and correct the test.
349 (Symbolic_Traceback): Use separate variables with explicit names
350 for the address in traceback (run-time value) and the address to
351 lookup within the shared object (module-relative). Adjust the
352 computation of address passed to Symbolic_Address for symbolization.
354 2017-12-05 Arnaud Charlet <charlet@adacore.com>
356 * opt.ads (Expand_Nonbinary_Modular_Ops): New flag.
357 * exp_ch4.adb (Expand_Nonbinary_Modular_Op): Use
358 Expand_Nonbinary_Modular_Ops instead of Modify_Tree_For_C, so that
359 other back-ends can also benefit from the front-end expansion. Remove
360 test for Modify_Tree_For_C in all callers to better share code.
361 * gnat1drv.adb (Adjust_Global_Switches): Set
362 Expand_Nonbinary_Modular_Ops when generating C code.
364 2017-12-05 Ed Schonberg <schonberg@adacore.com>
366 * exp_ch5.adb (Expand_Formal_Container_Loop): Ensure that the loop
367 parameter becomes invisible after analyzing the loop, which has been
368 rewritten as a while-loop.
370 2017-12-05 Doug Rupp <rupp@adacore.com>
372 * vxaddr2line.adb: Revise and enhance for new ports, remove dead ports,
373 and update for 64bit ports.
375 2017-12-05 Bob Duff <duff@adacore.com>
377 * exp_ch6.adb (Build_In_Place_Formal): Search for the formal by suffix
378 instead of the full name.
379 * sem_ch6.adb (Create_Extra_Formals): Make sure there are extra formals
380 in the case of an instance of a generic.
382 2017-12-05 Arnaud Charlet <charlet@adacore.com>
384 (Adjust_Global_Switches): Create an alias GNAT_Annotate to map to
387 2017-12-05 Sebastian Huber <sebastian.huber@embedded-brains.de>
389 * gcc-interface/Makefile.in (RTEMS): Define EH_MECHANISM.
391 2017-12-04 Sebastian Huber <sebastian.huber@embedded-brains.de>
393 * gcc-interface/Makefile.in (RTEMS): Use s-osprim__rtems.adb.
394 * libgnat/s-osprim__rtems.adb: New file.
395 * libgnarl/s-osinte__rtems.adb (pthread_cond_t): Fix alignment.
396 (pthread_mutexattr_t): Likewise.
397 (pthread_rwlockattr_t): Likewise.
398 (pthread_rwlock_t): Likewise.
399 (time_t): Use 64-bit integer.
401 2017-12-01 Sebastian Huber <sebastian.huber@embedded-brains.de>
403 * libgnarl/s-osinte__rtems.ads (pthread_cond_t): Use correct size and
405 (pthread_mutex_t): Likewise.
406 (pthread_rwlock_t): Likewise.
408 2017-11-28 Jakub Jelinek <jakub@redhat.com>
410 * gcc-interface/trans.c (Case_Statement_to_gnu): Build SWITCH_EXPR
411 using build2 instead of build3.
413 2017-11-23 Eric Botcazou <ebotcazou@adacore.com>
416 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not build a variant
417 type for the implementation type of a packed array.
419 2017-11-23 Mike Stump <mikestump@comcast.net>
420 Eric Botcazou <ebotcazou@adacore.com>
422 * gcc-interface/trans.c (gnat_gimplify_stmt) <LOOP_STMT>: Pass 3rd
423 operand to ANNOTATE_EXPR and also pass unrolling hints.
425 2017-11-20 Eric Botcazou <ebotcazou@adacore.com>
428 * gnatlink.adb (Process_Args): Accept multiple switches for --LINK.
430 * gcc-interface/Makefile.in (GCC_LINK): Remove $(ADA_INCLUDES).
431 (common-tools): Pass $(CC) as --GCC= and $(GCC_LINK) as --LINK= in
432 the invocations of $(GNATLINK).
433 (../../gnatdll$(exeext)): Likewise.
434 (../../vxaddr2line$(exeext)): Likewise.
435 (gnatmake-re): Likewise.
436 (gnatlink-re): Likewise.
438 2017-11-16 Doug Rupp <rupp@adacore.com>
440 * gcc-interface/Makefile.in: Merge Aarch64 and ARM "ifeq" blocks.
442 2017-11-16 Steve Baird <baird@adacore.com>
444 * debug.adb: Update another comment to indicate gnat2scil's use of the
447 2017-11-16 Bob Duff <duff@adacore.com>
449 * exp_ch6.adb (Expand_Call_Helper): Avoid creating a transient scope in
450 the case of nested build-in-place calls.
452 2017-11-16 Joel Brobecker <brobecker@adacore.com>
454 * doc/gnat_ugn/gnat_utility_programs.rst: Document the switches
455 available in gnatsymbolize.
457 2017-11-16 Steve Baird <baird@adacore.com>
459 * debug.adb: Update comment to indicate gnat2scil's use of the -gnatd.7
462 2017-11-16 Gary Dismukes <dismukes@adacore.com>
464 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst, sem_ch6.adb,
465 sem_elab.adb: Minor editorial corrections.
466 * gnat_ugn.texi: Regenerate.
468 2017-11-16 Joel Brobecker <brobecker@adacore.com>
470 * doc/gnat_ugn/gnat_utility_programs.rst (GNAT UGN): Add
471 gnatsymbolize documentation.
472 * gnat_ugn.texi: Regenerate.
474 2017-11-16 Steve Baird <baird@adacore.com>
476 * sem_ch3.adb (Build_Derived_Record_Type): Replace all uses of
477 "Scope (Parent_Type)" with "Scope (Parent_Base)".
479 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
481 * opt.ads: Elaboration warnings are now on by default. Add a comment
482 explaining why this is needed.
483 * sem_ch9.adb (Analyze_Requeue): Preserve the status of elaboration
485 * sem_ch12.adb (Analyze_Package_Instantiation): Preserve the status of
486 elaboration warnings.
487 (Analyze_Subprogram_Instantiation): Preserve the status of elaboration
489 * sem_elab.adb: Update the structure of Call_Attributes and
490 Instantiation_Attributes.
491 (Build_Call_Marker): Propagate the status of elaboration warnings from
492 the call to the marker.
493 (Extract_Call_Attributes): Extract the status of elaboration warnings.
494 (Extract_Instantiation_Attributes): Extract the status of elaboration
496 (Process_Conditional_ABE_Activation_Impl): Elaboration diagnostics are
497 now dependent on the status of elaboration warnings.
498 (Process_Conditional_ABE_Call_Ada): Elaboration diagnostics are now
499 dependent on the status of elaboration warnings.
500 (Process_Conditional_ABE_Instantiation_Ada): Elaboration diagnostics
501 are now dependent on the status of elaboration warnings.
502 (Process_Guaranteed_ABE_Activation_Impl): Remove pragma Unreferenced
503 for formal Call_Attrs. Elaboration diagnostics are now dependent on the
504 status of elaboration warnings.
505 (Process_Guaranteed_ABE_Call): Elaboration diagnostics are now
506 dependent on the status of elaboration warnings.
507 (Process_Guaranteed_ABE_Instantiation): Elaboration diagnostics are now
508 dependent on the status of elaboration warnings.
509 * sem_prag.adb (Analyze_Pragma): Remove the unjustified warning
510 concerning pragma Elaborate.
511 * sem_res.adb (Resolve_Call): Preserve the status of elaboration
513 (Resolve_Entry_Call): Propagate flag Is_Elaboration_Warnings_OK_Node
514 from the procedure call to the entry call.
515 * sem_util.adb (Mark_Elaboration_Attributes): Add formal parameter
517 (Mark_Elaboration_Attributes_Node): Preserve the status of elaboration
519 * sem_util.ads (Mark_Elaboration_Attributes): Add formal parameter
520 Warnings. Update the comment on usage.
521 * sinfo.adb (Is_Dispatching_Call): Update to use Flag6.
522 (Is_Elaboration_Warnings_OK_Node): New routine.
523 (Set_Is_Dispatching_Call): Update to use Flag6.
524 (Set_Is_Elaboration_Warnings_OK_Node): New routine.
525 * sinfo.ads: Attribute Is_Dispatching_Call now uses Flag6. Add new
526 attribute Is_Elaboration_Warnings_OK_Node along with occurrences
528 (Is_Elaboration_Warnings_OK_Node): New routine along with pragma
530 (Set_Is_Elaboration_Warnings_OK_Node): New routine along with pragma
532 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst: Update various
533 sections to indicate how to suppress elaboration warnings. Document
534 switches -gnatwl and -gnatwL.
535 * gnat_ugn.texi: Regenerate.
537 2017-11-16 Sylvain Dailler <dailler@adacore.com>
539 * sem_util.adb (Get_Enum_Lit_From_Pos): Add a condition for Pos
542 2017-11-16 Bob Duff <duff@adacore.com>
544 * sem_ch13.adb (Check_Expr_Constants): Avoid error message in case of
547 2017-11-16 Yannick Moy <moy@adacore.com>
549 * sem_elab.adb (Include): Fix mode of parameter Curr to out.
551 2017-11-16 Piotr Trojanek <trojanek@adacore.com>
553 * sem_util.ads, sem_util.adb (Is_CCT_Instance): Allow calls where
554 Context_Id denotes a record type.
556 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
558 * sem_ch8.adb (Check_SPARK_Primitive_Operation): Enable the check in
561 2017-11-16 Doug Rupp <rupp@adacore.com>
563 Initial gnat port to aarch64-wrs-vxworks7
564 * libgnarl/s-vxwork__aarch64.ads,
565 libgnat/system-vxworks7-aarch64-rtp-smp.ads,
566 libgnat/system-vxworks7-aarch64.ads: New files
567 * sigtramp-vxworks-target.inc (aarch64): New section.
568 * tracebak.c (USE_ARM_UNWINDING): Disable for ARMARCH8A.
570 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
572 * sem_elab.adb (Include): Including a node which is also a compilation
573 unit terminates the search because there are no more lists to examine.
575 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
577 * sem_ch8.adb (Analyze_Subprogram_Renaming): Ensure that a renaming
578 declaration does not define a primitive operation of a tagged type for
580 (Check_SPARK_Primitive_Operation): New routine.
582 2017-11-16 Arnaud Charlet <charlet@adacore.com>
584 * libgnat/a-elchha.adb (Last_Chance_Handler): Display Argv (0) in
585 message when using -E binder switch.
587 2017-11-16 Piotr Trojanek <trojanek@adacore.com>
589 * errout.ads: Fix minor typo in comment.
591 2017-11-16 Ed Schonberg <schonberg@adacore.com>
593 * sem_ch3.adb (Process_Subtype): If the subtype indication does not
594 syntactically denote a type, return Any_Type to prevent subsequent
595 compiler crashes or infinite loops.
597 2017-11-16 Steve Baird <baird@adacore.com>
599 * lib-writ.adb: Fix bug which causes Program_Error to be raised in some
600 cases when writing out a .ali file when a Rename_Pragma pragma is in
602 * lib-writ.adb (Write_Unit_Information): Replace call to
603 Pragma_Name_Unmapped with call to Pragma_Name.
605 2017-11-16 Gary Dismukes <dismukes@adacore.com>
607 * sem_elab.adb: Minor typo fixes.
609 2017-11-16 Justin Squirek <squirek@adacore.com>
611 * sem_res.adb (Resolve_Allocator): Correct warning messages and make
614 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
616 * atree.ads (Nkind_In): Add 10 and 11 parameter versions.
617 * checks.adb (Install_Primitive_Elaboration_Check): Mark the setting of
618 the elaboration flag as elaboration code.
619 * einfo.adb (Contract): Update the comments.
620 (Ignore_SPARK_Mode_Pragmas): Update the comments.
621 (SPARK_Aux_Pragma): Update the comments.
622 (SPARK_Aux_Pragma_Inherited): Update the comments.
623 (SPARK_Pragma): Update the comments. The attribute now applies
624 to all types and abstract states.
625 (SPARK_Pragma_Inherited): Update the comments. The attribute now
626 applies to all types and abstract states.
627 (Set_Contract): Update the comments.
628 (Set_Ignore_SPARK_Mode_Pragmas): Update the comments.
629 (Set_SPARK_Aux_Pragma): Update the comments.
630 (Set_SPARK_Aux_Pragma_Inherited): Update the comments.
631 (Set_SPARK_Pragma): Update the comments. The attribute now applies to
632 all types and abstract states.
633 (Set_SPARK_Pragma_Inherited): Update the comments. The attribute now
634 applies to all types and abstract states.
635 (Write_Field40_Name): Add output for SPARK_Pragma when it appears on a
636 type and abstract states.
637 * einfo.ads: Update the documentation of attributes SPARK_Pragma and
638 SPARK_Pragma_Inherited. Both of them now apply to all types and
640 * exp_util.adb (Set_Elaboration_Flag): Mark the setting of the
641 elaboration flag as elaboration code.
642 * sem_ch3.adb: Add with and use clauses for Sem_Elab.
643 (Analyze_Full_Type_Declaration): Set the SPARK_Mode of the type. Record
644 a derived type for later processing by the ABE mechanism.
645 (Analyze_Incomplete_Type_Decl): Set the SPARK_Mode of the type.
646 (Analyze_Private_Extension_Declaration): Set the SPARK_Mode of the
648 * sem_ch7.adb (Analyze_Private_Type_Declaration): Set the SPARK_Mode of
650 * sem_elab.adb: Define the term "early call region". Update the
651 terminology for "scenario" and "target". Update the architecture of
652 the ABE mechanism. Update the steps which must be taken when adding a
653 new scenario. Update the section on debugging ABE issues. Add new
654 hash tables Early_Call_Regions and Recorded_SPARK_Scenarios. Add new
655 table SPARK_Scenarios. Hash table Elaboration_Context is now
656 Elaboration_Statuses. The majority of Process_xxx routines have been
657 updated to better reflect their role.
658 (Add_Unit): Reimplemented.
659 (Check_Elaboration_Constituent): New routine.
660 (Check_Elaboration_Scenarios): Verify previously recorded scenarios for
661 conditional ABE issues. Verify previously recorded SPARK scenarios.
662 (Check_SPARK_Derived_Type): New routine.
663 (Check_SPARK_Instantiation): New routine.
664 (Check_SPARK_Scenario): New routine.
665 (Check_SPARK_Refined_State_Pragma): New routine.
666 (Early_Call_Region): New routine.
667 (Elaboration_Status): New routine.
668 (Ensure_Prior_Elaboration): Add new formal parameter Prag_Nam. The
669 implicit Elabotate[_All] pragma is now specified via Prag_Nam.
670 (Find_Early_Call_Region): New routine.
671 (Info_Scenario): Add output for refinement constituents.
672 (Is_Recorded_SPARK_Scenario): New routine.
673 (Is_Suitable_SPARK_Derived_Type): New routine.
674 (Is_Suitable_SPARK_Instantiation): New routine.
675 (Is_Suitable_SPARK_Refined_State_Pragma): New routine.
676 (Is_Visited_Body): New routine.
677 (Kill_Elaboration_Scenario): Reimplemented.
678 (Output_Active_Scenarios): Add output for pragma Refined_State.
679 (Output_SPARK_Refined_State_Pragma): New routine.
680 (Process_Conditional_ABE_Call): Remove the use of -gnatd.v. The effect
681 is now achieved by different means.
682 (Process_Conditional_ABE_Call_SPARK): Verify that a call which precedes
683 the subprogram body appears within the early call region of the body.
684 Either ensure the prior elaboration of external subprograms or verify
685 that the context meets the suitable elaboration requirement.
686 (Process_Conditional_ABE_Instantiation_SPARK): New routine.
687 (Record_Elaboration_Scenario): Reimplement the portion which enforces
688 the level restrictions of the static model. Add support for SPARK
690 (Record_SPARK_Elaboration_Scenario): New routine.
691 (Reset_Visited_Bodies): New routine.
692 (Set_Early_Call_Region): New routine.
693 (Set_Elaboration_Status): New routine.
694 (Set_Is_Recorded_SPARK_Scenario): New routine.
695 (Update_Elaboration_Scenario): Reimplemented.
696 * sem_elab.ads: Add new subtype Library_Or_Instantiation_Level.
697 * sem_prag.adb (Analyze_Refined_State_In_Decl_Part): Save the pragma
698 for examination by the ABE Processing phase.
699 (Create_Abstract_State): Save the SPARK_Mode from the context.
700 * sem_util.adb (Is_Non_Preelaborable_Construct): New routine.
701 * sem_util.ads (Is_Non_Preelaborable_Construct): New routine.
702 * sinfo.adb (Is_Elaboration_Code): New routine.
703 (Set_Is_Elaboration_Code): New routine.
704 (Nkind_In): Add 10 and 11 parameter versions.
705 * sinfo.ads: Add new attribute Is_Elaboration_Code along with
706 occurrences in nodes.
707 (Is_Elaboration_Code): New routine along with pragma Inline.
708 (Set_Is_Elaboration_Code): New routine along with pragma Inline.
709 (Nkind_In): Add 10 and 11 parameter versions.
711 2017-11-16 Justin Squirek <squirek@adacore.com>
713 * sem.adb (Analyze): Remove requirement that the original node of N be
714 an operator in the case that analysis on the node yields the relevant
715 operator - so prefer it instead.
717 2017-11-16 Bob Duff <duff@adacore.com>
719 * sem_ch6.adb (Create_Extra_Formals): The type of the BIP_Object_Access
720 formal must not have a designated type that is the full view coming
721 from a limited-with'ed package.
722 * sem_util.adb,sem_util.ads (Incomplete_View_From_Limited_With): New
723 function called from sem_ch6.
724 * sem_ch5.adb (Analyze_Assignment): Treat user-defined concatenation
725 specially for b-i-p cases.
727 2017-11-10 Martin Sebor <msebor@redhat.com>
730 * adadecode.c (__gnat_decode): Use memcpy instead of strncpy.
731 * argv.c (__gnat_fill_arg, __gnat_fill_env): Likewise.
733 2017-11-10 Eric Botcazou <ebotcazou@adacore.com>
735 * gcc-interface/utils.c (convert) <RECORD_TYPE>: Add comment and do
736 not fall through to the next case.
737 <ARRAY_TYPE>: Deal specially with a dereference from another array
738 type with the same element type.
740 2017-11-09 Gary Dismukes <dismukes@adacore.com>
742 * exp_util.adb, freeze.adb: Minor reformatting.
744 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
746 * gcc-interface/Makefile.in: Add rules to build aarch64-qnx runtimes.
748 2017-11-09 Hristian Kirtchev <kirtchev@adacore.com>
750 * gcc-interface/trans.c (gnat_to_gnu): Add processing for
751 N_Variable_Reference_Marker nodes.
753 2017-11-09 Ed Schonberg <schonberg@adacore.com>
755 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Handle properly
756 the pragma Compile_Time_Error when it appears in a generic package
757 declaration and uses an expanded name to denote the current unit.
759 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
761 * libgnarl/s-taprop__qnx.adb: Fix incorrect casing for pthread_self.
762 * tracebak.c: Add support for tracebacks in QNX.
764 2017-11-09 Eric Botcazou <ebotcazou@adacore.com>
766 * exp_aggr.adb (Aggr_Size_OK): Bump base limit from 50000 to 500000.
768 2017-11-09 Yannick Moy <moy@adacore.com>
770 * erroutc.adb, set_targ.adb: Remove pragma Annotate for CodePeer
773 2017-11-09 Joel Brobecker <brobecker@adacore.com>
775 * doc/gnat_ugn/platform_specific_information.rst: Document packages
776 needed on GNU/Linux by GNAT.
777 * gnat_ugn.texi: Regenerate.
779 2017-11-09 Hristian Kirtchev <kirtchev@adacore.com>
781 * contracts.adb (Analyze_Contracts): Remove the three parameter
782 version. This routine now only analyzes contracts and does not perform
783 any freezing actions.
784 (Analyze_Previous_Contracts): Removed.
785 (Freeze_Previous_Contracts): New routine.
786 * contracts.ads (Analyze_Previous_Contracts): Removed.
787 (Freeze_Previous_Contracts): New routine.
788 * sem_ch3.adb (Analyze_Declarations): Analyze the contract of an
789 enclosing package spec regardless of whether the list denotes the
790 visible or private declarations. Fix the removal of partial state
791 refinements when the context is a package spec.
792 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Freeze previous
794 * sem_ch7.adb (Analyze_Package_Body_Helper): Freeze previous contracts.
795 * sem_ch9.adb (Analyze_Entry_Body): Freeze previous contracts.
796 (Analyze_Protected_Body): Freeze previous contracts.
797 (Analyze_Task_Body): Freeze previous contracts.
798 * sem_prag.adb: Comment reformatting.
800 2017-11-09 Bob Duff <duff@adacore.com>
802 * libgnarl/g-thread.ads, libgnarl/g-thread.adb: (Make_Independent):
803 Export this so users can use it without importing
804 System.Tasking.Utilities.
805 * libgnarl/s-tassta.adb (Vulnerable_Complete_Task): Relax assertion
806 that fails when Make_Independent is called on a user task.
807 * libgnarl/s-taskin.ads (Master_Of_Task): Avoid unusual
808 capitalization style ((style) bad casing of "Master_of_Task").
810 2017-11-09 Ed Schonberg <schonberg@adacore.com>
812 * sem_ch12.adb (Analyze_Subprogram_Instantiation): Correct use of
813 uninitialized variable uncovered by Codepeer.
815 2017-11-09 Arnaud Charlet <charlet@adacore.com>
817 * namet.adb: Replace pragma Assume by pragma Assert to fix bootstrap.
819 2017-11-09 Javier Miranda <miranda@adacore.com>
821 * doc/gnat_rm/standard_and_implementation_defined_restrictions.rst:
822 (Static_Dispatch_Tables): Minor rewording.
823 * gnat_rm.texi: Regenerate.
825 2017-11-09 Justin Squirek <squirek@adacore.com>
827 * sem_ch8.adb (Analyze_Use_Package): Remove forced installation of
828 use_clauses within instances.
829 (Use_One_Package): Add condition to check for "hidden" open scopes to
830 avoid skipping over packages that have not been properly installed even
831 though they are visible.
833 2017-11-09 Ed Schonberg <schonberg@adacore.com>
835 * sem_ch4.adb (Analyze_Selected_Component): Reject properly a call to a
836 private operation of a protected type, when the type has no visible
839 2017-11-09 Javier Miranda <miranda@adacore.com>
841 * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_HT_Link.
842 * exp_disp.adb (Make_DT): Initialize the HT_Link field of the TSD only
845 2017-11-09 Bob Duff <duff@adacore.com>
847 * exp_ch4.adb, exp_ch9.adb, exp_prag.adb, par-ch3.adb, sem_aggr.adb,
848 sem_ch12.adb, sem_ch13.adb, sem_ch4.adb, sem_disp.adb, sem_prag.adb,
849 sem_res.adb, sem_util.adb: Get rid of warnings about uninitialized
852 2017-11-09 Yannick Moy <moy@adacore.com>
854 * exp_disp.adb (Make_DT): Default initialize Ifaces_List and
857 2017-11-09 Pascal Obry <obry@adacore.com>
859 * libgnarl/s-taprop__mingw.adb: On Windows, initialize the thead handle
860 only for foreign threads. We initialize the thread handle only if not
861 yet initialized. This happens in Enter_Task for foreign threads only.
862 But for native threads (Ada tasking) we do want to keep the real
863 handle (from Create_Task) to be able to free the corresponding
864 resources in Finalize_TCB (CloseHandle).
866 2017-11-09 Yannick Moy <moy@adacore.com>
868 * sem_attr.adb (Analyze_Attribute): Default initialize P_Type,
870 (Error_Attr_P): Fix name in pragma No_Return.
871 (Unexpected_Argument): Add pragma No_Return.
872 (Placement_Error): Add pragma No_Return.
874 2017-11-09 Javier Miranda <miranda@adacore.com>
876 * exp_disp.adb (Elab_Flag_Needed): Elaboration flag not needed when the
877 dispatch table is statically built.
878 (Make_DT): Declare constant the Interface_Table object associated with
879 an statically built dispatch table. For this purpose the Offset_To_Top
880 value of each interface is computed using the dummy object.
881 * exp_ch3.adb (Build_Init_Procedure): Do not generate code initializing
882 the Offset_To_Top field of secondary dispatch tables when the dispatch
883 table is statically built.
884 (Initialize_Tag): Do not generate calls to Register_Interface_Offset
885 when the dispatch table is statically built.
886 * doc/gnat_rm/standard_and_implementation_defined_restrictions.rst:
887 Document the new GNAT restriction Static_Dispatch_Tables.
888 * gnat_rm.texi: Regenerate.
890 2017-11-09 Hristian Kirtchev <kirtchev@adacore.com>
892 * sem_aggr.adb (Resolve_Delta_Record_Aggregate): Reorder declarations
893 to avoid a dormant bug.
895 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
897 * init.c: Define missing __gnat_alternate_stack for QNX. Set it to 0,
898 as such capability is not available on the OS.
899 * link.c: Make sure linker options for QNX are correct.
900 * libgnarl/s-osinte__qnx.ads: Add some missing bindings to pthread.
901 * libgnarl/s-taprop__qnx.adb: New, derived from s-taprop__posix.adb. This brings
902 in particular a workaround with locks priority ceiling where a higher
903 priority task is allowed to lock a lower ceiling priority lock. This
904 also fixes the scheduling of FIFO tasks when the priority of a task is
906 * libgnat/system-qnx-aarch64.ads: Fix priority ranges.
908 2017-11-09 Yannick Moy <moy@adacore.com>
910 * erroutc.adb (Output_Error_Msgs): Justify CodePeer false positive
912 * gnatbind.adb (Scan_Bind_Arg): Simplify test to remove always true
914 * namet.adb (Copy_One_Character): Add assumption for static analysis,
915 as knowledge that Hex(2) is in the range 0..255 is too complex for
917 (Finalize): Add assumption for static analysis, as the fact that there
918 are symbols in the table depends on a global invariant at this point in
920 * set_targ.adb (Check_Spaces): Justify CodePeer false positive message.
921 * stylesw.adb (Save_Style_Check_Options): Rewrite to avoid test always
924 2017-11-09 Javier Miranda <miranda@adacore.com>
926 * libgnat/s-rident.ads (Static_Dispatch_Tables): New restriction name.
927 * exp_disp.adb (Building_Static_DT): Check restriction.
928 (Building_Static_Secondary_DT): Check restriction.
929 (Make_DT): Initialize the HT_Link to No_Tag.
930 * opt.ads (Static_Dispatch_Tables): Rename flag...
931 (Building_Static_Dispatch_Tables): ... into this. This will avoid
932 conflict with the restriction name.
933 * gnat1drv.adb: Update.
934 * exp_aggr.adb (Is_Static_Dispatch_Table_Aggregate): Update.
935 * exp_ch3.adb (Expand_N_Object_Declaration): Update.
937 2017-11-09 Pascal Obry <obry@adacore.com>
939 * libgnarl/s-taprop__mingw.adb: Minor code clean-up. Better using a
942 2017-11-09 Yannick Moy <moy@adacore.com>
944 * binde.adb (Diagnose_Elaboration_Problem): Mark procedure No_Return.
945 * checks.adb (Apply_Scalar_Range_Check): Rescope variable OK closer to
946 use. Default initialize Hi, Lo.
947 (Selected_Range_Checks): Retype Num_Checks more precisely.
948 (Determine_Range, Determine_Range_R): Default initialize Hi_Right,
950 * contracts.adb (Process_Contract_Cases): Mark parameter Stmts as
952 (Process_Postconditions): Mark parameter Stmts as Unmodified.
953 * exp_attr.adb (Expand_Loop_Entry_Attribute): Default initialize Blk.
954 * exp_ch4.adb (Expand_N_Allocator): Default initialize Typ.
955 (Expand_Concatenate): Default initialize High_Bound.
956 (Optimize_Length_Comparison): Default initialize Ent, Index.
957 * exp_ch5.adb (Expand_Predicated_Loop): Default initialize L_Hi and
959 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Default initialize
961 * exp_ch9.adb (Expand_Entry_Barrier): Default initialize Func_Body and
962 remove pragma Warnings(Off).
963 * exp_imgv.adb (Expand_Image_Attribute): Default initialize Tent.
964 * exp_util.adb (Find_Interface_Tag): Default initialize AI_Tag.
965 * freeze.adb (Check_Component_Storage_Order): Default initialize
966 Comp_Byte_Aligned rather than silencing messages with pragma
967 Warnings(Off), which does not work for CodePeer initialization
968 messages, and given that here the possible read of an unitialized value
969 depends on a proper use of parameters by the caller.
970 * inline.adb (Expand_Inlined_Call): Default initialize Lab_Decl, Targ.
971 * sem_ch12.adb (Build_Operator_Wrapper): Default initialize Expr.
972 * sem_ch3.adb (Build_Derived_Array_Type): Default initialize
974 * sem_ch4.adb (List_Operand_Interps): Default initialize Nam and remove
975 pragma Warnings(Off).
976 (Analyze_Case_Expression): Rescope checking block within branch where
977 Others_Present is set by the call to Check_Choices.
978 * sem_ch5.adb (Analyze_Assignment): Default initialize
980 * sem_ch6.adb (Analyze_Function_Return): Default initialize Obj_Decl,
981 and restructure code to defend against previous errors, so that, in
982 that case, control does not flow to the elsif condition which read an
983 uninitialized Obj_Decl.
984 * sem_ch9.adb (Analyze_Requeue): Default initialize Synch_Type.
985 (Check_Interfaces): Default initialize Full_T_Ifaces and Priv_T_Ifaces,
986 which seem to be left uninitialized and possibly read in some cases.
987 * sem_dim.adb (Analyze_Aspect_Dimension_System): Retype Position more
988 precisely. This requires to exchange the test for exiting in case of
989 too many positions and the increment to Position, inside the loop.
990 * sem_eval.adb (Eval_Concatenation): Default initialize Folded_Val,
991 which cannot be read uninitialized, but the reasons for that are quite
993 * sem_intr.adb (Check_Intrinsic_Call): Default initialize Rtyp.
994 * sem_prag.adb (Collect_Subprogram_Inputs_Outputs): Default initialize
996 * sem_res.adb (Make_Call_Into_Operator): Default initialize Opnd_Type,
997 and test for presence of non-null Opnd_Type before testing its scope,
998 in a test which would read its value uninitialized, and is very rarely
999 exercized (it depends on the presence of an extension of System).
1000 * sem_spark.ads: Update comment to fix name of main analysis procedure.
1001 * sem_warn.adb (Warn_On_Known_Condition): Default initialize
1003 * set_targ.adb (FailN): Mark procedure with No_Return.
1004 * stylesw.adb (Save_Style_Check_Options): Delete useless code to
1005 initialize all array Options to white space, as there is already code
1006 doing the same for the remaining positions in Options at the end of the
1009 2017-11-09 Eric Botcazou <ebotcazou@adacore.com>
1011 * exp_ch11.adb (Possible_Local_Raise): Do not issue the warning for
1012 generic instantiations either.
1014 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1016 * sem_prag.adb (Analyze_Part_Of): Reword error message.
1017 (Get_SPARK_Mode_Type): Do not raise Program_Error in case pragma
1018 SPARK_Mode appears with an illegal mode, treat this as a non-existent
1021 2017-11-09 Ed Schonberg <schonberg@adacore.com>
1023 * sem_ch4.adb (Analyze_Call): Reject a call to a function that returns
1024 a limited view of a type T declared in unit U1, when the function is
1025 declared in another unit U2 and the call appears in a procedure within
1028 2017-11-09 Justin Squirek <squirek@adacore.com>
1030 * sem_ch8.adb (Analyze_Use_Package): Force installation of use_clauses
1031 when processing generic instances.
1033 2017-11-09 Bob Duff <duff@adacore.com>
1035 * namet.ads, namet.adb (Valid_Name_Id): New subtype that excludes
1036 Error_Name and No_Name. Use this (versus Name_Id) to indicate which
1037 objects can have those special values. Valid_Name_Id could usefully be
1038 used all over the compiler front end, but that's too much trouble for
1039 now. If we did that, we might want to rename:
1040 Name_Id --> Optional_Name_Id, Valid_Name_Id --> Name_Id.
1041 For parameters of type Valid_Name_Id, remove some redundant tests,
1042 including the ones found by CodePeer. Use Is_Valid_Name instead of
1043 membership test when appropriate.
1044 (Error_Name_Or_No_Name): Delete this; it's no longer needed.
1045 * sem_ch2.adb (Analyze_Identifier): Use "not Is_Valid_Name" instead of
1046 "in Error_Name_Or_No_Name".
1047 (Check_Parameterless_Call): Use "not Is_Valid_Name" instead of "in
1048 Error_Name_Or_No_Name".
1050 2017-11-09 Arnaud Charlet <charlet@adacore.com>
1052 * gnat1drv.adb (Adjust_Global_Switches): Suppress warnings in codepeer
1053 mode here unless -gnateC is specified.
1054 * switch-c.adb (Scan_Front_End_Switches): Do not suppress warnings with
1057 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1059 * lib-writ.adb (Write_ALI): Remove processing of the frontend xrefs as
1060 part of the ALI writing; they are now processed directly from memory
1061 when requested by the backend.
1062 * lib-xref.ads (Collect_SPARK_Xrefs): Remove.
1063 (Iterate_SPARK_Xrefs): New routine for iterating over frontend xrefs.
1064 * lib-xref-spark_specific.adb (Traverse_Compilation_Unit): Remove.
1065 (Add_SPARK_File): Remove.
1066 (Add_SPARK_Xref): Refactored from removed code; filters xref entries
1067 that are trivially uninteresting to the SPARK backend.
1068 * spark_xrefs.ads: Remove code that is no longer needed.
1069 * spark_xrefs.adb (dspark): Adapt to use Iterate_SPARK_Xrefs.
1071 2017-11-09 Hristian Kirtchev <kirtchev@adacore.com>
1073 * sem_elab.adb: Update the documentation on adding a new elaboration
1074 schenario. Add new hash table Recorded_Top_Level_Scenarios.
1075 (Is_Check_Emitting_Scenario): Removed.
1076 (Is_Recorded_Top_Level_Scenario): New routine.
1077 (Kill_Elaboration_Scenario): Reimplemented.
1078 (Record_Elaboration_Scenario): Mark the scenario as recorded.
1079 (Set_Is_Recorded_Top_Level_Scenario): New routine.
1080 (Update_Elaboration_Scenario): Reimplemented.
1081 * sinfo.adb (Is_Recorded_Scenario): Removed.
1082 (Set_Is_Recorded_Scenario): Removed.
1083 * sinfo.ads: Remove attribute Is_Recorded_Scenario along with
1084 occurrences in nodes.
1085 (Is_Recorded_Scenario): Removed along with pragma Inline.
1086 (Set_Is_Recorded_Scenario): Removed along with pragma Inline.
1088 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1090 * sem_prag.adb (Analyze_Part_Of): Change "designate" to "denote" in
1093 2017-11-09 Justin Squirek <squirek@adacore.com>
1095 * sem_res.adb (Resolve_Allocator): Add warning messages corresponding
1096 to the allocation of an anonymous access-to-controlled object.
1098 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
1100 * sigtramp-qnx.c: Fix obvious typo.
1102 2017-11-09 Doug Rupp <rupp@adacore.com>
1104 * libgnarl/s-taprop__linux.adb (Monotonic_Clock): Minor reformatting.
1106 2017-11-09 Ed Schonberg <schonberg@adacore.com>
1108 * sem_res.adb (Resolve): If expression is an entity whose type has
1109 implicit dereference, generate reference to it, because no reference is
1110 generated for an overloaded entity during analysis, given that its
1111 identity may not be known.
1113 2017-11-09 Javier Miranda <miranda@adacore.com>
1115 * exp_disp.adb (Expand_Interface_Thunk): Replace substraction of
1116 offset-to-top field by addition.
1117 (Make_Secondary_DT): Initialize the offset-to-top field with a negative
1119 * exp_ch3.adb (Build_Offset_To_Top_Function): Build functions that
1120 return a negative offset-to-top value.
1121 (Initialize_Tag): Invoke runtime services Set_Dynamic_Offset_To_Top and
1122 Set_Static_Offset_To_Top passing a negative offet-to-top value;
1123 initialize also the offset-to-top field with a negative offset.
1124 * libgnat/a-tags.adb (Base_Address): Displace the pointer by means of
1125 an addition since the offset-to-top field is now a negative value.
1126 (Displace): Displace the pointer to the object means of a substraction
1127 since it is now a negative value.
1128 (Set_Dynamic_Offset_to_top): Displace the pointer to the object by
1129 means of a substraction since it is now a negative value.
1131 2017-11-09 Eric Botcazou <ebotcazou@adacore.com>
1133 * gnat1drv.adb (Gnat1drv): Call Errout.Finalize (Last_Call => True)
1134 before Errout.Output_Messages also in the case of compilation errors.
1136 2017-11-09 Javier Miranda <miranda@adacore.com>
1138 * doc/gnat_ugn/the_gnat_compilation_model.rst (Interfacing with C++ at
1139 the Class Level): Fix error interfacing with C strings.
1140 * gnat_ugn.texi: Regenerate.
1142 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
1144 * system-qnx-aarch64.ads: Fix the priority constants.
1145 * s-osinte__qnx.ads: Fix constants for handling the locking protocols
1147 * s-osinte__qnx.adb: New file , prevents the use of priority 0 that
1148 corresponds to an idle priority on QNX.
1150 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1152 * sem_prag.adb, sem_util.adb, sem_elab.adb: Fix minor typos in
1155 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1157 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs): Ignore loop parameters
1158 in expression funtions that are expanded into variables.
1160 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1162 * sem_util.adb: Minor whitespace cleanup.
1164 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
1166 * libgnarl/s-taprop__qnx.adb: Refine aarch64-qnx. Use the POSIX
1167 s-taprop version rather than a custom one.
1168 * sigtramp-qnx.c (aarch64-qnx): Implement the signal trampoline.
1170 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1172 * lib-xref.ads, lib-xref-spark_specific.adb
1173 (Traverse_Compilation_Unit): Move declaration to package body.
1175 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1177 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration): Obtain
1178 the type of the renaming from its defining entity, rather then the
1179 subtype mark as there may not be a subtype mark.
1181 2017-11-08 Jerome Lambourg <lambourg@adacore.com>
1183 * adaint.c, s-oscons-tmplt.c, init.c, libgnat/system-qnx-aarch64.ads,
1184 libgnarl/a-intnam__qnx.ads, libgnarl/s-intman__qnx.adb,
1185 libgnarl/s-osinte__qnx.ads, libgnarl/s-qnx.ads,
1186 libgnarl/s-taprop__qnx.adb, s-oscons-tmplt.c, sigtramp-qnx.c,
1187 terminals.c: Initial port of GNAT for aarch64-qnx
1189 2017-11-08 Elisa Barboni <barboni@adacore.com>
1191 * exp_util.adb (Find_DIC_Type): Move...
1192 * sem_util.ads, sem_util.adb (Find_DIC_Type): ... here.
1194 2017-11-08 Justin Squirek <squirek@adacore.com>
1196 * sem_res.adb (Resolve_Allocator): Add info messages corresponding to
1197 the owner and corresponding coextension.
1199 2017-11-08 Ed Schonberg <schonberg@adacore.com>
1201 * sem_aggr.adb (Resolve_Delta_Aggregate): Divide into the
1202 following separate procedures.
1203 (Resolve_Delta_Array_Aggregate): Previous code form
1204 Resolve_Delta_Aggregate.
1205 (Resolve_Delta_Record_Aggregate): Extend previous code to cover latest
1206 ARG decisions on the legality rules for delta aggregates for records:
1207 in the case of a variant record, components from different variants
1208 cannot be specified in the delta aggregate, and this must be checked
1211 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1213 * spark_xrefs.ads (SPARK_Scope_Record): Remove File_Num component.
1214 * lib-xref-spark_specific.adb (Add_SPARK_Scope): Skip initialization of
1217 2017-11-08 Gary Dismukes <dismukes@adacore.com>
1219 * sem_ch4.adb: Minor typo fix.
1221 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1223 * spark_xrefs.ads (SPARK_Scope_Record): Remove Spec_File_Num and
1224 Spec_Scope_Num components.
1225 * spark_xrefs.adb (dspark): Skip pretty-printing to removed components.
1226 * lib-xref-spark_specific.adb (Add_SPARK_Scope): Skip initialization of
1228 (Collect_SPARK_Xrefs): Skip setting proper values of removed
1231 2017-11-08 Gary Dismukes <dismukes@adacore.com>
1233 * exp_ch4.adb (Expand_N_Type_Conversion): Add test that the selector
1234 name is a discriminant in check for unconditional accessibility
1235 violation within instances.
1237 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1239 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs): Remove special-case
1240 for constants (with variable input).
1241 (Is_Constant_Object_Without_Variable_Input): Remove.
1243 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1245 * exp_ch9.adb, sem_disp.adb, sem_util.adb: Minor reformatting.
1247 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1249 * spark_xrefs.ads (Rtype): Remove special-casing of constants for SPARK
1251 (dspark): Remove hardcoded table bound.
1253 2017-11-08 Ed Schonberg <schonberg@adacore.com>
1255 * sem_ch4.adb (Analyze_Aggregate): For Ada2020 delta aggregates, use
1256 the type of the base of the construct to determine the type (or
1257 candidate interpretations) of the delta aggregate. This allows the
1258 construct to appear in a context that expects a private extension.
1259 * sem_res.adb (Resolve): Handle properly a delta aggregate with an
1262 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1264 * spark_xrefs.ads (SPARK_Xref_Record): Replace file and scope indices
1265 with Entity_Id of the reference.
1266 * spark_xrefs.adb (dspark): Adapt pretty-printing routine.
1267 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs): Store Entity_Id of the
1268 reference, not the file and scope indices.
1270 2017-11-08 Arnaud Charlet <charlet@adacore.com>
1272 * errout.ads (Current_Node): New.
1273 * errout.adb (Error_Msg): Use Current_Node.
1274 * par-ch6.adb, par-ch7.adb, par-ch9.adb, par-util.adb: Set Current_Node
1276 * style.adb: Call Error_Msg_N when possible.
1278 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1280 * spark_xrefs.ads (SPARK_Scope_Record): Rename Scope_Id component to
1282 * lib-xref-spark_specific.adb, spark_xrefs.adb: Propagate renaming of
1283 the Scope_Id record component.
1285 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1287 * spark_xrefs.ads (SPARK_File_Record): Remove string components.
1288 * spark_xrefs.adb (dspark): Remove pretty-printing of removed
1289 SPARK_File_Record components.
1290 * lib-xref-spark_specific.adb (Add_SPARK_File): Do not store string
1291 representation of files/units.
1293 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1295 * lib-xref.ads, lib-xref-spark_specific.adb (Traverse_Declarations):
1296 Remove Inside_Stubs parameter.
1298 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1300 * spark_xrefs.ads (SPARK_Xref_Record): Referenced object is now
1301 represented by Entity_Id.
1302 (SPARK_Scope_Record): Referenced scope (e.g. subprogram) is now
1303 represented by Entity_Id; this information is not repeated as
1305 (Heap): Moved from lib-xref-spark_specific.adb, to reside next to
1306 Name_Of_Heap_Variable.
1307 * spark_xrefs.adb (dspark): Adapt debug routine to above changes in
1309 * lib-xref-spark_specific.adb: Adapt routines for populating SPARK
1310 scope and xrefs tables to above changes in data types.
1312 2017-11-08 Justin Squirek <squirek@adacore.com>
1314 * sem_ch8.adb (Mark_Use_Clauses): Add condition to always mark the
1315 primitives of generic actuals.
1316 (Mark_Use_Type): Add recursive call to properly mark class-wide type's
1317 base type clauses as per ARM 8.4 (8.2/3).
1319 2017-11-08 Ed Schonberg <schonberg@adacore.com>
1321 * sem_ch6.adb (Analyze_Generic_Subprobram_Body): Validate
1322 categorization dependency of the body, as is done for non-generic
1324 (New_Overloaded_Entity, Visible_Part_Type): Remove linear search
1325 through declarations (Simple optimization, no behavior change).
1327 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1329 * spark_xrefs.ads (SPARK_Xref_Record): Remove inessential components.
1330 (SPARK_Scope_Record): Remove inessential components.
1331 * spark_xrefs.adb (dspark): Remove pretty-printing of removed record
1333 * lib-xref-spark_specific.adb (Add_SPARK_Scope): Remove setting of
1334 removed record components.
1335 (Add_SPARK_Xrefs): Remove setting of removed record components.
1337 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1339 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs): Remove dead check for
1342 2017-11-08 Javier Miranda <miranda@adacore.com>
1344 * sem_disp.adb (Is_Inherited_Public_Operation): Extend the
1345 functionality of this routine to handle multiple levels of derivations.
1347 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1349 * einfo.adb: Elist36 is now used as Nested_Scenarios.
1350 (Nested_Scenarios): New routine.
1351 (Set_Nested_Scenarios): New routine.
1352 (Write_Field36_Name): New routine.
1353 * einfo.ads: Add new attribute Nested_Scenarios along with occurrences
1355 (Nested_Scenarios): New routine along with pragma Inline.
1356 (Set_Nested_Scenarios): New routine along with pragma Inline.
1357 * sem_elab.adb (Find_And_Process_Nested_Scenarios): New routine.
1358 (Process_Nested_Scenarios): New routine.
1359 (Traverse_Body): When a subprogram body is traversed for the first
1360 time, find, save, and process all suitable scenarios found within.
1361 Subsequent traversals of the same subprogram body utilize the saved
1364 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1366 * lib-xref-spark_specific.adb (Add_SPARK_Scope): Remove detection of
1367 protected operations.
1368 (Add_SPARK_Xrefs): Simplify detection of empty entities.
1369 * get_spark_xrefs.ads, get_spark_xrefs.adb, put_spark_xrefs.ads,
1370 put_spark_xrefs.adb, spark_xrefs_test.adb: Remove code for writing,
1371 reading and testing SPARK cross-references stored in the ALI files.
1372 * lib-xref.ads (Output_SPARK_Xrefs): Remove.
1373 * lib-writ.adb (Write_ALI): Do not write SPARK cross-references to the
1375 * spark_xrefs.ads, spark_xrefs.adb (pspark): Remove, together
1376 with description of the SPARK xrefs ALI format.
1377 * gcc-interface/Make-lang.in (GNAT_ADA_OBJS): Remove get_spark_refs.o
1378 and put_spark_refs.o.
1380 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1382 * exp_ch4.adb (Apply_Accessibility_Check): Do not finalize the object
1383 when the associated access type is subject to pragma
1384 No_Heap_Finalization.
1385 * exp_intr.adb (Expand_Unc_Deallocation): Use the available view of the
1386 designated type in case it comes from a limited withed unit.
1388 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1390 * exp_ch3.adb (Expand_N_Object_Declaration): Save and restore relevant
1391 SPARK-related flags. Add ??? comment.
1392 * exp_util.adb (Insert_Actions): Add an entry for node
1393 N_Variable_Reference_Marker.
1394 * sem.adb (Analyze): Add an entry for node N_Variable_Reference_Marker.
1395 * sem_ch8.adb (Find_Direct_Name): Add constant Is_Assignment_LHS. Build
1396 and record a variable reference marker for the current name.
1397 (Find_Expanded_Name): Add constant Is_Assignment_LHS. Build and record
1398 a variable reference marker for the current name.
1399 * sem_elab.adb (Build_Variable_Reference_Marker): New routine.
1400 (Extract_Variable_Reference_Attributes): Reimplemented.
1401 (Info_Scenario): Add output for variable references and remove output
1403 (Info_Variable_Read): Removed.
1404 (Info_Variable_Reference): New routine.
1405 (Is_Suitable_Scenario): Variable references are now suitable scenarios
1406 while variable reads are not.
1407 (Output_Active_Scenarios): Add output for variable references and
1408 remove output for variable reads.
1409 (Output_Variable_Read): Removed.
1410 (Output_Variable_Reference): New routine.
1411 (Process_Variable_Read): Removed.
1412 (Process_Variable_Reference): New routine.
1413 (Process_Variable_Reference_Read): New routine.
1414 * sem_elab.ads (Build_Variable_Reference_Marker): New routine.
1415 * sem_res.adb (Resolve_Actuals): Build and record a variable reference
1416 marker for the current actual.
1417 * sem_spark.adb (Check_Node): Add an entry for node
1418 N_Variable_Reference_Marker.
1419 * sem_util.adb (Within_Subprogram_Call): Moved to the library level.
1420 * sem_util.ads (Within_Subprogram_Call): Moved to the library level.
1421 * sinfo.adb (Is_Read): New routine.
1422 (Is_Write): New routine.
1423 (Target): Updated to handle variable reference markers.
1424 (Set_Is_Read): New routine.
1425 (Set_Is_Write): New routine.
1426 (Set_Target): Updated to handle variable reference markers.
1427 * sinfo.ads: Add new attributes Is_Read and Is_Write along with
1428 occurrences in nodes. Update attribute Target. Add new node
1429 kind N_Variable_Reference_Marker.
1430 (Is_Read): New routine along with pragma Inline.
1431 (Is_Write): New routine along with pragma Inline.
1432 (Set_Is_Read): New routine along with pragma Inline.
1433 (Set_Is_Write): New routine along with pragma Inline.
1434 * sprint.adb (Sprint_Node_Actual): Add an entry for node
1435 N_Variable_Reference_Marker.
1437 2017-11-08 Arnaud Charlet <charlet@adacore.com>
1439 * sem_util.adb (Subprogram_Name): Append suffix for overloaded
1442 2017-11-08 Yannick Moy <moy@adacore.com>
1444 * sem_ch8.adb (Use_One_Type, Update_Use_Clause_Chain): Do not report
1445 about unused use-type or use-package clauses inside inlined bodies.
1447 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1449 * sem_elab.adb (Ensure_Prior_Elaboration): Add new parameter
1450 In_Partial_Fin along with a comment on its usage. Do not guarantee the
1451 prior elaboration of a unit when the need came from a partial
1452 finalization context.
1453 (In_Initialization_Context): Relocated to Process_Call.
1454 (Is_Partial_Finalization_Proc): New routine.
1455 (Process_Access): Add new parameter In_Partial_Fin along with a comment
1457 (Process_Activation_Call): Add new parameter In_Partial_Fin along with
1458 a comment on its usage.
1459 (Process_Activation_Conditional_ABE_Impl): Add new parameter
1460 In_Partial_Fin along with a comment on its usage. Do not emit any ABE
1461 diagnostics when the activation occurs in a partial finalization
1463 (Process_Activation_Guaranteed_ABE_Impl): Add new parameter
1464 In_Partial_Fin along with a comment on its usage.
1465 (Process_Call): Add new parameter In_Partial_Fin along with a comment
1466 on its usage. A call is within a partial finalization context when it
1467 targets a finalizer or primitive [Deep_]Finalize, and the call appears
1468 in initialization actions. Pass this information down to the recursive
1469 steps of the Processing phase.
1470 (Process_Call_Ada): Add new parameter In_Partial_Fin along with a
1471 comment on its usage. Remove the guard which suppresses the generation
1472 of implicit Elaborate[_All] pragmas. This is now done in
1473 Ensure_Prior_Elaboration.
1474 (Process_Call_Conditional_ABE): Add new parameter In_Partial_Fin along
1475 with a comment on its usage. Do not emit any ABE diagnostics when the
1476 call occurs in a partial finalization context.
1477 (Process_Call_SPARK): Add new parameter In_Partial_Fin along with a
1478 comment on its usage.
1479 (Process_Instantiation): Add new parameter In_Partial_Fin along with a
1480 comment on its usage.
1481 (Process_Instantiation_Ada): Add new parameter In_Partial_Fin along
1482 with a comment on its usage.
1483 (Process_Instantiation_Conditional_ABE): Add new parameter
1484 In_Partial_Fin along with a comment on its usage. Do not emit any ABE
1485 diagnostics when the instantiation occurs in a partial finalization
1487 (Process_Instantiation_SPARK): Add new parameter In_Partial_Fin along
1488 with a comment on its usage.
1489 (Process_Scenario): Add new parameter In_Partial_Fin along with a
1490 comment on its usage.
1491 (Process_Single_Activation): Add new parameter In_Partial_Fin along
1492 with a comment on its usage.
1493 (Traverse_Body): Add new parameter In_Partial_Fin along with a comment
1496 2017-11-08 Arnaud Charlet <charlet@adacore.com>
1498 * sem_ch13.adb: Add optional parameter to Error_Msg.
1500 2017-11-08 Jerome Lambourg <lambourg@adacore.com>
1502 * fname.adb (Is_Internal_File_Name): Do not check the 8+3 naming schema
1503 for the Interfaces.* hierarchy as longer unit names are now allowed.
1505 2017-11-08 Arnaud Charlet <charlet@adacore.com>
1507 * sem_util.adb (Subprogram_Name): Emit sloc for the enclosing
1508 subprogram as well. Support more cases of entities.
1509 (Append_Entity_Name): Add some defensive code.
1511 2017-11-06 Eric Botcazou <ebotcazou@adacore.com>
1513 * gcc-interface/misc.c (gnat_post_options): Clear warn_return_type.
1515 2017-10-31 Eric Botcazou <ebotcazou@adacore.com>
1518 * gcc-interface/Makefile.in (m68k/Linux): Fix typo.
1520 2017-10-21 Eric Botcazou <ebotcazou@adacore.com>
1522 * gcc-interface/Makefile.in: Remove bogus settings for VxWorks.
1524 2017-10-21 Eric Botcazou <ebotcazou@adacore.com>
1526 * gcc-interface/utils.c (pad_type_hash): Use hashval_t for hash value.
1527 (convert): Do not use an unchecked conversion for converting from a
1528 type to another type padding it.
1530 2017-10-20 Doug Rupp <rupp@adacore.com>
1532 * libgnarl/s-osinte__linux.ads (Relative_Timed_Wait): Add variable
1533 needed for using monotonic clock.
1534 * libgnarl/s-taprop__linux.adb: Revert previous monotonic clock
1536 * libgnarl/s-taprop__linux.adb, s-taprop__posix.adb: Unify and factor
1537 out monotonic clock related functions body.
1538 (Timed_Sleep, Timed_Delay, Montonic_Clock, RT_Resolution,
1539 Compute_Deadline): Move to...
1540 * libgnarl/s-tpopmo.adb: ... here. New separate package body.
1542 2017-10-20 Ed Schonberg <schonberg@adacore.com>
1544 * sem_util.adb (Is_Controlling_Limited_Procedure): Handle properly the
1545 case where the controlling formal is an anonymous access to interface
1547 * exp_ch9.adb (Extract_Dispatching_Call): If controlling actual is an
1548 access type, handle properly the the constructed dereference that
1549 designates the object used in the rewritten synchronized call.
1550 (Parameter_Block_Pack): If the type of the actual is by-copy, its
1551 generated declaration in the parameter block does not need an
1552 initialization even if the type is a null-excluding access type,
1553 because it will be initialized with the value of the actual later on.
1554 (Parameter_Block_Pack): Do not add controlling actual to parameter
1555 block when its type is by-copy.
1557 2017-10-20 Justin Squirek <squirek@adacore.com>
1559 * sem_ch8.adb (Update_Use_Clause_Chain): Add sanity check to verify
1560 scope stack traversal into the context clause.
1562 2017-10-20 Bob Duff <duff@adacore.com>
1564 * sinfo.ads: Fix a comment typo.
1566 2017-10-20 Eric Botcazou <ebotcazou@adacore.com>
1568 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (-flto): Add
1569 warning against usage in conjunction with -gnatn.
1570 (-fdump-xref): Delete entry.
1571 * doc/gnat_ugn/gnat_utility_programs.rst (--ext): Remove mention of
1573 * gnat_ugn.texi: Regenerate.
1575 2017-10-20 Hristian Kirtchev <kirtchev@adacore.com>
1577 * sem_type.adb, exp_util.adb, sem_util.adb, sem_dim.adb, sem_elab.adb:
1580 2017-10-20 Yannick Moy <moy@adacore.com>
1582 * sem_dim.adb (Analyze_Dimension_Binary_Op): Accept with a warning to
1583 compare a dimensioned expression with a literal.
1584 (Dim_Warning_For_Numeric_Literal): Do not issue a warning for the
1586 * doc/gnat_ugn/gnat_and_program_execution.rst: Update description of
1587 dimensionality system in GNAT.
1588 * gnat_ugn.texi: Regenerate.
1590 2017-10-20 Yannick Moy <moy@adacore.com>
1592 * sem_ch6.adb (Analyze_Expression_Function.Freeze_Expr_Types): Remove
1593 inadequate silencing of errors.
1594 * sem_util.adb (Check_Part_Of_Reference): Do not issue an error when
1595 checking the subprogram body generated from an expression function,
1596 when this is done as part of the preanalysis done on expression
1597 functions, as the subprogram body may not yet be attached in the AST.
1598 The error if any will be issued later during the analysis of the body.
1599 (Is_Aliased_View): Trivial rewrite with Is_Formal_Object.
1601 2017-10-20 Arnaud Charlet <charlet@adacore.com>
1603 * sem_ch8.adb (Update_Chain_In_Scope): Add missing [-gnatwu] marker for
1604 warning on ineffective use clause.
1606 2017-10-20 Eric Botcazou <ebotcazou@adacore.com>
1608 * exp_ch11.ads (Warn_If_No_Local_Raise): Declare.
1609 * exp_ch11.adb (Expand_Exception_Handlers): Use Warn_If_No_Local_Raise
1610 to issue the warning on the absence of local raise.
1611 (Possible_Local_Raise): Do not issue the warning for Call_Markers.
1612 (Warn_If_No_Local_Raise): New procedure to issue the warning on the
1613 absence of local raise.
1614 * sem_elab.adb: Add with and use clauses for Exp_Ch11.
1615 (Record_Elaboration_Scenario): Call Possible_Local_Raise in the cases
1616 where a scenario could give rise to raising Program_Error.
1617 * sem_elab.adb: Typo fixes.
1618 * fe.h (Warn_If_No_Local_Raise): Declare.
1619 * gcc-interface/gigi.h (get_exception_label): Change return type.
1620 * gcc-interface/trans.c (gnu_constraint_error_label_stack): Change to
1621 simple vector of Entity_Id.
1622 (gnu_storage_error_label_stack): Likewise.
1623 (gnu_program_error_label_stack): Likewise.
1624 (gigi): Adjust to above changes.
1625 (Raise_Error_to_gnu): Likewise.
1626 (gnat_to_gnu) <N_Goto_Statement>: Set TREE_USED on the label.
1627 (N_Push_Constraint_Error_Label): Push the label onto the stack.
1628 (N_Push_Storage_Error_Label): Likewise.
1629 (N_Push_Program_Error_Label): Likewise.
1630 (N_Pop_Constraint_Error_Label): Pop the label from the stack and issue
1631 a warning on the absence of local raise.
1632 (N_Pop_Storage_Error_Label): Likewise.
1633 (N_Pop_Program_Error_Label): Likewise.
1634 (push_exception_label_stack): Delete.
1635 (get_exception_label): Change return type to Entity_Id and adjust.
1636 * gcc-interface/utils2.c (build_goto_raise): Change type of first
1637 parameter to Entity_Id and adjust. Set TREE_USED on the label.
1638 (build_call_raise): Adjust calls to get_exception_label and also
1640 (build_call_raise_column): Likewise.
1641 (build_call_raise_range): Likewise.
1642 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (-gnatw.x):
1643 Document actual default behavior.
1645 2017-10-20 Piotr Trojanek <trojanek@adacore.com>
1647 * einfo.ads: Minor consistent punctuation in comment. All numbered
1648 items in the comment of Is_Internal are now terminated with a period.
1650 2017-10-20 Piotr Trojanek <trojanek@adacore.com>
1652 * exp_util.adb (Build_Temporary): Mark created temporary entity as
1655 2017-10-20 Piotr Trojanek <trojanek@adacore.com>
1657 * sem_type.adb (In_Generic_Actual): Simplified.
1659 2017-10-20 Justin Squirek <squirek@adacore.com>
1661 * sem_ch12.adb (Check_Formal_Package_Instance): Add sanity check to
1662 verify a renaming exists for a generic formal before comparing it to
1663 the actual as defaulted formals will not have a renamed_object.
1665 2017-10-20 Javier Miranda <miranda@adacore.com>
1667 * exp_ch6.adb (Replace_Returns): Fix wrong management of
1668 N_Block_Statement nodes.
1670 2017-10-20 Bob Duff <duff@adacore.com>
1672 * exp_aggr.adb (Initialize_Array_Component): Avoid adjusting a
1673 component of an array aggregate if it is initialized by a
1674 build-in-place function call.
1675 * exp_ch6.adb (Is_Build_In_Place_Result_Type): Use -gnatd.9 to disable
1676 bip for nonlimited types.
1677 * debug.adb: Document -gnatd.9.
1679 2017-10-20 Bob Duff <duff@adacore.com>
1681 * sem_ch12.adb: Remove redundant setting of Parent.
1683 2017-10-20 Eric Botcazou <ebotcazou@adacore.com>
1685 * sem_ch4.adb (Find_Concatenation_Types): Filter out operators if one
1686 of the operands is a string literal.
1688 2017-10-20 Bob Duff <duff@adacore.com>
1690 * einfo.ads: Comment fix.
1692 2017-10-20 Clement Fumex <fumex@adacore.com>
1694 * switch-c.adb: Remove -gnatwm from the switches triggered by -gnateC.
1696 2017-10-20 Ed Schonberg <schonberg@adacore.com>
1698 * sem_dim.adb (Extract_Power): Accept dimension values that are not
1699 non-negative integers when the dimensioned base type is an Integer
1702 2017-10-20 Bob Duff <duff@adacore.com>
1704 * sinfo.ads, sinfo.adb (Alloc_For_BIP_Return): New flag to indicate
1705 that an allocator came from a b-i-p return statement.
1706 * exp_ch4.adb (Expand_Allocator_Expression): Avoid adjusting the return
1707 object of a nonlimited build-in-place function call.
1708 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Set the
1709 Alloc_For_BIP_Return flag on generated allocators.
1710 * sem_ch5.adb (Analyze_Assignment): Move Assert to where it can't fail.
1711 If the N_Assignment_Statement has been transformed into something else,
1712 then Should_Transform_BIP_Assignment won't work.
1713 * exp_ch3.adb (Expand_N_Object_Declaration): A previous revision said,
1714 "Remove Adjust if we're building the return object of an extended
1715 return statement in place." Back out that part of the change, because
1716 the Alloc_For_BIP_Return flag is now used for that.
1718 2017-10-19 Bob Duff <duff@adacore.com>
1720 * exp_ch6.adb (Is_Build_In_Place_Result_Type): Fix silly bug -- "Typ"
1721 should be "T". Handle case of a subtype of a class-wide type.
1723 2017-10-19 Bob Duff <duff@adacore.com>
1725 * exp_util.adb: (Process_Statements_For_Controlled_Objects): Clarify
1726 which node kinds can legitimately be ignored, and raise Program_Error
1729 2017-10-19 Hristian Kirtchev <kirtchev@adacore.com>
1731 * sem_elab.adb (Compilation_Unit): Handle the case of a subprogram
1732 instantiation that acts as a compilation unit.
1733 (Find_Code_Unit): Reimplemented.
1734 (Find_Top_Unit): Reimplemented.
1735 (Find_Unit_Entity): New routine.
1736 (Process_Instantiation_SPARK): Correct the elaboration requirement a
1737 package instantiation imposes on a unit.
1739 2017-10-19 Bob Duff <duff@adacore.com>
1741 * exp_ch6.adb (Is_Build_In_Place_Result_Type): Enable build-in-place
1742 for a narrow set of controlled types.
1744 2017-10-19 Eric Botcazou <ebotcazou@adacore.com>
1746 * sinput.ads (Line_Start): Add pragma Inline.
1747 * widechar.ads (Is_Start_Of_Wide_Char): Likewise.
1749 2017-10-19 Bob Duff <duff@adacore.com>
1751 * exp_attr.adb (Expand_N_Attribute_Reference): Disable
1752 Make_Build_In_Place_Call_... for F(...)'Old, where F(...) is a
1753 build-in-place function call so that the temp is declared in the right
1756 2017-10-18 Eric Botcazou <ebotcazou@adacore.com>
1758 * gcc-interface/misc.c (gnat_tree_size): Move around.
1760 * gcc-interface/utils.c (max_size): Deal with SSA names.
1762 2017-10-17 Jakub Jelinek <jakub@redhat.com>
1764 * gcc-interface/misc.c (gnat_tree_size): New function.
1765 (LANG_HOOKS_TREE_SIZE): Redefine.
1767 2017-10-14 Hristian Kirtchev <kirtchev@adacore.com>
1769 * sem_elab.adb (In_Preelaborated_Context): A generic package subject to
1770 Remote_Call_Interface is not a suitable preelaboratd context when the
1771 call appears in the package body.
1773 2017-10-14 Eric Botcazou <ebotcazou@adacore.com>
1775 * layout.ads (Set_Elem_Alignment): Add Align parameter defaulted to 0.
1776 * layout.adb (Set_Elem_Alignment): Likewise. Use M name as maximum
1777 alignment for consistency. If Align is non-zero, use the minimum of
1778 Align and M for the alignment.
1779 * cstand.adb (Build_Float_Type): Use Set_Elem_Alignment instead of
1780 setting the alignment directly.
1782 2017-10-14 Ed Schonberg <schonberg@adacore.com>
1784 * sem_prag.adb (Analyze_Pragma, case Check): Defer evaluation of the
1785 optional string in an Assert pragma until the expansion of the pragma
1786 has rewritten it as a conditional statement, so that the string
1787 argument is only evaluaed if the assertion fails. This is mandated by
1790 2017-10-14 Hristian Kirtchev <kirtchev@adacore.com>
1792 * debug.adb: Switch -gnatd.v and associated flag are now used to
1793 enforce the SPARK rules for elaboration in SPARK code.
1794 * sem_elab.adb: Describe switch -gnatd.v.
1795 (Process_Call): Verify the SPARK rules only when -gnatd.v is in effect.
1796 (Process_Instantiation): Verify the SPARK rules only when -gnatd.v is
1798 (Process_Variable_Assignment): Clarify why variable assignments are
1799 processed reglardless of whether -gnatd.v is in effect.
1800 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst: Update the
1801 sections on elaboration code and compilation switches.
1802 * gnat_ugn.texi: Regenerate.
1804 2017-10-14 Gary Dismukes <dismukes@adacore.com>
1806 * exp_util.adb, freeze.adb, sem_aggr.adb, sem_util.ads, sem_util.adb,
1807 sem_warn.adb: Minor reformattings.
1809 2017-10-14 Ed Schonberg <schonberg@adacore.com>
1811 * doc/gnat_rm/implementation_defined_aspects.rst: Add documentation
1812 for reverse iteration over formal containers.
1813 * gnat_rm.texi: Regenerate.
1815 2017-10-14 Hristian Kirtchev <kirtchev@adacore.com>
1817 * sem_elab.adb (Ensure_Dynamic_Prior_Elaboration): Renamed to
1818 Ensure_Prior_Elaboration_Dynamic for consistency reasons.
1819 (Ensure_Static_Prior_Elaboration): Renamed to
1820 Ensure_Prior_Elaboration_Static for consistency reasons.
1821 (Info_Variable_Reference): Renamed to Info_Variable_Read in order to
1822 reflect its new purpose.
1823 (Is_Initialized): New routine.
1824 (Is_Suitable_Variable_Reference): Renamed to Is_Suitable_Variable_Read
1825 in order to reflect its new purpose.
1826 (Is_Variable_Read): New routine.
1827 (Output_Variable_Reference): Renamed to Output_Variable_Read in order
1828 to reflect its new purpose.
1829 (Process_Variable_Assignment): This routine now acts as a top level
1830 dispatcher for variable assignments.
1831 (Process_Variable_Assignment_Ada): New routine.
1832 (Process_Variable_Assignment_SPARK): New routine.
1833 (Process_Variable_Reference): Renamed to Process_Variable_Read in order
1834 to reflects its new purpose. A reference to a variable is now suitable
1835 for ABE processing only when it is a read. The logic in the routine now
1836 reflects the latest SPARK elaboration rules.
1838 2017-10-14 Justin Squirek <squirek@adacore.com>
1840 * sem_ch8.adb (Analyze_Subprogram_Renaming): Modify condition that
1841 triggers marking on formal subprograms.
1843 2017-10-14 Javier Miranda <miranda@adacore.com>
1845 * checks.adb (Ensure_Valid): Do not skip adding the validity check on
1846 renamings of objects that come from the sources.
1848 2017-10-14 Eric Botcazou <ebotcazou@adacore.com>
1850 * cstand.adb (Build_Float_Type): Move down Siz parameter, add Align
1851 parameter and set the alignment of the type to Align.
1852 (Copy_Float_Type): Adjust call to Build_Float_Type.
1853 (Register_Float_Type): Add pragma Unreferenced for Precision. Adjust
1854 call to Build_Float_Type and do not set RM_Size and Alignment.
1856 2017-10-14 Patrick Bernardi <bernardi@adacore.com>
1858 * Makefile.rtl (GNATRTL_NONTASKING_OBJ): Add s-soliin to
1859 GNATRTL_NONTASKING_OBJ.
1861 2017-10-14 Bob Duff <duff@adacore.com>
1863 * exp_ch6.adb (Is_Build_In_Place_Result_Type): Include code for
1864 enabling b-i-p for nonlimited controlled types (but disabled).
1866 2017-10-14 Justin Squirek <squirek@adacore.com>
1868 * sem_elab.adb (Is_Suitable_Variable_Assignment): Replace call to
1869 Has_Warnings_Off with Warnings_Off.
1871 2017-10-14 Piotr Trojanek <trojanek@adacore.com>
1873 * sinfo.ads (Generic_Parent): Remove wrong (possibly obsolete) comment.
1875 2017-10-14 Hristian Kirtchev <kirtchev@adacore.com>
1877 * sem_ch3.adb (Analyze_Declarations): Analyze the contract of an
1878 enclosing package at the end of the visible declarations.
1879 * sem_prag.adb (Analyze_Initialization_Item): Suppress the analysis of
1880 an initialization item which is undefined due to some illegality.
1882 2017-10-14 Patrick Bernardi <bernardi@adacore.com>
1884 * ali.adb: Add new ALI line 'T' to read the number of tasks contain
1885 within each unit that require a default-sized primary and secondary
1886 stack to be generated by the binder.
1887 (Scan_ALI): Scan new 'T' lines.
1888 * ali.ads: Add Primary_Stack_Count and Sec_Stack_Count to Unit_Record.
1889 * bindgen.adb (Gen_Output_File): Count the number of default-sized
1890 stacks within the closure that are to be created by the binder.
1891 (Gen_Adainit, Gen_Output_File_Ada): Generate default-sized secondary
1892 stacks and record these in System.Secodnary_Stack.
1893 (Resolve_Binder_Options): Check if System.Secondary_Stack is in the
1894 closure of the program being bound.
1895 * bindusg.adb (Display): Add "-Q" switch. Remove rouge "--RTS" comment.
1896 * exp_ch3.adb (Count_Default_Sized_Task_Stacks): New routine.
1897 (Expand_N_Object_Declaration): Count the number of default-sized stacks
1898 used by task objects contained within the object whose declaration is
1899 being expanded. Only performed when either the restrictions
1900 No_Implicit_Heap_Allocations or No_Implicit_Task_Allocations are in
1902 * exp_ch9.adb (Create_Secondary_Stack_For_Task): New routine.
1903 (Expand_N_Task_Type_Declaration): Create a secondary stack as part of
1904 the expansion of a task type if the size of the stack is known at
1905 run-time and the restrictions No_Implicit_Heap_Allocations or
1906 No_Implicit_Task_Allocations are in effect.
1907 (Make_Task_Create_Call): If using a restricted profile provide
1908 secondary stack parameter: either the statically created stack or null.
1909 * lib-load.adb (Create_Dummy_Package_Unit, Load_Unit,
1910 Load_Main_Source): Include Primary_Stack_Count and Sec_Stack_Count in
1911 Unit_Record initialization expressions.
1912 * lib-writ.adb (Add_Preprocessing_Dependency,
1913 Ensure_System_Dependency): Include Primary_Stack_Count and
1914 Sec_Stack_Count in Unit_Record initialization expression.
1915 (Write_ALI): Write T lines.
1916 (Write_Unit_Information): Do not output 'T' lines if there are no
1917 stacks for the binder to generate.
1918 * lib-writ.ads: Updated library information documentation to include
1920 * lib.adb (Increment_Primary_Stack_Count): New routine.
1921 (Increment_Sec_Stack_Count): New routine.
1922 (Primary_Stack_Count): New routine.
1923 (Sec_Stack_Count): New routine.
1924 * lib.ads: Add Primary_Stack_Count and Sec_Stack_Count components to
1925 Unit_Record and updated documentation.
1926 (Increment_Primary_Stack_Count): New routine along with pragma Inline.
1927 (Increment_Sec_Stack_Count): New routine along with pragma Inline.
1928 (Primary_Stack_Count): New routine along with pragma Inline.
1929 (Sec_Stack_Count): New routine along with pragma Inline.
1930 * opt.ads: New constant No_Stack_Size. Flag Default_Stack_Size
1931 redefined. New flag Default_Sec_Stack_Size and
1932 Quantity_Of_Default_Size_Sec_Stacks.
1933 * rtfinal.c Fixed erroneous comment.
1934 * rtsfind.ads: Moved RE_Default_Secondary_Stack_Size from
1935 System.Secondary_Stack to System.Parameters. Add RE_SS_Stack.
1936 * sem_util.adb (Number_Of_Elements_In_Array): New routine.
1937 * sem_util.ads (Number_Of_Elements_In_Array): New routine.
1938 * switch-b.adb (Scan_Binder_Switches): Scan "-Q" switch.
1939 * libgnarl/s-solita.adb (Get_Sec_Stack_Addr): Removed routine.
1940 (Set_Sec_Stack_Addr): Removed routine.
1941 (Get_Sec_Stack): New routine.
1942 (Set_Sec_Stack): New routine.
1943 (Init_Tasking_Soft_Links): Update System.Soft_Links reference to
1944 reflect new procedure and global names.
1945 * libgnarl/s-taprop__linux.adb, libgnarl/s-taprop__mingw.adb,
1946 libgnarl/s-taprop__posix.adb, libgnarl/s-taprop__solaris.adb,
1947 libgnarl/s-taprop__vxworks.adb (Register_Foreign_Thread): Update
1948 parameter profile to allow the secondary stack size to be specified.
1949 * libgnarl/s-tarest.adb (Create_Restricted_Task): Update the parameter
1950 profile to include Sec_Stack_Address. Update Tasking.Initialize_ATCB
1951 call to remove Secondary_Stack_Size reference. Add secondary stack
1952 address and size to SSL.Create_TSD call.
1953 (Task_Wrapper): Remove secondary stack creation.
1954 * libgnarl/s-tarest.ads (Create_Restricted_Task,
1955 Create_Restricted_Task_Sequential): Update parameter profile to include
1956 Sec_Stack_Address and clarify the Size parameter.
1957 * libgnarl/s-taskin.adb (Initialize_ATCB): Remove Secondary_Stack_Size
1958 from profile and body.
1959 (Initialize): Remove Secondary_Stack_Size from Initialize_ATCB call.
1960 * libgnarl/s-taskin.ads: Removed component Secondary_Stack_Size from
1962 (Initialize_ATCB): Update the parameter profile to remove
1963 Secondary_Stack_Size.
1964 * libgnarl/s-tassta.adb (Create_Task): Updated parameter profile and
1965 call to Initialize_ATCB. Add secondary stack address and size to
1966 SSL.Create_TSD call, and catch any storage exception from the call.
1967 (Finalize_Global_Tasks): Update System.Soft_Links references to reflect
1968 new subprogram and component names.
1969 (Task_Wrapper): Remove secondary stack creation.
1970 (Vulnerable_Complete_Master): Update to reflect TSD changes.
1971 * libgnarl/s-tassta.ads: Reformat comments.
1972 (Create_Task): Update parameter profile.
1973 * libgnarl/s-tporft.adb (Register_Foreign_Thread): Update parameter
1974 profile to include secondary stack size. Remove secondary size
1975 parameter from Initialize_ATCB call and add it to Create_TSD call.
1976 * libgnat/s-parame.adb, libgnat/s-parame__rtems.adb,
1977 libgnat/s-parame__vxworks.adb (Default_Sec_Stack_Size): New routine.
1978 * libgnat/s-parame.ads, libgnat/s-parame__ae653.ads,
1979 libgnat/s-parame__hpux.ads, libgnat/s-parame__vxworks.ads: Remove type
1980 Percentage. Remove constants Dynamic, Sec_Stack_Percentage and
1981 Sec_Stack_Dynamic. Add constant Runtime_Default_Sec_Stack_Size and
1983 (Default_Sec_Stack_Size): New routine.
1984 * libgnat/s-secsta.adb, libgnat/s-secsta.ads: New implementation. Is
1986 * libgnat/s-soflin.adb: Removed unused with-clauses. With
1987 System.Soft_Links.Initialize to initialize non-tasking TSD.
1988 (Create_TSD): Update parameter profile. Initialize the TSD and
1989 unconditionally call SS_Init.
1990 (Destroy_TSD): Update SST.SS_Free call.
1991 (Get_Sec_Stack_Addr_NT, Get_Sec_Stack_Addr_Soft, Set_Sec_Stack_Addr_NT,
1992 Set_Sec_Stack_Addr_Soft): Remove routines.
1993 (Get_Sec_Stack_NT, Get_Sec_Stack_Soft, Set_Sec_Stack_NT,
1994 Set_Sec_Stack_Soft): Add routines.
1995 (NT_TSD): Move to private part of package specification.
1996 * libgnat/s-soflin.ads: New types Get_Stack_Call and Set_Stack_Call
1997 with suppressed access checks. Renamed *_Sec_Stack_Addr_* routines and
1998 objects to *_Sec_Stack_*. TSD: removed warning suppression and
1999 component intialization. Changed Sec_Stack_Addr to Sec_Stack_Ptr.
2000 (Create_TSD): Update parameter profile.
2001 (NT_TSD): Move to private section from body.
2002 * libgnat/s-soliin.adb, libgnat/s-soliin.ads: New files.
2003 * libgnat/s-thread.ads (Thread_Body_Enter): Update parameter profile.
2004 * libgnat/s-thread__ae653.adb (Get_Sec_Stack_Addr, Set_Sec_Stack_Addr):
2006 (Get_Sec_Stack, Set_Sec_Stack): Add routine.
2007 (Thread_Body_Enter): Update parameter profile and body to adapt to new
2008 System.Secondary_Stack.
2009 (Init_RTS): Update body for new System.Soft_Links names.
2010 * gcc-interface/Make-lang.in (GNAT_ADA_OBJS, GNATBIND_OBJS): Add
2013 2017-10-10 Richard Sandiford <richard.sandiford@linaro.org>
2015 * gcc-interface/decl.c (annotate_value): Use wi::to_wide when
2016 operating on trees as wide_ints.
2018 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2020 * sem_unit.adb (Find_Enclosing_Scope): Do not treat a block statement
2021 as a scoping construct when it is byproduct of exception handling.
2023 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2025 * sinfo.ads: Update table Is_Syntactic_Field to reflect the nature of
2026 semantic field Target of node N_Call_Marker.
2028 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2030 * sem_res.adb (Resolve_Allocator): Reject properly an allocator that
2031 attempts to copy a limited value, when the allocator is the expression
2032 in an expression function.
2034 2017-10-09 Joel Brobecker <brobecker@adacore.com>
2036 * doc/share/conf.py: Tell the style checker that this is a Python
2037 fragment, and therefore that pyflakes should not be run to validate
2040 2017-10-09 Eric Botcazou <ebotcazou@adacore.com>
2042 * einfo.ads (Is_Boolean_Type): Add pragma Inline.
2043 (Is_Entity_Name): Likewise.
2044 (Is_String_Type): Likewise.
2045 * sem_type.adb (Full_View_Covers): Do not test Is_Private_Type here
2046 and remove useless comparisons on the base types.
2047 (Covers): Use simple tests for Standard_Void_Type. Move up cheap tests
2048 on T2. Always test Is_Private_Type before Full_View_Covers.
2050 2017-10-09 Bob Duff <duff@adacore.com>
2052 * exp_ch4.adb: Minor refactoring.
2054 2017-10-09 Javier Miranda <miranda@adacore.com>
2056 * sem_ch3.adb (Replace_Components): Browse the list of discriminants,
2059 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2061 * sem_elab.adb (Static_Elaboration_Checks): Elaboration requirements
2062 are verified only in the static model.
2064 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2066 * sem_ch5.adb (Analyze_Iterator_Specification,
2067 Check_Reverse_Iteration): Check that the domain of iteration supports
2068 reverse iteration when it is a formal container. This requires the
2069 presence of a Previous primitive in the Iterable aspect.
2070 * sem_ch13.adb (Resolve_Iterable_Operation): Verify legality of
2071 primitives Last and Previous to support reverse iteration over formal
2073 (Validate_Iterable_Aspect): Add check for reverse iteration operations.
2074 * exp_ch5.adb (Build_Formal_Container_Iteration): Add proper expansion
2075 for reverse iteration using primitives Last and Previous in generated
2078 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2080 * sem_util.adb (Subprogram_Name): If this is a child unit, use the name
2081 of the Defining_Program_Unit_Name, which is an identifier, in order to
2082 construct the string for the fully qualified name.
2084 2017-10-09 Justin Squirek <squirek@adacore.com>
2086 * sem_ch3.adb: Rename Uses_Unseen_Priv into
2087 Contains_Lib_Incomplete_Type.
2089 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2091 * sem_aggr.adb, sem_spark.adb, adabkend.adb, exp_ch5.adb, frontend.adb,
2092 sem_ch12.adb, fmap.adb, exp_ch6.adb, exp_spark.adb, lib-load.adb,
2093 exp_ch9.adb, osint.adb, exp_disp.adb, sem_ch8.adb, sem_ch8.ads,
2094 prepcomp.adb, gnat1drv.adb, atree.adb, sinput-l.adb, targparm.adb,
2095 sem_ch10.adb, par-ch8.adb: Minor reformatting.
2097 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2099 * sem_elab.adb (Is_Suitable_Access): This scenario is now only relevant
2100 in the static model.
2101 (Is_Suitable_Variable_Assignment): This scenario is now only relevant
2102 in the static model.
2103 (Is_Suitable_Variable_Reference): This scenario is now only relevant in
2106 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2108 * sem_ch3.adb (Analyze_Declarations): In ASIS mode, resolve aspect
2109 expressions when the enclosing scope is a subprogram body and the next
2110 declaration is a body that freezes entities previously declared in the
2113 2017-10-09 Justin Squirek <squirek@adacore.com>
2115 * sem_ch8.adb (Analyze_Use_Package): Remove checking of mixture between
2116 ghost packages and living packages in use clauses.
2117 (Use_One_Type, Note_Redundant_Use): Correct warning messages
2119 2017-10-09 Justin Squirek <squirek@adacore.com>
2121 * osint.ads: Document new parameter FD for Read_Source_File.
2123 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2125 * exp_util.adb (Make_Predicate_Call): If the type of the expression to
2126 which the predicate check applies is tagged, convert the expression to
2127 that type. This is in most cases a no-op, but is relevant if the
2128 expression is clas-swide, because the predicate function being invoked
2129 is not a primitive of the type and cannot take a class-wide actual.
2131 2017-10-09 Gary Dismukes <dismukes@adacore.com>
2133 * exp_disp.adb: Minor reformatting.
2135 2017-10-09 Arnaud Charlet <charlet@adacore.com>
2137 * sem_warn.adb (Warn_On_Unreferenced_Entity): Fix typo.
2139 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2141 * sem_elab.adb (Install_ABE_Check): Do not generate an ABE check for
2143 (Install_ABE_Failure): Do not generate an ABE failure for GNATprove.
2145 2017-10-09 Bob Duff <duff@adacore.com>
2147 * exp_ch6.adb: (Make_Build_In_Place_Call_In_Object_Declaration): Return
2148 immediately if the call has already been processed (by a previous call
2149 to Make_Build_In_Place_Call_In_Anonymous_Context).
2150 * sem_elab.adb: Minor typo fixes.
2152 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2154 * sem_ch13.adb (Replace_Type_Ref): In the expression for a dynamic
2155 predicate, do not replace an identifier that matches the type if the
2156 identifier is a selector in a selected component, because this
2157 indicates a reference to some homograph of the type itself, and not to
2158 the current occurence in the predicate.
2160 2017-10-09 Eric Botcazou <ebotcazou@adacore.com>
2162 * repinfo.adb (List_Record_Layout): Tweak formatting.
2163 (Write_Val): Remove superfluous spaces in back-end layout mode.
2165 2017-10-09 Piotr Trojanek <trojanek@adacore.com>
2167 * sem_res.adb (Property_Error): Remove.
2168 (Resolve_Actuals): check for SPARK RM 7.1.3(10) rewritten to match the
2169 current wording of the rule.
2171 2017-10-09 Justin Squirek <squirek@adacore.com>
2173 * sem_ch3.adb (Analyze_Declarations): Add check for ghost packages
2174 before analyzing a given scope due to an expression function.
2175 (Uses_Unseen_Lib_Unit_Priv): Rename to Uses_Unseen_Priv.
2177 2017-10-09 Bob Duff <duff@adacore.com>
2179 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration): Use
2180 Defining_Identifier (Obj_Decl) in two places, because it might have
2182 * exp_ch6.adb (Make_Build_In_Place_Call_In_Allocator): Deal with cases
2183 involving 'Input on (not visibly) derived types.
2185 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2187 * atree.adb: Add new soft link Rewriting_Proc.
2188 (Rewrite): Invoke the subprogram attached to the rewriting soft link.
2189 (Set_Rewriting_Proc): New routine.
2190 * attree.ads: Add new access-to-subprogram type Rewrite_Proc.
2191 (Set_Rewriting_Proc): New routine.
2192 * checks.adb (Install_Primitive_Elaboration_Check): Use 'E' character
2193 for *E*laboration flag to maintain consistency with other elaboration
2194 flag generating subprograms.
2195 * debug.adb: Document the new usage of flag -gnatdL.
2196 * einfo.adb: Node19 is now used as Receiving_Entry. Node39 is now used
2197 as Protected_Subprogram. Flag148 is now used as
2198 Is_Elaboration_Checks_OK_Id. Flag302 is now used as
2199 Is_Initial_Condition_Procedure.
2200 (Is_Elaboration_Checks_OK_Id): New routine.
2201 (Is_Initial_Condition_Procedure): New routine.
2202 (Protected_Subprogram): New routine.
2203 (Receiving_Entry): New routine.
2204 (SPARK_Pragma): Update assertion.
2205 (SPARK_Pragma_Inherited): Update assertion.
2206 (Suppress_Elaboration_Warnings): Removed.
2207 (Set_Is_Elaboration_Checks_OK_Id): New routine.
2208 (Set_Is_Initial_Condition_Procedure): New routine.
2209 (Set_Protected_Subprogram): New routine.
2210 (Set_Receiving_Entry): New routine.
2211 (Set_SPARK_Pragma): Update assertion.
2212 (Set_SPARK_Pragma_Inherited): Update assertion.
2213 (Write_Entity_Flags): Update the output for Flag148 and Flag302.
2214 (Write_Field19_Name): Add output for Receiving_Entry.
2215 (Write_Field39_Name): Add output for Protected_Subprogram.
2216 (Write_Field40_Name): Update the output for SPARK_Pragma.
2217 * einfo.ads: New attributes Is_Elaboration_Checks_OK_Id,
2218 Is_Initial_Condition_Procedure, Protected_Subprogram, Receiving_Entry.
2219 Remove attribute Suppress_Elaboration_Warnings. Update the stricture
2220 of various entities.
2221 (Is_Elaboration_Checks_OK_Id): New routine along with pragma Inline.
2222 (Is_Initial_Condition_Procedure): New routine along with pragma Inline.
2223 (Protected_Subprogram): New routine along with pragma Inline.
2224 (Receiving_Entry): New routine along with pragma Inline.
2225 (Suppress_Elaboration_Warnings): Removed.
2226 (Set_Is_Elaboration_Checks_OK_Id): New routine along with pragma
2228 (Set_Is_Initial_Condition_Procedure): New routine along with pragma
2230 (Set_Protected_Subprogram): New routine along with pragma Inline.
2231 (Set_Receiving_Entry): New routine along with pragma Inline.
2232 (Set_Suppress_Elaboration_Warnings): Removed.
2233 * exp_ch3.adb (Build_Init_Procedure): Use name _Finalizer to maintain
2234 consistency with other finalizer generating subprograms.
2235 (Default_Initialize_Object): Mark the block which wraps the call to
2236 finalize as being part of initialization.
2237 * exp_ch7.adb (Expand_N_Package_Declaration): Directly expand pragma
2239 (Expand_N_Package_Body): Directly expand pragma Initial_Condition.
2240 (Next_Suitable_Statement): Update the comment on usage. Skip over call
2241 markers generated by the ABE mechanism.
2242 * exp_ch9.adb (Activation_Call_Loc): New routine.
2243 (Add_Accept): Link the accept procedure to the original entry.
2244 (Build_Protected_Sub_Specification): Link the protected or unprotected
2245 version to the original subprogram.
2246 (Build_Task_Activation_Call): Code cleanup. Use a source location which
2247 is very close to the "begin" or "end" keywords when generating the
2249 * exp_prag.adb (Expand_Pragma_Initial_Condition): Reimplemented.
2250 * exp_spark.adb (Expand_SPARK): Use Expand_SPARK_N_Loop_Statement to
2252 (Expand_SPARK_N_Loop_Statement): New routine.
2253 (Expand_SPARK_N_Object_Declaration): Code cleanup. Partially insert the
2254 call to the Default_Initial_Condition procedure.
2255 (Expand_SPARK_Op_Ne): Renamed to Expand_SPARK_N_Op_Ne.
2256 * exp_util.adb (Build_DIC_Procedure_Body): Capture the SPARK_Mode in
2258 (Build_DIC_Procedure_Declaration): Capture the SPARK_Mode in effect.
2259 (Insert_Actions): Add processing for N_Call_Marker.
2260 (Kill_Dead_Code): Explicitly kill an elaboration scenario.
2261 * exp_util.ads (Make_Invariant_Call): Update the comment on usage.
2262 * frontend.adb: Initialize Sem_Elab. Process all saved top level
2263 elaboration scenarios for ABE issues.
2264 * gcc-interface/trans.c (gnat_to_gnu): Add processing for N_Call_Marker
2266 * lib.adb (Earlier_In_Extended_Unit): New variant.
2267 * sem.adb (Analyze): Ignore N_Call_Marker nodes.
2268 (Preanalysis_Active): New routine.
2269 * sem.ads (Preanalysis_Active): New routine.
2270 * sem_attr.adb (Analyze_Access_Attribute): Save certain
2271 elaboration-related attributes. Save the scenario for ABE processing.
2272 * sem_ch3.adb (Analyze_Object_Declaration): Save the SPARK mode in
2273 effect. Save certain elaboration-related attributes.
2274 * sem_ch5.adb (Analyze_Assignment): Save certain elaboration-related
2275 attributes. Save the scenario for ABE processing.
2276 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Save the SPARK
2277 mode in effect. Save certain elaboration-related attributes.
2278 (Analyze_Subprogram_Body_Helper): Skip N_Call_Marker nodes when
2279 locating the first real statement.
2280 (Analyze_Subprogram_Declaration): Save the SPARK mode in effect. Save
2281 certain elaboration-related attributes.
2282 * sem_ch7.adb (Analyze_Package_Declaration): Do not suppress
2283 elaboration warnings.
2284 * sem_ch8.adb (Attribute_Renaming): Mark a subprogram body which was
2285 generated for purposes of wrapping an attribute used as a generic
2287 (Find_Direct_Name): Save certain elaboration-related attributes. Save
2288 the scenario for ABE processing.
2289 (Find_Expanded_Name): Save certain elaboration-related attributes. Save
2290 the scenario for ABE processing.
2291 * sem_ch9.adb (Analyze_Entry_Declaration): Save certain
2292 elaboration-related attributes.
2293 (Analyze_Requeue): Save certain elaboration-related attributes. Save
2294 the scenario for ABE processing.
2295 (Analyze_Single_Task_Declaration): Save certain elaboration-related
2297 (Analyze_Task_Type_Declaration): Save certain elaboration-related
2299 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Save certain
2300 elaboration-related attributes.
2301 (Analyze_Generic_Subprogram_Declaration): Save the SPARK mode in
2302 effect. Save certain elaboration-related attributes.
2303 (Analyze_Package_Instantiation): Save certain elaboration-related
2304 attributes. Save the scenario for ABE processing. Create completing
2305 bodies in case the instantiation results in a guaranteed ABE.
2306 (Analyze_Subprogram_Instantiation): Save certain elaboration-related
2307 attributes Save the scenario for ABE processing. Create a completing
2308 body in case the instantiation results in a guaranteed ABE.
2309 (Provide_Completing_Bodies): New routine.
2310 * sem_elab.ads: Brand new implementation.
2311 * sem_prag.adb (Analyze_Pragma, cases Elaborate, Elaborate_All,
2312 Elaborate_Body): Do not suppress elaboration warnings.
2313 * sem_res.adb (Make_Call_Into_Operator): Set the parent field of the
2315 (Resolve_Call): Save certain elaboration-related attributes. Save the
2316 scenario for ABE processing.
2317 (Resolve_Entity_Name): Do not perform any ABE processing here.
2318 (Resolve_Entry_Call): Inherit certain attributes from the original call.
2319 * sem_util.adb (Begin_Keyword_Location): New routine.
2320 (Defining_Entity): Update the parameter profile. Add processing for
2321 concurrent subunits that are rewritten as null statements.
2322 (End_Keyword_Location): New routine.
2323 (Find_Enclosing_Scope): New routine.
2324 (In_Instance_Visible_Part): Code cleanup.
2325 (In_Subtree): Update the parameter profile. Add new version.
2326 (Is_Preelaborable_Aggregate): New routine.
2327 (Is_Preelaborable_Construct): New routine.
2328 (Mark_Elaboration_Attributes): New routine.
2329 (Scope_Within): Update the parameter profile.
2330 (Scope_Within_Or_Same): Update the parameter profile.
2331 * sem_util.ads (Begin_Keyword_Location): New routine.
2332 (Defining_Entity): Update the parameter profile and the comment on
2334 (End_Keyword_Location): New routine.
2335 (Find_Enclosing_Scope): New routine.
2336 (In_Instance_Visible_Part): Update the parameter profile.
2337 (In_Subtree): Update the parameter profile. Add new version.
2338 (Is_Preelaborable_Aggregate): New routine.
2339 (Is_Preelaborable_Construct): New routine.
2340 (Mark_Elaboration_Attributes): New routine.
2341 (Scope_Within): Update the parameter profile and the comment on usage.
2342 (Scope_Within_Or_Same): Update the parameter profile and the comment on
2344 * sem_warn.adb (Check_Infinite_Loop_Warning): Use Has_Condition_Actions
2345 to determine whether a loop has meaningful condition actions.
2346 (Has_Condition_Actions): New routine.
2347 * sinfo.adb (ABE_Is_Certain): Removed.
2348 (Is_Declaration_Level_Node): New routine.
2349 (Is_Dispatching_Call): New routine.
2350 (Is_Elaboration_Checks_OK_Node): New routine.
2351 (Is_Initialization_Block): New routine.
2352 (Is_Known_Guaranteed_ABE): New routine.
2353 (Is_Recorded_Scenario): New routine.
2354 (Is_Source_Call): New routine.
2355 (Is_SPARK_Mode_On_Node): New routine.
2356 (No_Elaboration_Check): Removed.
2357 (Target): New routine.
2358 (Was_Attribute_Reference): New routine.
2359 (Set_ABE_Is_Certain): Removed.
2360 (Set_Is_Declaration_Level_Node): New routine.
2361 (Set_Is_Dispatching_Call): New routine.
2362 (Set_Is_Elaboration_Checks_OK_Node): New routine.
2363 (Set_Is_Initialization_Block): New routine.
2364 (Set_Is_Known_Guaranteed_ABE): New routine.
2365 (Set_Is_Recorded_Scenario): New routine.
2366 (Set_Is_Source_Call): New routine.
2367 (Set_Is_SPARK_Mode_On_Node): New routine.
2368 (Set_No_Elaboration_Check): Removed.
2369 (Set_Target): New routine.
2370 (Set_Was_Attribute_Reference): New routine.
2371 * sinfo.ads: Remove attribute ABE_Is_Certain. Attribute
2372 Do_Discriminant_Check now utilizes Flag3. Attribute
2373 No_Side_Effect_Removal now utilizes Flag17. Add new node
2374 N_Call_Marker. Update the structure of various nodes.
2375 (ABE_Is_Certain): Removed along with pragma Inline.
2376 (Is_Declaration_Level_Node): New routine along with pragma Inline.
2377 (Is_Dispatching_Call): New routine along with pragma Inline.
2378 (Is_Elaboration_Checks_OK_Node): New routine along with pragma Inline.
2379 (Is_Initialization_Block): New routine along with pragma Inline.
2380 (Is_Known_Guaranteed_ABE): New routine along with pragma Inline.
2381 (Is_Recorded_Scenario): New routine along with pragma Inline.
2382 (Is_Source_Call): New routine along with pragma Inline.
2383 (Is_SPARK_Mode_On_Node): New routine along with pragma Inline.
2384 (No_Elaboration_Check): Removed along with pragma Inline.
2385 (Target): New routine along with pragma Inline.
2386 (Was_Attribute_Reference): New routine along with pragma Inline.
2387 (Set_ABE_Is_Certain): Removed along with pragma Inline.
2388 (Set_Is_Declaration_Level_Node): New routine along with pragma Inline.
2389 (Set_Is_Dispatching_Call): New routine along with pragma Inline.
2390 (Set_Is_Elaboration_Checks_OK_Node): New routine along with pragma
2392 (Set_Is_Initialization_Block): New routine along with pragma Inline.
2393 (Set_Is_Known_Guaranteed_ABE): New routine along with pragma Inline.
2394 (Set_Is_Recorded_Scenario): New routine along with pragma Inline.
2395 (Set_Is_Source_Call): New routine along with pragma Inline.
2396 (Set_Is_SPARK_Mode_On_Node): New routine along with pragma Inline.
2397 (Set_No_Elaboration_Check): Removed along with pragma Inline.
2398 (Set_Target): New routine along with pragma Inline.
2399 (Set_Was_Attribute_Reference): New routine along with pragma Inline.
2400 * sprint.adb (Sprint_Node_Actual): Add an entry for N_Call_Marker.
2402 2017-10-09 Bob Duff <duff@adacore.com>
2404 * exp_ch7.adb (Create_Finalizer): Suppress checks within the finalizer.
2406 2017-10-09 Bob Duff <duff@adacore.com>
2408 * freeze.ads: Minor comment fixed.
2410 2017-10-09 Bob Duff <duff@adacore.com>
2412 * exp_ch6.adb: (Make_Build_In_Place_Call_In_Object_Declaration): Take
2413 care of unchecked conversions in addition to regular conversions. This
2414 takes care of a case where a type is derived from a private untagged
2415 type that is completed by a tagged controlled type.
2417 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2419 * exp_disp.adb (Build_Class_Wide_Check, Replace_Formals): When
2420 rewriting a class-wide condition, handle properly the case where the
2421 controlling argument of the operation to which the condition applies is
2422 an access to a tagged type, and the condition includes a dispatching
2423 call with an implicit dereference.
2425 2017-10-09 Bob Duff <duff@adacore.com>
2427 * exp_ch6.adb: (Make_Build_In_Place_Call_In_Object_Declaration): Remove
2428 the code at the end of this procedure that was setting the type of a
2429 class-wide object to the specific type returned by a function call.
2430 Treat this case as indefinite instead.
2432 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2434 * sem_ch4.adb (Try_Class_Wide_Operation, Traverse_Homonyms):
2435 Suppress spurious ambiguity error when two traversals of the homonym
2436 chain (first directly, and then through an examination of relevant
2437 interfaces) retrieve the same operation, when other irrelevant homonyms
2438 of the operatioh are also present.
2440 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2442 * sem_util.adb (Object_Access_Level): If the object is the return
2443 statement of an expression function, return the level of the function.
2444 This is relevant when the object involves an implicit conversion
2445 between access types and the expression function is a completion, which
2446 forces the analysis of the expression before rewriting it as a body, so
2447 that freeze nodes can appear in the proper scope.
2449 2017-10-09 Bob Duff <duff@adacore.com>
2451 * atree.adb: Make nnd apply to everything "interesting", including
2452 Rewrite. Remove rrd.
2454 2017-10-09 Javier Miranda <miranda@adacore.com>
2456 * exp_ch3.adb (Expand_N_Object_Declaration): Avoid never-ending loop
2457 processing the declaration of the dummy object internally created by
2458 Make_DT to compute the offset to the top of components referencing
2459 secondary dispatch tables.
2460 (Initialize_Tag): Do not initialize the offset-to-top field if it has
2461 been initialized initialized.
2462 * exp_disp.ads (Building_Static_Secondary_DT): New subprogram.
2463 * exp_disp.adb (Building_Static_Secondary_DT): New subprogram.
2464 (Make_DT): Create a dummy constant object if we can statically build
2465 secondary dispatch tables.
2466 (Make_Secondary_DT): For statically allocated secondary dispatch tables
2467 use the dummy object to compute the offset-to-top field value by means
2468 of the attribute 'Position.
2470 2017-10-09 Bob Duff <duff@adacore.com>
2472 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Add self-checking
2473 code so if BIPAlloc is not passed in, it will likely raise
2474 Program_Error instead of cause miscellaneous chaos.
2475 (Is_Build_In_Place_Result_Type): Return False if not Expander_Active,
2476 as for the other Is_B-I-P... functions.
2477 * sem_aggr.adb (Resolve_Extension_Aggregate): For an extension
2478 aggregate whose ancestor part is a build-in-place call returning a
2479 nonlimited type, transform the assignment to the ancestor part to use a
2481 * sem_ch3.adb (Build_Itype_Reference): Handle the case where we're
2482 creating an Itype for a library unit entity.
2483 (Check_Initialization): Avoid spurious error message on
2484 internally-generated call.
2485 * sem_ch5.adb (Analyze_Assignment): Handle the case where the
2486 right-hand side is a build-in-place call. This didn't happen when b-i-p
2487 was only for limited types.
2488 * sem_ch6.adb (Create_Extra_Formals): Remove assumption that b-i-p
2489 implies >= Ada 2005.
2490 * sem_ch7.adb (Scan_Subprogram_Refs): Avoid traversing the same nodes
2492 * sem_util.adb (Next_Actual): Handle case of build-in-place call.
2494 2017-10-09 Arnaud Charlet <charlet@adacore.com>
2496 * doc/gnat_ugn/gnat_and_program_execution.rst: Minor edit.
2498 2017-10-09 Piotr Trojanek <trojanek@adacore.com>
2500 * libgnarl/s-taprob.adb: Minor whitespace fix.
2502 2017-10-09 Bob Duff <duff@adacore.com>
2504 * namet.ads: Minor comment fix.
2506 2017-10-09 Piotr Trojanek <trojanek@adacore.com>
2508 * sem_aux.adb (Unit_Declaration_Node): Detect protected declarations,
2509 just like other program units listed in Ada RM 10.1(1).
2511 2017-10-09 Justin Squirek <squirek@adacore.com>
2513 * sem_ch8.adb (Update_Chain_In_Scope): Modify warning messages.
2515 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2517 * sem_ch12.adb (Analyze_Associations, Check_Generic_Parent): If an
2518 actual for a formal package is an instantiation of a child unit, create
2519 a freeze node for the instance of the parent if it appears in the same
2520 scope and is not frozen yet.
2522 2017-10-09 Pierre-Marie de Rodat <derodat@adacore.com>
2524 * exp_atag.ads, libgnat/a-tags.adb, libgnat/a-tags.ads: Enhance
2525 in-source documentation for tagged types's Offset_To_Top.
2527 2017-10-09 Bob Duff <duff@adacore.com>
2529 * exp_ch3.adb (Build_Assignment): Parameter name N was somewhat
2530 confusing. Same for N_Loc. Remove assumption that b-i-p implies
2531 limited. This is for the case of a function call that occurs as the
2532 default for a record component.
2533 (Expand_N_Object_Declaration): Deal with the case where expansion has
2534 created an object declaration initialized with something like
2536 * exp_ch3.adb: Minor reformatting.
2538 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2540 * exp_attr.adb (Expand_Attribute_Reference, case 'Valid): The prefix of
2541 the attribute is an object, but it may appear within a conversion. The
2542 object itself must be retrieved when generating the range test that
2543 implements the validity check on a scalar type.
2545 2017-10-05 Eric Botcazou <ebotcazou@adacore.com>
2548 * mingw32.h (_O_U8TEXT, _O_U16TEXT, _O_WTEXT): Delete.
2549 * sysdep.c (__gnat_set_mode ): Use DJGPP version for Cygwin.
2551 2017-10-02 Eric Botcazou <ebotcazou@adacore.com>
2552 Pierre-Marie de Rodat <derodat@adacore.com>
2555 * libgnarl/s-linux__x32.ads (suseconds_t): New subtype.
2556 (time_t): Change from derived type to subtype.
2557 (timeval): Use suseconds_t for tv_usec.
2558 * libgnarl/s-osinte__x32.adb (To_Timespec): Remove use type clause.
2560 2017-10-02 Richard Sandiford <richard.sandiford@linaro.org>
2562 * gcc-interface/decl.c (annotate_value): Use wi::to_widest when
2563 handling the form (plus/mult (convert @0) @1).
2565 2017-09-29 Bob Duff <duff@adacore.com>
2567 * exp_ch6.adb (Expand_Call_Helper): Replace with code more similar to
2569 (Make_Build_In_Place_Call_In_Object_Declaration): Back out previous
2570 change. Set the Etype in the class-wide case. This fixes a regression
2571 in the libadalang test suite.
2573 2017-09-29 Joel Brobecker <brobecker@adacore.com>
2575 * doc/gnat_ugn/building_executable_programs_with_gnat.rst,
2576 doc/gnat_ugn/the_gnat_compilation_model.rst: Avoid use of single colon
2578 * gnat_ugn.texi: Regenerate.
2580 2017-09-29 Justin Squirek <squirek@adacore.com>
2582 * ali-util.adb, comperr.adb, cprint.adb, errout.adb, fmap.adb,
2583 fname-sf.adb, frontend.adb, lib-xref-spark_specific.adb, gnat1drv.adb,
2584 gnatls.adb, lib.adb, lib-load.adb, lib-writ.adb, prepcomp.adb,
2585 sinput-d.adb, sinput-l.adb, sprint.adb, targparm.adb: Update comparison
2586 for checking source file status and error message and/or call to
2588 * libgnat/s-os_lib.ads: Add new potential value constant for
2589 uninitialized file descriptors.
2590 * osint.adb, osint.ads (Read_Source_File): Add extra parameter to
2591 return result of IO to encompass a read access failure in addition to a
2592 file-not-found error.
2594 2017-09-29 Bob Duff <duff@adacore.com>
2596 * exp_ch6.adb (Expand_Call_Helper): Handle case of build-in-place
2597 functions returning nonlimited types. Allow for qualified expressions
2598 and type conversions.
2599 (Expand_N_Extended_Return_Statement): Correct the computation of
2600 Func_Bod to allow for child units.
2601 (Expand_Simple_Function_Return): Remove assumption that b-i-p implies
2602 limited (initialization of In_Place_Expansion), and implies >= Ada
2604 (Is_Build_In_Place_Result_Type): New function to accompany
2605 Is_Build_In_Place_Function and Is_Build_In_Place_Function_Call, because
2606 sometimes we just have the type on our hands, not the function. For
2607 now, does the same thing as the old version, so build-in-place is
2608 disabled for nonlimited types, except that you can use -gnatd.9 to
2610 * exp_ch6.ads (Is_Build_In_Place_Result_Type): New function to
2611 accompany Is_Build_In_Place_Function and
2612 Is_Build_In_Place_Function_Call, because sometimes we just have the
2613 type on our hands, not the function.
2614 (Make_Build_In_Place_Call_In_...): Handle nonlimited build-in-place
2616 (Make_Build_In_Place_Call_In_Object_Declaration): Remove the
2617 questionable code at the end that was setting the Etype.
2618 * exp_aggr.adb (Is_Build_In_Place_Aggregate_Return): New function to
2619 determine whether "return (...agg...);" is returning from a
2620 build-in-place function.
2621 (Initialize_Ctrl_Array_Component, Initialize_Ctrl_Record_Component):
2622 Remove assumption that b-i-p implies limited (initialization of
2623 In_Place_Expansion).
2624 (Build_Record_Aggr_Code): AI-287: fix comment; it can't be wrapped in
2625 an unchecked conversion. Add assertions.
2626 (Convert_Aggr_In_Object_Decl): Establish_Transient_Scope -- no need for
2627 secondary stack here, just because the type needs finalization. That
2629 (Convert_To_Assignments): Only set Unc_Decl if Nkind (N) = N_Aggregate.
2630 For "return (...agg...);" don't assume b-i-p implies limited.
2631 Needs_Finalization does not imply secondary stack.
2632 (Expand_Array_Aggregate): Named notation. Reverse the sense of
2633 Component_OK_For_Backend -- more readability with fewer double
2635 * exp_attr.adb (Expand_N_Attribute_Reference): Remove assumptions that
2636 b-i-p implies >= Ada 2005.
2637 * exp_ch3.adb (Expand_N_Object_Declaration): Remove assumptions that
2638 b-i-p implies >= Ada 2005. Remove Adjust if we're building the return
2639 object of an extended return statement in place.
2640 * exp_ch4.adb (Expand_Allocator_Expression, Expand_N_Indexed_Component,
2641 Expand_N_Selected_Component, Expand_N_Slice): Remove assumptions that
2642 b-i-p implies >= Ada 2005.
2643 * exp_ch5.adb (Expand_N_Assignment_Statement): Remove assumption that
2644 b-i-p implies >= Ada 2005.
2645 * exp_ch7.adb: Comment fix.
2646 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration): Remove
2647 assumptions that b-i-p implies >= Ada 2005.
2648 * exp_disp.adb (Expand_Interface_Actuals): Remove assumptions that
2649 b-i-p implies >= Ada 2005.
2650 * exp_util.adb (Build_Allocate_Deallocate_Proc): Look at Storage_Pool
2651 (Expr), in case Pool_Id is not set.
2652 (Initialized_By_Aliased_BIP_Func_Call): Handle case where the call is
2653 qualified or converted.
2654 (Is_Secondary_Stack_BIP_Func_Call): Don't check if Nkind (Selector_Name
2655 (Param)) = N_Identifier; that's all it could be.
2656 * sinfo.ads: Comment fixes.
2657 * snames.ads-tmpl: Comment fixes.
2658 * debug.adb: Add flag gnatd.9, to enable the build-in-place machinery.
2660 2017-09-29 Justin Squirek <squirek@adacore.com>
2662 * sem_ch8.adb (Mark_Use_Clauses): Add recursive call to properly handle
2663 all cases related to marking entity identifiers.
2665 2017-09-29 Vasiliy Fofanov <fofanov@adacore.com>
2667 * adaint.c (win32_wait): Properly handle error and take into account
2668 the WIN32 limitation on the number of simultaneous wait objects.
2670 2017-09-29 Vasiliy Fofanov <fofanov@adacore.com>
2672 * cal.c: Minor proofreading.
2674 2017-09-29 Vasiliy Fofanov <fofanov@adacore.com>
2676 * doc/gnat_ugn/gnat_utility_programs.rst: Minor formatting fix.
2677 * gnat_ugn.texi: Regenerate.
2679 2017-09-29 Bob Duff <duff@adacore.com>
2681 * lib-xref.ads: Comment fix.
2683 2017-09-29 Bob Duff <duff@adacore.com>
2685 * exp_aggr.adb: Remove calls to Set_No_Ctrl_Actions for discriminants.
2686 Discriminants can't need finalization.
2688 2017-09-29 Ed Schonberg <schonberg@adacore.com>
2690 * sem_ch6.adb (Analyze_Expression_Function): Do not emit freeze nodes
2691 for types in expression if the function is within a generic unit.
2692 * sem_res.adb (Resolve): In a generic context do not freeze an
2693 expression, unless it is an entity. This exception is solely for the
2694 purpose of detecting illegal uses of deferred constants in generic
2696 * sem_res.adb: Minor reformatting.
2698 2017-09-29 Justin Squirek <squirek@adacore.com>
2700 * sem_ch8.adb (Note_Redundant_Use): Add guard to protect against false
2703 2017-09-29 Yannick Moy <moy@adacore.com>
2705 * sinput-c.adb: Remove unused with-clause on Ada.Unchecked_Conversion.
2707 2017-09-29 Eric Botcazou <ebotcazou@adacore.com>
2709 * doc/gnat_rm/representation_clauses_and_pragmas.rst: Minor rewording.
2710 * doc/gnat_rm/implementation_defined_pragmas.rst (Optimize_Alignment):
2711 Document the effect of pragma Optimize_Alignment (Space) on non-packed
2713 * gnat_rm.texi: Regenerate.
2715 2017-09-25 Justin Squirek <squirek@adacore.com>
2717 * aspects.adb, bindgen.adb, clean.adb, erroutc.adb, exp_ch13.adb,
2718 exp_dbug.adb, exp_unst.adb, exp_util.adb, frontend.adb, gnat1drv.adb,
2719 gnatdll.adb, gnatlink.adb, gnatls.adb, gnatname.adb, gnatxref.adb,
2720 gnatfind.adb, libgnat/a-cfhama.ads, libgnat/a-exetim__mingw.adb,
2721 libgnat/a-strmap.adb, libgnat/a-teioed.adb, libgnat/g-alvety.ads,
2722 libgnat/g-expect.adb, libgnat/g-regist.adb, libgnat/g-socket.adb,
2723 libgnat/g-socthi__mingw.ads, libgnat/s-stausa.adb,
2724 libgnat/s-tsmona__linux.adb, libgnat/s-tsmona__mingw.adb,
2725 libgnarl/s-taenca.adb, libgnarl/s-tassta.adb, libgnarl/s-tarest.adb,
2726 libgnarl/s-tpobop.adb, make.adb, makeusg.adb, namet.adb, output.ads,
2727 put_scos.adb, repinfo.adb, rtsfind.adb, scn.ads, sem_attr.adb,
2728 sem_aux.ads, sem_warn.ads, targparm.adb, xr_tabls.adb, xref_lib.adb:
2729 Removal of ineffective use-clauses.
2730 * exp_ch9.adb (Is_Simple_Barrier_Name): Check for false positives with
2731 constant folded barriers.
2732 * ghost.adb, sprint.adb, sem_ch10.adb, sem_warn.adb: Change access to
2733 Subtype_Marks and Names list in use-clause nodes to their new singular
2734 counterparts (e.g. Subtype_Mark, Name).
2735 * par.adb, par-ch8.adb (Append_Use_Clause): Created to set
2736 Prev_Ids and More_Ids in use-clause nodes.
2737 (P_Use_Clause): Modify to take a list as a parameter.
2738 (P_Use_Package_Clause, P_Use_Type_Clause): Divide names and
2739 subtype_marks within an aggregate use-clauses into individual clauses.
2740 * par-ch3.adb, par-ch10.adb, par-ch12.adb: Trivally modify call to
2741 P_Use_Clause to match its new behavior.
2742 * sem.adb (Analyze): Mark use clauses for non-overloaded entities.
2743 * sem_ch4.adb (Try_One_Interp): Add sanity check to handle previous
2745 * sem_ch6.adb (Analyze_Generic_Subprogram_Body,
2746 Analyze_Subprogram_Body_Helper): Update use clause chain at the end of
2747 the declarative region.
2748 * sem_ch7.adb (Analyze_Package_Body_Helper): Update use clause chain
2749 after analysis (Analyze_Package_Specification): Update use clause chain
2750 when there is no body.
2751 * sem_ch8.ads, sem_ch8.adb (Analyze_Use_Package, Analyze_Use_Type): Add
2752 parameter to determine weither the installation of scopes should also
2753 propagate on the use-clause "chain".
2754 (Mark_Use_Clauses): Created to traverse use-clause chains and determine
2755 what constitutes a valid "use" of a clause.
2756 (Update_Use_Clause_Chain): Created to aggregate common machinary used
2757 to clean up use-clause chains (and warn on ineffectiveness) at the end
2758 of declaritive regions.
2759 * sem_ch8.adb (Analyze_Package_Name): Created to perform analysis on a
2760 package name from a use-package clause.
2761 (Analyze_Package_Name_List): Created to perform analysis on a list of
2762 package names (similar to Analyze_Package_Name).
2763 (Find_Most_Prev): Created to traverse to the beginning of a given
2765 (Most_Decendant_Use_Clause): Create to identify which clause from a
2766 given set is highest in scope (not always the most prev).
2767 (Use_One_Package, Use_One_Type): Major cleanup and reorganization to
2768 handle the new chaining algorithm, also many changes related to
2769 redundant clauses. A new parameter has also been added to force
2770 installation to handle certain cases.
2771 * sem_ch9.adb (Analyze_Entry_Body, Analyze_Protected_Body,
2772 Analyze_Task_Body): Mark use clauses on relevant entities.
2773 * sem_ch10.adb, sem_ch10.ads (Install_Context_Clauses,
2774 Install_Parents): Add parameter to determine weither the installation
2775 of scopes should also propagate on the use-clause "chain".
2776 * sem_ch12.adb (Inline_Instance_Body): Add flag in call to
2777 Install_Context to avoid redundant chaining of use-clauses.
2778 * sem_ch13.adb: Minor reformatting.
2779 * sem_res.adb (Resolve): Mark use clauses on operators.
2780 (Resolve_Call, Resolve_Entity_Name): Mark use clauses on relevant
2782 * sinfo.adb, sinfo.ads (Is_Effective_Use_Clause,
2783 Set_Is_Effective_Use_Clause): Add new flag to N_Use_Clause nodes to
2784 represent any given clause's usage/reference/necessity.
2785 (Prev_Use_Clause, Set_Prev_Use_Clause): Add new field to N_Use_Clause
2786 nodes to allow loose chaining of redundant clauses.
2787 (Set_Used_Operations, Set_Subtype_Mark, Set_Prev_Ids, Set_Names,
2788 Set_More_Ids, Set_Name): Modify set procedure calls to reflect
2789 reorganization in node fields.
2790 * types.ads (Source_File_Index): Adjust index bounds.
2791 (No_Access_To_Source_File): New constant.
2793 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2795 * sem_ch13.adb (Analyze_One_Aspect): In ASIS mode make a full copy of
2796 the expression to be used in the generated attribute specification
2797 (rather than relocating it) to avoid resolving a potentially malformed
2798 tree when the expression is resolved through an ASIS-specific call to
2799 Resolve_Aspect_Expressions. This manifests itself as a crash on a
2800 function with parameter associations.
2802 2017-09-25 Yannick Moy <moy@adacore.com>
2804 * exp_spark.adb (Expand_SPARK_Indexed_Component,
2805 Expand_SPARK_Selected_Component): New procedures to insert explicit
2806 dereference if required.
2807 (Expand_SPARK): Call the new procedures.
2809 2017-09-25 Patrick Bernardi <bernardi@adacore.com>
2811 * libgnat/a-stwiun.adb, libgnat/s-stchop__vxworks.adb,
2812 libgnat/g-socthi__vxworks.ads, libgnat/a-stzunb.adb,
2813 libgnat/a-strunb.adb, libgnarl/s-osinte__lynxos178.adb,
2814 libgnarl/s-intman__vxworks.adb, libgnarl/s-osinte__darwin.adb,
2815 libgnarl/a-exetim__darwin.adb: Removed ineffective use-clauses.
2817 2017-09-25 Vasiliy Fofanov <fofanov@adacore.com>
2819 * adaint.c (win32_wait): Properly handle error and take into account
2820 the WIN32 limitation on the number of simultaneous wait objects.
2822 2017-09-25 Yannick Moy <moy@adacore.com>
2824 * sem_ch3.adb (Constant_Redeclaration): Do not insert a call to the
2825 invariant procedure in GNATprove mode.
2826 * sem_ch5.adb (Analyze_Assignment): Likewise.
2828 2017-09-25 Piotr Trojanek <trojanek@adacore.com>
2830 * adabkend.adb (Call_Back_End): Fix wording of "front-end" and
2831 "back-end" in comments.
2833 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2835 * exp_ch6.adb (Expand_Call_Helper): The extra accessibility check in a
2836 call that appears in a classwide precondition and that mentions an
2837 access formal of the subprogram, must use the accessibility level of
2838 the actual in the call. This is one case in which a reference to a
2839 formal parameter appears outside of the body of the subprogram.
2841 2017-09-25 Hristian Kirtchev <kirtchev@adacore.com>
2843 * sem_res.adb (Replace_Actual_Discriminants): Replace a discriminant
2845 (Resolve_Entry): Clean up predicate
2847 2017-09-25 Hristian Kirtchev <kirtchev@adacore.com>
2849 * sem_prag.adb (Analyze_Constituent): Raise Unrecoverable_Error rather
2850 than Program_Error because U_E is more in line with respect to the
2853 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2855 * sem_ch13.adb (Resolve_Aspect_Expressions): The expression for aspect
2856 Storage_Size does not freeze, and thus can include references to
2859 2017-09-25 Hristian Kirtchev <kirtchev@adacore.com>
2861 * exp_spark.adb (Expand_SPARK_Potential_Renaming): Do not process a
2862 reference when it appears within a pragma of no significance to SPARK.
2863 (In_Insignificant_Pragma): New routine.
2864 * sem_prag.ads: Add new table Pragma_Significant_In_SPARK.
2866 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2868 * sem_ch12.adb (Analyze_Associations, case N_Formal_Package): If the
2869 actual is a renaming, indicate that it is the renamed package that must
2870 be frozen before the instantiation.
2872 2017-09-25 Yannick Moy <moy@adacore.com>
2874 * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo in description
2875 of dimensionality system in GNAT UG.
2876 * gnat_ugn.texi: Regenerate.
2878 2017-09-25 Yannick Moy <moy@adacore.com>
2880 * gnat1drv.adb: Call Check_Safe_Pointers from the frontend in
2881 GNATprove_Mode when switch -gnatdF used.
2883 2017-09-25 Piotr Trojanek <trojanek@adacore.com>
2885 * adabkend.adb (Call_Back_End): Reset Current_Error_Node when starting
2888 2017-09-25 Javier Miranda <miranda@adacore.com>
2890 * exp_imgv.adb (Expand_Image_Attribute): Disable the optimized
2891 expansion of user-defined enumeration types when the generation of
2892 names for enumeration literals is suppressed.
2894 2017-09-25 Gary Dismukes <dismukes@adacore.com>
2896 * libgnarl/s-taprop__linux.adb: Minor reformatting.
2898 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2900 * sem_ch13.adb (Resolve_Aspect_Expressions): Do not resolve identifiers
2901 that appear as selector names of parameter associations, as these are
2902 never resolved by visibility.
2904 2017-09-25 Justin Squirek <squirek@adacore.com>
2906 * sem_res.adb (Resolve_Entry): Generate reference for index entities.
2908 2017-09-25 Doug Rupp <rupp@adacore.com>
2910 * libgnarl/s-taprop__linux.adb (Compute_Base_Monotonic_Clock): Refine.
2912 2017-09-25 Javier Miranda <miranda@adacore.com>
2914 * exp_imgv.adb (Is_User_Defined_Enumeration_Type): New subprogram.
2915 (Expand_User_Defined_Enumeration_Image): New subprogram.
2916 (Expand_Image_Attribute): Enable speed-optimized expansion of
2917 user-defined enumeration types when we are compiling with optimizations
2920 2017-09-25 Piotr Trojanek <trojanek@adacore.com>
2922 * sem_util.adb (Has_Null_Abstract_State): Remove, as an exactly same
2923 routine is already provided by Einfo.
2924 * einfo.adb (Has_Null_Abstract_State): Replace with the body from
2925 Sem_Util, which had better comments and avoided double calls to
2928 2017-09-25 Bob Duff <duff@adacore.com>
2930 * exp_ch3.adb: Rename Comp_Type_Simple to be Comp_Simple_Init.
2932 2017-09-25 Doug Rupp <rupp@adacore.com>
2934 * libgnarl/s-taprop__linux.adb (Base_Monotonic_Clock): New variable.
2935 (Compute_Base_Monotonic_Clock): New function.
2936 (Timed_Sleep): Adjust to use Base_Monotonic_Clock.
2937 (Timed_Delay): Likewise.
2938 (Monotonic_Clock): Likewise.
2939 * s-oscons-tmplt.c (CLOCK_MONOTONIC): Use on Linux.
2941 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2943 * sem_ch12.adb (Save_References_In_Aggregate): Small correction to
2946 2017-09-25 Hristian Kirtchev <kirtchev@adacore.com>
2948 * exp_ch5.adb, sem_ch4.adb, sem_ch13.adb, sem_attr.adb, exp_ch3.adb:
2951 2017-09-20 Alexandre Oliva <aoliva@redhat.com>
2953 * gcc-interface/lang.opt (gant, gnatO, gnat): Add RejectNegative.
2955 2017-09-18 Bob Duff <duff@adacore.com>
2957 * sem_ch4.adb (Complete_Object_Operation): Do not insert 'Access for
2958 reference types in the access-to-access case.
2960 2017-09-18 Eric Botcazou <ebotcazou@adacore.com>
2962 * sem_attr.adb (Analyze_Access_Attribute): Move check for the presence
2963 of the "aliased" keyword on the prefix from here to...
2964 (Resolve_Attribute) <Attribute_Access>: ...here. Remove useless call
2965 to Check_No_Implicit_Aliasing.
2966 * sinfo.ads (Non_Aliased_Prefix): Delete.
2967 (Set_Non_Aliased_Prefix): Likewise.
2968 * sinfo.adb (Non_Aliased_Prefix): Delete.
2969 (Set_Non_Aliased_Prefix): Likewise.
2971 2017-09-18 Bob Duff <duff@adacore.com>
2973 * exp_ch5.adb (Build_Formal_Container_Iteration,
2974 Expand_Formal_Container_Element_Loop): Convert the container to the
2975 root type before passing it to the iteration operations, so it will be
2978 2017-09-18 Bob Duff <duff@adacore.com>
2980 * einfo.ads, validsw.ads, treepr.ads, sem_util.ads: Comment fixes.
2982 2017-09-18 Bob Duff <duff@adacore.com>
2984 * exp_ch3.adb (Build_Array_Init_Proc): If validity checking is enabled,
2985 and it's a bit-packed array, pass False to the Consider_IS parameter of
2986 Needs_Simple_Initialization.
2988 2017-09-18 Hristian Kirtchev <kirtchev@adacore.com>
2990 * sem_ch6.adb (Check_Inline_Pragma): Link the newly generated spec to
2991 the preexisting body.
2992 * sem_prag.adb (Check_Inline_Always_Placement): New routine.
2993 (Process_Inline): Verify the placement of pragma Inline_Always. The
2994 pragma must now appear on the initial declaration of the related
2997 2017-09-18 Ed Schonberg <schonberg@adacore.com>
2999 * sem_ch3.adb (Analyze_Declarations): In ASIS mode, At the end of the
3000 declarative list in a subprogram body, analyze aspext specifications to
3001 provide basic semantic information, because otherwise the aspect
3002 specifications might only be snalyzed during expansion, when related
3003 subprograms are generated.
3005 2017-09-18 Bob Duff <duff@adacore.com>
3007 * exp_ch9.adb (Is_Simple_Barrier_Name): Follow Original_Node, in case
3008 validity checks have rewritten the tree.
3010 2017-09-18 Bob Duff <duff@adacore.com>
3012 * sem_util.adb: Comment fixes, and remove redundant Is_Itype check.
3014 2017-09-18 Ed Schonberg <schonberg@adacore.com>
3016 * sem_ch12.adb (Save_References_In_Aggregate): When constructing a
3017 qualified exxpression for an aggregate in a generic unit, verify that
3018 the scope of the type is itself visible and not hidden, so that the
3019 qualified expression is correctly resolved in any instance.
3021 2017-09-18 Bob Duff <duff@adacore.com>
3023 * sem_ch4.adb (Analyze_Qualified_Expression): Give an error if the type
3024 mark refers to the current instance. Set the type to Any_Type in that
3025 case, to avoid later crashes.
3027 2017-09-18 Ed Schonberg <schonberg@adacore.com>
3029 * exp_ch3.adb (Replace_Discriminant_References): New procedure,
3030 subsidiary of Build_Assignment, used to handle the initialization code
3031 for a mutable record component whose default value is an aggregate that
3032 sets the values of the discriminants of the components.
3034 2017-09-18 Eric Botcazou <ebotcazou@adacore.com>
3036 * sem_ch13.adb (Analyze_Attribute_Definition_Clause) <Address>: Mark
3037 the entity as being volatile for an overlay that toggles the scalar
3040 2017-09-18 Fedor Rybin <frybin@adacore.com>
3042 * doc/gnat_ugn/gnat_utility_programs.rst: Document that gnattest
3043 options -U main and --harness-only are not compatible.
3045 2017-09-18 Hristian Kirtchev <kirtchev@adacore.com>
3047 * freeze.adb, sem_ch6.adb, sem_res.adb: Minor reformatting.
3049 2017-09-18 Piotr Trojanek <trojanek@adacore.com>
3051 * einfo.ads (Is_Imported): Update comment, as this
3052 routine also applies to constants.
3054 2017-09-18 Yannick Moy <moy@adacore.com>
3056 * sem_util.adb (Find_Placement_In_State_Space): Allow generic package
3059 2017-09-18 Justin Squirek <squirek@adacore.com>
3061 * sem_prag.adb (Is_Non_Significant_Pragma_Reference): Change the
3062 constant indication for Pragma_Linker_Section.
3064 2017-09-18 Bob Duff <duff@adacore.com>
3066 Alternate fix for PR ada/71358
3067 * libgnat/g-comlin.adb (Getopt): Remove manual null access checks.
3068 Instead, make a local copy of Config, and if it's null, allocate an
3069 empty Command_Line_Configuration_Record, so we won't crash on null
3070 pointer dereference.
3072 2017-09-16 Eric Botcazou <ebotcazou@adacore.com>
3074 * libgnarl/a-intnam__rtems.ads: Update copyright date.
3075 * libgnarl/s-interr__hwint.adb: Likewise.
3076 * libgnarl/s-osinte__kfreebsd-gnu.ads: Likewise.
3077 * libgnarl/s-osinte__rtems.adb: Likewise.
3078 * libgnarl/s-osinte__rtems.ads: Likewise.
3080 2017-09-13 Nicolas Roche <roche@adacore.com>
3082 * Make-lang.in: In the fallback mechanim, parse the associated .ali
3083 file and try to guess the locations of dependencies.
3085 2017-09-13 Eric Botcazou <ebotcazou@adacore.com>
3087 * sem_ch13.adb (Register_Address_Clause_Check): New procedure to save
3088 the suppression status of Alignment_Check on the current scope.
3089 (Alignment_Checks_Suppressed): New function to use the saved instead of
3090 the current suppression status of Alignment_Check.
3091 (Address_Clause_Check_Record): Add Alignment_Checks_Suppressed field.
3092 (Analyze_Attribute_Definition_Clause): Instead of manually appending to
3093 the table, call Register_Address_Clause_Check.
3094 (Validate_Address_Clauses): Call Alignment_Checks_Suppressed on the
3095 recorded address clause instead of its entity.
3097 2017-09-13 Jerome Guitton <guitton@adacore.com>
3099 * libgnarl/s-tpopsp__vxworks-tls.adb,
3100 libgnarl/s-tpopsp__vxworks-rtp.adb, libgnarl/s-tpopsp__vxworks.adb
3101 (Self): Register thread if task id is null.
3103 2017-09-13 Arnaud Charlet <charlet@adacore.com>
3105 * libgnat/s-htable.adb, libgnat/s-htable.ads: Minor style tuning.
3107 2017-09-13 Arnaud Charlet <charlet@adacore.com>
3109 * lib-xref-spark_specific.adb (Scopes): simplify hash map; now it maps
3110 from an entity to only scope index, as a mapping from an entity to the
3111 same entity was useless.
3112 (Get_Scope_Num): refactor as a simple renaming; rename parameter from N
3114 (Set_Scope_Num): refactor as a simple renaming; rename parameter from N
3116 (Is_Constant_Object_Without_Variable_Input): remove local "Result"
3117 variable, just use return statements.
3119 2017-09-13 Arnaud Charlet <charlet@adacore.com>
3121 * libgnarl/s-vxwext__kernel-smp.adb,
3122 libgnarl/s-tpopsp__vxworks-rtp.adb, libgnarl/s-vxwext__noints.adb:
3125 2017-09-13 Hristian Kirtchev <kirtchev@adacore.com>
3127 * einfo.adb: Flag42 is now Is_Controlled_Active.
3128 (Is_Controlled): This attribute is now synthesized.
3129 (Is_Controlled_Active): This attribute is now an explicit flag rather
3130 than a synthesized attribute. (Set_Is_Controlled): Removed.
3131 (Set_Is_Controlled_Active): New routine.
3132 (Write_Entity_Flags): Update the output for Flag42.
3133 * einfo.ads: Update the documentation of the following attributes:
3134 Disable_Controlled, Is_Controlled, Is_Controlled_Active, Is_Controlled
3135 and Is_Controlled_Active have swapped their functionality.
3136 (Is_Controlled): Renamed to Is_Controlled_Active.
3137 (Is_Controlled_Active): Renamed to Is_Controlled.
3138 (Set_Is_Controlled): Renamed to Set_Is_Controlled_Active.
3139 * exp_ch3.adb (Expand_Freeze_Record_Type): Restore the original use of
3141 * exp_util.adb (Has_Some_Controlled_Component): Code clean up.
3142 (Needs_Finalization): Code clean up. Remove the tests for
3143 Disable_Controlled because a) they were incorrect as they would reject
3144 a type which is sublect to the aspect, but may contain controlled
3145 components, and b) they are no longer necessary.
3146 * exp_util.ads (Needs_Finalization): Update comment on documentation.
3147 * freeze.adb (Freeze_Array_Type): Restore the original use of
3149 (Freeze_Record_Type): Restore the original use of Is_Controlled.
3150 * sem_ch3.adb (Analyze_Object_Declaration): Restore the original use of
3152 (Array_Type_Declaration): Restore the original use of Is_Controlled.
3153 (Build_Derived_Private_Type): Restore the original use of
3155 (Build_Derived_Record_Type): Set the Is_Controlled_Active flag of a
3156 type derived from Ada.Finalization.[Limited_]Controlled.
3157 (Build_Derived_Type): Restore the original use of Is_Controlled.
3158 (Record_Type_Definition): Restore the original use of Is_Controlled.
3159 * sem_ch7.adb (Preserve_Full_Attributes): Restore the original use of
3161 * sem_ch13.adb (Analyze_Aspect_Disable_Controlled): New routine.
3162 (Analyze_Aspect_Specifications): Use routine
3163 Analyze_Aspect_Disable_Controlled to process aspect Disable_Controlled.
3165 2017-09-13 Vincent Celier <celier@adacore.com>
3167 * clean.adb (Gnatclean): Fix error when looking for target
3168 of <target>-gnatclean
3170 2017-09-13 Javier Miranda <miranda@adacore.com>
3171 Ed Schonberg <schonberg@adacore.com>
3173 * sem_ch8.adb (Find_Expanded_Name): Complete code that identifies an
3174 expanded name that designates the current instance of a child unit in
3175 its own body and appears as the prefix of a reference to an entity
3176 local to the child unit.
3178 2017-09-12 Bob Duff <duff@adacore.com>
3180 * sem_warn.adb: Minor comment.
3182 2017-09-12 Bob Duff <duff@adacore.com>
3184 * libgnat/a-cbdlli.adb, libgnat/a-cbhama.adb,
3185 libgnat/a-cbmutr.adb, libgnat/a-cborma.adb: Rename New_Item to
3186 be Default_Initialized_Item, and apply pragma Unmodified to it,
3187 to suppress the warning.
3189 2017-09-12 Eric Botcazou <ebotcazou@adacore.com>
3191 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): Add early return
3194 2017-09-12 Yannick Moy <moy@adacore.com>
3196 * gnat1drv.adb (Adjust_Global_Switches): Consider Refined_Global
3197 together with Global when ignoring one in CodePeer mode.
3199 2017-09-12 Javier Miranda <miranda@adacore.com>
3201 * sem_ch3.adb (Analyze_Declarations): In nested
3202 package declarations that have a private part enable missing check
3203 of the RM rule 13.1.1(11/3): usage names in aspect definitions are
3204 resolved at the end of the immediately enclosing declaration list.
3206 2017-09-12 Bob Duff <duff@adacore.com>
3208 * sem_ch6.adb (Analyze_Expression_Function): Initialize Def_Id to
3211 2017-09-12 Georges-Axel Jaloyan <jaloyan@adacore.com>
3213 * debug.adb: Reserving flag -gnatdF for safe pointer checking.
3214 * gnat1drv.adb (gnat1drv): Adding the call to the analysis on
3216 * sem_spark.adb, sem_spark.ads: Implementation of the analysis,
3217 in preparation for the evolution of the SPARK language that
3218 includes a pointer analysis for checking non-aliasing of access
3219 types. The Check_Safe_Pointers function is the entry point, and
3220 will traverse the AST and raise compile-time errors everytime
3221 it detects non-begign aliasing. Detailed comments are present
3222 in the sem_spark.ads file.
3223 * sem_util.adb, sem_util.ads (First_Global, Next_Global): New
3224 functions to iterate over the list of globals of a subprogram.
3225 * libgnat/system.ads: Add restriction No_Finalization.
3226 * gcc-interface/Make-lang.in: Add new file sem_spark.adb and
3227 dependency on g-dynhta.adb.
3229 2017-09-12 Bob Duff <duff@adacore.com>
3231 * sem_ch6.adb (Analyze_Expression_Function): Call
3232 Check_Dynamically_Tagged_Expression.
3233 * sem_util.adb (Check_Dynamically_Tagged_Expression): Remove
3234 "and then Is_Tagged_Type (Typ)" because there is an earlier
3235 "Assert (Is_Tagged_Type (Typ))".
3237 2017-09-12 Eric Botcazou <ebotcazou@adacore.com>
3239 * gcc-interface/Makefile.in (SPARC/Solaris): Remove obsolete stuff.
3241 2017-09-11 Arnaud Charlet <charlet@adacore.com>
3243 * doc/gnat_ugn/the_gnat_compilation_model.rst: Fix sphinx warning.
3244 * doc/gnat_ugn/platform_specific_information.rst: Remove doc
3245 for no longer supported platforms.
3246 * doc/gnat_ugn/gnat_and_program_execution.rst: Added detailed
3247 description of the semantics for dimensionality analysis.
3248 * gnat_ugn.texi: Regenerated.
3250 2017-09-11 Eric Botcazou <ebotcazou@adacore.com>
3252 * freeze.adb (Has_Incomplete_Compoent): Delete.
3254 Do not inhibit the freezing of the profile of an expression
3256 (Freeze_Subprogram): Do not re-create extra formals.
3257 * sem_ch6.adb (Analyze_Expression_Function): Always
3258 pre-analyze the expression if the function is not a completion.
3259 (Analyze_Subprogram_Body_Helper): For the body generated
3260 from an expression function that is not a completion, do
3261 not freeze the profile and temporary mask the types declared
3262 outside the expression that are not yet frozen.
3263 * sem_res.adb (Rewrite_Renamed_Operator): Also bail out if invoked
3264 during the pre-analysis of an expression function.
3266 2017-09-11 Eric Botcazou <ebotcazou@adacore.com>
3268 * gcc-interface/gigi.h (enum standard_datatypes): Minor tweak.
3271 2017-09-11 Yannick Moy <moy@adacore.com>
3273 * lib-xref-spark_specific.adb: Minor rewrite.
3275 2017-09-11 Jerome Lambourg <lambourg@adacore.com>
3277 * libgnat: Rename ?-[a-z]*-* into ?-[a-z]*__*
3278 * gcc-interface/Makefile.in, gcc-interface/Make-lang.in: Take this
3279 renaming into account.
3281 2017-09-11 Jerome Lambourg <lambourg@adacore.com>
3283 * libgnarl: Rename ?-[a-z]*-* into ?-[a-z]*__*
3284 * gcc-interface/Makefile.in: Take this renaming into account.
3286 2017-09-11 Arnaud Charlet <charlet@adacore.com>
3288 * s-auxdec-empty.ads, s-auxdec-empty.adb, 9drpc.adb: Removed, no
3291 2017-09-11 Yannick Moy <moy@adacore.com>
3293 * sem_util.adb (Check_Result_And_Post_State):
3294 Do not issue a warning about missing reference to an outcome if
3295 the subprogram is ghost and has no outputs.
3296 * lib-xref-spark_specific.adb, sem_aggr.adb, sem_aux.ads: Minor
3299 2017-09-11 Yannick Moy <moy@adacore.com>
3301 * gnat1drv.adb (Adjust_Global_Switches): Set
3302 Check_Validity_Of_Parameters to False in GNATprove mode.
3303 * opt.ads (Check_Validity_Of_Parameters): Document switch to
3306 2017-09-09 Pierre-Marie de Rodat <derodat@adacore.com>
3308 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Don't
3309 generate debug info for inner record types if -fgnat-encodings=minimal.
3310 (gnat_to_gnu_entity) <E_Record_Subtype>: Use the ultimate base record
3311 type as the debug type.
3313 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3315 * gcc-interface/decl.c (components_to_record): Do not reorder in non-
3316 packed record types if pragma Optimize_Alignment (Space) is enabled.
3318 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3320 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Disregard inlining
3321 limits for expression functions.
3322 (gnat_to_gnu) <N_Object_Declaration>: Fix formatting.
3324 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3326 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Copy the
3327 layout of the record from the parent type only if both are or are not
3329 (is_stored_discriminant): Return false for an unchecked union.
3331 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3333 * gcc-interface/utils2.c (build_allocator): In type_annotate_only mode
3336 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3338 * gcc-interface/decl.c (promote_object_alignment): New function taken
3340 (gnat_to_gnu_entity) <E_Variable>: ...here. Invoke it.
3341 (gnat_to_gnu_field): If the field is Atomic or VFA, invoke it and
3342 create a padding type on success before doing the atomic check.
3344 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3346 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Apply the
3347 promotion to static memory earlier in the processing.
3349 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3351 * gcc-interface/decl.c (gnat_to_gnu_entity): Only set the TYPE_ALIGN_OK
3352 and TYPE_BY_REFERENCE_P flags on types after various promotions.
3353 * gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
3354 Consider all kinds of entities.
3356 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3358 * gcc-interface/utils.c (convert): When converting to a padding type,
3359 reuse an existing CONSTRUCTOR if it has got the right size.
3361 2017-09-08 Nicolas Roche <roche@adacore.com>
3363 * gcc-interface/Make-lang.in, gcc-interface/Makefile.in: Find runtime
3365 * a-lfztio.ads, g-timsta.ads, g-sercom-linux.adb, s-osprim-solaris.adb,
3366 a-inteio.ads, s-stchop-rtems.adb, s-casuti.adb, s-pack39.adb,
3367 i-vxwork-x86.ads, a-strbou.adb, a-stzmap.adb, s-assert.adb,
3368 a-sfecin.ads, a-cohama.adb, s-casuti.ads, a-suenco.adb, s-pack39.ads,
3369 a-stzmap.ads, a-strbou.ads, s-stalib.adb, s-trasym.adb, g-comver.adb,
3370 s-assert.ads, s-vector.ads, g-cgi.adb, a-cohama.ads, s-wchcnv.adb,
3371 a-titest.adb, s-pack48.adb, a-suenco.ads, a-strunb.adb, s-stalib.ads,
3372 s-trasym.ads, a-nudira.adb, g-comver.ads, a-nuflra.adb, g-cgi.ads,
3373 a-chacon.adb, s-wchcnv.ads, a-excach.adb, s-pack48.ads, a-titest.ads,
3374 a-strunb.ads, s-dwalin.adb, a-nudira.ads, a-chtgbo.adb, s-resfil.adb,
3375 a-scteio.ads, a-nuflra.ads, g-soliop-mingw.ads, s-pack57.adb,
3376 a-chacon.ads, s-bytswa.ads, s-pooloc.adb, g-os_lib.adb, s-dwalin.ads,
3377 a-szuzha.adb, s-resfil.ads, a-chtgbo.ads, s-spsufi.adb, s-pack57.ads,
3378 s-pooloc.ads, g-os_lib.ads, a-stfiha.ads, a-lcteio.ads, a-wtcoau.adb,
3379 a-szuzha.ads, s-mmosin-unix.adb, a-stmaco.ads, s-spsufi.ads,
3380 s-stchop-limit.ads, a-wtcoau.ads, a-exctra.adb, s-mmosin-unix.ads,
3381 s-sequio.adb, s-conca2.adb, g-table.adb, s-imglli.adb,
3382 a-numaux-x86.adb, a-strsea.adb, s-wchstw.adb, a-clrefi.adb,
3383 a-wwboio.adb, a-exctra.ads, s-sequio.ads, s-conca2.ads, a-wwunio.ads,
3384 system-linux-hppa.ads, g-table.ads, s-dimkio.ads, s-imglli.ads,
3385 a-cofove.adb, a-numaux-x86.ads, s-wchstw.ads, a-strsea.ads,
3386 a-clrefi.ads, a-wwboio.ads, s-stratt-xdr.adb, s-crc32.adb,
3387 s-excmac-arm.adb, g-busora.adb, a-cofove.ads, s-osprim-unix.adb,
3388 g-io.adb, s-pack49.adb, s-crc32.ads, s-excmac-arm.ads, a-fzteio.ads,
3389 g-busora.ads, s-stausa.adb, system-linux-mips.ads, sequenio.ads,
3390 g-exctra.adb, g-rewdat.adb, a-cgaaso.adb, g-io.ads, s-pack49.ads,
3391 a-wtflau.adb, a-undesu.adb, s-stausa.ads, a-ztenau.adb, g-enutst.ads,
3392 calendar.ads, s-pack58.adb, g-rewdat.ads, g-exctra.ads, s-ststop.adb,
3393 a-cgaaso.ads, a-strfix.adb, a-comlin.adb, a-strunb-shared.adb,
3394 a-wtflau.ads, a-undesu.ads, a-cbhase.adb, a-ztenau.ads, s-os_lib.adb,
3395 a-coorse.adb, a-chlat1.ads, s-pack58.ads, s-ststop.ads, a-strfix.ads,
3396 a-comlin.ads, a-strunb-shared.ads, a-nscefu.ads, s-valboo.adb,
3397 directio.ads, a-chtgke.adb, a-cbhase.ads, a-wtinau.adb,
3398 system-linux-alpha.ads, s-os_lib.ads, a-coorse.ads,
3399 system-linux-s390.ads, s-imgwiu.adb, a-chtgop.adb, s-valboo.ads,
3400 a-chtgke.ads, a-tienio.adb, s-conca3.adb, a-wtinau.ads,
3401 system-darwin-ppc.ads, i-c.adb, s-expllu.adb, g-expect.adb,
3402 g-sha256.ads, s-vallld.adb, s-imgwiu.ads, a-chtgop.ads, a-strmap.adb,
3403 a-tienio.ads, s-conca3.ads, s-imgint.adb, i-c.ads, s-expllu.ads,
3404 s-osprim-darwin.adb, a-cogeso.adb, g-expect.ads, a-iwteio.ads,
3405 s-vallld.ads, a-coinho-shared.adb, g-shsh64.adb, a-strmap.ads,
3406 g-comlin.adb, a-excpol.adb, s-imgint.ads, a-ztdeau.adb, a-cogeso.ads,
3407 a-coinho-shared.ads, g-shsh64.ads, g-comlin.ads, a-stzsup.adb,
3408 a-rbtgbk.adb, a-wtmoau.adb, a-ztdeau.ads, s-exnlli.adb, g-tty.adb,
3409 g-heasor.adb, g-socthi-dummy.adb, s-llflex.ads, a-zchara.ads,
3410 a-stzsup.ads, a-ztcstr.adb, a-rbtgbk.ads, a-sfwtio.ads, a-wtmoau.ads,
3411 a-sulcin.adb, s-exnlli.ads, system-freebsd.ads, a-stunha.adb,
3412 a-charac.ads, g-tty.ads, g-heasor.ads, s-exctra.adb,
3413 g-socthi-dummy.ads, a-coboho.adb, a-ztcstr.ads, a-tideio.adb,
3414 a-sulcin.ads, a-wrstfi.adb, g-alleve.adb, s-pack59.adb, a-ngrear.adb,
3415 a-stboha.adb, a-stunau-shared.adb, a-stunha.ads, a-lfwtio.ads,
3416 s-fileio.adb, s-exctra.ads, a-coboho.ads, a-ioexce.ads, a-tideio.ads,
3417 a-ngrear.ads, a-wrstfi.ads, s-pack59.ads, g-alleve.ads, a-stboha.ads,
3418 s-poosiz.adb, g-traceb.adb, g-rannum.adb, machcode.ads, s-purexc.ads,
3419 s-fileio.ads, a-cfinve.adb, a-crbtgk.adb, system-solaris-x86.ads,
3420 s-poosiz.ads, g-rannum.ads, g-traceb.ads, a-except.adb, s-conca4.adb,
3421 a-stream.adb, a-cfinve.ads, a-crbtgk.ads, s-wchwts.adb,
3422 system-mingw.ads, a-except.ads, s-conca4.ads, a-chzla9.ads,
3423 s-valenu.adb, s-soflin.adb, a-stream.ads, a-cgarso.adb, s-valllu.adb,
3424 g-crc32.adb, s-wchwts.ads, s-fatflt.ads, s-imguns.adb, s-strcom.adb,
3425 g-decstr.adb, s-valenu.ads, s-soflin.ads, a-cgarso.ads, a-cwila1.ads,
3426 s-valllu.ads, g-crc32.ads, s-imguns.ads, g-spipat.adb, s-valwch.adb,
3427 s-strcom.ads, g-decstr.ads, text_io.ads, g-debuti.adb, s-stchop.adb,
3428 g-spipat.ads, s-valwch.ads, a-string.ads, s-exnint.adb, g-awk.adb,
3429 g-tasloc.adb, s-wwdenu.adb, s-boustr.adb, a-zchuni.adb, s-stchop.ads,
3430 g-debuti.ads, s-stopoo.adb, system-dragonfly-x86_64.ads,
3431 system-linux-x86.ads, s-exnint.ads, g-awk.ads, a-stzhas.adb,
3432 g-tasloc.ads, s-wwdenu.ads, g-debpoo.adb, g-except.ads,
3433 g-sse.ads, s-boustr.ads, a-zchuni.ads, s-bitops.adb, s-wwdwch.adb,
3434 s-stopoo.ads, a-catizo.adb, a-stzhas.ads, a-nlcefu.ads, g-debpoo.ads,
3435 i-vxwoio.adb, s-bitops.ads, g-io-put-vxworks.adb, s-wwdwch.ads,
3436 g-sehamd.adb, a-ssicst.adb, a-catizo.ads, s-mmap.adb, g-string.adb,
3437 s-traceb.adb, a-swunau.adb, s-rannum.adb, a-ticoau.adb, i-vxwoio.ads,
3438 g-sehamd.ads, a-stwiun.adb, a-ssicst.ads, s-conca5.adb, a-ssitio.ads,
3439 s-mmap.ads, a-zttest.adb, g-string.ads, g-sercom.adb, a-cdlili.adb,
3440 a-swunau.ads, s-traceb.ads, s-rannum.ads, a-ticoau.ads, system-aix.ads,
3441 a-cforma.adb, a-stwiun.ads, s-conca5.ads, s-carsi8.adb, a-zttest.ads,
3442 g-sercom.ads, a-cdlili.ads, a-cihama.adb, g-sptain.ads, a-cforma.ads,
3443 s-maccod.ads, s-carsi8.ads, a-strsup.adb, g-sha1.adb, a-cihama.ads,
3444 g-stseme.adb, s-traent.adb, s-valcha.adb, g-curexc.ads, a-strsup.ads,
3445 g-sha1.ads, a-sflcin.ads, s-traent.ads, s-pack10.adb, s-valcha.ads,
3446 a-coteio.ads, s-tasloc.adb, g-utf_32.adb, a-suteio.adb, s-except.adb,
3447 a-direct.adb, g-stsifd-sockets.adb, a-numaux-vxworks.ads, s-winext.ads,
3448 s-pack10.ads, a-ztexio.adb, a-tiflau.adb, system-vxworks-arm.ads,
3449 s-tasloc.ads, a-suteio.ads, g-utf_32.ads, s-except.ads,
3450 a-direct.ads, a-swbwha.adb, g-hesorg.adb, s-wwdcha.adb, a-wtedit.adb,
3451 a-ztexio.ads, a-wtcoio.adb, a-tiflau.ads, a-ssizti.ads, s-casi32.adb,
3452 a-swbwha.ads, s-veboop.adb, g-hesorg.ads, s-parame-rtems.adb,
3453 s-wwdcha.ads, a-wtedit.ads, a-stuten.adb, a-coinve.adb, a-wtcoio.ads,
3454 s-casi32.ads, s-string.adb, a-tiinau.adb, a-cusyqu.adb, s-conca6.adb,
3455 s-veboop.ads, a-cgcaso.adb, a-numaux-darwin.adb, a-envvar.adb,
3456 a-stuten.ads, s-secsta.adb, a-coinve.ads, s-string.ads, a-cusyqu.ads,
3457 a-tiinau.ads, s-osprim-vxworks.adb, s-conca6.ads, g-spchge.adb,
3458 s-parint.adb, a-cuprqu.adb, a-cgcaso.ads, a-numaux-darwin.ads,
3459 a-envvar.ads, s-secsta.ads, g-spchge.ads, s-parint.ads, a-cuprqu.ads,
3460 a-swuwti.adb, a-flteio.ads, a-sbhcin.adb, a-coprnu.adb, g-u3spch.adb,
3461 s-atocou.adb, g-ctrl_c.adb, a-swuwti.ads, a-calend.adb, a-sbhcin.ads,
3462 a-coprnu.ads, g-dirope.adb, g-sha512.ads, g-u3spch.ads, s-atocou.ads,
3463 g-ctrl_c.ads, a-timoau.adb, a-witeio.adb, s-pack11.adb, a-strhas.adb,
3464 a-wtflio.adb, g-spitbo.adb, a-calend.ads, a-ztenio.adb, g-dirope.ads,
3465 a-slcain.adb, g-sechas.adb, a-timoau.ads, a-witeio.ads, s-pack11.ads,
3466 s-shasto.adb, s-traceb-mastop.adb, a-ciorse.adb, s-utf_32.adb,
3467 a-strhas.ads, a-wtflio.ads, g-spitbo.ads, a-ztenio.ads, a-slcain.ads,
3468 g-sechas.ads, s-gearop.adb, a-siztio.ads, s-pack20.adb, s-shasto.ads,
3469 a-ciorse.ads, s-utf_32.ads, s-crtl.ads, a-wtinio.adb, s-elaall.adb,
3470 s-explli.adb, s-chepoo.ads, s-gearop.ads, a-einuoc.adb, s-pack20.ads,
3471 system-linux-ia64.ads, a-swunau-shared.adb, a-wtinio.ads, g-alvety.ads,
3472 a-liztio.ads, g-calend.adb, s-conca7.adb, s-elaall.ads, s-explli.ads,
3473 a-einuoc.ads, s-widboo.adb, s-imgdec.adb, a-cbhama.adb, g-calend.ads,
3474 s-conca7.ads, a-llitio.ads, i-cexten.ads, a-coorma.adb, s-widboo.ads,
3475 s-diflio.adb, g-souinf.ads, s-imgdec.ads, g-strhas.ads, a-cbhama.ads,
3476 g-shshco.adb, a-ztdeio.adb, s-gloloc.adb, a-coorma.ads, g-wispch.adb,
3477 s-pack03.adb, g-eacodu.adb, s-casi16.adb, s-diflio.ads, a-colien.adb,
3478 g-shshco.ads, a-wtmoio.adb, a-rbtgbo.adb, a-ztdeio.ads,
3479 system-rtems.ads, s-gloloc.ads, a-csquin.ads, a-cofuse.adb,
3480 g-wispch.ads, s-pack03.ads, s-casi16.ads, s-io.adb, a-colien.ads,
3481 g-alveop.adb, gnat.ads, s-diinio.adb, a-cfdlli.adb, g-pehage.adb,
3482 a-wtmoio.ads, a-stwiha.adb, a-locale.adb, a-tirsfi.adb, a-nscoty.ads,
3483 a-rbtgbo.ads, s-pack12.adb, a-cofuse.ads, a-sfteio.ads, s-io.ads,
3484 g-alveop.ads, a-cfdlli.ads, s-diinio.ads, a-stwiha.ads, g-pehage.ads,
3485 a-locale.ads, a-tirsfi.ads, s-pack12.ads, s-valuti.adb, g-cppexc.adb,
3486 system-vxworks-ppc.ads, g-memdum.adb, a-lfteio.ads, s-pack21.adb,
3487 s-unstyp.ads, s-valuti.ads, g-cppexc.ads, system-hpux-ia64.ads,
3488 g-memdum.ads, g-soccon.ads, g-altive.ads, a-crbtgo.adb, s-pack21.ads,
3489 a-llizti.ads, a-numaux-libc-x86.ads, s-expint.adb, s-conca8.adb,
3490 a-crbtgo.ads, s-pack30.adb, s-vallli.adb, s-geveop.adb, s-expint.ads,
3491 a-direio.adb, s-conca8.ads, a-widcha.ads, s-pack30.ads, s-vallli.ads,
3492 s-strhas.adb, s-geveop.ads, g-md5.adb, a-direio.ads, a-numaux.ads,
3493 s-ransee.adb, a-szbzha.adb, i-cobol.adb, g-busorg.adb, s-strhas.ads,
3494 g-md5.ads, s-widenu.adb, s-ransee.ads, s-widllu.adb, a-szbzha.ads,
3495 a-ststio.adb, i-cobol.ads, g-busorg.ads, g-regpat.adb, s-widenu.ads,
3496 a-secain.adb, s-widllu.ads, s-pack13.adb, g-encstr.adb, a-ztcoau.adb,
3497 a-ststio.ads, s-widwch.adb, g-regpat.ads, s-atacco.adb, a-cborse.adb,
3498 a-secain.ads, s-pack13.ads, g-encstr.ads, a-ztcoau.ads, s-widwch.ads,
3499 g-io_aux.adb, s-atacco.ads, a-ncelfu.ads, interfac.ads, a-cborse.ads,
3500 g-regexp.adb, s-pack22.adb, a-szuzti.adb, g-io_aux.ads, s-caun32.adb,
3501 a-nselfu.ads, g-regexp.ads, s-pack22.ads, a-ticoio.adb, a-szuzti.ads,
3502 g-diopit.adb, s-caun32.ads, s-conca9.adb, a-tags.adb, a-swmwco.ads,
3503 a-sbecin.adb, s-pack31.adb, s-expuns.adb, a-ticoio.ads, s-valint.adb,
3504 s-conca9.ads, g-diopit.ads, a-tags.ads, a-nllcef.ads, a-izteio.ads,
3505 a-sbecin.ads, s-expuns.ads, s-pack31.ads, g-dyntab.adb, s-powtab.ads,
3506 s-flocon-none.adb, s-valint.ads, a-ssiwti.ads, s-mmosin-mingw.adb,
3507 s-pack40.adb, s-pack05.adb, a-ztflau.adb, g-dyntab.ads,
3508 a-szuzti-shared.adb, g-alvevi.ads, a-stwise.adb, s-mmosin-mingw.ads,
3509 s-pack40.ads, a-diocst.adb, a-ztflau.ads, s-pack05.ads, a-nlcoty.ads,
3510 a-contai.ads, a-stwisu.adb, g-byorma.adb, a-siwtio.ads, a-stwise.ads,
3511 s-regpat.adb, g-mbdira.adb, s-pack14.adb, a-diocst.ads, g-flocon.ads,
3512 g-mbflra.adb, a-ztinau.adb, s-dim.ads, s-mantis.adb, a-stwisu.ads,
3513 g-byorma.ads, s-atopri.adb, g-wistsp.ads, a-uncdea.ads, s-widcha.adb,
3514 a-caldel.adb, s-regpat.ads, g-mbdira.ads, a-tiflio.adb, s-pack14.ads,
3515 s-parame.adb, a-liwtio.ads, s-memory.adb, g-mbflra.ads, a-ztinau.ads,
3516 a-wtgeau.adb, s-direio.adb, s-mantis.ads, s-atopri.ads, s-widcha.ads,
3517 a-caldel.ads, s-pack23.adb, a-unccon.ads, a-tiflio.ads, s-parame.ads,
3518 a-llftio.ads, s-memory.ads, s-regexp.adb, a-wtgeau.ads, a-exexda.adb,
3519 s-direio.ads, s-pack23.ads, g-stheme.adb, a-tiinio.adb, g-sestin.ads,
3520 s-regexp.ads, a-wtfiio.adb, a-comutr.adb, a-exexpr.adb, a-tiinio.ads,
3521 a-ztmoau.adb, a-cohata.ads, a-wtfiio.ads, s-imgrea.adb, ada.ads,
3522 a-szunau-shared.adb, a-comutr.ads, s-valuns.adb, a-ztmoau.ads,
3523 system-linux-arm.ads, s-osprim-x32.adb, s-pack41.adb, s-pack06.adb,
3524 s-imgrea.ads, s-valuns.ads, s-finroo.adb, s-caun16.adb, s-pooglo.adb,
3525 a-zrstfi.adb, a-suenst.adb, s-pack41.ads, g-binenv.adb, s-pack06.ads,
3526 a-calari.adb, a-nlcoar.ads, s-finroo.ads, a-timoio.adb, s-caun16.ads,
3527 s-flocon.adb, a-suenst.ads, a-zrstfi.ads, s-pooglo.ads, s-wchcon.adb,
3528 s-traceb-hpux.adb, s-pack50.adb, i-fortra.adb, s-pack15.adb,
3529 a-ngcefu.adb, g-sptavs.ads, g-binenv.ads, s-wchjis.adb, a-calari.ads,
3530 a-timoio.ads, a-decima.adb, s-flocon.ads, s-wchcon.ads, a-llfzti.ads,
3531 i-fortra.ads, s-pack50.ads, s-pack15.ads, a-ngcefu.ads, a-cfhase.adb,
3532 s-wchjis.ads, g-soliop.ads, a-decima.ads, a-chlat9.ads, s-pack24.adb,
3533 a-nlelfu.ads, a-cfhase.ads, g-locfil.adb, s-atocou-builtin.adb,
3534 s-memcop.ads, a-szunau.adb, s-pack24.ads, s-imgllb.adb, s-auxdec.adb,
3535 g-locfil.ads, s-pack33.adb, a-szunau.ads, s-parame-vxworks.adb,
3536 s-imgllb.ads, a-ciorma.adb, s-auxdec.ads, a-cobove.adb, s-dsaser.ads,
3537 a-elchha.adb, s-pack33.ads, a-cofuve.adb, s-parame-vxworks.ads,
3538 a-ciorma.ads, system-darwin-x86.ads, s-multip.adb, a-stwiun-shared.adb,
3539 a-wichun.adb, a-cobove.ads, s-imgbiu.adb, s-tsmona-mingw.adb,
3540 a-coormu.adb, a-siocst.adb, s-win32.ads, a-elchha.ads, s-pack42.adb,
3541 s-pack07.adb, a-cofuve.ads, system-hpux.ads, a-teioed.adb,
3542 a-convec.adb, g-speche.adb, s-multip.ads, a-stwiun-shared.ads,
3543 a-wichun.ads, s-imgbiu.ads, a-numeri.ads, a-siocst.ads, a-coormu.ads,
3544 a-lliwti.ads, s-pack42.ads, s-pack07.ads, a-teioed.ads, a-convec.ads,
3545 g-speche.ads, g-socthi.adb, a-nucoty.ads, a-szmzco.ads, s-pack51.adb,
3546 s-osprim-mingw.adb, s-casi64.adb, g-strspl.ads, g-socthi.ads,
3547 g-socket-dummy.adb, s-pack51.ads, s-dimmks.ads, s-casi64.ads,
3548 a-wtenau.adb, s-stchop-vxworks.adb, s-pack60.adb,
3549 system-solaris-sparc.ads, s-pack25.adb, g-socket-dummy.ads,
3550 a-exstat.adb, a-cofuma.adb, s-tsmona-linux.adb, a-wtenau.ads,
3551 s-pack60.ads, s-pack25.ads, i-cstrea.adb, a-cofuma.ads, g-exptty.adb,
3552 a-chzla1.ads, s-pack34.adb, i-cstrea.ads, s-excdeb.adb, a-iteint.ads,
3553 g-exptty.ads, i-pacdec.adb, s-pack34.ads, s-rident.ads, s-sopco3.adb,
3554 i-vxwork.ads, s-excdeb.ads, system-linux-ppc.ads, a-swuwti-shared.adb,
3555 s-widlli.adb, s-pack43.adb, i-pacdec.ads, a-cwila9.ads, s-sopco3.ads,
3556 a-fwteio.ads, s-widlli.ads, s-pack43.ads, a-suhcin.adb, a-wtdeau.adb,
3557 g-allein.ads, a-suezst.adb, a-dirval-mingw.adb, g-zspche.adb,
3558 s-bignum.adb, a-ztedit.adb, g-regist.adb, a-nllefu.ads, a-ztcoio.adb,
3559 s-pack52.adb, a-llctio.ads, a-nucoar.ads, s-pack17.adb, a-suhcin.ads,
3560 a-wtdeau.ads, a-suezst.ads, a-dirval.adb, g-zspche.ads, g-regist.ads,
3561 a-ztedit.ads, s-bignum.ads, a-wtcstr.adb, system.ads, s-pack52.ads,
3562 a-ztcoio.ads, s-pack17.ads, s-imgboo.adb, a-rbtgso.adb, a-dirval.ads,
3563 a-cohase.adb, s-pack61.adb, a-wtcstr.ads, s-pack26.adb, s-osprim.ads,
3564 a-tigeau.adb, s-imgboo.ads, a-nuelfu.ads, a-swfwha.ads, s-commun.adb,
3565 g-socthi-vxworks.adb, a-rbtgso.ads, a-cohase.ads, g-zstspl.ads,
3566 s-pack61.ads, s-pack26.ads, a-intnam-dragonfly.ads, s-imglld.adb,
3567 a-tigeau.ads, s-commun.ads, g-socthi-vxworks.ads, a-cborma.adb,
3568 a-stwifi.adb, g-moreex.adb, s-pack35.adb, s-imglld.ads, s-valdec.adb,
3569 a-tifiio.adb, a-cborma.ads, g-moreex.ads, a-stwifi.ads, s-pack35.ads,
3570 s-sopco4.adb, g-sha224.ads, g-socket.adb, a-intnam-rtems.ads,
3571 s-finmas.adb, s-valdec.ads, s-addima.adb, a-finali.adb, a-tifiio.ads,
3572 s-rpc.adb, a-ztflio.adb, s-pack44.adb, s-pack09.adb, a-sblcin.adb,
3573 s-sopco4.ads, a-textio.adb, g-socket.ads, g-sptabo.ads, s-finmas.ads,
3574 g-shsh32.adb, s-addima.ads, a-finali.ads, s-mmauni-long.ads, s-rpc.ads,
3575 a-ztflio.ads, system-djgpp.ads, s-stache.adb, s-pack44.ads,
3576 s-pack09.ads, a-sblcin.ads, a-textio.ads, a-cidlli.adb, g-shsh32.ads,
3577 a-chtgbk.adb, a-tiocst.adb, s-pack53.adb, s-pack18.adb, s-stache.ads,
3578 a-zchhan.adb, s-fatlfl.ads, a-ztinio.adb, s-strops.adb, a-siteio.ads,
3579 a-cidlli.ads, a-chtgbk.ads, g-ssvety.ads, a-tiocst.ads, s-pack53.ads,
3580 s-parame-hpux.ads, s-pack18.ads, a-zchhan.ads, s-strops.ads,
3581 a-ztinio.ads, a-wichha.adb, a-stwima.adb, a-nlrear.ads, a-liteio.ads,
3582 s-pack62.adb, s-pack27.adb, s-fore.adb, s-vercon.adb, a-wichha.ads,
3583 a-stwima.ads, s-pack62.ads, system-linux-sparc.ads, s-pack27.ads,
3584 g-dynhta.adb, s-fore.ads, s-vercon.ads, a-cofuba.adb, a-cimutr.adb,
3585 i-cpoint.adb, s-imgenu.adb, a-stwibo.adb, s-pack36.adb, i-cstrin.adb,
3586 s-imgllu.adb, a-suteio-shared.adb, g-excact.adb, s-stoele.adb,
3587 s-addope.adb, g-dynhta.ads, a-cofuba.ads, a-ztmoio.adb, a-llfwti.ads,
3588 a-cimutr.ads, i-cpoint.ads, s-imgenu.ads, a-stwibo.ads, a-wttest.adb,
3589 s-pack36.ads, a-tgdico.ads, s-sopco5.adb, s-scaval.adb, i-cstrin.ads,
3590 s-imgllu.ads, g-excact.ads, s-stoele.ads, g-deutst.ads, s-addope.ads,
3591 s-imgwch.adb, g-sha384.ads, a-ztmoio.ads, s-pack45.adb, a-wttest.ads,
3592 s-sopco5.ads, s-excmac-gcc.adb, s-scaval.ads, a-storio.adb,
3593 a-coinho.adb, a-btgbso.adb, s-imgwch.ads, s-carun8.adb, memtrack.adb,
3594 s-pack45.ads, a-sfhcin.ads, s-excmac-gcc.ads, a-storio.ads,
3595 a-coinho.ads, a-btgbso.ads, s-stratt.adb, s-carun8.ads, a-shcain.adb,
3596 s-pack54.adb, s-pack19.adb, a-colire.adb, a-tigeli.adb, s-caun64.adb,
3597 s-stratt.ads, s-fatgen.adb, a-shcain.ads, a-stzunb-shared.adb,
3598 s-pack54.ads, s-pack19.ads, a-colire.ads, a-calcon.adb, s-caun64.ads,
3599 s-fatgen.ads, s-pack63.adb, g-arrspl.adb, a-stzunb-shared.ads,
3600 s-pack28.adb, a-nllrar.ads, a-zzboio.adb, a-zzunio.ads, a-stunau.adb,
3601 a-calcon.ads, g-cgideb.adb, s-objrea.adb, s-mastop.adb, a-tienau.adb,
3602 g-altcon.adb, g-arrspl.ads, s-pack63.ads, s-restri.adb, s-pack28.ads,
3603 a-zzboio.ads, a-stunau.ads, g-cgideb.ads, g-htable.adb, g-sothco.adb,
3604 s-objrea.ads, g-soliop-solaris.ads, s-mastop.ads, a-tienau.ads,
3605 system-linux-m68k.ads, g-altcon.ads, s-dmotpr.ads, s-memory-mingw.adb,
3606 g-cgicoo.adb, s-pack37.adb, s-restri.ads, s-fatllf.ads, s-expmod.adb,
3607 a-swuwha.adb, a-exextr.adb, a-cfhama.adb, s-gloloc-mingw.adb,
3608 a-tiboio.adb, g-forstr.adb, g-sothco.ads, a-stzbou.adb, a-nllcty.ads,
3609 a-suecin.adb, g-htable.ads, s-exctab.adb, a-tiunio.ads, g-cgicoo.ads,
3610 s-osprim-posix.adb, s-pack37.ads, a-ciormu.adb, s-atocou-x86.adb,
3611 a-swuwha.ads, s-expmod.ads, a-cfhama.ads, s-ficobl.ads, a-ngcoty.adb,
3612 g-forstr.ads, a-tiboio.ads, a-calfor.adb, a-stzbou.ads, a-suecin.ads,
3613 a-conhel.adb, a-crbltr.ads, s-exctab.ads, a-dhfina.ads, s-imgcha.adb,
3614 s-pack46.adb, a-ciormu.ads, system-linux-sh4.ads, a-chahan.adb,
3615 a-ngcoty.ads, a-stzunb.adb, a-szfzha.ads, a-calfor.ads, a-cbdlli.adb,
3616 a-conhel.ads, s-imgcha.ads, s-pack46.ads, a-assert.adb, a-chahan.ads,
3617 a-stzunb.ads, a-crdlli.adb, s-pack55.adb, a-cbdlli.ads, a-tideau.adb,
3618 a-assert.ads, ioexcept.ads, s-boarop.ads, g-hesora.adb, a-crdlli.ads,
3619 s-pack55.ads, a-tideau.ads, g-bubsor.adb, a-wtenio.adb, a-cbsyqu.adb,
3620 g-hesora.ads, s-pack29.adb, a-nurear.ads, g-catiio.adb, s-stposu.adb,
3621 g-bubsor.ads, a-wtenio.ads, a-cbsyqu.ads, a-suewst.adb,
3622 system-vxworks-x86.ads, s-pack29.ads, a-cbmutr.adb, a-cbprqu.adb,
3623 s-imenne.adb, g-sothco-dummy.adb, g-casuti.adb, g-catiio.ads,
3624 s-stposu.ads, a-stzsea.adb, s-pack38.adb, a-suewst.ads, s-imgllw.adb,
3625 a-cbprqu.ads, a-cbmutr.ads, s-imenne.ads, g-sothco-dummy.ads,
3626 g-casuti.ads, s-htable.adb, s-fatsfl.ads, g-trasym.adb, unchconv.ads,
3627 a-stzsea.ads, s-arit64.adb, s-pack38.ads, a-nllcar.ads, s-valrea.adb,
3628 s-imgllw.ads, s-htable.ads, a-sequio.adb, g-trasym.ads, a-ngcoar.adb,
3629 s-exnllf.adb, s-pack47.adb, s-arit64.ads, g-sercom-mingw.adb,
3630 s-valrea.ads, g-socthi-mingw.adb, g-bytswa.adb, g-sehash.adb,
3631 unchdeal.ads, a-sequio.ads, a-ngcoar.ads, s-exnllf.ads, a-wtdeio.adb,
3632 s-pack47.ads, g-socthi-mingw.ads, a-excpol-abort.adb, a-ztgeau.adb,
3633 g-bytswa.ads, g-sehash.ads, s-pack56.adb, a-wtdeio.ads, a-ngelfu.adb,
3634 a-ztgeau.ads, a-cforse.adb, s-filatt.ads, a-stzfix.adb, a-cihase.adb,
3635 s-pack56.ads, a-sfztio.ads, a-ngelfu.ads, s-trasym-dwarf.adb,
3636 a-cforse.ads, a-ztfiio.adb, g-timsta.adb, a-stzfix.ads, a-cihase.ads,
3637 a-ztfiio.ads, system-darwin-arm.ads: Move non-tasking runtime sources
3638 to libgnat subdirectory.
3640 2017-09-08 Yannick Moy <moy@adacore.com>
3642 * sem_aux.adb, sem_aux.ads (Get_Called_Entity): New function to
3643 return the entity associated with the call.
3644 * sem_util.adb, sem_util.ads (Check_Function_Writable_Actuals):
3645 Replace the internal Get_Function_Id with the new
3646 Sem_Aux.Get_Called_Entity.
3647 (Iterate_Call_Parameters): New
3648 procedure to iterate on formals and actuals at the same time.
3649 * sem_ch12.adb (Analyze_Subprogram_Instantiation):
3650 Set SPARK_Mode from spec when set, for analysis
3651 of instance. Restore after analysis of instance.
3652 (Instantiate_Subprogram_Body): Set SPARK_Mode from body when
3653 set, for analysis of body instance. Restored automatically at
3654 the end of the subprogram.
3655 * gnat1drv.adb (Adjust_Global_Switches): Set
3656 Check_Validity_Of_Parameters to False in GNATprove mode.
3657 * opt.ads (Check_Validity_Of_Parameters): Document switch to
3660 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3662 * sem_util.adb (NCT_Tables_In_Use): Move to library level from...
3663 (New_Copy_Tree): ...there. Reset the hash tables only if they
3664 were used in the previous invocation.
3665 * s-htable.adb: Fix typo.
3667 2017-09-08 Bob Duff <duff@adacore.com>
3669 * a-ssicst.adb (Open): Set File.Last_Op to the appropriate value.
3671 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3673 * sem_aggr.adb: minor style fix.
3675 2017-09-08 Bob Duff <duff@adacore.com>
3677 * sprint.adb (Write_Corresponding_Source): Ignore if there is
3678 no current source file.
3679 (Write_Name_With_Col_Check, Write_Name_With_Col_Check_Sloc):
3680 Print something helpful in case N is invalid.
3681 * sprint.ads: Minor comment fix.
3683 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3685 * exp_aggr.adb: (Aggr_Assignment_OK_For_Backend): Add early return for
3688 2017-09-08 Bob Duff <duff@adacore.com>
3690 * par-prag.adb, sem_prag.adb, snames.ads-tmpl: Implement pragma
3691 Ada_2020, along the same lines as the other Ada version pragmas.
3693 2017-09-08 Gary Dismukes <dismukes@adacore.com>
3695 * sem_ch12.adb: Minor typo fixes and reformatting.
3697 2017-09-08 Yannick Moy <moy@adacore.com>
3699 * sem_aggr.adb (Resolve_Record_Aggregate):
3700 Rewrite bounds of aggregate subexpressions which may depend on
3701 discriminants of the enclosing aggregate.
3703 2017-09-08 Yannick Moy <moy@adacore.com>
3705 * sem_ch5.adb: Prevent assertion failure on illegal code.
3707 2017-09-08 Yannick Moy <moy@adacore.com>
3709 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs.Is_SPARK_Scope): Avoid
3710 calling Renamed_Entity on an entity which cannot be a renaming.
3712 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3714 * exp_aggr.adb: Add with & use clause for Urealp.
3715 (Aggr_Assignment_OK_For_Backend): Accept (almost all)
3716 elementary types instead of just discrete types.
3717 * sem_eval.adb (Expr_Value): Deal with N_Null for access types.
3718 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>:
3719 Be prepared for the FP zero value in the memset case. Add small
3722 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3724 * s-htable.adb (Static_HTable.Reset): Use aggregate instead
3727 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
3729 * exp_aggr.adb (Expand_Array_Aggregate): Use New_Copy_Tree instead
3730 of New_Copy because the latter leaves the syntactic structure of
3731 the tree inconsistent (a child is accessible through two parents)
3732 and prevents proper replication of itypes by subsequent calls
3734 * exp_ch4.adb (Expand_Concatenate): Use New_Copy_Tree instead of
3735 New_Copy because the latter leaves the syntactic structure of the
3736 tree inconsistent (a child is accessible through two parents)
3737 and prevents proper replication of itypes by subsequent calls
3739 * sem_util.adb (In_Subtree): New routine.
3740 (New_Copy_Tree): Reimplemented.
3741 * sem_util.ads (In_Subtree): New routine.
3742 (New_Copy_Tree): Reimplemented.
3744 2017-09-08 Ed Schonberg <schonberg@adacore.com>
3746 * sem_ch13.adb (Resolve_Aspect_Expressions): The expression
3747 for aspect Default_Value is a static scalar value, but it does
3748 not freeze the type. Yhis allows for subsequent representation
3749 clauses for the type.
3751 2017-09-08 Javier Miranda <miranda@adacore.com>
3753 * sem_ch8.adb (Find_Direct_Name.Undefined): Do
3754 not add entries into the undefined reference table when we are
3755 compiling with errors ignored.
3757 2017-09-08 Ed Schonberg <schonberg@adacore.com>
3759 * sem_ch12.adb (Check_Formal_Packages): Do not apply conformance
3760 check if the instance is within an enclosing instance body. The
3761 formal package was legal in the enclosing generic, and is
3762 legal in the enclosing instantiation. This optimisation may be
3763 applicable elsewhere, and it also removes spurious errors that
3764 may arise with on-the-fly processing of instantiations that
3765 contain Inline_Always subprograms.
3767 2017-09-08 Vincent Celier <celier@adacore.com>
3769 * gnatcmd.adb: Disregard empty argument of GNAT driver.
3771 2017-09-08 Justin Squirek <squirek@adacore.com>
3773 * checks.adb (Insert_Valid_Check): Manually decorate
3774 the generated temporary for range valdity checks.
3776 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3778 * usage.adb (Usage): Document new -gnatw.q/-gnatw.Q switches.
3780 2017-09-08 Justin Squirek <squirek@adacore.com>
3782 * switch-c.adb (Scan_Front_End_Switches): Add new warning switch
3783 case to handle underscore flags.
3784 * warnsw.adb, warnsw.ads (Set_Underscore_Warning_Switch): Create
3785 new procedure to handle underscores.
3787 2017-09-08 Javier Miranda <miranda@adacore.com>
3789 * exp_ch4.adb (Expand_N_Op_Divide): Reordering code that handles
3790 divisions with fixed point results to avoid generating twice
3791 the runtime check on divide by zero.
3792 * checks.adb (Apply_Divide_Checks): Ensure that operands are
3793 not evaluated twice (once for their runtime checks and once for
3794 their regular computation).
3796 2017-09-08 Yannick Moy <moy@adacore.com>
3798 * sem_prag.adb (Analyze_Part_Of): Add missing
3799 return statements after issuing errors. Add detection of
3800 out-of-order item and single concurrent type.
3802 2017-09-08 Nicolas Roche <roche@adacore.com>
3804 * gcc-interface/Makefile.in, a-extiti.ads, s-taprop-linux.adb,
3805 s-osinte-solaris.adb, a-intnam.ads, s-osinte-solaris.ads,
3806 s-tpobop.adb, s-intman-android.adb, s-tasinf.adb, s-tpobop.ads,
3807 s-tasinf.ads, i-vxinco.adb, a-exetim-posix.adb, i-vxinco.ads,
3808 a-astaco.adb, a-astaco.ads, s-tporft.adb, s-tpoaal.adb, a-taside.adb,
3809 a-taside.ads, s-tpopsp-posix.adb, s-tasdeb.adb, s-tasdeb.ads,
3810 s-tpoben.adb, a-dinopr.ads, s-inmaop-vxworks.adb, s-tpoben.ads,
3811 s-interr-vxworks.adb, s-interr-dummy.adb, s-tassta.adb,
3812 a-intnam-mingw.ads, s-tassta.ads, s-taasde.adb, a-stcoed.ads,
3813 s-taasde.ads, s-osinte-darwin.adb, s-proinf.adb, s-taprop-dummy.adb,
3814 s-osinte-darwin.ads, s-proinf.ads, s-linux.ads, a-intnam-linux.ads,
3815 s-tasren.adb, s-tasren.ads, s-mudido.adb, g-semaph.adb, s-mudido.ads,
3816 s-taprop-posix.adb, g-semaph.ads, s-osinte-mingw.ads, s-vxwork-x86.ads,
3817 s-tposen.adb, s-linux-sparc.ads, s-taprop-vxworks.adb, s-tasini.adb,
3818 s-tposen.ads, s-tasini.ads, a-etgrbu.ads, s-interr-hwint.adb,
3819 s-osinte-linux.ads, s-taprop.ads, s-tasque.adb, s-tasque.ads,
3820 s-taenca.adb, s-taspri-vxworks.ads, s-taenca.ads, a-dynpri.adb,
3821 s-tpopsp-solaris.adb, a-dynpri.ads, s-taprop-hpux-dce.adb,
3822 a-interr.adb, a-intnam-freebsd.ads, s-tarest.adb, a-interr.ads,
3823 s-intman-susv3.adb, a-synbar.adb, a-intnam-dummy.ads, s-tadeca.adb,
3824 s-osinte-vxworks.adb, s-tarest.ads, s-taskin.adb, a-synbar.ads,
3825 s-taspri-hpux-dce.ads, s-tadeca.ads, s-osinte-vxworks.ads,
3826 s-taskin.ads, s-intman-solaris.adb, a-sytaco.adb, s-vxwext-kernel.adb,
3827 s-mudido-affinity.adb, a-sytaco.ads, s-vxwext-kernel.ads, s-taprob.adb,
3828 s-intman-mingw.adb, s-taprob.ads, s-osinte-kfreebsd-gnu.ads,
3829 s-osinte-dummy.ads, s-osinte-gnu.adb, s-osinte-rtems.adb, s-interr.adb,
3830 s-inmaop.ads, s-vxwext-rtp.adb, s-osinte-gnu.ads, s-osinte-rtems.ads,
3831 a-synbar-posix.adb, s-interr.ads, s-taspri-posix-noaltstack.ads,
3832 s-vxwext-rtp.ads, a-synbar-posix.ads, a-extiin.ads, s-osinte-posix.adb,
3833 s-tpinop.adb, s-tasres.ads, s-tpinop.ads, a-disedf.ads, a-diroro.ads,
3834 s-linux-alpha.ads, a-tasatt.adb, s-solita.adb, a-intnam-solaris.ads,
3835 a-tasatt.ads, s-solita.ads, s-tasinf-solaris.adb, s-tasinf-solaris.ads,
3836 s-vxwork-arm.ads, s-tpopsp-posix-foreign.adb, s-intman-dummy.adb,
3837 s-intman.ads, s-stusta.adb, s-stusta.ads, s-intman-posix.adb,
3838 s-tpopsp-vxworks.adb, s-inmaop-dummy.adb, s-taspri-mingw.ads,
3839 a-intnam-darwin.ads, s-osinte-aix.adb, s-osinte-dragonfly.adb,
3840 s-osinte-aix.ads, s-tasinf-mingw.adb, s-osinte-dragonfly.ads,
3841 s-linux-hppa.ads, s-osinte-x32.adb, s-inmaop-posix.adb,
3842 s-tasinf-mingw.ads, s-intman-vxworks.adb, s-linux-mips.ads,
3843 s-intman-vxworks.ads, s-osinte-android.adb, s-tasinf-linux.adb,
3844 s-osinte-android.ads, s-vxwork-ppc.ads, s-tasinf-linux.ads,
3845 a-dispat.adb, a-dispat.ads, s-tadert.adb, g-thread.adb, s-tadert.ads,
3846 g-thread.ads, a-intnam-hpux.ads, s-linux-android.ads, s-tataat.adb,
3847 a-exetim.ads, s-tataat.ads, a-reatim.adb, a-reatim.ads, thread.c,
3848 g-boubuf.adb, s-osinte-freebsd.adb, g-boubuf.ads, s-osinte-freebsd.ads,
3849 s-tasuti.adb, s-taspri-dummy.ads, a-exetim-mingw.adb, s-linux-x32.ads,
3850 s-tasuti.ads, g-signal.adb, a-exetim-mingw.ads, s-interr-sigaction.adb,
3851 g-signal.ads, s-osinte-hpux.ads, a-intnam-vxworks.ads,
3852 s-osinte-hpux-dce.adb, s-taspri-posix.ads, s-osinte-hpux-dce.ads,
3853 s-tasinf-vxworks.ads, g-tastus.ads, s-tpopsp-tls.adb,
3854 s-taprop-solaris.adb, a-retide.adb, a-exetim-darwin.adb, a-retide.ads,
3855 s-vxwext.adb, s-vxwext.ads, a-rttiev.adb, a-rttiev.ads, g-boumai.ads,
3856 a-exetim-default.ads, s-taprop-mingw.adb, s-taspri-solaris.ads,
3857 a-intnam-aix.ads: Move libgnarl sources to libgnarl subdir.
3859 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3861 * doc/share/conf.py, doc/share/latex_elements.py,
3862 doc/share/ada_pygments.py, doc/Makefile: Improve support for Ada
3865 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3867 * gnat_rm.texi, gnat_ugn.texi,
3868 doc/gnat_ugn/the_gnat_compilation_model.rst,
3869 doc/gnat_ugn/getting_started_with_gnat.rst,
3870 doc/gnat_ugn/inline_assembler.rst,
3871 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
3872 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
3873 doc/gnat_ugn/about_this_guide.rst,
3874 doc/gnat_ugn/platform_specific_information.rst,
3875 doc/gnat_ugn/example_of_binder_output.rst,
3876 doc/gnat_ugn/gnat_and_program_execution.rst,
3877 doc/gnat_ugn/gnat_utility_programs.rst,
3878 doc/gnat_rm/implementation_of_specific_ada_features.rst,
3879 doc/gnat_rm/interfacing_to_other_languages.rst,
3880 doc/gnat_rm/implementation_defined_aspects.rst,
3881 doc/gnat_rm/intrinsic_subprograms.rst,
3882 doc/gnat_rm/implementation_defined_characteristics.rst,
3883 doc/gnat_rm/implementation_advice.rst,
3884 doc/gnat_rm/implementation_defined_attributes.rst,
3885 doc/gnat_rm/compatibility_and_porting_guide.rst,
3886 doc/gnat_rm/standard_library_routines.rst,
3887 doc/gnat_rm/the_gnat_library.rst,
3888 doc/gnat_rm/implementation_defined_pragmas.rst,
3889 doc/gnat_rm/representation_clauses_and_pragmas.rst,
3890 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
3891 doc/gnat_rm/obsolescent_features.rst,
3892 doc/gnat_rm/about_this_guide.rst,
3893 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
3894 doc/gnat_rm/implementation_of_ada_2012_features.rst,
3896 doc/gnat_rm.rst: Update documentation.
3898 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3900 * s-dwalin.ads, s-dwalin.adb, s-trasym-dwarf.adb, s-objrea.ads,
3901 s-objrea.adb, s-tsmona-linux.adb, s-tsmona-mingw.adb: New.
3902 * gcc-interface/Makefile.in: Enable s-trasym-dwarf.adb on x86*linux.
3904 2017-09-08 Bob Duff <duff@adacore.com>
3906 * s-ststop.ads, s-ststop.adb, rtsfind.ads (String_Input_Tag):
3907 New routine to read the Tag robustly.
3908 * exp_attr.adb (Input): Change the expansion of 'Input,
3909 in the class-wide case, to call String_Input_Tag instead of
3910 String_Input_Blk_IO.
3912 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3914 * s-rident.ads (Restriction_Id): reorder enum
3915 literals, so that Pure_Barriers is no longer in range of the
3916 Cunit_Boolean_Restrictions subtype.
3918 2017-09-08 Nicolas Roche <roche@adacore.com>
3920 * a-taster.ads, a-taster.adb: Move to libgnarl
3921 * gcc-interface/Makefile.in: Remove obsolete targets. Code cleanups.
3922 Add support for files in libgnarl.
3924 2017-09-08 Ed Schonberg <schonberg@adacore.com>
3926 * exp_ch4.adb (Expand_N_Type_Conversion): Do not apply
3927 accessibility check to an interface conversion, whose purpose
3928 is to perform a pointer adjustment in a dispatching call.
3929 * exp_ch6.adb (Expand_Call_JHelper): Add accessibility checks
3930 when the actual is a construct that involves a dereference of an
3931 expression that includes a formal of the enclosing subprogram,
3932 In such cases, the accessibility level of the actual is that of
3933 the corresponding formal, which is passed in as an additional
3934 actual in the outer call.
3936 2017-09-08 Bob Duff <duff@adacore.com>
3938 * exp_intr.adb (Add_Source_Info): Do not decode
3939 file names; they were not encoded in the first place.
3941 2017-09-08 Bob Duff <duff@adacore.com>
3943 * a-tags.adb (Internal_Tag): Unsuppress checks, so we get
3944 exceptions instead of crashes. Check for absurdly long strings
3945 and empty strings. Empty strings cause trouble because they can
3946 have super-null ranges (e.g. 100..10), which causes Ext_Copy to
3947 be empty, which causes an array index out of bounds.
3948 * s-ststop.adb (Input): Unsuppress checks, so we get exceptions
3951 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3953 * sem_util.adb (Is_CCT_Instance): allow use in
3954 the context of protected types.
3956 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3958 * a-tigeli.adb: minor remove extra whitespace.
3960 2017-09-08 Gary Dismukes <dismukes@adacore.com>
3962 * par-ch4.adb: Reformatting of an error message.
3964 2017-09-08 Javier Miranda <miranda@adacore.com>
3966 * sem_ch3.adb (Resolve_Name): Under ASIS mode analyze overloaded
3967 identifiers to ensure their correct decoration of names on
3970 2017-09-08 Yannick Moy <moy@adacore.com>
3972 * exp_attr.adb (Expand_Loop_Entry_Attribute): Do
3973 not skip a loop coming from source which is rewritten into a loop.
3975 2017-09-08 Ed Schonberg <schonberg@adacore.com>
3977 * freeze.adb (Wrap_Imported_Subprogram): Indicate that the
3978 wrapper has convention Ada, to prevent spurious warnings on
3979 unconstrained array parameters.
3981 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3983 * sem_prag.adb (Check_Variant): Use First_Non_Pragma/Next_Non_Pragma.
3984 (Analyze_Pragma) <Pragma_Unchecked_Union>: Likewise.
3986 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3988 * sem_ch6.adb (Freeze_Expr_Types): Rename Spec_Id into Def_Id.
3990 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3992 * exp_intr.adb (Append_Entity_Name): Move to ...
3993 * sem_util.ads, sem_util.adb: ... here to share it.
3994 (Subprogram_Name): New subprogram, to compute the name of the enclosing
3996 * errutil.adb (Error_Msg): Fill new field Node.
3997 * erroutc.ads (Subprogram_Name_Ptr): New.
3998 (Error_Msg_Object): New field Node.
3999 * erroutc.adb (dmsg, Output_Msg_Text): Take new field Node into account.
4000 * errout.adb (Error_Msg): New variant with node id parameter.
4001 Fill new parameter Node when emitting messages. Revert previous
4002 changes for Include_Subprogram_In_Messages.
4003 * sem_ch5.adb (Check_Unreachable_Code): Supply Node parameter when
4004 generating warning message.
4006 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4008 * par-ch4.adb (P_Iterated_Component_Association): Place construct
4009 under -gnat2020 flag, given that it is a future feature of
4011 * sem_aggr.adb (Resolve_Iterated_Component_Association): Mark
4012 defining identifier as referenced to prevent spurious warnings:
4013 corresponding loop is expanded into one or more loops whose
4014 variable has the same name, and the expression uses those names
4015 and not the original one.
4017 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4019 * sem_elab.adb (Check_A_Call): Do not consider
4020 references to internal variables for SPARK semantics.
4022 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4024 * inline.adb (In_Package_Spec): refine type of
4025 the parameter from Node_Id to Entity_Id.
4027 2017-09-08 Justin Squirek <squirek@adacore.com>
4029 * exp_ch5.adb (Expand_Formal_Container_Loop):
4030 Reset the scope of the loop parameter after it is reanalyzed.
4032 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4034 * sem_util.ads (Set_Rep_Info): New inline procedure.
4035 * sem_util.adb (Set_Rep_Info): Implement it.
4036 * sem_ch3.adb (Process_Subtype): If the case of a constraint present,
4037 always copy the representation aspects onto the subtype.
4039 2017-09-08 Georges-Alex Jaloyan <jaloyan@adacore.com>
4041 * g-dynhta.adb, g-dynhta.ads (Get_First_Key, Get_Next_key):
4042 Correction of the return type from access type to option type.
4043 (Simple_HTable): Moving the Instance_Data to ads file.
4045 2017-09-08 Yannick Moy <moy@adacore.com>
4047 * sem_prag.adb: Use System.Case_Util.To_Lower to simplify code.
4049 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4051 * opt.ads (Include_Subprogram_In_Messages): New variable.
4052 * errout.ads (Current_Subprogram_Ptr): New variable.
4053 * errout.adb (Error_Msg): Prepend current subprogram info
4054 in messages if Include_Subprogram_In_Messages is set.
4055 * sem_util.adb (elab code): Initialize Current_Subprogram_Ptr to
4057 * gnat1drv.adb (Adjust_Global_Switches): Set
4058 Include_Subprogram_In_Messages when -gnatdJ is set.
4059 * debug.adb: Document and reserve -gnatdJ.
4061 2017-09-08 Georges-Axel Jaloyan <jaloyan@adacore.com>
4063 * g-dynhta.adb, g-dynhta.ads (Get_First_Key, Get_Next_Key): New
4064 functions to iterate over simple hastables.
4065 (Load_Factor_HTable): Remove obsolete and inefficient implementation.
4067 2017-09-08 Javier Miranda <miranda@adacore.com>
4069 * exp_ch6.adb (Unqual_BIP_Function_Call): Adding
4070 missing checks on the presence of Entity() before checking the
4073 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4075 * sem_ch6.adb (Analyze_Expression_Function): Reorder some
4076 statements, use local variable and remove unnecessary processing.
4078 2017-09-08 Javier Miranda <miranda@adacore.com>
4080 * exp_ch6.ads (Make_Build_In_Place_Iface_Call_In_Allocator): New
4082 (Make_Build_In_Place_Iface_Call_In_Anonymous_Context): New subprogram.
4083 (Make_Build_In_Place_Iface_Call_In_Object_Declaration): New
4085 (Unqual_BIP_Iface_Function_Call): New subprogram.
4086 * exp_ch6.adb (Replace_Renaming_Declaration_Id): New
4087 subprogram containing code that was previously inside
4088 Make_Build_In_Place_Call_In_Object_Declaration since it is also
4089 required for one of the new subprograms.
4091 Invoke Make_Build_In_Place_Iface_Call_In_Anonymous_Context
4092 (Expand_N_Extended_Return_Statement): Extend the
4093 cases covered by an assertion on expected BIP object
4095 (Make_Build_In_Place_Call_In_Assignment):
4096 Removing unused code; found working on this ticket.
4097 (Make_Build_In_Place_Call_In_Object_Declaration): Move the code
4098 that replaces the internal name of the renaming declaration
4099 into the new subprogram Replace_Renaming_Declaration_Id.
4100 (Make_Build_In_Place_Iface_Call_In_Allocator): New subprogram.
4101 (Make_Build_In_Place_Iface_Call_In_Anonymous_Context):
4103 (Make_Build_In_Place_Iface_Call_In_Object_Declaration): New
4105 (Unqual_BIP_Iface_Function_Call): New subprogram.
4106 * exp_ch3.adb (Expand_N_Object_Declaration): Invoke the new
4107 subprogram Make_Build_In_Place_Iface_Call_In_Object_Declaration.
4108 * exp_attr.adb (Expand_N_Attribute_Reference): Invoke the new
4109 subprogram Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4110 * exp_ch4.adb (Expand_Allocator_Expression): Invoke the new
4111 subprogram Make_Build_In_Place_Iface_Call_In_Allocator.
4112 (Expand_N_Indexed_Component): Invoke the new subprogram
4113 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4114 (Expand_N_Selected_Component): Invoke the new subprogram
4115 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4116 (Expand_N_Slice): Invoke the new subprogram
4117 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4118 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration):
4119 Invoke the new subprogram
4120 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4122 2017-09-08 Javier Miranda <miranda@adacore.com>
4124 * exp_disp.adb (Expand_Interface_Conversion): Fix handling of
4125 access to interface types. Remove also the accessibility check.
4127 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4129 * sem_ch6.adb (Freeze_Expr_Types): Really freeze
4130 all the types that are referenced by the expression.
4131 (Analyze_Expression_Function): Call Freeze_Expr_Types for
4132 a completion instead of manually freezing the type of the
4134 (Analyze_Subprogram_Body_Helper): Do not call Freeze_Expr_Types here.
4136 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4138 * exp_prag.adb (Replace_Discriminals_Of_Protected_Op):
4139 New procedure, auxiliary to Expand_Pragma_Check, to handle
4140 references to the discriminants of a protected type within a
4141 precondition of a protected operation. This is needed because
4142 the original precondition has been analyzed in the context of
4143 the protected declaration, but in the body of the operation
4144 references to the discriminants have been replaved by references
4145 to the discriminants of the target object, and these references
4146 are only created when expanding the protected body.
4148 2017-09-08 Yannick Moy <moy@adacore.com>
4150 * sem_prag.adb (Analyze_Pragma): Issue more precise error messages on
4153 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4155 * exp_attr.adb (Build_Record_VS_Func): If the record is an
4156 unchecked union, do not emit checks for its (non-existent)
4157 discriminants, or for variant parts that depend on them.
4159 2017-09-08 Justin Squirek <squirek@adacore.com>
4161 * sem_ch4.adb (Find_Equality_Types.Try_One_Interp,
4162 Find_Comparison_Type.Try_One_Interp): Add check for generic
4165 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4167 * sem_ch3.adb, layout.adb, layout.ads, exp_attr.adb, debug.adb,
4168 exp_pakd.adb, sem_prag.adb, gnat1drv.adb, targparm.adb, targparm.ads,
4169 repinfo.adb, exp_ch6.adb, exp_aggr.adb, sem_eval.adb, sem_ch13.adb,
4170 exp_ch3.adb: Remove references to Frontend_Layout_On_Target and
4171 remaining references to AAMP_On_Target.
4173 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4175 * style.adb: Fix typo.
4177 2017-09-08 Javier Miranda <miranda@adacore.com>
4179 * einfo.adb (Underlying_Type): Add missing support for class-wide
4180 types that come from the limited view.
4181 * exp_attr.adb (Attribute_Address): Check class-wide type
4182 interfaces using the underlying type to handle limited-withed
4184 (Attribute_Tag): Check class-wide type interfaces using
4185 the underlying type to handle limited-withed types.
4187 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4189 * exp_ch5.adb (Expand_Predicated_Loop): Handle properly a loop
4190 over a subtype of a type with a static predicate, taking into
4191 account the predicate function of the parent type and the bounds
4192 given in the loop specification.
4193 * sem_ch3.adb (Inherit_Predicate_Flags): For qn Itype created for
4194 a loop specification that is a subtype indication whose type mark
4195 is a type with a static predicate, inherit predicate function,
4196 used to build case statement for rewritten loop.
4198 2017-09-08 Justin Squirek <squirek@adacore.com>
4200 * lib-load.adb: Modify printing of error message to exclude file
4203 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4205 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode):
4206 don't inline subprograms declared in both visible and private
4208 (In_Package_Spec): previously In_Package_Visible_Spec; now
4209 detects subprograms declared both in visible and private parts
4212 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4214 * exp_util.adb (Build_Invariant_Procedure_Declaration): If
4215 the type is an anonymous array in an object declaration, whose
4216 component type has an invariant, use the object declaration
4217 as the insertion point for the invariant procedure, given that
4218 there is no explicit type declaration for an anonymous array type.
4220 2017-09-08 Bob Duff <duff@adacore.com>
4222 * a-cbprqu.ads, a-cbdlli.adb: Suppress warnings.
4224 2017-09-08 Bob Duff <duff@adacore.com>
4226 * a-strfix.adb (Trim): Compute Low and High only if needed.
4228 2017-09-08 Justin Squirek <squirek@adacore.com>
4230 * lib-load.adb (Load_Main_Source): Add error output in the case a
4231 source file is missing.
4233 2017-09-08 Bob Duff <duff@adacore.com>
4236 * a-textio.adb, a-witeio.adb, a-ztexio.adb (Set_WCEM): Use
4237 Default_WCEM by default (i.e. if the encoding is not specified
4238 by the Form string).
4240 2017-09-08 Bob Duff <duff@adacore.com>
4242 * s-trasym.ads (Hexa_Traceback): If
4243 Suppress_Hex is True, print "..." instead of a hexadecimal
4245 * s-trasym.adb: Ignore No_Hex in this version.
4248 2017-09-08 Bob Duff <duff@adacore.com>
4250 * debug.adb: Minor reformatting.
4252 2017-09-08 Bob Duff <duff@adacore.com>
4254 * a-cbdlli.adb, a-cohama.adb, a-cohase.adb (Copy): Rewrite the
4255 code so it doesn't trigger an "uninit var" warning.
4257 2017-09-08 Nicolas Roche <roche@adacore.com>
4259 * s-hibaen.ads: Remove obsolete file.
4261 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4263 * a-locale.ads: Add comment explaining the state of this package.
4265 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4267 * sem_util.adb (Is_CCT_Instance): Allow calls in the context
4269 * sem_prag.ads, sem_prag.adb (Find_Related_Declaration_Or_Body):
4270 allow calls in the context of package spec (for pragma
4271 Initializes) and bodies (for pragma Refined_State).
4273 2017-09-08 Bob Duff <duff@adacore.com>
4275 * checks.adb (Insert_Valid_Check): Copy the Do_Range_Check flag to the
4278 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4280 * debug.adb (dA): Adjust comment.
4281 * gnat1drv.adb (Gnat1drv): Likewise.
4282 * opt.ads (List_Representation_Info_Extended): New variable.
4283 * repinfo.adb (List_Record_Info): Split implementation into...
4284 (Compute_Max_Length): ...this. Recurse on records if requested.
4285 (List_Record_Layout): Likewise.
4286 * switch-c.adb (Scan_Front_End_Switches) <'R'>: Use case
4287 statement, accept '0' and set List_Representation_Info_Extended
4289 * usage.adb (Usage): Document new -gnatRe variant.
4291 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4293 * sem_prag.adb (Analyze_Pragma, case Default_Storage_Pool):
4294 Do not save the given entity in the global variable Default_Pool
4295 if the pragma appears within a generic unit.
4297 2017-09-08 Bob Duff <duff@adacore.com>
4299 * errout.adb (Delete_Warning): Do not
4300 decrement Warnings_Treated_As_Errors. This is called before
4301 Warnings_Treated_As_Errors has been incremented to account for
4302 this warning. Decrementing it here can lead to negative values
4303 of Warnings_Treated_As_Errors, raising Constraint_Error in
4304 checks-on builds, and causing the compiler to return an error
4305 code in checks-off builds.
4307 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4309 * sem_util.ads, sem_util.adb (Is_CCT_Instance): Only expect
4310 entities of named concurrent types as Ref_Id and not of anonymous
4311 concurrent objects (because callers already know when a conversion
4312 is necessary and can easily do it); also, do not expect protected
4313 types or protected objects as Context_Id (because no flow-related
4314 SPARK pragmas are attached there); reflect these changes in a
4315 more precise comment.
4317 2017-09-08 Olivier Hainque <hainque@adacore.com>
4319 * g-altive.ads: Add documentation.
4321 2017-09-08 Bob Duff <duff@adacore.com>
4323 * sem_util.ads, debug.adb: Minor comment fix.
4324 * erroutc.ads: Comment fix.
4326 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4328 * sem_ch12.adb (Validate_Array_Type_Instance): Suppress check
4329 for compatibility of component types of formal and actual in an
4330 instantiation of a child unit, when the component type of the
4331 formal is itself a formal of an enclosing generic.
4333 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4335 * sem_util.ads, sem_util.adb (Is_CCT_Instance): moved from
4336 sem_prag.adb to make it available for GNATprove; for concurrent
4337 types replace custom scope climbing with Scope_Same_Or_Within; for
4338 single concurrent objects add scope climbing (with Scope_Within),
4339 which was not there (that's the primary semantic change of this
4340 commit); also, when comparing a single concurrent object with
4341 its corresponding concurrent type rely on equality of types,
4342 not of objects (because that's simpler to code).
4343 * sem_prag.adb (Is_CCT_Instance): lifted to sem_util.ads.
4344 (Analyze_Global_Item): adjust special-casing of references to the
4345 current instance of a concurrent unit in the Global contracts
4346 of task types and single tasks objects; similar for references
4347 in the protected operations and entries of protected types and
4348 single protected objects (in all these cases the current instance
4349 behaves as an implicit parameter and must not be mentioned in
4350 the Global contract).
4352 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4354 * exp_ch6.adb (Expand_Call_Helper): Introduce temporary for
4355 function calls returning a record within a subprogram call,
4358 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4360 * sem_ch8.adb (Find_Expanded_Name): Handle properly an expanded
4361 name that designates the current instance of a child unit in its
4362 own body and appears as the prefix of a reference to an entity
4363 local to the child unit.
4364 * exp_ch6.adb, freeze.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb:
4367 2017-09-08 Yannick Moy <moy@adacore.com>
4369 * sem_res.adb (Resolve_Equality_Op): Do not warn on comparisons that
4372 2017-09-08 Tristan Gingold <gingold@adacore.com>
4374 * sem_warn.adb (Check_Unused_Withs): Remove test that disabled
4375 warnings on internal units in configurable run time mode.
4377 2017-09-08 Bob Duff <duff@adacore.com>
4379 * sem_ch3.adb (Build_Derived_Private_Type): Inherit
4380 representation items from interfaces that the derived type
4381 implements, not just from the parent type.
4382 * sem_util.ads, sem_util.adb (Abstract_Interface_List): Change
4383 this to return an empty list when there are no interfaces.
4384 * einfo.ads, sem_ch13.adb: Minor comment fixes.
4385 * sem_attr.adb: Minor comment fix.
4387 2017-09-08 Doug Rupp <rupp@adacore.com>
4389 * sigtramp-vxworks.c [i386]: Adjust the kernel context for
4392 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4394 * exp_ch4.adb (Expand_N_Allocator): Generate a
4395 call to Allocate_Any_Controlled when the allocation does not
4396 require any initialization.
4398 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4400 * sem_util.adb (Copy_Node_With_Replacement):
4401 Update the Renamed_Object field of a replicated object renaming
4404 2017-09-08 Patrick Bernardi <bernardi@adacore.com>
4406 * exp_ch9.adb (Is_Pure_Barrier): Allow type
4407 conversions and components of objects. Simplified the detection
4408 of the Count attribute by identifying the corresponding run-time
4411 2017-09-08 Yannick Moy <moy@adacore.com>
4413 * exp_ch9.adb, exp_disp.adb, repinfo.adb, sem_ch12.adb, sem_dim.adb,
4414 sem_type.adb, sinfo.ads: Minor reformatting.
4416 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4418 * freeze.adb (Has_Incomplete_Compoent): New predicate, subsidiary
4419 of Freeze_Profile, used to inhibit the freezing of the profile
4420 of an expression function declared within a nested package, when
4421 some type in the profile depends on a private type declared in
4422 an enclosing package.
4424 2017-09-08 Bob Duff <duff@adacore.com>
4426 * gnat1drv.adb (Gnat1drv): Do not set the Force_ALI_Tree_File flag in
4427 the subunit case. It's still OK to set it in the "missing subunits"
4428 case, because that won't cause the obsolete .ali files that cause
4431 2017-09-08 Bob Duff <duff@adacore.com>
4433 * sinput-l.adb: Remove unused "with Unchecked_Conversion;". It's
4434 unclear why this didn't cause a warning.
4435 * a-uncdea.ads, a-unccon.ads: Add "Ada." to names in the
4436 pragmas. It's unclear why this didn't cause an error.
4438 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4440 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration):
4442 (Expand_SPARK_Potential_Renaming): Code clean up.
4443 * sem_prag.adb (Analyze_Initialization_Item): Add a guard in case
4444 the item does not have a proper entity.
4445 (Analyze_Input_Item): Add a guard in case the item does not have a
4447 (Collect_States_And_Objects): Include object renamings in the
4448 items being collected.
4449 (Resolve_State): Update the documentation of this routine.
4450 * sem_util.adb (Entity_Of): Add circuitry to handle
4451 renamings of function results.
4452 (Remove_Entity): New routine.
4453 (Remove_Overloaded_Entity): Take advantage of factorization.
4454 * sem_util.ads (Entity_Of): Update the documentation
4456 (Remove_Entity): New routine.
4457 (Remove_Overloaded_Entity): Update the documentation of this
4460 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4462 * repinfo.adb (List_Record_Info): During first loop,
4463 do not override the normalized position and first bit
4464 if they have already been set. Move fallback code
4465 for the packed case to the case where it belongs.
4466 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
4467 Also adjust the normalized position of components.
4468 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): Likewise.
4470 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4472 * exp_disp.adb (Make_DT, Set_All_DT_Position): Handle properly
4473 the placement of a primitive operation O that renames an operation
4474 R declared in an inner package, and which is thus not a primitive
4475 of the dispatching type of O. In this case O is a new primitive
4476 and does not inherit its dispatch table position from R (which
4479 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4481 * sem_dim.adb (Analyze_Dimension_If_Expression,
4482 Analyze_Dimension_Case_Expression): new subprograms to verify
4483 the dimensional correctness of Ada2012 conditional expressions,
4484 and set properly the dimensions of the construct.
4485 * sem_res.adb (Resolve_If_Expression, Resolve_Case_Expression)):
4486 call Analyze_Dimension.
4488 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4490 * sem_type.adb (Expand_Interface_Conversion): Prevent an infinite
4491 loop on an interface declared as a private extension of another
4492 synchronized interface.
4494 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4496 * sem_ch12.adb (Check_Generic_Parent): New procedure within
4497 Analyze_Associations, to handle actual packages that depend on
4498 previous instances. If a package IAP that is an instantiation is
4499 used as an actual in a subsequent instantiation SI in the same
4500 scope, and IAP has a body, IAP must be frozen before SI. If
4501 the generic parent of IAP is itself declared in a previous
4502 instantiation in the same scope, that instantiation must also
4503 be frozen before SI.
4504 (Install_Body): Prevent double insertion of freeze node for
4507 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4509 * sem_prag.adb (Resolve_State): Update the
4510 comment on documentation. Generate a reference to the state once
4511 resolution takes place.
4513 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4515 * sem_ch13.adb (Analyze_Aspect_Specifications, case
4516 Linker_Section): If the aspect applies to an object declaration
4517 with explicit initialization, do not delay the freezing of the
4518 object, to prevent access-before-elaboration in the generated
4519 initialization code.
4521 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4523 * a-wtdeio.adb (Put, all versions): Use Long_Long_Integer
4524 (Integer_Value (Item)) when the size of the fixed decimal type
4525 is larger than Integer.
4527 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
4530 * gcc-interface/decl.c (copy_and_substitute_in_layout): Put the fields
4531 in order of increasing position in more cases.
4533 2017-09-07 Yannick Moy <moy@adacore.com>
4535 * a-exetim-mingw.ads: Add contract Global=>null
4536 on all operations that are modeled as having no read or write
4537 of global variables in SPARK.
4539 2017-09-07 Raphael Amiard <amiard@adacore.com>
4541 * a-chtgop.adb, a-chtgop.ads (Generic_Iteration_With_Position): Added
4542 to Hmaps.Generic_Ops.
4543 * a-cohama.adb (Ada.Containers.Hmaps.Iterate): Pass proper position in
4545 * a-cihama.adb (Ada.Containers.Indefinite_Hmaps.Iterate): Pass pos in
4547 * a-cohase.adb (Ada.Containers.Hashed_Sets.Iterate): Pass proper
4548 position in cursors.
4550 2017-09-07 Javier Miranda <miranda@adacore.com>
4552 * sem_elab.adb (Check_Task_Activation): Adding switch -gnatd.y to
4553 allow disabling the generation of implicit pragma Elaborate_All
4556 2017-09-07 Javier Miranda <miranda@adacore.com>
4558 * exp_disp.adb (Make_Tags): Avoid suffix counter
4559 in the external name of the elaboration flag. Required to fix
4560 the regressions introduced by the initial version of this patch.
4562 2017-09-07 Bob Duff <duff@adacore.com>
4564 * sem_ch6.adb (Analyze_Function_Return): Do not
4565 insert an explicit conversion to force the displacement of the
4566 "this" pointer to reference the secondary dispatch table in the
4567 case where the return statement is returning a raise expression,
4568 as in "return raise ...".
4570 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4572 * sem_disp.adb (Is_User_Defined_Equality): Removed procedure.
4573 * sem_util.ads, sem_util.adb (Is_User_Defined_Equality): Copied
4574 procedure from sem_disp.adb.
4575 * sem_ch12.ads (Get_Unit_Instantiation_Node): rename Package
4577 * sem_ch12.adb (Get_Unit_Instantiation_Node): function extended to
4578 return the instantiation node for subprograms. Update references
4579 to Get_Unit_Instantiation_Node.
4580 * sem_ch7.adb (Install_Parent_Private_Declarations): update
4581 reference to Get_Unit_Instantiation_Node.
4582 * exp_dist.adb (Build_Package_Stubs): update reference to
4583 Get_Unit_Instantiation_Node.
4584 * sem_ch9.adb: minor typo in comment.
4585 * lib-xref-spark_specific.adb
4586 (Traverse_Declaration_Or_Statement): traverse into task type
4589 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4591 * sem_dim.adb (Analyze_Dimension_Type_Conversion): New procedure
4592 to handle properly various cases of type conversions where the
4593 target type and/or the expression carry dimension information.
4594 (Dimension_System_Root); If a subtype carries dimension
4595 information, obtain the source parent type that carries the
4598 2017-09-07 Dmitriy Anisimkov <anisimko@adacore.com>
4600 * g-socket.adb, g-socket.ads (GNAT.Sockets.To_Ada): New routine.
4602 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4604 * exp_attr.adb (Expand_N_Attribute_Reference, case 'Constrained):
4605 If the prefix is a reference to an object, rewrite it as an
4606 explicit dereference, as required by 3.7.2 (2) and as is done
4607 with most other attributes whose prefix is an access value.
4609 2017-09-07 Bob Duff <duff@adacore.com>
4611 * par-ch13.adb: Set the Inside_Depends flag if we are inside a
4612 Refined_Depends aspect.
4613 * par-ch2.adb: Set the Inside_Depends flag if we are inside a
4614 Refined_Depends pragma.
4615 * scans.ads: Fix documentation of Inside_Depends flag.
4616 * styleg.adb, styleg.ads: Minor reformatting and comment fixes.
4618 2017-09-07 Hristian Kirtchev <kirtchev@adacore.com>
4620 * exp_ch7.adb (Insert_Actions_In_Scope_Around):
4621 Account for the case where the are no lists to insert, but the
4622 secondary stack still requires management.
4623 * a-chtgop.adb, a-cihama.adb, a-cohama.adb, a-cohase.adb, a-tags.adb,
4624 comperr.adb, einfo.adb, exp_aggr.adb, exp_ch3.adb, exp_disp.adb,
4625 lib-xref.adb, lib-xref-spark_specific.adb, sem_ch12.adb, sem_ch13.adb,
4626 sem_ch6.adb, sem_dim.adb, sem_dim.ads, sem_elab.adb, sem_prag.adb:
4629 2017-09-07 Vincent Celier <celier@adacore.com>
4631 * clean.adb: Do not get the target parameters before calling
4634 2017-09-07 Nicolas Roche <roche@adacore.com>
4636 * s-osinte-solaris-posix.ads: Removed.
4638 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4640 * sem_prag.adb (Collect_States_And_Objects): Detect also instances of
4641 single concurrent objects.
4643 2017-09-07 Javier Miranda <miranda@adacore.com>
4645 * s-regexp.ads: Fix documentation of the globbing grammar.
4647 2017-09-07 Gary Dismukes <dismukes@adacore.com>
4649 * a-tags.ads, einfo.ads, exp_disp.ads: Minor reformatting.
4651 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4653 * gnat1drv.adb (Gnat1drv): Enable pragma Ignore_Pragma (Global)
4654 in CodePeer mode, to support more legacy code automatically.
4656 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4658 * exp_disp.adb (Replace_Formals): If thr formal is classwide,
4659 and thus not a controlling argument, preserve its type after
4660 rewriting because it may appear in an nested call with a classwide
4663 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4665 * comperr.adb (Delete_SCIL_Files): Handle case of
4666 N_Package_Instantiation.
4668 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4670 * sem_ch10.adb (Remove_Private_With_Clause): If a private with
4671 clause for a unit U appears in a context that includes a regular
4672 with_clause on U, rewrite the redundant private clause into a null
4673 statement, rather than removing it altogether from the context,
4674 so that ASIS tools can reconstruct the original source.
4676 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4678 * sem_ch13.adb (Check_Aspect_At_Freeze_Point): The expression
4679 for aspect Small can be of any real type (not only a universal
4680 real literal) as long as it is a static constant.
4682 2017-09-07 Thomas Quinot <quinot@adacore.com>
4684 * par_sco.adb: Minor reformatting.
4686 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4688 * s-parame-ae653.ads: Removed.
4690 2017-09-07 Nicolas Roche <roche@adacore.com>
4692 * s-traces-default.adb, s-trafor-default.adb, s-trafor-default.ads,
4693 s-traces.adb, s-traces.ads, s-tratas-default.adb, s-tfsetr-default.adb,
4694 s-tfsetr-vxworks.adb, s-tratas.adb, s-tratas.ads, s-tasuti.adb,
4695 s-parame-hpux.ads, s-tassta.adb, s-taasde.adb, s-tasren.adb,
4696 s-taprob.adb, a-caldel.adb, s-parame.ads, Makefile.rtl, s-tpobop.adb,
4697 s-taenca.adb, s-parame-vxworks.ads: Remove support for System.Traces.
4699 2017-09-07 Yannick Moy <moy@adacore.com>
4701 * a-ngelfu.ads Add preconditions to all functions
4702 listed in Ada RM A.5.1(19-33) as having constraints on inputs.
4704 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4706 * lib-xref.adb (Generate_Reference): ignore
4707 references to entities which are Part_Of single concurrent
4710 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
4712 * sem_ch7.adb (Hide_Public_Entities): Add paragraph to main
4715 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4717 * a-taside.adb (Activation_Is_Complete): Raise Program_Error if
4718 Null_Task_Id is passed.
4720 2017-09-07 Javier Miranda <miranda@adacore.com>
4722 * einfo.ads, einfo.adb (Access_Disp_Table_Elab_Flag): New
4723 attribute. Defined for record types and subtypes.
4724 * exp_ch3.ads (Init_Secondary_Tags): Adding new formal
4725 (Init_Tags_List) to facilitate generating separate code in the
4726 IP routine to initialize the object components and for completing
4727 the elaboration of dispatch tables.
4728 * exp_ch3.adb (Build_Init_Procedure): Improve the code
4729 generated in the IP routines by means of keeping separate
4730 the initialization of the object components from the
4731 initialization of its dispatch tables. (Init_Secondary_Tags):
4732 Adding new formal (Init_Tags_List) and adjusting calls to
4733 Ada.Tags.Set_Dynamic_Offset_To_Top since it has a new formal;
4734 adjusting also calls to Ada.Tags.Register_Interface_Offset
4735 because the type of one of its formals has been changed.
4736 * a-tags.ads, a-tags.adb (Register_Interface_Offset): Profile
4737 modified. Instead of receiving a pointer to an object this
4738 routine receives now a primary tag.
4739 (Set_Dyanic_Offset_To_Top): Profile modified. This routine receives an
4740 additional formal: the tag of the primary dispatch table.
4741 * exp_disp.ads (Elab_Flag_Needed): New subprogram.
4742 * exp_disp.adb (Elab_Flag_Needed): New subprogram.
4743 (Make_Tags): Adding the declaration of the elaboration flag (if needed).
4744 * exp_aggr.adb (Build_Record_Aggr_Code): Adding actual of new
4745 formal in calls to Init_Secondary_Tags.
4747 2017-09-07 Javier Miranda <miranda@adacore.com>
4749 * ghost.adb (Mark_And_Set_Ghost_Instantiation.Check_Ghost_Actuals): New
4751 * sem_prag.adb (Pragma_Ghost): Add missing support for ghost
4752 applied to generic subprograms.
4754 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4756 * sem_util.adb (Check_Part_Of_Reference): rename Conc_Typ to Conc_Obj
4757 (because it refers to the anonymous concurrent object, not its type);
4758 fix condition for emitting error message about task/protected type,
4760 2017-09-07 Bob Duff <duff@adacore.com>
4762 * binde.adb (Debug_Flag_Old): If both -do and -dp
4763 are specified, behave as if just -do was specified, rather than
4766 2017-09-07 Nicolas Roche <roche@adacore.com>
4768 * system-vxworks-sparcv9.ads, s-vxwork-m68k.ads, s-vxwork-mips.ads,
4769 system-vxworks-m68k.ads, system-vxworks-mips.ads: Removed.
4771 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4773 * sem_prag.adb (Find_Role): The Global_Seen flag
4774 is now consulted not only for abstract states and variables,
4775 but for all kinds of items.
4776 (Collect_Subprogram_Inputs_Outputs): Do not process formal
4777 generic parameters, because unlike ordinary formal parameters,
4778 generic formals only act as input/ outputs if they are explicitly
4779 mentioned in a Global contract.
4781 2017-09-07 Yannick Moy <moy@adacore.com>
4783 * ghost.adb (Check_Ghost_Context): Do not err on ghost code inside
4784 predicate procedure. Check predicate pragma/aspect with Ghost entity.
4785 * exp_ch6.adb, par-ch6.adb, sem_ch13.adb, sem_prag.adb; Minor
4788 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4790 * sem_aggr.adb: Move New_Copy_Tree_And_Dimensions to sem_dim
4792 * sem_ch3.adb (Build_Derived_Record_Type):i Call
4793 Copy_Dimensions_Of_Components after creating the copy of the
4795 * sem_dim.ads, sem_dim.adb (Copy_Dimensions_Of_Components): For a
4796 derived recor type, copy the dikensions if any of each component
4797 of the parent record to the corresponding component declarations
4798 of the derived record. These expressions are used among other
4799 things as default values in aggregates with box associations.
4800 * a-dirval-mingw.adb, g-cgi.adb, gnatcmd.adb, lib-xref.adb,
4801 repinfo.adb, sem_attr.adb, sem_ch10.adb, sem_ch6.adb, sem_prag.adb:
4804 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4806 * sem_util.adb: Remove extra space after THEN.
4808 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
4810 * sem_ch7.adb (Has_Referencer): For a subprogram renaming,
4811 also mark the renamed subprogram as referenced.
4813 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4815 * par-ch6.adb (P_Subprogram): Improve error message on null
4816 procedure with misplaced aspect specification, which the parser
4817 first attempts to interpret as a malformed expression function.
4819 2017-09-07 Gary Dismukes <dismukes@adacore.com>
4821 * sem_attr.adb (Analyze_Attribute_Old_Result):
4822 Allow attributes Result and Old in the case of an expression
4825 2017-09-07 Justin Squirek <squirek@adacore.com>
4827 * sem_prag.adb (Process_Atomic_Independent_Shared_Volatile): Propagate
4828 Volatile to subcomponents.
4830 2017-09-07 Bob Duff <duff@adacore.com>
4832 * exp_ch7.adb (Find_Last_Init): Check for the
4833 case where a build-in-place function call has been replaced by a
4834 'Reference attribute reference.
4836 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
4838 * sem_ch7.adb (Has_Referencer): Recurse on Actions of freeze
4841 2017-09-07 Bob Duff <duff@adacore.com>
4843 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration,
4844 Make_Build_In_Place_Call_In_Anonymous_Context): Do not use the
4845 secondary stack for all functions that return limited tagged
4846 types -- just do it for dispatching calls. Misc cleanup.
4847 * sem_util.ads, sem_util.adb (Unqual_Conv): New function to
4848 remove qualifications and type conversions. Fix various bugs
4849 where only a single level of qualification or conversion was
4850 removed, so e.g. "T1'(T2'(X))" would incorrectly return "T2'(X)"
4852 * checks.adb, exp_util.ads, exp_util.adb, sem_res.adb: Misc related
4855 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4857 * sem_ch6.adb (setr_Actual_Subtypes): Within a predicate function
4858 do not create actual subtypes that may generate further predicate
4860 * sem_ch13.adb (Build_Predicate_Functions): Indicate that entity
4861 of body is a predicate function as well.
4862 (Resolve_Aspect_Expressions, Resolve_Name): For a component
4863 association, only the expression needs resolution, not the name.
4864 (Resolve_Aspect_Expressions, case Predicates): Construct and
4865 analyze the predicate function declaration in the scope of the
4866 type, before making the type and its discriminants visible.
4868 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
4870 * gcc-interface/decl.c (warn_on_field_placement): Issue the warning
4871 only if the record type itself comes from source.
4873 2017-09-06 Gary Dismukes <dismukes@adacore.com>
4875 * sem_ch5.adb: Minor reformatting and a typo fix
4877 2017-09-06 Arnaud Charlet <charlet@adacore.com>
4879 * sinput-l.ads: minor remove extra period at the end of comment
4881 2017-09-06 Arnaud Charlet <charlet@adacore.com>
4883 * sem_prag.adb (Add_Item_To_Name_Buffer): remove support for
4885 (Find_Role): remove support for E_Discriminant.
4887 2017-09-06 Javier Miranda <miranda@adacore.com>
4889 * exp_ch6.adb (Expand_Simple_Function_Return):
4890 Add missing implicit type conversion to force displacement of the
4893 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
4895 * sem_ch3.adb, sem_aux.adb, sem_res.adb: Minor reformatting.
4897 2017-09-06 Yannick Moy <moy@adacore.com>
4899 * sem_ch12.adb (Analyze_Instance_And_Renamings): Refactor to set
4900 global variable Ignore_SPARK_Mode_Pragmas_In_Instance only once.
4902 2017-09-06 Bob Duff <duff@adacore.com>
4904 * sem_ch8.adb: Change Assert to be consistent with
4907 2017-09-06 Bob Duff <duff@adacore.com>
4909 * binde.adb (Find_Elab_Order): Do not run Elab_Old unless
4910 requested. Previously, the -do switch meant "run Elab_New and
4911 Elab_Old and use the order chosen by Elab_Old, possibly with
4912 debugging printouts comparing the two orders." Now it means
4913 "do not run Elab_New." This is of use if there are bugs that
4914 cause Elab_New to crash.
4915 (Elab_Position, Num_Chosen): Change type to Nat, to avoid various
4917 * ali.ads (Elab_Position): Change type to Nat, to avoid various
4920 2017-09-06 Arnaud Charlet <charlet@adacore.com>
4922 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Fix
4923 reference to SPARK RM.
4925 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
4927 * layout.adb: Use SSU short hand consistently throughout the file.
4929 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
4931 * freeze.adb (Freeze_Record_Type)
4932 <Sized_Component_Total_Round_RM_Size>: New local variable to
4933 accumulate the rounded RM_Size of components. Update it for
4934 every component whose RM_Size is statically known. Add missing
4935 guard to check that bit packing is really required before issuing
4936 the error about packing. Swap condition for clarity's sake.
4937 * sem_prag.adb (Usage_Error): Fix reference to SPARK RM in comment.
4939 2017-09-06 Fedor Rybin <frybin@adacore.com>
4941 * makeutl.adb, makeutl.ads, mlib.adb, mlib.ads, mlib-fil.adb,
4942 mlib-fil.ads, mlib-prj.adb, mlib-prj.ads, mlib-tgt.adb, mlib-tgt.ads,
4943 mlib-tgt-specific.adb, mlib-tgt-specific.ads,
4944 mlib-tgt-specific-aix.adb, mlib-tgt-specific-darwin.adb,
4945 mlib-tgt-specific-hpux.adb, mlib-tgt-specific-linux.adb,
4946 mlib-tgt-specific-mingw.adb, mlib-tgt-specific-solaris.adb,
4947 mlib-tgt-specific-vxworks.adb, mlib-tgt-specific-xi.adb, mlib-utl.adb,
4948 mlib-utl.ads, prj.adb, prj.ads, prj-attr.adb, prj-attr.ads,
4949 prj-attr-pm.adb, prj-attr-pm.ads, prj-com.ads, prj-conf.adb,
4950 prj-conf.ads, prj-dect.adb, prj-dect.ads, prj-env.adb, prj-env.ads,
4951 prj-err.adb, prj-err.ads, prj-ext.adb, prj-ext.ads, prj-makr.adb,
4952 prj-makr.ads, prj-nmsc.adb, prj-nmsc.ads, prj-pars.adb, prj-pars.ads,
4953 prj-part.adb, prj-part.ads, prj-pp.adb, prj-pp.ads, prj-proc.adb,
4954 prj-proc.ads, prj-strt.adb, prj-strt.ads, prj-tree.adb, prj-tree.ads,
4955 prj-util.adb, prj-util.ads, sinput-p.adb, sinput-p.ads: Remove obsolete
4956 project manager sources.
4958 2017-09-06 Ed Schonberg <schonberg@adacore.com>
4960 * sem_ch5.adb (Analyze_Assigment): If the left-hand side is an
4961 entity of a mutable type and the right-hand side is a conditional
4962 expression, resolve the alternatives of the conditional using
4963 the base type of the target entity, because the alternatives
4964 may have distinct subtypes. This is particularly relevant if
4965 the alternatives are aggregates.
4967 2017-09-06 Ed Schonberg <schonberg@adacore.com>
4969 * checks.adb (Apply_Predicate_Check): If the expression is an
4970 aggregate that is the RHS of an assignment, apply the check to
4971 the LHS after the assignment, rather than to the aggregate. This
4972 is more efficient than creating a temporary for the aggregate,
4973 and prevents back-end crashes when the aggregate includes a
4974 dynamic "others' association.
4976 2017-09-06 Yannick Moy <moy@adacore.com>
4978 * sem_ch12.adb (Analyze_Instance_And_Renamings):
4979 Set variable to ignore SPARK_Mode in instance before the analysis
4980 of the generated package declaration.
4982 2017-09-06 Yannick Moy <moy@adacore.com>
4984 * sem_res.adb (Resolve_Call): Do not issue a
4985 message for calls inside expression function, unless body was
4986 seen and is candidate for inlining.
4988 2017-09-06 Ed Schonberg <schonberg@adacore.com>
4990 * sem_aux.adb (Is_Generic_Formal): Handle properly formal packages.
4991 * sem_ch3.adb (Analyze_Declarations): In a generic subprogram
4992 body. do not freeze the formals of the generic unit.
4994 2017-09-06 Gary Dismukes <dismukes@adacore.com>
4996 * errout.adb (Error_Msg): Separate the
4997 treatment for warning vs. style messages in inlinings and
4998 instantiations. Prevents blowups on calls to Warn_Insertion for
4999 style messages, which should not be called in that case because
5000 Warning_Msg_Char is not set.
5002 2017-09-06 Justin Squirek <squirek@adacore.com>
5004 * sem_prag.adb (Check_VFA_Conflicts): Created
5005 to group all Volatile_Full_Access checks relating to other
5006 representation pragmas (Mark_Component_Or_Object): Created
5007 to centeralize the flagging of attributes for the record type
5008 component case, a pragma applied individually to a component, and
5010 (Process_Atomic_Independent_Shared_Volatile):
5011 Add propagation of certain pragmas to record components and move
5012 evaluation of VFA checks
5014 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5016 * sem_prag.adb (Check_Postcondition_Use_In_Inlined_Subprogram):
5017 Do not warn on conditions that are not obeyed for Inline_Always
5018 subprograms, when assertions are not enabled.
5020 2017-09-06 Arnaud Charlet <charlet@adacore.com>
5022 * sem_util.adb (Unique_Entity): For abstract states return their
5025 2017-09-06 Bob Duff <duff@adacore.com>
5027 * sem_ch12.adb (Copy_Generic_Node): When we copy a node
5028 that is a proper body corresponding to a stub, we defer the
5029 adjustment of the sloc until after the correct adjustment has
5030 been computed. Otherwise, Adjust_Instantiation_Sloc will ignore
5031 the adjustment, because it will be outside the range in (the old,
5032 incorrect) S_Adjustment.
5033 * inline.adb: Use named notation for readability and uniformity.
5034 * sinput-l.adb: Minor improvements to debugging output printed
5036 * sinput-l.ads (Create_Instantiation_Source): Minor comment
5039 2017-09-06 Vincent Celier <celier@adacore.com>
5041 * make.adb: Do not invoke gprbuild for -bargs -P.
5043 2017-09-06 Sylvain Dailler <dailler@adacore.com>
5045 * sem_eval.adb (Compile_Time_Known_Value_Or_Aggr): Adding a
5046 case when Op is of kind N_Qualified_Expression. In this case,
5047 the function is called recursively on the subexpression like in
5049 * make.adb: Minor reformatting
5051 2017-09-06 Justin Squirek <squirek@adacore.com>
5053 * einfo.adb (Set_Linker_Section_Pragma): Modify
5054 Set_Linker_Section_Pragma to be consistant with the "getter"
5055 Linker_Section_Pragma.
5056 * exp_ch5.adb (Expand_Formal_Container_Loop): Add proper error
5057 checking for container loops so that the index cursor is not
5058 directly changable by the user with the use of E_Loop_Parameter.
5059 * sem_ch5.adb (Analyze_Block_Statement): Revert previous change.
5060 * sem_warn.adb (Check_References): Revert previous change.
5062 2017-09-06 Bob Duff <duff@adacore.com>
5064 * exp_util.adb (Is_Displace_Call): Make sure it works for indirect
5067 2017-09-06 Yannick Moy <moy@adacore.com>
5069 * sem_prag.adb (Analyze_Depends_Global): Reinforce test on object
5070 declarations to only consider valid uses of Global/Depends those on
5071 single concurrent objects.
5073 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5075 * sem_ch13.adb (Check_Record_Representation_Clause): Give an
5076 error as soon as one of the specified components overlaps the
5079 2017-09-06 Arnaud Charlet <charlet@adacore.com>
5081 * sem_prag.ads: minor fix typo in comment.
5083 2017-09-06 Justin Squirek <squirek@adacore.com>
5085 * sem_ch5.adb (Analyze_Block_Statement): Verify a block comes
5086 from source before checking source references.
5087 * sem_warn.adb (Check_References): Add check for internal block
5090 2017-09-06 Vincent Celier <celier@adacore.com>
5092 * make.adb, makeusg.adb, switch-m.adb, switch-m.ads, make_util.adb,
5093 make_util.ads, sinput.adb, sinput.ads, clean.adb, gnatls.adb,
5094 gnatname.adb: Remove the Project Manager from the GNAT tools.
5095 * gcc-interface/Makefile.in: ditto.
5097 2017-09-06 Bob Duff <duff@adacore.com>
5099 * sem_util.ads: Minor comment fix.
5101 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5103 * sem_ch12.adb (Analyze_Associations, case of Formal_Package):
5104 Generate a freeze node for the actual of a formal package, if
5105 the actual is declared in the same unit and has a corresponding
5106 body, to prevent the current instance from being frozen before
5109 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5111 * sem_ch7.adb (Entity_Table_Size): Change to nearest prime number.
5113 2017-09-06 Yannick Moy <moy@adacore.com>
5115 * sem_warn.adb: Minor refactoring.
5117 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5119 * einfo.ads, einfo.adb (Get_Classwwide_Pragma): New utility,
5120 to retrieve the inherited classwide precondition/postcondition
5122 * freeze.adb (Freeze_Entity): Use Get_Classwide_Pragma when
5123 freezing a subprogram, to complete the generation of the
5124 corresponding checking code.
5126 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5128 * exp_util.adb (Is_Controlled_Indexing): New routine.
5129 (Is_Displace_Call): Use routine Strip to remove indirections.
5130 (Is_Displacement_Of_Object_Or_Function_Result): Code clean up. Add a
5131 missing case of controlled generalized indexing.
5132 (Is_Source_Object): Use routine Strip to remove indirections.
5133 (Strip): New routine.
5135 2017-09-06 Bob Duff <duff@adacore.com>
5137 * sysdep.c (__gnat_has_cap_sys_nice): If HAVE_CAPABILITY is defined,
5138 we include the proper header. Otherwise, we just declare the necessary
5139 things from the capabilities library. This is so we can build on
5140 machines without that library, while still enabling that library.
5141 At run time, we're using weak symbols, so __gnat_has_cap_sys_nice will
5142 simply return 0 if the library is not present, or not included
5145 2017-09-06 Pierre-Marie de Rodat <derodat@adacore.com>
5147 * exp_dbug.adb (Debug_Renaming_Declaration): Do not create an encoding
5148 for renamings that involve function calls in prefix form.
5150 2017-09-06 Bob Duff <duff@adacore.com>
5152 * sem_ch3.adb (Analyze_Subtype_Declaration):
5153 Set Has_Delayed_Freeze on a subtype of an incomplete type.
5155 2017-09-06 Pierre-Marie de Rodat <derodat@adacore.com>
5157 * par_sco.adb (Extend_Statement_Sequence): When the accept statement
5158 has no parameter specification and no entry index, use the entry name
5159 as the end of the generated SCO statement.
5161 2017-09-06 Steve Baird <baird@adacore.com>
5163 * exp_util.adb (Side_Effect_Free): For CodePeer (only) treat
5164 uses of 'Image and related attributes as having side effects in
5165 order to avoid replicating such uses.
5166 * pprint.ads (Expression_Image) Add new generic formal flag
5167 Hide_Temp_Derefs. The flag defaults to False; CodePeer will
5168 (eventually) override the default.
5169 * pprint.adb (Expression_Image) If the new flag is set, then
5170 suppress the ".all" suffix when displaying a dereference whose
5171 prefix is a use of a value-capturing compiler temp of the sort
5172 generated by Expr_Util.Remove_Side_Effects .
5173 * exp_attr.adb, g-catiio.adb, inline.adb, sem_attr.adb, sem_ch13.adb,
5174 sem_ch7.adb, sem_dim.adb, sem_util.adb, sem_util.ads, sem_warn.adb:
5176 * inline.adb: Minor wording change.
5178 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5180 * sem_ch7.adb: Update comment.
5182 2017-09-06 Yannick Moy <moy@adacore.com>
5184 * einfo.adb, einfo.ads (Is_Subprogram_Or_Entry): New predicate.
5185 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Use new function.
5186 * sem_util.adb, sem_util.ads (Within_Protected_Type): Renaming
5187 with slight modification from Is_Subp_Or_Entry_Inside_Protected,
5188 so that applies to any entity.
5190 2017-09-06 Yannick Moy <moy@adacore.com>
5192 * sem_ch3.adb (Derived_Type_Declaration): Use
5193 Incomplete_Or_Partial_View rather than local Find_Partial_View.
5195 2017-09-06 Javier Miranda <miranda@adacore.com>
5197 * g-catiio.ads, g-catiio.adb (Value): Extended to parse an UTC time
5200 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5202 * sem_dim.adb (Analyze_Dimension): In an instance, a type
5203 conversion takes its dimensions from the expression, not from
5205 (Dimensions_Of_Operand): Ditto.
5207 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5209 * exp_ch6.adb (Expand_Call_Helper): Do not optimize calls to
5210 null procedures when GNAT coverage is used, so that their (empty)
5211 bodies are properly covered.
5213 2017-09-06 Bob Duff <duff@adacore.com>
5215 * sem_ch13.adb (Resolve_Aspect_Expressions): If
5216 the entity is a type with discriminants, make the discriminants
5217 directly visible in aspect clauses.
5219 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5221 * sem_res.adb (Resolve_Arithmentic_Op): If both operands are
5222 Universal_Real and the context is a floating-point type, resolve
5223 both operands to the target type.
5225 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5227 * a-comlin.adb, exp_aggr.adb, exp_ch6.adb, frontend.adb, gnatbind.adb,
5228 sem_ch3.adb, sem_util.adb: Minor reformatting.
5230 2017-09-06 Yannick Moy <moy@adacore.com>
5232 * freeze.adb (Check_Inherited_Conditions): Rewriting
5233 of inherited preconditions and postconditions should only occur
5234 in GNATprove mode, that is, when GNATprove_Mode is True, not to
5235 be confused with SPARK_Mode being On.
5237 2017-09-06 Yannick Moy <moy@adacore.com>
5239 * sem_warn.adb (Check_References): Take into
5240 account possibility of attribute reference as original node.
5242 2017-09-06 Yannick Moy <moy@adacore.com>
5244 * exp_attr.adb (Expand_N_Attribute_Reference): Protect against invalid
5247 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5249 * inline.adb (Split_Unconstrained_Function): Also set Is_Inlined
5250 on the procedure created to encapsulate the body.
5251 * sem_ch7.adb: Add with clause for GNAT.HTable.
5252 (Entity_Table_Size): New constant.
5253 (Entity_Hash): New function.
5254 (Subprogram_Table): New instantiation of GNAT.Htable.Simple_HTable.
5255 (Is_Subprogram_Ref): Rename into...
5256 (Scan_Subprogram_Ref): ...this. Record references to subprograms in
5257 the table instead of bailing out on them. Scan the value of constants
5258 if it is not known at compile time.
5259 (Contains_Subprograms_Refs): Rename into...
5260 (Scan_Subprogram_Refs): ...this.
5261 (Has_Referencer): Scan the body of all inlined subprograms. Reset the
5262 Is_Public flag on subprograms if they are not actually referenced.
5263 (Hide_Public_Entities): Beef up comment on the algorithm.
5264 Reset the table of subprograms on entry.
5266 2017-09-06 Yannick Moy <moy@adacore.com>
5268 * inline.adb: Add comments to Can_Be_Inlined_In_GNATprove_Mode.
5270 2017-09-06 Javier Miranda <miranda@adacore.com>
5272 * exp_aggr.adb (Component_Not_OK_For_Backend): The C backend
5273 cannot handle a type conversion of an array as an aggregate
5276 2017-09-06 Bob Duff <duff@adacore.com>
5278 * g-comlin.adb (Try_Help): Remove ".exe" so we
5279 get the same results on windows and unix.
5281 2017-09-06 Justin Squirek <squirek@adacore.com>
5283 * exp_imgv.adb (Expand_Image_Attribute),
5284 (Expand_Wide_Image_Attribute), (Expand_Wide_Wide_Image_Attribute):
5285 Added case to handle new-style 'Image expansion
5286 (Rewrite_Object_Image): Moved from exp_attr.adb
5287 * exp_attr.adb (Expand_N_Attribute_Reference): Modified Image
5288 attribute cases so that the relevant subprograms in exp_imgv.adb
5289 handle all expansion.
5290 (Rewrite_Object_Reference_Image): Moved to exp_imgv.adb
5291 * sem_attr.adb (Analyze_Attribute): Modified Image attribute
5292 cases to call common function Analyze_Image_Attribute.
5293 (Analyze_Image_Attribute): Created as a common path for all
5294 image attributes (Check_Object_Reference_Image): Removed
5295 * sem_util.ads, sem_util.adb (Is_Image_Applied_To_Object):
5296 Removed and refactored into Is_Object_Image (Is_Object_Image):
5297 Created as a replacement for Is_Image_Applied_To_Object
5299 2017-09-06 Yannick Moy <moy@adacore.com>
5301 * sem_prag.adb (Analyze_Depends_In_Decl_Part): Add continuation
5302 message for missing input.
5304 2017-09-06 Yannick Moy <moy@adacore.com>
5306 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Prevent inlining
5307 of protected subprograms and entries.
5308 * sem_util.adb, sem_util.ads (Is_Subp_Or_Entry_Inside_Protected):
5309 New function to detect when a subprogram of entry is defined
5310 inside a protected object.
5312 2017-09-06 Bob Duff <duff@adacore.com>
5314 * sysdep.c (__gnat_has_cap_sys_nice): New function to determine
5315 whether the current process has the CAP_SYS_NICE capability.
5316 * s-taprop-linux.adb (Get_Ceiling_Support): Update this to allow
5317 ceiling priorities if the current process has the CAP_SYS_NICE
5320 2017-09-06 Bob Duff <duff@adacore.com>
5322 * a-comlin.ads, a-comlin.adb (Argument): Move the constraint
5323 check back to the body, because SPARK is not yet ready for
5324 "or else raise Constraint_Error".
5326 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5328 * exp_ch6.adb (Expand_Call_Helper): Replace call to null
5329 procedure by a single null statement, after evaluating the
5330 actuals that require it.
5332 2017-09-06 Javier Miranda <miranda@adacore.com>
5334 * exp_aggr.adb (Backend_Processing_Possible.Component_Check):
5335 Generating C code improve the code that checks the use of nested
5336 aggregates to initialize object declarations.
5338 2017-09-06 Yannick Moy <moy@adacore.com>
5340 * sem_ch3.adb (Derived_Type_Declaration): Detect
5341 violations of new rule SPARK RM 3.4(1). Also refactor existing
5342 check to use the new function Find_Partial_View.
5344 2017-09-06 Vincent Celier <celier@adacore.com>
5346 * gnatcmd.adb: gnat ls -V -P... invokes gprls -V -P... The code
5347 from the Prj hierarchy has been removed from the GNAT driver.
5349 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5351 * sem_type.adb (Interface_Present_In_Ancestor): Within an
5352 expression function, or within a spec expression (default value,
5353 etc) a reference to an incomplete type is legal: legality of
5354 the operation will be checked when some related entity (type,
5355 object or subprogram) is frozen.
5357 2017-09-06 Gary Dismukes <dismukes@adacore.com>
5359 * exp_ch5.adb, s-diinio.ads, sem_ch4.adb, s-diflio.ads: Minor spelling
5360 adjustments and a typo fix.
5362 2017-09-06 Yannick Moy <moy@adacore.com>
5364 * sem_res.adb (Resolve_Call): Do not issue info
5365 message about inlining of calls to functions in assertions,
5366 for functions whose body has not been seen yet.
5368 2017-09-06 Bob Duff <duff@adacore.com>
5370 * a-comlin.ads, a-comlin.adb (Argument): Simplify the code, now that
5371 we can use modern Ada in this package.
5372 * s-resfil.ads, s-resfil.adb, a-clrefi.ads, a-clrefi.adb:
5373 Move Ada.Command_Line.Response_File to System.Response_File,
5374 and make Ada.Command_Line.Response_File into a rename of
5375 System.Response_File. This is to avoid having gnatbind depend
5376 Ada.Command_Line, which would damage the bootstrap process now
5377 that Ada.Command_Line contains modern Ada (the raise expression).
5378 * gnatbind.adb: Avoid dependence on
5379 Ada.Command_Line. Depend on System.Response_File instead
5380 of Ada.Command_Line.Response_File. Change one call to
5381 Ada.Command_Line.Command_Name to use Fill_Arg. Change one call
5382 to Ada.Command_Line.Argument_Count to use Arg_Count.
5383 * gcc-interface/Make-lang.in, Makefile.rtl: Take note of the new files.
5385 2017-09-06 Bob Duff <duff@adacore.com>
5387 * frontend.adb (Frontend): Skip -gnatec=gnat.adc
5388 switch, because we've already read gnat.adc by default.
5390 2017-09-06 Bob Duff <duff@adacore.com>
5392 * exp_ch5.adb (Get_Default_Iterator): Replace
5393 "Assert(False)" with "return Iter", because if an iterable
5394 type is derived from a noniterable one, then we won't find an
5395 overriding or inherited default iterator.
5397 2017-09-06 Yannick Moy <moy@adacore.com>
5399 * sem_warn.adb (Warn_On_Suspicious_Index): Improve warning when the
5400 literal index used to access a string is null or negative.
5402 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5404 * einfo.adb (Status_Flag_Or_Transient_Decl): The attribute is now
5405 allowed on loop parameters.
5406 (Set_Status_Flag_Or_Transient_Decl): The attribute is now allowed
5408 (Write_Field15_Name): Update the output for
5409 Status_Flag_Or_Transient_Decl.
5410 * einfo.ads: Attribute Status_Flag_Or_Transient_Decl now applies
5411 to loop parameters. Update the documentation of the attribute
5412 and the E_Loop_Parameter entity.
5413 * exp_ch7.adb (Process_Declarations): Remove the bogus guard
5414 which assumes that cursors can never be controlled.
5415 * exp_util.adb (Requires_Cleanup_Actions): Remove the bogus
5416 guard which assumes that cursors can never be controlled.
5418 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5420 * exp_attr.adb, sem_util.adb, sem_attr.adb, sem_ch6.adb, sem_ch8.adb,
5421 sem_warn.adb: Minor reformatting.
5423 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5425 * sem_warn.adb (Warn_On_Overlapping_Actuals): Refine previous
5426 fix and preserve older GNAT warning on overlapping actuals that
5427 are not elementary types.
5429 2017-09-06 Justin Squirek <squirek@adacore.com>
5431 * sem_attr.adb: Comment correction.
5433 2017-09-06 Gary Dismukes <dismukes@adacore.com>
5435 * sem_util.adb: Minor reformatting.
5437 2017-09-06 Yannick Moy <moy@adacore.com>
5439 * a-comlin.ads (Argument): Add precondition for analysis.
5441 2017-09-06 Yannick Moy <moy@adacore.com>
5443 * sem_res.adb (Resolve): Update message for function call as statement.
5445 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5447 * sem_ch6.adb (Check_Returns): Clean up warnings coming from
5448 generated bodies for renamings that are completions, when renamed
5449 procedure is No_Return.
5450 * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
5451 rule in 6.5.1 (7/2): if a renaming is a completion of a subprogram
5452 with No_Return, the renamed entity must be No_Return as well.
5454 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5456 * exp_ch5.adb, freeze.adb, exp_ch4.adb, exp_ch6.adb, lib-xref.adb:
5459 2017-09-06 Justin Squirek <squirek@adacore.com>
5461 * exp_attr.adb (Expand_N_Attribute_Reference): Modified Image
5462 attribute cases (Rewrite_Object_Reference_Image): Created to
5463 aid the rewriting of new-style 'Image attributes.
5464 * sem_attr.adb (Analyze_Attribute): Modified Image attribute cases
5465 (Check_Object_Reference_Image): Created to handle verification of
5466 'Image with object-references as prefixes.
5467 * sem_util.ads, sem_util.adb (Is_Image_Applied_To_Object):
5468 Create predicate to identify cases where an 'Image attribute's
5469 prefix applies to an object reference.
5471 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5473 * freeze.adb (Freeze_Entity): Do not generate a freeze
5474 node for a generic unit, even if it includes delayed aspect
5475 specifications. Freeze nodes for generic entities must never
5476 appear in the tree that reaches the back-end of the compiler.
5478 2017-09-06 Yannick Moy <moy@adacore.com>
5480 * treepr.adb (Print_Entity_Info): Do not print empty Elist.
5482 2017-09-06 Yannick Moy <moy@adacore.com>
5484 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Do not consider calls
5485 to subprograms in other units as possibly inlined.
5487 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5489 * freeze.adb (Freeze_Entity): For a derived type that has no
5490 explicit delayed aspects but may inherit delayed aspects from its
5491 parent type, analyze aspect at freeze point for proper capture
5492 of an inherited aspect.
5494 2017-09-06 Arnaud Charlet <charlet@adacore.com>
5496 * lib-xref.adb (Get_Through_Renamings): Get through subprogram
5497 renamings; also, avoid repeated calls to Renamed_Object when getting
5498 through object renamings.
5500 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5502 * sem_ch3.adb (Array_Type_Declaration): Handle properly an
5503 array type declaration in a private part, when an index is a
5504 subtype indication of a discrete type with a private partial view.
5506 2017-09-06 Javier Miranda <miranda@adacore.com>
5508 * exp_ch4.adb (Expand_Modular_Op): Force generating
5509 temporary to improve the generated code.
5511 2017-09-06 Tristan Gingold <gingold@adacore.com>
5513 * s-fatgen.adb: Minor typo fix in comment.
5515 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5517 * exp_ch5.adb (Make_Field_Assign): If the type
5518 of the right-hand side has stored constraint, use its values
5519 (except for those that are renamings of parent discriminants)
5520 to produce additional assignments for the discriminants of the
5521 left-hand side, which are invisible in the righ-hand side and
5522 not retrievable as selected components.
5524 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5526 * sem_util.adb (Needs_One_Formal): The first formal of such a
5527 function must be a controlling formal, so that Obj.F (X, Y)
5528 can have the interpretation F(Obj)(X, Y).
5529 * sem_util.ads: Clarify documentation.
5531 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5533 * table.ads, table.adb: Restore original implementation.
5534 * namet.h (Names_Ptr): Adjust back.
5535 (Name_Chars_Ptr): Likewise.
5536 * uintp.h (Uints_Ptr): Likewise.
5537 (Udigits_Ptr): Likewise.
5538 * g-table.ads: Remove pragma Compiler_Unit_Warning.
5539 * par_sco.adb: Do not with GNAT.Table and use Table consistently.
5540 * scos.ads: Replace GNAT.Table with Table and adjust instantiations.
5541 * spark_xrefs.ads: Likewise.
5542 * scos.h: Undo latest changes.
5544 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5546 * sem_ch12.adb (Analyze_Subprogram_Instantiation): Propagate
5547 No_Return flag to instance if pragma applies to generic unit. This
5548 must be done explicitly because the pragma does not appear
5549 directly in the generic declaration (unlike the corresponding
5550 aspect specification).
5552 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5554 * sem_ch7.adb (Has_Referencer): Move up and expand comment
5555 explaining the test used to detect inlining. Use same test
5556 in second occurrence.
5557 (Analyze_Package_Body_Helper): Minor formatting fixes.
5559 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5561 * exp_ch4.adb (Handle_Changed_Representation): For an untagged
5562 derived type with a mixture of renamed and constrained parent
5563 discriminants, the constraint for the target must obtain the
5564 discriminant values from both the operand and from the stored
5565 constraint for it, given that the constrained discriminants are
5566 not visible in the object.
5567 * exp_ch5.adb (Make_Field_Assign): The type of the right-hand
5568 side may be derived from that of the left-hand side (as in the
5569 case of an assignment with a change of representation) so the
5570 discriminant to be used in the retrieval of the value of the
5571 component must be the entity in the type of the right-hand side.
5573 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5575 * sem_ch3.adb, sem_ch7.adb, sem_util.adb, g-debpoo.adb, sem_ch4.adb,
5576 sem_ch6.adb, sem_ch8.adb: Minor reformatting.
5577 * exp_util.adb (Is_Source_Object): Account for
5578 the cases where the source object may appear as a dereference
5579 or within a type conversion.
5580 * exp_ch6.adb: Fix missing space in error message.
5582 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5584 * sem_prag.adb: Update description of Eliminate.
5586 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5588 * sem_attr.adb (Analyze_Attribute, case 'Loop_Entry): Handle
5589 properly an attribute reference 'Loop_Entry that appears in the
5590 list of indices of an indexed expression, to prevent an infinite
5591 loop in the compiler.
5593 2017-09-06 Bob Duff <duff@adacore.com>
5595 * s-fileio.adb (Name): Do not raise Use_Error for temp files.
5597 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5599 * sem_ch4.adb (Analyze_Set_Membership): If an alternative
5600 in a set membership is an overloaded enumeration literal, and
5601 the type of the alternative is resolved from a previous one,
5602 replace the entity of the alternative as well as the type,
5603 to prevent inconsistencies between the entity and the type.
5605 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5607 * ali.ads (ALIs_Record): Add No_Component_Reordering component.
5608 (No_Component_Reordering_Specified): New switch.
5609 * ali.adb (Initialize_ALI): Set No_Component_Reordering_Specified.
5610 (Scan_ALI): Set No_Component_Reordering and deal with NC marker.
5611 * bcheck.adb (Check_Consistent_No_Component_Reordering):
5613 (Check_Configuration_Consistency): Invoke it.
5614 * debug.adb (d.r): Toggle the effect of the switch.
5615 (d.v): Change to no-op.
5616 * einfo.ads (Has_Complex_Representation):
5617 Restrict to record types.
5618 (No_Reordering): New alias for Flag239.
5619 (OK_To_Reorder_Components): Delete.
5620 (No_Reordering): Declare.
5621 (Set_No_Reordering): Likewise.
5622 (OK_To_Reorder_Components): Delete.
5623 (Set_OK_To_Reorder_Components): Likewise.
5624 * einfo.adb (Has_Complex_Representation): Expect record types.
5625 (No_Reordering): New function.
5626 (OK_To_Reorder_Components): Delete.
5627 (Set_Has_Complex_Representation): Expect base record types.
5628 (Set_No_Reordering): New procedure.
5629 (Set_OK_To_Reorder_Components): Delete.
5630 (Write_Entity_Flags): Adjust to above change.
5631 * fe.h (Debug_Flag_Dot_R): New macro and declaration.
5632 * freeze.adb (Freeze_Record_Type): Remove conditional code setting
5633 OK_To_Reorder_Components on record types with convention Ada.
5634 * lib-writ.adb (Write_ALI): Deal with NC marker.
5635 * opt.ads (No_Component_Reordering): New flag.
5636 (No_Component_Reordering_Config): Likewise.
5637 (Config_Switches_Type): Add No_Component_Reordering component.
5638 * opt.adb (Register_Opt_Config_Switches): Copy
5639 No_Component_Reordering onto No_Component_Reordering_Config.
5640 (Restore_Opt_Config_Switches): Restore No_Component_Reordering.
5641 (Save_Opt_Config_Switches): Save No_Component_Reordering.
5642 (Set_Opt_Config_Switches): Set No_Component_Reordering.
5643 * par-prag.adb (Prag): Deal with Pragma_No_Component_Reordering.
5644 * sem_ch3.adb (Analyze_Private_Extension_Declaration): Also set the
5645 No_Reordering flag from the default.
5646 (Build_Derived_Private_Type): Likewise.
5647 (Build_Derived_Record_Type): Likewise. Then inherit it
5648 for untagged types and clean up handling of similar flags.
5649 (Record_Type_Declaration): Likewise.
5650 * sem_ch13.adb (Same_Representation): Deal with No_Reordering and
5651 remove redundant test on Is_Tagged_Type.
5652 * sem_prag.adb (Analyze_Pragma): Handle No_Component_Reordering.
5653 (Sig_Flags): Likewise.
5654 * snames.ads-tmpl (Name_No_Component_Reordering): New name.
5655 (Pragma_Id): Add Pragma_No_Component_Reordering value.
5656 * warnsw.adb (Set_GNAT_Mode_Warnings): Enable -gnatw.q as well.
5657 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>:
5658 Copy the layout of the parent type only if the No_Reordering
5660 (components_to_record): Reorder record types with
5661 convention Ada by default unless No_Reordering is set or -gnatd.r
5662 is specified and do not warn if No_Reordering is set in GNAT mode.
5664 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5666 * sem_util.ads, sem_util.adb (Check_Previous_Null_Procedure):
5667 new predicate to reject declarations that can be completions,
5668 when there is a visible prior homograph that is a null procedure.
5669 * sem_ch6.adb (Analyze_Null_Procedure): use it.
5670 * sem_ch8.adb (Analyze_Subprogram_Renaming): ditto.
5672 2017-09-06 Thomas Quinot <quinot@adacore.com>
5674 * s-regpat.adb (Compile.Parse_Literal): Fix handling of literal
5675 run of 253 characters or more.
5677 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5679 * einfo.adb (Designated_Type): Use Is_Incomplete_Type to handle
5680 properly incomplete subtypes that may be created by explicit or
5681 implicit declarations.
5682 (Is_Base_Type): Take E_Incomplete_Subtype into account.
5683 (Subtype_Kind): Ditto.
5684 * sem_ch3.adb (Build_Discriminated_Subtype): Set properly the
5685 Ekind of a subtype of a discriminated incomplete type.
5686 (Fixup_Bad_Constraint): Use Subtype_Kind in all cases, including
5687 incomplete types, to preserve error reporting.
5688 (Process_Incomplete_Dependents): Do not create a subtype
5689 declaration for an incomplete subtype that is created internally.
5690 * sem_ch7.adb (Analyze_Package_Specification): Handle properly
5691 incomplete subtypes that do not require a completion, either
5692 because they are limited views, of they are generic actuals.
5694 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5696 * checks.adb (Insert_Valid_Check): Remove the
5697 suspicious manipulation of the Do_Range_Check flag as ths is
5698 no linger needed. Suppress validity check when analysing the
5699 validation variable.
5701 2017-09-06 Philippe Gil <gil@adacore.com>
5703 * g-debpoo.adb: adapt GNAT.Debug_Pools to allow safe thread
5706 2017-09-06 Bob Duff <duff@adacore.com>
5708 * sem_elim.adb: Minor comment fix.
5710 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5712 * sem_util.adb (Is_Object_Reference): A function call is an
5713 object reference, and thus attribute references for attributes
5714 that are functions (such as Pred and Succ) as well as predefined
5715 operators are legal in contexts that require an object, such as
5716 the prefix of attribute Img and the Ada2020 version of 'Image.
5718 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5720 * exp_util.adb, einfo.adb, sem_attr.adb, exp_ch4.adb, gnatls.adb,
5721 exp_ch3.adb, xoscons.adb: Minor reformatting.
5723 2017-09-06 Raphael Amiard <amiard@adacore.com>
5725 * a-chtgop.ads, a-chtgop.adb: Add versions of First and Next with
5726 Position parameter. If supplied, use it to provide efficient iteration.
5727 * a-cohase.ads, a-cohase.adb, a-cihama.ads, a-cihama.adb,
5728 a-cohama.ads, a-cohama.adb: Add/Use Position to provide efficient
5731 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5733 * exp_util.adb (Build_Allocate_Deallocate_Proc): If the
5734 designated type is class-wide and the expression is an unchecked
5735 conversion, preserve the conversion when checking the tag of the
5736 designated object, to prevent spurious semantic errors when the
5737 expression in the conversion has an untagged type (for example
5738 an address attribute).
5740 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5742 * sem_res.adb (Resolve_Entry_Call): Check whether a protected
5743 operation is subject to a pragma Eliminate.
5745 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5747 * sem_elim.ads, exp_ch4.adb: Minor reformatting.
5749 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5751 * fe.h (Eliminate_Error_Msg): Remove.
5753 2017-09-05 Richard Sandiford <richard.sandiford@linaro.org>
5755 * gcc-interface/utils.c (make_packable_type): Update call to
5758 2017-09-05 Richard Sandiford <richard.sandiford@linaro.org>
5760 * gcc-interface/utils2.c (build_load_modify_store):
5761 Use int_mode_for_size.
5763 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5766 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
5767 for Itypes that are E_Record_Subtype with a cloned subtype.
5768 <E_Record_Subtype>: Use the DECL of the cloned type directly, if any.
5770 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5772 * gcc-interface/trans.c (convert_with_check): Use a custom base type
5773 if the base type of the expression has a different machine mode.
5774 Rename a couple of parameters and local variable.
5776 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5778 * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Address>: Do not strip
5779 conversions around prefixes that are not references.
5781 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5783 * gcc-interface/utils.c (unchecked_convert): When the result type is a
5784 non-biased integral type with size 0, set the result to 0 directly.
5786 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5788 * gcc-interface/gigi.h (renaming_from_generic_instantiation_p): Turn to
5789 (renaming_from_instantiation_p): ...this.
5790 * gcc-interface/decl.c (gnat_to_gnu_entity): Use inline predicate
5791 instead of explicit tests on kind of entities. Adjust for renaming.
5792 (gnat_to_gnu_profile_type): Likewise.
5793 (gnat_to_gnu_subprog_type): Likewise.
5794 * gcc-interface/trans.c (Identifier_to_gnu): Likewise.
5795 (Case_Statement_to_gnu): Likewise.
5796 (gnat_to_gnu): Likewise.
5797 (process_freeze_entity): Likewise.
5798 (process_type): Likewise.
5799 (add_stmt_with_node): Adjust for renaming.
5800 * gcc-interface/utils.c (gnat_pushdecl): Adjust for renaming.
5801 (renaming_from_generic_instantiation_p): Rename to...
5802 (renaming_from_instantiation_p): ...this. Use inline predicate.
5803 (pad_type_hasher::keep_cache_entry): Fold.
5805 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5807 * gcc-interface/trans.c (adjust_for_implicit_deref): New function.
5808 (gnat_to_gnu) <N_Explicit_Dereference>: Translate result type first.
5809 (N_Indexed_Component): Invoke adjust_for_implicit_deref on the prefix.
5810 (N_Slice): Likewise.
5811 (N_Selected_Component): Likewise. Do not try again to translate it.
5812 (N_Free_Statement): Invoke adjust_for_implicit_deref on the expression.
5814 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5816 * repinfo.ads: Document new treatment of dynamic values.
5817 (TCode): Bump upper bound to 29.
5818 (Dynamic_Val): New constant set to 29.
5819 * repinfo.adb (Print_Expr) <Dynamic_Val>: New case.
5820 (Rep_Value) <Dynamic_Val>: Likewise.
5821 * repinfo.h (Dynamic_Val): New macro.
5822 * gcc-interface/decl.c (annotate_value): Tidy up and cache result for
5824 <INTEGER_CST>: Set TCODE instead of recursing.
5825 <COMPONENT_REF>: Set TCODE instead of calling Create_Node manually.
5826 <VAR_DECL>: New case.
5827 <MULT_EXPR, PLUS_EXPR>: Fold conversions into inner operations.
5828 <BIT_AND_EXPR>: Adjust.
5829 <CALL_EXPR>: Do not fall through.
5831 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5833 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
5834 there is no target, do not create a temporary for the return value for
5835 an allocator either.
5837 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5839 * gcc-interface/trans.c (pos_to_constructor): Skip conversions to an
5840 unconstrained array type.
5842 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5843 Alan Hayward <alan.hayward@arm.com>
5844 David Sherwood <david.sherwood@arm.com>
5846 * gcc-interface/decl.c (validate_size): Use NARROWEST_INT_MODE
5847 instead of GET_CLASS_NARROWEST_MODE (MODE_INT).
5849 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5850 Alan Hayward <alan.hayward@arm.com>
5851 David Sherwood <david.sherwood@arm.com>
5853 * gcc-interface/decl.c (check_ok_for_atomic_type): Use
5854 is_a <scalar_int_mode>.
5855 * gcc-interface/trans.c (Pragma_to_gnu): Likewise.
5856 * gcc-interface/utils.c (gnat_type_for_mode): Likewise.
5858 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5859 Alan Hayward <alan.hayward@arm.com>
5860 David Sherwood <david.sherwood@arm.com>
5862 * gcc-interface/decl.c (gnat_to_gnu_entity): Use int_mode_for_size
5863 instead of mode_for_size.
5864 (gnat_to_gnu_subprog_type): Likewise.
5865 * gcc-interface/utils.c (make_type_from_size): Likewise.
5867 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5868 Alan Hayward <alan.hayward@arm.com>
5869 David Sherwood <david.sherwood@arm.com>
5871 * gcc-interface/misc.c (fp_prec_to_size): Use opt_scalar_float_mode.
5872 (fp_size_to_prec): Likewise.
5874 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5875 Alan Hayward <alan.hayward@arm.com>
5876 David Sherwood <david.sherwood@arm.com>
5878 * gcc-interface/utils.c (gnat_type_for_mode): Use is_a
5879 <scalar_float_mode> instead of SCALAR_FLOAT_MODE_P.
5881 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5882 Alan Hayward <alan.hayward@arm.com>
5883 David Sherwood <david.sherwood@arm.com>
5885 * gcc-interface/decl.c (validate_size): Update use of
5886 GET_MODE_WIDER_MODE, forcing a wider mode to exist.
5888 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5889 Alan Hayward <alan.hayward@arm.com>
5890 David Sherwood <david.sherwood@arm.com>
5892 * gcc-interface/misc.c (fp_prec_to_size): Use new mode iterators.
5893 (fp_size_to_prec): Likewise.
5895 2017-08-29 Martin Liska <mliska@suse.cz>
5898 * gcc-interface/trans.c (Pragma_to_gnu): Set argument to NULL.
5900 2017-08-08 Martin Liska <mliska@suse.cz>
5902 * gcc-interface/trans.c: Include header files.
5904 2017-07-29 Jakub Jelinek <jakub@redhat.com>
5906 * gcc-interface/utils.c (gnat_write_global_declarations): Pass false
5907 as new argument to the imported_module_or_decl debug hook.
5909 2017-07-25 Javier Miranda <miranda@adacore.com>
5911 * checks.adb (Apply_Divide_Checks): Ensure that operands are not
5914 2017-07-19 Jakub Jelinek <jakub@redhat.com>
5916 * gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE,
5917 TYPE_GCC_MIN_VALUE): Use TYPE_MIN_VALUE_RAW instead of TYPE_MINVAL.
5918 (TYPE_GCC_MAX_VALUE): Use TYPE_MAX_VALUE_RAW instead of TYPE_MAXVAL.
5920 2017-07-18 Mike Frysinger <vapier@chromium.org>
5922 * gcc-interface/Makefile.in (../../gnatmake$(exeext)): Delete $(P).
5923 (../../gnatlink$(exeext)): Likewise.
5925 2017-07-15 John Paul Adrian Glaubitz <glaubitz@physik.fu-berlin.de>
5928 * system-linux-m68k.ads: Add pragma No_Elaboration_Code_All.
5929 (Backend_Overflow_Checks): Set to True.
5931 2017-06-23 Jakub Jelinek <jakub@redhat.com>
5933 * gcc-interface/trans.c (gnat_to_gnu): Initialize sync to false.
5935 2017-06-21 Pierre-Marie de Rodat <derodat@adacore.com>
5937 * gcc-interface/ada-tree.h (DECL_FUNCTION_IS_DEF): Update copyright
5939 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Tag the subprogram
5941 (Compilation_Unit_to_gnu): Tag the elaboration procedure as a
5943 * gcc-interface/decl.c (gnat_to_gnu_entity): Tag declarations of
5944 imported subprograms for the current compilation unit as
5945 definitions. Disable debug info for references to variables.
5946 * gcc-interface/gigi.h (create_subprog_decl): Update declaration.
5947 * gcc-interface/utils.c (gnat_pushdecl): Add external DECLs that are
5948 not built-in functions to their binding scope.
5949 (create_subprog_decl): Add a DEFINITION parameter. If it is true, tag
5950 the function as a definition. Update all callers.
5951 (gnat_write_global_declarations): Emit debug info for imported
5952 functions. Filter out external variables for which debug info
5955 2017-06-15 Nicolas Boulenguez <nicolas.boulenguez@free.fr>
5958 * gcc-interface/Makefile.in (x86 kfreebsd): Adjust system.ads setting.
5959 (i[3456]86-pc-gnu): Likewise.
5960 (x86_64 kfreebsd): Likewise.
5962 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
5965 * exp_ch3.adb (Make_Predefined_Primitive_Specs): Use Positive index.
5967 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
5970 * s-interr-hwint.adb: Reinstate.
5971 * gcc-interface/Makefile.in (RTEMS): Use it again.
5973 2017-06-08 Olivier Hainque <hainque@adacore.com>
5975 * vx_crtbegin_auto.c: Update year in copyright notice.
5976 * vx_crtbegin.c: Likewise.
5977 * vx_crtbegin.inc: Likewise.
5978 * vx_crtend.c: Likewise.
5980 2017-06-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
5982 * Makefile.in (rtems): Use TLS implementation for s-tpopsp.adb.
5983 * s-tpopsp-rtems.adb: Delete.
5985 2017-06-02 Olivier Hainque <hainque@adacore.com>
5987 * vx_crtbegin_auto.c: New file.
5988 * vx_crtbegin.c: New file.
5989 * vx_crtbegin.inc: New file.
5990 * vx_crtend.c: New file.
5992 2017-05-25 Jonathan Wakely <jwakely@redhat.com>
5994 * gcc-interface/utils2.c (compare_elmt_bitpos): Remove redundant
5995 const qualifiers that cause -Wignored-qualifiers warnings.
5997 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
5999 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
6000 for Itypes that are E_Access_Subtype.
6001 <E_Access_Subtype>: Use the DECL of the base type directly.
6003 2017-05-22 Ed Schonberg <schonberg@adacore.com>
6004 Eric Botcazou <ebotcazou@adacore.com>
6006 * sem_ch4.adb (Analyze_Call): In Ada2012 an incomplete type from a
6007 limited view may appear in the profile of a function, and a call to
6008 that function in another unit in which the full view is available must
6009 use this full view to spurious type errors at the point of call.
6010 * inline.adb (Analyze_Inlined_Bodies): Remove restriction on loading
6011 of parent body with a with clause for the main unit.
6012 * gcc-interface/decl.c (defer_limited_with_list): Document new usage.
6013 (gnat_to_gnu_entity) <E_Access_Type>: Handle completed Taft Amendment
6014 types declared in external units like types from limited with clauses.
6015 Adjust final processing of defer_limited_with_list accordingly.
6016 * gcc-interface/trans.c (gnat_to_gnu) < N_Selected_Component>: Try
6017 again to translate the prefix after the field if it is incomplete.
6019 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
6021 * gcc-interface/decl.c (gnat_to_gnu_field): Do not enforce strict
6022 alignment for simple volatile fields and remove associated errors.
6024 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6026 * gcc-interface/gigi.h (get_elaboration_procedure): Delete.
6027 * gcc-interface/trans.c (get_elaboration_procedure): Make static.
6029 2017-05-15 Pierre-Marie de Rodat <derodat@adacore.com>
6031 * gcc-interface/utils.c (can_materialize_object_renaming_p):
6032 Synchronize with GNAT's Exp_Dbug.Debug_Renaming_Declaration:
6033 process Original_Node instead of expanded names.
6035 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6037 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Only apply the
6038 addressability check in the constrained case.
6040 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6042 * gcc-interface/trans.c (Identifier_to_gnu): Also accept incomplete
6043 types not coming from a limited context.
6045 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6047 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Skip subprograms on
6048 the inlined list that are not public.
6049 * gcc-interface/utils.c (create_subprog_decl): Clear TREE_PUBLIC if
6050 there is a pragma Inline_Always on the subprogram.
6052 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6054 * gcc-interface/trans.c (gnat_to_gnu) <N_Aggregate>: Fix formatting.
6055 <N_Allocator>: Use properly typed constants.
6056 (extract_values): Move around.
6057 (pos_to_constructor): Minor tweaks.
6058 (Sloc_to_locus): Fix formatting.
6059 * gcc-interface/utils.c (process_deferred_decl_context): Minor tweaks.
6060 * gcc-interface/gigi.h (MARK_VISITED): Remove blank line.
6061 (Gigi_Equivalent_Type): Adjust head comment.
6062 * gcc-interface/decl.c (Gigi_Equivalent_Type): Likewise.
6064 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6066 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: When there
6067 is a representation clause on an extension, propagate the alignment of
6068 the parent type only if the platform requires strict alignment.
6070 2017-05-12 Eric Botcazou <ebotcazou@adacore.com>
6072 * system-linux-arm.ads (Memory_Size): Use Long_Integer'Size
6073 instead of Word_Size.
6076 2017-03-28 Andreas Schwab <schwab@suse.de>
6079 * system-linux-aarch64-ilp32.ads: New file.
6080 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
6081 from LIBGNAT_TARGET_PAIRS.
6082 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
6083 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
6084 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
6085 or -mabi=ilp32, resp.
6087 2017-05-10 H.J. Lu <hongjiu.lu@intel.com>
6090 * system-linux-x86.ads (Memory_Size): Use Long_Integer'Size
6091 instead of Word_Size.
6093 2017-05-10 Bernd Edlinger <bernd.edlinger@hotmail.de>
6095 * raise-gcc.c (exception_class_eq): Make ec parameter const.
6097 2017-05-02 Richard Biener <rguenther@suse.de>
6099 * gcc-interface/misc.c (gnat_post_options): Do not set
6102 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6104 * gcc-interface/trans.c (assoc_to_constructor): Make sure
6105 Corresponding_Discriminant is only called on discriminants.
6106 Skip the saving of the result only for them.
6107 (gnat_to_gnu) <N_Selected_Component>: Likewise.
6108 <N_Unchecked_Type_Conversion>: Translate the result type first.
6109 (gigi): Set TREE_NOTHROW on Begin_Handler.
6110 (stmt_list_cannot_raise_p): New predicate.
6111 (Exception_Handler_to_gnu_gcc): Emit a simple final call instead of
6112 a cleanup if the statements of the handler cannot raise.
6113 (process_freeze_entity): Use Is_Record_Type.
6114 (process_type): Likewise.
6116 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6118 * einfo.ads (Corresponding_Record_Component): New alias
6119 for Node21 used for E_Component and E_Discriminant.
6120 * einfo.adb (Corresponding_Record_Component): New function.
6121 (Set_Corresponding_Record_Component): New procedure.
6122 (Write_Field21_Name): Handle Corresponding_Record_Component.
6123 * sem_ch3.adb (Inherit_Component): Set
6124 Corresponding_Record_Component for every component in
6125 the untagged case. Clear it afterwards for non-girder
6127 * gcc-interface/decl.c (gnat_to_gnu_entity)
6128 <E_Record_Type>: For a derived untagged type with discriminants
6129 and constraints, apply the constraints to the layout of the
6130 parent type to deduce the layout.
6131 (field_is_aliased): Delete.
6132 (components_to_record): Test DECL_ALIASED_P directly.
6133 (annotate_rep): Check that fields are present except for
6135 (create_field_decl_from): Add DEBUG_INFO_P
6136 parameter and pass it in recursive and other calls. Add guard
6137 for the manual CSE on the size.
6138 (is_stored_discriminant): New predicate.
6139 (copy_and_substitute_in_layout): Consider only
6140 stored discriminants and check that original fields are present
6141 in the old type. Deal with derived types. Adjust call to
6142 create_variant_part_from.
6144 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6146 * exp_ch6.adb (Expand_Call_Helper): When locating the
6147 accessibility entity created for an access parameter, handle
6148 properly a reference to a formal of an enclosing subprogram. if
6149 the reference appears in an inherited class-wide condition, it
6150 is the rewriting of the reference in the ancestor expression,
6151 but the accessibility entity must be that of the current formal.
6153 2017-05-02 Javier Miranda <miranda@adacore.com>
6155 * exp_ch4.adb (Expand_Non_Binary_Modular_Op): New subprogram.
6156 (Expand_N_Op_Add, Expand_N_Op_Divide, Expand_N_Op_Minus,
6157 Expand_N_Op_Multiply, Expand_N_Op_Or, Expand_N_Op_Subtract):
6158 Call Expand_Non_Binary_Modular_Op.
6160 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6162 * sem_ch3.adb (Build_Derived_Private_Type): If the parent type
6163 has discriminants, do not override the Stored_Constraint list of
6164 the full view of the derived type with that of the derived type.
6166 2017-05-02 Bob Duff <duff@adacore.com>
6168 * sem_attr.adb (Attribute_Enum_Rep): Disallow T'Enum_Rep.
6170 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
6172 * s-os_lib.ads: Minor typo fix.
6174 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
6176 * gnatls.adb: Merge and refactor code from Prj.Env and remove
6177 this deprecated dependency.
6179 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6181 * exp_util.ads: minor comment addition.
6183 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6185 * sem_ch3.adb (Build_Derived_Record_Type): Fix a few typos and
6186 pastos in part #3 of the head comment.
6188 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6190 * exp_ch3.adb (Freeze_Type): Do not generate an invariant
6191 procedure body for a local (sub)type declaration within a
6192 predicate function. Invariant checks do not apply to these, and
6193 the expansion of the procedure will happen in the wrong scope,
6194 leading to misplaced freeze nodes.
6196 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6198 * exp_util.adb (Insert_Library_Level_Action): Use proper scope
6199 to analyze generated actions. If the main unit is a body,
6200 the required scope is that of the corresponding unit declaration.
6202 2017-05-02 Arnaud Charlet <charlet@adacore.com>
6204 * einfo.adb (Declaration_Node): flip branches of
6205 an IF statement to avoid repeated negations in its condition;
6206 no change in semantics, only to improve readability.
6208 2017-05-02 Arnaud Charlet <charlet@adacore.com>
6210 * sem_case.adb: Remove extra spaces in parameter declarations.
6212 2017-05-02 Justin Squirek <squirek@adacore.com>
6214 * usage.adb: Replace space with hyphen ("run time" -> "run-time")
6215 in usage line for new -gnatwE switch.
6217 2017-05-02 Claire Dross <dross@adacore.com>
6219 * a-cofuve.ads (Remove): Remove unnecessary
6220 conditions in precondition.
6222 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
6224 * a-stream.ads, exp_imgv.adb, sem_ch10.adb,
6225 sem_attr.adb, s-finmas.ads, osint.adb: Minor typo fix.
6227 2017-05-02 Justin Squirek <squirek@adacore.com>
6229 * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
6230 alternative expression.
6231 * sem_res.adb (Resolve_Case_Expression): Ditto.
6233 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6235 * exp_disp.adb (Set_All_DT_Position, In_Predef_Prim_DT):
6236 Refine predicate for the case where the primitive operation
6237 is a renaming of equality. An overriding operation that is
6238 a user-defined renaming of predefined equality inherits its
6239 slot from the overridden operation. Otherwise it is treated
6240 as a predefined op and occupies the same predefined slot as
6241 equality. A call to it is transformed into a call to its alias,
6242 which is the predefined equality. A dispatching call thus uses
6243 the proper slot if operation is further inherited and called
6244 with class-wide arguments.
6246 2017-05-02 Justin Squirek <squirek@adacore.com>
6248 * errout.adb (Set_Msg_Text): Add a case to switch the message
6249 type when the character '[' is detected signifying a warning
6250 about a run-time exception.
6251 * opt.ads Add a new Warning_Mode value for new switch
6252 * switch-b.adb (Scan_Binder_Switches): Add case for the binder
6253 to handle new warning mode
6254 * usage.adb (Usage): Add usage entry for -gnatwE
6255 * warnsw.adb (Set_Warning_Switch): Add case for the new switch
6257 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6259 * sem_prag.adb (Process_Conversion): Reject an intrinsic operator
6260 declaration that operates on some fixed point type.
6262 2017-05-02 Justin Squirek <squirek@adacore.com>
6264 * a-crbtgo.adb, s-taasde.adb: Remove unused use-type clauses.
6266 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6268 * sem_ch6.adb (Analyze_Null_Procedure): Revert previous change.
6270 2017-05-02 Justin Squirek <squirek@adacore.com>
6272 * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
6273 expression (Analyze_If_Expression): Add check for valid condition
6274 * sem_eval.adb (Eval_Case_Expression): Add check for error posted
6276 * sem_res.adb (Resolve_If_Expression): Add check for valid
6277 condition and then-expression.
6279 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6281 * exp_ch3.adb (Build_Initialization_Call): Generate a null
6282 statement if the initialization call is a null procedure, as
6283 can happen with a controlled type with no explicit Initialize
6284 procedure, or an array of such.
6285 * exp_ch7.adb (Process_Object_Declaration): For a type with
6286 controlled components that has a trivial Initialize procedure,
6287 insert declaration for finalization counter after object
6289 (Make_Deep_Array_Body, Build_Initialize_statements): Do not create
6290 finalization block and attendant declarations if component has
6291 a trivial Initialize procedure.
6292 (Make_Init_Call): Do not generate a call if controlled type has
6293 a trivial Initialize procedure.
6295 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6297 * g-forstr.ads (Data): Move Format component last.
6298 * g-forstr.adb ("+"): Adjust for above change.
6299 * g-rewdat.ads (Buffer): Move Buffer, Current, Pattern and Value last.
6300 * g-sechas.ads (Context): Move Key last.
6301 * g-socket.ads (Service_Entry_Type): Move Aliases last.
6302 * s-fileio.adb (Temp_File_Record): Move Name last.
6303 * s-regexp.adb (Regexp_Value): Move Case_Sensitive last.
6304 * xr_tabls.ads (Project_File): Move Src_Dir and Obj_Dir last.
6306 2017-05-02 Jerome Lambourg <lambourg@adacore.com>
6308 * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: Remove the -nognarl
6309 switch introduced recently. finally not needed.
6311 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6313 * sem_ch6.adb (Analyze_Null_Procedure): Set the
6314 Corresponding_Body link for a null procedure declaration.
6316 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6318 * atree.h (Flag290): Add missing terminating parenthesis.
6319 * einfo.adb (Is_Class_Wide_Clone): Use Flag290.
6320 (Set_Is_Class_Wide_Clone): Likewise.
6321 * einfo.ads (Is_Class_Wide_Clone): Likewise.
6323 2017-05-02 Gary Dismukes <dismukes@adacore.com>
6325 * checks.ads (Null_Exclusion_Static_Checks): Add Boolean
6326 parameter Array_Comp to indicate the case of an array object
6327 with null-excluding components.
6328 * checks.adb (Null_Exclusion_Static_Checks):
6329 Call Compile_Time_Constraint_Error instead of
6330 Apply_Compile_Time_Constraint_Error in the component case. Also
6331 call that when Array_Comp is True, with an appropriate warning for
6332 the array component case. Only create an explicit initialization
6333 by null in the case of an object of a null-excluding access type
6334 (and no longer do that in the component case).
6335 * sem_ch3.adb (Check_Component): Add a Boolean parameter
6336 Array_Comp defaulted to False. Pass Empty for the Comp
6337 actual when calling Null_Exclusion_Static_Checks in the case
6338 where Comp_Decl matches Object_Decl, because we don't have a
6339 component in that case. In the case of an object or component
6340 of an array type, pass True for Array_Comp on the recursive call
6343 2017-05-02 Bob Duff <duff@adacore.com>
6345 * s-taprop-linux.adb (Prio_To_Linux_Prio): New function to correctly
6346 compute the linux priority from the Ada priority. Call this everywhere
6347 required. In particular, the previous version was not doing this
6348 computation when setting the ceiling priority in various places. It
6349 was just converting to C.int, which results in a ceiling that is off
6352 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6354 * sem_ch3.adb: Comment predicate inheritance.
6356 2017-05-02 Tristan Gingold <gingold@adacore.com>
6358 * s-trasym.ads: Add comment.
6360 2017-05-02 Bob Duff <duff@adacore.com>
6362 * sem_elab.adb, sem_elab.ads: Minor comment fixes.
6363 * sem_ch4.adb: Minor reformatting.
6364 * s-taprop-linux.adb, s-taspri-posix.ads: Code refactoring.
6365 * s-taspri-posix-noaltstack.ads: Minor refactoring.
6366 * sinput.ads: Minor typo fix.
6368 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6370 * exp_ch9.adb (Discriminated_Size): Moved to sem_util.
6371 * sem_util.ads, sem_util.adb (Discriminated_Size): Predicate moved
6372 here from exp_ch9, to recognize objects whose creation requires
6373 dynamic allocation, so that the proper warning can be emitted
6374 when restriction No_Implicit_Heap_Allocation is in effect.
6375 * sem_ch3.adb (Analyze_Object_Declaration): Use Discriminated_Size
6376 to emit proper warning when an object that requires dynamic
6377 allocation is declared.
6379 2017-05-02 Tristan Gingold <gingold@adacore.com>
6381 * s-trasym.ads, s-trasym.adb (Enable_Cache): New.
6383 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6385 * sem_ch4.adb (Find_Equality_Types, Try_One_Interp): The same relaxed
6386 visibility rules for equality operators that apply within an
6387 instantiation apply within an inlined body.
6388 * sem_type.adb (Add_One_Interp): ditto.
6390 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6392 * sem_prag.adb (Analyze_Pragma): Forbid pragma Contract_Cases on null
6395 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6398 (Name_Assume, Name_Attribute_Definition, Name_Loop_Optimize,
6399 Name_No_Tagged_Streams): Move to regular pragmas. Add
6400 placeholders for Default_Scalar_Storage_Order, Dispatching_Domain,
6401 and Secondary_Stack_Size.
6402 (Pragma_Id): Move Pragma_Assume,
6403 Pragma_Attribute_Definition, Pragma_Loop_Optimize and
6404 Pragma_No_Tagged_Streams to second part.
6406 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6408 * exp_attr.adb: Minor reformatting.
6410 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6412 * sem_ch4.adb (Analyze_Selected_Component): Improve error
6413 detection for illegal references to private components or
6414 operations of a protected type in the body of the type.
6416 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6418 * opt.ads: Add missing GNAT markers in comments.
6419 * opt.adb (Set_Opt_Config_Switches): Do not override earlier
6420 settings of Optimize_Alignment at the end.
6422 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6424 * checks.adb (Apply_Constraint_Check): Do not apply
6425 a discriminant check when the associated type is a constrained
6426 subtype created for an unconstrained nominal type.
6427 * exp_attr.adb: Minor reformatting.
6429 2017-05-02 Bob Duff <duff@adacore.com>
6431 * sem_ch3.adb (OK_For_Limited_Init_In_05): Handle correctly
6432 the N_Raise_Expression case.
6433 * sem_ch6.adb (Check_Limited_Return): Minor: clarify comment,
6436 2017-05-02 Yannick Moy <moy@adacore.com>
6438 * exp_ch4.adb (Expand_N_Op_Ne): Do not bump parenthese level and
6439 optimize length comparison in GNATprove mode.
6440 * exp_spark.adb (Expand_SPARK_Op_Ne): New function to rewrite
6441 operator /= into negation of operator = when needed.
6442 (Expand_SPARK): Call new
6443 function to expand operator /=.
6445 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6447 * exp_fixd.adb (Expand_Divide_Fixed_By_Fixed_Giving_Fixed):
6448 Simplify the expression for a fixed-fixed division to remove
6449 divisions by constants whenever possible, as an optimization
6450 for restricted targets.
6452 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6454 * checks.adb, sem_ch3.adb, sem_ch6.adb: Minor reformatting.
6456 2017-05-02 Bob Duff <duff@adacore.com>
6458 * exp_attr.adb (Callable, Identity, Terminated): Use Find_Prim_Op
6459 to find primitive ops, instead of using an Identifier that will
6460 later be looked up. This is necessary because these ops are not
6461 necessarily visible at all places where we need to call them.
6462 * exp_util.ads: Minor comment fix.
6464 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6466 * sem_ch6.adb (Fully_Conformant_Expressions): Two entity
6467 references are fully conformant if they are both expansions
6468 of the discriminant of a protected type, within one of the
6469 protected operations. One occurrence may be expanded into a
6470 constant declaration while the other is an input parameter to
6471 the corresponding generated subprogram.
6473 2017-05-02 Justin Squirek <squirek@adacore.com>
6475 * sem_ch3.adb (Check_For_Null_Excluding_Components): Created for
6476 recursivly searching composite-types for null-excluding access
6477 types and verifying them.
6478 (Analyze_Object_Declaration): Add a
6479 call to Check_Null_Excluding_Components for static verification
6480 of non-initialized objects.
6481 * checks.adb, checks.ads (Null_Exclusion_Static_Checks): Added
6482 a parameter for a composite-type's component and an extra case
6483 for printing component information.
6485 2017-05-02 Yannick Moy <moy@adacore.com>
6487 * sem_ch10.adb (Analyze_Subunit): Take
6488 configuration pragma into account when restoring appropriate
6489 pragma for analysis of subunit.
6491 2017-05-02 Justin Squirek <squirek@adacore.com>
6493 * s-tasren.adb, s-tasini.adb, s-taprop-linux.adb,
6494 s-mudido-affinity.adb,, a-exetim-posix.adb, a-direio.adb,
6495 g-socket.adb, s-taenca.adb, s-fileio.adb: Remove unused use-type
6496 clauses from the runtime.
6498 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6500 * freeze.adb (Check_Component_Storage_Order): Do not treat bit-packed
6501 array components specially.
6503 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6505 * sem_ch8.adb (Premature_Usage): If the premature usage of
6506 an entity is as the expression in its own object decaration,
6507 rewrite the reference as Any_Id to prevent cascaded errors or
6508 compiler loops when such an entity is used in an address clause.
6510 2017-05-01 Eric Botcazou <ebotcazou@adacore.com>
6512 * gcc-interface/decl.c (components_to_record): Add missing guard.
6514 2017-05-01 Eric Botcazou <ebotcazou@adacore.com>
6516 * gcc-interface/decl.c (components_to_record): Add more comments.
6517 Put back pending fields onto the regular list if the misalignment
6518 happens to cancel itself.
6520 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6522 * sem_ch4.adb (Complete_Object_Operation): When rewriting the
6523 controlling actual in a prefixed call, preserve the original node
6524 information if the prefix itself has been rewritten, for ASIS use.
6526 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6528 * exp_ch6.adb (Insert_Post_Call_Actions):
6529 Code clean up. Insert the post-call actions after an enclosing
6530 procedure call when N denotes a function call and appears as an
6531 actual parameter in the procedure call.
6533 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6535 * freeze.adb (Check_Component_Storage_Order): If there is a clause
6536 for the component, also reject the attribute if the component
6537 doesn't end on a byte boundary and its scalar storage order is
6538 different from that of the enclosing record type.
6540 2017-04-28 Javier Miranda <miranda@adacore.com>
6542 * atree.ads (Info_Messages): Removed.
6543 (Warning_Info_Messages): New counter.
6544 (Report_Info_Messages): New counter.
6545 * err_vars.ads Update documentation.
6546 * errout.adb (Delete_Warning_And_Continuations): Update
6547 Info_Message occurrences.
6548 (Error_Msg_Internal): Update Info_Message occurrences.
6549 (Delete_Warning): Update Info_Message occurrences.
6550 (Write_Error_Summary): Update Info_Message occurrences.
6551 (Output_Messages): Update Info_Message occurrences.
6552 (To_Be_Removed): Update Info_Message occurrences.
6553 (Reset_Warnings): Update Info_Message occurrences.
6554 * errutil.adb (Error_Msg): Update Info_Message occurrences.
6555 (Finalize): Update Info_Message occurrences.
6556 (Initialize): Update Info_Message occurrences.
6557 * erroutc.adb (Delete_Msg): Update Info_Message occurrences.
6558 (Compilation_Errors): Update Info_Message_Occurences.
6560 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6562 * exp_ch3.adb (Build_Init_Statements): Likewise on Nam.
6563 * freeze.adb (Check_Component_Storage_Order): And on Comp_Byte_Aligned.
6564 * sem_aggr.adb (Resolve_Record_Aggregate): Initialize Box_Node.
6565 * sem_attr.adb (Loop_Entry): Initialize Encl_Loop.
6566 * sem_ch12.adb (Build_Operator_Wrapper): Add pragma Warnings on Expr.
6567 * sem_ch13.adb (Validate_Address_Clauses): Initialize Y_Alignment and
6569 * sem_eval.adb (Why_Not_Static): Initialize Typ.
6570 * sem_prag.adb (Analyze_Pragma): Add pragma Warnings on Str.
6572 2017-04-28 Bob Duff <duff@adacore.com>
6574 * sem_util.ads, sem_util.adb (Might_Raise): New function
6575 that replaces Is_Exception_Safe, but has the opposite
6576 sense. Is_Exception_Safe was missing various cases -- calls inside
6577 a pragma Debug, calls inside an 'if' or assignment statement,
6578 etc. Might_Raise now walks the entire subtree looking for things
6580 * exp_ch9.adb (Is_Exception_Safe): Remove.
6581 (Build_Protected_Subprogram_Body): Replace call to
6582 Is_Exception_Safe with "not Might_Raise". Misc cleanup (use
6583 constants where possible).
6584 * exp_ch7.adb: Rename Is_Protected_Body -->
6585 Is_Protected_Subp_Body. A protected_body is something different
6588 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6590 * inline.adb (Expand_Inlined_Call): Initialize Targ1 variable.
6591 * par-ch3.adb (P_Component_Items): Initialize Decl_Node variable.
6592 (P_Discrete_Choice_List): Initialize Expr_Node variable.
6593 * par-ch9.adb (P_Task): Initialize Aspect_Sloc variable.
6594 (P_Protected): Likewise.
6595 * sem_case.adb (Check_Duplicates):
6596 Add pragma Warnings on variable.
6597 * sem_ch12.adb (Preanalyze_Actuals): Initialize Vis variable.
6598 * sem_ch4.adb (List_Operand_Interps): Add pragma Warnings on variable.
6599 * sem_ch5.adb (Analyze_Assignment): Initialize Save_Full_Analysis.
6600 (Analyze_Exit_Statement): Initialize Scope_Id variable.
6601 (Analyze_Iterator_Specification): Initialize Bas variable.
6602 * sem_ch9.adb (Allows_Lock_Free_Implementation): Initialize
6603 Error_Count (Satisfies_Lock_Free_Requirements): Likewise.
6604 (Analyze_Accept_Statement): Initialize Task_Nam.
6606 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6608 * checks.adb (Install_Primitive_Elaboration_Check):
6609 Do not generate an elaboration check if all checks have been
6612 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6614 * sem_ch13.adb (Analyze_Aspect_Specifications, case
6615 Interrupt_Handler and Attach_Handler): Generate reference
6616 to protected operation to prevent spurious warnings about
6617 unreferenced entities. Previous scheme failed with style checks
6620 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6622 * sem_prag.adb (Relocate_Pragmas_To_Body): A pragma Warnings
6623 that follows an expression function must not be relocated to
6624 the generated body, because it applies to the code that follows.
6626 2017-04-28 Gary Dismukes <dismukes@adacore.com>
6628 * sem_util.adb (Is_Dependent_Component_Of_Mutable_Object): Test
6629 Relaxed_RM_Semantics to avoid having CodePeer issue errors on
6630 code that might violate the more stringent checking for 'Access
6631 introduced in Ada 2005.
6633 2017-04-28 Arnaud Charlet <charlet@adacore.com>
6635 * a-cforse.adb: minor style fix in comment.
6637 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6639 * exp_ch9.adb (Build_Lock_Free_Unprotected_Subprogram_Body): Also
6640 initialize Block_Decls variable.
6641 (Expand_Entry_Barrier): Add pragma Warnings on Func_Body variable.
6642 (Build_Dispatching_Requeue): Add pragma Warnings on Op variable.
6643 * exp_disp.adb (Expand_Interface_Actuals): Initialize
6644 Formal_DDT and Actual_DDT variables.
6645 (Expand_Interface_Thunk): Initialize Iface_Formal.
6646 (Make_DT): Initialize Size_Comp.
6647 (Make_Select_Specific_Data_Table): Initialize Decls.
6648 * exp_dist.adb (Add_RACW_Primitive_Declarations_And_Bodies):
6649 Also initialize more RPC_Receiver_* variables.
6650 (Build_To_Any_Function): Initialize Cstr_Formal.
6651 * exp_prag.adb (Expand_Pragma_Contract_Cases): Initialize Msg_Str.
6653 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6655 * sem_ch6.adb (Freeze_Type_Refs): For an interface conversion
6656 node between access types, freeze the designated type as well,
6657 so that dispatch table pointers are created in the proper scope,
6658 and not in the constructed body of the expression function.
6660 2017-04-28 Bob Duff <duff@adacore.com>
6662 * alloc.ads (Nodes_Initial): Go back to previous value. The large
6663 value makes large compilations faster, but small compilations slower.
6665 2017-04-28 Arnaud Charlet <charlet@adacore.com>
6667 * sem_util.adb: minor typos in Is_Child_Or_Sibling.
6669 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6671 * erroutc.adb (Compilation_Errors): Do not consider info messages
6672 as suitable warnings when warnings must be treated as errors.
6673 * sem_ch7.adb (Analyze_Package_Specification): Do not consider
6674 internally-generated packages when outputting completion
6676 * errout.adb (Output_Messages): Do not consider info messages as
6677 suitable warnings when warnings must be treated as errors.
6678 * errutil.adb (Finalize): Do not consider info messages as
6679 suitable warnings when warnings must be treated as errors.
6681 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6683 * warnsw.ads: Minor fix for incorrect wording in comment.
6685 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6687 * sem_res.adb (In_Instance_Code): New predicate in
6688 Valid_Conversion, to determine whether a type conversion appears
6689 as (or within) an actual for a formal object. Type conversions
6690 in instances are not rechecked in Valid_Conversion because
6691 visibility changes between generic location andi instance may
6692 lead to spurious errors, but conversions within an actual must be
6693 fully checked, and they are not fully resolved when pre-analyzing
6696 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6698 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Use
6699 New_Copy_Tree instead of Relocate_Node as any subsequent copies
6700 of the relocated node will have mangled Parent pointers.
6701 * sem_util.adb (Build_NCT_Hash_Tables): Reset both hash
6702 tables used in conjunction with entity and itype replication.
6703 (Visit_Entity): Rewrite the restriction on which entities
6704 require duplication. The restriction now includes all types.
6706 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6708 * a-cofuse.ads, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfinve.adb,
6709 a-cfinve.ads, a-cforma.adb, a-cforma.ads, a-cofuma.adb, a-cofuma.ads,
6710 a-cfhama.adb, a-cfhama.ads, a-cforse.adb: Minor reformatting and code
6713 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6715 * exp_util.adb, g-dyntab.adb, par-ch4.adb, sem_util.adb, sem_attr.adb,
6716 gnat1drv.adb, exp_disp.adb, namet.adb, alloc.ads: Minor reformatting.
6718 2017-04-28 Gary Dismukes <dismukes@adacore.com>
6720 * exp_util.adb: Minor reformatting.
6722 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6724 * sem_ch4.adb: Fix copy/pasto.
6726 2017-04-27 Tristan Gingold <gingold@adacore.com>
6728 * gcc-interface/Make-lang.in: Define EH_MECHANISM while building
6729 raise-gcc.c. Fix include search path for raise-gcc.c
6731 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
6733 * fe.h (Warn_On_Questionable_Layout): Declare.
6734 * warnsw.ads (Warn_On_Record_Holes): Move down.
6735 (Warn_On_Questionable_Layout): New boolean variable.
6736 (Warning_Record): Add Warn_On_Questionable_Layout field.
6737 * warnsw.adb (All_Warnings): Set Warn_On_Questionable_Layout.
6738 (Restore_Warnings): Likewise.
6739 (Save_Warnings): Likewise.
6740 (Set_Dot_Warning_Switch): Handle 'q' and 'Q' letters.
6741 * gcc-interface/decl.c (gnat_to_gnu_entity): Adjust call to
6742 components_to_record.
6743 (gnu_field_to_gnat): New function.
6744 (warn_on_field_placement): Likewise.
6745 (components_to_record): Add GNAT_RECORD_TYPE and remove REORDER
6746 parameters. Rename local variables and adjust recursive call.
6747 Rework final scan of the field list and implement warnings on the
6748 problematic placement of specific sorts of fields.
6750 2017-04-27 Bob Duff <duff@adacore.com>
6752 * errout.adb, exp_aggr.adb, exp_attr.adb, exp_code.adb, fname.adb,
6753 * fname.ads, freeze.adb, inline.adb, lib.adb, lib.ads, lib-list.adb,
6754 * lib-load.adb, lib-writ.adb, par.adb, restrict.adb, rtsfind.adb,
6755 * sem.adb, sem_cat.adb, sem_ch10.adb, sem_ch12.adb, sem_ch3.adb,
6756 * sem_ch4.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
6757 * sem_intr.adb, sem_res.adb, sem_util.adb, sem_warn.adb, sprint.adb:
6758 For efficiency, cache results of Is_Internal_File_Name and
6759 Is_Predefined_File_Name in the Units table. This avoids a lot
6760 of repeated text processing.
6762 2017-04-27 Emmanuel Briot <briot@adacore.com>
6764 * g-comlin.adb (Sort_Sections): remove useless test.
6766 2017-04-27 Claire Dross <dross@adacore.com>
6768 * a-cfhase.adb, a-cfhase.ads (=): Generic parameter removed to
6769 allow the use of regular equality over elements in contracts.
6770 (Formal_Model): Ghost package containing model functions that are
6771 used in subprogram contracts.
6772 (Current_To_Last): Removed, model functions should be used instead.
6773 (First_To_Previous): Removed, model functions should be used instead.
6774 (Strict_Equal): Removed, model functions should be used instead.
6775 (No_Overlap): Removed, model functions should be used instead.
6776 (Equivalent_Keys): Functions over cursors are removed. They were
6777 awkward with explicit container parameters.
6778 * a-cforse.adb, a-cforse.ads (=): Generic parameter removed to
6779 allow the use of regular equality over elements in contracts.
6780 (Formal_Model): Ghost package containing model functions that
6781 are used in subprogram contracts.
6782 (Current_To_Last): Removed, model functions should be used instead.
6783 (First_To_Previous): Removed, model functions should be used instead.
6784 (Strict_Equal): Removed, model functions should be used instead.
6785 (No_Overlap): Removed, model functions should be used instead.
6787 2017-04-27 Yannick Moy <moy@adacore.com>
6789 * gnat1drv.adb: Code cleanup.
6791 2017-04-27 Ed Schonberg <schonberg@adacore.com>
6793 * exp_util.adb (Replace_Entity): The prefix of a 'Result
6794 attribute reference in a post- condition is the subprogram to
6795 which the condition applies. If the condition is inherited
6796 by a type extension, the prefix becomes a reference to the
6797 inherited operation, but there is no need to create a wrapper
6798 for this operation, because 'Result is expanded independently
6799 when elaborating the postconditions.
6801 2017-04-27 Bob Duff <duff@adacore.com>
6803 * sinput.adb: Minor code cleanup.
6804 * namet.adb (Append): Create faster versions of
6805 Append(String) and Append(Name_Id) by using slice assignment
6807 * sem_util.adb (In_Instance): Speed this up by removing
6808 unnecessary tests; Is_Generic_Instance is defined for all
6810 * sem_util.ads, sem_util.adb (In_Parameter_Specification):
6811 Remove unused function.
6812 * alloc.ads (Nodes_Initial): Use a much larger value, because
6813 the compiler was spending a lot of time copying the nodes table
6814 when it grows. This number was chosen in 1996, so is rather out
6815 of date with current memory sizes. Anyway, it's virtual memory.
6816 Get rid of Orig_Nodes_...; use Node_... instead.
6817 * atree.adb (Lock): Do not release the Nodes tables; it's a
6819 Orig_Nodes_ ==> Nodes_
6820 * nlists.adb: Orig_Nodes_ ==> Nodes_
6821 * g-table.adb: Remove unused "with" clause.
6822 * g-table.ads, table.ads: Remove Big_Table_Type, which should
6823 not be used by clients.
6824 * g-dyntab.adb (Last_Allocated): New function
6825 to encapsulate T.P.Last_Allocated, which I'm thinking of changing.
6827 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6829 * sem_eval.adb (Subtypes_Statically_Compatible): Remove duplicated
6831 (Subtypes_Statically_Match): Remove duplicate check.
6832 * sem_prag.adb (Check_Arg_Is_External_Name): Remove duplicate check.
6834 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6836 * exp_aggr.adb (Replace_Type): Remove the special processing
6837 for selected components.
6838 * exp_attr.adb (Expand_N_Attribute_Reference): Merge the
6839 processing for attributes Fixed_Value and Integer_Value.
6840 * exp_util.adb (Side_Effect_Free): Merge the processing for
6841 qualified expressions, type conversions, and unchecked type
6843 * g-comlin.adb (Is_In_Config): Merge the processing for No_Space
6845 * par-ch3.adb (P_Declarative_Items): Merge the processing for
6846 tokens function, not, overriding, and procedure.
6847 * sem_ch6.adb (Fully_Conformant_Expressions): Merge the processing
6848 for qualified expressions, type conversions, and unchecked
6850 * sem_util.adb (Compile_Time_Constraint_Error): Merge the
6851 processing for Ada 83 and instances.
6852 (Object_Access_Level): Merge the processing for indexed components
6853 and selected components.
6854 * uname.adb (Add_Node_Name): Merge the processing for stubs.
6856 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6858 * checks.adb (Install_Primitive_Elaboration_Check):
6859 Do not generate the check when restriction No_Elaboration_Code
6862 2017-04-27 Ed Schonberg <schonberg@adacore.com>
6864 * exp_disp.adb (Build_Class_Wide_Check): New subsidiary
6865 of Expand_Dispatching_Call. If the denoted subprogram has a
6866 class-wide precondition, this is the only precondition that
6867 applies to the call, rather that the class-wide preconditions
6868 that may apply to the body that is executed. (This is specified
6871 2017-04-27 Yannick Moy <moy@adacore.com>
6873 * gnat1drv.adb (Adjust_Global_Switches): Issue
6874 a warning in GNATprove mode if the runtime library does not
6875 support IEEE-754 floats.
6877 2017-04-27 Ed Schonberg <schonberg@adacore.com>
6879 * sem_prag.adb (Inherit_Class_Wide_Pre): If the parent operation
6880 is itself inherited it does not carry any contract information,
6881 so examine its parent operation which is its Alias.
6883 2017-04-27 Ed Schonberg <schonberg@adacore.com>
6885 * sem_attr.adb (Analyze_Attribute, case 'Image): In Ada2012 the
6886 prefix can be an object reference in which case Obj'Image (X)
6887 can only be interpreted as an indexing of the parameterless
6888 version of the attribute.
6889 * par-ch4.adb (P_Name): An attribute reference can be the prefix of
6890 an indexing or a slice operation if the attribute does not require
6891 parameters. In Ada2012 'Image also belongs in this category,
6892 and A'Image (lo .. hi) is legal and must be parsed as a slice.
6894 2017-04-27 Yannick Moy <moy@adacore.com>
6896 * exp_ch4.adb: Minor reformatting.
6897 * gnat1drv.adb (Adjust_Global_Switches): When in GNATprove mode,
6898 disable the CodePeer and C generation modes. Similar to the
6899 opposite actions done in CodePeer mode.
6901 2017-04-27 Yannick Moy <moy@adacore.com>
6903 * sem_res.adb: Remove duplicate code.
6904 * sem_attr.adb: Delete duplicate code.
6906 2017-04-27 Bob Duff <duff@adacore.com>
6908 * g-dyntab.adb: Reduce the amount of copying in
6909 Release. No need to copy items past Last.
6911 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6913 * checks.adb Add with and use clauses for Sem_Disp.
6914 (Install_Primitive_Elaboration_Check): New routine.
6915 * checks.ads (Install_Primitive_Elaboration_Check): New routine.
6916 * exp_attr.adb (Expand_N_Attribute_Reference): Clean up the
6917 processing of 'Elaborated.
6918 * exp_ch6.adb (Expand_N_Subprogram_Body): Install a primitive
6921 2017-04-27 Bob Duff <duff@adacore.com>
6923 * g-dyntab.ads, g-dyntab.adb, g-table.ads: Remove incorrect assertion.
6924 If the table grows and then shrinks back to empty, we won't necessarily
6925 point back to the empty array. Code cleanups.
6926 * sinput.ads: Add 'Base to Size clause to match the declared
6929 2017-04-27 Claire Dross <dross@adacore.com>
6931 * a-cforma.adb, a-cforma.ads (=): Generic parameter removed to
6932 allow the use of regular equality over elements in contracts.
6933 (Formal_Model): Ghost package containing model functions that
6934 are used in subprogram contracts.
6935 (Current_To_Last): Removed, model functions should be used instead.
6936 (First_To_Previous): Removed, model functions should be used instead.
6937 (Strict_Equal): Removed, model functions should be used instead.
6938 (No_Overlap): Removed, model functions should be used instead.
6939 * a-cofuma.adb, a-cofuma.ads (Enable_Handling_Of_Equivalence)
6940 Boolean generic parameter to disable contracts for equivalence
6942 (Witness): Create a witness of a key that is used for handling of
6943 equivalence between keys.
6944 (Has_Witness): Check whether a witness is contained in a map.
6945 (W_Get): Get the element associated to a witness.
6946 (Lift_Equivalent_Keys): Removed, equivalence between keys is handled
6948 * a-cofuse.adb, a-cofuse.ads (Enable_Handling_Of_Equivalence)
6949 Boolean generic parameter to disable contracts for equivalence
6951 * a-cfhama.adb, a-cfhama.ads (Formal_Model.P) Disable handling
6952 of equivalence on functional maps.
6953 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.P) Disable handling
6954 of equivalence on functional maps.
6956 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6958 * exp_ch9.adb (Expand_Entry_Barrier): Code
6959 cleanup. Do not perform the optimization which removes the
6960 declarations of the discriminant and component renamings when
6961 validity checks on operands and attributes are in effect.
6963 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6965 * exp_spark.adb, exp_util.adb, sem_ch7.adb, g-dyntab.adb, g-dyntab.ads,
6966 freeze.adb, a-cfinve.ads, a-cofuma.adb, a-cofuma.ads, a-cfhama.adb,
6967 a-cfhama.ads, a-cofove.ads: Minor reformatting.
6969 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6971 * g-debpoo.adb (Dump_Gnatmem): Protect against a possible null
6972 pointer dereference.
6973 * g-spipat.adb (Dump): Code clean up. Protect against a possible
6974 null pointer dereference.
6976 2017-04-27 Bob Duff <duff@adacore.com>
6978 * g-dyntab.ads, g-dyntab.adb: Default for Table_Low_Bound.
6979 Rename Empty --> Empty_Table_Ptr, and don't duplicate code for it.
6980 Free renames Init, since they do the same thing.
6981 * g-table.ads: Default for Table_Low_Bound.
6982 * table.ads: Default for Table_Low_Bound, Table_Initial, and
6985 2017-04-27 Bob Duff <duff@adacore.com>
6987 * g-dyntab.ads, g-dyntab.adb: Add assertions to subprograms that
6989 * atree.adb, elists.adb, fname-uf.adb, ghost.adb, inline.adb,
6990 * lib.adb, namet.adb, nlists.adb, sem.adb, sinput.adb, stringt.adb:
6991 Reorder code so that above assertions do not fail.
6992 * table.ads: Remove obsolete comment on Locked.
6994 2017-04-27 Claire Dross <dross@adacore.com>
6996 * a-cfdlli.ads: Code cleanup.
6998 2017-04-27 Yannick Moy <moy@adacore.com>
7000 * exp_spark.adb (Expand_SPARK_Freeze_Type): Build a DIC procedure
7001 when needed for proof. (Expand_SPARK): Call the new procedure.
7002 * exp_util.ads Fix typo.
7004 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7006 * a-cofuma.ads, a-cfhama.ads: Minor reformatting, grammar, and typo
7009 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7011 * sem_elab.adb Add new type Visited_Element
7012 and update the contents of table Elab_Visited. Various code clean up.
7013 (Check_Elab_Call): Determine whether a prior call to
7014 the same subprogram was already examined within the same context.
7015 (Check_Internal_Call_Continue): Register the subprogram being
7016 called as examined within a particular context. Do not suppress
7017 elaboration warnings.
7019 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7021 * xoscons.adb, osint.ads: Minor reformatting.
7023 2017-04-27 Bob Duff <duff@adacore.com>
7025 * g-dyntab.ads, g-dyntab.adb: Misc cleanup. Rename
7026 Table_Count_Type --> Table_Last_Type, because the name
7027 was confusing (a "count" usually starts at zero). Add
7028 functionality supported or needed by other tables packages
7029 (Move, Release_Threshold).
7030 * g-table.ads, g-table.adb: This is now just a thin wrapper
7031 around g-dyntab.ads/g-dyntab.adb. Add functionality supported
7032 or needed by other tables packages (Save, Restore).
7033 * table.ads, table.adb: This is now just a thin wrapper around
7034 * g-table.ads/g-table.adb.
7035 * namet.h, scos.h, uintp.h: These files are reaching into the
7036 private data of some instances of g-table, whose names changed,
7037 so the above change requires some adjustment here. It now uses
7040 2017-04-27 Bob Duff <duff@adacore.com>
7042 * namet.adb, namet.ads: Minor: remove unused procedures.
7044 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
7046 * checks.adb (Apply_Scalar_Range_Check): Initialize Ok variable too.
7047 (Minimize_Eliminate_Overflows): Initialize Llo and Lhi.
7048 Add pragma Warnings on Rtype variable in nested block. *
7049 * exp_ch3.adb (Build_Init_Statements): Initialize VAR_LOC.
7050 * exp_ch4.adb (Expand_Concatenate): Initialize 3 variables.
7051 (Size_In_Storage_Elements): Add pragma Warnings on Res variable.
7052 * exp_ch7.adb (Build_Adjust_Statements): Initialize Bod_Stmts.
7053 (Process_Component_List_For_Finalize): Initialize Counter_Id.
7054 (Build_Finalize_Statements): Initialize Bod_Stmts.
7055 * exp_disp.adb (Expand_Dispatching_Call): Initialize SCIL_Node.
7057 2017-04-27 Claire Dross <dross@adacore.com>
7059 * a-cfhama.adb, a-cfhamai.ads (=): Generic parameter removed to
7060 allow the use of regular equality over elements in contracts.
7061 (Formal_Model): Ghost package containing model functions that are
7062 used in subprogram contracts.
7063 (Current_To_Last): Removed, model
7064 functions should be used instead.
7065 (First_To_Previous): Removed, model functions should be used instead.
7066 (Strict_Equal): Removed, model functions should be used instead.
7067 (No_Overlap): Removed, model functions should be used instead.
7068 (Equivalent_Keys): Functions over cursors are removed. They were
7069 awkward with explicit container parameters.
7070 * a-cofuma.adb, a-cofuma.ads (Lift_Equivalent_Keys): New lemma
7071 (proof only) procedure to help GNATprove when equivalence over
7072 keys is not equality.
7074 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7076 * exp_util.adb, a-cfdlli.adb, a-cfdlli.ads, exp_ch9.adb, g-dyntab.adb,
7077 sem_dim.adb, a-cfinve.adb, a-cfinve.ads, a-cofove.adb, a-cofove.ads:
7078 Minor reformatting and code cleanups.
7080 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7082 * freeze.adb (Build_Inherited_Condition_Pragmas): New procedure,
7083 subsidiary of Check_Inherited_Conditions, to build pragmas for an
7084 operation whose ancestor has classwide pre/postconditions. This
7085 is used both to check the legality of the inheritance in Ada
7086 and in SPARK, and to determine whether a wrapper is needed for
7087 an inherited operation.
7088 * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity):
7089 Improve placement of error message for inherited classwide
7090 conditions that become illegal on type derivation.
7092 2017-04-27 Yannick Moy <moy@adacore.com>
7094 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Set
7095 SPARK_Mode from context on generic package.
7096 * sem_ch7.adb (Analyze_Package_Declaration): Simplify code to remove
7099 2017-04-27 Claire Dross <dross@adacore.com>
7101 * a-cofuve.ads (Range_Shifted): Rewrite precondition to avoid
7102 overflows in computations.
7103 * a-cofove.ads (Capacity_Range): Rewrite last bound to avoid
7104 overflows in computations.
7105 (Insert): Rewrite precondition to avoid overflows in computations.
7106 * a-cfinve.ads (Capacity_Range): Rewrite last bound to avoid
7107 overflows in computations.
7108 (Insert): Rewrite precondition to avoid overflows in computations.
7110 2017-04-27 Steve Baird <baird@adacore.com>
7112 * exp_ch9.adb (Expand_N_Asynchronous_Select): Initialize the Cancel
7113 flag when it is declared in order to avoid confusing CodePeer about
7114 the possibility of an uninitialized variable read.
7116 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7118 * sem_dim.adb (Analyze_Dimension_Object_Declaration): There is
7119 no dimensionality error if the subtype of the expression is
7120 identical to the nominal subtype in the declaration, even though
7121 the expression itself may have been constant-folded and lack a
7123 * sem_dim.ads: Add comments on setting of dimension vectors and
7124 its interaction with node rewritings and side-effect removal.
7126 2017-04-27 Bob Duff <duff@adacore.com>
7128 * debug.adb: Minor comment correction.
7129 * sem_dim.ads: Minor reformatting and typo fixes.
7131 2017-04-27 Bob Duff <duff@adacore.com>
7133 * g-table.adb, g-table.adsa, scos.h: From the C side, access First and
7134 Last of the tables via function calls, rather than relying on layout
7137 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7139 * exp_util.adb: No wrapper in GNATprove mode.
7141 2017-04-27 Yannick Moy <moy@adacore.com>
7143 * sem_res.adb (Resolve_Comparison_Op): Always
7144 evaluate comparisons between values of universal types.
7146 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7148 * sem_elab.adb (Check_Internal_Call_Continue): Do not generate
7149 an elaboration counter nor a check when in GNATprove mode.
7150 * sem_util.adb (Build_Elaboration_Entity): Do not create an
7151 elaboration counter when in GNATprove mode.
7153 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7155 * freeze.adb: copy-paste typo.
7157 2017-04-27 Yannick Moy <moy@adacore.com>
7159 * sem_prag.adb (Analyze_Pre_Post_In_Decl_Part):
7160 Use correct test to detect call in GNATprove mode instead of
7163 2017-04-27 Claire Dross <dross@adacore.com>
7165 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.M_Elements_In_Union):
7166 New property function expressing that the element of a
7167 sequence are contained in the union of two sequences.
7168 (Formal_Model.M_Elements_Included): New property function
7169 expressing that the element of a sequence are another sequence.
7170 (Generic_Sorting): Use new property functions to state that
7171 elements are preserved by Sort and Merge.
7172 * a-cofove.adb, a-cofove.ads (=): Generic parameter removed to
7173 allow the use of regular equality over elements in contracts.
7174 (Formal_Model): Ghost package containing model functions
7175 that are used in subprogram contracts. (Capacity):
7176 On unbounded containers, return the maximal capacity.
7177 (Current_To_Last): Removed, model functions should be used instead.
7178 (First_To_Previous): Removed, model functions should be used instead.
7179 (Append): Default parameter value replaced
7180 by new wrapper to allow more precise contracts.
7181 (Insert): Subprogram restored, it seems it was useful to users even if
7183 (Delete): Subprogram restored, it seems it was useful to users even if
7185 (Prepend): Subprogram restored, it seems it was useful to users even
7186 if it is inefficient.
7187 (Delete_First): Subprogram restored, it seems it
7188 was useful to users even if it is inefficient. (Delete_Last):
7189 Default parameter value replaced by new wrapper to allow more
7191 (Generic_Sorting.Merge): Subprogram restored.
7192 * a-cfinve.adb, a-cfinve.ads (=): Generic parameter removed to
7193 allow the use of regular equality over elements in contracts.
7194 (Formal_Model): Ghost package containing model functions
7195 that are used in subprogram contracts. (Capacity):
7196 On unbounded containers, return the maximal capacity.
7197 (Current_To_Last): Removed, model functions should be used
7199 (First_To_Previous): Removed, model functions should be used instead.
7200 (Append): Default parameter value replaced
7201 by new wrapper to allow more precise contracts.
7202 (Insert): Subprogram restored, it seems it was useful to users even if
7204 (Delete): Subprogram restored, it seems it was useful to users even if
7206 (Prepend): Subprogram restored, it seems it was useful to users even
7207 if it is inefficient.
7208 (Delete_First): Subprogram restored, it seems it
7209 was useful to users even if it is inefficient. (Delete_Last):
7210 Default parameter value replaced by new wrapper to allow more
7212 (Generic_Sorting.Merge): Subprogram restored.
7213 (Vector): Do not reuse formal vectors, as it is no longer possible
7214 to supply them with an equality function over elements.
7216 2017-04-27 Bob Duff <duff@adacore.com>
7218 * g-dyntab.adb (Release): When allocating the new
7219 table, use the correct slice of the old table to initialize it.
7221 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
7223 * einfo.ads: Minor fixes in comments.
7225 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7227 * sem_prag.adb: disable clones in SPARK_Mode.
7229 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7231 * sem_util.ads, contracts.adb: Minor reformatting.
7233 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7235 * sem_util.adb, sem_util.ads (Build_Class_Wide_Clone_Body):
7236 Build body of subprogram that has a class-wide condition that
7237 contains calls to other primitives.
7238 (Build_Class_Wide_Clone_Call); Build a call to the common
7239 class-wide clone of a subprogram with classwide conditions. The
7240 body of the subprogram becomes a wrapper for a call to the
7241 clone. The inherited operation becomes a similar wrapper to which
7242 modified conditions apply, and the call to the clone includes
7243 the proper conversion in a call the parent operation.
7244 (Build_Class_Wide_Clone_Decl (Spec_Id : Entity_Id): For a
7245 subprogram that has a classwide condition that contains calls to
7246 other primitives, build an internal subprogram that is invoked
7247 through a type-specific wrapper for all inherited subprograms
7248 that may have a modified condition.
7249 * sem_prag.adb (Check_References): If subprogram has a classwide
7250 condition, create entity for corresponding clone, to be invoked
7251 through wrapper subprograns.
7252 (Analyze_Pre_Post_Condition_In_Decl_Part): Do not emit error
7253 message about placement if pragma isi internally generated.
7254 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): If subprogram has
7255 a classwide clone, build body of clone as copy of original body,
7256 and rewrite original body as a wrapper as a wrapper for a call to
7257 the clone, so that it incorporates the original pre/postconditions
7259 * freeze.adb (Check_Inherited_Conditions): For an inherited
7260 subprogram that inherits a classwide condition, build spec and
7261 body of corresponding wrapper so that call to inherited operation
7262 gets the modified conditions.
7263 * contracts.adb (Analyze_Contracts): If analysis of classwide
7264 condition has created a clone for a primitive operation, analyze
7265 declaration of clone.
7267 2017-04-27 Steve Baird <baird@adacore.com>
7269 * exp_util.adb (Build_Allocate_Deallocate_Proc):
7270 Add "Suppress => All_Checks" to avoid generating unnecessary
7273 2017-04-27 Yannick Moy <moy@adacore.com>
7275 * debug.adb: Reserve debug flag 'm' for no inlining in GNATprove.
7276 * sem_ch6.adb (Anayze_Subprogram_Body_Helper): Skip creation of
7277 inlining body in GNATprove mode when switch -gnatdm used.
7278 * sem_res.adb (Resolve_Call): Skip detection of lack of inlining
7279 in GNATprove mode when switch -gnatdm used.
7281 2017-04-27 Arnaud Charlet <charlet@adacore.com>
7283 * sem_ch13.adb (Analyze_Attribute_Definition_Clause
7284 [Attribute_Address]): Call Set_Address_Taken when ignoring rep
7285 clauses, so that we keep an indication of the address clause
7286 before removing it from the tree.
7288 2017-04-27 Yannick Moy <moy@adacore.com>
7290 * exp_util.ads, exp_util.adb (Evaluate_Name): Force evaluation
7291 of expression being qualified, when not an object name, or else
7292 evaluate the underlying name.
7294 2017-04-27 Jerome Lambourg <lambourg@adacore.com>
7296 * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: add -nognarl switch.
7298 2017-04-27 Justin Squirek <squirek@adacore.com>
7300 * exp_ch7.adb (Build_Finalize_Statements): Move Num_Comps to
7301 Process_Component_List_For_Finalization as a local variable.
7302 (Process_Component_For_Finalize): Add an extra parameter to avoid
7304 (Process_Component_List_For_Finalization): Correct calls to
7305 Process_Component_For_Finalize to take Num_Comps as a parameter.
7307 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7309 * sem_ch8.adb (Find_Direct_Name): Account for the case where
7310 a use-visible entity is defined within a nested scope of an
7311 instance when giving priority to entities which were visible in
7312 the original generic.
7313 * sem_util.ads, sem_util.adb (Nearest_Enclosing_Instance): New routine.
7315 2017-04-27 Tristan Gingold <gingold@adacore.com>
7317 * raise-gcc.c: Don't use unwind.h while compiling
7318 for the frontend, but mimic host behavior.
7320 2017-04-27 Javier Miranda <miranda@adacore.com>
7322 * sem_ch3.adb (Build_Discriminated_Subtype):
7323 Propagate Has_Pragma_Unreferenced_Objects to the built subtype.
7325 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7327 * sem_prag.adb (Analyze_Global_Item):
7328 Do not consider discriminants because they are not "entire
7329 objects". Remove the discriminant-related checks because they are
7331 (Analyze_Input_Output): Do not consider discriminants
7332 because they are not "entire objects".
7334 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7336 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Do not
7337 perform check if the current scope does not come from source,
7338 as is the case for a rewritten task body, because check has
7339 been performed already, and may not be doable because of changed
7342 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7344 * a-cofuse.adb, a-cfdlli.adb, a-cofuse.ads, a-cfdlli.ads, a-cofuve.adb,
7345 a-cofuve.ads, a-cofuma.adb, a-cofuma.ads, sem_eval.adb, a-cofuba.adb:
7348 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7350 * sem_ch4.adb (Analyze_Call): If the return type of a function
7351 is incomplete in an context in which the full view is available,
7352 replace the type of the call by the full view, to prevent spurious
7354 * exp_disp.adb (Check_Premature_Freezing): Disable check on an
7355 abstract subprogram so that compiler does not reject a parameter
7356 of a primitive operation of a tagged type being frozen, when
7357 the untagged type of that parameter cannot be frozen.
7359 2017-04-27 Bob Duff <duff@adacore.com>
7361 * sem_attr.adb (Compute_Type_Key): Don't walk
7362 representation items for irrelevant types, which could be in a
7363 different source file.
7365 2017-04-27 Steve Baird <baird@adacore.com>
7367 * exp_attr.adb (Expand_N_Attribute_Reference):
7368 Don't expand Image, Wide_Image, Wide_Wide_Image attributes
7371 2017-04-27 Yannick Moy <moy@adacore.com>
7373 * exp_unst.ads: Fix typos in comments.
7375 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7377 * sem_eval.adb (Choice_Matches): Handle properly a real literal
7378 whose type has a defined static predicate.
7380 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7382 * exp_ch4.adb (Insert_Dereference_Action):
7383 Do not adjust the address of a controlled object when the
7384 associated access type is subject to pragma No_Heap_Finalization.
7387 2017-04-27 Pierre-Marie de Rodat <derodat@adacore.com>
7389 * gcc-interface/utils.c (gnat_type_for_size): Set
7390 TYPE_ARTIFICIAL on created types.
7392 2017-04-27 Claire Dross <dross@adacore.com>
7394 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
7395 modifications in functional containers.
7396 * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
7397 to improve readablity. Subprograms are separated between basic
7398 operations, constructors and properties. Universally quantified
7399 formulas in contracts are factorized in independant functions
7400 with a name and a comment. Names of parameters are improved.
7402 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7404 * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
7406 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7408 * sem_res.adb (Resolve_Type_Conversion): Do not
7409 install a predicate check here since this is already done during
7410 the expansion phase. Verify whether the operand satisfies the
7411 static predicate (if any) of the target type.
7412 * sem_ch3.adb (Analyze_Object_Declaration): Do
7413 not install a predicate check if the object is initialized by
7414 means of a type conversion because the conversion is subjected
7417 2017-04-27 Tristan Gingold <gingold@adacore.com>
7419 * raise.c (__gnat_builtin_longjmp): Remove.
7420 (__gnat_bracktrace):
7421 Add a dummy definition for the compiler (__gnat_eh_personality,
7422 __gnat_rcheck_04, __gnat_rcheck_10) (__gnat_rcheck_19,
7423 __gnat_rcheck_20, __gnat_rcheck_21) (__gnat_rcheck_30,
7424 __gnat_rcheck_31, __gnat_rcheck_32): Likewise.
7425 * a-exexpr.adb: Renamed from a-exexpr-gcc.adb
7426 * a-except.ads, a-except.adb: Renamed from a-except-2005.ads
7427 and a-except-2005.adb.
7428 * raise-gcc.c: Allow build in compiler, compiled as a C++
7430 (__gnat_Unwind_ForcedUnwind): Adjust prototype.
7431 (db): Constify msg_format.
7432 (get_call_site_action_for): Don't use void arithmetic.
7433 * system.ads (Frontend_Exceptions): Set to False.
7434 (ZCX_By_Default): Set to True.
7435 (GCC_ZC_Support): Set to True.
7436 * gcc-interface/Makefile.in: No more variants for a-exexpr.adb and
7438 * gcc-interface/Make-lang.in: Add support for backend zcx exceptions
7439 in gnat1 and gnatbind.
7440 * gnat1, gnatbind: link with raise-gcc.o, a-exctra.o, s-addima.o,
7441 s-excmac.o, s-imgint.o, s-traceb.o, s-trasym.o, s-wchstw.o
7442 * s-excmac.ads, s-excmac.adb: Copy of variants.
7443 * a-except.o: Adjust preequisites.
7444 Add handling of s-excmac-arm.adb and s-excmac-gcc.adb.
7446 2017-04-27 Claire Dross <dross@adacore.com>
7448 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
7449 modifications in functional containers.
7450 * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
7451 to improve readablity. Subprograms are separated between basic
7452 operations, constructors and properties. Universally quantified
7453 formulas in contracts are factorized in independant functions
7454 with a name and a comment. Names of parameters are improved.
7456 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7458 * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
7460 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7462 * sem_res.adb (Resolve_Type_Conversion): Do not
7463 install a predicate check here since this is already done during
7464 the expansion phase. Verify whether the operand satisfies the
7465 static predicate (if any) of the target type.
7466 * sem_ch3.adb (Analyze_Object_Declaration): Do
7467 not install a predicate check if the object is initialized by
7468 means of a type conversion because the conversion is subjected
7471 2017-04-27 Tristan Gingold <gingold@adacore.com>
7473 * a-except.ads, a-except.adb, a-exexpr.adb: Removed (will be
7474 replaced by their variants).
7476 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7478 * exp_prag.adb, a-cofuse.adb, a-cofuse.ads, einfo.adb, sem_prag.adb,
7479 cstand.adb, par-prag.adb, a-cofuve.adb, a-cofuve.ads, a-cofuma.adb,
7480 a-cofuma.ads, a-cofuba.adb, a-cofuba.ads: Minor reformatting.
7482 2017-04-27 Tristan Gingold <gingold@adacore.com>
7484 * s-excmac-gcc.ads, s-excmac-gcc.adb,
7485 s-excmac-arm.ads, s-excmac-arm.adb (New_Occurrence): Rewrite it in
7488 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7490 * exp_ch7.adb (Establish_Transient_Scope): Rewrite
7491 the loop which detects potential enclosing transient scopes. The
7492 loop now terminates much earlier as transient scopes are bounded
7493 by packages and subprograms.
7495 2017-04-27 Claire Dross <dross@adacore.com>
7497 * a-cfdlli.adb, a-cfdlli.ads (=): Generic parameter removed to
7498 allow the use of regular equality over elements in contracts.
7499 (Cursor): Type is now public so that it can be used in
7501 (Formal_Model): Ghost package containing
7502 model functions that are used in subprogram contracts.
7503 (Current_To_Last): Removed, model functions should be used
7505 (First_To_Previous): Removed, model functions should
7507 (Strict_Equal): Removed, model functions
7508 should be used instead.
7509 (Append): Default parameter value
7510 replaced by new wrapper to allow more precise contracts.
7511 (Insert): Default parameter value replaced by new wrapper to
7512 allow more precise contracts.
7513 (Delete): Default parameter
7514 value replaced by new wrapper to allow more precise contracts.
7515 (Prepend): Default parameter value replaced by new wrapper to
7516 allow more precise contracts.
7517 (Delete_First): Default parameter
7518 value replaced by new wrapper to allow more precise contracts.
7519 (Delete_Last): Default parameter value replaced by new wrapper
7520 to allow more precise contracts.
7522 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7524 * exp_spark.adb (Expand_SPARK): Perform specialized expansion
7525 for object declarations.
7526 (Expand_SPARK_N_Object_Declaration): New routine.
7527 * sem_elab.adb (Check_A_Call): Include calls to the
7528 Default_Initial_Condition procedure of a type under the SPARK
7529 elaboration checks umbrella.
7531 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7533 * sem.adb (Analyze): Diagnose an illegal iterated component
7535 * sem_util.ads, sem_util.adb
7536 (Diagnose_Iterated_Component_Association): New routine.
7538 2017-04-27 Bob Duff <duff@adacore.com>
7540 * adaint.c (__gnat_get_current_dir): Return 0 in length if
7542 * a-direct.adb, g-dirope.adb, osint.adb, s-os_lib.adb: Raise
7543 exception if getcwd failed.
7545 2017-04-27 Yannick Moy <moy@adacore.com>
7547 * exp_dbug.adb, exp_dbug.ads (Get_External_Name): Prefix ghost
7548 entities with special prefix.
7550 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7552 * debug.adb Change the documentation of switch -gnatd.s.
7553 * exp_ch7.adb (Make_Transient_Block): Transient blocks do not need
7554 to manage the secondary stack when an enclosing scope already
7555 performs this functionality (aka relaxed management). Switch
7556 -gnatd.s may be used to force strict management in which case
7557 the block will manage the secondary stack unconditionally. Add
7558 a guard to stop the traversal when encountering a package or a
7561 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7563 * sem_res.adb (Resolve_Call): Refine further the handling of
7564 limited views of return types in function calls. If the function
7565 that returns a limited view appears in the current unit,
7566 we do not replace its type by the non-limited view because
7567 this transformation is performed int the back-end. However,
7568 the type of the call itself must be the non-limited view, to
7569 prevent spurious resolution errors.
7571 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7573 * einfo,ads, einfo.adb (Class_Wide_Preconds, Class_Wide_Postconds):
7574 Removed, proposed implementation using generics for class-wide
7575 preconditions proved impractical.
7576 (Class_Wide_Clone): New attribute of subprogram. Designates
7577 subprogram created for primitive operations with class-wide
7578 pre/postconditions that contain calls to other primitives. The
7579 clone holds the body of the original primitive, but the
7580 pre/postonditions do not apply to it. The original body is
7581 rewritten as a wrapper for a call to the clone.
7582 (Is_Class_Wide_Clone): New flag to identify a Class_Wide_Clone. If
7583 the flag is set, no code for the corresponding pre/postconditions
7584 is inserted into its body.
7586 2017-04-27 Bob Duff <duff@adacore.com>
7588 * exp_prag.adb, par-prag.adb, sem_ch13.adb: Ignore
7589 Scalar_Storage_Order if -gnatI is given.
7590 * sem_prag.adb (Analyze_Pragma): Ignore
7591 Default_Scalar_Storage_Order if -gnatI is given.
7593 2017-04-27 Claire Dross <dross@adacore.com>
7595 * a-cofuba.ads (Add): Take as an additional input parameter
7596 the position where the element should be inserted.
7597 (Remove): New function that removes an element from the container.
7598 * a-cofuma.ads (Add): Adapt to the new API of Base.Add.
7599 * a-cofuse.ads (Add): Adapt to the new API of Base.Add.
7600 (Remove): New function that removes an element from a set.
7601 * a-cofuve.ads (Add): Adapt to the new API of Base.Add.
7602 (Remove): New function that removes an element from a sequence.
7603 (Insert): New function that adds anywhere in a sequence.
7605 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7607 * checks.adb (Generate_Range_Check): Revert previous change.
7609 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7611 * sem_util.adb: Minor reformatting/rewording.
7613 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7615 * lib-xref.adb (Generate_Reference): The use
7616 of attribute 'Result is not considered a violation of pragma
7619 2017-04-27 Justin Squirek <squirek@adacore.com>
7621 * cstand.adb (Create_Standard): Correctly set
7622 Directly_Designated_Type for Any_Access.
7623 * sem_type.adb (Covers): Minor grammar fixes.
7625 2017-04-27 Bob Duff <duff@adacore.com>
7627 * sem_attr.adb: Minor cleanup.
7629 2017-04-27 Claire Dross <dross@adacore.com>
7631 * a-cofuba.ads, a-cofuba.adb (Ada.Containers.Functional_Base): New
7632 private child of Ada.Containers used to implement all functional
7634 * a-cofuma.ads, a-cofuma.adb (Ada.Containers.Functional_Maps): New
7635 child of Ada.Containers. It provides functional indefinite unbounded
7636 maps which can be used as high level models for specification
7638 * a-cofuse.ads, a-cofuse.adb (Ada.Containers.Functional_Sets): New
7639 child of Ada.Containers. It provides functional indefinite unbounded
7640 sets which can be used as high level models for specification
7642 * a-cofuve.ads, a-cofuve.adb (Ada.Containers.Functional_Vectors): New
7643 child of Ada.Containers. It provides functional indefinite unbounded
7644 vectors which can be used as high level models for specification
7646 * Makefile.rtl: Add new packages.
7647 * impunit.adb: Add new packages.
7649 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7651 * sem_ch4.adb: Minor reformatting.
7653 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7655 * sem_ch12.adb (Analyze_Associations): minor reformatting.
7656 (Check_Fixed_Point_Actual): Do not emit a warning on a fixed
7657 point type actual that has user-defined arithmetic primitives,
7658 when there is a previous actual for a formal package that defines
7659 a fixed-point type with the parent user-defined operator.
7661 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7663 * checks.adb (Generate_Range_Check): Reinstate part of previous change.
7664 * sem_attr.adb (Resolve_Attribute): Generate a range check when
7665 the component type allows range checks.
7667 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7669 * sem_aux.adb (Is_Generic_Formal): Use original node to locate
7670 corresponding declaration, because formal derived types are
7671 rewritten as private extensions.
7673 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7675 * sem_dim.adb (Analyze_Dimension_Binary_Op): Do not check
7676 dimensions of operands if node has been analyzed already, because
7677 previous analysis and dimension checking will have removed the
7678 dimension information from the operands.
7680 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7682 * debug.adb: Document the use of switch -gnatd.s.
7683 * einfo.ads Update the documentation on attribute
7684 Sec_Stack_Needed_For_Return and attribute Uses_Sec_Stack. Remove
7685 the uses of these attributes from certain entities.
7686 * exp_ch7.adb (Make_Transient_Block): Reimplement the circuitry
7687 which determines whether the block should continue to manage
7688 the secondary stack.
7689 (Manages_Sec_Stack): New routine.
7691 2017-04-27 Bob Duff <duff@adacore.com>
7693 * atree.ads: Minor edit.
7695 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7697 * sinfo.ads: Update the section on Ghost mode. Add
7698 a section on SPARK mode. Update the placement of section on
7699 expression functions.
7701 2017-04-27 Bob Duff <duff@adacore.com>
7703 * sinput.adb (Get_Source_File_Index): Don't
7704 assert that S is in the right range in the case where this is
7705 a .dg file under construction.
7707 2017-04-27 Yannick Moy <moy@adacore.com>
7709 * sem_util.adb (Check_Result_And_Post_State):
7710 Handle more precisely each conjunct in expressions formed by
7711 and'ing sub-expressions.
7713 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7715 * exp_ch4.adb, sem_ch4.adb: Minor typo fix and reformatting.
7717 2017-04-25 Arnaud Charlet <charlet@adacore.com>
7719 * gnat_rm.texi, gnat_ugn.texi,
7720 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
7721 doc/gnat_ugn/platform_specific_information.rst,
7722 doc/gnat_ugn/gnat_and_program_execution.rst,
7723 doc/gnat_ugn/gnat_utility_programs.rst,
7724 doc/gnat_ugn/the_gnat_compilation_model.rst,
7725 doc/gnat_rm/implementation_defined_attributes.rst,
7726 doc/gnat_rm/the_gnat_library.rst,
7727 doc/gnat_rm/implementation_defined_pragmas.rst,
7728 doc/gnat_rm/representation_clauses_and_pragmas.rst,
7729 doc/gnat_rm/implementation_of_specific_ada_features.rst,
7730 doc/gnat_rm/implementation_defined_aspects.rst,
7731 doc/gnat_rm/implementation_defined_characteristics.rst: Update
7734 2017-04-25 Arnaud Charlet <charlet@adacore.com>
7736 * exp_ch4.adb (Expand_N_Case_Expression): Emit error message when
7737 generating C code on complex case expressions.
7739 2017-04-25 Arnaud Charlet <charlet@adacore.com>
7741 * sem_prag.adb (Analyze_Pragma): Generate a warning instead
7742 of silently ignoring pragma Ada_xxx in Latest_Ada_Only mode.
7743 * directio.ads, ioexcept.ads, sequenio.ads, text_io.ads: Use
7744 Ada_2012 instead of Ada_2005 to be compatible with the above
7746 * bindgen.adb: Silence new warning on pragma Ada_95.
7748 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
7750 * checks.adb (Generate_Range_Check): Revert part of previous change.
7752 2017-04-25 Ed Schonberg <schonberg@adacore.com>
7754 * sem_ch4.adb (Try_Container_Indexing): Handle properly a
7755 container indexing operation that appears as a an actual in a
7756 parameter association in a procedure call.
7758 2017-04-25 Olivier Ramonat <ramonat@adacore.com>
7760 * prj-proc.adb, sem_util.adb, s-stposu.adb, sem_attr.adb, prj-conf.ads:
7761 Fix spelling mistakes.
7763 2017-04-25 Bob Duff <duff@adacore.com>
7765 * types.ads, osint.adb, sinput-c.adb, sinput-d.adb, sinput-l.adb,
7766 * sinput-p.adb: Use regular fat pointers, with bounds checking,
7767 for source buffers. Fix misc obscure bugs.
7768 * sinput.ads, sinput.adb: Use regular fat pointers, with bounds
7769 checking, for source buffers. Modify representation clause for
7770 Source_File_Record as appropriate. Move Source_File_Index_Table
7771 from spec to body, because it is not used outside the body.
7772 Move Set_Source_File_Index_Table into the private part, because
7773 it is used only in the body and in children. Use trickery to
7774 modify the dope in the generic instantiation case. It's ugly,
7775 but not as ugly as the previous method. Fix documentation.
7776 Remove obsolete code.
7777 * fname-sf.adb, targparm.adb: Fix misc out-of-bounds
7778 indexing in source buffers.
7779 * fmap.adb: Avoid conversions from one string type to another.
7780 Remove a use of global name buffer.
7781 * osint.ads, sfn_scan.ads, sfn_scan.adb, sinput-c.ads: Comment
7784 2017-04-25 Gary Dismukes <dismukes@adacore.com>
7786 * exp_util.adb, exp_ch4.adb: Minor reformatting.
7788 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
7790 * checks.adb: Code clean up in various routines.
7791 (Generate_Range_Check): Do not generate a range check when the
7792 expander is not active or when index/range checks are suppressed
7794 (Insert_List_After_And_Analyze, Insert_List_Before_And_Analyze):
7795 Remove variants that include a Supress parameter. These routines
7796 are never used, and were introduced before the current scope-based
7797 check suppression method.
7799 2017-04-25 Vasiliy Fofanov <fofanov@adacore.com>
7801 * prj-part.adb, cstreams.c, osint.adb, osint.ads: Remove VMS specific
7802 code and some subprogram calls that are now noop.
7804 2017-04-25 Arnaud Charlet <charlet@adacore.com>
7806 * exp_ch4.adb (Expand_N_Case_Expression): Take
7807 Minimize_Expression_With_Actions into account when possible.
7809 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
7811 * exp_util.adb (Known_Non_Null): Moved to Sem_Util.
7812 (Known_Null): Moved to Sem_Util.
7813 * exp_util.ads (Known_Non_Null): Moved to Sem_Util.
7814 (Known_Null): Moved to Sem_Util.
7815 * sem_util.adb Add new enumeration type Null_Status_Kind.
7816 (Known_Non_Null): Moved from Exp_Util. Most of the logic in
7817 this routine is now carried out by Null_Status.
7818 (Known_Null): Moved from Exp_Util. Most of the logic in this routine
7819 is now carried out by Null_Status.
7820 (Null_Status): New routine.
7821 * sem_util.ads (Known_Non_Null): Moved from Exp_Util.
7822 (Known_Null): Moved from Exp_Util.
7824 2017-04-25 Ed Schonberg <schonberg@adacore.com>
7826 * sem_ch6.adb (Analyze_Expression_Function): Do not report an
7827 error on the return type of an expression function that is a
7828 completion, if the type is derived from a generic formal type.
7830 2017-04-25 Ed Schonberg <schonberg@adacore.com>
7832 * sem_dim.adb (Dimensions_Of_Operand): The dimensions of a type
7833 conversion are those of the target type.
7835 2017-04-25 Bob Duff <duff@adacore.com>
7837 * a-clrefi.adb: Minor cleanup.
7839 2017-04-25 Gary Dismukes <dismukes@adacore.com>
7841 * exp_util.adb, exp_util.ads, types.ads: Minor reformatting.
7843 2017-04-25 Bob Duff <duff@adacore.com>
7845 * err_vars.ads, fmap.adb, fmap.ads, comperr.adb, fname-sf.adb,
7846 types.adb, types.ads, types.h, sinput-l.adb, targparm.adb,
7847 errout.adb, sinput.adb, sinput.ads, cstand.adb, scn.adb,
7848 scn.ads, gnatls.adb: Eliminate the vestigial Internal_Source_File and
7849 the Internal_Source buffer. This removes the incorrect call to "="
7850 the customer noticed.
7851 Wrap remaining calls to "=" in Null_Source_Buffer_Ptr. We
7852 eventually need to eliminate them altogether. Or else get rid
7853 of zero-origin addressing.
7855 2017-04-25 Claire Dross <dross@adacore.com>
7857 * exp_util.ads (Expression_Contains_Primitives_Calls_Of): New
7858 function used in GNATprove to know if an expression contains
7859 non-dispatching calls on primitives of a tagged type.
7861 2017-04-25 Bob Duff <duff@adacore.com>
7863 * rtsfind.adb (Initialize): Initialize
7864 First_Implicit_With. Building the compiler with Normalize_Scalars
7865 and validity checking finds this being used as an uninitialized
7868 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
7870 * contracts.adb (Analyze_Entry_Or_Subprogram_Body_Contract):
7871 Add a warning about SPARK mode management. The routine now
7872 saves and restores both the mode and associated pragma.
7873 (Analyze_Entry_Or_Subprogram_Contract): Add a warning about
7874 SPARK mode management. The routine now saves and restores both
7875 the mode and associated pragma.
7876 (Analyze_Object_Contract):
7877 Add a warning about SPARK mode management. The routine
7878 now saves and restores both the mode and associated pragma.
7879 (Analyze_Package_Body_Contract): Add a warning about SPARK mode
7880 management. The routine now saves and restores both the mode
7881 and associated pragma. (Analyze_Package_Contract): Add a warning
7882 about SPARK mode management. The routine now saves and restores
7883 both the mode and associated pragma.
7884 (Analyze_Task_Contract):
7885 Add a warning about SPARK mode management. The routine now saves
7886 and restores both the mode and associated pragma.
7887 * expander.adb (Expand): Change the way the Ghost mode is saved
7889 * exp_ch3.adb (Freeze_Type): Change the way the Ghost mode is
7891 * exp_disp.adb (Make_DT): Change the way the Ghost mode is saved
7893 * exp_util.adb (Build_DIC_Procedure_Body):
7894 Change the way the Ghost mode is saved and restored.
7895 (Build_DIC_Procedure_Declaration): Change the way the Ghost
7896 mode is saved and restored.
7897 (Build_Invariant_Procedure_Body):
7898 Change the way the Ghost mode is saved and restored.
7899 (Build_Invariant_Procedure_Declaration): Change the way the Ghost
7900 mode is saved and restored.
7901 (Make_Predicate_Call): Change the
7902 way the Ghost mode is saved and restored.
7903 * freeze.adb (Freeze_Entity): Change the way the Ghost mode is
7905 * ghost.adb (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
7907 (Mark_And_Set_Ghost_Body): Remove parameter
7908 Mode and its assignment.
7909 (Mark_And_Set_Ghost_Completion):
7910 Remove parameter Mode and its assignment.
7911 (Mark_And_Set_Ghost_Declaration): Remove parameter Mode and its
7913 (Mark_And_Set_Ghost_Instantiation): Remove parameter
7914 Mode and its assignment.
7915 (Mark_And_Set_Ghost_Procedure_Call):
7916 Remove parameter Mode and its assignment.
7918 Remove parameter Mode and its assignment.
7919 * ghost.ads (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
7920 and update the comment on usage.
7921 (Mark_And_Set_Ghost_Body):
7922 Remove parameter Mode and update the comment on usage.
7923 (Mark_And_Set_Ghost_Completion): Remove parameter Mode and
7924 update the comment on usage.
7925 (Mark_And_Set_Ghost_Declaration):
7926 Remove parameter Mode and update the comment on usage.
7927 (Mark_And_Set_Ghost_Instantiation): Remove parameter Mode and
7928 update the comment on usage.
7929 (Mark_And_Set_Ghost_Procedure_Call):
7930 Remove parameter Mode and update the comment on usage.
7931 (Set_Ghost_Mode): Remove parameter Mode and update the comment
7933 * lib.ads Remove obsolete fields SPARK_Mode_Pragma from various
7935 * lib-load.adb (Create_Dummy_Package_Unit): Remove the assignment
7936 of obsolete field SPARK_Mode_Pragma.
7937 (Load_Main_Source): Remove
7938 the assignment of obsolete field SPARK_Mode_Pragma.
7939 (Load_Unit): Remove the assignment of obsolete field SPARK_Mode_Pragma.
7940 * lib-writ.adb (Add_Preprocessing_Dependency): Remove
7941 the assignment of obsolete field SPARK_Mode_Pragma.
7942 (Ensure_System_Dependency): Remove the assignment of obsolete
7943 field SPARK_Mode_Pragma.
7944 * rtsfind.adb (Load_RTU): Add a warning about Ghost and SPARK
7945 mode management. Change the way Ghost and SPARK modes are saved
7947 * sem.adb (Analyze): Change the way the Ghost mode is saved
7949 * sem_ch3.adb (Analyze_Object_Declaration): Change the way the
7950 Ghost mode is saved and restored.
7951 (Process_Full_View): Change
7952 the way the Ghost mode is saved and restored.
7953 * sem_ch5.adb (Analyze_Assignment): Change the way the Ghost
7954 mode is saved and restored.
7955 * sem_ch6.adb (Analyze_Procedure_Call): Change the way the Ghost
7956 mode is saved and restored.
7957 (Analyze_Subprogram_Body_Helper):
7958 Change the way the Ghost mode is saved and restored.
7959 * sem_ch7.adb (Analyze_Package_Body_Helper): Change the way the
7960 Ghost mode is saved and restored.
7961 * sem_ch10.adb (Analyze_Subunit): Add a warning about SPARK mode
7962 management. Save the SPARK mode-related data prior to any changes
7963 to the scope stack and contexts. The mode is then reinstalled
7964 before the subunit is analyzed in order to restore the original
7965 view of the subunit.
7966 * sem_ch12.adb (Analyze_Package_Instantiation): Update the
7967 warning on region management. Change the way the Ghost and
7968 SPARK modes are saved and restored.
7969 (Inline_Instance_Body):
7970 Add a warning about SPARK mode management. Code clean up.
7971 (Analyze_Subprogram_Instantiation): Update the warning on region
7972 management. Change the way the Ghost and SPARK modes are saved
7974 (Instantiate_Package_Body): Update the warning
7975 on region management. Change the way the Ghost and SPARK modes
7976 are saved and restored.
7977 (Instantiate_Subprogram_Body): Update
7978 the warning on region management. Change the way the Ghost and
7979 SPARK modes are saved and restored.
7980 (Set_Instance_Env): Add a
7981 warning about SPARK mode management. Change the way SPARK mode
7982 is saved and restored.
7983 * sem_ch13.adb (Build_Predicate_Functions):
7984 Change the way the Ghost mode is saved and restored.
7985 (Build_Predicate_Function_Declaration): Change the way the Ghost
7986 mode is saved and restored.
7987 * sem_elab.adb (Check_Elab_Calls): Add a warning about SPARK
7988 mode management. Change the way SPARK mode is saved and restored.
7989 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
7990 Change the way the Ghost mode is saved and restored.
7991 (Analyze_Initial_Condition_In_Decl_Part): Change the way
7992 the Ghost mode is saved and restored.
7994 Change the way the Ghost mode is saved and restored.
7995 (Analyze_Pre_Post_Condition_In_Decl_Part): Change the way the
7996 Ghost mode is saved and restored.
7997 * sem_util.adb (Install_SPARK_Mode): New routine.
7998 (Restore_SPARK_Mode): New routine.
7999 (Save_SPARK_Mode_And_Set): Removed.
8000 (Set_SPARK_Mode): New routine.
8001 * sem_util.ads (Install_SPARK_Mode): New routine.
8002 (Restore_SPARK_Mode): New routine.
8003 (Save_SPARK_Mode_And_Set): Removed.
8004 (Set_SPARK_Mode): New routine.
8006 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8008 * sem_util.adb, sem_util.ads (From_Nested_Package): New predicate
8009 to determine whether a type is declared in a local package that
8010 has not yet been frozen.
8011 * freeze.adb (Freeze_Before): Use new predicate to determine
8012 whether a local package must be installed on the scope stack
8013 in order to evaluate in the proper scope actions generated by
8014 aspect specifications, such as Predicate
8015 * sem_ch13.adb: Simplify code in Analyze_Aspects_At_Freeze_Point
8016 using new predicate.
8018 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8020 * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not consider
8021 comparisons between non- scalar expressions expressions because
8022 their values cannot be invalidated.
8023 * sem_warn.ads (Warn_On_Constant_Valid_Condition): Update the
8026 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8028 * par_sco.adb: Minor reformatting.
8030 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8032 * sem_ch13.adb (Analyze_Aspects_At_Freeze_Point): If entity
8033 is a type from an unfrozen local package, install package to
8034 complete the analysis of delayed aspects of the type.
8036 2017-04-25 Tristan Gingold <gingold@adacore.com>
8038 * bingen.adb (System_Version_Control_Used): New variable.
8039 (Resolve_Binder_Options): Set the above variable.
8040 (Gen_Output_File_Ada): Conditionally call Gen_Versions.
8041 (Gen_Elab_Order): Emit blank line before.
8043 2017-04-25 Justin Squirek <squirek@adacore.com>
8045 * sem_cat.adb (Validate_RT_RAT_Component): Added
8046 an extra check to ignore incomplete types.
8048 2017-04-25 Thomas Quinot <quinot@adacore.com>
8050 * sem_prag.adb (Analyze_Pragma, case Pragma_Check): Remove
8051 bogus circuitry for the case where Name is Predicate.
8053 2017-04-25 Thomas Quinot <quinot@adacore.com>
8055 * par_sco.adb(Traverse_Declarations_Or_Statements.Traverse_Aspects):
8056 Create SCOs for Predicate aspects in disabled
8057 state initially, to be enabled later on by...
8058 * sem_ch13.adb (Build_Predicate_Functions.Add_Predicates): Mark
8059 SCO for predicate as enabled.
8061 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8063 * comperr.adb (Compiler_Abort): Remove now obsolete pair of
8064 pragmas Warnings Off / On.
8065 * namet.adb (Finalize): Remove now obsolete pair of pragmas
8067 * output.adb: Remove now obsolete pair of pragmas Warnings Off / On.
8068 * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not
8069 consider comparisons between static expressions because their
8070 values cannot be invalidated.
8071 * urealp.adb (Tree_Read): Remove now obsolete pair of pragmas
8073 (Tree_Write): Remove now obsolete pair of pragmas Warnings Off / On.
8074 * usage.adb Remove now obsolete pair of pragmas Warnings Off / On.
8076 2017-04-25 Bob Duff <duff@adacore.com>
8078 * sem_elab.adb (In_Task_Activation): Trace internal calls in
8081 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8083 * sem_prag.adb, sem_warn.adb, sem_eval.adb: Minor reformatting and
8086 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8088 * comperr.adb (Compiler_Abort): Add a pair of pragma Warnings
8089 On/Off to defend against a spurious warning in conditional
8091 * exp_ch4.adb (Rewrite_Comparison): Reimplemented.
8092 * namet.adb (Finalize): Add a pair of pragma Warnings On/Off to
8093 defend against a spurious warning in conditional compilation.
8094 * output.adb Add a pair of pragma Warnings On/Off to defend
8095 against a spurious warning in conditional compilation.
8096 * sem_eval.adb (Eval_Relational_Op): Major code clean up.
8097 (Fold_General_Op): New routine.
8098 (Fold_Static_Real_Op): New routine.
8099 (Test_Comparison): New routine.
8100 * sem_eval.ads (Test_Comparison): New routine.
8101 * sem_warn.adb (Is_Attribute_Constant_Comparison): New routine.
8102 (Warn_On_Constant_Valid_Condition): New routine.
8103 (Warn_On_Known_Condition): Use Is_Attribute_Constant_Comparison
8104 to detect a specific case.
8105 * sem_warn.adb (Warn_On_Constant_Valid_Condition): New routine.
8106 * urealp.adb (Tree_Read): Add a pair of pragma Warnings On/Off
8107 to defend against a spurious warning in conditional compilation.
8108 (Tree_Write): Add a pair of pragma Warnings On/Off to defend
8109 against a spurious warning in conditional compilation.
8110 * usage.adb Add a pair of pragma Warnings On/Off to defend
8111 against a spurious warning in conditional compilation.
8113 2017-04-25 Arnaud Charlet <charlet@adacore.com>
8115 * sinfo.ads, sem_ch13.adb: Update comment.
8117 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8119 * sem_util.adb (Is_Post_State): A reference to a
8120 generic in out parameter is considered a change in the post-state
8123 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8125 * sem_ch12.adb (Load_Parent_Of_Generic); When retrieving the
8126 declaration of a subprogram instance within its wrapper package,
8127 skip over null statements that may result from the rewriting of
8130 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8132 * exp_attr.adb (Expand_Attribute_Reference, case 'Read):
8133 If the type is an unchecked_union, replace the attribute with
8134 a Raise_Program_Error (rather than inserting such before the
8135 attribute reference) to handle properly the case where we are
8136 processing a component of a larger record, and we need to prevent
8137 further expansion for the unchecked union.
8138 (Expand_Attribute_Reference, case 'Write): If the type is
8139 an unchecked_union, check whether enclosing scope is a Write
8140 subprogram. Replace attribute with a Raise_Program_Error if the
8141 discriminants of the unchecked_union type have not default values
8142 because such a use is erroneous..
8144 2017-04-25 Tristan Gingold <gingold@adacore.com>
8146 * exp_ch9.adb (Expand_N_Task_Type_Declaration):
8147 Add relative_deadline to task record on edf profile.
8148 (Make_Initialize_Protection): Pass deadline_floor value on edf profile.
8149 (Make_Task_Create_Call): Pass relative_deadline value.
8150 * par-prag.adb (Prag): Handle Pragma_Deadline_Floor.
8151 * s-rident.ads (Profile_Name): Add GNAT_Ravenscar_EDF.
8152 (Profile_Info): Add info for GNAT_Ravenscar_EDF.
8153 * sem_prag.adb (Set_Ravenscar_Profile): Handle
8154 GNAT_Ravenscar_EDF (set scheduling policy).
8155 (Analyze_Pragma): Handle GNAT_Ravenscar_EDF profile and Deadline_Floor
8157 (Sig_Flags): Add choice for Pragma_Deadline_Floor.
8158 * snames.ads-tmpl (Name_Deadline_Floor, Name_Gnat_Ravenscar_EDF):
8160 (Pragma_Deadline_Floor): New pragma.
8161 * targparm.adb (Get_Target_Parameters): Recognize
8162 GNAT_Ravenscar_EDF profile.
8164 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
8166 * gnatvsn.ads (Library_Version): Bump to 8. Update comment.
8168 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8170 * sem_aux.adb (Nearest_Ancestor): Use original node of type
8171 declaration to locate nearest ancestor, because derived
8172 type declarations for record types are rewritten as record
8174 * sem_ch13.adb (Add_Call): Use an unchecked conversion to handle
8175 properly derivations that are completions of private types.
8176 (Add_Predicates): If type is private, examine rep. items of full
8177 view, which may include inherited predicates.
8178 (Build_Predicate_Functions): Ditto.
8180 2017-04-25 Javier Miranda <miranda@adacore.com>
8182 * sem_util.adb (New_Copy_Tree.Visit_Entity): Extend previous change
8183 to generate new entities for subtype declarations located in
8184 Expression_With_Action nodes.
8186 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8188 * sem_elab.adb (Check_A_Call): Remove
8189 local variables Is_DIC_Proc and Issue_In_SPARK. Verify the
8190 need for Elaborate_All when SPARK elaboration checks are
8191 required. Update the checks for instances, variables, and calls
8192 to Default_Initial_Condition procedures.
8194 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8196 * aspects.ads, aspects.adb: Make the GNAT-specific pragma No_Inline
8197 into a boolean aspect, in analogy with the Ada aspect No_Return.
8199 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8201 * exp_ch6.adb, sem_ch13.adb, sem_ch6.adb: Minor reformatting.
8203 2017-04-25 Bob Duff <duff@adacore.com>
8205 * sem_res.adb (Resolve_Actuals): Under -gnatd.q, reset
8206 Is_True_Constant for an array variable that is passed to a
8207 foreign function as an 'in' parameter.
8208 * debug.adb: Document -gnatd.q.
8210 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8212 * sem_ch6.adb (Analyze_Expression_Function): If expression function
8213 is completion and return type is an access type do not freeze
8214 designated type: this will be done in the process of freezing
8215 the expression if needed.
8216 (Freeze_Expr_Types): Check whether type is complete before
8217 creating freeze node, to provide a better error message if
8218 reference is premature.
8219 * sem_ch13.adb (Check_Indexing_Functions): Ignore inherited
8220 functions created by type derivations.
8222 2017-04-25 Pascal Obry <obry@adacore.com>
8224 * g-sercom.ads: Add simple usage of GNAT.Serial_Communication.
8226 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8228 * sem_res.adb (Resolve_Type_Conversion):
8229 When resolving against any fixed type, set the type of the
8230 operand as universal real when the operand is a multiplication
8231 or a division where both operands are of any fixed type.
8232 (Unique_Fixed_Point_Type): Add local variable ErrN. Improve the
8233 placement of an error message by pointing to the operand of a
8234 type conversion rather than the conversion itself.
8236 2017-04-25 Thomas Quinot <quinot@adacore.com>
8238 * sem_ch13.adb (Build_Predicate_Function_Declaration): Set
8239 Needs_Debug_Info when producing SCOs.
8241 2017-04-25 Thomas Quinot <quinot@adacore.com>
8243 * exp_ch6.adb (Add_Finalization_Master_Actual_To_Build_In_Place_Call):
8244 Always pass a null finalization master for a library level named access
8245 type to which a pragme No_Heap_Finalization applies.
8247 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
8251 * a-ngcoar.adb, a-ngrear.adb (Inverse): call Unit_Matrix with First_1
8252 set to A'First(2) and vice versa.
8254 2017-04-25 Yannick Moy <moy@adacore.com>
8256 * freeze.adb (Freeze_Record_Type): Remove obsolete
8257 rule on volatile tagged record restriction on SPARK code.
8259 2017-04-25 Yannick Moy <moy@adacore.com>
8261 * sem_prag.adb (minor) Fix SPARK RM reference.
8263 2017-04-25 Yannick Moy <moy@adacore.com>
8265 * sem_util.adb, sem_util.ads (Unique_Defining_Entity): Update
8266 comment to reflect which entity is chosen as unique entity.
8267 (Unique_Entity): Return full view instead of private spec for
8268 protected type or task type. Fix possible incorrect access when
8271 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8273 * sem_res.adb (Set_Slice_Subtype): Treat specially bit-packed
8274 array types only instead of all packed array types.
8276 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8278 * sem_ch6.adb (Conforming_Types): If type of formal as a specified
8279 dimension system, verify that dimensions of both match.
8280 (Check_Conformance): Add error message in case of dimension
8282 * sem_dim.ads, sem_dim.adb (Dimensions_Match): New utility
8285 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
8287 * gnatxref.adb, gnatfind.adb: Avoid using the term project file,
8290 2017-04-25 Yannick Moy <moy@adacore.com>
8292 * sem_util.adb: Minor refactoring.
8293 * freeze.adb (Freeze_Record_Type): Fix checking of SPARK RM 7.1.3(5).
8295 2017-04-25 Claire Dross <dross@adacore.com>
8297 * sem_prag.adb (Collect_Inherited_Class_Wide_Conditions): Go to
8298 ultimate alias when accessing overridden operation. Indeed, if the
8299 overridden operation is itself inherited, it won't have any explicit
8302 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8304 * sem_warn.adb (Warn_On_Overlapping_Actuals): There can be no
8305 overlap if the two formals have different types, because formally
8306 the corresponding actuals cannot designate the same objects.
8308 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8310 * sem_dim.adb (Dimensions_Of_Operand): minot cleanups: a) If
8311 dimensions are present from context, use them. b) If operand is
8312 a static constant rewritten as a literal, obtain the dimensions
8313 from the original declaration, otherwise use dimensions of type
8314 established from context.
8316 2017-04-25 Yannick Moy <moy@adacore.com>
8318 * sem_util.adb (Is_Effectively_Volatile): Protect against base type
8319 of array that is private.
8321 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8323 * sem_ch3.adb, exp_util.adb, sem_prag.adb, exp_ch4.adb: Minor
8326 2017-04-25 Yannick Moy <moy@adacore.com>
8328 * a-ngelfu.adb, a-ngelfu.ads: Add SPARK_Mode On on spec, Off
8331 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8333 * sem_disp.adb (Check_Dispatching_Context): Add guard to refine
8334 the check that recognizes a call to a private overridding and
8335 replaces the called subprogram with its alias.
8337 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8339 * exp_util.adb: Minor reformatting.
8341 2017-04-25 Justin Squirek <squirek@adacore.com>
8343 * exp_ch3.adb (Freeze_Type): Add condition to always treat
8344 interface types as a partial view of a private type for the
8345 generation of invariant procedure bodies.
8346 * exp_util.adb, exp_util.ads (Add_Inherited_Invariants):
8347 Add a condition to get the Corresponding_Record_Type for
8348 concurrent types, add condition to return in the absence of a
8349 class in the pragma, remove call to Replace_Type_References,
8350 and add call to Replace_References.
8351 (Add_Interface_Invariatns),
8352 (Add_Parent_Invariants): Modify call to Add_Inherited_Invariants
8353 to including the working type T.
8354 (Add_Own_Invariants): Remove
8355 legacy condition for separate units, remove dispatching for ASIS
8356 and save a copy of the expression in the pragma expression.
8357 (Build_Invariant_Procedure_Body): Default initalize vars,
8358 remove return condition on interfaces, always use the
8359 private type for interfaces, and move the processing of types
8360 until after the processing of invariants for the full view.
8361 (Build_Invariant_Procedure_Declaration): Remove condition
8362 to return if an interface type is encountered and add
8363 condition to convert the formal parameter to its class-wide
8364 counterpart if Work_Typ is abstract.
8365 (Replace_Type): Add call to Remove_Controlling_Arguments.
8366 (Replace_Type_Ref): Remove class-wide dispatching for the current
8367 instance of the type.
8368 (Replace_Type_References): Remove parameter "Derived"
8369 (Remove_Controlling_Arguments): Created in order to removing
8370 the controlliong argument from calls to primitives in the case
8371 of the formal parameter being an class-wide abstract type.
8372 * sem_ch3.adb (Build_Assertion_Bodies_For_Type): Almost identical
8373 to the change made to Freeze_Type in exp_ch3. Add a condition
8374 to treat interface types as a partial view.
8375 * sem_prag.adb (Analyze_Pragma): Modify parameters in the call
8376 to Build_Invariant_Procedure_Declaration to properly generate a
8377 "partial" invariant procedure when Typ is an interface.
8379 2017-04-25 Bob Duff <duff@adacore.com>
8381 * a-numeri.ads: Go back to using brackets encoding for the Greek
8384 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8386 * sem_ch3.adb (Derive_Subprogram): Implement rule in RM 6.1.1
8387 (10-15): if derived type T with progenitors is abstract,
8388 and primitive P of this type inherits non-trivial classwide
8389 preconditions from both a parent operation and from an interface
8390 operation, then the inherited operation is abstract if the parent
8391 operation is not null.
8392 * sem_disp.ads, sem_disp.adb: replace function Covers_Some_Interface
8393 with Covered_Interface_Op to yield the actual interface operation
8394 that is implemented by a given inherited operation.
8396 2017-04-25 Javier Miranda <miranda@adacore.com>
8398 * exp_ch4.adb (Expand_N_Op_Expon): Relocate left
8399 and right operands after performing the validity checks. Required
8400 because validity checks may remove side effects from the operands.
8402 2017-04-25 Javier Miranda <miranda@adacore.com>
8404 * exp_attr.adb (Attribute_Unrestricted_Access):
8405 Do not disable implicit type conversion. Required to generate
8406 code that displaces the pointer to reference the secondary
8409 2017-04-25 Pascal Obry <obry@adacore.com>
8411 * prj-attr.adb, snames.ads-tmpl: Add package Install's
8412 Required_Artifacts attribute.
8414 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8416 * sem_util.adb (Same_Value): String literals are compile-time
8417 values, and comparing them must use Expr_Value_S.
8419 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8421 * sem_ch4.adb (Complete_Object_Interpretation): If an explicit
8422 dereference is introduced for the object, and the object is
8423 overloaded, do not check whether it is aliased, because it may
8424 include an implicit dereference.
8425 * sem_type.adb (Disambiguate): If two interpretations are access
8426 attribute types with the same designated type keep either of
8427 them and do not report an ambiguity. A true ambiguity will be
8430 2017-04-25 Bob Duff <duff@adacore.com>
8432 * a-numeri.ads: Change the encoding of Greek letter Pi from
8433 brackets encoding to UTF-8. Use pragma Wide_Character_Encoding
8434 to indicate the encoding. We considered using a byte order mark
8435 (BOM), but that causes various trouble (misc software eats the
8436 BOM, if you have a patch with a BOM, then it's not at the start
8437 of the patch, so it's not a BOM, the BOM affects with-ing files,
8439 * scng.adb, s-wchcnv.adb: Minor.
8441 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8443 * sem_ch3.adb, sem_ch8.adb, sem_disp.adb: Minor reformatting.
8444 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8446 * sem_ch3.adb (Add_Internal_Interface_Entities): Move
8447 Has_Non_Trivial_Precondition to sem_util. for use elsewhere.
8448 Improve error message on operations that inherit non-conforming
8449 classwide preconditions from ancestor and progenitor.
8450 * sem_util.ads, sem_util.adb (Has_Non_Trivial_Precondition):
8451 moved here from sem_ch3.
8452 * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
8453 check given in RM 6.1.1 (17) concerning renamings of overriding
8454 operations that inherits class-wide preconditions from ancestor
8457 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8459 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Code cleanup.
8460 (Build_Adjust_Statements): Code cleanup.
8461 (Build_Finalizer): Update the initialization of
8463 (Build_Finalize_Statements): Code cleanup.
8464 (Build_Initialize_Statements): Code cleanup.
8465 (Make_Deep_Array_Body): Update the initialization of
8467 (Make_Deep_Record_Body): Update the initialization of Exceptions_OK.
8468 (Process_Object_Declaration): Generate a null exception handler only
8469 when exceptions are allowed.
8470 (Process_Transients_In_Scope): Update the initialization of
8472 * exp_util.ads, exp_util.adb (Exceptions_In_Finalization_OK): New
8474 * sem_ch11.adb (Analyze_Exception_Handlers): Do not check any
8475 restrictions when the handler is internally generated and the
8478 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8480 * sem_ch3.adb (Has_Non_Trivial_Precondition): New predicate to
8481 enforce legality rule on classwide preconditions inherited from
8482 both an ancestor and a progenitor (RM 6.1.1 (10-13).
8483 * sem_disp.adb (Check_Dispatching_Context): A call to an abstract
8484 subprogram need not be dispatching if it appears in a precondition
8485 for an abstract or null subprogram.
8487 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8489 * sem_ch10.adb: Minor typo fix.
8491 2017-04-25 Arnaud Charlet <charlet@adacore.com>
8493 * gcc-interface/Makefile.in: Cleanup VxWorks targets.
8495 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8497 * fname.adb (Is_Internal_File_Name): Arrange for the slices to
8498 have a length which is a power of 2.
8499 (Is_Predefined_File_Name): Likewise. Adjust comment.
8501 2017-04-25 Bob Duff <duff@adacore.com>
8503 * exp_aggr.adb (Component_Count): Protect the
8504 arithmetic from attempting to convert a value >= 2**31 to Int,
8505 which would otherwise raise Constraint_Error.
8507 2017-04-25 Bob Duff <duff@adacore.com>
8509 * opt.ads (Locking_Policy): Fix incorrect documentation. The
8510 first character of the policy name is not unique.
8512 2017-04-25 Bob Duff <duff@adacore.com>
8514 * s-fileio.adb (Name): Raise Use_Error if the file is a temp file.
8515 * s-ficobl.ads (Is_Temporary_File): Remove incorrect comment
8516 about this flag not being used. It was already used, and it is
8519 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8521 * einfo.adb Flag301 is now known as Ignore_SPARK_Mode_Pragmas.
8522 (Ignore_SPARK_Mode_Pragmas): New routine.
8523 (Set_Ignore_SPARK_Mode_Pragmas): New routine.
8524 (Write_Entity_Flags): Add an entry for Ignore_SPARK_Mode_Pragmas.
8525 * einfo.ads Add new attribute Ignore_SPARK_Mode_Pragmas and update
8527 (Ignore_SPARK_Mode_Pragmas): New routine
8528 along with pragma Inline.
8529 (Set_Ignore_SPARK_Mode_Pragmas): New routine along with pragma Inline.
8530 * opt.ads Rename flag Ignore_Pragma_SPARK_Mode to
8531 Ignore_SPARK_Mode_Pragmas_In_Instance.
8532 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
8533 Save and restore the value of global flag
8534 Ignore_SPARK_Mode_Pragmas_In_Instance. Set or reinstate the value
8535 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance when either
8536 the corresponding spec or the body must ignore all SPARK_Mode
8537 pragmas found within.
8538 (Analyze_Subprogram_Declaration): Mark
8539 the spec when it needs to ignore all SPARK_Mode pragmas found
8540 within to allow the body to infer this property in case it is
8541 instantiated or inlined later.
8542 * sem_ch7.adb (Analyze_Package_Body_Helper): Save and restore the
8543 value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
8544 the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
8545 when the corresponding spec also ignored all SPARK_Mode pragmas
8547 (Analyze_Package_Declaration): Mark the spec when
8548 it needs to ignore all SPARK_Mode pragmas found within to allow
8549 the body to infer this property in case it is instantiated or
8551 * sem_ch12.adb (Analyze_Formal_Package_Declaration):
8552 Save and restore the value of flag
8553 Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
8554 formal spec when it needs to ignore all SPARK_Mode
8555 pragmas found within to allow the body to infer this
8556 property in case it is instantiated or inlined later.
8557 (Analyze_Package_Instantiation): Save and restore the value
8558 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark
8559 the instance spec when it needs to ignore all SPARK_Mode
8560 pragmas found within to allow the body to infer this
8561 property in case it is instantiated or inlined later.
8562 (Analyze_Subprogram_Instantiation): Save and restore the value
8563 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
8564 instance spec and anonymous package when they need to ignore
8565 all SPARK_Mode pragmas found within to allow the body to infer
8566 this property in case it is instantiated or inlined later.
8567 (Instantiate_Package_Body): Save and restore the value of global
8568 flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set the value of
8569 global flag Ignore_SPARK_Mode_Pragmas_In_Instance when the
8570 corresponding instance spec also ignored all SPARK_Mode pragmas
8572 (Instantiate_Subprogram_Body): Save and restore the
8573 value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
8574 the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
8575 when the corresponding instance spec also ignored all SPARK_Mode
8576 pragmas found within.
8577 * sem_prag.adb (Analyze_Pragma): Update the reference to
8578 Ignore_Pragma_SPARK_Mode.
8579 * sem_util.adb (SPARK_Mode_Is_Off): A construct which ignored
8580 all SPARK_Mode pragmas defined within yields mode "off".
8582 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8584 * bindgen.adb, exp_dbug.adb, errout.adb, fname.adb: Minor reformatting.
8586 2017-04-25 Bob Duff <duff@adacore.com>
8588 * exp_atag.adb (Build_CW_Membership): Add "Suppress =>
8589 All_Checks" to avoid generating unnecessary checks.
8590 * exp_ch4.adb (Expand_N_In, Make_Tag_Check): Add "Suppress =>
8592 * sem.ads: Fix comment.
8593 * expander.ads: Fix comment.
8594 * exp_atag.ads: Fix comment: "Index = 0" should be
8597 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8599 * s-taprop-linux.adb: Minor editorial fixes.
8601 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8603 * sem_util.adb (New_Copy_Tree): Put back the declarations of the
8604 hash tables at library level. Reinstate the NCT_Hash_Tables_Used
8605 variable and set it to True whenever the main hash table is
8606 populated. Short- circuit the Assoc function if it is false
8607 and add associated guards.
8609 2017-04-25 Olivier Hainque <hainque@adacore.com>
8611 * bindgen.adb (Gen_Elab_Calls): Also update counter of lone
8612 specs without elaboration code that have an elaboration counter
8613 nevertheless, e.g. when compiled with -fpreserve-control-flow.
8614 * sem_ch10.adb (Analyze_Compilation_Unit):
8615 Set_Elaboration_Entity_Required when requested to preserve
8616 control flow, to ensure the unit elaboration is materialized at
8617 bind time, resulting in the inclusion of the unit object file
8618 in the executable closure at link time.
8620 2017-04-25 Pierre-Marie de Rodat <derodat@adacore.com>
8622 * exp_dbug.adb: In Debug_Renaming_Declaration,
8623 when dealing with indexed component, accept to produce a renaming
8624 symbol when the index is an IN parameter or when it is a name
8625 defined in an outer scope.
8627 2017-04-25 Yannick Moy <moy@adacore.com>
8629 * errout.adb (Error_Msg): Adapt continuation
8630 message in instantiations and inlined bodies for info messages.
8632 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8634 * fname.adb (Has_Internal_Extension): Add pragma Inline.
8635 Use direct 4-character slice comparisons.
8637 pragma Inline. (Has_Suffix): Delete.
8638 (Is_Internal_File_Name):
8639 Test Is_Predefined_File_Name first.
8640 (Is_Predefined_File_Name):
8641 Use direct slice comparisons as much as possible and limit all
8642 comparisons to at most 8 characters.
8644 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8646 * checks.adb (Insert_Valid_Check): Code cleanup.
8647 * exp_ch6.adb (Add_Validation_Call_By_Copy_Code): New routine.
8648 (Expand_Actuals): Generate proper copy-back for a validation
8649 variable when it acts as the argument of a type conversion.
8650 * sem_util.adb (Is_Validation_Variable_Reference): Augment the
8651 predicate to operate on type qualifications.
8653 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8655 * sem_prag.adb, exp_ch6.adb, binde.adb, sem_disp.adb, s-fileio.adb:
8658 2017-04-25 Bob Duff <duff@adacore.com>
8660 * sem_prag.adb (No_Return): Give an error if the pragma applies
8661 to a body. Specialize the error for the specless body case,
8662 as is done for (e.g.) pragma Convention.
8663 * debug.adb: Add switch -gnatd.J to disable the above legality
8664 checks. This is mainly for use in our test suite, to avoid
8665 rewriting a lot of illegal (but working) code. It might also
8666 be useful to customers. Under this switch, if a pragma No_Return
8667 applies to a body, and the procedure raises an exception (as it
8668 should), the pragma has no effect. If the procedure does return,
8669 execution is erroneous.
8671 2017-04-25 Bob Duff <duff@adacore.com>
8673 * exp_ch6.adb (Expand_Actuals): This is the
8674 root of the problem. It took N as an 'in out' parameter, and in
8675 some cases, rewrote N, but then set N to Original_Node(N). So
8676 the node returned in N had no Parent. The caller continued
8677 processing of this orphaned node. In some cases that caused a
8678 crash (e.g. Remove_Side_Effects climbs up Parents in a loop,
8679 and trips over the Empty Parent). The solution is to make N an
8680 'in' parameter. Instead of rewriting it, return the list of
8681 post-call actions, so the caller can do the rewriting later,
8682 after N has been fully processed.
8683 (Expand_Call_Helper): Move most of Expand_Call here. It has
8684 too many premature 'return' statements, and we want to do the
8685 rewriting on return.
8686 (Insert_Post_Call_Actions): New procedure to insert the post-call
8687 actions in the appropriate place. In the problematic case,
8688 that involves rewriting N as an Expression_With_Actions.
8689 (Expand_Call): Call the new procedures Expand_Call_Helper and
8690 Insert_Post_Call_Actions.
8692 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8694 * sem_prag.adb (Inherits_Class_Wide_Pre): Cleanup code, handle
8695 properly type derived from generic formal types, to handle
8696 properly modified version of ACATS 4.1B B611017.
8698 2017-04-25 Javier Miranda <miranda@adacore.com>
8700 * exp_unst.adb (Subp_Index): Adding missing
8701 support for renamings and functions that return a constrained
8702 array type (i.e. functions for which the frontend built a
8703 procedure with an extra out parameter).
8705 2017-04-25 Pascal Obry <obry@adacore.com>
8707 * s-string.adb: Minor code clean-up.
8709 2017-04-25 Bob Duff <duff@adacore.com>
8711 * s-os_lib.ads, s-os_lib.adb (Non_Blocking_Wait_Process): New
8713 * adaint.h, adaint.c (__gnat_portable_no_block_wait): C support
8714 function for Non_Blocking_Wait_Process.
8716 2017-04-25 Bob Duff <duff@adacore.com>
8718 * prep.adb (Preprocess): Remove incorrect
8719 Assert. Current character can be ASCII.CR.
8721 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8723 * sem_prag.adb (Set_Convention_From_Pragma): Cleanup code for
8724 convention Stdcall, which has a number of exceptions. Convention
8725 is legal on a component declaration whose type is an anonymous
8726 access to subprogram.
8728 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8730 * sem_ch4.adb: sem_ch4.adb Various reformattings.
8731 (Try_One_Prefix_Interpretation): Use the base type when dealing
8732 with a subtype created for purposes of constraining a private
8733 type with discriminants.
8735 2017-04-25 Javier Miranda <miranda@adacore.com>
8737 * einfo.ads, einfo.adb (Has_Private_Extension): new attribute.
8738 * warnsw.ads, warnsw.adb (All_Warnings): Set warning on late
8739 dispatching primitives (Restore_Warnings): Restore warning on
8740 late dispatching primitives (Save_Warnings): Save warning on late
8741 dispatching primitives (Do_Warning_Switch): Use -gnatw.j/-gnatw.J
8742 to enable/disable this warning.
8743 (WA_Warnings): Set warning on late dispatching primitives.
8744 * sem_ch3.adb (Analyze_Private_Extension_Declaration): Remember
8745 that its parent type has a private extension.
8746 * sem_disp.adb (Warn_On_Late_Primitive_After_Private_Extension):
8748 * usage.adb: Document -gnatw.j and -gnatw.J.
8750 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8752 * exp_ch7.adb, checks.adb, sem_prag.adb, eval_fat.adb: Minor
8755 2017-04-25 Bob Duff <duff@adacore.com>
8757 * binde.adb (Validate): Do not pass dynamic strings
8758 to pragma Assert, because older compilers do not support that.
8760 2017-04-25 Bob Duff <duff@adacore.com>
8762 * s-fileio.adb (Close): When a temp file is
8763 closed, delete it and clean up its Temp_File_Record immediately,
8764 rather than waiting until later.
8765 (Temp_File_Record): Add File
8766 component, so Close can know which Temp_File_Record corresponds
8767 to the file being closed.
8768 (Delete): Don't delete temp files,
8769 because they are deleted by Close.
8770 (Open): Set the File component
8771 of Temp_File_Record. This requires moving the creation of the
8772 Temp_File_Record to the end, after the AFCB has been created.
8774 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8776 * checks.adb (Insert_Valid_Check): Do not generate
8777 a validity check when inside a generic.
8779 2017-04-25 Yannick Moy <moy@adacore.com>
8781 * sem_res.adb (Resolve_Type_Conversion): Fix bad logic.
8783 2017-04-25 Arnaud Charlet <charlet@adacore.com>
8785 * snames.ads-tmpl (Snames): More names for detecting predefined
8786 potentially blocking subprograms.
8788 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8790 * sem_prag.adb (Analyze_Pre_Post_Condition): The rules
8791 concerning inheritance of class-wide preconditions do not apply
8794 2017-04-25 Bob Duff <duff@adacore.com>
8796 * s-ficobl.ads: Minor comment fix.
8798 2017-04-25 Yannick Moy <moy@adacore.com>
8800 * checks.adb (Apply_Scalar_Range_Check): Analyze precisely
8801 conversions from float to integer in GNATprove mode.
8802 (Apply_Type_Conversion_Checks): Make sure in GNATprove mode
8803 to call Apply_Type_Conversion_Checks, so that range checks
8804 are properly positioned when needed on conversions, including
8805 when converting from float to integer. (Determine_Range): In
8806 GNATprove mode, take into account the possibility of conversion
8807 from float to integer.
8808 * sem_res.adb (Resolve_Type_Conversion): Only enforce range
8809 check on conversions from fixed-point to integer, not anymore
8810 on conversions from floating-point to integer, when in GNATprove
8813 2017-04-25 Yannick Moy <moy@adacore.com>
8815 * checks.adb (Determine_Range_R): Special case type conversions
8816 from integer to float in order to get bounds in that case too.
8817 * eval_fat.adb (Machine): Avoid issuing warnings in GNATprove
8818 mode, for computations involved in interval checking.
8820 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8822 * checks.adb (Insert_Valid_Check): Partially reimplement validity
8824 * einfo.adb Node36 is now used as Validated_Object.
8825 (Validated_Object): New routine.
8826 (Set_Validated_Object): New routine.
8827 (Write_Field36_Name): Add an entry for Validated_Object.
8828 * einfo.ads Add new attribute Validated_Object along with
8830 (Validated_Object): New routine along with pragma Inline.
8831 (Set_Validated_Object): New routine along with pragma Inline.
8832 * exp_attr.adb (Make_Range_Test): Add processing for validation
8833 variables to avoid extra reads and copies of the prefix.
8834 * exp_ch6.adb (Expand_Actuals): Add copy-back for validation
8835 variables in order to reflect any changes done in the variable
8836 back into the original object.
8837 * sem_util.adb (Is_Validation_Variable_Reference): New routine.
8838 * sem_util.ads (Is_Validation_Variable_Reference): New routine.
8840 2017-04-25 Steve Baird <baird@adacore.com>
8842 * exp_ch7.adb (Build_Array_Deep_Procs,
8843 Build_Record_Deep_Procs, Make_Finalize_Address_Body): Don't
8844 generate Finalize_Address routines for CodePeer.
8846 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8848 * sem_prag.adb (Inherits_Class_Wide_Pre): subsidiary of
8849 Analyze_Pre_Post_Condition, to implement the legality checks
8850 mandated by AI12-0131: Pre'Class shall not be specified for an
8851 overriding primitive subprogram of a tagged type T unless the
8852 Pre'Class aspect is specified for the corresponding primitive
8853 subprogram of some ancestor of T.
8855 2017-04-25 Bob Duff <duff@adacore.com>
8857 * sem_ch8.adb (Use_One_Type): If a use_type_clause
8858 is redundant, set its Used_Operations to empty. This is only
8859 necessary for use clauses that appear in the parent of a generic
8860 child unit, because those use clauses get reanalyzed when we
8861 instantiate the generic, and we don't want the Used_Operations
8862 carried over from the original context (where it was probably
8865 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8867 * exp_ch6.adb: Minor reformatting.
8869 2017-04-25 Bob Duff <duff@adacore.com>
8871 * sem_prag.adb (Process_Restrictions_Or_Restriction_Warnings):
8872 Use Source_Index (Current_Sem_Unit) to find the correct casing.
8873 * exp_prag.adb (Expand_Pragma_Check): Use Source_Index
8874 (Current_Sem_Unit) to find the correct casing.
8875 * par.adb (Par): Null out Current_Source_File, to ensure that
8876 the above bugs won't rear their ugly heads again.
8878 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8880 * sem_ch8.adb (Find_Type): For an attribute reference
8881 'Class, if prefix type is synchronized and previous errors
8882 have suppressed the creation of the corresponding record type,
8883 create a spurious class-wide for the synchonized type itself,
8884 to catch other misuses of the attribute
8886 2017-04-25 Steve Baird <baird@adacore.com>
8888 * exp_ch6.adb (Expand_Simple_Function_Return): if CodePeer_Mode
8889 is True, then don't generate the accessibility check for the
8890 tag of a tagged result.
8891 * exp_intr.adb (Expand_Dispatching_Constructor_Call):
8892 if CodePeer_Mode is True, then don't generate the
8893 tag checks for the result of call to an instance of
8894 Ada.Tags.Generic_Dispatching_Constructor (i.e., both the "is a
8895 descendant of" check and the accessibility check).
8897 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8899 * sem_ch13.adb: Code cleanups.
8900 * a-strbou.ads: minor whitespace fix in Trim for bounded strings.
8901 * sem_ch8.ads: Minor comment fix.
8903 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8905 * exp_ch4.adb (Library_Level_Target): New function.
8906 (Expand_Concatenate): When optimization is enabled, also expand
8907 the operation out-of-line if the concatenation is present within
8908 the expression of the declaration of a library-level object and
8909 not only if it is the expression of the declaration.
8911 2017-04-25 Bob Duff <duff@adacore.com>
8913 * freeze.adb (Freeze_Object_Declaration): Do
8914 not Remove_Side_Effects if there is a pragma Linker_Section,
8915 because in that case we want static initialization in the
8916 appropriate section.
8918 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8920 * exp_dbug.adb: Minor rewording and reformatting.
8922 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8924 * sem_attr.adb (Statically_Denotes_Object): New predicate, to
8925 handle the proposed changes to rules concerning potentially
8926 unevaluated expressions, to include selected components that
8927 do not depend on discriminants, and indexed components with
8929 * sem_util.adb (Is_Potentially_Unevaluated): Add check for
8930 predicate in quantified expression, and fix bugs in the handling
8931 of case expressions and membership test.
8932 (Analyze_Attribute_Old_Result): use new predicate.
8933 (Analyze_Attribute, case Loop_Entry): ditto.
8935 2017-04-25 Bob Duff <duff@adacore.com>
8937 * s-secsta.adb (SS_Info): Add a comment
8938 explaining why we don't need to walk all the chunks in order to
8939 compute the total size.
8941 2017-04-25 Bob Duff <duff@adacore.com>
8943 * namet.ads, namet.adb (Global_Name_Buffer): Increase the length
8944 of the global name buffer to 4*Max_Line_Length.
8946 2017-04-25 Javier Miranda <miranda@adacore.com>
8948 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration): When creating a
8949 renaming entity for debug information, mark the entity as needing debug
8950 info if it comes from sources.
8952 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8954 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Remove the
8955 restriction converning the use of 'Address where the prefix is
8956 of a controlled type.
8958 2017-04-25 Pierre-Marie de Rodat <derodat@adacore.com>
8960 * exp_dbug.adb: In Debug_Renaming_Declaration,
8961 skip slices that are made redundant by an indexed component
8963 * atree.h: New definition for Original_Node.
8965 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8967 * sem_prag.adb, sem_prag.ads: Minor reformatting.
8969 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8971 * sem_ch3.adb (Check_Entry_Contract): Call
8972 Preanalyze_Spec_Expression so that resolution takes place as well.
8973 * sem_util.adb (Check_Internal_Protected_Use): Reject properly
8974 internal calls that appear in preconditions of protected
8975 operations, in default values for same, and in contract guards
8976 for contract cases in SPARK.
8978 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8980 * a-numaux.ads: Fix description of a-numaux-darwin
8982 (Double): Define to Long_Float.
8983 * a-numaux-vxworks.ads (Double): Likewise.
8984 * a-numaux-darwin.ads
8986 * a-numaux-libc-x86.ads (Double): Define to Long_Long_Float.
8987 * a-numaux-x86.ads: Fix package description.
8988 * a-numaux-x86.adb (Is_Nan): Minor tweak.
8989 (Reduce): Adjust and complete description. Call Is_Nan instead of
8990 testing manually. Use an integer temporary to hold rounded value.
8991 * a-numaux-darwin.adb (Reduce): Likewise.
8992 (Is_Nan): New function.
8994 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8996 * sem_ch4.adb (Analyze_Selected_Component): Additional refinement
8997 on analysis of prefix whose type is a current instance of a
8998 synchronized type, but where the prefix itself is an entity that
9001 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9003 * exp_ch5.adb (Replace_Target): When rewriting the RHS, preserve
9004 the identity of callable entities therein, because they have been
9005 properly resolved, and prefixed calls may have been rewritten
9008 2017-04-25 Patrick Bernardi <bernardi@adacore.com>
9010 * exp_ch3.adb (Build_Init_Statements): Convert
9011 the expression of the pragma/aspect Secondary_Stack_Size to
9012 internal type System.Parameters.Size_Type before assigning
9013 it to the Secondary_Stack_Size component of the task type's
9014 corresponding record.
9016 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
9018 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal
9019 (etc) optimizations when the type is modular and the offsets
9022 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
9024 * s-osinte-freebsd.ads: Minor comment tweaks
9026 2017-04-25 Javier Miranda <miranda@adacore.com>
9028 * urealp.adb (UR_Write): Reverse previous patch
9029 adding documentation on why we generate multiplications instead
9030 of divisions (needed to avoid expressions whose computation with
9031 large numbers may cause division by 0).
9033 2017-04-25 Bob Duff <duff@adacore.com>
9035 * erroutc.adb (Set_Specific_Warning_Off,
9036 Set_Warnings_Mode_Off): Use the correct source file for
9037 Stop. Was using Current_Source_File, which is only valid during
9038 parsing. Current_Source_File will have a leftover value from
9039 whatever file happened to be parsed last, because of a with_clause
9042 2017-04-25 Bob Duff <duff@adacore.com>
9044 * lib.ads, lib.adb (In_Internal_Unit): New functions similar
9045 to In_Predefined_Unit, but including GNAT units.
9046 * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): Replace
9047 with Should_Ignore_Pragma_Par and Should_Ignore_Pragma_Sem,
9048 because Should_Ignore_Pragma was not working reliably outside
9049 the parser, because Current_Source_File is not valid.
9050 * sem_prag.adb, exp_prag.adb: Call Should_Ignore_Pragma_Sem.
9051 * par-prag.adb: Call Should_Ignore_Pragma_Par.
9053 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
9055 * gnat1drv.adb (Gnat1Drv): Disable Generate_Processed_File in
9058 2017-04-25 Javier Miranda <miranda@adacore.com>
9060 * urealp.adb (UR_Write): Fix output of constants with a base other
9063 2017-04-25 Justin Squirek <squirek@adacore.com>
9065 * sem_ch13.adb (Get_Interfacing_Aspects): Moved to sem_util.adb.
9066 * sem_prag.adb (Analyze_Pragma, Process_Import_Or_Interface):
9067 Add extra parameter for Process_Interface_Name.
9068 (Process_Interface_Name): Add parameter for pragma to analyze
9069 corresponding aspect.
9070 * sem_util.ads, sem_util.adb (Get_Interfacing_Aspects): Added
9073 2017-04-25 Gary Dismukes <dismukes@adacore.com>
9075 * exp_ch7.adb, einfo.ads, sem_prag.adb: Minor reformatting and typo
9078 2017-04-25 Yannick Moy <moy@adacore.com>
9080 * sem_res.adb (Resolve_Comparison_Op): Do not
9081 attempt evaluation of relational operations inside assertions.
9083 2017-04-25 Justin Squirek <squirek@adacore.com>
9085 * exp_util.adb (Add_Interface_Invariants):
9086 Restored, code moved back from Build_Invariant_Procedure_Body.
9087 (Add_Parent_Invariants): Restored, code moved back from
9088 Build_Invariant_Procedure_Body.
9089 (Build_Invariant_Procedure_Body):
9090 Remove refactored calls and integrated code from
9091 Add_Parent_Invariants and Add_Interface_Invariants.
9093 2017-04-25 Johannes Kanig <kanig@adacore.com>
9095 * errout.adb (Output_Messages): Adjust computation of total
9097 * erroutc.adb (Error_Msg): In statistics counts, deal
9098 correctly with informational messages that are not warnings.
9099 * errutil.adb (Finalize): adjust computation of total errors.
9101 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
9103 * terminals.c (__gnat_terminate_pid): New.
9104 * g-exptty.ads (Terminate_Process): New. Update comments.
9106 2017-04-25 Arnaud Charlet <charlet@adacore.com>
9108 * a-cfinve.ads, a-cofove.ads (Empty_Vector): add Global contract.
9110 2017-04-25 Justin Squirek <squirek@adacore.com>
9112 * sem_ch3.adb (Analyze_Declarations): Minor
9113 correction to comments, move out large conditional and scope
9114 traversal into a predicate.
9115 (Uses_Unseen_Lib_Unit_Priv): Predicate function made from extracted
9118 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9120 * sem_ch4.adb (Analyze_Selected_Component): Refine analysis
9121 of prefix whose type is a current instance of a synchronized
9122 type. If the prefix is an object this is an external call (or
9123 requeue) that can only access public operations of the object. The
9124 previous predicate was too restrictive, and did not allow public
9125 protected operations, only task entries.
9127 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9129 * sem_ch5.adb, fname.adb: Minor reformatting.
9131 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9133 * einfo.adb (Is_Anonymous_Access_Type): New routine.
9134 * einfo.ads Update the placement of
9135 E_Anonymous_Access_Subprogram_Type along with all subtypes that
9137 (Is_Anonymous_Access_Type): New routine.
9138 * exp_ch7.adb (Allows_Finalization_Master): Do not generate a
9139 master for an access type subject to pragma No_Heap_Finalization.
9140 * exp_util.adb (Build_Allocate_Deallocate_Proc): An object being
9141 allocated or deallocated does not finalization actions if the
9142 associated access type is subject to pragma No_Heap_Finalization.
9143 * opt.ads Add new global variable No_Heap_Finalization_Pragma.
9144 * par-prag.adb Pragma No_Heap_Finalization does not need special
9145 processing from the parser.
9146 * sem_ch6.adb (Check_Return_Subtype_Indication): Remove ancient
9147 ??? comments. Use the new predicate Is_Anonymous_Access_Type.
9148 * sem_prag.adb Add an entry in table Sig_Flags for pragma
9149 No_Heap_Finalization.
9150 (Analyze_Pragma): Add processing for
9151 pragma No_Heap_Finalization. Update various error messages to
9152 use Duplication_Error.
9153 * sem_util.ads, sem_util.adb (No_Heap_Finalization): New routine.
9154 * snames.ads-tmpl: Add new predefined name No_Heap_Finalization
9155 and corresponding pragma id.
9157 2017-04-25 Bob Duff <duff@adacore.com>
9159 * freeze.adb (Freeze_Record_Type): Use the
9160 underlying type of the component type to determine whether it's
9161 elementary. For representation clause purposes, a private type
9162 should behave the same as its full type.
9163 * fname.ads, fname.adb (Is_Predefined_File_Name):
9164 Make sure things like "system.ali" are recognized as predefined.
9166 2017-04-25 Javier Miranda <miranda@adacore.com>
9168 * debug.adb: Update documentation of -gnatd.6.
9170 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9172 * sem_ch5.adb (Preanalyze_Range): Handle properly an Ada2012
9173 element iterator when the name is an overloaded function call,
9174 one of whose interpretations yields an array.
9176 2017-04-25 Bob Duff <duff@adacore.com>
9178 * uname.ads, uname.adb (Is_Predefined_Unit_Name,
9179 Is_Internal_Unit_Name): New functions for operating on unit
9180 names, as opposed to file names. There's some duplicated code
9181 with fname.adb, which is unfortunate, but it seems like we don't
9182 want to add dependencies here.
9183 * fname-uf.adb (Get_File_Name): Change Is_Predefined_File_Name
9184 to Is_Predefined_Unit_Name; the former was wrong, because Uname
9185 is not a file name at all.
9186 * fname.ads, fname.adb: Document the fact that
9187 Is_Predefined_File_Name and Is_Internal_File_Name can be called
9188 for ALI files, and fix the code so it works properly for ALI
9189 files. E.g. these should return True for "system.ali".
9191 2017-04-25 Justin Squirek <squirek@adacore.com>
9193 * exp_util.adb (Add_Invariant): Removed,
9194 code moved to Add_Invariant_Check, Add_Inherited_Invariant,
9195 and Add_Own_Invariant. (Add_Invariant_Check): Used
9196 for adding runtime checks from any kind of invariant.
9197 (Add_Inherited_Invariant): Generates invariant checks for
9198 class-wide invariants (Add_Interface_Invariants): Removed, code
9199 moved to Build_Invariant_Procedure_Body (Add_Own_Invariant):
9200 Create a types own invariant procedure (Add_Parent_Invariants):
9201 Removed, code moved to Build_Invariant_Procedure_Body
9202 (Build_Invariant_Procedure_Body): Add refactored calls
9203 and integrated code from Add_Parent_Invariants and
9204 Add_Interface_Invariants.
9205 (Process_Type): Removed, the
9206 relavant code was inlined into both Add_Own_Invariant and
9207 Add_Inherited_Invariant.
9209 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9211 * make.adb, par-ch2.adb, sem_util.adb, scans.ads, sem_ch8.adb,
9212 scn.adb, osint.adb, fname.adb: Minor reformatting.
9214 2017-04-25 Pascal Obry <obry@adacore.com>
9216 * s-taprop-mingw.adb: Do not check for CloseHandle in
9219 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9221 * sem_util.adb (Check_Part_Of_Reference):
9222 Continue to examine the context if the reference appears within
9223 an expression function.
9225 2017-04-25 Justin Squirek <squirek@adacore.com>
9227 * exp_ch7.adb, exp_ch7.ads Remove Build_Invariant_Procedure_Body
9228 and Build_Invariant_Procedure_Declaration.
9229 * exp_util.ads, exp_util.adb Add Build_Invariant_Procedure_Body
9230 and Build_Invariant_Procedure_Declaration from exp_ch7
9231 and break-out Is_Untagged_Private_Derivation from
9232 Build_Invariant_Procedure_Body.
9233 (Replace_Type_References):
9234 Append an extra parameter to allow for dispatching replacements
9235 and add the corrasponding logic.
9236 (Type_Invariant): Remove
9237 Replace_Typ_Refs and replace its references with calls to
9238 Replace_Type_References.
9239 * sem_ch3.adb, sem_prag.adb: Remove with and use of exp_ch7.
9241 2017-04-25 Bob Duff <duff@adacore.com>
9243 * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): New function
9244 that returns True when appropriate.
9245 * par-prag.adb, exp_prag.adb, sem_prag.adb: Do not ignore pragmas
9246 when compiling predefined files.
9247 * fname.ads, fname.adb (Is_Predefined_File_Name): Fix bug:
9248 "gnat.adc" should not be considered a predefined file name.
9249 That required (or at least encouraged) a lot of cleanup of global
9250 variable usage. We shouldn't be communicating information via
9251 the global name buffer.
9252 * bindgen.adb, errout.adb, fname-uf.adb, lib-load.adb, make.adb,
9253 * restrict.adb, sem_ch10.adb, sem_ch6.adb, sem_ch8.adb: Changes
9254 required by the above-mentioned cleanup.
9256 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9258 * osint.adb (Find_File): Handle properly a request for a
9259 configuration file whose name is a directory.
9261 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9263 * sem_attr.adb, sem_ch5.adb: Minor reformatting.
9265 2017-04-25 Bob Duff <duff@adacore.com>
9267 * types.ads: Minor: Fix '???' comment.
9268 * sem_ch8.adb: Minor comment fix.
9270 2017-04-25 Bob Duff <duff@adacore.com>
9272 * sem_prag.adb: Remove suspicious uses of Name_Buf.
9273 * stringt.ads, stringt.adb, exp_dbug.adb, sem_dim.adb: Remove
9274 Add_String_To_Name_Buffer, to avoid using the global Name_Buf.
9275 Add String_To_Name with no side effects.
9277 2017-04-25 Justin Squirek <squirek@adacore.com>
9279 * sem_ch3.adb (Analyze_Declarations): Add
9280 additional condition for edge case.
9282 2017-04-25 Bob Duff <duff@adacore.com>
9284 * par-ch2.adb, scans.ads, scn.adb: Do not give an error for
9285 reserved words inside pragmas. This is necessary to allow the
9286 pragma name Interface to be used in pragma Ignore_Pragma.
9287 * par.adb: Minor comment fix.
9289 2017-04-25 Javier Miranda <miranda@adacore.com>
9291 * a-tags.ads, a-tags.adb (Type_Is_Abstract): Renamed as Is_Abstract.
9292 * rtsfind.ads (RE_Type_Is_Abstract): Renamed as Is_Abstract.
9293 * exp_disp.adb (Make_DT): Update occurrences of RE_Type_Is_Abstract.
9294 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Update
9295 occurrences of RE_Type_Is_Abstract
9297 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9299 * exp_util.adb (Build_Chain): Account for ancestor
9300 subtypes while traversing the derivation chain.
9302 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9304 * sem_attr.adb: minor reformatting.
9306 2017-04-25 Doug Rupp <rupp@adacore.com>
9308 * sigtramp-vxworks-target.inc [PPC64]: Add a .localentry pseudo-op.
9310 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9312 * sem_ch5.adb (Analyze_Assignment): Reset Full_Analysis flag on
9313 the first pass over an assignment statement with target names,
9314 to prevent the generation of subtypes (such as discriminated
9315 record components)that may carry the target name outside of the
9316 tree for the assignment. The subtypes will be generated when
9317 the assignment is reanalyzed in full.
9318 (Analyze_Target_Name): Handle properly class-wide types.
9320 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9322 * elists.ads, elists.adb (Prepend_Unique_Elmt): New routine.
9323 * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
9324 the purposes of freezing.
9325 * exp_util.adb Update the documentation and structure of the
9326 type map used in class-wide semantics of assertion expressions.
9327 (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
9328 and resolve the triaged expression because all substitutions
9329 refer to the proper entities. Update the replacement of
9331 (Build_DIC_Procedure_Body): Add formal parameter
9332 For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
9333 are now only processed when freezing occurs. Build a body only
9335 (Entity_Hash): Removed.
9336 (Map_Types): New routine.
9337 (Replace_Object_And_Primitive_References): Removed.
9338 (Replace_References): New routine.
9339 (Replace_Type_References): Moved to the library level of Exp_Util.
9340 (Type_Map_Hash): New routine.
9341 (Update_Primitives_Mapping): Update the mapping call.
9342 (Update_Primitives_Mapping_Of_Types): Removed.
9343 * exp_util.ads (Build_DIC_Procedure_Body): Add formal
9344 parameter For_Freeze and update the comment on usage.
9345 (Map_Types): New routine.
9346 (Replace_References): New routine.
9347 (Replace_Type_References): Moved to the library level of Exp_Util.
9348 (Update_Primitives_Mapping_Of_Types): Removed.
9349 * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
9350 properties of the private type to the full view in case the full
9351 view derives from a parent type and inherits a DIC pragma.
9352 * sem_prag.adb (Analyze_Pragma): Guard against a case where a
9353 DIC pragma is placed at the top of a declarative region.
9355 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
9357 * a-tasatt.adb: Complete previous change and use an unsigned
9358 int to avoid overflow checks.
9360 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9362 * sem_attr.adb (Analyze_Attribute, case 'Access): Specialize
9363 the error message when the attribute reference is an actual in
9364 a call to a subprogram inherited from a generic formal type with
9365 unknown discriminants, which makes the subprogram and its formal
9366 parameters intrinsic (see RM 6.3.1 (8) and (13)).
9368 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9370 * sem_aggr.adb, inline.adb, einfo.adb, einfo.ads, scng.adb,
9371 sem_prag.adb: Minor reformatting.
9373 2017-04-25 Bob Duff <duff@adacore.com>
9375 * sem_attr.adb (Type_Key): Add code in the
9376 recursive Compute_Type_Key to protect against fetching the source
9377 code for Standard, in case a component of the type is declared
9378 in Standard. There was already code to do this for the original
9379 type, but not for its components.
9381 2017-04-25 Javier Miranda <miranda@adacore.com>
9383 * exp_ch3.adb (Build_Initialization_Call): Handle
9384 subtypes of private types when searching for the underlying full
9385 view of a private type.
9387 2017-04-25 Javier Miranda <miranda@adacore.com>
9389 * sem_res.adb (Set_Mixed_Mode_Operand): A universal
9390 real conditional expression can appear in a fixed-type context
9391 and must be resolved with that context to facilitate the code
9392 generation to the backend.
9394 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9396 * einfo.adb, einfo.ads (Body_Needed_For_Inlining): New flag,
9397 to indicate whether during inline processing, when some unit U1
9398 appears in the context of a unit U2 compiled for instantiation
9399 or inlining purposes, the body of U1 needs to be compiled as well.
9400 * sem_prag.adb (Process_Inline): Set Body_Needed_For_Inlining if
9401 context is a package declaration.
9402 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration,
9403 Analyze_Generic_Package_Declaration): ditto.
9404 * inline.adb (Analyze_Inlined_Bodies): Check
9405 Body_Needed_For_Inlining.
9407 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9409 * par.adb (Current_Assign_Node): Global variable use to record
9410 the presence of a target_name in the right hand side of the
9411 assignment being parsed.
9412 * par-ch4.adb (P_Name): If the name is a target_name, mark the
9413 enclosing assignment node accordingly.
9414 * par-ch5.adb (P_Assignment_Statement): Set Current_Assign_Node
9416 * sem_ch5.adb (Analyze_Assignment): Disable expansion before
9417 analyzing RHS if the statement has target_names.
9418 * sem_aggr.adb (Resolve_Iterated_Component_Association): Handle
9419 properly choices that are subtype marks.
9420 * exp_ch5.adb: Code cleanup.
9422 2017-04-25 Bob Duff <duff@adacore.com>
9424 * s-memory.adb: Add a comment regarding efficiency.
9425 * atree.adb: Fix the assertion, and combine 2 assertions into one,
9426 "the source has an extension if and only if the destination does."
9427 * sem_ch3.adb, sem_ch13.adb: Address ??? comments.
9429 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
9431 * a-tasatt.adb (Set_Value): Fix handling of 32bits -> 64bits
9434 2017-04-25 Doug Rupp <rupp@adacore.com>
9436 * init.c (__gnat_error_handler) [vxworks]: Turn on sigtramp
9437 handling for ppc64-vx7.
9438 * sigtramp-vxworks-target.inc
9439 [SIGTRAMP_BODY]: Add section for ppc64-vx7.
9441 2017-04-25 Arnaud Charlet <charlet@adacore.com>
9443 * ada_get_targ.adb: New file.
9445 2017-04-25 Bob Duff <duff@adacore.com>
9447 * uintp.adb (Most_Sig_2_Digits): In case Direct (Right), fetch
9448 Direct_Val (Right), instead of the incorrect Direct_Val (Left).
9449 (UI_GCD): Remove ??? comment involving possible efficiency
9450 improvements. This just isn't important after all these years.
9452 * uintp.ads: Minor cleanup.
9454 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9456 * exp_util.adb, exp_util.ads, sem_ch7.adb, sem_prag.adb, exp_ch3.adb:
9457 Revert previous changes.
9458 * scng.adb: Minor reformatting.
9459 * s-stratt.ads: Fix unbalanced parens in comment.
9461 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9463 * sem_ch3.adb, exp_util.adb, sem_prag.adb, freeze.adb, sem_util.adb:
9466 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9468 * scng.adb (Scan): Handle '@' appropriately.
9469 * sem_ch5.adb: Code cleanup.
9471 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9473 * freeze.adb (Check_Expression_Function): Do not check for the
9474 use of deferred constants if the freezing of the expression
9475 function is triggered by its generated body, rather than a
9478 2017-04-25 Javier Miranda <miranda@adacore.com>
9480 * exp_attr.adb (Rewrite_Stream_Proc_Call): Handle
9481 subtypes of private types when performing the view conversion.
9483 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9485 * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
9486 the purposes of freezing.
9487 * exp_util.adb Update the documentation and structure of the
9488 type map used in class-wide semantics of assertion expressions.
9489 (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
9490 and resolve the triaged expression because all substitutions
9491 refer to the proper entities. Update the replacement of
9493 (Build_DIC_Procedure_Body): Add formal parameter
9494 For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
9495 are now only processed when freezing occurs. Build a body only
9497 (Entity_Hash): Removed.
9498 (Map_Types): New routine.
9499 (Replace_Object_And_Primitive_References): Removed.
9500 (Replace_References): New routine.
9501 (Replace_Type_References): Moved to the library level of Exp_Util.
9502 (Type_Map_Hash): New routine.
9503 (Update_Primitives_Mapping): Update the mapping call.
9504 (Update_Primitives_Mapping_Of_Types): Removed.
9505 * exp_util.ads (Build_DIC_Procedure_Body): Add formal
9506 parameter For_Freeze and update the comment on usage.
9507 (Map_Types): New routine.
9508 (Replace_References): New routine.
9509 (Replace_Type_References): Moved to the library level of Exp_Util.
9510 (Update_Primitives_Mapping_Of_Types): Removed.
9511 * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
9512 properties of the private type to the full view in case the full
9513 view derives from a parent type and inherits a DIC pragma.
9514 * sem_prag.adb (Analyze_Pragma): Guard against a case where a
9515 DIC pragma is placed at the top of a declarative region.
9517 2017-04-25 Tristan Gingold <gingold@adacore.com>
9519 * s-mmap.ads (Data): Add pragma Inline.
9521 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9523 * checks.adb (Insert_Valid_Check): Do not use
9524 a renaming to alias a volatile name because this will lead to
9525 multiple evaluations of the volatile name. Use a constant to
9526 capture the value instead.
9528 2017-04-25 Doug Rupp <rupp@adacore.com>
9530 * init.c [VxWorks Section]: Disable sigtramp for ppc64-vx7.
9532 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9534 * exp_util.adb, exp_util.ads (Build_Class_Wide_Expression):
9535 Add out parameter to indicate to caller that a wrapper must
9536 be constructed for an inherited primitive whose inherited
9537 pre/postcondition has called to overridden primitives.
9538 * freeze.adb (Check_Inherited_Conditions): Build wrapper body
9539 for inherited primitive that requires it.
9540 * sem_disp.adb (Check_Dispatching_Operation): Such wrappers are
9541 legal primitive operations and belong to the list of bodies
9542 generated after the freeze point of a type.
9543 * sem_prag.adb (Build_Pragma_Check_Equivalent): Use new signature
9544 of Build_Class_Wide_Expression.
9545 * sem_util.adb, sem_util.ads (Build_Overriding_Spec): New procedure
9546 to construct the specification of the wrapper subprogram created
9547 for an inherited operation.
9549 2017-04-25 Bob Duff <duff@adacore.com>
9551 * s-osinte-linux.ads (pthread_mutexattr_setprotocol,
9552 pthread_mutexattr_setprioceiling): Add new interfaces for these
9554 * s-taprop-linux.adb (Initialize_Lock, Initialize_TCB): Set
9555 protocols as appropriate for Locking_Policy 'C' and 'I'.
9556 * s-taprop-posix.adb: Minor reformatting to make it more similar
9557 to s-taprop-linux.adb.
9559 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9561 * sem_ch3.adb (Get_Discriminant_Value, Search_Derivation_Levels):
9562 Handle properly a multi- level derivation involving both renamed
9563 and constrained parent discriminants, when the type to be
9564 constrained has fewer discriminants that the ultimate ancestor.
9566 2017-04-25 Bob Duff <duff@adacore.com>
9568 * sem_util.adb (Is_Object_Reference): In the
9569 case of N_Explicit_Dereference, return False if it came from a
9570 conditional expression.
9572 2017-04-25 Bob Duff <duff@adacore.com>
9574 * par-ch4.adb (P_Case_Expression): If a semicolon
9575 is followed by "when", assume that ";" was meant to be ",".
9577 2017-04-25 Gary Dismukes <dismukes@adacore.com>
9579 * sem_ch9.adb, sem_ch10.adb, sem_util.adb: Minor reformatting and typo
9582 2017-04-25 Arnaud Charlet <charlet@adacore.com>
9584 * rtsfind.ads (SPARK_Implicit_Load): New procedure for forced
9585 loading of an entity.
9586 * rtsfind.adb (SPARK_Implicit_Load): Body with a pattern
9587 previously repeated in the analysis.
9588 * sem_ch9.adb (Analyze_Protected_Type_Declaration): use new
9589 procedure SPARK_Implicit_Load. (Analyze_Task_Type_Declaration):
9590 use new procedure SPARK_Implicit_Load.
9591 * sem_ch10.adb (Analyze_Compilation_Unit): Use new procedure
9592 SPARK_Implicit_Load.
9594 2017-04-25 Javier Miranda <miranda@adacore.com>
9596 * sem_util.adb (New_Copy_Tree): By default
9597 copying of defining identifiers is prohibited because
9598 this would introduce an entirely new entity into the
9599 tree. This patch introduces an exception to this general
9600 rule: the declaration of constants and variables located in
9601 Expression_With_Action nodes.
9602 (Copy_Itype_With_Replacement): Renamed as Copy_Entity_With_Replacement.
9603 (In_Map): New subprogram.
9604 (Visit_Entity): New subprogram.
9605 (Visit_Node): Handle EWA_Level,
9606 EWA_Inner_Scope_Level, and take care of defining entities defined
9607 in Expression_With_Action nodes.
9609 2017-04-25 Thomas Quinot <quinot@adacore.com>
9611 * exp_ch6.adb: minor comment edit.
9612 * sinfo.ads, sinfo.adb: New Null_Statement attribute for null
9613 procedure specifications that come from source.
9614 * par-ch6.adb (P_Subprogram, case of a null procedure): Set new
9615 Null_Statement attribute.
9616 * par_sco.adb (Traverse_Declarations_Or_Statements): For a null
9617 procedure, generate statement SCO for the generated NULL statement.
9618 * sem_ch6.adb (Analyze_Null_Procedure): Use null statement from
9619 parser, if available.
9621 2017-04-04 Andreas Krebbel <krebbel@linux.vnet.ibm.com>
9623 * system-linux-s390.ads: Use Long_Integer'Size to define
9626 2017-04-04 Eric Botcazou <ebotcazou@adacore.com>
9628 * sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
9630 2017-04-03 Jonathan Wakely <jwakely@redhat.com>
9632 * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo.
9633 * g-socket.adb (To_Host_Entry): Fix typo in comment.
9634 * gnat_ugn.texi: Fix typo.
9635 * raise.c (_gnat_builtin_longjmp): Fix capitalization in comment.
9636 * s-stposu.adb (Allocate_Any_Controlled): Fix typo in comment.
9637 * sem_ch3.adb (Build_Derived_Record_Type): Likewise.
9638 * sem_util.adb (Mark_Coextensions): Likewise.
9639 * sem_util.ads (Available_Full_View_Of_Component): Likewise.
9641 2017-03-28 Andreas Schwab <schwab@suse.de>
9644 * system-linux-aarch64-ilp32.ads: New file.
9645 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
9646 from LIBGNAT_TARGET_PAIRS.
9647 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
9648 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
9649 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
9650 or -mabi=ilp32, resp.
9652 2017-03-14 James Cowgill <James.Cowgill@imgtec.com>
9654 * s-osinte-linux.ads (struct_sigaction): Use correct type for sa_flags.
9656 2017-03-08 Thanassis Tsiodras <ttsiodras@gmail.com>
9659 * socket.c (__gnat_gethostbyaddr): Add missing test for __rtems__.
9661 2017-03-08 Eric Botcazou <ebotcazou@adacore.com>
9664 * system-linux-ppc.ads (Default_Bit_Order): Use Standard's setting.
9666 * system-linux-arm.ads (Default_Bit_Order): Likewise.
9667 * system-linux-mips.ads (Default_Bit_Order): Likewise.
9668 * system-linux-armeb.ads: Delete.
9669 * system-linux-mipsel.ads: Likewise.
9670 * gcc-interface/Makefile.in (MIPS/Linux): Adjust.
9671 (ARM/Linux): Likewise.
9673 2017-02-24 Jakub Jelinek <jakub@redhat.com>
9676 * gcc-interface/misc.c (gnat_handle_option): Pass true to
9677 handle_generated_option GENERATED_P.
9679 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9681 * gcc-interface/decl.c (gnat_to_gnu_field): Do not remove the wrapper
9682 around a justified modular type if it doesn't have the same scalar
9683 storage order as the enclosing record type.
9685 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9687 * gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
9688 of boolean rvalues to function calls.
9690 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9692 * gcc-interface/utils.c (fold_bit_position): New function.
9693 (rest_of_record_type_compilation): Call it instead of bit_position to
9694 compute the field position and remove the call to remove_conversions.
9695 (compute_related_constant): Factor out the multiplication in both
9696 operands, if any, and streamline the final test.
9698 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9700 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Add sanity check.
9702 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9704 * gcc-interface/decl.c: Include demangle.h.
9705 (is_cplusplus_method): Return again true for a primitive operation
9706 only if it is dispatching. For a subprogram with an interface name,
9707 call the demangler to get the number of C++ parameters and compare it
9708 with the number of Ada parameters.
9710 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9712 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu): If
9713 there is no end label, put the location of the At_End procedure on
9714 the call to the procedure.
9716 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9718 * gcc-interface/misc.c (gnat_type_max_size): Try to return a meaningful
9719 value for array types with TYPE_INDEX_TYPE set on their domain type.
9720 * gcc-interface/utils.c (max_size): For operations and expressions, do
9721 not build a new node if the operands have not changed or are missing.
9723 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9725 * gcc-interface/utils.c (max_size) <tcc_expression>: Flip the second
9726 argument when recursing on TRUTH_NOT_EXPR.
9728 2017-02-12 John Marino <gnugcc@marino.st>
9730 * system-freebsd-x86.ads: Rename into...
9731 * system-freebsd.ads: ...this.
9732 (Default_Bit_Order): Define using Standard'Default_Bit_Order.
9733 * gcc-interface/Makefile.in: Support aarch64-freebsd.
9734 (x86-64/FreeBSD): Adjust to above renaming.
9735 (i386/FreeBSD): Likewise.
9737 2017-02-09 Gerald Pfeifer <gerald@pfeifer.com>
9739 * comperr.adb: Update FSF bug reporting URL.
9741 2017-02-01 Eric Botcazou <ebotcazou@adacore.com>
9742 Jakub Jelinek <jakub@redhat.com>
9745 * adaint.c (__gnat_killprocesstree): Fix broken string handling.
9747 2017-01-25 Maxim Ostapenko <m.ostapenko@samsung.com>
9750 * gcc-interface/utils.c (get_global_context): Pass main_input_filename
9751 to build_translation_unit_decl.
9753 2017-01-23 Javier Miranda <miranda@adacore.com>
9755 * sem_util.adb (New_Copy_Tree): Code cleanup:
9756 removal of the internal map (ie. variable Actual_Map, its
9757 associated local variables, and all the code handling it).
9758 * sem_ch9.adb (Analyze_Task_Type_Declaration): in GNATprove mode
9759 force loading of the System package when processing a task type.
9760 (Analyze_Protected_Type_Declaration): in GNATprove mode force
9761 loading of the System package when processing a protected type.
9762 * sem_ch10.adb (Analyze_Compilation_Unit): in GNATprove mode
9763 force loading of the System package when processing compilation
9764 unit with a main-like subprogram.
9765 * frontend.adb (Frontend): remove forced loading of the System
9768 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9770 * sem_prag.adb (Default_Initial_Condition): If the desired type
9771 declaration is a derived type declaration with discriminants,
9772 it is rewritten as a private type declaration.
9773 * sem_ch13.adb (Replace_Type_References_Generic,
9774 Visible_Component): A discriminated private type with descriminnts
9775 has components that must be rewritten as selected components
9776 if they appear as identifiers in an aspect expression such as
9777 a Default_Initial_Condition.
9778 * sem_util.adb (Defining_Entity): support N_Iterator_Specification
9781 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9783 * ghost.ads, ghost.adb (Is_Ignored_Ghost_Unit): New routine.
9784 * gnat1drv.adb Generate an empty object file for an ignored
9785 Ghost compilation unit.
9786 * inline.adb, sem_util.adb, sem_ch4.adb: Minor reformatting.
9788 2017-01-23 Yannick Moy <moy@adacore.com>
9790 * sem_ch4.adb (Analyze_Indexed_Component_Form):
9791 Adapt to inlined prefix with string literal subtype.
9792 * inline.adb (Expand_Inlined_Call): Keep unchecked
9793 conversion inside inlined call when formal type is constrained.
9795 2017-01-23 Javier Miranda <miranda@adacore.com>
9797 * sem_util.adb (New_Copy_Tree): Code cleanup:
9798 removal of global variables. All the global variables, global
9799 functions and tables of this subprogram are now declared locally.
9801 2017-01-23 Gary Dismukes <dismukes@adacore.com>
9803 * exp_strm.ads: Minor reformatting and typo fixes.
9805 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9807 * sem_aggr.adb, par_sco.adb, exp_util.adb, sem.adb, sem_ch4.adb,
9808 exp_aggr.adb: Minor reformatting.
9809 * g-diopit.adb: minor grammar/punctuation fix in comment.
9810 * g-byorma.ads: minor fix of unbalanced parens in comment.
9812 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9814 * par.adb: Update the documentation of component Labl.
9815 * par-ch6.adb (P_Return_Statement): Set the expected label of
9816 an extended return statement to Error.
9818 2017-01-23 Tristan Gingold <gingold@adacore.com>
9820 * s-boustr.ads, s-boustr.adb (Is_Full): New function.
9822 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9824 * expander.adb: Handle N_Delta_Aggregate.
9826 2017-01-23 Javier Miranda <miranda@adacore.com>
9828 * exp_ch6.adb (Expand_Call): Improve the code that
9829 checks if some formal of the called subprogram is a class-wide
9830 interface, to handle subtypes of class-wide interfaces.
9832 2017-01-23 Javier Miranda <miranda@adacore.com>
9834 * checks.adb (Apply_Parameter_Aliasing_Checks):
9835 Remove side effects of the actuals before generating the overlap
9838 2017-01-23 Justin Squirek <squirek@adacore.com>
9840 * exp_strm.ads, exp_strm.ads
9841 (Build_Record_Or_Elementary_Input_Function): Add an extra parameter so
9842 as to avoid getting the underlying type by default.
9843 * exp_attr.adb (Expand_N_Attribute_Reference): Remove use of
9844 underlying type in the Iiput and output attribute cases when
9845 building their respective functions.
9847 2017-01-23 Gary Dismukes <dismukes@adacore.com>
9849 * scng.adb: Minor reformatting of error message.
9851 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9853 * sem_ch6.adb (Analyze_Expression_Function): Do not attempt
9854 to freeze the return type of an expression funxtion that is a
9855 completion, if the type is a limited view and the non-limited
9858 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9860 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): Recognize delta
9861 aggregate construct.
9862 (P_Record_Or_Array_Component_Association): An array aggregate
9863 can start with an Iterated_Component_Association.
9864 * scng.adb: Modify error message on improper use of @ in earlier
9865 versions of the language.
9866 * sinfo.ads: New node kind N_Delta_Aggregate.
9867 * sinfo.adb: An N_Delta_Aggregate has component associations and
9869 * sem_res.adb (Resolve): Call Resolve_Delta_Aggregate.
9870 * sem_aggr.ads, sem_aggr.adb (Resolve_Iterated_Component_Association):
9871 Create a new index for each one of the choices in the association,
9872 to prevent spurious homonyms in the scope.
9873 (Resolve_Delta_Aggregate): New.
9874 * sem.adb: An N_Delta_Aggregate is analyzed like an aggregate.
9875 * exp_util.adb (Insert_Actions): Take into account
9877 * exp_aggr.ads: New procedure Expand_N_Delta_Aggregate.
9878 * exp_aggr.adb: New procedure Expand_N_Delta_Aggregate,
9879 and local procedures Expand_Delta_Array_Aggregate and
9880 expand_Delta_Record_Aggregate.
9881 * sprint.adb: Handle N_Delta_Aggregate.
9883 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9885 * exp_ch11.adb (Expand_N_Exception_Declaration): Generate an
9886 empty name when the exception declaration is subject to pragma
9888 (Null_String): New routine.
9890 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9892 * par-ch9.adb (P_Protected_Definition): Parse
9893 any optional and potentially illegal pragmas which appear in
9894 a protected operation declaration list.
9895 (P_Task_Items): Parse
9896 any optional and potentially illegal pragmas which appear in a
9899 2017-01-23 Pascal Obry <obry@adacore.com>
9901 * s-taprop-mingw.adb (Enter_Task): Initialize the Thread handle which
9902 is needed when a foreign thread call a Win32 API using a thread handle
9903 like GetThreadTimes() for example.
9905 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9907 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
9908 allow an 'Address clause to be specified on a prefix of a
9911 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9913 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
9914 attribute 'Valid is a renaming of the original expression when
9915 the expression denotes a name. For all other kinds of expression,
9916 use a constant to capture the value.
9917 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
9918 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
9920 2017-01-23 Justin Squirek <squirek@adacore.com>
9922 * sem_eval.adb (Eval_Integer_Literal): Add special
9923 case to avoid optimizing out check if the literal appears in
9926 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9928 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
9929 allow an 'Address clause to be specified on a prefix of a
9932 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9934 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
9935 attribute 'Valid is a renaming of the original expression when
9936 the expression denotes a name. For all other kinds of expression,
9937 use a constant to capture the value.
9938 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
9939 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
9941 2017-01-23 Justin Squirek <squirek@adacore.com>
9943 * sem_eval.adb (Eval_Integer_Literal): Add special
9944 case to avoid optimizing out check if the literal appears in
9947 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9949 * sem_ch4.adb (Try_Primitive_Operations,
9950 Is_Valid_First_Argument_Of): argument is valid if it is a derived
9951 type with unknown discriminants that matches its underlying
9953 * exp_util.adb (Expand_Subtype_From_Expr): Do not expand
9954 expression if its type is derived from a limited type with
9955 unknown discriminants, because the expansion (which is a call)
9956 must be expanded in the enclosing context to add the proper build-
9957 in-place parameters to the call.
9958 * lib.ads, exp_ch9.adb: Minor fixes in comments.
9960 2017-01-23 Yannick Moy <moy@adacore.com>
9962 * frontend.adb (Frontend): Do not load runtime
9963 unit for GNATprove when parsing failed.
9964 * exp_ch9.adb: minor removal of extra whitespace
9965 * exp_ch6.adb: minor typo in comment
9966 * sem_util.adb: Code cleanup.
9967 * exp_ch9.ads, par-ch2.adb: minor style fixes in whitespace and comment
9968 * a-ngcefu.adb: minor style fix in whitespace
9970 2017-01-23 Thomas Quinot <quinot@adacore.com>
9972 * scos.ads: Document usage of 'd' as default SCO kind for
9974 * par_sco.adb (Traverse_Declarations_Or_Statements.
9975 Traverse_Degenerate_Subprogram): New supporting routine for expression
9976 functions and null procedures.
9977 (Traverse_Declarations_Or_Statements.Traverse_One): Add
9978 N_Expression_Function to the subprogram case; add required
9979 support for null procedures and expression functions.
9981 2017-01-23 Bob Duff <duff@adacore.com>
9983 * namet.ads (Bounded_String): Decrease the size of type
9984 Bounded_String to avoid running out of stack space.
9985 * namet.ads (Append): Don't ignore buffer overflow; raise
9986 Program_Error instead.
9988 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9990 * exp_ch5.adb, freeze.adb, par-ch4.adb, scng.adb, sem_ch13.adb,
9991 sem_ch3.adb, sem_ch5.adb, sem_ch5.ads, sem_util.adb, sinfo.ads: Minor
9993 * exp_ch9.adb: minor style fix in comment.
9995 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9997 * sem_ch4.adb (Analyze_Allocator): Handle properly a type derived
9998 for a limited record extension with unknown discriminants whose
9999 full view has no discriminants.
10001 2017-01-23 Yannick Moy <moy@adacore.com>
10003 * exp_spark.adb: Alphabetize with clauses.
10005 2017-01-23 Yannick Moy <moy@adacore.com>
10007 * sem_util.adb (Has_Enabled_Property): Treat
10008 protected objects and variables differently from other variables.
10010 2017-01-23 Thomas Quinot <quinot@adacore.com>
10012 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
10013 Split original Ada 95 part off into new subprogram
10014 below. Call that subprogram (instead of proceeding with
10015 AI95-0133 behaviour) if debug switch -gnatd.p is in use.
10016 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): ... new subprogram
10017 * debug.adb Document new switch -gnatd.p
10018 * freeze.adb (Freeze_Entity.Freeze_Record_Type): Do not adjust
10019 record for reverse bit order if an error has already been posted
10020 on the record type. This avoids generating extraneous "info:"
10021 messages for illegal code.
10023 2017-01-23 Justin Squirek <squirek@adacore.com>
10025 * sem_ch3.adb (Analyze_Declarations): Correct comments
10026 * freeze.adb (Find_Constant): Add detection of deferred constants
10027 so they are not incorrectly flagged as premature.
10029 2017-01-23 Ed Schonberg <schonberg@adacore.com>
10031 * scans.ads: New token At_Sign. Remove '@' from list of illegal
10032 characters for future version of the language. '@' is legal name.
10033 * scng.ads, scng.adb (Scan): Handle '@' appropriately.
10034 * scn.adb (Scan_Reserved_Identifier): An occurrence of '@'
10035 denotes a Target_Name.
10036 * par-ch4.adb (P_Name, P_Primary): Handle Target_Name.
10037 * sinfo.ads, sinfo.adb (N_Target_Name): New non-terminal node.
10038 (Has_Target_Names): New flag on N_Assignment_Statement, to
10039 indicate that RHS has occurrences of N_Target_Name.
10040 * sem.adb: Call Analyze_Target_Name.
10041 * sem_ch5.ads, sem_ch5.adb (Analyze_Target_Name): New subpogram.
10042 (urrent_LHS): Global variable that denotes LHS of assignment,
10043 used in the analysis of Target_Name nodes.
10044 * sem_res.adb (Resolve_Target_Name): New procedure.
10045 * exp_ch5.adb (Expand_Assign_With_Target_Names): (AI12-0125):
10046 N is an assignment statement whose RHS contains occurences of @
10047 that designate the value of the LHS of the assignment. If the
10048 LHS is side-effect free the target names can be replaced with
10049 a copy of the LHS; otherwise the semantics of the assignment
10050 is described in terms of a procedure with an in-out parameter,
10051 and expanded as such.
10052 (Expand_N_Assignment_Statement): Call
10053 Expand_Assign_With_Target_Names when needed.
10054 * exp_util.adb (Insert_Actions): Take into account N_Target_Name.
10055 * sprint.adb: Handle N_Target_Name.
10057 2017-01-23 Eric Botcazou <ebotcazou@adacore.com>
10059 * checks.adb: Minor fix in comment.
10061 2017-01-23 Philippe Gil <gil@adacore.com>
10063 * g-debpoo.adb (Do_Report) remove freed chunks from chunks
10064 count in Sort = Memory_Usage or Allocations_Count
10066 2017-01-23 Justin Squirek <squirek@adacore.com>
10068 * sem_ch3.adb: Code cleanup.
10070 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10072 * sem_prag.adb (Analyze_Refined_Depends_In_Decl_Part): Move all global
10073 variables to the local variable section. Update the profile
10074 of various nested routine that previously had visibility
10075 of those globals. One the matching phase has completed,
10076 remove certain classes of clauses which are considered noise.
10077 (Check_Dependency_Clause): Properly detect a match between two
10078 'Result attributes. Update the various post-match cases to use
10079 Is_Already_Matched as this routine now automatically recognizes
10080 a previously matched 'Result attribute.
10081 (Is_Already_Matched): New routine.
10082 (Remove_Extra_Clauses): New routine.
10083 (Report_Extra_Clauses): Remove the detection of ... => null
10084 clauses as this is now done in Remove_Extra_Clauses.
10086 2017-01-23 Ed Schonberg <schonberg@adacore.com>
10088 * sem_aggr.adb (Resolve_Array_Aggregate): In ASIS mode do not
10089 report on spurious overlaps between values involving a subtype
10090 with a static predicate, because the expansion of such a subtype
10091 into individual ranges in inhibited in ASIS mode.
10093 2017-01-23 Justin Squirek <squirek@adacore.com>
10095 * sem_ch3.adb (Analyze_Declarations): Add detection
10096 of an edge case and delay freezing if it is present.
10098 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10100 * sem_ch3.adb, exp_spark.adb, exp_attr.adb, sem_ch9.adb, sem_prag.adb,
10101 sem_util.adb, sem_warn.adb, exp_ch3.adb: Minor reformatting.
10103 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10105 * freeze.adb (Freeze_Subprogram): Ensure that all anonymous
10106 access-to-subprogram types inherit the convention of the
10107 associated subprogram. (Set_Profile_Convention): New routine.
10108 * sem_ch6.adb (Check_Conformance): Do not compare the conventions
10109 of the two entities directly, use Conventions_Match to account
10110 for anonymous access-to-subprogram and subprogram types.
10111 (Conventions_Match): New routine.
10113 2017-01-23 Claire Dross <dross@adacore.com>
10115 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For attributes
10116 which return Universal_Integer, force the overflow check flag for
10117 Length and Range_Length for types as big as Long_Long_Integer.
10119 2017-01-23 Claire Dross <dross@adacore.com>
10121 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For
10122 attributes which return Universal_Integer, introduce a conversion
10123 to the expected type with the appropriate check flags set.
10124 * sem_res.adb (Resolve_Range): The higher bound can be in Typ's
10125 base type if the range is null. It may still be invalid if it
10126 is higher than the lower bound. This is checked later in the
10127 context in which the range appears.
10129 2017-01-23 Pierre-Marie de Rodat <derodat@adacore.com>
10131 * scos.ads: Introduce a constant to represent ignored
10132 dependencies in SCO_Unit_Table_Entry.
10134 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10136 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Remove extra
10137 spaces from error messages.
10139 2017-01-23 Ed Schonberg <schonberg@adacore.com>
10141 * exp_ch3.adb (Check_Large_Modular_Array): New procedure,
10142 subsidiary to Expand_N_Object_ Declaration, to compute a guard on
10143 an object declaration for an array type with a modular index type
10144 with the size of Long_Long_Integer. Special processing is needed
10145 in this case to compute reliably the size of the object, and
10146 eventually to raise Storage_Error, when wrap-around arithmetic
10147 might compute a meangingless size for the object.
10149 2017-01-23 Justin Squirek <squirek@adacore.com>
10151 * a-wtenau.adb, par-endh.adb, sem_prag.adb,
10152 sem_type.adb: Code cleanups.
10154 2017-01-23 Bob Duff <duff@adacore.com>
10156 * sem_res.adb (Resolve_Call): In the part of the code where
10157 it is deciding whether to turn the call into an indexed
10158 component, avoid doing so if the call is to an instance of
10159 Unchecked_Conversion. Otherwise, the compiler turns it into an
10160 indexed component, and resolution of that turns it back into a
10161 function call, and so on, resulting in infinite recursion.
10162 * sem_util.adb (Needs_One_Actual): If the first formal has a
10163 default, then return False.
10165 2017-01-21 Eric Botcazou <ebotcazou@adacore.com>
10167 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal (etc)
10168 optimizations when the type is modular and the offsets are equal.
10170 2017-01-20 Thomas Quinot <quinot@adacore.com>
10172 * sem_warn.adb (Warn_On_Useless_Assignment): Adjust wording of warning
10175 2017-01-20 Nicolas Roche <roche@adacore.com>
10177 * terminals.c: Ignore failures on setpgid and tcsetpgrp commands.
10179 2017-01-20 Bob Duff <duff@adacore.com>
10181 * sem_eval.adb (Compile_Time_Compare): Disable the expr+literal
10182 (etc) optimizations when the type is modular.
10184 2017-01-20 Yannick Moy <moy@adacore.com>
10186 * sem_ch6.adb (Move_Pragmas): move some pragmas,
10187 but copy the SPARK_Mode pragma instead of moving it.
10188 (Build_Subprogram_Declaration): Ensure that the generated spec
10189 and original body share the same SPARK_Pragma aspect/pragma.
10190 * sem_util.adb, sem_util.ads (Copy_SPARK_Mode_Aspect): New
10191 procedure to copy SPARK_Mode aspect.
10193 2017-01-20 Bob Duff <duff@adacore.com>
10195 * sem_ch3.adb (Analyze_Declarations): Disable Resolve_Aspects
10197 * sem_ch13.adb (Resolve_Name): Enable setting the entity to
10198 Empty even in ASIS mode.
10200 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10202 * exp_ch9.adb: minor style fixes in comments.
10203 * sem_ch9.adb (Analyze_Delay_Relative): in GNATprove mode a delay
10204 relative statement introduces an implicit dependency on
10205 Ada.Real_Time.Clock_Time.
10206 * sem_util.adb: Minor reformatting.
10208 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10210 * sem_ch13.adb (Analyze_Aspect_Specifications): Aspect Alignment
10211 must be treated as delayed aspect even if the expression is
10212 a literal, because the aspect affects the freezing and the
10213 elaboration of the object to which it applies.
10215 2017-01-20 Tristan Gingold <gingold@adacore.com>
10217 * s-osinte-vxworks.ads (Interrup_Range): New subtype.
10219 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10221 * lib-xref.adb (Generate_Reference): Do not warn about the
10222 presence of a pragma Unreferenced if the entity appears as the
10223 actual in a procedure call that does not come from source.
10225 2017-01-20 Pascal Obry <obry@adacore.com>
10227 * expect.c, terminals.c: Fix some warnings about unused variables.
10228 * gsocket.h, adaint.c, adaint.h: Fix some more warnings in the C part
10231 2017-01-20 Bob Duff <duff@adacore.com>
10233 * exp_attr.adb (Constrained): Apply an access check (check that
10234 the prefix is not null) when the prefix denotes an object of an
10235 access type; that is, when there is an implicit dereference.
10237 2017-01-20 Gary Dismukes <dismukes@adacore.com>
10239 * s-rident.ads (constant Profile_Info): Remove
10240 No_Calendar from GNAT_Extended_Ravenscar restrictions.
10242 2017-01-20 Tristan Gingold <gingold@adacore.com>
10244 * s-maccod.ads: Add pragma No_Elaboration_Code_All
10246 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10248 * ghost.adb (Mark_Ghost_Clause): New routine.
10249 (Prune_Node): Do not prune compilation unit nodes.
10250 (Remove_Ignored_Ghost_Code): Prune the compilation unit node directly.
10251 This does not touch the node itself, but does prune all its fields.
10252 * ghost.ads (Mark_Ghost_Clause): New routine.
10253 * sem_ch8.adb (Analyze_Use_Package): Emit an error when a use
10254 package clause mentions Ghost and non-Ghost packages. Mark a
10255 use package clause as Ghost when it mentions a Ghost package.
10256 (Analyze_Use_Type): Emit an error when a use type clause mentions
10257 Ghost and non-Ghost types. Mark a use type clause as Ghost when
10258 it mentions a Ghost type.
10259 * sem_ch10.adb (Analyze_With_Clause): Mark a with clause as
10260 Ghost when it withs a Ghost unit.
10262 2017-01-20 Javier Miranda <miranda@adacore.com>
10264 * sem_res.adb (Resolve_Call): If a function call
10265 returns a limited view of a type and at the point of the call the
10266 function is not declared in the extended main unit then replace
10267 it with the non-limited view, which must be available. If the
10268 called function is in the extended main unit then no action is
10269 needed since the back-end handles this case.
10271 2017-01-20 Eric Botcazou <ebotcazou@adacore.com>
10273 * sem_ch7.adb (Contains_Subp_Or_Const_Refs): Rename into...
10274 (Contains_Subprograms_Refs): ...this. Adjust comment
10275 for constants. (Is_Subp_Or_Const_Ref): Rename into...
10276 (Is_Subprogram_Ref): ...this.
10277 (Has_Referencer): Rename Has_Non_Subp_Const_Referencer variable into
10278 Has_Non_Subprograms_Referencer and adjust comment. Remove
10279 incorrect shortcut for package declarations and bodies.
10281 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10283 * sem_ch3.adb (Complete_Private_Subtype): If the scope of the
10284 base type differs from that of the completion and the private
10285 subtype is an itype (created for a constraint on an access
10286 type e.g.), set Delayed_Freeze on both to prevent out-of-scope
10289 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10291 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
10292 When inheriting the SPARK_Mode of a prior expression function,
10293 look at the properly resolved entity rather than the initial
10294 candidate which may denote a homonym.
10296 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10298 * sem_prag.adb (Rewrite_Assertion_Kind): If the name is
10299 Precondition or Postcondition, and the context is pragma
10300 Check_Policy, indicate that this Pre-Ada2012 usage is deprecated
10301 and suggest the standard names Assertion_Policy /Pre /Post
10304 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10306 * sem_ch10.adb, sem_cat.adb: Minor reformatting.
10308 2017-01-20 Javier Miranda <miranda@adacore.com>
10310 * sem_ch3.adb (Access_Type_Declaration): Protect access to the
10312 * sem_ch10.adb (Install_Siblings): Skip processing malformed trees.
10313 * sem_cat.adb (Validate_Categoriztion_Dependency): Skip processing
10316 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10318 * sem_ch13.adb (Analyze_Aspect_Specification, case
10319 Dynamic_Predicate): If the entity E is a subtype that inherits
10320 a static predicate for its parent P,, the inherited and the
10321 new predicate combine in the generated predicate function,
10322 and E only has a dynamic predicate.
10324 2017-01-20 Tristan Gingold <gingold@adacore.com>
10326 * s-boustr.ads, s-boustr.adb: New package.
10327 * Makefile.rtl: Add s-boustr.
10329 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10331 * inline.adb (Process_Formals): Qualify the
10332 expression of a return statement when it yields a universal type.
10334 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10336 * freeze.adb (Freeze_All): Freeze the default
10337 expressions of all eligible formal parameters that appear in
10338 entries, entry families, and protected subprograms.
10340 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10342 * sem_ch3.adb (Check_Nonoverridable_Aspects); Refine check
10343 for illegal inherited Implicit_Dereference aspects with renamed
10346 2017-01-20 Javier Miranda <miranda@adacore.com>
10348 * debug.adb (switch d.6): do not avoid declaring unreferenced itypes.
10349 * nlists.ads (Lock_Lists, Unlock_Lists): New subprograms.
10350 * nlists.adb (Lock_Lists, Unlock_Lists): New subprograms.
10351 (Set_First, Set_Last, Set_List_Link, Set_Next, Set_Parent,
10352 Set_Prev, Tree_Read): Adding assertion.
10353 * atree.ads (Lock_Nodes, Unlock_Nodes): New subprograms.
10354 * atree.adb (Lock_Nodes, Unlock_Nodes): New subprograms.
10355 (Set_Analyzed, Set_Check_Actuals, Set_Comes_From_Source,
10356 Set_Ekind, Set_Error_Posted, Set_Has_Aspects,
10357 Set_Is_Ignored_Ghost_Node, Set_Original_Node, Set_Paren_Count,
10358 Set_Parent, Set_Sloc, Set_Nkind, Set_FieldNN, Set_NodeNN,
10359 Set_ListNN, Set_ElistNN, Set_NameN, Set_StrN, Set_UintNN,
10360 Set_UrealNN, Set_FlagNNN, Set_NodeN_With_Parent,
10361 Set_ListN_With_Parent): Adding assertion.
10363 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10365 * sem_prag.adb (Process_Convention): Diagnose properly a pragma
10366 import that applies to several homograph subprograms. when one
10367 of them is declared by a subprogram body.
10369 2017-01-20 Justin Squirek <squirek@adacore.com>
10371 * exp_ch6.adb (Expand_Call): Remove optimization
10372 that nulls out calls to null procedures.
10374 2017-01-20 Yannick Moy <moy@adacore.com>
10376 * inline.adb (Expand_Inlined_Call): Keep more
10377 precise type of actual for inlining whenever possible. In
10378 particular, do not switch to the formal type in GNATprove mode in
10379 some case where the GNAT backend might require it for visibility.
10381 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10383 * sem_ch3.adb (Check_Non_Overridable_Aspects): An inherited
10384 aspect Implicit_Dereference can be inherited by a full view if
10385 the partial view has no discriminants, because there is no way
10386 to apply the aspect to the partial view.
10387 (Build_Derived_Record_Type): If derived type renames discriminants
10388 of the parent, the new discriminant inherits the aspect from
10390 * sem_ch4.adb (Analyze_Call): Handle properly a parameterless
10391 call through an access discriminant designating a subprogram.
10392 * sem_ch5.adb (Analyze_Assignment): (Analyze_Call): Handle
10393 properly a parameterless call through an access discriminant on
10394 the left-hand side of an assignment.
10395 * sem_res.adb (resolve): If an interpreation involves a
10396 discriminant with an implicit dereference and the expression is an
10397 entity, resolution takes place later in the appropriate routine.
10398 * sem_ch13.adb (Analyze_Aspect_Implicit_Dereference): Recognize
10399 access discriminants that designate a subprogram type.
10401 2017-01-20 Pascal Obry <obry@adacore.com>
10403 * a-locale.adb, a-locale.ads: Update Ada.Locales for RM 2012 COR:1:2016
10405 2017-01-20 Yannick Moy <moy@adacore.com>
10407 * sem_ch10.adb (Check_No_Elab_Code_All): Do not issue an error
10408 on implicitly with'ed units in GNATprove mode.
10409 * sinfo.ads (Implicit_With): Document use of flag for implicitly
10410 with'ed units in GNATprove mode.
10412 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10414 * sem_cat.adb (Validate_Static_Object_Name): In a preelaborated
10415 unit Do not report an error on a non-static entity that appears
10416 in the context of a spec expression, such as an aspect expression.
10418 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10420 * einfo.adb: Flag298 now denotes Is_Underlying_Full_View.
10421 (Is_Underlying_Full_View): New routine.
10422 (Set_Is_Underlying_Full_View): New routine.
10423 (Write_Entity_Flags): Add an entry for Is_Underlying_Full_View.
10424 * einfo.ads Add new attribute Is_Underlying_Full_View.
10425 (Is_Underlying_Full_View): New routine along with pragma Inline.
10426 (Set_Is_Underlying_Full_View): New routine along with pragma Inline.
10427 * exp_util.adb (Build_DIC_Procedure_Body): Do not consider
10428 class-wide types and underlying full views. The first subtype
10429 is used as the working type for all Itypes, not just array base types.
10430 (Build_DIC_Procedure_Declaration): Do not consider
10431 class-wide types and underlying full views. The first subtype
10432 is used as the working type for all Itypes, not just array
10434 * freeze.adb (Freeze_Entity): Inherit the freeze node of a full
10435 view or an underlying full view without clobbering the attributes
10436 of a previous freeze node.
10437 (Inherit_Freeze_Node): New routine.
10438 * sem_ch3.adb (Build_Derived_Private_Type): Mark an underlying
10440 (Build_Underlying_Full_View): Mark an underlying full view as such.
10441 * sem_ch7.adb (Install_Private_Declarations): Mark an underlying
10444 2017-01-20 Yannick Moy <moy@adacore.com>
10446 * sinfo.ads: Document lack of Do_Division_Check flag
10447 on float exponentiation.
10449 2017-01-19 Javier Miranda <miranda@adacore.com>
10451 * ghost.adb (Propagate_Ignored_Ghost_Code): Protect access to the
10452 identifier attribute of a block-statement node. Required to avoid
10453 assertion failure when building the new containers library.
10455 2017-01-19 Bob Duff <duff@adacore.com>
10457 * exp_ch3.adb: Update comment.
10459 2017-01-19 Vincent Celier <celier@adacore.com>
10461 * gprep.adb (Gnatprep): Parse the definition file without
10462 "replace in comments" even when switch -C is used.
10464 2017-01-19 Justin Squirek <squirek@adacore.com>
10466 * exp_ch9.adb (Is_Pure_Barrier): Create function
10467 Is_Count_Attribute to identify an expansion of the 'Count
10470 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10472 * sem_ch5.adb (Analyze_Loop_Statement): In GNATprove mode the
10473 statements within an element iterator loop are only analyzed
10474 agter the loop is rewritten. Within a generic the analysis must
10475 be performed in any case to complete name capture.
10477 2017-01-19 Bob Duff <duff@adacore.com>
10479 * sem_prag.adb (Analyze_Pragma): Check for ignored pragmas first,
10480 before checking for unrecognized pragmas.
10481 Initialize Pname on its declarations; that's always good style.
10483 2017-01-19 Claire Dross <dross@adacore.com>
10485 * exp_ch7.adb (Build_Invariant_Procedure_Body): Semi-insert the
10486 body into the tree for GNATprove by setting its Parent field. The
10487 components invariants of composite types are not checked by
10488 the composite type's invariant procedure in GNATprove mode.
10489 (Build_Invariant_Procedure_Declaration): Semi-insert the
10490 declaration into the tree for GNATprove by setting its Parent
10492 * freeze.adb (Freeze_Arry_Type):In GNATprove mode, do not add
10493 the component invariants to the array type invariant procedure
10494 so that the procedure can be used to check the array type
10496 (Freeze_Record_Type): In GNATprove mode, do
10497 not add the component invariants to the record type invariant
10498 procedure so that the procedure can be used to check the record
10499 type invariants if any.
10501 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10503 * lib-xref-spark_specific.adb: Minor reformatting.
10504 * exp_ch7.adb (Add_Parent_Invariants): Do not process array types.
10506 2017-01-19 Javier Miranda <miranda@adacore.com>
10508 * exp_aggr.adb (Pass_Aggregate_To_Back_End): Renamed as
10509 Build_Back_End_Aggregate.
10510 (Generate_Aggregate_For_Derived_Type): Code cleanup.
10511 (Prepend_Stored_Values): Code cleanup.
10513 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10515 * sem_ch6.adb (Analyze_Expression_Function): Check for an
10516 incomplete return type after attempting to freeze it, so that
10517 other freeze actiona are generated in the proper order.
10519 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10521 * sem_aggr.adb (Resolve_Aggregate): If the type is a string
10522 type, ie. a type whose component is a character type, and the
10523 aggregate is positional, do not convert into a string literal
10524 if the index type is not an integer type, because the original
10525 type may be required in an enclosing operation.
10527 2017-01-19 Bob Duff <duff@adacore.com>
10529 * binde.adb, debug.adb: Enable new elaboration order algorithm
10530 by default. -dp switch reverts to the old algorithm.
10532 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10534 * sem_ch3.adb Add with and use clauses for Exp_Ch7.
10535 (Analyze_Declarations): Create the DIC and Invariant
10536 procedure bodies s after all freezing has taken place.
10537 (Build_Assertion_Bodies): New routine.
10538 * sem_ch7.adb Remove the with and use clauses for Exp_Ch7
10540 (Analyze_Package_Specification): Remove the
10541 generation of the DIC and Invariant procedure bodies. This is
10542 now done by Analyze_Declarations.
10543 * sem_disp.adb (Check_Dispatching_Operation): DIC and Invariant
10544 procedures are never treated as primitives.
10546 2017-01-19 Yannick Moy <moy@adacore.com>
10548 * frontend.adb: Analyze inlined bodies and check elaboration
10549 rules in GNATprove mode too.
10550 * sem_elab.adb (Delay_Element): Add Boolean component to save
10551 indication that call is in SPARK code. (Check_Elab_Calls):
10552 Check elaboration rules in GNATprove mode, and correctly set
10553 the current value of SPARK_Mode.
10554 * lib-xref-spark_specific.adb
10555 (Add_SPARK_Xrefs): Simplify iteration over dereferences.
10557 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10559 * exp_ch4.adb (Expand_Concatenate): Do no enable overflow
10560 checks on the expression for the high bound of concatenation
10561 when checks are disabled, to suppress warnings about potential
10562 constraint errors in restricted runtimes.
10564 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10566 * exp_ch3.adb (Expand_Freeze_Enumeration_Type): Mark the
10567 representation-to-position function as inlined.
10568 * sem_cat.adb (Set_Categorization_From_Scope): Do not modify
10569 the purity of an internally generated entity if it has been
10570 explicitly marked as pure for optimization purposes.
10571 * exp_aggr.adb: Minor reformatting.
10573 2017-01-19 Javier Miranda <miranda@adacore.com>
10575 * exp_ch6.adb (Expand_Call): Remove side effects on
10576 actuals that are allocators with qualified expression since the
10577 initialization of the object is performed by means of individual
10578 statements (and hence it must be done before the call).
10580 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10582 * sem_ch3.adb (Analyze_Declarations): Minor reformatting.
10583 (Build_Derived_Enumeration_Type): If the derived type inherits a
10584 dynamic predicate from its parent, the bounds of the type must
10585 freeze because an explicit constraint is constructed for the
10586 type and the corresponding range is elaborated now.
10588 2017-01-19 Arnaud Charlet <charlet@adacore.com>
10590 * sem_attr.ads: minor fix of inconsistent casing in comment
10591 * lib-writ.ads: minor align comments in columns
10592 * sem_ch3.adb: Minor reformatting.
10593 * spark_xrefs.ads: minor fix typo in SPARK-related comment
10594 * table.ads: minor style fix in comment
10595 * lib-xref-spark_specific.adb
10596 (Add_SPARK_Xrefs): simplify processing of SPARK cross-references.
10597 * sem_ch12.adb: minor whitespace fix
10598 * freeze.adb: Add comment.
10599 * sem_util.adb (Unique_Name): for instances of
10600 generic subprograms ignore the name of the wrapper package.
10602 2017-01-19 Javier Miranda <miranda@adacore.com>
10604 * exp_aggr.adb (Resolve_Record_Aggregate):
10605 Factorize code needed for aggregates of limited and unlimited
10606 types in a new routine.
10607 (Pass_Aggregate_To_Back_End): New subprogram.
10609 2017-01-19 Yannick Moy <moy@adacore.com>
10611 * sinfo.adb (Pragma_Name): Only access up to Last_Pair of Pragma_Map.
10613 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10615 * sem_ch4.ads, sem_ch4.adb (Try_Object_Operation): Make subprogram
10616 public, for use elsewhere.
10617 * sem_ch6.adb (Analyze_Procedure_Call): In SPARK_Mode and within
10618 an Inlined_body, recognize a call that uses object notation
10619 and has not been rewritten as a regular call because regular
10620 expansion has not taken place.
10622 2017-01-19 Bob Duff <duff@adacore.com>
10624 * checks.adb (Apply_Type_Conversion_Checks): Disable small optimization
10625 in case of generic formal discrete types, because it causes crashes in
10626 the compiler when built with assertions on.
10628 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10630 * lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads,
10631 sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting.
10633 2017-01-19 Bob Duff <duff@adacore.com>
10635 * bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking):
10636 Increment Warnings_Detected. It was decrementing, which is
10637 wrong since we just issued a warning message.
10638 * binderr.ads (Errors_Detected, Warnings_Detected): Declare
10639 these variables to be of subtype Nat instead of Int, because
10640 they should never be negative.
10642 2017-01-19 Javier Miranda <miranda@adacore.com>
10644 * contracts.adb (Build_Postconditions_Procedure): Replace
10645 Generate_C_Code by Modify_Tree_For_C.
10646 * exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate):
10647 Replace Generate_C_Code by Modify_Tree_For_C.
10648 * exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by
10650 * exp_ch11.adb (Expand_N_Exception_Declaration): Replace
10651 Generate_C_Code by Modify_Tree_For_C.
10652 * exp_ch4.adb (Expand_Allocator_Expression): Replace
10653 Generate_C_Code by Modify_Tree_For_C.
10654 * exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code
10655 by Modify_Tree_For_C.
10656 * exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace
10657 Generate_C_Code by Modify_Tree_For_C.
10658 * sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code
10659 by Modify_Tree_For_C.
10660 * sinfo.ads (Modify_Tree_For_C): Adding documentation.
10662 2017-01-19 Javier Miranda <miranda@adacore.com>
10664 * sem_util.ads, sem_util.adb (Expression_Of_Expression_Function): New
10666 (Is_Inlinable_Expression_Function): New subprogram.
10667 * exp_ch6.ads, exp_ch6.adb (Expression_Of_Expression_Function): Moved
10669 (Is_Inlinable_Expression_Function): Moved to Sem_Util.
10671 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10673 * sem_ch4.adb (Diagnose_Call): Improve error message when a
10674 selected component has a prefix that might be interpreted
10675 as a parameterless function call, but none of the candidate
10676 interpretations is parameterless, and there is a hidden homonym
10677 of the prefix that is a package.
10678 * sem_ch8.adb (Find_Selected_Component): If the prefix might be
10679 interpreted as a parameterless function call and its analysis
10680 fails, do not call Analyze_Selected_Component.
10682 2017-01-19 Steve Baird <baird@adacore.com>
10684 * sem_util.ads: Add new Use_Full_View Boolean parameter to
10686 * sem_util.adb (Get_Index_Bounds): replace calls to Scalar_Range with
10687 calls to a newly-defined Scalar_Range_Of_Right_View function.
10689 2017-01-19 Arnaud Charlet <charlet@adacore.com>
10691 * gnat1drv.adb: minor fix of unbalanced parens in comment
10692 * lib-xref.ads (Traverse_Compilation_Unit): declaration moved
10693 to visible part of the package to allow re-use in GNATprove.
10694 * lib-xref-spark_specific.adb (Traverse_Stub): routine refactored
10695 from repeated code of Traverse_Compilation_Unit.
10696 (Traverse_Declaration_Or_Statement): fixed detection of
10697 generic subprograms and packages; also, iteration over case
10698 statement alternatives rewritten to avoid testing if the first
10699 alternative is present (since it must be present due to Ada
10700 syntax restrictions).
10702 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10704 * exp_ch6.adb (Expand_N_Subprogram_Body): Mark the spec as
10705 returning by reference not just for subprogram body stubs,
10706 but for all subprogram cases.
10707 * sem_util.adb: Code reformatting.
10708 (Requires_Transient_Scope): Update the call to Results_Differ.
10709 (Results_Differ): Update the parameter profile and the associated
10712 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10714 * sem_dim.adb (Analyze_Dimension): Analyze object declaration and
10715 identifier nodes that do not come from source, to handle properly
10716 dimensionality check within an inlined body which inclddes both
10717 original operands and rewritten operands. This removes spurious
10718 dimensionality errors in the presence of front-end inlining,
10719 as well as in SPARK mode.
10721 2017-01-16 Jakub Jelinek <jakub@redhat.com>
10724 * gcc-interface/lang.opt (gant, gnatO, gnat): Add Driver flag.
10726 2017-01-13 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
10728 * gcc-interface/Makefile.in (SPARC/Solaris): Fix typo.
10730 2017-01-13 Arnaud Charlet <charlet@adacore.com>
10732 * doc/gnat_ugn/getting_started_with_gnat.rst,
10733 doc/gnat_ugn/inline_assembler.rst,
10734 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
10735 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
10736 doc/gnat_ugn/about_this_guide.rst,
10737 doc/gnat_ugn/platform_specific_information.rst,
10738 doc/gnat_ugn/example_of_binder_output.rst,
10739 doc/gnat_ugn/gnat_and_program_execution.rst,
10740 doc/gnat_ugn/gnat_utility_programs.rst,
10741 doc/gnat_ugn/the_gnat_compilation_model.rst,
10742 doc/gnat_rm/implementation_defined_attributes.rst,
10743 doc/gnat_rm/compatibility_and_porting_guide.rst,
10744 doc/gnat_rm/standard_library_routines.rst,
10745 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
10746 doc/gnat_rm/implementation_defined_pragmas.rst,
10747 doc/gnat_rm/the_gnat_library.rst,
10748 doc/gnat_rm/obsolescent_features.rst,
10749 doc/gnat_rm/about_this_guide.rst,
10750 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
10751 doc/gnat_rm/implementation_of_ada_2012_features.rst,
10752 doc/gnat_rm/interfacing_to_other_languages.rst,
10753 doc/gnat_rm/implementation_defined_aspects.rst,
10754 doc/gnat_rm.rst: Update documentation.
10755 * gnat_rm.texi, gnat_ugn.texi: Regenerated.
10757 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10759 * einfo.ads: minor grammar fixes in comment of Normalized_Position_Max.
10760 * scil_ll.adb: Minor style fix in comment.
10761 * sem_ch8.adb (Analyze_Expanded_Name): Perform dimension analysis
10762 even if entity is already set, because the node may be renalyzed
10763 after inlining transformations.
10765 2017-01-13 Javier Miranda <miranda@adacore.com>
10767 * sem_res.adb (Resolve_Call): Do not establish a transient scope
10768 for a call to inlinable expression function (since the call will
10769 be replaced by its returned object).
10770 * exp_ch6.ads (Is_Inlinable_Expression_Function): New subprogram.
10771 * exp_ch6.adb (Expression_Of_Expression_Function): New subprogram.
10772 (Expand_Call): For inlinable expression function call replace the
10773 call by its returned object.
10774 (Is_Inlinable_Expression_Function): New subprogram.
10776 2017-01-13 Gary Dismukes <dismukes@adacore.com>
10778 * checks.adb: Minor typo fix and reformatting.
10780 2017-01-13 Javier Miranda <miranda@adacore.com>
10782 * contracts.adb (Contract_Only_Subprograms): Remove formal.
10783 (Copy_Original_Specification): Removed.
10784 (Skip_Contract_Only_Subprogram): Move here checks previously
10785 located in the caller of this routine (to leave the code more clean).
10786 (Build_Contract_Only_Subprogram): Code cleanup.
10787 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): Removed.
10788 (Get_Contract_Only_Missing_Body_Name): Removed.
10790 2017-01-13 Javier Miranda <miranda@adacore.com>
10792 * sem_ch6.adb (Cloned_Expression): New subprogram.
10793 (Freeze_Expr_Types): Complete previous patch since the expression
10794 of an expression-function may have iterators and loops with
10795 defining identifiers which, as part of the preanalysis of the
10796 expression, may be left decorated with itypes that will not be
10797 available in the tree passed to the backend.
10799 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10801 * checks.adb (Apply_Type_Conversion_Checks): Optimize a type
10802 conversion to Integer of an expression that is an attribute
10803 reference 'Pos on an enumeration type.
10805 2017-01-13 Bob Duff <duff@adacore.com>
10807 * atree.ads: Minor comment fix.
10809 2017-01-13 Justin Squirek <squirek@adacore.com>
10811 * sem_ch6.adb (Check_Aggregate_Accessibility): Ignore function
10812 calls in accessibility check on return statement.
10814 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
10816 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
10817 Ensure that the input body is a subprogram body before trying to
10818 determine whether it denoted an expression function. Note that
10819 subprogram body stubs cannot denote expression functions.
10821 2017-01-13 Gary Dismukes <dismukes@adacore.com>
10823 * bindgen.adb, sem_ch6.adb, binde.adb, exp_ch3.adb: Minor reformatting
10826 2017-01-13 Javier Miranda <miranda@adacore.com>
10828 * einfo.ads (Component_Bit_Offset): Fix documentation.
10829 * sem_ch13.adb (Check_Record_Representation_Clause): Skip check
10830 on record holes for components with unknown compile-time offsets.
10832 2017-01-13 Bob Duff <duff@adacore.com>
10834 * ali.ads, ali.adb (Static_Elaboration_Model_Used): Remove unused flag.
10835 * g-locfil.ads: Minor comment fix.
10837 2017-01-13 Bob Duff <duff@adacore.com>
10839 * binde.adb (Elab_New): New elaboration order algorithm
10840 that is expected to cause fewer ABE issues. This is a work in
10841 progress. The new algorithm is currently disabled, and can be
10842 enable by the -dp switch, or by modifying the Do_Old and Do_New
10843 etc. flags and rebuilding. Experimental code is included to
10844 compare the results of the old and new algorithms.
10845 * binde.ads: Use GNAT.Dynamic_Tables instead of Table, so we
10846 can have multiple of these tables, so the old and new algorithms
10848 * bindgen.ads (Gen_Output_File): Pass Elab_Order as an 'in'
10849 parameter of type array. This avoids the global variable, and
10850 allows bounds checking (which is normally defeated by the tables
10851 packages). It also ensures that the Elab_Order is read-only
10853 * bindgen.adb: Pass Elab_Order as an 'in' parameter to all
10854 subprograms that need it, as above.
10855 * debug.adb: Document new -dp switch. Modify doc of old -do
10857 * gnatbind.adb (Gnatbind): Make use of new interfaces to Binde
10858 and Bindgen. Move writing of closure (-R and -Ra switches)
10859 to Binde; that's more convenient.
10861 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10863 * sem_ch6.adb (Analyze_Expression_Function): If the expression
10864 function is a completion, all entities referenced in the
10865 expression are frozen. As a consequence, a reference to an
10866 uncompleted private type from an enclosing scope is illegal.
10868 2017-01-13 Javier Miranda <miranda@adacore.com>
10870 * sem_ch6.adb (Freeze_Expr_Types): New subprogram.
10871 (Analyze_Subprogram_Body_Helper): At the occurrence of an
10872 expression function declaration that is a completion, its
10873 expression causes freezing (AI12-0103).
10875 2017-01-13 Vadim Godunko <godunko@adacore.com>
10877 * a-coinho-shared.adb: Fix memory leaks in Constant_Reference and
10878 Reference functions of Ada.Containers.Indefinite_Holders.
10880 2017-01-13 Bob Duff <duff@adacore.com>
10882 * s-os_lib.ads: Minor comment fixes.
10884 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
10886 * exp_ch3.adb (Default_Initialize_Object): Do not default
10887 initialize an object when it is of a task type and restriction
10888 No_Tasking is in effect because the initialization is obsolete.
10889 * exp_ch9.adb (Build_Master_Entity): Do not generate a master when
10890 restriction No_Tasking is in effect.
10891 (Build_Master_Renaming): Do not rename a master when restriction
10892 No_Tasking is in effect.
10894 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10896 * sem_aggr.adb (Resolve_Array_Aggregate): The code that verifies
10897 the legality of An others clause applies as well to a choice in
10898 an Iterated_component_ association.
10899 (Resolve_Iterated_Component_Association): An others choice
10901 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): An
10902 Iterated_Component_Association is not static.
10904 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
10906 * exp_ch3.adb (Freeze_Type): Mark the Ghost mode as set in case
10907 control is passed to the expresion handler before the new mode
10909 * sem_ch12.adb (Analyze_Package_Instantiation,
10910 Analyze_Subprogram_Instantiation): Mark the Ghost mode as set
10911 in case control is passed to the expresion handler before the
10914 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
10916 * sem_aggr.adb, sem_ch3.adb, inline.adb, sem_util.adb, exp_ch4.adb,
10917 exp_aggr.adb: Minor reformatting.
10919 2017-01-13 Gary Dismukes <dismukes@adacore.com>
10921 * inline.adb: Minor reformatting and typo fix.
10923 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10925 * sem_util.ads, sem_util.adb (Choice_List): Move function here
10926 from sem_aggr.adb, for use elsewhere.
10927 * sem_ch3.adb (Analyze_Object_Declaration): Use Choice_List.
10928 * sem_aggr.adb (Resolve_Array_Aggregate): Remove
10929 Iterated_Component_Present.
10930 * exp_aggr.adb: Use Choice_List throughout, to handle
10931 Iterated_Component_Associations.
10932 (Gen_Loop): Generate proper loop for an
10933 Iterated_Component_Association: loop variable has the identifier
10934 of the original association. Generate a loop even for a single
10935 component choice, in order to make loop parameter visible in
10937 (Flatten): An Iterated_Component_Association is not static.
10939 2017-01-13 Yannick Moy <moy@adacore.com>
10941 * exp_ch4.adb (Expand_N_Op_Expon): Ensure that the value of
10942 float exponentiation for statically known small negative values
10943 is the reciprocal of the exponentiation for the opposite value
10945 * s-exnllf.adb (Exn_Float, Exn_Long_Float, Exn_Long_Long_Float):
10946 Ensure that the value of float exponentiation for negative values
10947 is the reciprocal of the exponentiation for the opposite value
10949 * inline.adb (Expand_Inlined_Call): Fix the count
10950 for the number of generated gotos.
10952 2017-01-13 Yannick Moy <moy@adacore.com>
10954 * inline.adb: Code cleanup.
10955 * sem_util.adb (Is_OK_Volatile_Context): Add
10956 expression in delay statement as OK for volatile context.
10958 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10960 * sem_aggr.adb (Resolve_Array_Aggregate): In normal compilation
10961 mode a choice that is a subtype with a static predicate is
10962 replaced by the values it covers. This transformation must not
10963 be performed in ASIS mode, to preserve the source for analysis.
10965 2017-01-13 Justin Squirek <squirek@adacore.com>
10967 * nlists.ads: Correct minor typo.
10969 2017-01-13 Gary Dismukes <dismukes@adacore.com>
10971 * sem_ch13.adb: Minor reformatting and typo fix.
10973 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10975 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): An
10976 Iterated_Component_Association is a named association in an
10978 * sem_aggr.adb (Resolve_Iterated_Component_Association): New
10979 procedure, subsidiary of Resolve_Array_Aggregate, to analyze
10980 and resolve the discrete choices and the expression of the
10982 * sinfo.adb, sinfo.ads: In analogy with N_Component_Association,
10983 Loop_Actions and Box_Present are attributes of
10984 N_Iterated_Component_Association nodes. Box_Present is always
10985 False in this case.
10986 * sprint.adb (Sprint_Node): An Iterated_Component_Association
10987 has a Discrete_Choices list, as specified in the RM. A
10988 Component_Association for aggregate uses instead a Choices list.
10989 We have to live with this small inconsistency because the new
10990 construct also has a defining identifier, and there is no way
10991 to merge the two node structures.
10993 2017-01-13 Yannick Moy <moy@adacore.com>
10995 * inline.adb (Remove_Aspects_And_Pragmas): Add Unused to the
10996 list of pragmas to remove. Remove pragmas from the list of
10997 statements in the body to inline.
10998 * namet.adb, namet.ads (Nam_In): New version with 12 parameters.
11000 2017-01-13 Ed Schonberg <schonberg@adacore.com>
11002 * sem_ch3.adb (Resolve_Aspects): New procedure, subsidiary of
11003 Analyze_Declarations, to analyze and resolve the expressions of
11004 aspect specifications in the current declarative list, so that
11005 the expressions have proper entity and type info. This is needed
11006 for ASIS when there is no subsequent expansion to generate this
11007 semantic information.
11008 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Use Etype of
11009 original expression, to suppress cascaded errors when expression
11010 has been constant-folded.
11011 (Resolve_Aspect_Expressions, Resolve_Name): Preserve entities in
11012 ASIS mode, because there is no subsequent expansion to decorate
11015 2017-01-13 Yannick Moy <moy@adacore.com>
11017 * inline.adb, inline.ads (Call_Can_Be_Inlined_In_GNATprove_Mode):
11018 New function to detect when a call may be inlined or not in
11020 (Expand_Inlined_Call): Ensure that a temporary
11021 is always created in the cases where a type conversion may be
11022 needed on an input parameter in GNATprove mode, so that GNATprove
11023 sees the check to perform.
11024 * sem_res.adb (Resolve_Call): In GNATprove mode, skip inlining
11025 when not applicable due to actual requiring type conversion
11026 with possible check but no temporary value can be copied for
11027 GNATprove to see the check.
11029 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11031 * sem_aggr.adb, par_sco.adb, s-osprim-mingw.adb, exp_ch5.adb,
11032 exp_prag.adb, sem_ch3.adb, xr_tabls.adb, lib-xref-spark_specific.adb,
11033 layout.adb, sem_dist.adb, exp_spark.adb, exp_ch7.adb, gnatcmd.adb,
11034 exp_util.adb, prj-proc.adb, sem_aux.adb, comperr.adb, g-memdum.adb,
11035 exp_attr.adb, s-intman-solaris.adb, exp_ch9.adb, make.adb, live.adb,
11036 g-sercom-linux.adb, sem_dim.adb, mlib-prj.adb, s-intman-posix.adb,
11037 sem_ch9.adb, sem_ch10.adb, prep.adb, einfo.adb, scng.adb, checks.adb,
11038 prj-strt.adb, sem_prag.adb, eval_fat.adb, sem_ch12.adb, sem.adb,
11039 a-numaux-x86.adb, a-stwifi.adb, i-cobol.adb, prj.adb,
11040 get_spark_xrefs.adb, s-tasini.adb, rtsfind.adb, freeze.adb,
11041 g-arrspl.adb, par-ch4.adb, sem_util.adb, sem_res.adb, expander.adb,
11042 sem_attr.adb, exp_dbug.adb, prj-pp.adb, a-stzfix.adb, s-interr.adb,
11043 s-wchcnv.adb, switch-m.adb, gnat1drv.adb, sinput-l.adb, stylesw.adb,
11044 contracts.adb, s-intman-android.adb, g-expect.adb, exp_ch4.adb,
11045 g-comlin.adb, errout.adb, sinput.adb, s-exctra.adb, repinfo.adb,
11046 g-spipat.adb, g-debpoo.adb, exp_ch6.adb, sem_ch4.adb, exp_ch13.adb,
11047 a-wtedit.adb, validsw.adb, pprint.adb, widechar.adb, makeutl.adb,
11048 ali.adb, set_targ.adb, sem_mech.adb, sem_ch6.adb, gnatdll.adb,
11049 get_scos.adb, g-pehage.adb, s-tratas-default.adb, gnatbind.adb,
11050 prj-dect.adb, g-socthi-mingw.adb, par-prag.adb, prj-nmsc.adb,
11051 exp_disp.adb, par-ch12.adb, binde.adb, sem_ch8.adb,
11052 s-tfsetr-default.adb, s-regexp.adb, gprep.adb, s-tpobop.adb,
11053 a-teioed.adb, sem_warn.adb, sem_eval.adb, g-awk.adb, s-io.adb,
11054 a-ztedit.adb, xoscons.adb, exp_intr.adb, sem_cat.adb, sprint.adb,
11055 g-socket.adb, exp_dist.adb, sem_ch13.adb, s-tfsetr-vxworks.adb,
11056 par-ch3.adb, treepr.adb, g-forstr.adb, g-catiio.adb, par-ch5.adb,
11057 uname.adb, osint.adb, exp_ch3.adb, prj-env.adb, a-strfix.adb,
11058 a-stzsup.adb, prj-tree.adb, s-fileio.adb: Update all eligible case
11059 statements to reflect the new style for case alternatives. Various
11060 code clean up and reformatting.
11062 2017-01-13 Gary Dismukes <dismukes@adacore.com>
11064 * exp_util.adb: Minor reformatting.
11066 2017-01-13 Yannick Moy <moy@adacore.com>
11068 * exp_spark.adb: Code cleanup.
11069 * sem_ch9.adb (Analyze_Delay_Until): Resolve
11070 expression so that calls are identified as such inside delay
11073 2017-01-13 Ed Schonberg <schonberg@adacore.com>
11075 * exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
11076 * par-ch3.adb (P_Discrete_Choice_List): An
11077 Iterated_Component_Association is an array aggregate component.
11078 * par-ch4.adb (P_Iterated_Component_Association): New procedure.
11079 (Is_Quantified_Expression): New function that performs a lookahead
11080 to distinguish quantified expressions from iterated component
11082 (P_Aggregate_Or_Paren_Expr): Recognize iterated component
11084 (P_Unparen_Cond_Case_Quant_Expression, P_Primary): Ditto.
11085 * sem.adb (Analyze): Handle Iterated_Component_Association.
11086 * sem_aggr.adb (Resolve_Array_Aggregate): Dummy handling of iterated
11087 component associations.
11088 * sinfo.ads, sinfo.adb: Entries for for
11089 N_Iterated_Component_Association and its fields.
11090 * sprint.adb (Sprint_Node_Actual): Handle
11091 N_Iterated_Component_Association.
11093 2017-01-13 Justin Squirek <squirek@adacore.com>
11095 * sem_ch12.adb (Analyze_Package_Instantiation): Move disabiling
11096 of the style check until after preanalysis of acutals.
11098 2017-01-13 Yannick Moy <moy@adacore.com>
11100 * sem_ch13.adb: Minor reformatting.
11101 * par-ch11.adb: minor style fix in whitespace
11102 * gnatbind.adb (Gnatbind): Scope of Std_Lib_File
11103 reduced to Add_Artificial_ALI_File; style fix in declaration of
11104 Text; grammar fix in comment.
11105 * osint-c.adb (Read_Library_Info): strip trailing NUL from result.
11106 * freeze.adb: Cleanup to pass pragma instead of
11107 expression to call.
11108 * exp_spark.adb (Expand_SPARK_Attribute_Reference): New procedure to
11109 replace System'To_Address by equivalent call.
11111 2017-01-13 Arnaud Charlet <charlet@adacore.com>
11113 * bindusg.adb: Improve usage output for -f switch.
11115 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11117 * frontend.adb, freeze.adb, sem_res.adb, sem_attr.adb, sem_ch8.adb:
11118 Minor reformatting.
11120 2017-01-13 Ed Schonberg <schonberg@adacore.com>
11122 * sem_ch13.adb (Is_Predicate_Static): Following the intent of the RM,
11123 treat comparisons on strings as legal in a Static_Predicate.
11124 (Is_Predicate_Static, Is_Type_Ref): Predicate also returns true on
11125 a function call that is the expansion of a string comparison.The
11126 function call is built when compiling the corresponding predicate
11127 function, but the expression has been found legal as a static
11128 predicate during earlier analysis.
11129 * sem_eval.adb (Real_Or_String_Static_Predicate_Matches): Handle
11130 properly a function call that is the expansion of a string
11131 comparison operation, in order to recover the Static_Predicate
11132 expression and apply it to a static argument when needed.
11134 2017-01-13 Tristan Gingold <gingold@adacore.com>
11136 * s-mmap.adb, s-mmap.ads (Open_Read_No_Exception): New function.
11137 (Open_Read): Re-implement using Open_Read_No_Exception.
11138 (Open_Write): Raise exception in case of error.
11139 * s-mmosin-mingw.adb (Open_Common): Do not raise exception.
11140 * s-mmosin-unix.adb (Open_Read, Open_Write): Do not
11142 * s-mmosin-mingw.ads, s-mmosin-unix.ads (Open_Read): Adjust comment.
11144 2017-01-13 Yannick Moy <moy@adacore.com>
11146 * checks.adb: Code cleanup.
11148 2017-01-13 Yannick Moy <moy@adacore.com>
11150 * freeze.adb (Check_Inherited_Conditions): Use analyzed pragma
11151 expression instead of unanalyzed aspect expression for checking
11152 the validity of inheriting an operation. Also copy the expression
11153 being passing it to Build_Class_Wide_Expression, as this call
11154 modifies its argument.
11155 * sem_util.ads Fix comment to reference correct function name
11158 2017-01-13 Javier Miranda <miranda@adacore.com>
11160 * sem_res.adb (Resolve_Generalized_Indexing): Compiling in ASIS mode,
11161 when we propagate information about the indexes back to the original
11162 indexing mode and the prefix of the index is a function call, do not
11163 remove any parameter from such call.
11165 2017-01-13 Gary Dismukes <dismukes@adacore.com>
11167 * exp_ch6.ads (Needs_BIP_Finalization_Master): Update comment.
11168 * exp_ch6.adb (Needs_BIP_Finalization_Master): Return True for
11169 a build-in-place function whose result type is tagged.
11171 2017-01-13 Yannick Moy <moy@adacore.com>
11173 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
11174 Do not generate a wrapper when the only candidate is a class-wide
11176 (Analyze_Subprogram_Renaming): Do not freeze the renaming or renamed
11177 inside a generic context.
11179 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11181 * exp_util.adb (Add_Inherited_Tagged_DIC):
11182 Pass the object parameters of both the parent and the derived
11183 type DIC procedure to the reference replacement circuitry.
11184 (Find_DIC_Type): Modify the circuitry to present the partial
11185 view of a private type in case the private type defines its own
11187 (Replace_Object_And_Primitive_References): Add two
11188 optional formal parameters. Update the comment on usage. Update
11189 the replacement of references to object parameters.
11191 2017-01-13 Gary Dismukes <dismukes@adacore.com>
11193 * einfo.adb, sem_ch6.adb, atree.adb: Minor reformatting and typo fix.
11195 2017-01-13 Ed Schonberg <schonberg@adacore.com>
11197 * sem_res.adb (Resolve_Actuals): Apply Scalar_Range_Check to
11198 an out parameter that is a type conversion, independently of th
11199 range check that may apply to the expression of the conversion,
11200 for use in GNATProve.
11202 2017-01-13 Yannick Moy <moy@adacore.com>
11204 * gnat1drv.adb (Gnat1drv): Move the implicit with for System in
11205 GNATprove_Mode here to Frontend.
11206 * frontend.adb (Frontend): Move the implicit with for System
11207 in GNATprove_Mode here as it ismore correct this way; the old
11208 place only worked by chance, since there were no overloaded names.
11209 * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_Tasking_State.
11210 * sem_attr.adb (Analyze_Attribute): In GNATprove_Mode, for the
11211 four attributes identified in SRM 9(18), add an implicit with
11212 to Ada.Task_Identification.
11213 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
11214 Deal specially with the wrapper introduced for AI05-0071 in GNATprove
11216 * checks.adb (Apply_Discriminant_Check,
11217 Apply_Selected_Length_Checks, Apply_Selected_Range_Checks):
11218 In GNATprove mode, we do not apply the checks, but we still
11219 analyze the expression to possibly issue errors on SPARK
11220 code when a run-time error can be detected at compile time.
11221 (Selected_Length_Checks, Selected_Range_Checks): Perform analysis
11224 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11226 * expander.adb (Expand): Add a warning about using return
11227 statements in Ghost management code.
11228 * exp_ch3.adb (Freeze_Type): Add a warning about using return
11229 statements in Ghost management code.
11230 * exp_ch7.adb (Build_Invariant_Procedure_Body,
11231 Build_Invariant_Procedure_Declaration): Add a warning about
11232 using return statements in Ghost management code.
11233 * exp_disp.adb (Make_DT): Add a warning about using return
11234 statements in Ghost management code.
11235 * exp_util.adb (Build_DIC_Procedure_Body,
11236 Build_DIC_Procedure_Declaration, Make_Predicated_Call): Add a
11237 warning about using return statements in Ghost management code.
11238 * freeze.adb (Freeze_Entity): Add a warning about using return
11239 statements in Ghost management code.
11240 * sem.adb (Analyze, Do_Analyze): Add a warning about using return
11241 statements in Ghost management code.
11242 * sem_ch3.adb (Analyze_Object_Declaration, Process_Full_View): Add
11243 a warning about using return statements in Ghost management code.
11244 * sem_ch5.adb (Analyze_Assignment): Add a warning about using
11245 return statements in Ghost management code.
11246 * sem_ch6.adb (Analyze_Procedure_Call,
11247 Analyze_Subprogram_Body_Helper): Add a warning about using return
11248 statements in Ghost management code.
11249 * sem_ch7.adb (Analyze_Package_Body_Helper): Add a warning about
11250 using return statements in Ghost management code.
11251 * sem_ch12.adb (Analyze_Package_Instantiation,
11252 Analyze_Subprogram_Instantiation, Instantiate_Package_Body,
11253 Instantiate_Subprogram_Body): Add a warning about using return
11254 statements in Ghost management code.
11255 * sem_ch13.adb (Build_Predicate_Functions,
11256 Build_Predicate_Function_Declarations): Add a warning about
11257 using return statements in Ghost management code.
11258 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part,
11259 Analyze_Initial_Condition_In_Decl_Part, Analyze_Pragma,
11260 Analyze_Pre_Post_Condition_In_Decl_Part): Add a warning about
11261 using return statements in Ghost management code.
11263 2017-01-13 Tristan Gingold <gingold@adacore.com>
11265 * s-mmosin-mingw.adb: Fix pragma import.
11267 2017-01-13 Arnaud Charlet <charlet@adacore.com>
11269 * gnat1drv.adb (Adjust_Global_Switches): Ignore -gnateE in
11272 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11274 * atree.adb (Allocate_Initialize_Node): A newly created node is
11275 no longer marked as Ghost at this level.
11276 (Mark_New_Ghost_Node): New routine.
11277 (New_Copy): Mark the copy as Ghost.
11278 (New_Entity): Mark the entity as Ghost.
11279 (New_Node): Mark the node as Ghost.
11280 * einfo.adb (Is_Checked_Ghost_Entity): This attribute can now
11281 apply to unanalyzed entities.
11282 (Is_Ignored_Ghost_Entity): This attribute can now apply to unanalyzed
11284 (Set_Is_Checked_Ghost_Entity): This attribute now
11285 applies to all entities as well as unanalyzed entities.
11286 (Set_Is_Ignored_Ghost_Entity): This attribute now applies to
11287 all entities as well as unanalyzed entities.
11288 * expander.adb Add with and use clauses for Ghost.
11289 (Expand): Install and revert the Ghost region associated with the node
11291 * exp_ch3.adb (Expand_Freeze_Array_Type): Remove all Ghost-related code.
11292 (Expand_Freeze_Class_Wide_Type): Remoe all Ghost-related code.
11293 (Expand_Freeze_Enumeration_Type): Remove all Ghost-related code.
11294 (Expand_Freeze_Record_Type): Remove all Ghost-related code.
11295 (Freeze_Type): Install and revert the Ghost region associated
11296 with the type being frozen.
11297 * exp_ch5.adb Remove with and use clauses for Ghost.
11298 (Expand_N_Assignment_Statement): Remove all Ghost-related code.
11299 * exp_ch6.adb Remove with and use clauses for Ghost.
11300 (Expand_N_Procedure_Call_Statement): Remove all Ghost-relatd code.
11301 (Expand_N_Subprogram_Body): Remove all Ghost-related code.
11302 * exp_ch7.adb (Build_Invariant_Procedure_Body): Install and revert the
11303 Ghost region of the working type.
11304 (Build_Invariant_Procedure_Declaration): Install and revert
11305 the Ghost region of the working type.
11306 (Expand_N_Package_Body): Remove all Ghost-related code.
11307 * exp_ch8.adb Remove with and use clauses for Ghost.
11308 (Expand_N_Exception_Renaming_Declaration): Remove all Ghost-related
11310 (Expand_N_Object_Renaming_Declaration): Remove all Ghost-related code.
11311 (Expand_N_Package_Renaming_Declaration): Remove all Ghost-related code.
11312 (Expand_N_Subprogram_Renaming_Declaration): Remove all Ghost-related
11314 * exp_ch13.adb Remove with and use clauses for Ghost.
11315 (Expand_N_Freeze_Entity): Remove all Ghost-related code.
11316 * exp_disp.adb (Make_DT): Install and revert the Ghost region of
11317 the tagged type. Move the generation of various entities within
11318 the Ghost region of the type.
11319 * exp_prag.adb Remove with and use clauses for Ghost.
11320 (Expand_Pragma_Check): Remove all Ghost-related code.
11321 (Expand_Pragma_Contract_Cases): Remove all Ghost-related code.
11322 (Expand_Pragma_Initial_Condition): Remove all Ghost-related code.
11323 (Expand_Pragma_Loop_Variant): Remove all Ghost-related code.
11324 * exp_util.adb (Build_DIC_Procedure_Body): Install
11325 and revert the Ghost region of the working types.
11326 (Build_DIC_Procedure_Declaration): Install and revert the
11327 Ghost region of the working type.
11328 (Make_Invariant_Call): Install and revert the Ghost region of the
11330 (Make_Predicate_Call): Reimplemented. Install and revert the
11331 Ghost region of the associated type.
11332 * freeze.adb (Freeze_Entity): Install and revert the Ghost region
11333 of the entity being frozen.
11334 (New_Freeze_Node): Removed.
11335 * ghost.adb Remove with and use clauses for Opt.
11336 (Check_Ghost_Completion): Update the parameter profile
11337 and all references to formal parameters.
11338 (Ghost_Entity): Update the comment on usage.
11339 (Install_Ghost_Mode): New routines.
11340 (Is_Ghost_Assignment): New routine.
11341 (Is_Ghost_Declaration): New routine.
11342 (Is_Ghost_Pragma): New routine.
11343 (Is_Ghost_Procedure_Call): New routine.
11344 (Is_Ghost_Renaming): Removed.
11345 (Is_OK_Declaration): Reimplemented.
11346 (Is_OK_Pragma): Reimplemented.
11347 (Is_OK_Statement): Reimplemented.
11348 (Is_Subject_To_Ghost): Update the comment on usage.
11349 (Mark_And_Set_Ghost_Assignment): New routine.
11350 (Mark_And_Set_Ghost_Body): New routine.
11351 (Mark_And_Set_Ghost_Completion): New routine.
11352 (Mark_And_Set_Ghost_Declaration): New routine.
11353 (Mark_And_Set_Ghost_Instantiation): New routine.
11354 (Mark_And_Set_Ghost_Procedure_Call): New routine.
11355 (Mark_Full_View_As_Ghost): Removed.
11356 (Mark_Ghost_Declaration_Or_Body): New routine.
11357 (Mark_Ghost_Pragma): New routine.
11358 (Mark_Ghost_Renaming): New routine.
11359 (Mark_Pragma_As_Ghost): Removed.
11360 (Mark_Renaming_As_Ghost): Removed.
11361 (Propagate_Ignored_Ghost_Code): Update the comment on usage.
11362 (Prune_Node): Freeze nodes no longer need special pruning, they
11363 are processed by the general ignored Ghost code mechanism.
11364 (Restore_Ghost_Mode): New routine.
11365 (Set_Ghost_Mode): Reimplemented.
11366 (Set_Ghost_Mode_From_Entity): Removed.
11367 * ghost.ads Add with and use clauses for Ghost.
11368 (Check_Ghost_Completion): Update the parameter profile
11369 along with the comment on usage.
11370 (Install_Ghost_Mode): New routine.
11371 (Is_Ghost_Assignment): New routine.
11372 (Is_Ghost_Declaration): New routine.
11373 (Is_Ghost_Pragma): New routine.
11374 (Is_Ghost_Procedure_Call): New routine.
11375 (Mark_And_Set_Ghost_Assignment): New routine.
11376 (Mark_And_Set_Ghost_Body): New routine.
11377 (Mark_And_Set_Ghost_Completion): New routine.
11378 (Mark_And_Set_Ghost_Declaration): New routine.
11379 (Mark_And_Set_Ghost_Instantiation): New routine.
11380 (Mark_And_Set_Ghost_Procedure_Call): New routine.
11381 (Mark_Full_View_As_Ghost): Removed.
11382 (Mark_Ghost_Pragma): New routine.
11383 (Mark_Ghost_Renaming): New routine.
11384 (Mark_Pragma_As_Ghost): Removed.
11385 (Mark_Renaming_As_Ghost): Removed.
11386 (Restore_Ghost_Mode): New routine.
11387 (Set_Ghost_Mode): Redefined.
11388 (Set_Ghost_Mode_From_Entity): Removed.
11389 * sem.adb (Analyze): Install and revert the Ghost region of the
11390 node being analyzed.
11391 (Do_Analyze): Change the way a clean Ghost
11392 region is installed and reverted.
11393 * sem_ch3.adb (Analyze_Full_Type_Declaration): Remove
11394 all Ghost-related code.
11395 (Analyze_Incomplete_Type_Decl): Remove all Ghost-related code.
11396 (Analyze_Number_Declaration): Remove all Ghost-related code.
11397 (Analyze_Object_Declaration): Install and revert the Ghost region of
11398 a deferred object declaration's completion.
11399 (Array_Type_Declaration): Remove all Ghost-related code.
11400 (Build_Derived_Type): Update the comment on
11401 the propagation of Ghost attributes from a parent to a derived type.
11402 (Derive_Subprogram): Remove all Ghost-related code.
11403 (Make_Class_Wide_Type): Remove all Ghost-related code.
11404 (Make_Implicit_Base): Remove all Ghost-related code.
11405 (Process_Full_View): Install and revert the Ghost region of
11406 the partial view. There is no longer need to check the Ghost
11408 * sem_ch5.adb (Analyze_Assignment): Install and revert the Ghost
11409 region of the left hand side.
11410 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Remove
11411 all Ghost-related code.
11412 (Analyze_Expression_Function): Remove all Ghost-related code.
11413 (Analyze_Generic_Subprogram_Body): Remove all Ghost-related code.
11414 (Analyze_Procedure_Call): Install and revert the Ghost region of
11415 the procedure being called.
11416 (Analyze_Subprogram_Body_Helper): Install and revert the Ghost
11417 region of the spec or body.
11418 (Analyze_Subprogram_Declaration): Remove all Ghost-related code.
11419 (Build_Subprogram_Declaration): Remove all Ghost-related code.
11420 (Find_Corresponding_Spec): Remove all Ghost-related code.
11421 (Process_Formals): Remove all Ghost-related code.
11422 * sem_ch7.adb (Analyze_Package_Body_Helper): Install and revert
11423 the Ghost region of the spec.
11424 (Analyze_Package_Declaration): Remove all Ghost-related code.
11425 * sem_ch8.adb (Analyze_Exception_Renaming): Mark a renaming as
11426 Ghost when it aliases a Ghost entity.
11427 (Analyze_Generic_Renaming): Mark a renaming as Ghost when it aliases
11429 (Analyze_Object_Renaming): Mark a renaming as Ghost when
11430 it aliases a Ghost entity.
11431 (Analyze_Package_Renaming): Mark a renaming as Ghost when it aliases
11433 (Analyze_Subprogram_Renaming): Mark a renaming as Ghost when it
11434 aliases a Ghost entity.
11435 * sem_ch11.adb Remove with and use clauses for Ghost.
11436 (Analyze_Exception_Declaration): Remove all Ghost-related code.
11437 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Remove all
11438 Ghost-related code.
11439 (Analyze_Generic_Subprogram_Declaration): Remove all Ghost-related
11441 (Analyze_Package_Instantiation): Install and revert the Ghost region
11442 of the package instantiation.
11443 (Analyze_Subprogram_Instantiation): Install
11444 and revert the Ghost region of the subprogram instantiation.
11445 (Instantiate_Package_Body): Code clean up. Install and revert the
11446 Ghost region of the package body.
11447 (Instantiate_Subprogram_Body): Code clean up. Install and revert the
11448 Ghost region of the subprogram body.
11449 * sem_ch13.adb (Build_Predicate_Functions): Install
11450 and revert the Ghost region of the related type.
11451 (Build_Predicate_Function_Declaration): Code clean up. Install
11452 and rever the Ghost region of the related type.
11453 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
11454 Install and revert the Ghost region of the pragma.
11455 (Analyze_Initial_Condition_In_Decl_Part): Install and revert the
11456 Ghost region of the pragma.
11457 (Analyze_Pragma): Install and revert the Ghost region of various
11458 pragmas. Mark a pragma as Ghost when it is related to a Ghost entity
11459 or encloses a Ghost entity.
11460 (Analyze_Pre_Post_Condition): Install and revert the Ghost
11461 region of the pragma.
11462 (Analyze_Pre_Post_Condition_In_Decl_Part): Install and revert the
11463 Ghost region of the pragma.
11464 * sem_res.adb (Resolve): Remove all Ghost-related code.
11465 * sem_util.adb (Is_Declaration): Reimplemented.
11466 (Is_Declaration_Other_Than_Renaming): New routine.
11467 * sem_util.ads (Is_Declaration_Other_Than_Renaming): New routine.
11468 * sinfo.adb (Is_Checked_Ghost_Pragma): New routine.
11469 (Is_Ghost_Pragma): Removed.
11470 (Is_Ignored_Ghost_Pragma): New routine.
11471 (Set_Is_Checked_Ghost_Pragma): New routine.
11472 (Set_Is_Ghost_Pragma): Removed.
11473 (Set_Is_Ignored_Ghost_Pragma): New routine.
11474 * sinfo.ads: Update the documentation on Ghost mode and
11475 Ghost regions. New attributes Is_Checked_Ghost_Pragma
11476 and Is_Ignored_Ghost_Pragma along with usages in nodes.
11477 Remove attribute Is_Ghost_Pragma along with usages in nodes.
11478 (Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
11479 (Is_Ghost_Pragma): Removed along with pragma Inline.
11480 (Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
11481 (Set_Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
11482 (Set_Is_Ghost_Pragma): Removed along with pragma Inline.
11483 (Set_Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
11485 2017-01-12 Tristan Gingold <gingold@adacore.com>
11487 * s-mmap.ads, s-mmap.adb, s-mmosin-unix.ads, s-mmosin-unix.adb,
11488 s-mmauni-long.ads, s-mmosin-mingw.ads, s-mmosin-mingw.adb: New files.
11490 2017-01-12 Yannick Moy <moy@adacore.com>
11492 * errout.adb, errout.ads (Initialize): Factor common treatment
11494 (Reset_Warnings): New procedure to reset counts related to warnings.
11495 (Record_Compilation_Errors): New variable to store the presence of an
11496 error, used in gnat2why to allow changing the Warning_Mode.
11497 (Compilation_Errors): Use new variable Record_Compilation_Errors to
11498 store the presence of an error.
11500 2017-01-12 Javier Miranda <miranda@adacore.com>
11502 * sem_ch13.adb (Analyze_Aspect_Specifications):
11503 For Interrupt_Handler and Attach_ Handler aspects, decorate the
11504 internally built reference to the protected procedure as coming
11505 from sources and force its analysis.
11507 2017-01-12 Ed Schonberg <schonberg@adacore.com>
11509 * sem_ch3.adb (Build_Derived_Type): For a scalar derived type,
11510 inherit predicates if any from the first_subtype of the parent,
11511 not from the anonymous parent type.
11512 * sem_eval.adb (Is_Static_Subtype): A type that inherits a dynamic
11513 predicate is not a static subtype.
11515 2017-01-12 Gary Dismukes <dismukes@adacore.com>
11517 * freeze.adb (Check_Suspicious_Convention): New procedure
11518 performing a warning check on discriminated record types with
11519 convention C or C++. Factored out of procedure Freeze_Record_Type,
11520 and changed to only apply to base types (to avoid spurious
11521 warnings on subtypes). Minor improvement of warning messages
11522 to refer to discriminated rather than variant record types.
11523 (Freeze_Record_Type): Remove code for performing a suspicious
11525 (Freeze_Entity): Only call Freeze_Record_Type
11526 on types that aren't declared within any enclosing generic units
11527 (rather than just excluding the type when the innermost scope
11528 is generic). Call Check_Suspicious_Convention whether or not
11529 the type is declared within a generic unit.
11530 * sem_ch8.adb (In_Generic_Scope): Move this function to Sem_Util.
11531 * sem_util.ads, sem_util.adb (In_Generic_Scope): New function (moved
11534 2017-01-12 Tristan Gingold <gingold@adacore.com>
11536 * sysdep.c, adaint.c, rtinit.c, ming32.h:
11537 (__gnat_current_codepage): Renamed from CurrentCodePage
11538 (__gnat_current_ccs_encoding): Renamed from CurrentCCSEncoding
11540 2017-01-12 Ed Schonberg <schonberg@adacore.com>
11542 * sem_ch6.adb (Fully_Conformant_Expressions): Handle properly
11543 quantified expressions, following AI12-050: the loop parameters
11544 of two quantified expressions are conformant if they have the
11547 2017-01-12 Arnaud Charlet <charlet@adacore.com>
11549 * gcc-interface/Makefile.in: Clean up VxWorks targets.
11551 2017-01-12 Ed Schonberg <schonberg@adacore.com>
11553 * sem_attr.adb (Analyze_Attribute_Reference, case Loop_Entry):
11554 Hnadle properly the attribute reference when it appears as part
11555 of an expression in another loop aspect.
11557 2017-01-12 Ed Schonberg <schonberg@adacore.com>
11559 * exp_ch3.adb (Check_Predicated_Discriminant): New procedure,
11560 subsidiary of Build_Initialization_Call, to complete generation
11561 of predicate checks on discriminants whose (sub)types have
11562 predicates, and to add checks on variants that do not have an
11564 * sem_util.adb (Gather_Components): A missing Others alternative is
11565 not an error when the type of the discriminant is a static predicate
11566 (and coverage has been checked when analyzing the case statement). A
11567 runtime check is generated to verify that a given discriminant
11568 satisfies the predicate (RM 3.8.1. (21.1/2)).
11570 2017-01-12 Yannick Moy <moy@adacore.com>
11572 * gnat1drv.adb (Adjust_Global_Switches): Only
11573 perform checking of exception mechanism when generating code.
11575 2017-01-12 Justin Squirek <squirek@adacore.com>
11577 * exp_ch7.adb (Add_Type_Invariants, Process_Array_Component):
11578 Remove handling of access component with invariant.
11579 (Build_Invariant_Procedure_Declaration): Remove return on class
11581 * freeze.adb (Freeze_Array_Type, Freeze_Record_Type): Remove
11582 conditional exception for component or array so Has_Own_Invariants
11583 flag is not falsly set.
11584 * sem_ch3.adb (Make_Class_Wide_Type): Initialize copy of class
11585 wide type to have no invariant flags.
11587 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11589 * exp_ch9.adb, sem_prag.adb, s-tassta.adb, sem_util.adb, s-tarest.adb,
11590 sem_ch13.adb: Minor reformatting.
11592 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11594 * exp_aggr.adb (Build_Record_Aggr_Code): Guard against a missing
11595 adjustment primitive when the ancestor type was not properly frozen.
11596 (Gen_Assign): Guard against a missing initialization
11597 primitive when the component type was not properly frozen.
11598 (Initialize_Array_Component): Guard against a missing adjustment
11599 primitive when the component type was not properly frozen.
11600 (Initialize_Record_Component): Guard against a missing adjustment
11601 primitive when the component type was not properly frozen.
11602 (Process_Transient_Component_Completion): The transient object may
11603 not be finalized when its associated type was not properly frozen.
11604 * exp_ch3.adb (Build_Assignment): Guard against a missing
11605 adjustment primitive when the component type was not properly frozen.
11606 (Build_Initialization_Call): Guard against a missing
11607 initialization primitive when the associated type was not properly
11609 (Expand_N_Object_Declaration): Guard against a missing
11610 adjustment primitive when the base type was not properly frozen.
11611 (Predefined_Primitive_Bodies): Create an empty Deep_Adjust
11612 body when there is no adjustment primitive available. Create an
11613 empty Deep_Finalize body when there is no finalization primitive
11615 * exp_ch4.adb (Apply_Accessibility_Check): Guard against a
11616 missing finalization primitive when the designated type was
11617 not properly frozen.
11618 (Expand_N_Allocator): Guard against a missing initialization primitive
11619 when the designated type was not properly frozen.
11620 * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add the adjustment call
11621 only when the corresponding adjustment primitive is available.
11622 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Generate the
11623 adjustment/finalization statements only when there is an available
11624 primitive to carry out the action.
11625 (Build_Initialize_Statements): Generate the initialization/finalization
11626 statements only when there is an available primitive to carry out the
11628 (Make_Adjust_Call): Do not generate a call when the underlying
11629 type is not present due to a possible missing full view.
11630 (Make_Final_Call): Do not generate a call when the underlying
11631 type is not present due to a possible missing full view.
11632 (Make_Finalize_Address_Stmts): Generate an empty body when the
11633 designated type lacks a finalization primitive.
11634 (Make_Init_Call): Do not generate a call when the underlying type is
11635 not present due to a possible missing full view.
11636 (Process_Component_For_Adjust): Add the adjustment call only when the
11637 corresponding adjustment primitive is available.
11638 (Process_Component_For_Finalize): Add the finalization call only when
11639 the corresponding finalization primitive is available.
11640 (Process_Object_Declaration): Use a null statement to emulate a
11641 missing call to the finalization primitive of the object type.
11642 * exp_ch7.ads (Make_Adjust_Call): Update the comment on usage.
11643 (Make_Final_Call): Update the comment on usage.
11644 (Make_Init_Call): Update the comment on usage.
11645 * exp_util.adb (Build_Transient_Object_Statements): Code reformatting.
11647 2017-01-12 Arnaud Charlet <charlet@adacore.com>
11649 * einfo.ads: Update documentation of Address_Taken.
11650 * sem_attr.adb (Analyze_Access_Attribute, Resolve_Attribute
11651 [Access_Attribute]): Only consider 'Access/'Unchecked_Access
11652 for subprograms when setting Address_Taken flag.
11654 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
11656 * sem_ch10.adb (Analyze_With_Clause): Removed code that turned
11657 Configurable_Run_Time_Mode off when analysing with'ed predefined
11660 2017-01-12 Gary Dismukes <dismukes@adacore.com>
11662 * sem_prag.adb: Minor reformatting.
11663 * sem_util.adb (Unique_Entity): fix result for
11664 bodies of entry families.
11666 2017-01-12 Justin Squirek <squirek@adacore.com>
11668 * sem_prag.adb (Analyze_Pragma): Add appropriate calls to
11669 Resolve_Suppressible in the pragma Assertion_Policy case.
11670 (Resolve_Suppressible): Created this function to factor out
11671 common code used to resolve Suppress to either Ignore or Check
11672 * snames.ads-tmpl: Add name for Suppressible.
11674 2017-01-12 Gary Dismukes <dismukes@adacore.com>
11676 * exp_ch9.adb, s-secsta.adb, snames.ads-tmpl, exp_ch3.adb: Minor
11678 * debug.adb: Minor comment fixes.
11680 2017-01-12 Arnaud Charlet <charlet@adacore.com>
11682 * sem_util.adb (Unique_Entity): For concurrent
11683 bodies that are defined with stubs and complete a declaration
11684 of a single concurrent object return the entity of an implicit
11685 concurrent type, not the entity of the anonymous concurrent
11687 * debug.adb: -gnatd.J is no longer used.
11688 * make.adb (Globalize): Removed, no longer used.
11689 * sem_ch9.adb: minor typo in comment for entry index
11691 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
11693 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
11694 * exp_ch3.adb (Build_Init_Statements): As part of initialising
11695 the value record of a task, set its _Secondary_Stack_Size field
11697 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
11698 a _Secondary_Stack_Size field in the value record of
11699 the task if a Secondary_Stack_Size rep item is present.
11700 (Make_Task_Create_Call): Include secondary stack size
11701 parameter. If No_Secondary_Stack restriction is in place, passes
11703 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
11704 Secondary_Stack_Size.
11705 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
11706 function to define the overhead of the secondary stack.
11707 * s-tarest.adb (Create_Restricted_Task,
11708 Create_Restricted_Task_Sequential): Functions now include
11709 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
11710 * s-tarest.adb (Create_Restricted_Task,
11711 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB now
11712 include Secondary_Stack_Size parameter.
11713 (Task_Wrapper): Secondary stack now allocated to the size specified by
11714 the Secondary_Stack_Size parameter in the task's ATCB.
11715 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialize_ATCB): New
11716 Secondary_Stack_Size component.
11717 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
11718 Create_Restricted_Task_Sequential): Function now include
11719 Secondary_Stack_Size parameter.
11720 (Task_Wrapper): Secondary stack now allocated to the size
11721 specified by the Secondary_Stack_Size parameter in the task's
11723 * s-tproft.adb (Register_Foreign_Thread): Amended Initialize_ATCB call
11724 to include Secondary_Stack_Size parameter.
11725 * sem_ch13.adb (Analyze_Aspect_Specification): Add support for
11726 Secondary_Stack_Size aspect, turning the aspect into its corresponding
11727 internal attribute.
11728 (Analyze_Attribute_Definition): Process Secondary_Stack_Size attribute.
11729 * snames.adb-tmpl, snames.ads-tmpl: Added names
11730 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
11731 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
11733 2017-01-12 Yannick Moy <moy@adacore.com>
11735 * exp_spark.adb (Expand_SPARK_Potential_Renaming): Fix sloc of copied
11738 2017-01-12 Justin Squirek <squirek@adacore.com>
11740 * exp_attr.adb (Expand_N_Attribute_Reference):
11741 Fix Finalization_Size case by properly resolving the type after
11742 rewritting the node.
11744 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11746 * exp_util.adb (Build_DIC_Procedure_Body): Semi-insert the body into
11748 (Build_DIC_Procedure_Declaration): Semi-insert the body into the tree.
11749 * binde.adb, exp_ch5.adb, sem_type.adb, sem.ads, sem_res.adb,
11750 exp_sel.ads: Minor reformatting.
11752 2017-01-12 Justin Squirek <squirek@adacore.com>
11754 * exp_ch6.adb (Expand_Call): Add guard to prevent
11755 invariant checks from being created for internally generated
11758 2017-01-12 Bob Duff <duff@adacore.com>
11760 * lib-writ.ads: Remove incorrect comment.
11762 2017-01-12 Javier Miranda <miranda@adacore.com>
11764 * debug.adb (-gnatd.K): Enable generation of contract-only
11765 procedures in CodePeer mode.
11766 * contracts.adb (Build_And_Analyze_Contract_Only_Subprograms):
11768 (Analyze_Contracts): Generate contract-only procedures if -gnatdK is
11770 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): New
11772 (Get_Contract_Only_Missing_Body_Name): New subprogram.
11773 (Get_Contract_Only_Body): New subprogram.
11774 (Set_Contract_Only_Body): New subprogram.
11775 (Is_Contract_Only_Body): New subprogram.
11776 (Set_Is_Contract_Only_Body): New subprogram.
11777 (SCIL_Nodes): Replace table by hash-table.
11779 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11781 * exp_ch6.adb: Minor reformatting.
11782 * spark_xrefs.ads: minor cleanup of comments for SPARK xrefs
11784 2017-01-12 Bob Duff <duff@adacore.com>
11786 * binde.adb (Forced): New reason for a dependence.
11787 (Force_Elab_Order): Implementation of the new switch.
11788 * binde.ads: Minor comment fixes.
11789 * bindusg.adb: Add -f switch. Apparently, there was an -f switch
11790 long ago that is no longer supported; removed comment about that.
11791 * opt.ads (Force_Elab_Order_File): Name of file specified for
11793 * switch-b.adb: Parse -f switch.
11795 2017-01-12 Justin Squirek <squirek@adacore.com>
11797 * exp_ch6.adb (Check_View_Conversion): Created this function
11798 to properly chain calls to check type invariants that may be
11799 present in a subprogram call after the subprogram.
11800 (Expand_Call): Add a conditional to identify when a view conversion
11801 needs to be checked.
11802 * nlists.adb, nlists.ads (Prepend_New): New routine.
11803 (Prepend_New_To): New routine.
11805 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11807 * sinfo.ads: Minor reformatting.
11809 2017-01-12 Gary Dismukes <dismukes@adacore.com>
11811 * exp_util.adb, exp_util.ads, einfo.ads: Minor typo fixes and
11814 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11816 * exp_ch6.adb (Make_Build_In_Place_Call_In_Anonymous_Context): Add new
11817 variable Definite. Create a local object and pass its 'Access to the
11818 BIP function when the result type is either definite or it does not
11819 require any finalization or secondary stack management.
11821 2017-01-12 Bob Duff <duff@adacore.com>
11823 * contracts.adb, einfo.adb, errout.adb, exp_attr.adb,
11824 exp_ch3.adb, exp_ch7.adb, exp_ch9.adb, exp_prag.adb, freeze.adb,
11825 frontend.adb, ghost.adb, inline.adb, lib-writ.adb, lib-xref.adb,
11826 par.adb, par-ch10.adb, par-ch2.adb, par-prag.adb, par_sco.adb,
11827 sem_attr.adb, sem_aux.adb, sem_ch10.adb, sem_ch12.adb,
11828 sem_ch13.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
11829 sem_prag.adb, sem_res.adb, sem_util.adb, sem_util.ads,
11830 sem_warn.adb, sinfo.adb, sinfo.ads, sprint.adb (Pragma_Name):
11831 Change name to Pragma_Name_Unmapped.
11832 (Pragma_Name_Mapped): Change name to Pragma_Name.
11833 This is because the "mapped" version should be the usual case.
11835 2017-01-09 Hristian Kirtchev <kirtchev@adacore.com>
11837 * einfo.ads, einfo.adb: Remove uses of flags Has_Default_Init_Cond,
11838 Is_Default_Init_Cond_Procedure, and
11839 Has_Inherited_Default_Init_Cond. Add uses of flags
11840 Has_Own_DIC, Is_DIC_Procedure, and Has_Inherited_DIC.
11841 (Default_Init_Cond_Procedure): Removed.
11842 (DIC_Procedure): New routine.
11843 (Has_Default_Init_Cond): Removed.
11844 (Has_DIC): New routine.
11845 (Has_Inheritable_Invariants): The attribute applies to the base type.
11846 (Has_Inherited_Default_Init_Cond): Removed.
11847 (Has_Inherited_DIC): New routine.
11848 (Has_Inherited_Invariants): The attribute applies to the base type.
11849 (Has_Own_DIC): New routine.
11850 (Has_Own_Invariants): The attribute applies to the base type.
11851 (Is_Default_Init_Cond_Procedure): Removed.
11852 (Is_DIC_Procedure): New routine.
11853 (Set_Default_Init_Cond_Procedure): Removed.
11854 (Set_DIC_Procedure): New routine.
11855 (Set_Has_Default_Init_Cond): Removed.
11856 (Set_Has_Inheritable_Invariants): The attribute applies
11858 (Set_Has_Inherited_Default_Init_Cond): Removed.
11859 (Set_Has_Inherited_DIC): New routine.
11860 (Set_Has_Inherited_Invariants): The attribute applies to the base type.
11861 (Set_Has_Own_DIC): New routine.
11862 (Set_Has_Own_Invariants): The attribute applies to the base type.
11863 (Set_Is_Default_Init_Cond_Procedure): Removed.
11864 (Set_Is_DIC_Procedure): New routine.
11865 (Write_Entity_Flags): Update the output of all flags related to
11866 default initial condition.
11867 * exp_ch3.adb (Expand_N_Object_Declaration): Update the generation
11868 of the call to the DIC procedure.
11869 (Freeze_Type): Generate the body of the DIC procedure.
11870 * exp_ch7.adb (Build_Invariant_Procedure_Body): Replace
11871 all occurrences of Create_Append with Append_New_To. Do
11872 not generate an invariant procedure for a class-wide type.
11873 The generated body acts as a freeze action of the working type.
11874 (Build_Invariant_Procedure_Declaration): Do not generate an
11875 invariant procedure for a class-wide type.
11876 (Create_Append): Removed.
11877 * exp_util.adb: Add with and use clauses for Sem_Ch3, sem_ch6,
11878 sem_Ch12, Sem_Disp, and GNAT.HTable. Move the handling of
11879 class-wide pre/postcondition description and data structures from
11881 (Build_Class_Wide_Expression): Moved from Sem_Prag.
11882 (Build_DIC_Call): New routine.
11883 (Build_DIC_Procedure_Body): New routine.
11884 (Build_DIC_Procedure_Declaration): New routine.
11885 (Entity_Hash): Moved from Sem_Prag.
11886 (Find_DIC_Type): New routine.
11887 (Update_Primitives_Mapping): Reimplemented.
11888 (Update_Primitives_Mapping_Of_Types): New routine.
11889 * exp_util.ads (Build_Class_Wide_Expression): Moved from Sem_Prag.
11890 (Build_DIC_Call): New routine.
11891 (Build_DIC_Procedure_Body): New routine.
11892 (Build_DIC_Procedure_Declaration): New routine.
11893 (Update_Primitives_Mapping): Moved from Sem_Prag.
11894 (Update_Primitives_Mapping_Of_Types): New routine.
11895 * nlists.adb (Append_New): New routine.
11896 (Append_New_To): New routine.
11897 * nlists.ads (Append_New): New routine.
11898 (Append_New_To): New routine.
11899 * sem_ch3.adb (Analyze_Declarations): Do not generate the bodies
11900 of DIC procedures here. This is now done at the end of the
11901 visible declarations, private declarations, and at the freeze
11903 (Analyze_Private_Extension_Declaration):
11904 A private extension inherits the DIC pragma of a parent type.
11905 (Analyze_Subtype_Declaration): No need to propagate invariant
11906 attributes to a subtype as those apply to the base type.
11907 (Build_Derived_Record_Type): No need to inherit invariants here
11908 as this is now done in Build_Derived_Type.
11909 (Build_Derived_Type): Inherit both the DIC pragma and invariants from
11911 (Process_Full_View): Update the propagation of DIC attributes.
11912 (Propagate_Default_Init_Cond_Attributes): Removed.
11913 * sem_ch7.adb Add with and use clauses for Exp_Util.
11914 (Analyze_Package_Specification): Create the body of the DIC
11915 procedure at the end of the visible and private declarations.
11916 (Preserve_Full_Attributes): Propagate DIC attributes.
11917 * sem_ch9.adb (Analyze_Protected_Type_Declaration): Propagate
11919 (Analyze_Task_Type_Declaration): Propagate DIC attributes.
11920 * sem_elab.adb (Check_A_Call): Update the call to
11921 Is_Nontrivial_Default_Init_Cond_Procedure.
11922 * sem_prag.adb Remove the with and use clauses for
11923 GNAT.HTable. Move the handling of class- wide pre/postcondition
11924 description and data structures to Exp_Util.
11925 (Analyze_Pragma): Create the declaration of the DIC procedure. There
11926 is no need to propagate invariant-related attributes at this point
11927 as this is done in Build_Invariant_Procedure_Declaration.
11928 (Build_Class_Wide_Expression): Moved to Exp_Util.
11929 (Entity_Hash): Moved to Exp_Util.
11930 (Update_Primitives_Mapping): Moved to Exp_Util.
11931 * sem_prag.ads (Build_Class_Wide_Expression): Moved to Exp_Util.
11932 (Update_Primitives_Mapping): Moved to Exp_Util.
11933 * sem_util.adb: Remove with and use clauses for Ghost
11935 (Build_Default_Init_Cond_Call): Removed.
11936 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
11937 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
11938 (Get_Views): Reimplemented.
11939 (Has_Full_Default_Initialization): Reimplement the section on DIC.
11940 (Inherit_Default_Init_Cond_Procedure): Removed.
11941 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
11942 (Is_Nontrivial_DIC_Procedure): New routine.
11943 (Is_Verifiable_DIC_Pragma): New routine.
11944 (Propagate_DIC_Attributes): New routine.
11945 * sem_util.ads (Build_Default_Init_Cond_Call): Removed.
11946 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
11947 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
11948 (Inherit_Default_Init_Cond_Procedure): Removed.
11949 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
11950 (Is_Nontrivial_DIC_Procedure): New routine.
11951 (Is_Verifiable_DIC_Pragma): New routine.
11952 (Propagate_DIC_Attributes): New routine.
11953 * sem_warn.adb (Is_OK_Fully_Initialized): Reimplement the section
11955 * sinfo.ads, sinfo.adb: Add new attribute Expression_Copy along with
11957 (Expression_Copy): New routine along with pragma Inline.
11958 (Set_Expression_Copy): New routine along with pragma Inline.
11960 2017-01-06 Bob Duff <duff@adacore.com>
11962 * bindgen.adb (Gen_Adainit, Gen_Adafinal): Change
11963 "Bind_Main_Program" to "not Bind_For_Library", because otherwise
11964 we won't generate the call to s_stalib_adafinal when the main
11965 is not written in Ada.
11967 2017-01-06 Bob Duff <duff@adacore.com>
11969 * sem_prag.adb: Minor: remove pragma Warnings.
11971 2017-01-06 Tristan Gingold <gingold@adacore.com>
11973 * Makefile.rtl: Do not compile s-stchop by default.
11975 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
11977 * aspects.adb, aspects.ads, exp_ch3.adb, exp_ch9.adb, par-prag.adb,
11978 sem_ch13.adb, sem_prag.adb, sem_prag.ads, snames.adb-tmpl,
11979 snames.ads-tmpl, s-secsta.adb, s-secsta.ads, s-tarest.adb,
11980 s-tarest.ads, s-taskin.adb, s-taskin.ads, s-tassta.adb, s-tassta.ads:
11981 Reverted previous change for now.
11983 2017-01-06 Ed Schonberg <schonberg@adacore.com>
11985 * exp_ch3.adb (Build_Initialization_Call): Apply predicate
11986 check to default discriminant value if checks are enabled.
11987 (Build_Assignment): If type of component has static predicate,
11988 apply check to its default value, if any.
11990 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
11992 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
11993 * exp_ch3.adb (Build_Init_Statements): As part of initialising
11994 the value record of a task, set its _Secondary_Stack_Size field
11996 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
11997 a _Secondary_Stack_Size field in the value record of
11998 the task if a Secondary_Stack_Size rep item is present.
11999 (Make_Task_Create_Call): Include secondary stack size
12000 parameter. If No_Secondary_Stack restriction is in place, passes
12002 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
12003 Secondary_Stack_Size.
12004 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
12005 function to define the overhead of the secondary stack.
12006 * s-tarest.adb (Create_Restricted_Task,
12007 Create_Restricted_Task_Sequential): Functions now include
12008 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
12009 * s-tarest.adb (Create_Restricted_Task,
12010 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB
12011 now include Secondary_Stack_Size parameter.
12013 Secondary stack now allocated to the size specified by the
12014 Secondary_Stack_Size parameter in the task's ATCB.
12015 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialise_ATCB): New
12016 Secondary_Stack_Size component.
12017 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
12018 Create_Restricted_Task_Sequential): Function now include
12019 Secondary_Stack_Size parameter.
12020 (Task_Wrapper): Secondary stack
12021 now allocated to the size specified by the Secondary_Stack_Size
12022 parameter in the task's ATCB.
12023 * sem_ch13.adb (Analyze_Aspect_Specification): Add support
12024 for Secondary_Stack_Size aspect, turning the aspect into its
12025 corresponding internal attribute.
12026 (Analyze_Attribute_Definition):
12027 Process Secondary_Stack_Size attribute.
12028 * snames.adb-tmpl, snames.ads-tmpl: Added names
12029 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
12030 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
12032 2017-01-06 Pascal Obry <obry@adacore.com>
12034 * a-direio.adb, a-direio.ads, a-sequio.adb, a-sequio.ads: Add Flush to
12035 Sequential_IO and Direct_IO.
12037 2017-01-06 Bob Duff <duff@adacore.com>
12039 * snames.ads-tmpl (Renamed): New name for the pragma argument.
12040 * par-ch2.adb: Allow the new pragma (with analysis deferred
12042 * sinfo.ads, sinfo.adb (Map_Pragma_Name, Pragma_Name_Mapped):
12043 Keep a mapping from new pragma names to old names.
12044 * sem_prag.adb: Check legality of pragma Rename_Pragma, and
12045 implement it by calling Map_Pragma_Name.
12046 * checks.adb, contracts.adb, einfo.adb, errout.adb,
12047 * exp_attr.adb, exp_ch3.adb, exp_ch6.adb, exp_ch7.adb, exp_ch9.adb,
12048 * exp_prag.adb, exp_util.adb, freeze.adb, frontend.adb, ghost.adb,
12049 * inline.adb, lib-writ.adb, scans.adb, scans.ads, sem_attr.adb,
12050 * sem_aux.adb, sem_ch10.adb, sem_ch13.adb, sem_ch6.adb, sem_ch9.adb,
12051 * sem_elab.adb, sem_res.adb, sem_util.adb, sem_util.ads,
12052 * sem_warn.adb: Call Pragma_Name_Mapped instead of Pragma_Name
12055 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12057 * exp_ch9.adb: Minor reformatting.
12059 2017-01-06 Tristan Gingold <gingold@adacore.com>
12061 * exp_ch9.ads, exp_ch9.adb (Build_Entry_Names): Remove (unused).
12062 * rtsfind.ads (RE_Task_Entry_Names_Array, RO_ST_Set_Entry_Names)
12063 (RE_Protected_Entry_Names_Array, RO_PE_Set_Entry_Names): Remove
12065 * s-taskin.ads, s-taskin.adb (Set_Entry_Names,
12066 Task_Entry_Names_Array, Task_Entry_Names_Access): Remove.
12067 * s-tpoben.ads, s-tpoben.adb (Set_Entry_Names,
12068 Protected_Entry_Names_Array, Protected_Entry_Names_Access): Remove.
12070 2017-01-06 Bob Duff <duff@adacore.com>
12072 * sinfo.ads, sinfo.adb (Map_Pragma_Name): Preparation work,
12073 dummy implementation of Map_Pragma_Name.
12075 2017-01-06 Tristan Gingold <gingold@adacore.com>
12077 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Make the
12078 entry_body variable constant.
12079 * s-taprob.ads (Entry_Body_Access): Move to s-tposen.
12080 * s-tpoben.ads (Protected_Entry_Body_Access): Now access
12082 * s-tposen.ads (Entry_Body_Access): Moved from s-taprob,
12083 now access to constant.
12085 2017-01-06 Gary Dismukes <dismukes@adacore.com>
12087 * einfo.ads, sem_res.adb, sem_attr.adb, sem_ch6.adb: Minor
12088 reformatting and typo fixes.
12090 2017-01-06 Bob Duff <duff@adacore.com>
12092 * snames.ads-tmpl: New names for pragma renaming.
12093 * snames.adb-tmpl (Is_Configuration_Pragma_Name): Minor cleanup.
12094 * par-prag.adb: Add new pragma name to case statement.
12095 * sem_prag.adb (Rename_Pragma): Initial cut at semantic analysis
12097 * sinfo.ads, sinfo.adb (Pragma_Name_Mapped): Preparation work,
12098 Dummy implementation of Pragma_Name_Mapped.
12100 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12102 * exp_ch6.adb (Expand_Protected_Subprogram_Call): Add guard to
12103 better detect call within an entry_wrapper.
12104 * sem_res.adb (Resolve_Call): A protected call within an
12105 entity_wrapper is analyzed in the context of the protected
12106 object but corresponds to a pre-analysis and is not an access
12107 before elaboration.
12108 * sem_attr.adb: Minor reformatting.
12110 2017-01-06 Justin Squirek <squirek@adacore.com>
12112 * sem_attr.adb (Analyze_Attribute): Modify semantic checks for
12113 Finalization_Size to allow a prefix of any non-class-wide type.
12114 * sem_attr.ads Modify comment for Finalization_Size to include
12115 definite type use case.
12117 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12119 * einfo.ads, einfo.adb (Is_Entry_Wrapper): New flag, defined
12120 on procedures that are wrappers created for entries that have
12122 * sem_ch6.adb (Analyze_Subrogram_Body_Helper): If the subprogram
12123 body is an entry_wrapper, compile it in the context of the
12124 synchronized type, because a precondition may refer to funtions
12126 * exp_ch9.adb (Build_Contract_Wrapper): Set Is_Entry_Wrapper on
12128 * exp_ch6.adb (Expand_Protected_Subprogram_Call): if the call is
12129 within an Entry_Wrapper this is an external call whose target
12130 is the synchronized object that is the actual in the call to
12133 2017-01-06 Yannick Moy <moy@adacore.com>
12135 * sem_attr.adb (Analyze_Attribute/Attribute_Loop_Entry): Analyze node
12136 in tree, which means not analyzing the previous prefix if the node has
12137 been rewritten into its prefix.
12139 2017-01-06 Gary Dismukes <dismukes@adacore.com>
12141 * s-tpobop.adb: Minor reformatting.
12143 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12145 * checks.adb (Ensure_Valid): Do not generate a validity check
12146 within a generated predicate function, validity checks will have
12147 been applied earlier when required.
12149 2017-01-06 Tristan Gingold <gingold@adacore.com>
12151 * s-tpoben.ads (Protection_Entries): Add comment and reorder
12152 components for performances.
12153 * s-tpobop.adb (PO_Do_Or_Queue): Implement Max_Queue_Length runtime
12156 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12158 * sem_eval.adb (Check_Expression_Against_Static_Predicate):
12159 If expression is compile-time known and obeys a static predicate
12160 it must be labelled as static, to prevent spurious warnings and
12161 run-time errors, e.g. in case statements. This is relevant when
12162 the expression is the result of constant-folding a type conversion
12163 whose expression is a variable with a known static value.
12165 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12167 * exp_attr.adb, sem_attr.ads: Minor reformatting.
12169 2017-01-06 Justin Squirek <squirek@adacore.com>
12171 * exp_attr.adb (Expand_N_Attribute_Reference): Add entry for
12172 expansion of Finalization_Size attribute.
12173 * sem_attr.adb (Analyze_Attribute): Add entry to check the
12174 semantics of Finalization_Size.
12175 (Eval_Attribute): Add null entry for Finalization_Size.
12176 * sem_attr.ads: Add Finalization_Size to the implementation
12177 dependent attribute list.
12178 * snames.ads-tmpl: Add name entry for Finalization_Size attribute.
12180 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12182 * sem_ch5.adb (Analyze_Loop_Statement): If the loop includes an
12183 iterator specification with a serious syntactic error, transform
12184 construct into an infinite loop in order to continue analysis
12185 and prevent a compiler abort.
12187 2017-01-06 Tristan Gingold <gingold@adacore.com>
12189 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Do not generate
12190 max_queue_lengths_array if unused.
12192 2017-01-06 Bob Duff <duff@adacore.com>
12194 * errout.adb (Set_Msg_Text): Protect against out-of-bounds
12195 array access, in case "\" is at the end of Text.
12196 * stylesw.adb (Set_Style_Check_Options): Don't include input
12197 characters in the error message template, because they could
12198 be control characters such as "\", which Errout will try to
12201 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12203 * sem_ch4.adb (Find_Indexing_Operations, Inspect_Declarations):
12204 For a private type examine the visible declarations that follow
12205 the partial view, not just the private declarations that follow
12208 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12210 * exp_ch5.adb, sem_ch3.adb, checks.adb: Minor reformatting and
12213 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12215 * exp_ch5.adb (Get_Default_Iterator): For a derived type, the
12216 alias of the inherited op is the parent iterator, no need to
12217 examine dispatch table positions which might not be established
12218 yet if type is not frozen.
12219 * sem_disp.adb (Check_Controlling_Formals): The formal of a
12220 predicate function may be a subtype of a tagged type.
12221 * sem_ch3.adb (Complete_Private_Subtype): Adjust inheritance
12222 of representation items for the completion of a type extension
12223 where a predicate applies to the partial view.
12224 * checks.ads, checks.adb (Apply_Predicate_Check): Add optional
12225 parameter that designates function whose actual receives a
12226 predicate check, to improve warning message when the check will
12227 lead to infinite recursion.
12228 * sem_res.adb (Resolve_Actuals): Pass additional parameter to
12229 Apply_Predicate_Check.
12231 2017-01-06 Tristan Gingold <gingold@adacore.com>
12233 * s-rident.ads (Profile_Info): Remove No_Entry_Queue from
12234 Gnat_Extended_Ravenscar.
12235 * exp_ch9.adb, s-tpoben.adb, s-tpoben.ads: Fix spelling.
12237 2017-01-06 Gary Dismukes <dismukes@adacore.com>
12239 * sem_util.ads: Minor typo fix and reformatting.
12241 2017-01-06 Yannick Moy <moy@adacore.com>
12243 * ghost.adb Minor fixing of references to SPARK RM.
12244 (Check_Ghost_Context): Check whether reference is to a lvalue
12245 before issuing an error about violation of SPARK RM 6.9(13)
12246 when declaration has Ghost policy Check and reference has Ghost
12248 * sem_util.adb Minor indentation.
12249 * sem_ch10.adb (Analyze_Package_Body_Stub, Analyze_Protected_Body_Stub,
12250 Analyze_Task_Body_Stub): Set Ekind of the defining identifier.
12251 * sem_util.ads (Unique_Defining_Entity): Document the result
12252 for package body stubs.
12254 2017-01-06 Tristan Gingold <gingold@adacore.com>
12256 * raise-gcc.c (abort): Macro to call Abort_Propagation.
12257 * s-tpoben.ads (Protected_Entry_Queue_Max_Access): Make it access
12259 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
12260 Do not generate the Entry_Max_Queue_Lengths_Array if all default
12262 * exp_util.adb (Corresponding_Runtime_Package): Consider
12263 Max_Queue_Length pragma.
12265 2017-01-06 Justin Squirek <squirek@adacore.com>
12267 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
12268 Remove declaration generation in the case of
12269 System_Tasking_Protected_Objects_Single_Entry being used,
12270 and add a warning message when this is detected to occur.
12271 (Make_Initialize_Protection): Remove reference pass in the case
12272 of System_Tasking_Protected_Objects_Single_Entry.
12273 * rtsfind.ads: Remove RE_Protected_Entry_Queue_Max
12274 * s-tposen.adb (Initialize_Protection_Entry): Remove
12275 Entry_Queue_Max parameter.
12276 * s-tposen.ads: Remove the types use to store the entry queue
12278 * sem_prag.adb (Analyze_Pragma): Remove entry families restriction
12280 2017-01-06 Yannick Moy <moy@adacore.com>
12282 * sem_util.adb, sem_util.ads (Get_Enum_Lit_From_Pos): Strengthen
12283 behavior of function, to also accept out of range positions
12284 and raise Constraint_Error in such case, and to copy sloc from
12285 literal if No_Location passed as location.
12286 * uintp.adb, uintp.ads (UI_To_Int, UI_To_CC): Strengthen behavior
12287 of functions to raise Constraint_Error in case of value not in
12290 2017-01-06 Tristan Gingold <gingold@adacore.com>
12292 * sem_util.adb, s-taprop-linux.adb (Finalize_TCB): Remove call to
12293 Invalidate_Stack_Cache.
12295 2017-01-06 Eric Botcazou <ebotcazou@adacore.com>
12297 * s-os_lib.adb: Minor fix to the signature of Readlink.
12299 2017-01-06 Javier Miranda <miranda@adacore.com>
12301 * sem_ch6.adb (Conforming_Types): Handle another
12302 confusion between views in a nested instance with an actual
12303 private type whose full view is not in scope.
12305 2017-01-06 Arnaud Charlet <charlet@adacore.com>
12307 * exp_ch5.adb (Expand_N_If_Statement): Obey existing comment and
12308 mark a rewritten if statement as explicit (Comes_From_Source).
12310 2017-01-06 Gary Dismukes <dismukes@adacore.com>
12312 * sem_prag.adb, rtsfind.adb, sem_util.adb: Minor typo fixes.
12314 2017-01-06 Tristan Gingold <gingold@adacore.com>
12316 * ada.ads, a-unccon.ads: Add pragma No_Elaboration_Code_All.
12318 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12320 * sem_case.adb: Minor reformatting.
12322 2017-01-06 Thomas Quinot <quinot@adacore.com>
12324 * g-socthi-mingw.adb: Remove now extraneous USE TYPE clause
12326 2017-01-06 Justin Squirek <squirek@adacore.com>
12328 * aspects.adb: Register aspect in Canonical_Aspect.
12329 * aspects.ads: Associate qualities of Aspect_Max_Queue_Length
12330 into respective tables.
12331 * einfo.ads, einfo.adb: Add a new attribute for
12332 handling the parameters for Pragma_Max_Entry_Queue
12333 (Entry_Max_Queue_Lengths_Array) in E_Protected_Type. Subprograms
12334 for accessing and setting were added as well.
12335 * par-prag.adb (Prag): Register Pramga_Max_Entry_Queue.
12336 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Emit
12337 declaration for pramga arguments and store them in the protected
12339 (Make_Initialize_Protection): Pass a reference to
12340 the Entry_Max_Queue_Lengths_Array in the protected type node to
12342 * rtsfind.adb: Minor grammar fix.
12343 * rtsfind.ads: Register new types taken from the
12344 runtime libraries RE_Protected_Entry_Queue_Max and
12345 RE_Protected_Entry_Queue_Max_Array
12346 * s-tposen.adb, s-tpoben.adb
12347 (Initialize_Protection_Entry/Initialize_Protection_Entries):
12348 Add extra parameter and add assignment to local object.
12349 * s-tposen.ads, s-tpoben.ads: Add new types to
12350 store entry queue maximums and a field to the entry object record.
12351 * sem_ch13.adb (Analyze_Aspect_Specifications): Add case statement
12352 for Aspect_Max_Queue_Length.
12353 (Check_Aspect_At_Freeze_Point):
12354 Add aspect to list of aspects that don't require delayed analysis.
12355 * sem_prag.adb (Analyze_Pragma): Add case statement for
12356 Pragma_Max_Queue_Length, check semantics, and register arugments
12357 in the respective entry nodes.
12358 * sem_util.adb, sem_util.ads Add functions Get_Max_Queue_Length
12359 and Has_Max_Queue_Length
12360 * snames.ads-tmpl: Add constant for the new aspect-name
12361 Name_Max_Queue_Length and corrasponding pragma.
12363 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12365 * exp_util.adb (Is_Controlled_Function_Call):
12366 Reimplemented. Consider any node which has an entity as the
12367 function call may appear in various ways.
12369 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12371 * exp_attr.adb (Rewrite_Stream_Proc_Call): Use
12372 an unchecked type conversion when performing a view conversion
12373 to/from a private type. In all other cases use a regular type
12374 conversion to ensure that any relevant checks are properly
12377 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12379 * sem_prag.adb, sem_ch8.adb: Minor reformatting.
12381 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12383 * sem_case.adb (Explain_Non_Static_Bound): Suppress cascaded
12384 error on case expression that is an entity, when coverage is
12385 incomplete and entity has a static value obtained by local
12387 (Handle_Static_Predicate): New procedure, subsidiary of
12388 Check_Choices, to handle case alternatives that are either
12389 subtype names or subtype indications involving subtypes that
12390 have static predicates.
12392 2017-01-06 Thomas Quinot <quinot@adacore.com>
12394 * s-oscons-tmplt.c, g-socket.adb, g-socket.ads, g-sothco.ads:
12395 (GNAT.Socket): Add support for Busy_Polling and Generic_Option
12397 2017-01-06 Bob Duff <duff@adacore.com>
12399 * sem_elab.adb (Activate_Elaborate_All_Desirable): Don't add
12400 Elaborate_All(P) to P itself. That could happen in obscure cases,
12401 and always introduced a cycle (P body must be elaborated before
12403 * lib-writ.ads: Comment clarification.
12404 * ali-util.ads: Minor comment fix.
12405 * ali.adb: Minor reformatting.
12407 2017-01-06 Tristan Gingold <gingold@adacore.com>
12409 * a-exexpr-gcc.adb: Improve comment.
12411 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
12413 * s-linux-mips.ads: Use correct signal and errno constants.
12414 (sa_handler_pos, sa_mask_pos): Fix offsets for 64-bit MIPS.
12416 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
12418 * s-linux-mips.ads: Rename from s-linux-mipsel.ads.
12419 * gcc-interface/Makefile.in (MIPS/Linux): Merge mips and mipsel
12422 2017-01-01 Eric Botcazou <ebotcazou@adacore.com>
12424 * gnatvsn.ads: Bump copyright year.
12426 2017-01-01 Jakub Jelinek <jakub@redhat.com>
12428 * gnat_ugn.texi: Bump @copying's copyright year.
12429 * gnat_rm.texi: Likewise.
12431 Copyright (C) 2017 Free Software Foundation, Inc.
12433 Copying and distribution of this file, with or without modification,
12434 are permitted in any medium without royalty provided the copyright
12435 notice and this notice are preserved.