1 2017-12-14 Eric Botcazou <ebotcazou@adacore.com>
3 * gcc-interface/decl.c (gnat_to_gnu_field): Do not set the alignment
4 of the enclosing record type if it is not already set.
6 2017-12-14 Eric Botcazou <ebotcazou@adacore.com>
8 * gcc-interface/gigi.h (pad_type_has_rm_size): Declare.
9 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Do not build
10 a padding type for the alignment before validating the size.
11 Flip conditional construct and add a comment.
12 * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Size>: Make sure to
13 apply the exception for padded objects to the type of the object.
14 * gcc-interface/utils.c (hash_pad_type): New static function.
15 (lookup_and_insert_pad_type): Rename into...
16 (canonicalize_pad_type): ...this. Call hash_pad_type, do only one
17 lookup with insertion and always return the canonical type.
18 (maybe_pad_type): Adjust to above changes. Set debug type later.
19 (pad_type_has_rm_size): New predicate.
20 (set_reverse_storage_order_on_pad_type): Adjust to above changes.
22 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
24 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Initialize locus.
26 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
28 * gcc-interface/trans.c (process_freeze_entity): Be prepared for a
31 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
33 * gcc-interface/decl.c (gnat_to_gnu_entity): Robustify test for types
34 descendant of System.Address.
35 (gnat_to_gnu_subprog_type): Likewise.
37 2017-12-08 Jakub Jelinek <jakub@redhat.com>
39 * gcc-interface/utils.c (gnat_internal_attribute_table): Add
40 exclusions to the comment.
42 2017-12-07 Martin Sebor <msebor@redhat.com>
45 * gcc-interface/utils.c (gnat_internal_attribute_table): Initialize
46 new member of struct attribute_spec.
48 2017-12-06 Simon Wright <simon@pushface.org>
51 * bindgen.adb (Gen_AdaFinal): If the restriction No_Task_Termination is
52 set, generate a null body.
54 2017-12-05 Piotr Trojanek <trojanek@adacore.com>
56 * sem_util.adb (Contains_Refined_State): Remove.
58 2017-12-05 Ed Schonberg <schonberg@adacore.com>
60 * sem_ch13.adb (Analyze_Aspect_Specifications, case Predicate): A
61 predicate cannot apply to a formal type.
63 2017-12-05 Arnaud Charlet <charlet@adacore.com>
65 * exp_unst.ads: Fix typos.
67 2017-12-05 Jerome Lambourg <lambourg@adacore.com>
69 * libgnarl/s-taprop__qnx.adb: Better detect priority ceiling bug in
70 QNX. At startup, the first mutex created has a non-zero ceiling
71 priority whatever its actual policy. This makes some tests fail
72 (c940013 for example).
74 2017-12-05 Bob Duff <duff@adacore.com>
76 * exp_ch11.adb (Expand_N_Handled_Sequence_Of_Statements): Call
77 Expand_Cleanup_Actions for N_Extended_Return_Statement.
78 * exp_ch7.adb (Expand_Cleanup_Actions): Handle
79 N_Extended_Return_Statement by transforming the statements into a
80 block, and (indirectly) calling Expand_Cleanup_Actions on the block.
81 It's too hard for Expand_Cleanup_Actions to operate directly on the
82 N_Extended_Return_Statement, because it has a different structure than
83 the other node kinds that Expand_Cleanup_Actions.
84 * exp_util.adb (Requires_Cleanup_Actions): Add support for
85 N_Extended_Return_Statement. Change "when others => return False;" to
86 "when others => raise ...;" so it's clear what nodes this function
87 handles. Use named notation where appropriate.
88 * exp_util.ads: Mark incorrect comment with ???.
90 2017-12-05 Javier Miranda <miranda@adacore.com>
92 * exp_ch9.adb (Install_Private_Data_Declarations): Add missing
93 Debug_Info_Needed decoration of internally generated discriminal
96 2017-12-05 Arnaud Charlet <charlet@adacore.com>
98 * exp_unst.adb (Unnest_Subprogram): Add handling of 'Access on
101 2017-12-05 Sergey Rybin <rybin@adacore.com>
103 * doc/gnat_ugn/gnat_utility_programs.rst: Add description of '--ignore'
104 option for gnatmetric, gnatpp, gnat2xml, and gnattest.
106 2017-12-05 Piotr Trojanek <trojanek@adacore.com>
108 * sem_util.adb (Contains_Refined_State): Remove.
110 2017-12-05 Piotr Trojanek <trojanek@adacore.com>
112 * rtsfind.ads: Add new enumeration literals: RE_Clock_Time (for
113 Ada.Real_Time.Clock_Time) and RO_CA_Clock_Time (for
114 Ada.Calendar.Clock_Time).
116 2017-12-05 Ed Schonberg <schonberg@adacore.com>
118 * sem_ch4.adb (Is_Private_Overriding): If the candidate private
119 subprogram is overloaded, scan the list of homonyms in the same
120 scope, to find the inherited operation that may be overridden
122 * exp_ch11.adb, exp_ch7.adb: Minor reformatting.
124 2017-12-05 Bob Duff <duff@adacore.com>
126 * exp_ch6.adb (Expand_N_Extended_Return_Statement): If the
127 Init_Assignment is rewritten, we need to set Assignment_OK on the new
128 node. Otherwise, we will get spurious errors when initializing via
129 assignment statement.
131 2017-12-05 Hristian Kirtchev <kirtchev@adacore.com>
133 * sem_elab.adb: Update the terminology and switch sections.
134 (Check_SPARK_Model_In_Effect): New routine.
135 (Check_SPARK_Scenario): Verify the model in effect for SPARK.
136 (Process_Conditional_ABE_Call_SPARK): Verify the model in effect for
138 (Process_Conditional_ABE_Instantiation_SPARK): Verify the model in
140 (Process_Conditional_ABE_Variable_Assignment_SPARK): Verify the model
143 2017-12-05 Nicolas Setton <setton@adacore.com>
145 * terminals.c (__gnat_setup_child_communication): As documented,
146 __gnat_setup_child_communication should not terminate - it is intended
147 to be used as the child process of a call to fork(). However, execvp
148 might actually return in some cases, for instance when attempting to
149 run a 32-bit binary on a 64-bit Linux distribution when the
150 compatibility packages are not installed. In these cases, exit the
151 program to conform to the documentation.
153 2017-12-05 Olivier Hainque <hainque@adacore.com>
155 * libgnat/s-tsmona.adb: Fix for oversight in the tsmona interface
158 2017-12-05 Gary Dismukes <dismukes@adacore.com>
160 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst: Minor typo fix
162 * gnat_ugn.texi: Regenerate.
164 2017-12-05 Olivier Hainque <hainque@adacore.com>
166 * sem_util.adb (Set_Convention): Always clear Can_Use_Internal_Rep
167 on access to subprogram types with foreign convention.
169 2017-12-05 Yannick Moy <moy@adacore.com>
171 * doc/gnat_ugn/building_executable_programs_with_gnat.rst: Fix User's
172 Guide description of default settings of warnings.
174 2017-12-05 Olivier Hainque <hainque@adacore.com>
176 * s-dwalin.adb (Read_And_Execute_Isn): Adjust test checking for the end
177 of section. Add comments explaining the rationale of the computation.
179 2017-12-05 Bob Duff <duff@adacore.com>
181 * exp_ch11.adb: Minor refactoring.
183 2017-12-05 Hristian Kirtchev <kirtchev@adacore.com>
185 * debug.adb: Add debug switches d_a, d_e, and d_p, along with
187 (Set_Underscored_Debug_Flag): New routine.
188 * debug.ads: Add the flags for all underscore switches.
189 (Set_Underscored_Debug_Flag): New routine.
190 * einfo.adb: Flag303 is now Suppress_Elaboration_Warnings.
191 (Suppress_Elaboration_Warnings): New routine.
192 (Set_Suppress_Elaboration_Warnings): New routine.
193 (Write_Entity_Flags): Add output for Suppress_Elaboration_Warnings.
194 * einfo.ads: Add new flag Suppress_Elaboration_Warnings.
195 (Suppress_Elaboration_Warnings): New routine along with pragma Inline.
196 (Set_Suppress_Elaboration_Warnings): New routine along with pragma
198 * exp_ch3.adb (Build_Init_Procedure): Restore the behavior of the
199 legacy elaboration model.
200 (Default_Initialize_Object): Restore the behavior of the legacy
202 * exp_ch9.adb: Add with and use clause for Sem_Elab.
203 (Build_Task_Activation_Call): Restore the behavior of the legacy
205 * frontend.adb (Frontend): Restore the behavior of the legacy
207 * opt.ads: Add new flags Legacy_Elaboration_Checks and
208 Relaxed_Elaboration_Checks, along with documentation.
209 * sem_attr.adb (Analyze_Access_Attribute): Restore the behavior of the
210 legacy elaboration model.
211 * sem_ch5.adb (Analyze_Assignment): Restore the behavior of the legacy
213 * sem_ch7.adb (Analyze_Package_Declaration): Restore the behavior of
214 the legacy elaboration model.
215 * sem_ch8.adb (Attribute_Renaming): Restore the behavior of the legacy
217 * sem_ch12.adb (Analyze_Instance_And_Renamings): Restore the behavior
218 of the legacy elaboration model.
219 (Analyze_Package_Instantiation): Restore the behavior of the legacy
221 (Analyze_Subprogram_Instantiation): Restore the behavior of the legacy
223 * sem_elab.adb: Update the documentation of the Processing phase.
224 Update the documentation on elaboration-related compilation
225 switches. Update the documentation on adding a new target. Add
226 Processing_Attributes which represent the state of the Processing
227 phase. Resurrect the previous elaboration model as "legacy elaboration
229 (Build_Call_Marker): This routine does not function when the legacy
230 elaboration model is in effect. Do not consider entry calls and requeue
231 statements when debug flag d_e is in effect. Do not consider calls to
232 subprograms which verify the runtime semantics of certain assertion
233 pragmas when debug flag d_p is in effect.
234 (Build_Variable_Reference_Marker): This routine does not function when
235 the legacy elaboration model is in effect.
236 (Check_Elaboration_Scenarios): This routine does not function when the
237 legacy elaboration model is in effect.
238 (Ensure_Prior_Elaboration): The various flags have now been replaced
239 with a state. Do not generate implicit Elaborate[_All] pragmas when
240 their creation has been suppressed.
241 (Ensure_Prior_Elaboration_Static): The with clause is marked based on
242 the requested pragma, not on the nature of the scenario.
243 (In_External_Context): Removed.
244 (Is_Assertion_Pragma_Target): New routine.
245 (Is_Potential_Scenario): Stop the traversal of a task body when
246 reaching an accept or select statement, and debug switch d_a is in
248 (Kill_Elaboration_Scenario): This routine does not function when the
249 legacy elaboration model is in effect.
250 (Process_Activation_Generic): The various flags have now been replaced
252 (Process_Conditional_ABE): The various flags have now been replaced
254 (Process_Conditional_ABE_Access): The various flags have now been
255 replaced with a state.
256 (Process_Conditional_ABE_Activation_Impl): The various flags have now
257 been replaced with a state. Do not process an activation call which
258 activates a task whose type is defined in an external instance, and
259 debug switch dL is in effect. Suppress the generation of implicit
260 Elaborate[_All] pragmas once a conditional ABE check has been
262 (Process_Conditional_ABE_Call): The various flags have now been
263 replaced with a state. Do not process a call which invokes a subprogram
264 defined in an external instance, and debug switch dL is in effect.
265 (Process_Conditional_ABE_Call_Ada): The various flags have now been
266 replaced with a state. Suppress the generation of implicit
267 Elaborate[_All] pragmas once a conditional ABE check has been
269 (Process_Conditional_ABE_Call_SPARK): The various flags have now been
270 replaced with a state.
271 (Process_Conditional_ABE_Instantiation): The various flags have now
272 been replaced with a state.
273 (Process_Conditional_ABE_Instantiation_Ada): The various flags have now
274 been replaced with a state. Suppress the generation of implicit
275 Elaborate[_All] pragmas once a conditional ABE check has been
277 (Process_Conditional_ABE_Instantiation_SPARK): The various flags have
278 now been replaced with a state.
279 (Process_Guaranteed_ABE_Activation_Impl): The various flags have now
280 been replaced with a state.
281 (Process_Single_Activation): The various flags have now been replaced
283 (Record_Elaboration_Scenario): This routine does not function when the
284 legacy elaboration model is in effect.
285 (Traverse_Body): The various flags have now been replaced with a state.
286 * sem_elab.ads: Resurrect the pre-18.x elaboration model as "legacy
288 * sem_prag.adb (Analyze_Pragma): Restore the behavior of the legacy
290 * sem_res.adb (Resolve_Call): Restore the behavior of the legacy
292 (Resolve_Entity_Name): Restore the behavior of the legacy elaboration
294 * sem_util.adb (Mark_Elaboration_Attributes): This routine does not
295 function when the legacy elaboration model is in effect.
296 * sinfo.adb (Is_Known_Guaranteed_ABE): Update the assertion check.
297 (No_Elaboration_Check): New routine.
298 (Set_Is_Known_Guaranteed_ABE): Update the assertion check.
299 (Set_No_Elaboration_Check): New routine.
300 * sinfo.ads: Update the documentation of flag Is_Known_Guaranteed_ABE
301 along with occurrences in nodes. Add new flag No_Elaboration_Check
302 along with occurrences in nodes.
303 * switch-c.adb (Scan_Front_End_Switches): Add processing for debug
304 switches with underscores. Add processing for switches -gnatH and
306 * usage.adb (Usage): Add output for switches -gnatH and -gnatJ.
307 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst: Update the
308 documentation to include the legacy and relaxed elaboration models.
309 * gnat_ugn.texi:Â Regenerate.
311 2017-12-05 Arnaud Charlet <charlet@adacore.com>
313 * doc/gnat_ugn/platform_specific_information.rst: Minor edit.
314 Improve doc on required packages for linux 32bits.
316 2017-12-05 Doug Rupp <rupp@adacore.com>
318 * tracebak.c (ppc64-vx7): USE_GCC_UNWINDER for 64bit.
320 2017-12-05 Javier Miranda <miranda@adacore.com>
322 * checks.adb (Generate_Range_Check): Force evaluation of the node in
323 more cases. This patch was written to improve the code generated by
324 the CCG compiler but it is enabled for all targets since double
325 evaluation is always a potential source of inefficiency.
327 2017-12-05 Gary Dismukes <dismukes@adacore.com>
329 * doc/gnat_ugn/gnat_utility_programs.rst: Remove reference to obsolete
332 2017-12-05 Eric Botcazou <ebotcazou@adacore.com>
334 * exp_ch5.adb (Expand_Iterator_Loop_Over_Array): Use the SLOC of the
335 iteration scheme throughout, except for the new loop statement(s).
337 2017-12-05 Ed Schonberg <schonberg@adacore.com>
339 * exp_aggr.adb (Gen_Assign): Do not analyze the expressionn of the
340 assignment if it is part of an Iterated_Component_Association: the
341 analysis needs to take place once the loop structure is analyzed and
342 the loop parameter made visible, because references to it typically
343 appear in the corresponding expression. This is necessary if the
344 expression is an aggregate, because previous pre-analysis of the
345 expression does not handle nested aggregates properly.
347 2017-12-05 Bob Duff <duff@adacore.com>
349 * sem_res.adb (Resolve_Allocator): Avoid coextension processing for an
350 allocator that is the expansion of a build-in-place function call.
352 2017-12-05 Olivier Hainque <hainque@adacore.com>
355 * s-trasym__dwarf.adb (spec of Module_Name.Get): Instead of
356 possibly adjusting the lookup address by a load address, expect
357 a extra argument through which the load address can be conveyed
359 (Multi_Module_Symbolic_Traceback): Adjust accordingly. Pass the
360 retrieved load address to Init_Module.
361 * s-tsmona__linux.adb (Get): Honor the new interface.
362 * s-tsmona__mingw.adb (Get): Likewise.
363 * s-dwalin.ads: Adjust comments to be explicit about which
364 addresses are from module info and which are run-time addresses,
365 offsetted by the module load address.
366 * s-dwalin.adb (Set_Load_Address): Simply set C.Load_Slide.
367 Do not alter the module Low and High (relative) addresses.
368 (Is_Inside): Improve documentation regarding the kinds of addresses
369 at hand and correct the test.
370 (Symbolic_Traceback): Use separate variables with explicit names
371 for the address in traceback (run-time value) and the address to
372 lookup within the shared object (module-relative). Adjust the
373 computation of address passed to Symbolic_Address for symbolization.
375 2017-12-05 Arnaud Charlet <charlet@adacore.com>
377 * opt.ads (Expand_Nonbinary_Modular_Ops): New flag.
378 * exp_ch4.adb (Expand_Nonbinary_Modular_Op): Use
379 Expand_Nonbinary_Modular_Ops instead of Modify_Tree_For_C, so that
380 other back-ends can also benefit from the front-end expansion. Remove
381 test for Modify_Tree_For_C in all callers to better share code.
382 * gnat1drv.adb (Adjust_Global_Switches): Set
383 Expand_Nonbinary_Modular_Ops when generating C code.
385 2017-12-05 Ed Schonberg <schonberg@adacore.com>
387 * exp_ch5.adb (Expand_Formal_Container_Loop): Ensure that the loop
388 parameter becomes invisible after analyzing the loop, which has been
389 rewritten as a while-loop.
391 2017-12-05 Doug Rupp <rupp@adacore.com>
393 * vxaddr2line.adb: Revise and enhance for new ports, remove dead ports,
394 and update for 64bit ports.
396 2017-12-05 Bob Duff <duff@adacore.com>
398 * exp_ch6.adb (Build_In_Place_Formal): Search for the formal by suffix
399 instead of the full name.
400 * sem_ch6.adb (Create_Extra_Formals): Make sure there are extra formals
401 in the case of an instance of a generic.
403 2017-12-05 Arnaud Charlet <charlet@adacore.com>
405 (Adjust_Global_Switches): Create an alias GNAT_Annotate to map to
408 2017-12-05 Sebastian Huber <sebastian.huber@embedded-brains.de>
410 * gcc-interface/Makefile.in (RTEMS): Define EH_MECHANISM.
412 2017-12-04 Sebastian Huber <sebastian.huber@embedded-brains.de>
414 * gcc-interface/Makefile.in (RTEMS): Use s-osprim__rtems.adb.
415 * libgnat/s-osprim__rtems.adb: New file.
416 * libgnarl/s-osinte__rtems.adb (pthread_cond_t): Fix alignment.
417 (pthread_mutexattr_t): Likewise.
418 (pthread_rwlockattr_t): Likewise.
419 (pthread_rwlock_t): Likewise.
420 (time_t): Use 64-bit integer.
422 2017-12-01 Sebastian Huber <sebastian.huber@embedded-brains.de>
424 * libgnarl/s-osinte__rtems.ads (pthread_cond_t): Use correct size and
426 (pthread_mutex_t): Likewise.
427 (pthread_rwlock_t): Likewise.
429 2017-11-28 Jakub Jelinek <jakub@redhat.com>
431 * gcc-interface/trans.c (Case_Statement_to_gnu): Build SWITCH_EXPR
432 using build2 instead of build3.
434 2017-11-23 Eric Botcazou <ebotcazou@adacore.com>
437 * gcc-interface/decl.c (gnat_to_gnu_entity): Do not build a variant
438 type for the implementation type of a packed array.
440 2017-11-23 Mike Stump <mikestump@comcast.net>
441 Eric Botcazou <ebotcazou@adacore.com>
443 * gcc-interface/trans.c (gnat_gimplify_stmt) <LOOP_STMT>: Pass 3rd
444 operand to ANNOTATE_EXPR and also pass unrolling hints.
446 2017-11-20 Eric Botcazou <ebotcazou@adacore.com>
449 * gnatlink.adb (Process_Args): Accept multiple switches for --LINK.
451 * gcc-interface/Makefile.in (GCC_LINK): Remove $(ADA_INCLUDES).
452 (common-tools): Pass $(CC) as --GCC= and $(GCC_LINK) as --LINK= in
453 the invocations of $(GNATLINK).
454 (../../gnatdll$(exeext)): Likewise.
455 (../../vxaddr2line$(exeext)): Likewise.
456 (gnatmake-re): Likewise.
457 (gnatlink-re): Likewise.
459 2017-11-16 Doug Rupp <rupp@adacore.com>
461 * gcc-interface/Makefile.in: Merge Aarch64 and ARM "ifeq" blocks.
463 2017-11-16 Steve Baird <baird@adacore.com>
465 * debug.adb: Update another comment to indicate gnat2scil's use of the
468 2017-11-16 Bob Duff <duff@adacore.com>
470 * exp_ch6.adb (Expand_Call_Helper): Avoid creating a transient scope in
471 the case of nested build-in-place calls.
473 2017-11-16 Joel Brobecker <brobecker@adacore.com>
475 * doc/gnat_ugn/gnat_utility_programs.rst: Document the switches
476 available in gnatsymbolize.
478 2017-11-16 Steve Baird <baird@adacore.com>
480 * debug.adb: Update comment to indicate gnat2scil's use of the -gnatd.7
483 2017-11-16 Gary Dismukes <dismukes@adacore.com>
485 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst, sem_ch6.adb,
486 sem_elab.adb: Minor editorial corrections.
487 * gnat_ugn.texi: Regenerate.
489 2017-11-16 Joel Brobecker <brobecker@adacore.com>
491 * doc/gnat_ugn/gnat_utility_programs.rst (GNAT UGN): Add
492 gnatsymbolize documentation.
493 * gnat_ugn.texi: Regenerate.
495 2017-11-16 Steve Baird <baird@adacore.com>
497 * sem_ch3.adb (Build_Derived_Record_Type): Replace all uses of
498 "Scope (Parent_Type)" with "Scope (Parent_Base)".
500 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
502 * opt.ads: Elaboration warnings are now on by default. Add a comment
503 explaining why this is needed.
504 * sem_ch9.adb (Analyze_Requeue): Preserve the status of elaboration
506 * sem_ch12.adb (Analyze_Package_Instantiation): Preserve the status of
507 elaboration warnings.
508 (Analyze_Subprogram_Instantiation): Preserve the status of elaboration
510 * sem_elab.adb: Update the structure of Call_Attributes and
511 Instantiation_Attributes.
512 (Build_Call_Marker): Propagate the status of elaboration warnings from
513 the call to the marker.
514 (Extract_Call_Attributes): Extract the status of elaboration warnings.
515 (Extract_Instantiation_Attributes): Extract the status of elaboration
517 (Process_Conditional_ABE_Activation_Impl): Elaboration diagnostics are
518 now dependent on the status of elaboration warnings.
519 (Process_Conditional_ABE_Call_Ada): Elaboration diagnostics are now
520 dependent on the status of elaboration warnings.
521 (Process_Conditional_ABE_Instantiation_Ada): Elaboration diagnostics
522 are now dependent on the status of elaboration warnings.
523 (Process_Guaranteed_ABE_Activation_Impl): Remove pragma Unreferenced
524 for formal Call_Attrs. Elaboration diagnostics are now dependent on the
525 status of elaboration warnings.
526 (Process_Guaranteed_ABE_Call): Elaboration diagnostics are now
527 dependent on the status of elaboration warnings.
528 (Process_Guaranteed_ABE_Instantiation): Elaboration diagnostics are now
529 dependent on the status of elaboration warnings.
530 * sem_prag.adb (Analyze_Pragma): Remove the unjustified warning
531 concerning pragma Elaborate.
532 * sem_res.adb (Resolve_Call): Preserve the status of elaboration
534 (Resolve_Entry_Call): Propagate flag Is_Elaboration_Warnings_OK_Node
535 from the procedure call to the entry call.
536 * sem_util.adb (Mark_Elaboration_Attributes): Add formal parameter
538 (Mark_Elaboration_Attributes_Node): Preserve the status of elaboration
540 * sem_util.ads (Mark_Elaboration_Attributes): Add formal parameter
541 Warnings. Update the comment on usage.
542 * sinfo.adb (Is_Dispatching_Call): Update to use Flag6.
543 (Is_Elaboration_Warnings_OK_Node): New routine.
544 (Set_Is_Dispatching_Call): Update to use Flag6.
545 (Set_Is_Elaboration_Warnings_OK_Node): New routine.
546 * sinfo.ads: Attribute Is_Dispatching_Call now uses Flag6. Add new
547 attribute Is_Elaboration_Warnings_OK_Node along with occurrences
549 (Is_Elaboration_Warnings_OK_Node): New routine along with pragma
551 (Set_Is_Elaboration_Warnings_OK_Node): New routine along with pragma
553 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst: Update various
554 sections to indicate how to suppress elaboration warnings. Document
555 switches -gnatwl and -gnatwL.
556 * gnat_ugn.texi: Regenerate.
558 2017-11-16 Sylvain Dailler <dailler@adacore.com>
560 * sem_util.adb (Get_Enum_Lit_From_Pos): Add a condition for Pos
563 2017-11-16 Bob Duff <duff@adacore.com>
565 * sem_ch13.adb (Check_Expr_Constants): Avoid error message in case of
568 2017-11-16 Yannick Moy <moy@adacore.com>
570 * sem_elab.adb (Include): Fix mode of parameter Curr to out.
572 2017-11-16 Piotr Trojanek <trojanek@adacore.com>
574 * sem_util.ads, sem_util.adb (Is_CCT_Instance): Allow calls where
575 Context_Id denotes a record type.
577 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
579 * sem_ch8.adb (Check_SPARK_Primitive_Operation): Enable the check in
582 2017-11-16 Doug Rupp <rupp@adacore.com>
584 Initial gnat port to aarch64-wrs-vxworks7
585 * libgnarl/s-vxwork__aarch64.ads,
586 libgnat/system-vxworks7-aarch64-rtp-smp.ads,
587 libgnat/system-vxworks7-aarch64.ads: New files
588 * sigtramp-vxworks-target.inc (aarch64): New section.
589 * tracebak.c (USE_ARM_UNWINDING): Disable for ARMARCH8A.
591 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
593 * sem_elab.adb (Include): Including a node which is also a compilation
594 unit terminates the search because there are no more lists to examine.
596 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
598 * sem_ch8.adb (Analyze_Subprogram_Renaming): Ensure that a renaming
599 declaration does not define a primitive operation of a tagged type for
601 (Check_SPARK_Primitive_Operation): New routine.
603 2017-11-16 Arnaud Charlet <charlet@adacore.com>
605 * libgnat/a-elchha.adb (Last_Chance_Handler): Display Argv (0) in
606 message when using -E binder switch.
608 2017-11-16 Piotr Trojanek <trojanek@adacore.com>
610 * errout.ads: Fix minor typo in comment.
612 2017-11-16 Ed Schonberg <schonberg@adacore.com>
614 * sem_ch3.adb (Process_Subtype): If the subtype indication does not
615 syntactically denote a type, return Any_Type to prevent subsequent
616 compiler crashes or infinite loops.
618 2017-11-16 Steve Baird <baird@adacore.com>
620 * lib-writ.adb: Fix bug which causes Program_Error to be raised in some
621 cases when writing out a .ali file when a Rename_Pragma pragma is in
623 * lib-writ.adb (Write_Unit_Information): Replace call to
624 Pragma_Name_Unmapped with call to Pragma_Name.
626 2017-11-16 Gary Dismukes <dismukes@adacore.com>
628 * sem_elab.adb: Minor typo fixes.
630 2017-11-16 Justin Squirek <squirek@adacore.com>
632 * sem_res.adb (Resolve_Allocator): Correct warning messages and make
635 2017-11-16 Hristian Kirtchev <kirtchev@adacore.com>
637 * atree.ads (Nkind_In): Add 10 and 11 parameter versions.
638 * checks.adb (Install_Primitive_Elaboration_Check): Mark the setting of
639 the elaboration flag as elaboration code.
640 * einfo.adb (Contract): Update the comments.
641 (Ignore_SPARK_Mode_Pragmas): Update the comments.
642 (SPARK_Aux_Pragma): Update the comments.
643 (SPARK_Aux_Pragma_Inherited): Update the comments.
644 (SPARK_Pragma): Update the comments. The attribute now applies
645 to all types and abstract states.
646 (SPARK_Pragma_Inherited): Update the comments. The attribute now
647 applies to all types and abstract states.
648 (Set_Contract): Update the comments.
649 (Set_Ignore_SPARK_Mode_Pragmas): Update the comments.
650 (Set_SPARK_Aux_Pragma): Update the comments.
651 (Set_SPARK_Aux_Pragma_Inherited): Update the comments.
652 (Set_SPARK_Pragma): Update the comments. The attribute now applies to
653 all types and abstract states.
654 (Set_SPARK_Pragma_Inherited): Update the comments. The attribute now
655 applies to all types and abstract states.
656 (Write_Field40_Name): Add output for SPARK_Pragma when it appears on a
657 type and abstract states.
658 * einfo.ads: Update the documentation of attributes SPARK_Pragma and
659 SPARK_Pragma_Inherited. Both of them now apply to all types and
661 * exp_util.adb (Set_Elaboration_Flag): Mark the setting of the
662 elaboration flag as elaboration code.
663 * sem_ch3.adb: Add with and use clauses for Sem_Elab.
664 (Analyze_Full_Type_Declaration): Set the SPARK_Mode of the type. Record
665 a derived type for later processing by the ABE mechanism.
666 (Analyze_Incomplete_Type_Decl): Set the SPARK_Mode of the type.
667 (Analyze_Private_Extension_Declaration): Set the SPARK_Mode of the
669 * sem_ch7.adb (Analyze_Private_Type_Declaration): Set the SPARK_Mode of
671 * sem_elab.adb: Define the term "early call region". Update the
672 terminology for "scenario" and "target". Update the architecture of
673 the ABE mechanism. Update the steps which must be taken when adding a
674 new scenario. Update the section on debugging ABE issues. Add new
675 hash tables Early_Call_Regions and Recorded_SPARK_Scenarios. Add new
676 table SPARK_Scenarios. Hash table Elaboration_Context is now
677 Elaboration_Statuses. The majority of Process_xxx routines have been
678 updated to better reflect their role.
679 (Add_Unit): Reimplemented.
680 (Check_Elaboration_Constituent): New routine.
681 (Check_Elaboration_Scenarios): Verify previously recorded scenarios for
682 conditional ABE issues. Verify previously recorded SPARK scenarios.
683 (Check_SPARK_Derived_Type): New routine.
684 (Check_SPARK_Instantiation): New routine.
685 (Check_SPARK_Scenario): New routine.
686 (Check_SPARK_Refined_State_Pragma): New routine.
687 (Early_Call_Region): New routine.
688 (Elaboration_Status): New routine.
689 (Ensure_Prior_Elaboration): Add new formal parameter Prag_Nam. The
690 implicit Elabotate[_All] pragma is now specified via Prag_Nam.
691 (Find_Early_Call_Region): New routine.
692 (Info_Scenario): Add output for refinement constituents.
693 (Is_Recorded_SPARK_Scenario): New routine.
694 (Is_Suitable_SPARK_Derived_Type): New routine.
695 (Is_Suitable_SPARK_Instantiation): New routine.
696 (Is_Suitable_SPARK_Refined_State_Pragma): New routine.
697 (Is_Visited_Body): New routine.
698 (Kill_Elaboration_Scenario): Reimplemented.
699 (Output_Active_Scenarios): Add output for pragma Refined_State.
700 (Output_SPARK_Refined_State_Pragma): New routine.
701 (Process_Conditional_ABE_Call): Remove the use of -gnatd.v. The effect
702 is now achieved by different means.
703 (Process_Conditional_ABE_Call_SPARK): Verify that a call which precedes
704 the subprogram body appears within the early call region of the body.
705 Either ensure the prior elaboration of external subprograms or verify
706 that the context meets the suitable elaboration requirement.
707 (Process_Conditional_ABE_Instantiation_SPARK): New routine.
708 (Record_Elaboration_Scenario): Reimplement the portion which enforces
709 the level restrictions of the static model. Add support for SPARK
711 (Record_SPARK_Elaboration_Scenario): New routine.
712 (Reset_Visited_Bodies): New routine.
713 (Set_Early_Call_Region): New routine.
714 (Set_Elaboration_Status): New routine.
715 (Set_Is_Recorded_SPARK_Scenario): New routine.
716 (Update_Elaboration_Scenario): Reimplemented.
717 * sem_elab.ads: Add new subtype Library_Or_Instantiation_Level.
718 * sem_prag.adb (Analyze_Refined_State_In_Decl_Part): Save the pragma
719 for examination by the ABE Processing phase.
720 (Create_Abstract_State): Save the SPARK_Mode from the context.
721 * sem_util.adb (Is_Non_Preelaborable_Construct): New routine.
722 * sem_util.ads (Is_Non_Preelaborable_Construct): New routine.
723 * sinfo.adb (Is_Elaboration_Code): New routine.
724 (Set_Is_Elaboration_Code): New routine.
725 (Nkind_In): Add 10 and 11 parameter versions.
726 * sinfo.ads: Add new attribute Is_Elaboration_Code along with
727 occurrences in nodes.
728 (Is_Elaboration_Code): New routine along with pragma Inline.
729 (Set_Is_Elaboration_Code): New routine along with pragma Inline.
730 (Nkind_In): Add 10 and 11 parameter versions.
732 2017-11-16 Justin Squirek <squirek@adacore.com>
734 * sem.adb (Analyze): Remove requirement that the original node of N be
735 an operator in the case that analysis on the node yields the relevant
736 operator - so prefer it instead.
738 2017-11-16 Bob Duff <duff@adacore.com>
740 * sem_ch6.adb (Create_Extra_Formals): The type of the BIP_Object_Access
741 formal must not have a designated type that is the full view coming
742 from a limited-with'ed package.
743 * sem_util.adb,sem_util.ads (Incomplete_View_From_Limited_With): New
744 function called from sem_ch6.
745 * sem_ch5.adb (Analyze_Assignment): Treat user-defined concatenation
746 specially for b-i-p cases.
748 2017-11-10 Martin Sebor <msebor@redhat.com>
751 * adadecode.c (__gnat_decode): Use memcpy instead of strncpy.
752 * argv.c (__gnat_fill_arg, __gnat_fill_env): Likewise.
754 2017-11-10 Eric Botcazou <ebotcazou@adacore.com>
756 * gcc-interface/utils.c (convert) <RECORD_TYPE>: Add comment and do
757 not fall through to the next case.
758 <ARRAY_TYPE>: Deal specially with a dereference from another array
759 type with the same element type.
761 2017-11-09 Gary Dismukes <dismukes@adacore.com>
763 * exp_util.adb, freeze.adb: Minor reformatting.
765 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
767 * gcc-interface/Makefile.in: Add rules to build aarch64-qnx runtimes.
769 2017-11-09 Hristian Kirtchev <kirtchev@adacore.com>
771 * gcc-interface/trans.c (gnat_to_gnu): Add processing for
772 N_Variable_Reference_Marker nodes.
774 2017-11-09 Ed Schonberg <schonberg@adacore.com>
776 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Handle properly
777 the pragma Compile_Time_Error when it appears in a generic package
778 declaration and uses an expanded name to denote the current unit.
780 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
782 * libgnarl/s-taprop__qnx.adb: Fix incorrect casing for pthread_self.
783 * tracebak.c: Add support for tracebacks in QNX.
785 2017-11-09 Eric Botcazou <ebotcazou@adacore.com>
787 * exp_aggr.adb (Aggr_Size_OK): Bump base limit from 50000 to 500000.
789 2017-11-09 Yannick Moy <moy@adacore.com>
791 * erroutc.adb, set_targ.adb: Remove pragma Annotate for CodePeer
794 2017-11-09 Joel Brobecker <brobecker@adacore.com>
796 * doc/gnat_ugn/platform_specific_information.rst: Document packages
797 needed on GNU/Linux by GNAT.
798 * gnat_ugn.texi: Regenerate.
800 2017-11-09 Hristian Kirtchev <kirtchev@adacore.com>
802 * contracts.adb (Analyze_Contracts): Remove the three parameter
803 version. This routine now only analyzes contracts and does not perform
804 any freezing actions.
805 (Analyze_Previous_Contracts): Removed.
806 (Freeze_Previous_Contracts): New routine.
807 * contracts.ads (Analyze_Previous_Contracts): Removed.
808 (Freeze_Previous_Contracts): New routine.
809 * sem_ch3.adb (Analyze_Declarations): Analyze the contract of an
810 enclosing package spec regardless of whether the list denotes the
811 visible or private declarations. Fix the removal of partial state
812 refinements when the context is a package spec.
813 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): Freeze previous
815 * sem_ch7.adb (Analyze_Package_Body_Helper): Freeze previous contracts.
816 * sem_ch9.adb (Analyze_Entry_Body): Freeze previous contracts.
817 (Analyze_Protected_Body): Freeze previous contracts.
818 (Analyze_Task_Body): Freeze previous contracts.
819 * sem_prag.adb: Comment reformatting.
821 2017-11-09 Bob Duff <duff@adacore.com>
823 * libgnarl/g-thread.ads, libgnarl/g-thread.adb: (Make_Independent):
824 Export this so users can use it without importing
825 System.Tasking.Utilities.
826 * libgnarl/s-tassta.adb (Vulnerable_Complete_Task): Relax assertion
827 that fails when Make_Independent is called on a user task.
828 * libgnarl/s-taskin.ads (Master_Of_Task): Avoid unusual
829 capitalization style ((style) bad casing of "Master_of_Task").
831 2017-11-09 Ed Schonberg <schonberg@adacore.com>
833 * sem_ch12.adb (Analyze_Subprogram_Instantiation): Correct use of
834 uninitialized variable uncovered by Codepeer.
836 2017-11-09 Arnaud Charlet <charlet@adacore.com>
838 * namet.adb: Replace pragma Assume by pragma Assert to fix bootstrap.
840 2017-11-09 Javier Miranda <miranda@adacore.com>
842 * doc/gnat_rm/standard_and_implementation_defined_restrictions.rst:
843 (Static_Dispatch_Tables): Minor rewording.
844 * gnat_rm.texi: Regenerate.
846 2017-11-09 Justin Squirek <squirek@adacore.com>
848 * sem_ch8.adb (Analyze_Use_Package): Remove forced installation of
849 use_clauses within instances.
850 (Use_One_Package): Add condition to check for "hidden" open scopes to
851 avoid skipping over packages that have not been properly installed even
852 though they are visible.
854 2017-11-09 Ed Schonberg <schonberg@adacore.com>
856 * sem_ch4.adb (Analyze_Selected_Component): Reject properly a call to a
857 private operation of a protected type, when the type has no visible
860 2017-11-09 Javier Miranda <miranda@adacore.com>
862 * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_HT_Link.
863 * exp_disp.adb (Make_DT): Initialize the HT_Link field of the TSD only
866 2017-11-09 Bob Duff <duff@adacore.com>
868 * exp_ch4.adb, exp_ch9.adb, exp_prag.adb, par-ch3.adb, sem_aggr.adb,
869 sem_ch12.adb, sem_ch13.adb, sem_ch4.adb, sem_disp.adb, sem_prag.adb,
870 sem_res.adb, sem_util.adb: Get rid of warnings about uninitialized
873 2017-11-09 Yannick Moy <moy@adacore.com>
875 * exp_disp.adb (Make_DT): Default initialize Ifaces_List and
878 2017-11-09 Pascal Obry <obry@adacore.com>
880 * libgnarl/s-taprop__mingw.adb: On Windows, initialize the thead handle
881 only for foreign threads. We initialize the thread handle only if not
882 yet initialized. This happens in Enter_Task for foreign threads only.
883 But for native threads (Ada tasking) we do want to keep the real
884 handle (from Create_Task) to be able to free the corresponding
885 resources in Finalize_TCB (CloseHandle).
887 2017-11-09 Yannick Moy <moy@adacore.com>
889 * sem_attr.adb (Analyze_Attribute): Default initialize P_Type,
891 (Error_Attr_P): Fix name in pragma No_Return.
892 (Unexpected_Argument): Add pragma No_Return.
893 (Placement_Error): Add pragma No_Return.
895 2017-11-09 Javier Miranda <miranda@adacore.com>
897 * exp_disp.adb (Elab_Flag_Needed): Elaboration flag not needed when the
898 dispatch table is statically built.
899 (Make_DT): Declare constant the Interface_Table object associated with
900 an statically built dispatch table. For this purpose the Offset_To_Top
901 value of each interface is computed using the dummy object.
902 * exp_ch3.adb (Build_Init_Procedure): Do not generate code initializing
903 the Offset_To_Top field of secondary dispatch tables when the dispatch
904 table is statically built.
905 (Initialize_Tag): Do not generate calls to Register_Interface_Offset
906 when the dispatch table is statically built.
907 * doc/gnat_rm/standard_and_implementation_defined_restrictions.rst:
908 Document the new GNAT restriction Static_Dispatch_Tables.
909 * gnat_rm.texi: Regenerate.
911 2017-11-09 Hristian Kirtchev <kirtchev@adacore.com>
913 * sem_aggr.adb (Resolve_Delta_Record_Aggregate): Reorder declarations
914 to avoid a dormant bug.
916 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
918 * init.c: Define missing __gnat_alternate_stack for QNX. Set it to 0,
919 as such capability is not available on the OS.
920 * link.c: Make sure linker options for QNX are correct.
921 * libgnarl/s-osinte__qnx.ads: Add some missing bindings to pthread.
922 * libgnarl/s-taprop__qnx.adb: New, derived from s-taprop__posix.adb. This brings
923 in particular a workaround with locks priority ceiling where a higher
924 priority task is allowed to lock a lower ceiling priority lock. This
925 also fixes the scheduling of FIFO tasks when the priority of a task is
927 * libgnat/system-qnx-aarch64.ads: Fix priority ranges.
929 2017-11-09 Yannick Moy <moy@adacore.com>
931 * erroutc.adb (Output_Error_Msgs): Justify CodePeer false positive
933 * gnatbind.adb (Scan_Bind_Arg): Simplify test to remove always true
935 * namet.adb (Copy_One_Character): Add assumption for static analysis,
936 as knowledge that Hex(2) is in the range 0..255 is too complex for
938 (Finalize): Add assumption for static analysis, as the fact that there
939 are symbols in the table depends on a global invariant at this point in
941 * set_targ.adb (Check_Spaces): Justify CodePeer false positive message.
942 * stylesw.adb (Save_Style_Check_Options): Rewrite to avoid test always
945 2017-11-09 Javier Miranda <miranda@adacore.com>
947 * libgnat/s-rident.ads (Static_Dispatch_Tables): New restriction name.
948 * exp_disp.adb (Building_Static_DT): Check restriction.
949 (Building_Static_Secondary_DT): Check restriction.
950 (Make_DT): Initialize the HT_Link to No_Tag.
951 * opt.ads (Static_Dispatch_Tables): Rename flag...
952 (Building_Static_Dispatch_Tables): ... into this. This will avoid
953 conflict with the restriction name.
954 * gnat1drv.adb: Update.
955 * exp_aggr.adb (Is_Static_Dispatch_Table_Aggregate): Update.
956 * exp_ch3.adb (Expand_N_Object_Declaration): Update.
958 2017-11-09 Pascal Obry <obry@adacore.com>
960 * libgnarl/s-taprop__mingw.adb: Minor code clean-up. Better using a
963 2017-11-09 Yannick Moy <moy@adacore.com>
965 * binde.adb (Diagnose_Elaboration_Problem): Mark procedure No_Return.
966 * checks.adb (Apply_Scalar_Range_Check): Rescope variable OK closer to
967 use. Default initialize Hi, Lo.
968 (Selected_Range_Checks): Retype Num_Checks more precisely.
969 (Determine_Range, Determine_Range_R): Default initialize Hi_Right,
971 * contracts.adb (Process_Contract_Cases): Mark parameter Stmts as
973 (Process_Postconditions): Mark parameter Stmts as Unmodified.
974 * exp_attr.adb (Expand_Loop_Entry_Attribute): Default initialize Blk.
975 * exp_ch4.adb (Expand_N_Allocator): Default initialize Typ.
976 (Expand_Concatenate): Default initialize High_Bound.
977 (Optimize_Length_Comparison): Default initialize Ent, Index.
978 * exp_ch5.adb (Expand_Predicated_Loop): Default initialize L_Hi and
980 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Default initialize
982 * exp_ch9.adb (Expand_Entry_Barrier): Default initialize Func_Body and
983 remove pragma Warnings(Off).
984 * exp_imgv.adb (Expand_Image_Attribute): Default initialize Tent.
985 * exp_util.adb (Find_Interface_Tag): Default initialize AI_Tag.
986 * freeze.adb (Check_Component_Storage_Order): Default initialize
987 Comp_Byte_Aligned rather than silencing messages with pragma
988 Warnings(Off), which does not work for CodePeer initialization
989 messages, and given that here the possible read of an unitialized value
990 depends on a proper use of parameters by the caller.
991 * inline.adb (Expand_Inlined_Call): Default initialize Lab_Decl, Targ.
992 * sem_ch12.adb (Build_Operator_Wrapper): Default initialize Expr.
993 * sem_ch3.adb (Build_Derived_Array_Type): Default initialize
995 * sem_ch4.adb (List_Operand_Interps): Default initialize Nam and remove
996 pragma Warnings(Off).
997 (Analyze_Case_Expression): Rescope checking block within branch where
998 Others_Present is set by the call to Check_Choices.
999 * sem_ch5.adb (Analyze_Assignment): Default initialize
1001 * sem_ch6.adb (Analyze_Function_Return): Default initialize Obj_Decl,
1002 and restructure code to defend against previous errors, so that, in
1003 that case, control does not flow to the elsif condition which read an
1004 uninitialized Obj_Decl.
1005 * sem_ch9.adb (Analyze_Requeue): Default initialize Synch_Type.
1006 (Check_Interfaces): Default initialize Full_T_Ifaces and Priv_T_Ifaces,
1007 which seem to be left uninitialized and possibly read in some cases.
1008 * sem_dim.adb (Analyze_Aspect_Dimension_System): Retype Position more
1009 precisely. This requires to exchange the test for exiting in case of
1010 too many positions and the increment to Position, inside the loop.
1011 * sem_eval.adb (Eval_Concatenation): Default initialize Folded_Val,
1012 which cannot be read uninitialized, but the reasons for that are quite
1014 * sem_intr.adb (Check_Intrinsic_Call): Default initialize Rtyp.
1015 * sem_prag.adb (Collect_Subprogram_Inputs_Outputs): Default initialize
1017 * sem_res.adb (Make_Call_Into_Operator): Default initialize Opnd_Type,
1018 and test for presence of non-null Opnd_Type before testing its scope,
1019 in a test which would read its value uninitialized, and is very rarely
1020 exercized (it depends on the presence of an extension of System).
1021 * sem_spark.ads: Update comment to fix name of main analysis procedure.
1022 * sem_warn.adb (Warn_On_Known_Condition): Default initialize
1024 * set_targ.adb (FailN): Mark procedure with No_Return.
1025 * stylesw.adb (Save_Style_Check_Options): Delete useless code to
1026 initialize all array Options to white space, as there is already code
1027 doing the same for the remaining positions in Options at the end of the
1030 2017-11-09 Eric Botcazou <ebotcazou@adacore.com>
1032 * exp_ch11.adb (Possible_Local_Raise): Do not issue the warning for
1033 generic instantiations either.
1035 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1037 * sem_prag.adb (Analyze_Part_Of): Reword error message.
1038 (Get_SPARK_Mode_Type): Do not raise Program_Error in case pragma
1039 SPARK_Mode appears with an illegal mode, treat this as a non-existent
1042 2017-11-09 Ed Schonberg <schonberg@adacore.com>
1044 * sem_ch4.adb (Analyze_Call): Reject a call to a function that returns
1045 a limited view of a type T declared in unit U1, when the function is
1046 declared in another unit U2 and the call appears in a procedure within
1049 2017-11-09 Justin Squirek <squirek@adacore.com>
1051 * sem_ch8.adb (Analyze_Use_Package): Force installation of use_clauses
1052 when processing generic instances.
1054 2017-11-09 Bob Duff <duff@adacore.com>
1056 * namet.ads, namet.adb (Valid_Name_Id): New subtype that excludes
1057 Error_Name and No_Name. Use this (versus Name_Id) to indicate which
1058 objects can have those special values. Valid_Name_Id could usefully be
1059 used all over the compiler front end, but that's too much trouble for
1060 now. If we did that, we might want to rename:
1061 Name_Id --> Optional_Name_Id, Valid_Name_Id --> Name_Id.
1062 For parameters of type Valid_Name_Id, remove some redundant tests,
1063 including the ones found by CodePeer. Use Is_Valid_Name instead of
1064 membership test when appropriate.
1065 (Error_Name_Or_No_Name): Delete this; it's no longer needed.
1066 * sem_ch2.adb (Analyze_Identifier): Use "not Is_Valid_Name" instead of
1067 "in Error_Name_Or_No_Name".
1068 (Check_Parameterless_Call): Use "not Is_Valid_Name" instead of "in
1069 Error_Name_Or_No_Name".
1071 2017-11-09 Arnaud Charlet <charlet@adacore.com>
1073 * gnat1drv.adb (Adjust_Global_Switches): Suppress warnings in codepeer
1074 mode here unless -gnateC is specified.
1075 * switch-c.adb (Scan_Front_End_Switches): Do not suppress warnings with
1078 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1080 * lib-writ.adb (Write_ALI): Remove processing of the frontend xrefs as
1081 part of the ALI writing; they are now processed directly from memory
1082 when requested by the backend.
1083 * lib-xref.ads (Collect_SPARK_Xrefs): Remove.
1084 (Iterate_SPARK_Xrefs): New routine for iterating over frontend xrefs.
1085 * lib-xref-spark_specific.adb (Traverse_Compilation_Unit): Remove.
1086 (Add_SPARK_File): Remove.
1087 (Add_SPARK_Xref): Refactored from removed code; filters xref entries
1088 that are trivially uninteresting to the SPARK backend.
1089 * spark_xrefs.ads: Remove code that is no longer needed.
1090 * spark_xrefs.adb (dspark): Adapt to use Iterate_SPARK_Xrefs.
1092 2017-11-09 Hristian Kirtchev <kirtchev@adacore.com>
1094 * sem_elab.adb: Update the documentation on adding a new elaboration
1095 schenario. Add new hash table Recorded_Top_Level_Scenarios.
1096 (Is_Check_Emitting_Scenario): Removed.
1097 (Is_Recorded_Top_Level_Scenario): New routine.
1098 (Kill_Elaboration_Scenario): Reimplemented.
1099 (Record_Elaboration_Scenario): Mark the scenario as recorded.
1100 (Set_Is_Recorded_Top_Level_Scenario): New routine.
1101 (Update_Elaboration_Scenario): Reimplemented.
1102 * sinfo.adb (Is_Recorded_Scenario): Removed.
1103 (Set_Is_Recorded_Scenario): Removed.
1104 * sinfo.ads: Remove attribute Is_Recorded_Scenario along with
1105 occurrences in nodes.
1106 (Is_Recorded_Scenario): Removed along with pragma Inline.
1107 (Set_Is_Recorded_Scenario): Removed along with pragma Inline.
1109 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1111 * sem_prag.adb (Analyze_Part_Of): Change "designate" to "denote" in
1114 2017-11-09 Justin Squirek <squirek@adacore.com>
1116 * sem_res.adb (Resolve_Allocator): Add warning messages corresponding
1117 to the allocation of an anonymous access-to-controlled object.
1119 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
1121 * sigtramp-qnx.c: Fix obvious typo.
1123 2017-11-09 Doug Rupp <rupp@adacore.com>
1125 * libgnarl/s-taprop__linux.adb (Monotonic_Clock): Minor reformatting.
1127 2017-11-09 Ed Schonberg <schonberg@adacore.com>
1129 * sem_res.adb (Resolve): If expression is an entity whose type has
1130 implicit dereference, generate reference to it, because no reference is
1131 generated for an overloaded entity during analysis, given that its
1132 identity may not be known.
1134 2017-11-09 Javier Miranda <miranda@adacore.com>
1136 * exp_disp.adb (Expand_Interface_Thunk): Replace substraction of
1137 offset-to-top field by addition.
1138 (Make_Secondary_DT): Initialize the offset-to-top field with a negative
1140 * exp_ch3.adb (Build_Offset_To_Top_Function): Build functions that
1141 return a negative offset-to-top value.
1142 (Initialize_Tag): Invoke runtime services Set_Dynamic_Offset_To_Top and
1143 Set_Static_Offset_To_Top passing a negative offet-to-top value;
1144 initialize also the offset-to-top field with a negative offset.
1145 * libgnat/a-tags.adb (Base_Address): Displace the pointer by means of
1146 an addition since the offset-to-top field is now a negative value.
1147 (Displace): Displace the pointer to the object means of a substraction
1148 since it is now a negative value.
1149 (Set_Dynamic_Offset_to_top): Displace the pointer to the object by
1150 means of a substraction since it is now a negative value.
1152 2017-11-09 Eric Botcazou <ebotcazou@adacore.com>
1154 * gnat1drv.adb (Gnat1drv): Call Errout.Finalize (Last_Call => True)
1155 before Errout.Output_Messages also in the case of compilation errors.
1157 2017-11-09 Javier Miranda <miranda@adacore.com>
1159 * doc/gnat_ugn/the_gnat_compilation_model.rst (Interfacing with C++ at
1160 the Class Level): Fix error interfacing with C strings.
1161 * gnat_ugn.texi: Regenerate.
1163 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
1165 * system-qnx-aarch64.ads: Fix the priority constants.
1166 * s-osinte__qnx.ads: Fix constants for handling the locking protocols
1168 * s-osinte__qnx.adb: New file , prevents the use of priority 0 that
1169 corresponds to an idle priority on QNX.
1171 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1173 * sem_prag.adb, sem_util.adb, sem_elab.adb: Fix minor typos in
1176 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1178 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs): Ignore loop parameters
1179 in expression funtions that are expanded into variables.
1181 2017-11-09 Piotr Trojanek <trojanek@adacore.com>
1183 * sem_util.adb: Minor whitespace cleanup.
1185 2017-11-09 Jerome Lambourg <lambourg@adacore.com>
1187 * libgnarl/s-taprop__qnx.adb: Refine aarch64-qnx. Use the POSIX
1188 s-taprop version rather than a custom one.
1189 * sigtramp-qnx.c (aarch64-qnx): Implement the signal trampoline.
1191 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1193 * lib-xref.ads, lib-xref-spark_specific.adb
1194 (Traverse_Compilation_Unit): Move declaration to package body.
1196 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1198 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration): Obtain
1199 the type of the renaming from its defining entity, rather then the
1200 subtype mark as there may not be a subtype mark.
1202 2017-11-08 Jerome Lambourg <lambourg@adacore.com>
1204 * adaint.c, s-oscons-tmplt.c, init.c, libgnat/system-qnx-aarch64.ads,
1205 libgnarl/a-intnam__qnx.ads, libgnarl/s-intman__qnx.adb,
1206 libgnarl/s-osinte__qnx.ads, libgnarl/s-qnx.ads,
1207 libgnarl/s-taprop__qnx.adb, s-oscons-tmplt.c, sigtramp-qnx.c,
1208 terminals.c: Initial port of GNAT for aarch64-qnx
1210 2017-11-08 Elisa Barboni <barboni@adacore.com>
1212 * exp_util.adb (Find_DIC_Type): Move...
1213 * sem_util.ads, sem_util.adb (Find_DIC_Type): ... here.
1215 2017-11-08 Justin Squirek <squirek@adacore.com>
1217 * sem_res.adb (Resolve_Allocator): Add info messages corresponding to
1218 the owner and corresponding coextension.
1220 2017-11-08 Ed Schonberg <schonberg@adacore.com>
1222 * sem_aggr.adb (Resolve_Delta_Aggregate): Divide into the
1223 following separate procedures.
1224 (Resolve_Delta_Array_Aggregate): Previous code form
1225 Resolve_Delta_Aggregate.
1226 (Resolve_Delta_Record_Aggregate): Extend previous code to cover latest
1227 ARG decisions on the legality rules for delta aggregates for records:
1228 in the case of a variant record, components from different variants
1229 cannot be specified in the delta aggregate, and this must be checked
1232 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1234 * spark_xrefs.ads (SPARK_Scope_Record): Remove File_Num component.
1235 * lib-xref-spark_specific.adb (Add_SPARK_Scope): Skip initialization of
1238 2017-11-08 Gary Dismukes <dismukes@adacore.com>
1240 * sem_ch4.adb: Minor typo fix.
1242 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1244 * spark_xrefs.ads (SPARK_Scope_Record): Remove Spec_File_Num and
1245 Spec_Scope_Num components.
1246 * spark_xrefs.adb (dspark): Skip pretty-printing to removed components.
1247 * lib-xref-spark_specific.adb (Add_SPARK_Scope): Skip initialization of
1249 (Collect_SPARK_Xrefs): Skip setting proper values of removed
1252 2017-11-08 Gary Dismukes <dismukes@adacore.com>
1254 * exp_ch4.adb (Expand_N_Type_Conversion): Add test that the selector
1255 name is a discriminant in check for unconditional accessibility
1256 violation within instances.
1258 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1260 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs): Remove special-case
1261 for constants (with variable input).
1262 (Is_Constant_Object_Without_Variable_Input): Remove.
1264 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1266 * exp_ch9.adb, sem_disp.adb, sem_util.adb: Minor reformatting.
1268 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1270 * spark_xrefs.ads (Rtype): Remove special-casing of constants for SPARK
1272 (dspark): Remove hardcoded table bound.
1274 2017-11-08 Ed Schonberg <schonberg@adacore.com>
1276 * sem_ch4.adb (Analyze_Aggregate): For Ada2020 delta aggregates, use
1277 the type of the base of the construct to determine the type (or
1278 candidate interpretations) of the delta aggregate. This allows the
1279 construct to appear in a context that expects a private extension.
1280 * sem_res.adb (Resolve): Handle properly a delta aggregate with an
1283 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1285 * spark_xrefs.ads (SPARK_Xref_Record): Replace file and scope indices
1286 with Entity_Id of the reference.
1287 * spark_xrefs.adb (dspark): Adapt pretty-printing routine.
1288 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs): Store Entity_Id of the
1289 reference, not the file and scope indices.
1291 2017-11-08 Arnaud Charlet <charlet@adacore.com>
1293 * errout.ads (Current_Node): New.
1294 * errout.adb (Error_Msg): Use Current_Node.
1295 * par-ch6.adb, par-ch7.adb, par-ch9.adb, par-util.adb: Set Current_Node
1297 * style.adb: Call Error_Msg_N when possible.
1299 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1301 * spark_xrefs.ads (SPARK_Scope_Record): Rename Scope_Id component to
1303 * lib-xref-spark_specific.adb, spark_xrefs.adb: Propagate renaming of
1304 the Scope_Id record component.
1306 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1308 * spark_xrefs.ads (SPARK_File_Record): Remove string components.
1309 * spark_xrefs.adb (dspark): Remove pretty-printing of removed
1310 SPARK_File_Record components.
1311 * lib-xref-spark_specific.adb (Add_SPARK_File): Do not store string
1312 representation of files/units.
1314 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1316 * lib-xref.ads, lib-xref-spark_specific.adb (Traverse_Declarations):
1317 Remove Inside_Stubs parameter.
1319 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1321 * spark_xrefs.ads (SPARK_Xref_Record): Referenced object is now
1322 represented by Entity_Id.
1323 (SPARK_Scope_Record): Referenced scope (e.g. subprogram) is now
1324 represented by Entity_Id; this information is not repeated as
1326 (Heap): Moved from lib-xref-spark_specific.adb, to reside next to
1327 Name_Of_Heap_Variable.
1328 * spark_xrefs.adb (dspark): Adapt debug routine to above changes in
1330 * lib-xref-spark_specific.adb: Adapt routines for populating SPARK
1331 scope and xrefs tables to above changes in data types.
1333 2017-11-08 Justin Squirek <squirek@adacore.com>
1335 * sem_ch8.adb (Mark_Use_Clauses): Add condition to always mark the
1336 primitives of generic actuals.
1337 (Mark_Use_Type): Add recursive call to properly mark class-wide type's
1338 base type clauses as per ARM 8.4 (8.2/3).
1340 2017-11-08 Ed Schonberg <schonberg@adacore.com>
1342 * sem_ch6.adb (Analyze_Generic_Subprobram_Body): Validate
1343 categorization dependency of the body, as is done for non-generic
1345 (New_Overloaded_Entity, Visible_Part_Type): Remove linear search
1346 through declarations (Simple optimization, no behavior change).
1348 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1350 * spark_xrefs.ads (SPARK_Xref_Record): Remove inessential components.
1351 (SPARK_Scope_Record): Remove inessential components.
1352 * spark_xrefs.adb (dspark): Remove pretty-printing of removed record
1354 * lib-xref-spark_specific.adb (Add_SPARK_Scope): Remove setting of
1355 removed record components.
1356 (Add_SPARK_Xrefs): Remove setting of removed record components.
1358 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1360 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs): Remove dead check for
1363 2017-11-08 Javier Miranda <miranda@adacore.com>
1365 * sem_disp.adb (Is_Inherited_Public_Operation): Extend the
1366 functionality of this routine to handle multiple levels of derivations.
1368 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1370 * einfo.adb: Elist36 is now used as Nested_Scenarios.
1371 (Nested_Scenarios): New routine.
1372 (Set_Nested_Scenarios): New routine.
1373 (Write_Field36_Name): New routine.
1374 * einfo.ads: Add new attribute Nested_Scenarios along with occurrences
1376 (Nested_Scenarios): New routine along with pragma Inline.
1377 (Set_Nested_Scenarios): New routine along with pragma Inline.
1378 * sem_elab.adb (Find_And_Process_Nested_Scenarios): New routine.
1379 (Process_Nested_Scenarios): New routine.
1380 (Traverse_Body): When a subprogram body is traversed for the first
1381 time, find, save, and process all suitable scenarios found within.
1382 Subsequent traversals of the same subprogram body utilize the saved
1385 2017-11-08 Piotr Trojanek <trojanek@adacore.com>
1387 * lib-xref-spark_specific.adb (Add_SPARK_Scope): Remove detection of
1388 protected operations.
1389 (Add_SPARK_Xrefs): Simplify detection of empty entities.
1390 * get_spark_xrefs.ads, get_spark_xrefs.adb, put_spark_xrefs.ads,
1391 put_spark_xrefs.adb, spark_xrefs_test.adb: Remove code for writing,
1392 reading and testing SPARK cross-references stored in the ALI files.
1393 * lib-xref.ads (Output_SPARK_Xrefs): Remove.
1394 * lib-writ.adb (Write_ALI): Do not write SPARK cross-references to the
1396 * spark_xrefs.ads, spark_xrefs.adb (pspark): Remove, together
1397 with description of the SPARK xrefs ALI format.
1398 * gcc-interface/Make-lang.in (GNAT_ADA_OBJS): Remove get_spark_refs.o
1399 and put_spark_refs.o.
1401 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1403 * exp_ch4.adb (Apply_Accessibility_Check): Do not finalize the object
1404 when the associated access type is subject to pragma
1405 No_Heap_Finalization.
1406 * exp_intr.adb (Expand_Unc_Deallocation): Use the available view of the
1407 designated type in case it comes from a limited withed unit.
1409 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1411 * exp_ch3.adb (Expand_N_Object_Declaration): Save and restore relevant
1412 SPARK-related flags. Add ??? comment.
1413 * exp_util.adb (Insert_Actions): Add an entry for node
1414 N_Variable_Reference_Marker.
1415 * sem.adb (Analyze): Add an entry for node N_Variable_Reference_Marker.
1416 * sem_ch8.adb (Find_Direct_Name): Add constant Is_Assignment_LHS. Build
1417 and record a variable reference marker for the current name.
1418 (Find_Expanded_Name): Add constant Is_Assignment_LHS. Build and record
1419 a variable reference marker for the current name.
1420 * sem_elab.adb (Build_Variable_Reference_Marker): New routine.
1421 (Extract_Variable_Reference_Attributes): Reimplemented.
1422 (Info_Scenario): Add output for variable references and remove output
1424 (Info_Variable_Read): Removed.
1425 (Info_Variable_Reference): New routine.
1426 (Is_Suitable_Scenario): Variable references are now suitable scenarios
1427 while variable reads are not.
1428 (Output_Active_Scenarios): Add output for variable references and
1429 remove output for variable reads.
1430 (Output_Variable_Read): Removed.
1431 (Output_Variable_Reference): New routine.
1432 (Process_Variable_Read): Removed.
1433 (Process_Variable_Reference): New routine.
1434 (Process_Variable_Reference_Read): New routine.
1435 * sem_elab.ads (Build_Variable_Reference_Marker): New routine.
1436 * sem_res.adb (Resolve_Actuals): Build and record a variable reference
1437 marker for the current actual.
1438 * sem_spark.adb (Check_Node): Add an entry for node
1439 N_Variable_Reference_Marker.
1440 * sem_util.adb (Within_Subprogram_Call): Moved to the library level.
1441 * sem_util.ads (Within_Subprogram_Call): Moved to the library level.
1442 * sinfo.adb (Is_Read): New routine.
1443 (Is_Write): New routine.
1444 (Target): Updated to handle variable reference markers.
1445 (Set_Is_Read): New routine.
1446 (Set_Is_Write): New routine.
1447 (Set_Target): Updated to handle variable reference markers.
1448 * sinfo.ads: Add new attributes Is_Read and Is_Write along with
1449 occurrences in nodes. Update attribute Target. Add new node
1450 kind N_Variable_Reference_Marker.
1451 (Is_Read): New routine along with pragma Inline.
1452 (Is_Write): New routine along with pragma Inline.
1453 (Set_Is_Read): New routine along with pragma Inline.
1454 (Set_Is_Write): New routine along with pragma Inline.
1455 * sprint.adb (Sprint_Node_Actual): Add an entry for node
1456 N_Variable_Reference_Marker.
1458 2017-11-08 Arnaud Charlet <charlet@adacore.com>
1460 * sem_util.adb (Subprogram_Name): Append suffix for overloaded
1463 2017-11-08 Yannick Moy <moy@adacore.com>
1465 * sem_ch8.adb (Use_One_Type, Update_Use_Clause_Chain): Do not report
1466 about unused use-type or use-package clauses inside inlined bodies.
1468 2017-11-08 Hristian Kirtchev <kirtchev@adacore.com>
1470 * sem_elab.adb (Ensure_Prior_Elaboration): Add new parameter
1471 In_Partial_Fin along with a comment on its usage. Do not guarantee the
1472 prior elaboration of a unit when the need came from a partial
1473 finalization context.
1474 (In_Initialization_Context): Relocated to Process_Call.
1475 (Is_Partial_Finalization_Proc): New routine.
1476 (Process_Access): Add new parameter In_Partial_Fin along with a comment
1478 (Process_Activation_Call): Add new parameter In_Partial_Fin along with
1479 a comment on its usage.
1480 (Process_Activation_Conditional_ABE_Impl): Add new parameter
1481 In_Partial_Fin along with a comment on its usage. Do not emit any ABE
1482 diagnostics when the activation occurs in a partial finalization
1484 (Process_Activation_Guaranteed_ABE_Impl): Add new parameter
1485 In_Partial_Fin along with a comment on its usage.
1486 (Process_Call): Add new parameter In_Partial_Fin along with a comment
1487 on its usage. A call is within a partial finalization context when it
1488 targets a finalizer or primitive [Deep_]Finalize, and the call appears
1489 in initialization actions. Pass this information down to the recursive
1490 steps of the Processing phase.
1491 (Process_Call_Ada): Add new parameter In_Partial_Fin along with a
1492 comment on its usage. Remove the guard which suppresses the generation
1493 of implicit Elaborate[_All] pragmas. This is now done in
1494 Ensure_Prior_Elaboration.
1495 (Process_Call_Conditional_ABE): Add new parameter In_Partial_Fin along
1496 with a comment on its usage. Do not emit any ABE diagnostics when the
1497 call occurs in a partial finalization context.
1498 (Process_Call_SPARK): Add new parameter In_Partial_Fin along with a
1499 comment on its usage.
1500 (Process_Instantiation): Add new parameter In_Partial_Fin along with a
1501 comment on its usage.
1502 (Process_Instantiation_Ada): Add new parameter In_Partial_Fin along
1503 with a comment on its usage.
1504 (Process_Instantiation_Conditional_ABE): Add new parameter
1505 In_Partial_Fin along with a comment on its usage. Do not emit any ABE
1506 diagnostics when the instantiation occurs in a partial finalization
1508 (Process_Instantiation_SPARK): Add new parameter In_Partial_Fin along
1509 with a comment on its usage.
1510 (Process_Scenario): Add new parameter In_Partial_Fin along with a
1511 comment on its usage.
1512 (Process_Single_Activation): Add new parameter In_Partial_Fin along
1513 with a comment on its usage.
1514 (Traverse_Body): Add new parameter In_Partial_Fin along with a comment
1517 2017-11-08 Arnaud Charlet <charlet@adacore.com>
1519 * sem_ch13.adb: Add optional parameter to Error_Msg.
1521 2017-11-08 Jerome Lambourg <lambourg@adacore.com>
1523 * fname.adb (Is_Internal_File_Name): Do not check the 8+3 naming schema
1524 for the Interfaces.* hierarchy as longer unit names are now allowed.
1526 2017-11-08 Arnaud Charlet <charlet@adacore.com>
1528 * sem_util.adb (Subprogram_Name): Emit sloc for the enclosing
1529 subprogram as well. Support more cases of entities.
1530 (Append_Entity_Name): Add some defensive code.
1532 2017-11-06 Eric Botcazou <ebotcazou@adacore.com>
1534 * gcc-interface/misc.c (gnat_post_options): Clear warn_return_type.
1536 2017-10-31 Eric Botcazou <ebotcazou@adacore.com>
1539 * gcc-interface/Makefile.in (m68k/Linux): Fix typo.
1541 2017-10-21 Eric Botcazou <ebotcazou@adacore.com>
1543 * gcc-interface/Makefile.in: Remove bogus settings for VxWorks.
1545 2017-10-21 Eric Botcazou <ebotcazou@adacore.com>
1547 * gcc-interface/utils.c (pad_type_hash): Use hashval_t for hash value.
1548 (convert): Do not use an unchecked conversion for converting from a
1549 type to another type padding it.
1551 2017-10-20 Doug Rupp <rupp@adacore.com>
1553 * libgnarl/s-osinte__linux.ads (Relative_Timed_Wait): Add variable
1554 needed for using monotonic clock.
1555 * libgnarl/s-taprop__linux.adb: Revert previous monotonic clock
1557 * libgnarl/s-taprop__linux.adb, s-taprop__posix.adb: Unify and factor
1558 out monotonic clock related functions body.
1559 (Timed_Sleep, Timed_Delay, Montonic_Clock, RT_Resolution,
1560 Compute_Deadline): Move to...
1561 * libgnarl/s-tpopmo.adb: ... here. New separate package body.
1563 2017-10-20 Ed Schonberg <schonberg@adacore.com>
1565 * sem_util.adb (Is_Controlling_Limited_Procedure): Handle properly the
1566 case where the controlling formal is an anonymous access to interface
1568 * exp_ch9.adb (Extract_Dispatching_Call): If controlling actual is an
1569 access type, handle properly the the constructed dereference that
1570 designates the object used in the rewritten synchronized call.
1571 (Parameter_Block_Pack): If the type of the actual is by-copy, its
1572 generated declaration in the parameter block does not need an
1573 initialization even if the type is a null-excluding access type,
1574 because it will be initialized with the value of the actual later on.
1575 (Parameter_Block_Pack): Do not add controlling actual to parameter
1576 block when its type is by-copy.
1578 2017-10-20 Justin Squirek <squirek@adacore.com>
1580 * sem_ch8.adb (Update_Use_Clause_Chain): Add sanity check to verify
1581 scope stack traversal into the context clause.
1583 2017-10-20 Bob Duff <duff@adacore.com>
1585 * sinfo.ads: Fix a comment typo.
1587 2017-10-20 Eric Botcazou <ebotcazou@adacore.com>
1589 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (-flto): Add
1590 warning against usage in conjunction with -gnatn.
1591 (-fdump-xref): Delete entry.
1592 * doc/gnat_ugn/gnat_utility_programs.rst (--ext): Remove mention of
1594 * gnat_ugn.texi: Regenerate.
1596 2017-10-20 Hristian Kirtchev <kirtchev@adacore.com>
1598 * sem_type.adb, exp_util.adb, sem_util.adb, sem_dim.adb, sem_elab.adb:
1601 2017-10-20 Yannick Moy <moy@adacore.com>
1603 * sem_dim.adb (Analyze_Dimension_Binary_Op): Accept with a warning to
1604 compare a dimensioned expression with a literal.
1605 (Dim_Warning_For_Numeric_Literal): Do not issue a warning for the
1607 * doc/gnat_ugn/gnat_and_program_execution.rst: Update description of
1608 dimensionality system in GNAT.
1609 * gnat_ugn.texi: Regenerate.
1611 2017-10-20 Yannick Moy <moy@adacore.com>
1613 * sem_ch6.adb (Analyze_Expression_Function.Freeze_Expr_Types): Remove
1614 inadequate silencing of errors.
1615 * sem_util.adb (Check_Part_Of_Reference): Do not issue an error when
1616 checking the subprogram body generated from an expression function,
1617 when this is done as part of the preanalysis done on expression
1618 functions, as the subprogram body may not yet be attached in the AST.
1619 The error if any will be issued later during the analysis of the body.
1620 (Is_Aliased_View): Trivial rewrite with Is_Formal_Object.
1622 2017-10-20 Arnaud Charlet <charlet@adacore.com>
1624 * sem_ch8.adb (Update_Chain_In_Scope): Add missing [-gnatwu] marker for
1625 warning on ineffective use clause.
1627 2017-10-20 Eric Botcazou <ebotcazou@adacore.com>
1629 * exp_ch11.ads (Warn_If_No_Local_Raise): Declare.
1630 * exp_ch11.adb (Expand_Exception_Handlers): Use Warn_If_No_Local_Raise
1631 to issue the warning on the absence of local raise.
1632 (Possible_Local_Raise): Do not issue the warning for Call_Markers.
1633 (Warn_If_No_Local_Raise): New procedure to issue the warning on the
1634 absence of local raise.
1635 * sem_elab.adb: Add with and use clauses for Exp_Ch11.
1636 (Record_Elaboration_Scenario): Call Possible_Local_Raise in the cases
1637 where a scenario could give rise to raising Program_Error.
1638 * sem_elab.adb: Typo fixes.
1639 * fe.h (Warn_If_No_Local_Raise): Declare.
1640 * gcc-interface/gigi.h (get_exception_label): Change return type.
1641 * gcc-interface/trans.c (gnu_constraint_error_label_stack): Change to
1642 simple vector of Entity_Id.
1643 (gnu_storage_error_label_stack): Likewise.
1644 (gnu_program_error_label_stack): Likewise.
1645 (gigi): Adjust to above changes.
1646 (Raise_Error_to_gnu): Likewise.
1647 (gnat_to_gnu) <N_Goto_Statement>: Set TREE_USED on the label.
1648 (N_Push_Constraint_Error_Label): Push the label onto the stack.
1649 (N_Push_Storage_Error_Label): Likewise.
1650 (N_Push_Program_Error_Label): Likewise.
1651 (N_Pop_Constraint_Error_Label): Pop the label from the stack and issue
1652 a warning on the absence of local raise.
1653 (N_Pop_Storage_Error_Label): Likewise.
1654 (N_Pop_Program_Error_Label): Likewise.
1655 (push_exception_label_stack): Delete.
1656 (get_exception_label): Change return type to Entity_Id and adjust.
1657 * gcc-interface/utils2.c (build_goto_raise): Change type of first
1658 parameter to Entity_Id and adjust. Set TREE_USED on the label.
1659 (build_call_raise): Adjust calls to get_exception_label and also
1661 (build_call_raise_column): Likewise.
1662 (build_call_raise_range): Likewise.
1663 * doc/gnat_ugn/building_executable_programs_with_gnat.rst (-gnatw.x):
1664 Document actual default behavior.
1666 2017-10-20 Piotr Trojanek <trojanek@adacore.com>
1668 * einfo.ads: Minor consistent punctuation in comment. All numbered
1669 items in the comment of Is_Internal are now terminated with a period.
1671 2017-10-20 Piotr Trojanek <trojanek@adacore.com>
1673 * exp_util.adb (Build_Temporary): Mark created temporary entity as
1676 2017-10-20 Piotr Trojanek <trojanek@adacore.com>
1678 * sem_type.adb (In_Generic_Actual): Simplified.
1680 2017-10-20 Justin Squirek <squirek@adacore.com>
1682 * sem_ch12.adb (Check_Formal_Package_Instance): Add sanity check to
1683 verify a renaming exists for a generic formal before comparing it to
1684 the actual as defaulted formals will not have a renamed_object.
1686 2017-10-20 Javier Miranda <miranda@adacore.com>
1688 * exp_ch6.adb (Replace_Returns): Fix wrong management of
1689 N_Block_Statement nodes.
1691 2017-10-20 Bob Duff <duff@adacore.com>
1693 * exp_aggr.adb (Initialize_Array_Component): Avoid adjusting a
1694 component of an array aggregate if it is initialized by a
1695 build-in-place function call.
1696 * exp_ch6.adb (Is_Build_In_Place_Result_Type): Use -gnatd.9 to disable
1697 bip for nonlimited types.
1698 * debug.adb: Document -gnatd.9.
1700 2017-10-20 Bob Duff <duff@adacore.com>
1702 * sem_ch12.adb: Remove redundant setting of Parent.
1704 2017-10-20 Eric Botcazou <ebotcazou@adacore.com>
1706 * sem_ch4.adb (Find_Concatenation_Types): Filter out operators if one
1707 of the operands is a string literal.
1709 2017-10-20 Bob Duff <duff@adacore.com>
1711 * einfo.ads: Comment fix.
1713 2017-10-20 Clement Fumex <fumex@adacore.com>
1715 * switch-c.adb: Remove -gnatwm from the switches triggered by -gnateC.
1717 2017-10-20 Ed Schonberg <schonberg@adacore.com>
1719 * sem_dim.adb (Extract_Power): Accept dimension values that are not
1720 non-negative integers when the dimensioned base type is an Integer
1723 2017-10-20 Bob Duff <duff@adacore.com>
1725 * sinfo.ads, sinfo.adb (Alloc_For_BIP_Return): New flag to indicate
1726 that an allocator came from a b-i-p return statement.
1727 * exp_ch4.adb (Expand_Allocator_Expression): Avoid adjusting the return
1728 object of a nonlimited build-in-place function call.
1729 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Set the
1730 Alloc_For_BIP_Return flag on generated allocators.
1731 * sem_ch5.adb (Analyze_Assignment): Move Assert to where it can't fail.
1732 If the N_Assignment_Statement has been transformed into something else,
1733 then Should_Transform_BIP_Assignment won't work.
1734 * exp_ch3.adb (Expand_N_Object_Declaration): A previous revision said,
1735 "Remove Adjust if we're building the return object of an extended
1736 return statement in place." Back out that part of the change, because
1737 the Alloc_For_BIP_Return flag is now used for that.
1739 2017-10-19 Bob Duff <duff@adacore.com>
1741 * exp_ch6.adb (Is_Build_In_Place_Result_Type): Fix silly bug -- "Typ"
1742 should be "T". Handle case of a subtype of a class-wide type.
1744 2017-10-19 Bob Duff <duff@adacore.com>
1746 * exp_util.adb: (Process_Statements_For_Controlled_Objects): Clarify
1747 which node kinds can legitimately be ignored, and raise Program_Error
1750 2017-10-19 Hristian Kirtchev <kirtchev@adacore.com>
1752 * sem_elab.adb (Compilation_Unit): Handle the case of a subprogram
1753 instantiation that acts as a compilation unit.
1754 (Find_Code_Unit): Reimplemented.
1755 (Find_Top_Unit): Reimplemented.
1756 (Find_Unit_Entity): New routine.
1757 (Process_Instantiation_SPARK): Correct the elaboration requirement a
1758 package instantiation imposes on a unit.
1760 2017-10-19 Bob Duff <duff@adacore.com>
1762 * exp_ch6.adb (Is_Build_In_Place_Result_Type): Enable build-in-place
1763 for a narrow set of controlled types.
1765 2017-10-19 Eric Botcazou <ebotcazou@adacore.com>
1767 * sinput.ads (Line_Start): Add pragma Inline.
1768 * widechar.ads (Is_Start_Of_Wide_Char): Likewise.
1770 2017-10-19 Bob Duff <duff@adacore.com>
1772 * exp_attr.adb (Expand_N_Attribute_Reference): Disable
1773 Make_Build_In_Place_Call_... for F(...)'Old, where F(...) is a
1774 build-in-place function call so that the temp is declared in the right
1777 2017-10-18 Eric Botcazou <ebotcazou@adacore.com>
1779 * gcc-interface/misc.c (gnat_tree_size): Move around.
1781 * gcc-interface/utils.c (max_size): Deal with SSA names.
1783 2017-10-17 Jakub Jelinek <jakub@redhat.com>
1785 * gcc-interface/misc.c (gnat_tree_size): New function.
1786 (LANG_HOOKS_TREE_SIZE): Redefine.
1788 2017-10-14 Hristian Kirtchev <kirtchev@adacore.com>
1790 * sem_elab.adb (In_Preelaborated_Context): A generic package subject to
1791 Remote_Call_Interface is not a suitable preelaboratd context when the
1792 call appears in the package body.
1794 2017-10-14 Eric Botcazou <ebotcazou@adacore.com>
1796 * layout.ads (Set_Elem_Alignment): Add Align parameter defaulted to 0.
1797 * layout.adb (Set_Elem_Alignment): Likewise. Use M name as maximum
1798 alignment for consistency. If Align is non-zero, use the minimum of
1799 Align and M for the alignment.
1800 * cstand.adb (Build_Float_Type): Use Set_Elem_Alignment instead of
1801 setting the alignment directly.
1803 2017-10-14 Ed Schonberg <schonberg@adacore.com>
1805 * sem_prag.adb (Analyze_Pragma, case Check): Defer evaluation of the
1806 optional string in an Assert pragma until the expansion of the pragma
1807 has rewritten it as a conditional statement, so that the string
1808 argument is only evaluaed if the assertion fails. This is mandated by
1811 2017-10-14 Hristian Kirtchev <kirtchev@adacore.com>
1813 * debug.adb: Switch -gnatd.v and associated flag are now used to
1814 enforce the SPARK rules for elaboration in SPARK code.
1815 * sem_elab.adb: Describe switch -gnatd.v.
1816 (Process_Call): Verify the SPARK rules only when -gnatd.v is in effect.
1817 (Process_Instantiation): Verify the SPARK rules only when -gnatd.v is
1819 (Process_Variable_Assignment): Clarify why variable assignments are
1820 processed reglardless of whether -gnatd.v is in effect.
1821 * doc/gnat_ugn/elaboration_order_handling_in_gnat.rst: Update the
1822 sections on elaboration code and compilation switches.
1823 * gnat_ugn.texi: Regenerate.
1825 2017-10-14 Gary Dismukes <dismukes@adacore.com>
1827 * exp_util.adb, freeze.adb, sem_aggr.adb, sem_util.ads, sem_util.adb,
1828 sem_warn.adb: Minor reformattings.
1830 2017-10-14 Ed Schonberg <schonberg@adacore.com>
1832 * doc/gnat_rm/implementation_defined_aspects.rst: Add documentation
1833 for reverse iteration over formal containers.
1834 * gnat_rm.texi: Regenerate.
1836 2017-10-14 Hristian Kirtchev <kirtchev@adacore.com>
1838 * sem_elab.adb (Ensure_Dynamic_Prior_Elaboration): Renamed to
1839 Ensure_Prior_Elaboration_Dynamic for consistency reasons.
1840 (Ensure_Static_Prior_Elaboration): Renamed to
1841 Ensure_Prior_Elaboration_Static for consistency reasons.
1842 (Info_Variable_Reference): Renamed to Info_Variable_Read in order to
1843 reflect its new purpose.
1844 (Is_Initialized): New routine.
1845 (Is_Suitable_Variable_Reference): Renamed to Is_Suitable_Variable_Read
1846 in order to reflect its new purpose.
1847 (Is_Variable_Read): New routine.
1848 (Output_Variable_Reference): Renamed to Output_Variable_Read in order
1849 to reflect its new purpose.
1850 (Process_Variable_Assignment): This routine now acts as a top level
1851 dispatcher for variable assignments.
1852 (Process_Variable_Assignment_Ada): New routine.
1853 (Process_Variable_Assignment_SPARK): New routine.
1854 (Process_Variable_Reference): Renamed to Process_Variable_Read in order
1855 to reflects its new purpose. A reference to a variable is now suitable
1856 for ABE processing only when it is a read. The logic in the routine now
1857 reflects the latest SPARK elaboration rules.
1859 2017-10-14 Justin Squirek <squirek@adacore.com>
1861 * sem_ch8.adb (Analyze_Subprogram_Renaming): Modify condition that
1862 triggers marking on formal subprograms.
1864 2017-10-14 Javier Miranda <miranda@adacore.com>
1866 * checks.adb (Ensure_Valid): Do not skip adding the validity check on
1867 renamings of objects that come from the sources.
1869 2017-10-14 Eric Botcazou <ebotcazou@adacore.com>
1871 * cstand.adb (Build_Float_Type): Move down Siz parameter, add Align
1872 parameter and set the alignment of the type to Align.
1873 (Copy_Float_Type): Adjust call to Build_Float_Type.
1874 (Register_Float_Type): Add pragma Unreferenced for Precision. Adjust
1875 call to Build_Float_Type and do not set RM_Size and Alignment.
1877 2017-10-14 Patrick Bernardi <bernardi@adacore.com>
1879 * Makefile.rtl (GNATRTL_NONTASKING_OBJ): Add s-soliin to
1880 GNATRTL_NONTASKING_OBJ.
1882 2017-10-14 Bob Duff <duff@adacore.com>
1884 * exp_ch6.adb (Is_Build_In_Place_Result_Type): Include code for
1885 enabling b-i-p for nonlimited controlled types (but disabled).
1887 2017-10-14 Justin Squirek <squirek@adacore.com>
1889 * sem_elab.adb (Is_Suitable_Variable_Assignment): Replace call to
1890 Has_Warnings_Off with Warnings_Off.
1892 2017-10-14 Piotr Trojanek <trojanek@adacore.com>
1894 * sinfo.ads (Generic_Parent): Remove wrong (possibly obsolete) comment.
1896 2017-10-14 Hristian Kirtchev <kirtchev@adacore.com>
1898 * sem_ch3.adb (Analyze_Declarations): Analyze the contract of an
1899 enclosing package at the end of the visible declarations.
1900 * sem_prag.adb (Analyze_Initialization_Item): Suppress the analysis of
1901 an initialization item which is undefined due to some illegality.
1903 2017-10-14 Patrick Bernardi <bernardi@adacore.com>
1905 * ali.adb: Add new ALI line 'T' to read the number of tasks contain
1906 within each unit that require a default-sized primary and secondary
1907 stack to be generated by the binder.
1908 (Scan_ALI): Scan new 'T' lines.
1909 * ali.ads: Add Primary_Stack_Count and Sec_Stack_Count to Unit_Record.
1910 * bindgen.adb (Gen_Output_File): Count the number of default-sized
1911 stacks within the closure that are to be created by the binder.
1912 (Gen_Adainit, Gen_Output_File_Ada): Generate default-sized secondary
1913 stacks and record these in System.Secodnary_Stack.
1914 (Resolve_Binder_Options): Check if System.Secondary_Stack is in the
1915 closure of the program being bound.
1916 * bindusg.adb (Display): Add "-Q" switch. Remove rouge "--RTS" comment.
1917 * exp_ch3.adb (Count_Default_Sized_Task_Stacks): New routine.
1918 (Expand_N_Object_Declaration): Count the number of default-sized stacks
1919 used by task objects contained within the object whose declaration is
1920 being expanded. Only performed when either the restrictions
1921 No_Implicit_Heap_Allocations or No_Implicit_Task_Allocations are in
1923 * exp_ch9.adb (Create_Secondary_Stack_For_Task): New routine.
1924 (Expand_N_Task_Type_Declaration): Create a secondary stack as part of
1925 the expansion of a task type if the size of the stack is known at
1926 run-time and the restrictions No_Implicit_Heap_Allocations or
1927 No_Implicit_Task_Allocations are in effect.
1928 (Make_Task_Create_Call): If using a restricted profile provide
1929 secondary stack parameter: either the statically created stack or null.
1930 * lib-load.adb (Create_Dummy_Package_Unit, Load_Unit,
1931 Load_Main_Source): Include Primary_Stack_Count and Sec_Stack_Count in
1932 Unit_Record initialization expressions.
1933 * lib-writ.adb (Add_Preprocessing_Dependency,
1934 Ensure_System_Dependency): Include Primary_Stack_Count and
1935 Sec_Stack_Count in Unit_Record initialization expression.
1936 (Write_ALI): Write T lines.
1937 (Write_Unit_Information): Do not output 'T' lines if there are no
1938 stacks for the binder to generate.
1939 * lib-writ.ads: Updated library information documentation to include
1941 * lib.adb (Increment_Primary_Stack_Count): New routine.
1942 (Increment_Sec_Stack_Count): New routine.
1943 (Primary_Stack_Count): New routine.
1944 (Sec_Stack_Count): New routine.
1945 * lib.ads: Add Primary_Stack_Count and Sec_Stack_Count components to
1946 Unit_Record and updated documentation.
1947 (Increment_Primary_Stack_Count): New routine along with pragma Inline.
1948 (Increment_Sec_Stack_Count): New routine along with pragma Inline.
1949 (Primary_Stack_Count): New routine along with pragma Inline.
1950 (Sec_Stack_Count): New routine along with pragma Inline.
1951 * opt.ads: New constant No_Stack_Size. Flag Default_Stack_Size
1952 redefined. New flag Default_Sec_Stack_Size and
1953 Quantity_Of_Default_Size_Sec_Stacks.
1954 * rtfinal.c Fixed erroneous comment.
1955 * rtsfind.ads: Moved RE_Default_Secondary_Stack_Size from
1956 System.Secondary_Stack to System.Parameters. Add RE_SS_Stack.
1957 * sem_util.adb (Number_Of_Elements_In_Array): New routine.
1958 * sem_util.ads (Number_Of_Elements_In_Array): New routine.
1959 * switch-b.adb (Scan_Binder_Switches): Scan "-Q" switch.
1960 * libgnarl/s-solita.adb (Get_Sec_Stack_Addr): Removed routine.
1961 (Set_Sec_Stack_Addr): Removed routine.
1962 (Get_Sec_Stack): New routine.
1963 (Set_Sec_Stack): New routine.
1964 (Init_Tasking_Soft_Links): Update System.Soft_Links reference to
1965 reflect new procedure and global names.
1966 * libgnarl/s-taprop__linux.adb, libgnarl/s-taprop__mingw.adb,
1967 libgnarl/s-taprop__posix.adb, libgnarl/s-taprop__solaris.adb,
1968 libgnarl/s-taprop__vxworks.adb (Register_Foreign_Thread): Update
1969 parameter profile to allow the secondary stack size to be specified.
1970 * libgnarl/s-tarest.adb (Create_Restricted_Task): Update the parameter
1971 profile to include Sec_Stack_Address. Update Tasking.Initialize_ATCB
1972 call to remove Secondary_Stack_Size reference. Add secondary stack
1973 address and size to SSL.Create_TSD call.
1974 (Task_Wrapper): Remove secondary stack creation.
1975 * libgnarl/s-tarest.ads (Create_Restricted_Task,
1976 Create_Restricted_Task_Sequential): Update parameter profile to include
1977 Sec_Stack_Address and clarify the Size parameter.
1978 * libgnarl/s-taskin.adb (Initialize_ATCB): Remove Secondary_Stack_Size
1979 from profile and body.
1980 (Initialize): Remove Secondary_Stack_Size from Initialize_ATCB call.
1981 * libgnarl/s-taskin.ads: Removed component Secondary_Stack_Size from
1983 (Initialize_ATCB): Update the parameter profile to remove
1984 Secondary_Stack_Size.
1985 * libgnarl/s-tassta.adb (Create_Task): Updated parameter profile and
1986 call to Initialize_ATCB. Add secondary stack address and size to
1987 SSL.Create_TSD call, and catch any storage exception from the call.
1988 (Finalize_Global_Tasks): Update System.Soft_Links references to reflect
1989 new subprogram and component names.
1990 (Task_Wrapper): Remove secondary stack creation.
1991 (Vulnerable_Complete_Master): Update to reflect TSD changes.
1992 * libgnarl/s-tassta.ads: Reformat comments.
1993 (Create_Task): Update parameter profile.
1994 * libgnarl/s-tporft.adb (Register_Foreign_Thread): Update parameter
1995 profile to include secondary stack size. Remove secondary size
1996 parameter from Initialize_ATCB call and add it to Create_TSD call.
1997 * libgnat/s-parame.adb, libgnat/s-parame__rtems.adb,
1998 libgnat/s-parame__vxworks.adb (Default_Sec_Stack_Size): New routine.
1999 * libgnat/s-parame.ads, libgnat/s-parame__ae653.ads,
2000 libgnat/s-parame__hpux.ads, libgnat/s-parame__vxworks.ads: Remove type
2001 Percentage. Remove constants Dynamic, Sec_Stack_Percentage and
2002 Sec_Stack_Dynamic. Add constant Runtime_Default_Sec_Stack_Size and
2004 (Default_Sec_Stack_Size): New routine.
2005 * libgnat/s-secsta.adb, libgnat/s-secsta.ads: New implementation. Is
2007 * libgnat/s-soflin.adb: Removed unused with-clauses. With
2008 System.Soft_Links.Initialize to initialize non-tasking TSD.
2009 (Create_TSD): Update parameter profile. Initialize the TSD and
2010 unconditionally call SS_Init.
2011 (Destroy_TSD): Update SST.SS_Free call.
2012 (Get_Sec_Stack_Addr_NT, Get_Sec_Stack_Addr_Soft, Set_Sec_Stack_Addr_NT,
2013 Set_Sec_Stack_Addr_Soft): Remove routines.
2014 (Get_Sec_Stack_NT, Get_Sec_Stack_Soft, Set_Sec_Stack_NT,
2015 Set_Sec_Stack_Soft): Add routines.
2016 (NT_TSD): Move to private part of package specification.
2017 * libgnat/s-soflin.ads: New types Get_Stack_Call and Set_Stack_Call
2018 with suppressed access checks. Renamed *_Sec_Stack_Addr_* routines and
2019 objects to *_Sec_Stack_*. TSD: removed warning suppression and
2020 component intialization. Changed Sec_Stack_Addr to Sec_Stack_Ptr.
2021 (Create_TSD): Update parameter profile.
2022 (NT_TSD): Move to private section from body.
2023 * libgnat/s-soliin.adb, libgnat/s-soliin.ads: New files.
2024 * libgnat/s-thread.ads (Thread_Body_Enter): Update parameter profile.
2025 * libgnat/s-thread__ae653.adb (Get_Sec_Stack_Addr, Set_Sec_Stack_Addr):
2027 (Get_Sec_Stack, Set_Sec_Stack): Add routine.
2028 (Thread_Body_Enter): Update parameter profile and body to adapt to new
2029 System.Secondary_Stack.
2030 (Init_RTS): Update body for new System.Soft_Links names.
2031 * gcc-interface/Make-lang.in (GNAT_ADA_OBJS, GNATBIND_OBJS): Add
2034 2017-10-10 Richard Sandiford <richard.sandiford@linaro.org>
2036 * gcc-interface/decl.c (annotate_value): Use wi::to_wide when
2037 operating on trees as wide_ints.
2039 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2041 * sem_unit.adb (Find_Enclosing_Scope): Do not treat a block statement
2042 as a scoping construct when it is byproduct of exception handling.
2044 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2046 * sinfo.ads: Update table Is_Syntactic_Field to reflect the nature of
2047 semantic field Target of node N_Call_Marker.
2049 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2051 * sem_res.adb (Resolve_Allocator): Reject properly an allocator that
2052 attempts to copy a limited value, when the allocator is the expression
2053 in an expression function.
2055 2017-10-09 Joel Brobecker <brobecker@adacore.com>
2057 * doc/share/conf.py: Tell the style checker that this is a Python
2058 fragment, and therefore that pyflakes should not be run to validate
2061 2017-10-09 Eric Botcazou <ebotcazou@adacore.com>
2063 * einfo.ads (Is_Boolean_Type): Add pragma Inline.
2064 (Is_Entity_Name): Likewise.
2065 (Is_String_Type): Likewise.
2066 * sem_type.adb (Full_View_Covers): Do not test Is_Private_Type here
2067 and remove useless comparisons on the base types.
2068 (Covers): Use simple tests for Standard_Void_Type. Move up cheap tests
2069 on T2. Always test Is_Private_Type before Full_View_Covers.
2071 2017-10-09 Bob Duff <duff@adacore.com>
2073 * exp_ch4.adb: Minor refactoring.
2075 2017-10-09 Javier Miranda <miranda@adacore.com>
2077 * sem_ch3.adb (Replace_Components): Browse the list of discriminants,
2080 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2082 * sem_elab.adb (Static_Elaboration_Checks): Elaboration requirements
2083 are verified only in the static model.
2085 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2087 * sem_ch5.adb (Analyze_Iterator_Specification,
2088 Check_Reverse_Iteration): Check that the domain of iteration supports
2089 reverse iteration when it is a formal container. This requires the
2090 presence of a Previous primitive in the Iterable aspect.
2091 * sem_ch13.adb (Resolve_Iterable_Operation): Verify legality of
2092 primitives Last and Previous to support reverse iteration over formal
2094 (Validate_Iterable_Aspect): Add check for reverse iteration operations.
2095 * exp_ch5.adb (Build_Formal_Container_Iteration): Add proper expansion
2096 for reverse iteration using primitives Last and Previous in generated
2099 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2101 * sem_util.adb (Subprogram_Name): If this is a child unit, use the name
2102 of the Defining_Program_Unit_Name, which is an identifier, in order to
2103 construct the string for the fully qualified name.
2105 2017-10-09 Justin Squirek <squirek@adacore.com>
2107 * sem_ch3.adb: Rename Uses_Unseen_Priv into
2108 Contains_Lib_Incomplete_Type.
2110 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2112 * sem_aggr.adb, sem_spark.adb, adabkend.adb, exp_ch5.adb, frontend.adb,
2113 sem_ch12.adb, fmap.adb, exp_ch6.adb, exp_spark.adb, lib-load.adb,
2114 exp_ch9.adb, osint.adb, exp_disp.adb, sem_ch8.adb, sem_ch8.ads,
2115 prepcomp.adb, gnat1drv.adb, atree.adb, sinput-l.adb, targparm.adb,
2116 sem_ch10.adb, par-ch8.adb: Minor reformatting.
2118 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2120 * sem_elab.adb (Is_Suitable_Access): This scenario is now only relevant
2121 in the static model.
2122 (Is_Suitable_Variable_Assignment): This scenario is now only relevant
2123 in the static model.
2124 (Is_Suitable_Variable_Reference): This scenario is now only relevant in
2127 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2129 * sem_ch3.adb (Analyze_Declarations): In ASIS mode, resolve aspect
2130 expressions when the enclosing scope is a subprogram body and the next
2131 declaration is a body that freezes entities previously declared in the
2134 2017-10-09 Justin Squirek <squirek@adacore.com>
2136 * sem_ch8.adb (Analyze_Use_Package): Remove checking of mixture between
2137 ghost packages and living packages in use clauses.
2138 (Use_One_Type, Note_Redundant_Use): Correct warning messages
2140 2017-10-09 Justin Squirek <squirek@adacore.com>
2142 * osint.ads: Document new parameter FD for Read_Source_File.
2144 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2146 * exp_util.adb (Make_Predicate_Call): If the type of the expression to
2147 which the predicate check applies is tagged, convert the expression to
2148 that type. This is in most cases a no-op, but is relevant if the
2149 expression is clas-swide, because the predicate function being invoked
2150 is not a primitive of the type and cannot take a class-wide actual.
2152 2017-10-09 Gary Dismukes <dismukes@adacore.com>
2154 * exp_disp.adb: Minor reformatting.
2156 2017-10-09 Arnaud Charlet <charlet@adacore.com>
2158 * sem_warn.adb (Warn_On_Unreferenced_Entity): Fix typo.
2160 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2162 * sem_elab.adb (Install_ABE_Check): Do not generate an ABE check for
2164 (Install_ABE_Failure): Do not generate an ABE failure for GNATprove.
2166 2017-10-09 Bob Duff <duff@adacore.com>
2168 * exp_ch6.adb: (Make_Build_In_Place_Call_In_Object_Declaration): Return
2169 immediately if the call has already been processed (by a previous call
2170 to Make_Build_In_Place_Call_In_Anonymous_Context).
2171 * sem_elab.adb: Minor typo fixes.
2173 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2175 * sem_ch13.adb (Replace_Type_Ref): In the expression for a dynamic
2176 predicate, do not replace an identifier that matches the type if the
2177 identifier is a selector in a selected component, because this
2178 indicates a reference to some homograph of the type itself, and not to
2179 the current occurence in the predicate.
2181 2017-10-09 Eric Botcazou <ebotcazou@adacore.com>
2183 * repinfo.adb (List_Record_Layout): Tweak formatting.
2184 (Write_Val): Remove superfluous spaces in back-end layout mode.
2186 2017-10-09 Piotr Trojanek <trojanek@adacore.com>
2188 * sem_res.adb (Property_Error): Remove.
2189 (Resolve_Actuals): check for SPARK RM 7.1.3(10) rewritten to match the
2190 current wording of the rule.
2192 2017-10-09 Justin Squirek <squirek@adacore.com>
2194 * sem_ch3.adb (Analyze_Declarations): Add check for ghost packages
2195 before analyzing a given scope due to an expression function.
2196 (Uses_Unseen_Lib_Unit_Priv): Rename to Uses_Unseen_Priv.
2198 2017-10-09 Bob Duff <duff@adacore.com>
2200 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration): Use
2201 Defining_Identifier (Obj_Decl) in two places, because it might have
2203 * exp_ch6.adb (Make_Build_In_Place_Call_In_Allocator): Deal with cases
2204 involving 'Input on (not visibly) derived types.
2206 2017-10-09 Hristian Kirtchev <kirtchev@adacore.com>
2208 * atree.adb: Add new soft link Rewriting_Proc.
2209 (Rewrite): Invoke the subprogram attached to the rewriting soft link.
2210 (Set_Rewriting_Proc): New routine.
2211 * attree.ads: Add new access-to-subprogram type Rewrite_Proc.
2212 (Set_Rewriting_Proc): New routine.
2213 * checks.adb (Install_Primitive_Elaboration_Check): Use 'E' character
2214 for *E*laboration flag to maintain consistency with other elaboration
2215 flag generating subprograms.
2216 * debug.adb: Document the new usage of flag -gnatdL.
2217 * einfo.adb: Node19 is now used as Receiving_Entry. Node39 is now used
2218 as Protected_Subprogram. Flag148 is now used as
2219 Is_Elaboration_Checks_OK_Id. Flag302 is now used as
2220 Is_Initial_Condition_Procedure.
2221 (Is_Elaboration_Checks_OK_Id): New routine.
2222 (Is_Initial_Condition_Procedure): New routine.
2223 (Protected_Subprogram): New routine.
2224 (Receiving_Entry): New routine.
2225 (SPARK_Pragma): Update assertion.
2226 (SPARK_Pragma_Inherited): Update assertion.
2227 (Suppress_Elaboration_Warnings): Removed.
2228 (Set_Is_Elaboration_Checks_OK_Id): New routine.
2229 (Set_Is_Initial_Condition_Procedure): New routine.
2230 (Set_Protected_Subprogram): New routine.
2231 (Set_Receiving_Entry): New routine.
2232 (Set_SPARK_Pragma): Update assertion.
2233 (Set_SPARK_Pragma_Inherited): Update assertion.
2234 (Write_Entity_Flags): Update the output for Flag148 and Flag302.
2235 (Write_Field19_Name): Add output for Receiving_Entry.
2236 (Write_Field39_Name): Add output for Protected_Subprogram.
2237 (Write_Field40_Name): Update the output for SPARK_Pragma.
2238 * einfo.ads: New attributes Is_Elaboration_Checks_OK_Id,
2239 Is_Initial_Condition_Procedure, Protected_Subprogram, Receiving_Entry.
2240 Remove attribute Suppress_Elaboration_Warnings. Update the stricture
2241 of various entities.
2242 (Is_Elaboration_Checks_OK_Id): New routine along with pragma Inline.
2243 (Is_Initial_Condition_Procedure): New routine along with pragma Inline.
2244 (Protected_Subprogram): New routine along with pragma Inline.
2245 (Receiving_Entry): New routine along with pragma Inline.
2246 (Suppress_Elaboration_Warnings): Removed.
2247 (Set_Is_Elaboration_Checks_OK_Id): New routine along with pragma
2249 (Set_Is_Initial_Condition_Procedure): New routine along with pragma
2251 (Set_Protected_Subprogram): New routine along with pragma Inline.
2252 (Set_Receiving_Entry): New routine along with pragma Inline.
2253 (Set_Suppress_Elaboration_Warnings): Removed.
2254 * exp_ch3.adb (Build_Init_Procedure): Use name _Finalizer to maintain
2255 consistency with other finalizer generating subprograms.
2256 (Default_Initialize_Object): Mark the block which wraps the call to
2257 finalize as being part of initialization.
2258 * exp_ch7.adb (Expand_N_Package_Declaration): Directly expand pragma
2260 (Expand_N_Package_Body): Directly expand pragma Initial_Condition.
2261 (Next_Suitable_Statement): Update the comment on usage. Skip over call
2262 markers generated by the ABE mechanism.
2263 * exp_ch9.adb (Activation_Call_Loc): New routine.
2264 (Add_Accept): Link the accept procedure to the original entry.
2265 (Build_Protected_Sub_Specification): Link the protected or unprotected
2266 version to the original subprogram.
2267 (Build_Task_Activation_Call): Code cleanup. Use a source location which
2268 is very close to the "begin" or "end" keywords when generating the
2270 * exp_prag.adb (Expand_Pragma_Initial_Condition): Reimplemented.
2271 * exp_spark.adb (Expand_SPARK): Use Expand_SPARK_N_Loop_Statement to
2273 (Expand_SPARK_N_Loop_Statement): New routine.
2274 (Expand_SPARK_N_Object_Declaration): Code cleanup. Partially insert the
2275 call to the Default_Initial_Condition procedure.
2276 (Expand_SPARK_Op_Ne): Renamed to Expand_SPARK_N_Op_Ne.
2277 * exp_util.adb (Build_DIC_Procedure_Body): Capture the SPARK_Mode in
2279 (Build_DIC_Procedure_Declaration): Capture the SPARK_Mode in effect.
2280 (Insert_Actions): Add processing for N_Call_Marker.
2281 (Kill_Dead_Code): Explicitly kill an elaboration scenario.
2282 * exp_util.ads (Make_Invariant_Call): Update the comment on usage.
2283 * frontend.adb: Initialize Sem_Elab. Process all saved top level
2284 elaboration scenarios for ABE issues.
2285 * gcc-interface/trans.c (gnat_to_gnu): Add processing for N_Call_Marker
2287 * lib.adb (Earlier_In_Extended_Unit): New variant.
2288 * sem.adb (Analyze): Ignore N_Call_Marker nodes.
2289 (Preanalysis_Active): New routine.
2290 * sem.ads (Preanalysis_Active): New routine.
2291 * sem_attr.adb (Analyze_Access_Attribute): Save certain
2292 elaboration-related attributes. Save the scenario for ABE processing.
2293 * sem_ch3.adb (Analyze_Object_Declaration): Save the SPARK mode in
2294 effect. Save certain elaboration-related attributes.
2295 * sem_ch5.adb (Analyze_Assignment): Save certain elaboration-related
2296 attributes. Save the scenario for ABE processing.
2297 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Save the SPARK
2298 mode in effect. Save certain elaboration-related attributes.
2299 (Analyze_Subprogram_Body_Helper): Skip N_Call_Marker nodes when
2300 locating the first real statement.
2301 (Analyze_Subprogram_Declaration): Save the SPARK mode in effect. Save
2302 certain elaboration-related attributes.
2303 * sem_ch7.adb (Analyze_Package_Declaration): Do not suppress
2304 elaboration warnings.
2305 * sem_ch8.adb (Attribute_Renaming): Mark a subprogram body which was
2306 generated for purposes of wrapping an attribute used as a generic
2308 (Find_Direct_Name): Save certain elaboration-related attributes. Save
2309 the scenario for ABE processing.
2310 (Find_Expanded_Name): Save certain elaboration-related attributes. Save
2311 the scenario for ABE processing.
2312 * sem_ch9.adb (Analyze_Entry_Declaration): Save certain
2313 elaboration-related attributes.
2314 (Analyze_Requeue): Save certain elaboration-related attributes. Save
2315 the scenario for ABE processing.
2316 (Analyze_Single_Task_Declaration): Save certain elaboration-related
2318 (Analyze_Task_Type_Declaration): Save certain elaboration-related
2320 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Save certain
2321 elaboration-related attributes.
2322 (Analyze_Generic_Subprogram_Declaration): Save the SPARK mode in
2323 effect. Save certain elaboration-related attributes.
2324 (Analyze_Package_Instantiation): Save certain elaboration-related
2325 attributes. Save the scenario for ABE processing. Create completing
2326 bodies in case the instantiation results in a guaranteed ABE.
2327 (Analyze_Subprogram_Instantiation): Save certain elaboration-related
2328 attributes Save the scenario for ABE processing. Create a completing
2329 body in case the instantiation results in a guaranteed ABE.
2330 (Provide_Completing_Bodies): New routine.
2331 * sem_elab.ads: Brand new implementation.
2332 * sem_prag.adb (Analyze_Pragma, cases Elaborate, Elaborate_All,
2333 Elaborate_Body): Do not suppress elaboration warnings.
2334 * sem_res.adb (Make_Call_Into_Operator): Set the parent field of the
2336 (Resolve_Call): Save certain elaboration-related attributes. Save the
2337 scenario for ABE processing.
2338 (Resolve_Entity_Name): Do not perform any ABE processing here.
2339 (Resolve_Entry_Call): Inherit certain attributes from the original call.
2340 * sem_util.adb (Begin_Keyword_Location): New routine.
2341 (Defining_Entity): Update the parameter profile. Add processing for
2342 concurrent subunits that are rewritten as null statements.
2343 (End_Keyword_Location): New routine.
2344 (Find_Enclosing_Scope): New routine.
2345 (In_Instance_Visible_Part): Code cleanup.
2346 (In_Subtree): Update the parameter profile. Add new version.
2347 (Is_Preelaborable_Aggregate): New routine.
2348 (Is_Preelaborable_Construct): New routine.
2349 (Mark_Elaboration_Attributes): New routine.
2350 (Scope_Within): Update the parameter profile.
2351 (Scope_Within_Or_Same): Update the parameter profile.
2352 * sem_util.ads (Begin_Keyword_Location): New routine.
2353 (Defining_Entity): Update the parameter profile and the comment on
2355 (End_Keyword_Location): New routine.
2356 (Find_Enclosing_Scope): New routine.
2357 (In_Instance_Visible_Part): Update the parameter profile.
2358 (In_Subtree): Update the parameter profile. Add new version.
2359 (Is_Preelaborable_Aggregate): New routine.
2360 (Is_Preelaborable_Construct): New routine.
2361 (Mark_Elaboration_Attributes): New routine.
2362 (Scope_Within): Update the parameter profile and the comment on usage.
2363 (Scope_Within_Or_Same): Update the parameter profile and the comment on
2365 * sem_warn.adb (Check_Infinite_Loop_Warning): Use Has_Condition_Actions
2366 to determine whether a loop has meaningful condition actions.
2367 (Has_Condition_Actions): New routine.
2368 * sinfo.adb (ABE_Is_Certain): Removed.
2369 (Is_Declaration_Level_Node): New routine.
2370 (Is_Dispatching_Call): New routine.
2371 (Is_Elaboration_Checks_OK_Node): New routine.
2372 (Is_Initialization_Block): New routine.
2373 (Is_Known_Guaranteed_ABE): New routine.
2374 (Is_Recorded_Scenario): New routine.
2375 (Is_Source_Call): New routine.
2376 (Is_SPARK_Mode_On_Node): New routine.
2377 (No_Elaboration_Check): Removed.
2378 (Target): New routine.
2379 (Was_Attribute_Reference): New routine.
2380 (Set_ABE_Is_Certain): Removed.
2381 (Set_Is_Declaration_Level_Node): New routine.
2382 (Set_Is_Dispatching_Call): New routine.
2383 (Set_Is_Elaboration_Checks_OK_Node): New routine.
2384 (Set_Is_Initialization_Block): New routine.
2385 (Set_Is_Known_Guaranteed_ABE): New routine.
2386 (Set_Is_Recorded_Scenario): New routine.
2387 (Set_Is_Source_Call): New routine.
2388 (Set_Is_SPARK_Mode_On_Node): New routine.
2389 (Set_No_Elaboration_Check): Removed.
2390 (Set_Target): New routine.
2391 (Set_Was_Attribute_Reference): New routine.
2392 * sinfo.ads: Remove attribute ABE_Is_Certain. Attribute
2393 Do_Discriminant_Check now utilizes Flag3. Attribute
2394 No_Side_Effect_Removal now utilizes Flag17. Add new node
2395 N_Call_Marker. Update the structure of various nodes.
2396 (ABE_Is_Certain): Removed along with pragma Inline.
2397 (Is_Declaration_Level_Node): New routine along with pragma Inline.
2398 (Is_Dispatching_Call): New routine along with pragma Inline.
2399 (Is_Elaboration_Checks_OK_Node): New routine along with pragma Inline.
2400 (Is_Initialization_Block): New routine along with pragma Inline.
2401 (Is_Known_Guaranteed_ABE): New routine along with pragma Inline.
2402 (Is_Recorded_Scenario): New routine along with pragma Inline.
2403 (Is_Source_Call): New routine along with pragma Inline.
2404 (Is_SPARK_Mode_On_Node): New routine along with pragma Inline.
2405 (No_Elaboration_Check): Removed along with pragma Inline.
2406 (Target): New routine along with pragma Inline.
2407 (Was_Attribute_Reference): New routine along with pragma Inline.
2408 (Set_ABE_Is_Certain): Removed along with pragma Inline.
2409 (Set_Is_Declaration_Level_Node): New routine along with pragma Inline.
2410 (Set_Is_Dispatching_Call): New routine along with pragma Inline.
2411 (Set_Is_Elaboration_Checks_OK_Node): New routine along with pragma
2413 (Set_Is_Initialization_Block): New routine along with pragma Inline.
2414 (Set_Is_Known_Guaranteed_ABE): New routine along with pragma Inline.
2415 (Set_Is_Recorded_Scenario): New routine along with pragma Inline.
2416 (Set_Is_Source_Call): New routine along with pragma Inline.
2417 (Set_Is_SPARK_Mode_On_Node): New routine along with pragma Inline.
2418 (Set_No_Elaboration_Check): Removed along with pragma Inline.
2419 (Set_Target): New routine along with pragma Inline.
2420 (Set_Was_Attribute_Reference): New routine along with pragma Inline.
2421 * sprint.adb (Sprint_Node_Actual): Add an entry for N_Call_Marker.
2423 2017-10-09 Bob Duff <duff@adacore.com>
2425 * exp_ch7.adb (Create_Finalizer): Suppress checks within the finalizer.
2427 2017-10-09 Bob Duff <duff@adacore.com>
2429 * freeze.ads: Minor comment fixed.
2431 2017-10-09 Bob Duff <duff@adacore.com>
2433 * exp_ch6.adb: (Make_Build_In_Place_Call_In_Object_Declaration): Take
2434 care of unchecked conversions in addition to regular conversions. This
2435 takes care of a case where a type is derived from a private untagged
2436 type that is completed by a tagged controlled type.
2438 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2440 * exp_disp.adb (Build_Class_Wide_Check, Replace_Formals): When
2441 rewriting a class-wide condition, handle properly the case where the
2442 controlling argument of the operation to which the condition applies is
2443 an access to a tagged type, and the condition includes a dispatching
2444 call with an implicit dereference.
2446 2017-10-09 Bob Duff <duff@adacore.com>
2448 * exp_ch6.adb: (Make_Build_In_Place_Call_In_Object_Declaration): Remove
2449 the code at the end of this procedure that was setting the type of a
2450 class-wide object to the specific type returned by a function call.
2451 Treat this case as indefinite instead.
2453 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2455 * sem_ch4.adb (Try_Class_Wide_Operation, Traverse_Homonyms):
2456 Suppress spurious ambiguity error when two traversals of the homonym
2457 chain (first directly, and then through an examination of relevant
2458 interfaces) retrieve the same operation, when other irrelevant homonyms
2459 of the operatioh are also present.
2461 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2463 * sem_util.adb (Object_Access_Level): If the object is the return
2464 statement of an expression function, return the level of the function.
2465 This is relevant when the object involves an implicit conversion
2466 between access types and the expression function is a completion, which
2467 forces the analysis of the expression before rewriting it as a body, so
2468 that freeze nodes can appear in the proper scope.
2470 2017-10-09 Bob Duff <duff@adacore.com>
2472 * atree.adb: Make nnd apply to everything "interesting", including
2473 Rewrite. Remove rrd.
2475 2017-10-09 Javier Miranda <miranda@adacore.com>
2477 * exp_ch3.adb (Expand_N_Object_Declaration): Avoid never-ending loop
2478 processing the declaration of the dummy object internally created by
2479 Make_DT to compute the offset to the top of components referencing
2480 secondary dispatch tables.
2481 (Initialize_Tag): Do not initialize the offset-to-top field if it has
2482 been initialized initialized.
2483 * exp_disp.ads (Building_Static_Secondary_DT): New subprogram.
2484 * exp_disp.adb (Building_Static_Secondary_DT): New subprogram.
2485 (Make_DT): Create a dummy constant object if we can statically build
2486 secondary dispatch tables.
2487 (Make_Secondary_DT): For statically allocated secondary dispatch tables
2488 use the dummy object to compute the offset-to-top field value by means
2489 of the attribute 'Position.
2491 2017-10-09 Bob Duff <duff@adacore.com>
2493 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Add self-checking
2494 code so if BIPAlloc is not passed in, it will likely raise
2495 Program_Error instead of cause miscellaneous chaos.
2496 (Is_Build_In_Place_Result_Type): Return False if not Expander_Active,
2497 as for the other Is_B-I-P... functions.
2498 * sem_aggr.adb (Resolve_Extension_Aggregate): For an extension
2499 aggregate whose ancestor part is a build-in-place call returning a
2500 nonlimited type, transform the assignment to the ancestor part to use a
2502 * sem_ch3.adb (Build_Itype_Reference): Handle the case where we're
2503 creating an Itype for a library unit entity.
2504 (Check_Initialization): Avoid spurious error message on
2505 internally-generated call.
2506 * sem_ch5.adb (Analyze_Assignment): Handle the case where the
2507 right-hand side is a build-in-place call. This didn't happen when b-i-p
2508 was only for limited types.
2509 * sem_ch6.adb (Create_Extra_Formals): Remove assumption that b-i-p
2510 implies >= Ada 2005.
2511 * sem_ch7.adb (Scan_Subprogram_Refs): Avoid traversing the same nodes
2513 * sem_util.adb (Next_Actual): Handle case of build-in-place call.
2515 2017-10-09 Arnaud Charlet <charlet@adacore.com>
2517 * doc/gnat_ugn/gnat_and_program_execution.rst: Minor edit.
2519 2017-10-09 Piotr Trojanek <trojanek@adacore.com>
2521 * libgnarl/s-taprob.adb: Minor whitespace fix.
2523 2017-10-09 Bob Duff <duff@adacore.com>
2525 * namet.ads: Minor comment fix.
2527 2017-10-09 Piotr Trojanek <trojanek@adacore.com>
2529 * sem_aux.adb (Unit_Declaration_Node): Detect protected declarations,
2530 just like other program units listed in Ada RM 10.1(1).
2532 2017-10-09 Justin Squirek <squirek@adacore.com>
2534 * sem_ch8.adb (Update_Chain_In_Scope): Modify warning messages.
2536 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2538 * sem_ch12.adb (Analyze_Associations, Check_Generic_Parent): If an
2539 actual for a formal package is an instantiation of a child unit, create
2540 a freeze node for the instance of the parent if it appears in the same
2541 scope and is not frozen yet.
2543 2017-10-09 Pierre-Marie de Rodat <derodat@adacore.com>
2545 * exp_atag.ads, libgnat/a-tags.adb, libgnat/a-tags.ads: Enhance
2546 in-source documentation for tagged types's Offset_To_Top.
2548 2017-10-09 Bob Duff <duff@adacore.com>
2550 * exp_ch3.adb (Build_Assignment): Parameter name N was somewhat
2551 confusing. Same for N_Loc. Remove assumption that b-i-p implies
2552 limited. This is for the case of a function call that occurs as the
2553 default for a record component.
2554 (Expand_N_Object_Declaration): Deal with the case where expansion has
2555 created an object declaration initialized with something like
2557 * exp_ch3.adb: Minor reformatting.
2559 2017-10-09 Ed Schonberg <schonberg@adacore.com>
2561 * exp_attr.adb (Expand_Attribute_Reference, case 'Valid): The prefix of
2562 the attribute is an object, but it may appear within a conversion. The
2563 object itself must be retrieved when generating the range test that
2564 implements the validity check on a scalar type.
2566 2017-10-05 Eric Botcazou <ebotcazou@adacore.com>
2569 * mingw32.h (_O_U8TEXT, _O_U16TEXT, _O_WTEXT): Delete.
2570 * sysdep.c (__gnat_set_mode ): Use DJGPP version for Cygwin.
2572 2017-10-02 Eric Botcazou <ebotcazou@adacore.com>
2573 Pierre-Marie de Rodat <derodat@adacore.com>
2576 * libgnarl/s-linux__x32.ads (suseconds_t): New subtype.
2577 (time_t): Change from derived type to subtype.
2578 (timeval): Use suseconds_t for tv_usec.
2579 * libgnarl/s-osinte__x32.adb (To_Timespec): Remove use type clause.
2581 2017-10-02 Richard Sandiford <richard.sandiford@linaro.org>
2583 * gcc-interface/decl.c (annotate_value): Use wi::to_widest when
2584 handling the form (plus/mult (convert @0) @1).
2586 2017-09-29 Bob Duff <duff@adacore.com>
2588 * exp_ch6.adb (Expand_Call_Helper): Replace with code more similar to
2590 (Make_Build_In_Place_Call_In_Object_Declaration): Back out previous
2591 change. Set the Etype in the class-wide case. This fixes a regression
2592 in the libadalang test suite.
2594 2017-09-29 Joel Brobecker <brobecker@adacore.com>
2596 * doc/gnat_ugn/building_executable_programs_with_gnat.rst,
2597 doc/gnat_ugn/the_gnat_compilation_model.rst: Avoid use of single colon
2599 * gnat_ugn.texi: Regenerate.
2601 2017-09-29 Justin Squirek <squirek@adacore.com>
2603 * ali-util.adb, comperr.adb, cprint.adb, errout.adb, fmap.adb,
2604 fname-sf.adb, frontend.adb, lib-xref-spark_specific.adb, gnat1drv.adb,
2605 gnatls.adb, lib.adb, lib-load.adb, lib-writ.adb, prepcomp.adb,
2606 sinput-d.adb, sinput-l.adb, sprint.adb, targparm.adb: Update comparison
2607 for checking source file status and error message and/or call to
2609 * libgnat/s-os_lib.ads: Add new potential value constant for
2610 uninitialized file descriptors.
2611 * osint.adb, osint.ads (Read_Source_File): Add extra parameter to
2612 return result of IO to encompass a read access failure in addition to a
2613 file-not-found error.
2615 2017-09-29 Bob Duff <duff@adacore.com>
2617 * exp_ch6.adb (Expand_Call_Helper): Handle case of build-in-place
2618 functions returning nonlimited types. Allow for qualified expressions
2619 and type conversions.
2620 (Expand_N_Extended_Return_Statement): Correct the computation of
2621 Func_Bod to allow for child units.
2622 (Expand_Simple_Function_Return): Remove assumption that b-i-p implies
2623 limited (initialization of In_Place_Expansion), and implies >= Ada
2625 (Is_Build_In_Place_Result_Type): New function to accompany
2626 Is_Build_In_Place_Function and Is_Build_In_Place_Function_Call, because
2627 sometimes we just have the type on our hands, not the function. For
2628 now, does the same thing as the old version, so build-in-place is
2629 disabled for nonlimited types, except that you can use -gnatd.9 to
2631 * exp_ch6.ads (Is_Build_In_Place_Result_Type): New function to
2632 accompany Is_Build_In_Place_Function and
2633 Is_Build_In_Place_Function_Call, because sometimes we just have the
2634 type on our hands, not the function.
2635 (Make_Build_In_Place_Call_In_...): Handle nonlimited build-in-place
2637 (Make_Build_In_Place_Call_In_Object_Declaration): Remove the
2638 questionable code at the end that was setting the Etype.
2639 * exp_aggr.adb (Is_Build_In_Place_Aggregate_Return): New function to
2640 determine whether "return (...agg...);" is returning from a
2641 build-in-place function.
2642 (Initialize_Ctrl_Array_Component, Initialize_Ctrl_Record_Component):
2643 Remove assumption that b-i-p implies limited (initialization of
2644 In_Place_Expansion).
2645 (Build_Record_Aggr_Code): AI-287: fix comment; it can't be wrapped in
2646 an unchecked conversion. Add assertions.
2647 (Convert_Aggr_In_Object_Decl): Establish_Transient_Scope -- no need for
2648 secondary stack here, just because the type needs finalization. That
2650 (Convert_To_Assignments): Only set Unc_Decl if Nkind (N) = N_Aggregate.
2651 For "return (...agg...);" don't assume b-i-p implies limited.
2652 Needs_Finalization does not imply secondary stack.
2653 (Expand_Array_Aggregate): Named notation. Reverse the sense of
2654 Component_OK_For_Backend -- more readability with fewer double
2656 * exp_attr.adb (Expand_N_Attribute_Reference): Remove assumptions that
2657 b-i-p implies >= Ada 2005.
2658 * exp_ch3.adb (Expand_N_Object_Declaration): Remove assumptions that
2659 b-i-p implies >= Ada 2005. Remove Adjust if we're building the return
2660 object of an extended return statement in place.
2661 * exp_ch4.adb (Expand_Allocator_Expression, Expand_N_Indexed_Component,
2662 Expand_N_Selected_Component, Expand_N_Slice): Remove assumptions that
2663 b-i-p implies >= Ada 2005.
2664 * exp_ch5.adb (Expand_N_Assignment_Statement): Remove assumption that
2665 b-i-p implies >= Ada 2005.
2666 * exp_ch7.adb: Comment fix.
2667 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration): Remove
2668 assumptions that b-i-p implies >= Ada 2005.
2669 * exp_disp.adb (Expand_Interface_Actuals): Remove assumptions that
2670 b-i-p implies >= Ada 2005.
2671 * exp_util.adb (Build_Allocate_Deallocate_Proc): Look at Storage_Pool
2672 (Expr), in case Pool_Id is not set.
2673 (Initialized_By_Aliased_BIP_Func_Call): Handle case where the call is
2674 qualified or converted.
2675 (Is_Secondary_Stack_BIP_Func_Call): Don't check if Nkind (Selector_Name
2676 (Param)) = N_Identifier; that's all it could be.
2677 * sinfo.ads: Comment fixes.
2678 * snames.ads-tmpl: Comment fixes.
2679 * debug.adb: Add flag gnatd.9, to enable the build-in-place machinery.
2681 2017-09-29 Justin Squirek <squirek@adacore.com>
2683 * sem_ch8.adb (Mark_Use_Clauses): Add recursive call to properly handle
2684 all cases related to marking entity identifiers.
2686 2017-09-29 Vasiliy Fofanov <fofanov@adacore.com>
2688 * adaint.c (win32_wait): Properly handle error and take into account
2689 the WIN32 limitation on the number of simultaneous wait objects.
2691 2017-09-29 Vasiliy Fofanov <fofanov@adacore.com>
2693 * cal.c: Minor proofreading.
2695 2017-09-29 Vasiliy Fofanov <fofanov@adacore.com>
2697 * doc/gnat_ugn/gnat_utility_programs.rst: Minor formatting fix.
2698 * gnat_ugn.texi: Regenerate.
2700 2017-09-29 Bob Duff <duff@adacore.com>
2702 * lib-xref.ads: Comment fix.
2704 2017-09-29 Bob Duff <duff@adacore.com>
2706 * exp_aggr.adb: Remove calls to Set_No_Ctrl_Actions for discriminants.
2707 Discriminants can't need finalization.
2709 2017-09-29 Ed Schonberg <schonberg@adacore.com>
2711 * sem_ch6.adb (Analyze_Expression_Function): Do not emit freeze nodes
2712 for types in expression if the function is within a generic unit.
2713 * sem_res.adb (Resolve): In a generic context do not freeze an
2714 expression, unless it is an entity. This exception is solely for the
2715 purpose of detecting illegal uses of deferred constants in generic
2717 * sem_res.adb: Minor reformatting.
2719 2017-09-29 Justin Squirek <squirek@adacore.com>
2721 * sem_ch8.adb (Note_Redundant_Use): Add guard to protect against false
2724 2017-09-29 Yannick Moy <moy@adacore.com>
2726 * sinput-c.adb: Remove unused with-clause on Ada.Unchecked_Conversion.
2728 2017-09-29 Eric Botcazou <ebotcazou@adacore.com>
2730 * doc/gnat_rm/representation_clauses_and_pragmas.rst: Minor rewording.
2731 * doc/gnat_rm/implementation_defined_pragmas.rst (Optimize_Alignment):
2732 Document the effect of pragma Optimize_Alignment (Space) on non-packed
2734 * gnat_rm.texi: Regenerate.
2736 2017-09-25 Justin Squirek <squirek@adacore.com>
2738 * aspects.adb, bindgen.adb, clean.adb, erroutc.adb, exp_ch13.adb,
2739 exp_dbug.adb, exp_unst.adb, exp_util.adb, frontend.adb, gnat1drv.adb,
2740 gnatdll.adb, gnatlink.adb, gnatls.adb, gnatname.adb, gnatxref.adb,
2741 gnatfind.adb, libgnat/a-cfhama.ads, libgnat/a-exetim__mingw.adb,
2742 libgnat/a-strmap.adb, libgnat/a-teioed.adb, libgnat/g-alvety.ads,
2743 libgnat/g-expect.adb, libgnat/g-regist.adb, libgnat/g-socket.adb,
2744 libgnat/g-socthi__mingw.ads, libgnat/s-stausa.adb,
2745 libgnat/s-tsmona__linux.adb, libgnat/s-tsmona__mingw.adb,
2746 libgnarl/s-taenca.adb, libgnarl/s-tassta.adb, libgnarl/s-tarest.adb,
2747 libgnarl/s-tpobop.adb, make.adb, makeusg.adb, namet.adb, output.ads,
2748 put_scos.adb, repinfo.adb, rtsfind.adb, scn.ads, sem_attr.adb,
2749 sem_aux.ads, sem_warn.ads, targparm.adb, xr_tabls.adb, xref_lib.adb:
2750 Removal of ineffective use-clauses.
2751 * exp_ch9.adb (Is_Simple_Barrier_Name): Check for false positives with
2752 constant folded barriers.
2753 * ghost.adb, sprint.adb, sem_ch10.adb, sem_warn.adb: Change access to
2754 Subtype_Marks and Names list in use-clause nodes to their new singular
2755 counterparts (e.g. Subtype_Mark, Name).
2756 * par.adb, par-ch8.adb (Append_Use_Clause): Created to set
2757 Prev_Ids and More_Ids in use-clause nodes.
2758 (P_Use_Clause): Modify to take a list as a parameter.
2759 (P_Use_Package_Clause, P_Use_Type_Clause): Divide names and
2760 subtype_marks within an aggregate use-clauses into individual clauses.
2761 * par-ch3.adb, par-ch10.adb, par-ch12.adb: Trivally modify call to
2762 P_Use_Clause to match its new behavior.
2763 * sem.adb (Analyze): Mark use clauses for non-overloaded entities.
2764 * sem_ch4.adb (Try_One_Interp): Add sanity check to handle previous
2766 * sem_ch6.adb (Analyze_Generic_Subprogram_Body,
2767 Analyze_Subprogram_Body_Helper): Update use clause chain at the end of
2768 the declarative region.
2769 * sem_ch7.adb (Analyze_Package_Body_Helper): Update use clause chain
2770 after analysis (Analyze_Package_Specification): Update use clause chain
2771 when there is no body.
2772 * sem_ch8.ads, sem_ch8.adb (Analyze_Use_Package, Analyze_Use_Type): Add
2773 parameter to determine weither the installation of scopes should also
2774 propagate on the use-clause "chain".
2775 (Mark_Use_Clauses): Created to traverse use-clause chains and determine
2776 what constitutes a valid "use" of a clause.
2777 (Update_Use_Clause_Chain): Created to aggregate common machinary used
2778 to clean up use-clause chains (and warn on ineffectiveness) at the end
2779 of declaritive regions.
2780 * sem_ch8.adb (Analyze_Package_Name): Created to perform analysis on a
2781 package name from a use-package clause.
2782 (Analyze_Package_Name_List): Created to perform analysis on a list of
2783 package names (similar to Analyze_Package_Name).
2784 (Find_Most_Prev): Created to traverse to the beginning of a given
2786 (Most_Decendant_Use_Clause): Create to identify which clause from a
2787 given set is highest in scope (not always the most prev).
2788 (Use_One_Package, Use_One_Type): Major cleanup and reorganization to
2789 handle the new chaining algorithm, also many changes related to
2790 redundant clauses. A new parameter has also been added to force
2791 installation to handle certain cases.
2792 * sem_ch9.adb (Analyze_Entry_Body, Analyze_Protected_Body,
2793 Analyze_Task_Body): Mark use clauses on relevant entities.
2794 * sem_ch10.adb, sem_ch10.ads (Install_Context_Clauses,
2795 Install_Parents): Add parameter to determine weither the installation
2796 of scopes should also propagate on the use-clause "chain".
2797 * sem_ch12.adb (Inline_Instance_Body): Add flag in call to
2798 Install_Context to avoid redundant chaining of use-clauses.
2799 * sem_ch13.adb: Minor reformatting.
2800 * sem_res.adb (Resolve): Mark use clauses on operators.
2801 (Resolve_Call, Resolve_Entity_Name): Mark use clauses on relevant
2803 * sinfo.adb, sinfo.ads (Is_Effective_Use_Clause,
2804 Set_Is_Effective_Use_Clause): Add new flag to N_Use_Clause nodes to
2805 represent any given clause's usage/reference/necessity.
2806 (Prev_Use_Clause, Set_Prev_Use_Clause): Add new field to N_Use_Clause
2807 nodes to allow loose chaining of redundant clauses.
2808 (Set_Used_Operations, Set_Subtype_Mark, Set_Prev_Ids, Set_Names,
2809 Set_More_Ids, Set_Name): Modify set procedure calls to reflect
2810 reorganization in node fields.
2811 * types.ads (Source_File_Index): Adjust index bounds.
2812 (No_Access_To_Source_File): New constant.
2814 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2816 * sem_ch13.adb (Analyze_One_Aspect): In ASIS mode make a full copy of
2817 the expression to be used in the generated attribute specification
2818 (rather than relocating it) to avoid resolving a potentially malformed
2819 tree when the expression is resolved through an ASIS-specific call to
2820 Resolve_Aspect_Expressions. This manifests itself as a crash on a
2821 function with parameter associations.
2823 2017-09-25 Yannick Moy <moy@adacore.com>
2825 * exp_spark.adb (Expand_SPARK_Indexed_Component,
2826 Expand_SPARK_Selected_Component): New procedures to insert explicit
2827 dereference if required.
2828 (Expand_SPARK): Call the new procedures.
2830 2017-09-25 Patrick Bernardi <bernardi@adacore.com>
2832 * libgnat/a-stwiun.adb, libgnat/s-stchop__vxworks.adb,
2833 libgnat/g-socthi__vxworks.ads, libgnat/a-stzunb.adb,
2834 libgnat/a-strunb.adb, libgnarl/s-osinte__lynxos178.adb,
2835 libgnarl/s-intman__vxworks.adb, libgnarl/s-osinte__darwin.adb,
2836 libgnarl/a-exetim__darwin.adb: Removed ineffective use-clauses.
2838 2017-09-25 Vasiliy Fofanov <fofanov@adacore.com>
2840 * adaint.c (win32_wait): Properly handle error and take into account
2841 the WIN32 limitation on the number of simultaneous wait objects.
2843 2017-09-25 Yannick Moy <moy@adacore.com>
2845 * sem_ch3.adb (Constant_Redeclaration): Do not insert a call to the
2846 invariant procedure in GNATprove mode.
2847 * sem_ch5.adb (Analyze_Assignment): Likewise.
2849 2017-09-25 Piotr Trojanek <trojanek@adacore.com>
2851 * adabkend.adb (Call_Back_End): Fix wording of "front-end" and
2852 "back-end" in comments.
2854 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2856 * exp_ch6.adb (Expand_Call_Helper): The extra accessibility check in a
2857 call that appears in a classwide precondition and that mentions an
2858 access formal of the subprogram, must use the accessibility level of
2859 the actual in the call. This is one case in which a reference to a
2860 formal parameter appears outside of the body of the subprogram.
2862 2017-09-25 Hristian Kirtchev <kirtchev@adacore.com>
2864 * sem_res.adb (Replace_Actual_Discriminants): Replace a discriminant
2866 (Resolve_Entry): Clean up predicate
2868 2017-09-25 Hristian Kirtchev <kirtchev@adacore.com>
2870 * sem_prag.adb (Analyze_Constituent): Raise Unrecoverable_Error rather
2871 than Program_Error because U_E is more in line with respect to the
2874 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2876 * sem_ch13.adb (Resolve_Aspect_Expressions): The expression for aspect
2877 Storage_Size does not freeze, and thus can include references to
2880 2017-09-25 Hristian Kirtchev <kirtchev@adacore.com>
2882 * exp_spark.adb (Expand_SPARK_Potential_Renaming): Do not process a
2883 reference when it appears within a pragma of no significance to SPARK.
2884 (In_Insignificant_Pragma): New routine.
2885 * sem_prag.ads: Add new table Pragma_Significant_In_SPARK.
2887 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2889 * sem_ch12.adb (Analyze_Associations, case N_Formal_Package): If the
2890 actual is a renaming, indicate that it is the renamed package that must
2891 be frozen before the instantiation.
2893 2017-09-25 Yannick Moy <moy@adacore.com>
2895 * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo in description
2896 of dimensionality system in GNAT UG.
2897 * gnat_ugn.texi: Regenerate.
2899 2017-09-25 Yannick Moy <moy@adacore.com>
2901 * gnat1drv.adb: Call Check_Safe_Pointers from the frontend in
2902 GNATprove_Mode when switch -gnatdF used.
2904 2017-09-25 Piotr Trojanek <trojanek@adacore.com>
2906 * adabkend.adb (Call_Back_End): Reset Current_Error_Node when starting
2909 2017-09-25 Javier Miranda <miranda@adacore.com>
2911 * exp_imgv.adb (Expand_Image_Attribute): Disable the optimized
2912 expansion of user-defined enumeration types when the generation of
2913 names for enumeration literals is suppressed.
2915 2017-09-25 Gary Dismukes <dismukes@adacore.com>
2917 * libgnarl/s-taprop__linux.adb: Minor reformatting.
2919 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2921 * sem_ch13.adb (Resolve_Aspect_Expressions): Do not resolve identifiers
2922 that appear as selector names of parameter associations, as these are
2923 never resolved by visibility.
2925 2017-09-25 Justin Squirek <squirek@adacore.com>
2927 * sem_res.adb (Resolve_Entry): Generate reference for index entities.
2929 2017-09-25 Doug Rupp <rupp@adacore.com>
2931 * libgnarl/s-taprop__linux.adb (Compute_Base_Monotonic_Clock): Refine.
2933 2017-09-25 Javier Miranda <miranda@adacore.com>
2935 * exp_imgv.adb (Is_User_Defined_Enumeration_Type): New subprogram.
2936 (Expand_User_Defined_Enumeration_Image): New subprogram.
2937 (Expand_Image_Attribute): Enable speed-optimized expansion of
2938 user-defined enumeration types when we are compiling with optimizations
2941 2017-09-25 Piotr Trojanek <trojanek@adacore.com>
2943 * sem_util.adb (Has_Null_Abstract_State): Remove, as an exactly same
2944 routine is already provided by Einfo.
2945 * einfo.adb (Has_Null_Abstract_State): Replace with the body from
2946 Sem_Util, which had better comments and avoided double calls to
2949 2017-09-25 Bob Duff <duff@adacore.com>
2951 * exp_ch3.adb: Rename Comp_Type_Simple to be Comp_Simple_Init.
2953 2017-09-25 Doug Rupp <rupp@adacore.com>
2955 * libgnarl/s-taprop__linux.adb (Base_Monotonic_Clock): New variable.
2956 (Compute_Base_Monotonic_Clock): New function.
2957 (Timed_Sleep): Adjust to use Base_Monotonic_Clock.
2958 (Timed_Delay): Likewise.
2959 (Monotonic_Clock): Likewise.
2960 * s-oscons-tmplt.c (CLOCK_MONOTONIC): Use on Linux.
2962 2017-09-25 Ed Schonberg <schonberg@adacore.com>
2964 * sem_ch12.adb (Save_References_In_Aggregate): Small correction to
2967 2017-09-25 Hristian Kirtchev <kirtchev@adacore.com>
2969 * exp_ch5.adb, sem_ch4.adb, sem_ch13.adb, sem_attr.adb, exp_ch3.adb:
2972 2017-09-20 Alexandre Oliva <aoliva@redhat.com>
2974 * gcc-interface/lang.opt (gant, gnatO, gnat): Add RejectNegative.
2976 2017-09-18 Bob Duff <duff@adacore.com>
2978 * sem_ch4.adb (Complete_Object_Operation): Do not insert 'Access for
2979 reference types in the access-to-access case.
2981 2017-09-18 Eric Botcazou <ebotcazou@adacore.com>
2983 * sem_attr.adb (Analyze_Access_Attribute): Move check for the presence
2984 of the "aliased" keyword on the prefix from here to...
2985 (Resolve_Attribute) <Attribute_Access>: ...here. Remove useless call
2986 to Check_No_Implicit_Aliasing.
2987 * sinfo.ads (Non_Aliased_Prefix): Delete.
2988 (Set_Non_Aliased_Prefix): Likewise.
2989 * sinfo.adb (Non_Aliased_Prefix): Delete.
2990 (Set_Non_Aliased_Prefix): Likewise.
2992 2017-09-18 Bob Duff <duff@adacore.com>
2994 * exp_ch5.adb (Build_Formal_Container_Iteration,
2995 Expand_Formal_Container_Element_Loop): Convert the container to the
2996 root type before passing it to the iteration operations, so it will be
2999 2017-09-18 Bob Duff <duff@adacore.com>
3001 * einfo.ads, validsw.ads, treepr.ads, sem_util.ads: Comment fixes.
3003 2017-09-18 Bob Duff <duff@adacore.com>
3005 * exp_ch3.adb (Build_Array_Init_Proc): If validity checking is enabled,
3006 and it's a bit-packed array, pass False to the Consider_IS parameter of
3007 Needs_Simple_Initialization.
3009 2017-09-18 Hristian Kirtchev <kirtchev@adacore.com>
3011 * sem_ch6.adb (Check_Inline_Pragma): Link the newly generated spec to
3012 the preexisting body.
3013 * sem_prag.adb (Check_Inline_Always_Placement): New routine.
3014 (Process_Inline): Verify the placement of pragma Inline_Always. The
3015 pragma must now appear on the initial declaration of the related
3018 2017-09-18 Ed Schonberg <schonberg@adacore.com>
3020 * sem_ch3.adb (Analyze_Declarations): In ASIS mode, At the end of the
3021 declarative list in a subprogram body, analyze aspext specifications to
3022 provide basic semantic information, because otherwise the aspect
3023 specifications might only be snalyzed during expansion, when related
3024 subprograms are generated.
3026 2017-09-18 Bob Duff <duff@adacore.com>
3028 * exp_ch9.adb (Is_Simple_Barrier_Name): Follow Original_Node, in case
3029 validity checks have rewritten the tree.
3031 2017-09-18 Bob Duff <duff@adacore.com>
3033 * sem_util.adb: Comment fixes, and remove redundant Is_Itype check.
3035 2017-09-18 Ed Schonberg <schonberg@adacore.com>
3037 * sem_ch12.adb (Save_References_In_Aggregate): When constructing a
3038 qualified exxpression for an aggregate in a generic unit, verify that
3039 the scope of the type is itself visible and not hidden, so that the
3040 qualified expression is correctly resolved in any instance.
3042 2017-09-18 Bob Duff <duff@adacore.com>
3044 * sem_ch4.adb (Analyze_Qualified_Expression): Give an error if the type
3045 mark refers to the current instance. Set the type to Any_Type in that
3046 case, to avoid later crashes.
3048 2017-09-18 Ed Schonberg <schonberg@adacore.com>
3050 * exp_ch3.adb (Replace_Discriminant_References): New procedure,
3051 subsidiary of Build_Assignment, used to handle the initialization code
3052 for a mutable record component whose default value is an aggregate that
3053 sets the values of the discriminants of the components.
3055 2017-09-18 Eric Botcazou <ebotcazou@adacore.com>
3057 * sem_ch13.adb (Analyze_Attribute_Definition_Clause) <Address>: Mark
3058 the entity as being volatile for an overlay that toggles the scalar
3061 2017-09-18 Fedor Rybin <frybin@adacore.com>
3063 * doc/gnat_ugn/gnat_utility_programs.rst: Document that gnattest
3064 options -U main and --harness-only are not compatible.
3066 2017-09-18 Hristian Kirtchev <kirtchev@adacore.com>
3068 * freeze.adb, sem_ch6.adb, sem_res.adb: Minor reformatting.
3070 2017-09-18 Piotr Trojanek <trojanek@adacore.com>
3072 * einfo.ads (Is_Imported): Update comment, as this
3073 routine also applies to constants.
3075 2017-09-18 Yannick Moy <moy@adacore.com>
3077 * sem_util.adb (Find_Placement_In_State_Space): Allow generic package
3080 2017-09-18 Justin Squirek <squirek@adacore.com>
3082 * sem_prag.adb (Is_Non_Significant_Pragma_Reference): Change the
3083 constant indication for Pragma_Linker_Section.
3085 2017-09-18 Bob Duff <duff@adacore.com>
3087 Alternate fix for PR ada/71358
3088 * libgnat/g-comlin.adb (Getopt): Remove manual null access checks.
3089 Instead, make a local copy of Config, and if it's null, allocate an
3090 empty Command_Line_Configuration_Record, so we won't crash on null
3091 pointer dereference.
3093 2017-09-16 Eric Botcazou <ebotcazou@adacore.com>
3095 * libgnarl/a-intnam__rtems.ads: Update copyright date.
3096 * libgnarl/s-interr__hwint.adb: Likewise.
3097 * libgnarl/s-osinte__kfreebsd-gnu.ads: Likewise.
3098 * libgnarl/s-osinte__rtems.adb: Likewise.
3099 * libgnarl/s-osinte__rtems.ads: Likewise.
3101 2017-09-13 Nicolas Roche <roche@adacore.com>
3103 * Make-lang.in: In the fallback mechanim, parse the associated .ali
3104 file and try to guess the locations of dependencies.
3106 2017-09-13 Eric Botcazou <ebotcazou@adacore.com>
3108 * sem_ch13.adb (Register_Address_Clause_Check): New procedure to save
3109 the suppression status of Alignment_Check on the current scope.
3110 (Alignment_Checks_Suppressed): New function to use the saved instead of
3111 the current suppression status of Alignment_Check.
3112 (Address_Clause_Check_Record): Add Alignment_Checks_Suppressed field.
3113 (Analyze_Attribute_Definition_Clause): Instead of manually appending to
3114 the table, call Register_Address_Clause_Check.
3115 (Validate_Address_Clauses): Call Alignment_Checks_Suppressed on the
3116 recorded address clause instead of its entity.
3118 2017-09-13 Jerome Guitton <guitton@adacore.com>
3120 * libgnarl/s-tpopsp__vxworks-tls.adb,
3121 libgnarl/s-tpopsp__vxworks-rtp.adb, libgnarl/s-tpopsp__vxworks.adb
3122 (Self): Register thread if task id is null.
3124 2017-09-13 Arnaud Charlet <charlet@adacore.com>
3126 * libgnat/s-htable.adb, libgnat/s-htable.ads: Minor style tuning.
3128 2017-09-13 Arnaud Charlet <charlet@adacore.com>
3130 * lib-xref-spark_specific.adb (Scopes): simplify hash map; now it maps
3131 from an entity to only scope index, as a mapping from an entity to the
3132 same entity was useless.
3133 (Get_Scope_Num): refactor as a simple renaming; rename parameter from N
3135 (Set_Scope_Num): refactor as a simple renaming; rename parameter from N
3137 (Is_Constant_Object_Without_Variable_Input): remove local "Result"
3138 variable, just use return statements.
3140 2017-09-13 Arnaud Charlet <charlet@adacore.com>
3142 * libgnarl/s-vxwext__kernel-smp.adb,
3143 libgnarl/s-tpopsp__vxworks-rtp.adb, libgnarl/s-vxwext__noints.adb:
3146 2017-09-13 Hristian Kirtchev <kirtchev@adacore.com>
3148 * einfo.adb: Flag42 is now Is_Controlled_Active.
3149 (Is_Controlled): This attribute is now synthesized.
3150 (Is_Controlled_Active): This attribute is now an explicit flag rather
3151 than a synthesized attribute. (Set_Is_Controlled): Removed.
3152 (Set_Is_Controlled_Active): New routine.
3153 (Write_Entity_Flags): Update the output for Flag42.
3154 * einfo.ads: Update the documentation of the following attributes:
3155 Disable_Controlled, Is_Controlled, Is_Controlled_Active, Is_Controlled
3156 and Is_Controlled_Active have swapped their functionality.
3157 (Is_Controlled): Renamed to Is_Controlled_Active.
3158 (Is_Controlled_Active): Renamed to Is_Controlled.
3159 (Set_Is_Controlled): Renamed to Set_Is_Controlled_Active.
3160 * exp_ch3.adb (Expand_Freeze_Record_Type): Restore the original use of
3162 * exp_util.adb (Has_Some_Controlled_Component): Code clean up.
3163 (Needs_Finalization): Code clean up. Remove the tests for
3164 Disable_Controlled because a) they were incorrect as they would reject
3165 a type which is sublect to the aspect, but may contain controlled
3166 components, and b) they are no longer necessary.
3167 * exp_util.ads (Needs_Finalization): Update comment on documentation.
3168 * freeze.adb (Freeze_Array_Type): Restore the original use of
3170 (Freeze_Record_Type): Restore the original use of Is_Controlled.
3171 * sem_ch3.adb (Analyze_Object_Declaration): Restore the original use of
3173 (Array_Type_Declaration): Restore the original use of Is_Controlled.
3174 (Build_Derived_Private_Type): Restore the original use of
3176 (Build_Derived_Record_Type): Set the Is_Controlled_Active flag of a
3177 type derived from Ada.Finalization.[Limited_]Controlled.
3178 (Build_Derived_Type): Restore the original use of Is_Controlled.
3179 (Record_Type_Definition): Restore the original use of Is_Controlled.
3180 * sem_ch7.adb (Preserve_Full_Attributes): Restore the original use of
3182 * sem_ch13.adb (Analyze_Aspect_Disable_Controlled): New routine.
3183 (Analyze_Aspect_Specifications): Use routine
3184 Analyze_Aspect_Disable_Controlled to process aspect Disable_Controlled.
3186 2017-09-13 Vincent Celier <celier@adacore.com>
3188 * clean.adb (Gnatclean): Fix error when looking for target
3189 of <target>-gnatclean
3191 2017-09-13 Javier Miranda <miranda@adacore.com>
3192 Ed Schonberg <schonberg@adacore.com>
3194 * sem_ch8.adb (Find_Expanded_Name): Complete code that identifies an
3195 expanded name that designates the current instance of a child unit in
3196 its own body and appears as the prefix of a reference to an entity
3197 local to the child unit.
3199 2017-09-12 Bob Duff <duff@adacore.com>
3201 * sem_warn.adb: Minor comment.
3203 2017-09-12 Bob Duff <duff@adacore.com>
3205 * libgnat/a-cbdlli.adb, libgnat/a-cbhama.adb,
3206 libgnat/a-cbmutr.adb, libgnat/a-cborma.adb: Rename New_Item to
3207 be Default_Initialized_Item, and apply pragma Unmodified to it,
3208 to suppress the warning.
3210 2017-09-12 Eric Botcazou <ebotcazou@adacore.com>
3212 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): Add early return
3215 2017-09-12 Yannick Moy <moy@adacore.com>
3217 * gnat1drv.adb (Adjust_Global_Switches): Consider Refined_Global
3218 together with Global when ignoring one in CodePeer mode.
3220 2017-09-12 Javier Miranda <miranda@adacore.com>
3222 * sem_ch3.adb (Analyze_Declarations): In nested
3223 package declarations that have a private part enable missing check
3224 of the RM rule 13.1.1(11/3): usage names in aspect definitions are
3225 resolved at the end of the immediately enclosing declaration list.
3227 2017-09-12 Bob Duff <duff@adacore.com>
3229 * sem_ch6.adb (Analyze_Expression_Function): Initialize Def_Id to
3232 2017-09-12 Georges-Axel Jaloyan <jaloyan@adacore.com>
3234 * debug.adb: Reserving flag -gnatdF for safe pointer checking.
3235 * gnat1drv.adb (gnat1drv): Adding the call to the analysis on
3237 * sem_spark.adb, sem_spark.ads: Implementation of the analysis,
3238 in preparation for the evolution of the SPARK language that
3239 includes a pointer analysis for checking non-aliasing of access
3240 types. The Check_Safe_Pointers function is the entry point, and
3241 will traverse the AST and raise compile-time errors everytime
3242 it detects non-begign aliasing. Detailed comments are present
3243 in the sem_spark.ads file.
3244 * sem_util.adb, sem_util.ads (First_Global, Next_Global): New
3245 functions to iterate over the list of globals of a subprogram.
3246 * libgnat/system.ads: Add restriction No_Finalization.
3247 * gcc-interface/Make-lang.in: Add new file sem_spark.adb and
3248 dependency on g-dynhta.adb.
3250 2017-09-12 Bob Duff <duff@adacore.com>
3252 * sem_ch6.adb (Analyze_Expression_Function): Call
3253 Check_Dynamically_Tagged_Expression.
3254 * sem_util.adb (Check_Dynamically_Tagged_Expression): Remove
3255 "and then Is_Tagged_Type (Typ)" because there is an earlier
3256 "Assert (Is_Tagged_Type (Typ))".
3258 2017-09-12 Eric Botcazou <ebotcazou@adacore.com>
3260 * gcc-interface/Makefile.in (SPARC/Solaris): Remove obsolete stuff.
3262 2017-09-11 Arnaud Charlet <charlet@adacore.com>
3264 * doc/gnat_ugn/the_gnat_compilation_model.rst: Fix sphinx warning.
3265 * doc/gnat_ugn/platform_specific_information.rst: Remove doc
3266 for no longer supported platforms.
3267 * doc/gnat_ugn/gnat_and_program_execution.rst: Added detailed
3268 description of the semantics for dimensionality analysis.
3269 * gnat_ugn.texi: Regenerated.
3271 2017-09-11 Eric Botcazou <ebotcazou@adacore.com>
3273 * freeze.adb (Has_Incomplete_Compoent): Delete.
3275 Do not inhibit the freezing of the profile of an expression
3277 (Freeze_Subprogram): Do not re-create extra formals.
3278 * sem_ch6.adb (Analyze_Expression_Function): Always
3279 pre-analyze the expression if the function is not a completion.
3280 (Analyze_Subprogram_Body_Helper): For the body generated
3281 from an expression function that is not a completion, do
3282 not freeze the profile and temporary mask the types declared
3283 outside the expression that are not yet frozen.
3284 * sem_res.adb (Rewrite_Renamed_Operator): Also bail out if invoked
3285 during the pre-analysis of an expression function.
3287 2017-09-11 Eric Botcazou <ebotcazou@adacore.com>
3289 * gcc-interface/gigi.h (enum standard_datatypes): Minor tweak.
3292 2017-09-11 Yannick Moy <moy@adacore.com>
3294 * lib-xref-spark_specific.adb: Minor rewrite.
3296 2017-09-11 Jerome Lambourg <lambourg@adacore.com>
3298 * libgnat: Rename ?-[a-z]*-* into ?-[a-z]*__*
3299 * gcc-interface/Makefile.in, gcc-interface/Make-lang.in: Take this
3300 renaming into account.
3302 2017-09-11 Jerome Lambourg <lambourg@adacore.com>
3304 * libgnarl: Rename ?-[a-z]*-* into ?-[a-z]*__*
3305 * gcc-interface/Makefile.in: Take this renaming into account.
3307 2017-09-11 Arnaud Charlet <charlet@adacore.com>
3309 * s-auxdec-empty.ads, s-auxdec-empty.adb, 9drpc.adb: Removed, no
3312 2017-09-11 Yannick Moy <moy@adacore.com>
3314 * sem_util.adb (Check_Result_And_Post_State):
3315 Do not issue a warning about missing reference to an outcome if
3316 the subprogram is ghost and has no outputs.
3317 * lib-xref-spark_specific.adb, sem_aggr.adb, sem_aux.ads: Minor
3320 2017-09-11 Yannick Moy <moy@adacore.com>
3322 * gnat1drv.adb (Adjust_Global_Switches): Set
3323 Check_Validity_Of_Parameters to False in GNATprove mode.
3324 * opt.ads (Check_Validity_Of_Parameters): Document switch to
3327 2017-09-09 Pierre-Marie de Rodat <derodat@adacore.com>
3329 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Don't
3330 generate debug info for inner record types if -fgnat-encodings=minimal.
3331 (gnat_to_gnu_entity) <E_Record_Subtype>: Use the ultimate base record
3332 type as the debug type.
3334 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3336 * gcc-interface/decl.c (components_to_record): Do not reorder in non-
3337 packed record types if pragma Optimize_Alignment (Space) is enabled.
3339 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3341 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Disregard inlining
3342 limits for expression functions.
3343 (gnat_to_gnu) <N_Object_Declaration>: Fix formatting.
3345 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3347 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Copy the
3348 layout of the record from the parent type only if both are or are not
3350 (is_stored_discriminant): Return false for an unchecked union.
3352 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3354 * gcc-interface/utils2.c (build_allocator): In type_annotate_only mode
3357 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3359 * gcc-interface/decl.c (promote_object_alignment): New function taken
3361 (gnat_to_gnu_entity) <E_Variable>: ...here. Invoke it.
3362 (gnat_to_gnu_field): If the field is Atomic or VFA, invoke it and
3363 create a padding type on success before doing the atomic check.
3365 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3367 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Apply the
3368 promotion to static memory earlier in the processing.
3370 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3372 * gcc-interface/decl.c (gnat_to_gnu_entity): Only set the TYPE_ALIGN_OK
3373 and TYPE_BY_REFERENCE_P flags on types after various promotions.
3374 * gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
3375 Consider all kinds of entities.
3377 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
3379 * gcc-interface/utils.c (convert): When converting to a padding type,
3380 reuse an existing CONSTRUCTOR if it has got the right size.
3382 2017-09-08 Nicolas Roche <roche@adacore.com>
3384 * gcc-interface/Make-lang.in, gcc-interface/Makefile.in: Find runtime
3386 * a-lfztio.ads, g-timsta.ads, g-sercom-linux.adb, s-osprim-solaris.adb,
3387 a-inteio.ads, s-stchop-rtems.adb, s-casuti.adb, s-pack39.adb,
3388 i-vxwork-x86.ads, a-strbou.adb, a-stzmap.adb, s-assert.adb,
3389 a-sfecin.ads, a-cohama.adb, s-casuti.ads, a-suenco.adb, s-pack39.ads,
3390 a-stzmap.ads, a-strbou.ads, s-stalib.adb, s-trasym.adb, g-comver.adb,
3391 s-assert.ads, s-vector.ads, g-cgi.adb, a-cohama.ads, s-wchcnv.adb,
3392 a-titest.adb, s-pack48.adb, a-suenco.ads, a-strunb.adb, s-stalib.ads,
3393 s-trasym.ads, a-nudira.adb, g-comver.ads, a-nuflra.adb, g-cgi.ads,
3394 a-chacon.adb, s-wchcnv.ads, a-excach.adb, s-pack48.ads, a-titest.ads,
3395 a-strunb.ads, s-dwalin.adb, a-nudira.ads, a-chtgbo.adb, s-resfil.adb,
3396 a-scteio.ads, a-nuflra.ads, g-soliop-mingw.ads, s-pack57.adb,
3397 a-chacon.ads, s-bytswa.ads, s-pooloc.adb, g-os_lib.adb, s-dwalin.ads,
3398 a-szuzha.adb, s-resfil.ads, a-chtgbo.ads, s-spsufi.adb, s-pack57.ads,
3399 s-pooloc.ads, g-os_lib.ads, a-stfiha.ads, a-lcteio.ads, a-wtcoau.adb,
3400 a-szuzha.ads, s-mmosin-unix.adb, a-stmaco.ads, s-spsufi.ads,
3401 s-stchop-limit.ads, a-wtcoau.ads, a-exctra.adb, s-mmosin-unix.ads,
3402 s-sequio.adb, s-conca2.adb, g-table.adb, s-imglli.adb,
3403 a-numaux-x86.adb, a-strsea.adb, s-wchstw.adb, a-clrefi.adb,
3404 a-wwboio.adb, a-exctra.ads, s-sequio.ads, s-conca2.ads, a-wwunio.ads,
3405 system-linux-hppa.ads, g-table.ads, s-dimkio.ads, s-imglli.ads,
3406 a-cofove.adb, a-numaux-x86.ads, s-wchstw.ads, a-strsea.ads,
3407 a-clrefi.ads, a-wwboio.ads, s-stratt-xdr.adb, s-crc32.adb,
3408 s-excmac-arm.adb, g-busora.adb, a-cofove.ads, s-osprim-unix.adb,
3409 g-io.adb, s-pack49.adb, s-crc32.ads, s-excmac-arm.ads, a-fzteio.ads,
3410 g-busora.ads, s-stausa.adb, system-linux-mips.ads, sequenio.ads,
3411 g-exctra.adb, g-rewdat.adb, a-cgaaso.adb, g-io.ads, s-pack49.ads,
3412 a-wtflau.adb, a-undesu.adb, s-stausa.ads, a-ztenau.adb, g-enutst.ads,
3413 calendar.ads, s-pack58.adb, g-rewdat.ads, g-exctra.ads, s-ststop.adb,
3414 a-cgaaso.ads, a-strfix.adb, a-comlin.adb, a-strunb-shared.adb,
3415 a-wtflau.ads, a-undesu.ads, a-cbhase.adb, a-ztenau.ads, s-os_lib.adb,
3416 a-coorse.adb, a-chlat1.ads, s-pack58.ads, s-ststop.ads, a-strfix.ads,
3417 a-comlin.ads, a-strunb-shared.ads, a-nscefu.ads, s-valboo.adb,
3418 directio.ads, a-chtgke.adb, a-cbhase.ads, a-wtinau.adb,
3419 system-linux-alpha.ads, s-os_lib.ads, a-coorse.ads,
3420 system-linux-s390.ads, s-imgwiu.adb, a-chtgop.adb, s-valboo.ads,
3421 a-chtgke.ads, a-tienio.adb, s-conca3.adb, a-wtinau.ads,
3422 system-darwin-ppc.ads, i-c.adb, s-expllu.adb, g-expect.adb,
3423 g-sha256.ads, s-vallld.adb, s-imgwiu.ads, a-chtgop.ads, a-strmap.adb,
3424 a-tienio.ads, s-conca3.ads, s-imgint.adb, i-c.ads, s-expllu.ads,
3425 s-osprim-darwin.adb, a-cogeso.adb, g-expect.ads, a-iwteio.ads,
3426 s-vallld.ads, a-coinho-shared.adb, g-shsh64.adb, a-strmap.ads,
3427 g-comlin.adb, a-excpol.adb, s-imgint.ads, a-ztdeau.adb, a-cogeso.ads,
3428 a-coinho-shared.ads, g-shsh64.ads, g-comlin.ads, a-stzsup.adb,
3429 a-rbtgbk.adb, a-wtmoau.adb, a-ztdeau.ads, s-exnlli.adb, g-tty.adb,
3430 g-heasor.adb, g-socthi-dummy.adb, s-llflex.ads, a-zchara.ads,
3431 a-stzsup.ads, a-ztcstr.adb, a-rbtgbk.ads, a-sfwtio.ads, a-wtmoau.ads,
3432 a-sulcin.adb, s-exnlli.ads, system-freebsd.ads, a-stunha.adb,
3433 a-charac.ads, g-tty.ads, g-heasor.ads, s-exctra.adb,
3434 g-socthi-dummy.ads, a-coboho.adb, a-ztcstr.ads, a-tideio.adb,
3435 a-sulcin.ads, a-wrstfi.adb, g-alleve.adb, s-pack59.adb, a-ngrear.adb,
3436 a-stboha.adb, a-stunau-shared.adb, a-stunha.ads, a-lfwtio.ads,
3437 s-fileio.adb, s-exctra.ads, a-coboho.ads, a-ioexce.ads, a-tideio.ads,
3438 a-ngrear.ads, a-wrstfi.ads, s-pack59.ads, g-alleve.ads, a-stboha.ads,
3439 s-poosiz.adb, g-traceb.adb, g-rannum.adb, machcode.ads, s-purexc.ads,
3440 s-fileio.ads, a-cfinve.adb, a-crbtgk.adb, system-solaris-x86.ads,
3441 s-poosiz.ads, g-rannum.ads, g-traceb.ads, a-except.adb, s-conca4.adb,
3442 a-stream.adb, a-cfinve.ads, a-crbtgk.ads, s-wchwts.adb,
3443 system-mingw.ads, a-except.ads, s-conca4.ads, a-chzla9.ads,
3444 s-valenu.adb, s-soflin.adb, a-stream.ads, a-cgarso.adb, s-valllu.adb,
3445 g-crc32.adb, s-wchwts.ads, s-fatflt.ads, s-imguns.adb, s-strcom.adb,
3446 g-decstr.adb, s-valenu.ads, s-soflin.ads, a-cgarso.ads, a-cwila1.ads,
3447 s-valllu.ads, g-crc32.ads, s-imguns.ads, g-spipat.adb, s-valwch.adb,
3448 s-strcom.ads, g-decstr.ads, text_io.ads, g-debuti.adb, s-stchop.adb,
3449 g-spipat.ads, s-valwch.ads, a-string.ads, s-exnint.adb, g-awk.adb,
3450 g-tasloc.adb, s-wwdenu.adb, s-boustr.adb, a-zchuni.adb, s-stchop.ads,
3451 g-debuti.ads, s-stopoo.adb, system-dragonfly-x86_64.ads,
3452 system-linux-x86.ads, s-exnint.ads, g-awk.ads, a-stzhas.adb,
3453 g-tasloc.ads, s-wwdenu.ads, g-debpoo.adb, g-except.ads,
3454 g-sse.ads, s-boustr.ads, a-zchuni.ads, s-bitops.adb, s-wwdwch.adb,
3455 s-stopoo.ads, a-catizo.adb, a-stzhas.ads, a-nlcefu.ads, g-debpoo.ads,
3456 i-vxwoio.adb, s-bitops.ads, g-io-put-vxworks.adb, s-wwdwch.ads,
3457 g-sehamd.adb, a-ssicst.adb, a-catizo.ads, s-mmap.adb, g-string.adb,
3458 s-traceb.adb, a-swunau.adb, s-rannum.adb, a-ticoau.adb, i-vxwoio.ads,
3459 g-sehamd.ads, a-stwiun.adb, a-ssicst.ads, s-conca5.adb, a-ssitio.ads,
3460 s-mmap.ads, a-zttest.adb, g-string.ads, g-sercom.adb, a-cdlili.adb,
3461 a-swunau.ads, s-traceb.ads, s-rannum.ads, a-ticoau.ads, system-aix.ads,
3462 a-cforma.adb, a-stwiun.ads, s-conca5.ads, s-carsi8.adb, a-zttest.ads,
3463 g-sercom.ads, a-cdlili.ads, a-cihama.adb, g-sptain.ads, a-cforma.ads,
3464 s-maccod.ads, s-carsi8.ads, a-strsup.adb, g-sha1.adb, a-cihama.ads,
3465 g-stseme.adb, s-traent.adb, s-valcha.adb, g-curexc.ads, a-strsup.ads,
3466 g-sha1.ads, a-sflcin.ads, s-traent.ads, s-pack10.adb, s-valcha.ads,
3467 a-coteio.ads, s-tasloc.adb, g-utf_32.adb, a-suteio.adb, s-except.adb,
3468 a-direct.adb, g-stsifd-sockets.adb, a-numaux-vxworks.ads, s-winext.ads,
3469 s-pack10.ads, a-ztexio.adb, a-tiflau.adb, system-vxworks-arm.ads,
3470 s-tasloc.ads, a-suteio.ads, g-utf_32.ads, s-except.ads,
3471 a-direct.ads, a-swbwha.adb, g-hesorg.adb, s-wwdcha.adb, a-wtedit.adb,
3472 a-ztexio.ads, a-wtcoio.adb, a-tiflau.ads, a-ssizti.ads, s-casi32.adb,
3473 a-swbwha.ads, s-veboop.adb, g-hesorg.ads, s-parame-rtems.adb,
3474 s-wwdcha.ads, a-wtedit.ads, a-stuten.adb, a-coinve.adb, a-wtcoio.ads,
3475 s-casi32.ads, s-string.adb, a-tiinau.adb, a-cusyqu.adb, s-conca6.adb,
3476 s-veboop.ads, a-cgcaso.adb, a-numaux-darwin.adb, a-envvar.adb,
3477 a-stuten.ads, s-secsta.adb, a-coinve.ads, s-string.ads, a-cusyqu.ads,
3478 a-tiinau.ads, s-osprim-vxworks.adb, s-conca6.ads, g-spchge.adb,
3479 s-parint.adb, a-cuprqu.adb, a-cgcaso.ads, a-numaux-darwin.ads,
3480 a-envvar.ads, s-secsta.ads, g-spchge.ads, s-parint.ads, a-cuprqu.ads,
3481 a-swuwti.adb, a-flteio.ads, a-sbhcin.adb, a-coprnu.adb, g-u3spch.adb,
3482 s-atocou.adb, g-ctrl_c.adb, a-swuwti.ads, a-calend.adb, a-sbhcin.ads,
3483 a-coprnu.ads, g-dirope.adb, g-sha512.ads, g-u3spch.ads, s-atocou.ads,
3484 g-ctrl_c.ads, a-timoau.adb, a-witeio.adb, s-pack11.adb, a-strhas.adb,
3485 a-wtflio.adb, g-spitbo.adb, a-calend.ads, a-ztenio.adb, g-dirope.ads,
3486 a-slcain.adb, g-sechas.adb, a-timoau.ads, a-witeio.ads, s-pack11.ads,
3487 s-shasto.adb, s-traceb-mastop.adb, a-ciorse.adb, s-utf_32.adb,
3488 a-strhas.ads, a-wtflio.ads, g-spitbo.ads, a-ztenio.ads, a-slcain.ads,
3489 g-sechas.ads, s-gearop.adb, a-siztio.ads, s-pack20.adb, s-shasto.ads,
3490 a-ciorse.ads, s-utf_32.ads, s-crtl.ads, a-wtinio.adb, s-elaall.adb,
3491 s-explli.adb, s-chepoo.ads, s-gearop.ads, a-einuoc.adb, s-pack20.ads,
3492 system-linux-ia64.ads, a-swunau-shared.adb, a-wtinio.ads, g-alvety.ads,
3493 a-liztio.ads, g-calend.adb, s-conca7.adb, s-elaall.ads, s-explli.ads,
3494 a-einuoc.ads, s-widboo.adb, s-imgdec.adb, a-cbhama.adb, g-calend.ads,
3495 s-conca7.ads, a-llitio.ads, i-cexten.ads, a-coorma.adb, s-widboo.ads,
3496 s-diflio.adb, g-souinf.ads, s-imgdec.ads, g-strhas.ads, a-cbhama.ads,
3497 g-shshco.adb, a-ztdeio.adb, s-gloloc.adb, a-coorma.ads, g-wispch.adb,
3498 s-pack03.adb, g-eacodu.adb, s-casi16.adb, s-diflio.ads, a-colien.adb,
3499 g-shshco.ads, a-wtmoio.adb, a-rbtgbo.adb, a-ztdeio.ads,
3500 system-rtems.ads, s-gloloc.ads, a-csquin.ads, a-cofuse.adb,
3501 g-wispch.ads, s-pack03.ads, s-casi16.ads, s-io.adb, a-colien.ads,
3502 g-alveop.adb, gnat.ads, s-diinio.adb, a-cfdlli.adb, g-pehage.adb,
3503 a-wtmoio.ads, a-stwiha.adb, a-locale.adb, a-tirsfi.adb, a-nscoty.ads,
3504 a-rbtgbo.ads, s-pack12.adb, a-cofuse.ads, a-sfteio.ads, s-io.ads,
3505 g-alveop.ads, a-cfdlli.ads, s-diinio.ads, a-stwiha.ads, g-pehage.ads,
3506 a-locale.ads, a-tirsfi.ads, s-pack12.ads, s-valuti.adb, g-cppexc.adb,
3507 system-vxworks-ppc.ads, g-memdum.adb, a-lfteio.ads, s-pack21.adb,
3508 s-unstyp.ads, s-valuti.ads, g-cppexc.ads, system-hpux-ia64.ads,
3509 g-memdum.ads, g-soccon.ads, g-altive.ads, a-crbtgo.adb, s-pack21.ads,
3510 a-llizti.ads, a-numaux-libc-x86.ads, s-expint.adb, s-conca8.adb,
3511 a-crbtgo.ads, s-pack30.adb, s-vallli.adb, s-geveop.adb, s-expint.ads,
3512 a-direio.adb, s-conca8.ads, a-widcha.ads, s-pack30.ads, s-vallli.ads,
3513 s-strhas.adb, s-geveop.ads, g-md5.adb, a-direio.ads, a-numaux.ads,
3514 s-ransee.adb, a-szbzha.adb, i-cobol.adb, g-busorg.adb, s-strhas.ads,
3515 g-md5.ads, s-widenu.adb, s-ransee.ads, s-widllu.adb, a-szbzha.ads,
3516 a-ststio.adb, i-cobol.ads, g-busorg.ads, g-regpat.adb, s-widenu.ads,
3517 a-secain.adb, s-widllu.ads, s-pack13.adb, g-encstr.adb, a-ztcoau.adb,
3518 a-ststio.ads, s-widwch.adb, g-regpat.ads, s-atacco.adb, a-cborse.adb,
3519 a-secain.ads, s-pack13.ads, g-encstr.ads, a-ztcoau.ads, s-widwch.ads,
3520 g-io_aux.adb, s-atacco.ads, a-ncelfu.ads, interfac.ads, a-cborse.ads,
3521 g-regexp.adb, s-pack22.adb, a-szuzti.adb, g-io_aux.ads, s-caun32.adb,
3522 a-nselfu.ads, g-regexp.ads, s-pack22.ads, a-ticoio.adb, a-szuzti.ads,
3523 g-diopit.adb, s-caun32.ads, s-conca9.adb, a-tags.adb, a-swmwco.ads,
3524 a-sbecin.adb, s-pack31.adb, s-expuns.adb, a-ticoio.ads, s-valint.adb,
3525 s-conca9.ads, g-diopit.ads, a-tags.ads, a-nllcef.ads, a-izteio.ads,
3526 a-sbecin.ads, s-expuns.ads, s-pack31.ads, g-dyntab.adb, s-powtab.ads,
3527 s-flocon-none.adb, s-valint.ads, a-ssiwti.ads, s-mmosin-mingw.adb,
3528 s-pack40.adb, s-pack05.adb, a-ztflau.adb, g-dyntab.ads,
3529 a-szuzti-shared.adb, g-alvevi.ads, a-stwise.adb, s-mmosin-mingw.ads,
3530 s-pack40.ads, a-diocst.adb, a-ztflau.ads, s-pack05.ads, a-nlcoty.ads,
3531 a-contai.ads, a-stwisu.adb, g-byorma.adb, a-siwtio.ads, a-stwise.ads,
3532 s-regpat.adb, g-mbdira.adb, s-pack14.adb, a-diocst.ads, g-flocon.ads,
3533 g-mbflra.adb, a-ztinau.adb, s-dim.ads, s-mantis.adb, a-stwisu.ads,
3534 g-byorma.ads, s-atopri.adb, g-wistsp.ads, a-uncdea.ads, s-widcha.adb,
3535 a-caldel.adb, s-regpat.ads, g-mbdira.ads, a-tiflio.adb, s-pack14.ads,
3536 s-parame.adb, a-liwtio.ads, s-memory.adb, g-mbflra.ads, a-ztinau.ads,
3537 a-wtgeau.adb, s-direio.adb, s-mantis.ads, s-atopri.ads, s-widcha.ads,
3538 a-caldel.ads, s-pack23.adb, a-unccon.ads, a-tiflio.ads, s-parame.ads,
3539 a-llftio.ads, s-memory.ads, s-regexp.adb, a-wtgeau.ads, a-exexda.adb,
3540 s-direio.ads, s-pack23.ads, g-stheme.adb, a-tiinio.adb, g-sestin.ads,
3541 s-regexp.ads, a-wtfiio.adb, a-comutr.adb, a-exexpr.adb, a-tiinio.ads,
3542 a-ztmoau.adb, a-cohata.ads, a-wtfiio.ads, s-imgrea.adb, ada.ads,
3543 a-szunau-shared.adb, a-comutr.ads, s-valuns.adb, a-ztmoau.ads,
3544 system-linux-arm.ads, s-osprim-x32.adb, s-pack41.adb, s-pack06.adb,
3545 s-imgrea.ads, s-valuns.ads, s-finroo.adb, s-caun16.adb, s-pooglo.adb,
3546 a-zrstfi.adb, a-suenst.adb, s-pack41.ads, g-binenv.adb, s-pack06.ads,
3547 a-calari.adb, a-nlcoar.ads, s-finroo.ads, a-timoio.adb, s-caun16.ads,
3548 s-flocon.adb, a-suenst.ads, a-zrstfi.ads, s-pooglo.ads, s-wchcon.adb,
3549 s-traceb-hpux.adb, s-pack50.adb, i-fortra.adb, s-pack15.adb,
3550 a-ngcefu.adb, g-sptavs.ads, g-binenv.ads, s-wchjis.adb, a-calari.ads,
3551 a-timoio.ads, a-decima.adb, s-flocon.ads, s-wchcon.ads, a-llfzti.ads,
3552 i-fortra.ads, s-pack50.ads, s-pack15.ads, a-ngcefu.ads, a-cfhase.adb,
3553 s-wchjis.ads, g-soliop.ads, a-decima.ads, a-chlat9.ads, s-pack24.adb,
3554 a-nlelfu.ads, a-cfhase.ads, g-locfil.adb, s-atocou-builtin.adb,
3555 s-memcop.ads, a-szunau.adb, s-pack24.ads, s-imgllb.adb, s-auxdec.adb,
3556 g-locfil.ads, s-pack33.adb, a-szunau.ads, s-parame-vxworks.adb,
3557 s-imgllb.ads, a-ciorma.adb, s-auxdec.ads, a-cobove.adb, s-dsaser.ads,
3558 a-elchha.adb, s-pack33.ads, a-cofuve.adb, s-parame-vxworks.ads,
3559 a-ciorma.ads, system-darwin-x86.ads, s-multip.adb, a-stwiun-shared.adb,
3560 a-wichun.adb, a-cobove.ads, s-imgbiu.adb, s-tsmona-mingw.adb,
3561 a-coormu.adb, a-siocst.adb, s-win32.ads, a-elchha.ads, s-pack42.adb,
3562 s-pack07.adb, a-cofuve.ads, system-hpux.ads, a-teioed.adb,
3563 a-convec.adb, g-speche.adb, s-multip.ads, a-stwiun-shared.ads,
3564 a-wichun.ads, s-imgbiu.ads, a-numeri.ads, a-siocst.ads, a-coormu.ads,
3565 a-lliwti.ads, s-pack42.ads, s-pack07.ads, a-teioed.ads, a-convec.ads,
3566 g-speche.ads, g-socthi.adb, a-nucoty.ads, a-szmzco.ads, s-pack51.adb,
3567 s-osprim-mingw.adb, s-casi64.adb, g-strspl.ads, g-socthi.ads,
3568 g-socket-dummy.adb, s-pack51.ads, s-dimmks.ads, s-casi64.ads,
3569 a-wtenau.adb, s-stchop-vxworks.adb, s-pack60.adb,
3570 system-solaris-sparc.ads, s-pack25.adb, g-socket-dummy.ads,
3571 a-exstat.adb, a-cofuma.adb, s-tsmona-linux.adb, a-wtenau.ads,
3572 s-pack60.ads, s-pack25.ads, i-cstrea.adb, a-cofuma.ads, g-exptty.adb,
3573 a-chzla1.ads, s-pack34.adb, i-cstrea.ads, s-excdeb.adb, a-iteint.ads,
3574 g-exptty.ads, i-pacdec.adb, s-pack34.ads, s-rident.ads, s-sopco3.adb,
3575 i-vxwork.ads, s-excdeb.ads, system-linux-ppc.ads, a-swuwti-shared.adb,
3576 s-widlli.adb, s-pack43.adb, i-pacdec.ads, a-cwila9.ads, s-sopco3.ads,
3577 a-fwteio.ads, s-widlli.ads, s-pack43.ads, a-suhcin.adb, a-wtdeau.adb,
3578 g-allein.ads, a-suezst.adb, a-dirval-mingw.adb, g-zspche.adb,
3579 s-bignum.adb, a-ztedit.adb, g-regist.adb, a-nllefu.ads, a-ztcoio.adb,
3580 s-pack52.adb, a-llctio.ads, a-nucoar.ads, s-pack17.adb, a-suhcin.ads,
3581 a-wtdeau.ads, a-suezst.ads, a-dirval.adb, g-zspche.ads, g-regist.ads,
3582 a-ztedit.ads, s-bignum.ads, a-wtcstr.adb, system.ads, s-pack52.ads,
3583 a-ztcoio.ads, s-pack17.ads, s-imgboo.adb, a-rbtgso.adb, a-dirval.ads,
3584 a-cohase.adb, s-pack61.adb, a-wtcstr.ads, s-pack26.adb, s-osprim.ads,
3585 a-tigeau.adb, s-imgboo.ads, a-nuelfu.ads, a-swfwha.ads, s-commun.adb,
3586 g-socthi-vxworks.adb, a-rbtgso.ads, a-cohase.ads, g-zstspl.ads,
3587 s-pack61.ads, s-pack26.ads, a-intnam-dragonfly.ads, s-imglld.adb,
3588 a-tigeau.ads, s-commun.ads, g-socthi-vxworks.ads, a-cborma.adb,
3589 a-stwifi.adb, g-moreex.adb, s-pack35.adb, s-imglld.ads, s-valdec.adb,
3590 a-tifiio.adb, a-cborma.ads, g-moreex.ads, a-stwifi.ads, s-pack35.ads,
3591 s-sopco4.adb, g-sha224.ads, g-socket.adb, a-intnam-rtems.ads,
3592 s-finmas.adb, s-valdec.ads, s-addima.adb, a-finali.adb, a-tifiio.ads,
3593 s-rpc.adb, a-ztflio.adb, s-pack44.adb, s-pack09.adb, a-sblcin.adb,
3594 s-sopco4.ads, a-textio.adb, g-socket.ads, g-sptabo.ads, s-finmas.ads,
3595 g-shsh32.adb, s-addima.ads, a-finali.ads, s-mmauni-long.ads, s-rpc.ads,
3596 a-ztflio.ads, system-djgpp.ads, s-stache.adb, s-pack44.ads,
3597 s-pack09.ads, a-sblcin.ads, a-textio.ads, a-cidlli.adb, g-shsh32.ads,
3598 a-chtgbk.adb, a-tiocst.adb, s-pack53.adb, s-pack18.adb, s-stache.ads,
3599 a-zchhan.adb, s-fatlfl.ads, a-ztinio.adb, s-strops.adb, a-siteio.ads,
3600 a-cidlli.ads, a-chtgbk.ads, g-ssvety.ads, a-tiocst.ads, s-pack53.ads,
3601 s-parame-hpux.ads, s-pack18.ads, a-zchhan.ads, s-strops.ads,
3602 a-ztinio.ads, a-wichha.adb, a-stwima.adb, a-nlrear.ads, a-liteio.ads,
3603 s-pack62.adb, s-pack27.adb, s-fore.adb, s-vercon.adb, a-wichha.ads,
3604 a-stwima.ads, s-pack62.ads, system-linux-sparc.ads, s-pack27.ads,
3605 g-dynhta.adb, s-fore.ads, s-vercon.ads, a-cofuba.adb, a-cimutr.adb,
3606 i-cpoint.adb, s-imgenu.adb, a-stwibo.adb, s-pack36.adb, i-cstrin.adb,
3607 s-imgllu.adb, a-suteio-shared.adb, g-excact.adb, s-stoele.adb,
3608 s-addope.adb, g-dynhta.ads, a-cofuba.ads, a-ztmoio.adb, a-llfwti.ads,
3609 a-cimutr.ads, i-cpoint.ads, s-imgenu.ads, a-stwibo.ads, a-wttest.adb,
3610 s-pack36.ads, a-tgdico.ads, s-sopco5.adb, s-scaval.adb, i-cstrin.ads,
3611 s-imgllu.ads, g-excact.ads, s-stoele.ads, g-deutst.ads, s-addope.ads,
3612 s-imgwch.adb, g-sha384.ads, a-ztmoio.ads, s-pack45.adb, a-wttest.ads,
3613 s-sopco5.ads, s-excmac-gcc.adb, s-scaval.ads, a-storio.adb,
3614 a-coinho.adb, a-btgbso.adb, s-imgwch.ads, s-carun8.adb, memtrack.adb,
3615 s-pack45.ads, a-sfhcin.ads, s-excmac-gcc.ads, a-storio.ads,
3616 a-coinho.ads, a-btgbso.ads, s-stratt.adb, s-carun8.ads, a-shcain.adb,
3617 s-pack54.adb, s-pack19.adb, a-colire.adb, a-tigeli.adb, s-caun64.adb,
3618 s-stratt.ads, s-fatgen.adb, a-shcain.ads, a-stzunb-shared.adb,
3619 s-pack54.ads, s-pack19.ads, a-colire.ads, a-calcon.adb, s-caun64.ads,
3620 s-fatgen.ads, s-pack63.adb, g-arrspl.adb, a-stzunb-shared.ads,
3621 s-pack28.adb, a-nllrar.ads, a-zzboio.adb, a-zzunio.ads, a-stunau.adb,
3622 a-calcon.ads, g-cgideb.adb, s-objrea.adb, s-mastop.adb, a-tienau.adb,
3623 g-altcon.adb, g-arrspl.ads, s-pack63.ads, s-restri.adb, s-pack28.ads,
3624 a-zzboio.ads, a-stunau.ads, g-cgideb.ads, g-htable.adb, g-sothco.adb,
3625 s-objrea.ads, g-soliop-solaris.ads, s-mastop.ads, a-tienau.ads,
3626 system-linux-m68k.ads, g-altcon.ads, s-dmotpr.ads, s-memory-mingw.adb,
3627 g-cgicoo.adb, s-pack37.adb, s-restri.ads, s-fatllf.ads, s-expmod.adb,
3628 a-swuwha.adb, a-exextr.adb, a-cfhama.adb, s-gloloc-mingw.adb,
3629 a-tiboio.adb, g-forstr.adb, g-sothco.ads, a-stzbou.adb, a-nllcty.ads,
3630 a-suecin.adb, g-htable.ads, s-exctab.adb, a-tiunio.ads, g-cgicoo.ads,
3631 s-osprim-posix.adb, s-pack37.ads, a-ciormu.adb, s-atocou-x86.adb,
3632 a-swuwha.ads, s-expmod.ads, a-cfhama.ads, s-ficobl.ads, a-ngcoty.adb,
3633 g-forstr.ads, a-tiboio.ads, a-calfor.adb, a-stzbou.ads, a-suecin.ads,
3634 a-conhel.adb, a-crbltr.ads, s-exctab.ads, a-dhfina.ads, s-imgcha.adb,
3635 s-pack46.adb, a-ciormu.ads, system-linux-sh4.ads, a-chahan.adb,
3636 a-ngcoty.ads, a-stzunb.adb, a-szfzha.ads, a-calfor.ads, a-cbdlli.adb,
3637 a-conhel.ads, s-imgcha.ads, s-pack46.ads, a-assert.adb, a-chahan.ads,
3638 a-stzunb.ads, a-crdlli.adb, s-pack55.adb, a-cbdlli.ads, a-tideau.adb,
3639 a-assert.ads, ioexcept.ads, s-boarop.ads, g-hesora.adb, a-crdlli.ads,
3640 s-pack55.ads, a-tideau.ads, g-bubsor.adb, a-wtenio.adb, a-cbsyqu.adb,
3641 g-hesora.ads, s-pack29.adb, a-nurear.ads, g-catiio.adb, s-stposu.adb,
3642 g-bubsor.ads, a-wtenio.ads, a-cbsyqu.ads, a-suewst.adb,
3643 system-vxworks-x86.ads, s-pack29.ads, a-cbmutr.adb, a-cbprqu.adb,
3644 s-imenne.adb, g-sothco-dummy.adb, g-casuti.adb, g-catiio.ads,
3645 s-stposu.ads, a-stzsea.adb, s-pack38.adb, a-suewst.ads, s-imgllw.adb,
3646 a-cbprqu.ads, a-cbmutr.ads, s-imenne.ads, g-sothco-dummy.ads,
3647 g-casuti.ads, s-htable.adb, s-fatsfl.ads, g-trasym.adb, unchconv.ads,
3648 a-stzsea.ads, s-arit64.adb, s-pack38.ads, a-nllcar.ads, s-valrea.adb,
3649 s-imgllw.ads, s-htable.ads, a-sequio.adb, g-trasym.ads, a-ngcoar.adb,
3650 s-exnllf.adb, s-pack47.adb, s-arit64.ads, g-sercom-mingw.adb,
3651 s-valrea.ads, g-socthi-mingw.adb, g-bytswa.adb, g-sehash.adb,
3652 unchdeal.ads, a-sequio.ads, a-ngcoar.ads, s-exnllf.ads, a-wtdeio.adb,
3653 s-pack47.ads, g-socthi-mingw.ads, a-excpol-abort.adb, a-ztgeau.adb,
3654 g-bytswa.ads, g-sehash.ads, s-pack56.adb, a-wtdeio.ads, a-ngelfu.adb,
3655 a-ztgeau.ads, a-cforse.adb, s-filatt.ads, a-stzfix.adb, a-cihase.adb,
3656 s-pack56.ads, a-sfztio.ads, a-ngelfu.ads, s-trasym-dwarf.adb,
3657 a-cforse.ads, a-ztfiio.adb, g-timsta.adb, a-stzfix.ads, a-cihase.ads,
3658 a-ztfiio.ads, system-darwin-arm.ads: Move non-tasking runtime sources
3659 to libgnat subdirectory.
3661 2017-09-08 Yannick Moy <moy@adacore.com>
3663 * sem_aux.adb, sem_aux.ads (Get_Called_Entity): New function to
3664 return the entity associated with the call.
3665 * sem_util.adb, sem_util.ads (Check_Function_Writable_Actuals):
3666 Replace the internal Get_Function_Id with the new
3667 Sem_Aux.Get_Called_Entity.
3668 (Iterate_Call_Parameters): New
3669 procedure to iterate on formals and actuals at the same time.
3670 * sem_ch12.adb (Analyze_Subprogram_Instantiation):
3671 Set SPARK_Mode from spec when set, for analysis
3672 of instance. Restore after analysis of instance.
3673 (Instantiate_Subprogram_Body): Set SPARK_Mode from body when
3674 set, for analysis of body instance. Restored automatically at
3675 the end of the subprogram.
3676 * gnat1drv.adb (Adjust_Global_Switches): Set
3677 Check_Validity_Of_Parameters to False in GNATprove mode.
3678 * opt.ads (Check_Validity_Of_Parameters): Document switch to
3681 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3683 * sem_util.adb (NCT_Tables_In_Use): Move to library level from...
3684 (New_Copy_Tree): ...there. Reset the hash tables only if they
3685 were used in the previous invocation.
3686 * s-htable.adb: Fix typo.
3688 2017-09-08 Bob Duff <duff@adacore.com>
3690 * a-ssicst.adb (Open): Set File.Last_Op to the appropriate value.
3692 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3694 * sem_aggr.adb: minor style fix.
3696 2017-09-08 Bob Duff <duff@adacore.com>
3698 * sprint.adb (Write_Corresponding_Source): Ignore if there is
3699 no current source file.
3700 (Write_Name_With_Col_Check, Write_Name_With_Col_Check_Sloc):
3701 Print something helpful in case N is invalid.
3702 * sprint.ads: Minor comment fix.
3704 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3706 * exp_aggr.adb: (Aggr_Assignment_OK_For_Backend): Add early return for
3709 2017-09-08 Bob Duff <duff@adacore.com>
3711 * par-prag.adb, sem_prag.adb, snames.ads-tmpl: Implement pragma
3712 Ada_2020, along the same lines as the other Ada version pragmas.
3714 2017-09-08 Gary Dismukes <dismukes@adacore.com>
3716 * sem_ch12.adb: Minor typo fixes and reformatting.
3718 2017-09-08 Yannick Moy <moy@adacore.com>
3720 * sem_aggr.adb (Resolve_Record_Aggregate):
3721 Rewrite bounds of aggregate subexpressions which may depend on
3722 discriminants of the enclosing aggregate.
3724 2017-09-08 Yannick Moy <moy@adacore.com>
3726 * sem_ch5.adb: Prevent assertion failure on illegal code.
3728 2017-09-08 Yannick Moy <moy@adacore.com>
3730 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs.Is_SPARK_Scope): Avoid
3731 calling Renamed_Entity on an entity which cannot be a renaming.
3733 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3735 * exp_aggr.adb: Add with & use clause for Urealp.
3736 (Aggr_Assignment_OK_For_Backend): Accept (almost all)
3737 elementary types instead of just discrete types.
3738 * sem_eval.adb (Expr_Value): Deal with N_Null for access types.
3739 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>:
3740 Be prepared for the FP zero value in the memset case. Add small
3743 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3745 * s-htable.adb (Static_HTable.Reset): Use aggregate instead
3748 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
3750 * exp_aggr.adb (Expand_Array_Aggregate): Use New_Copy_Tree instead
3751 of New_Copy because the latter leaves the syntactic structure of
3752 the tree inconsistent (a child is accessible through two parents)
3753 and prevents proper replication of itypes by subsequent calls
3755 * exp_ch4.adb (Expand_Concatenate): Use New_Copy_Tree instead of
3756 New_Copy because the latter leaves the syntactic structure of the
3757 tree inconsistent (a child is accessible through two parents)
3758 and prevents proper replication of itypes by subsequent calls
3760 * sem_util.adb (In_Subtree): New routine.
3761 (New_Copy_Tree): Reimplemented.
3762 * sem_util.ads (In_Subtree): New routine.
3763 (New_Copy_Tree): Reimplemented.
3765 2017-09-08 Ed Schonberg <schonberg@adacore.com>
3767 * sem_ch13.adb (Resolve_Aspect_Expressions): The expression
3768 for aspect Default_Value is a static scalar value, but it does
3769 not freeze the type. Yhis allows for subsequent representation
3770 clauses for the type.
3772 2017-09-08 Javier Miranda <miranda@adacore.com>
3774 * sem_ch8.adb (Find_Direct_Name.Undefined): Do
3775 not add entries into the undefined reference table when we are
3776 compiling with errors ignored.
3778 2017-09-08 Ed Schonberg <schonberg@adacore.com>
3780 * sem_ch12.adb (Check_Formal_Packages): Do not apply conformance
3781 check if the instance is within an enclosing instance body. The
3782 formal package was legal in the enclosing generic, and is
3783 legal in the enclosing instantiation. This optimisation may be
3784 applicable elsewhere, and it also removes spurious errors that
3785 may arise with on-the-fly processing of instantiations that
3786 contain Inline_Always subprograms.
3788 2017-09-08 Vincent Celier <celier@adacore.com>
3790 * gnatcmd.adb: Disregard empty argument of GNAT driver.
3792 2017-09-08 Justin Squirek <squirek@adacore.com>
3794 * checks.adb (Insert_Valid_Check): Manually decorate
3795 the generated temporary for range valdity checks.
3797 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3799 * usage.adb (Usage): Document new -gnatw.q/-gnatw.Q switches.
3801 2017-09-08 Justin Squirek <squirek@adacore.com>
3803 * switch-c.adb (Scan_Front_End_Switches): Add new warning switch
3804 case to handle underscore flags.
3805 * warnsw.adb, warnsw.ads (Set_Underscore_Warning_Switch): Create
3806 new procedure to handle underscores.
3808 2017-09-08 Javier Miranda <miranda@adacore.com>
3810 * exp_ch4.adb (Expand_N_Op_Divide): Reordering code that handles
3811 divisions with fixed point results to avoid generating twice
3812 the runtime check on divide by zero.
3813 * checks.adb (Apply_Divide_Checks): Ensure that operands are
3814 not evaluated twice (once for their runtime checks and once for
3815 their regular computation).
3817 2017-09-08 Yannick Moy <moy@adacore.com>
3819 * sem_prag.adb (Analyze_Part_Of): Add missing
3820 return statements after issuing errors. Add detection of
3821 out-of-order item and single concurrent type.
3823 2017-09-08 Nicolas Roche <roche@adacore.com>
3825 * gcc-interface/Makefile.in, a-extiti.ads, s-taprop-linux.adb,
3826 s-osinte-solaris.adb, a-intnam.ads, s-osinte-solaris.ads,
3827 s-tpobop.adb, s-intman-android.adb, s-tasinf.adb, s-tpobop.ads,
3828 s-tasinf.ads, i-vxinco.adb, a-exetim-posix.adb, i-vxinco.ads,
3829 a-astaco.adb, a-astaco.ads, s-tporft.adb, s-tpoaal.adb, a-taside.adb,
3830 a-taside.ads, s-tpopsp-posix.adb, s-tasdeb.adb, s-tasdeb.ads,
3831 s-tpoben.adb, a-dinopr.ads, s-inmaop-vxworks.adb, s-tpoben.ads,
3832 s-interr-vxworks.adb, s-interr-dummy.adb, s-tassta.adb,
3833 a-intnam-mingw.ads, s-tassta.ads, s-taasde.adb, a-stcoed.ads,
3834 s-taasde.ads, s-osinte-darwin.adb, s-proinf.adb, s-taprop-dummy.adb,
3835 s-osinte-darwin.ads, s-proinf.ads, s-linux.ads, a-intnam-linux.ads,
3836 s-tasren.adb, s-tasren.ads, s-mudido.adb, g-semaph.adb, s-mudido.ads,
3837 s-taprop-posix.adb, g-semaph.ads, s-osinte-mingw.ads, s-vxwork-x86.ads,
3838 s-tposen.adb, s-linux-sparc.ads, s-taprop-vxworks.adb, s-tasini.adb,
3839 s-tposen.ads, s-tasini.ads, a-etgrbu.ads, s-interr-hwint.adb,
3840 s-osinte-linux.ads, s-taprop.ads, s-tasque.adb, s-tasque.ads,
3841 s-taenca.adb, s-taspri-vxworks.ads, s-taenca.ads, a-dynpri.adb,
3842 s-tpopsp-solaris.adb, a-dynpri.ads, s-taprop-hpux-dce.adb,
3843 a-interr.adb, a-intnam-freebsd.ads, s-tarest.adb, a-interr.ads,
3844 s-intman-susv3.adb, a-synbar.adb, a-intnam-dummy.ads, s-tadeca.adb,
3845 s-osinte-vxworks.adb, s-tarest.ads, s-taskin.adb, a-synbar.ads,
3846 s-taspri-hpux-dce.ads, s-tadeca.ads, s-osinte-vxworks.ads,
3847 s-taskin.ads, s-intman-solaris.adb, a-sytaco.adb, s-vxwext-kernel.adb,
3848 s-mudido-affinity.adb, a-sytaco.ads, s-vxwext-kernel.ads, s-taprob.adb,
3849 s-intman-mingw.adb, s-taprob.ads, s-osinte-kfreebsd-gnu.ads,
3850 s-osinte-dummy.ads, s-osinte-gnu.adb, s-osinte-rtems.adb, s-interr.adb,
3851 s-inmaop.ads, s-vxwext-rtp.adb, s-osinte-gnu.ads, s-osinte-rtems.ads,
3852 a-synbar-posix.adb, s-interr.ads, s-taspri-posix-noaltstack.ads,
3853 s-vxwext-rtp.ads, a-synbar-posix.ads, a-extiin.ads, s-osinte-posix.adb,
3854 s-tpinop.adb, s-tasres.ads, s-tpinop.ads, a-disedf.ads, a-diroro.ads,
3855 s-linux-alpha.ads, a-tasatt.adb, s-solita.adb, a-intnam-solaris.ads,
3856 a-tasatt.ads, s-solita.ads, s-tasinf-solaris.adb, s-tasinf-solaris.ads,
3857 s-vxwork-arm.ads, s-tpopsp-posix-foreign.adb, s-intman-dummy.adb,
3858 s-intman.ads, s-stusta.adb, s-stusta.ads, s-intman-posix.adb,
3859 s-tpopsp-vxworks.adb, s-inmaop-dummy.adb, s-taspri-mingw.ads,
3860 a-intnam-darwin.ads, s-osinte-aix.adb, s-osinte-dragonfly.adb,
3861 s-osinte-aix.ads, s-tasinf-mingw.adb, s-osinte-dragonfly.ads,
3862 s-linux-hppa.ads, s-osinte-x32.adb, s-inmaop-posix.adb,
3863 s-tasinf-mingw.ads, s-intman-vxworks.adb, s-linux-mips.ads,
3864 s-intman-vxworks.ads, s-osinte-android.adb, s-tasinf-linux.adb,
3865 s-osinte-android.ads, s-vxwork-ppc.ads, s-tasinf-linux.ads,
3866 a-dispat.adb, a-dispat.ads, s-tadert.adb, g-thread.adb, s-tadert.ads,
3867 g-thread.ads, a-intnam-hpux.ads, s-linux-android.ads, s-tataat.adb,
3868 a-exetim.ads, s-tataat.ads, a-reatim.adb, a-reatim.ads, thread.c,
3869 g-boubuf.adb, s-osinte-freebsd.adb, g-boubuf.ads, s-osinte-freebsd.ads,
3870 s-tasuti.adb, s-taspri-dummy.ads, a-exetim-mingw.adb, s-linux-x32.ads,
3871 s-tasuti.ads, g-signal.adb, a-exetim-mingw.ads, s-interr-sigaction.adb,
3872 g-signal.ads, s-osinte-hpux.ads, a-intnam-vxworks.ads,
3873 s-osinte-hpux-dce.adb, s-taspri-posix.ads, s-osinte-hpux-dce.ads,
3874 s-tasinf-vxworks.ads, g-tastus.ads, s-tpopsp-tls.adb,
3875 s-taprop-solaris.adb, a-retide.adb, a-exetim-darwin.adb, a-retide.ads,
3876 s-vxwext.adb, s-vxwext.ads, a-rttiev.adb, a-rttiev.ads, g-boumai.ads,
3877 a-exetim-default.ads, s-taprop-mingw.adb, s-taspri-solaris.ads,
3878 a-intnam-aix.ads: Move libgnarl sources to libgnarl subdir.
3880 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3882 * doc/share/conf.py, doc/share/latex_elements.py,
3883 doc/share/ada_pygments.py, doc/Makefile: Improve support for Ada
3886 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3888 * gnat_rm.texi, gnat_ugn.texi,
3889 doc/gnat_ugn/the_gnat_compilation_model.rst,
3890 doc/gnat_ugn/getting_started_with_gnat.rst,
3891 doc/gnat_ugn/inline_assembler.rst,
3892 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
3893 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
3894 doc/gnat_ugn/about_this_guide.rst,
3895 doc/gnat_ugn/platform_specific_information.rst,
3896 doc/gnat_ugn/example_of_binder_output.rst,
3897 doc/gnat_ugn/gnat_and_program_execution.rst,
3898 doc/gnat_ugn/gnat_utility_programs.rst,
3899 doc/gnat_rm/implementation_of_specific_ada_features.rst,
3900 doc/gnat_rm/interfacing_to_other_languages.rst,
3901 doc/gnat_rm/implementation_defined_aspects.rst,
3902 doc/gnat_rm/intrinsic_subprograms.rst,
3903 doc/gnat_rm/implementation_defined_characteristics.rst,
3904 doc/gnat_rm/implementation_advice.rst,
3905 doc/gnat_rm/implementation_defined_attributes.rst,
3906 doc/gnat_rm/compatibility_and_porting_guide.rst,
3907 doc/gnat_rm/standard_library_routines.rst,
3908 doc/gnat_rm/the_gnat_library.rst,
3909 doc/gnat_rm/implementation_defined_pragmas.rst,
3910 doc/gnat_rm/representation_clauses_and_pragmas.rst,
3911 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
3912 doc/gnat_rm/obsolescent_features.rst,
3913 doc/gnat_rm/about_this_guide.rst,
3914 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
3915 doc/gnat_rm/implementation_of_ada_2012_features.rst,
3917 doc/gnat_rm.rst: Update documentation.
3919 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3921 * s-dwalin.ads, s-dwalin.adb, s-trasym-dwarf.adb, s-objrea.ads,
3922 s-objrea.adb, s-tsmona-linux.adb, s-tsmona-mingw.adb: New.
3923 * gcc-interface/Makefile.in: Enable s-trasym-dwarf.adb on x86*linux.
3925 2017-09-08 Bob Duff <duff@adacore.com>
3927 * s-ststop.ads, s-ststop.adb, rtsfind.ads (String_Input_Tag):
3928 New routine to read the Tag robustly.
3929 * exp_attr.adb (Input): Change the expansion of 'Input,
3930 in the class-wide case, to call String_Input_Tag instead of
3931 String_Input_Blk_IO.
3933 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3935 * s-rident.ads (Restriction_Id): reorder enum
3936 literals, so that Pure_Barriers is no longer in range of the
3937 Cunit_Boolean_Restrictions subtype.
3939 2017-09-08 Nicolas Roche <roche@adacore.com>
3941 * a-taster.ads, a-taster.adb: Move to libgnarl
3942 * gcc-interface/Makefile.in: Remove obsolete targets. Code cleanups.
3943 Add support for files in libgnarl.
3945 2017-09-08 Ed Schonberg <schonberg@adacore.com>
3947 * exp_ch4.adb (Expand_N_Type_Conversion): Do not apply
3948 accessibility check to an interface conversion, whose purpose
3949 is to perform a pointer adjustment in a dispatching call.
3950 * exp_ch6.adb (Expand_Call_JHelper): Add accessibility checks
3951 when the actual is a construct that involves a dereference of an
3952 expression that includes a formal of the enclosing subprogram,
3953 In such cases, the accessibility level of the actual is that of
3954 the corresponding formal, which is passed in as an additional
3955 actual in the outer call.
3957 2017-09-08 Bob Duff <duff@adacore.com>
3959 * exp_intr.adb (Add_Source_Info): Do not decode
3960 file names; they were not encoded in the first place.
3962 2017-09-08 Bob Duff <duff@adacore.com>
3964 * a-tags.adb (Internal_Tag): Unsuppress checks, so we get
3965 exceptions instead of crashes. Check for absurdly long strings
3966 and empty strings. Empty strings cause trouble because they can
3967 have super-null ranges (e.g. 100..10), which causes Ext_Copy to
3968 be empty, which causes an array index out of bounds.
3969 * s-ststop.adb (Input): Unsuppress checks, so we get exceptions
3972 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3974 * sem_util.adb (Is_CCT_Instance): allow use in
3975 the context of protected types.
3977 2017-09-08 Arnaud Charlet <charlet@adacore.com>
3979 * a-tigeli.adb: minor remove extra whitespace.
3981 2017-09-08 Gary Dismukes <dismukes@adacore.com>
3983 * par-ch4.adb: Reformatting of an error message.
3985 2017-09-08 Javier Miranda <miranda@adacore.com>
3987 * sem_ch3.adb (Resolve_Name): Under ASIS mode analyze overloaded
3988 identifiers to ensure their correct decoration of names on
3991 2017-09-08 Yannick Moy <moy@adacore.com>
3993 * exp_attr.adb (Expand_Loop_Entry_Attribute): Do
3994 not skip a loop coming from source which is rewritten into a loop.
3996 2017-09-08 Ed Schonberg <schonberg@adacore.com>
3998 * freeze.adb (Wrap_Imported_Subprogram): Indicate that the
3999 wrapper has convention Ada, to prevent spurious warnings on
4000 unconstrained array parameters.
4002 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4004 * sem_prag.adb (Check_Variant): Use First_Non_Pragma/Next_Non_Pragma.
4005 (Analyze_Pragma) <Pragma_Unchecked_Union>: Likewise.
4007 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4009 * sem_ch6.adb (Freeze_Expr_Types): Rename Spec_Id into Def_Id.
4011 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4013 * exp_intr.adb (Append_Entity_Name): Move to ...
4014 * sem_util.ads, sem_util.adb: ... here to share it.
4015 (Subprogram_Name): New subprogram, to compute the name of the enclosing
4017 * errutil.adb (Error_Msg): Fill new field Node.
4018 * erroutc.ads (Subprogram_Name_Ptr): New.
4019 (Error_Msg_Object): New field Node.
4020 * erroutc.adb (dmsg, Output_Msg_Text): Take new field Node into account.
4021 * errout.adb (Error_Msg): New variant with node id parameter.
4022 Fill new parameter Node when emitting messages. Revert previous
4023 changes for Include_Subprogram_In_Messages.
4024 * sem_ch5.adb (Check_Unreachable_Code): Supply Node parameter when
4025 generating warning message.
4027 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4029 * par-ch4.adb (P_Iterated_Component_Association): Place construct
4030 under -gnat2020 flag, given that it is a future feature of
4032 * sem_aggr.adb (Resolve_Iterated_Component_Association): Mark
4033 defining identifier as referenced to prevent spurious warnings:
4034 corresponding loop is expanded into one or more loops whose
4035 variable has the same name, and the expression uses those names
4036 and not the original one.
4038 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4040 * sem_elab.adb (Check_A_Call): Do not consider
4041 references to internal variables for SPARK semantics.
4043 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4045 * inline.adb (In_Package_Spec): refine type of
4046 the parameter from Node_Id to Entity_Id.
4048 2017-09-08 Justin Squirek <squirek@adacore.com>
4050 * exp_ch5.adb (Expand_Formal_Container_Loop):
4051 Reset the scope of the loop parameter after it is reanalyzed.
4053 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4055 * sem_util.ads (Set_Rep_Info): New inline procedure.
4056 * sem_util.adb (Set_Rep_Info): Implement it.
4057 * sem_ch3.adb (Process_Subtype): If the case of a constraint present,
4058 always copy the representation aspects onto the subtype.
4060 2017-09-08 Georges-Alex Jaloyan <jaloyan@adacore.com>
4062 * g-dynhta.adb, g-dynhta.ads (Get_First_Key, Get_Next_key):
4063 Correction of the return type from access type to option type.
4064 (Simple_HTable): Moving the Instance_Data to ads file.
4066 2017-09-08 Yannick Moy <moy@adacore.com>
4068 * sem_prag.adb: Use System.Case_Util.To_Lower to simplify code.
4070 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4072 * opt.ads (Include_Subprogram_In_Messages): New variable.
4073 * errout.ads (Current_Subprogram_Ptr): New variable.
4074 * errout.adb (Error_Msg): Prepend current subprogram info
4075 in messages if Include_Subprogram_In_Messages is set.
4076 * sem_util.adb (elab code): Initialize Current_Subprogram_Ptr to
4078 * gnat1drv.adb (Adjust_Global_Switches): Set
4079 Include_Subprogram_In_Messages when -gnatdJ is set.
4080 * debug.adb: Document and reserve -gnatdJ.
4082 2017-09-08 Georges-Axel Jaloyan <jaloyan@adacore.com>
4084 * g-dynhta.adb, g-dynhta.ads (Get_First_Key, Get_Next_Key): New
4085 functions to iterate over simple hastables.
4086 (Load_Factor_HTable): Remove obsolete and inefficient implementation.
4088 2017-09-08 Javier Miranda <miranda@adacore.com>
4090 * exp_ch6.adb (Unqual_BIP_Function_Call): Adding
4091 missing checks on the presence of Entity() before checking the
4094 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4096 * sem_ch6.adb (Analyze_Expression_Function): Reorder some
4097 statements, use local variable and remove unnecessary processing.
4099 2017-09-08 Javier Miranda <miranda@adacore.com>
4101 * exp_ch6.ads (Make_Build_In_Place_Iface_Call_In_Allocator): New
4103 (Make_Build_In_Place_Iface_Call_In_Anonymous_Context): New subprogram.
4104 (Make_Build_In_Place_Iface_Call_In_Object_Declaration): New
4106 (Unqual_BIP_Iface_Function_Call): New subprogram.
4107 * exp_ch6.adb (Replace_Renaming_Declaration_Id): New
4108 subprogram containing code that was previously inside
4109 Make_Build_In_Place_Call_In_Object_Declaration since it is also
4110 required for one of the new subprograms.
4112 Invoke Make_Build_In_Place_Iface_Call_In_Anonymous_Context
4113 (Expand_N_Extended_Return_Statement): Extend the
4114 cases covered by an assertion on expected BIP object
4116 (Make_Build_In_Place_Call_In_Assignment):
4117 Removing unused code; found working on this ticket.
4118 (Make_Build_In_Place_Call_In_Object_Declaration): Move the code
4119 that replaces the internal name of the renaming declaration
4120 into the new subprogram Replace_Renaming_Declaration_Id.
4121 (Make_Build_In_Place_Iface_Call_In_Allocator): New subprogram.
4122 (Make_Build_In_Place_Iface_Call_In_Anonymous_Context):
4124 (Make_Build_In_Place_Iface_Call_In_Object_Declaration): New
4126 (Unqual_BIP_Iface_Function_Call): New subprogram.
4127 * exp_ch3.adb (Expand_N_Object_Declaration): Invoke the new
4128 subprogram Make_Build_In_Place_Iface_Call_In_Object_Declaration.
4129 * exp_attr.adb (Expand_N_Attribute_Reference): Invoke the new
4130 subprogram Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4131 * exp_ch4.adb (Expand_Allocator_Expression): Invoke the new
4132 subprogram Make_Build_In_Place_Iface_Call_In_Allocator.
4133 (Expand_N_Indexed_Component): Invoke the new subprogram
4134 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4135 (Expand_N_Selected_Component): Invoke the new subprogram
4136 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4137 (Expand_N_Slice): Invoke the new subprogram
4138 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4139 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration):
4140 Invoke the new subprogram
4141 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
4143 2017-09-08 Javier Miranda <miranda@adacore.com>
4145 * exp_disp.adb (Expand_Interface_Conversion): Fix handling of
4146 access to interface types. Remove also the accessibility check.
4148 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4150 * sem_ch6.adb (Freeze_Expr_Types): Really freeze
4151 all the types that are referenced by the expression.
4152 (Analyze_Expression_Function): Call Freeze_Expr_Types for
4153 a completion instead of manually freezing the type of the
4155 (Analyze_Subprogram_Body_Helper): Do not call Freeze_Expr_Types here.
4157 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4159 * exp_prag.adb (Replace_Discriminals_Of_Protected_Op):
4160 New procedure, auxiliary to Expand_Pragma_Check, to handle
4161 references to the discriminants of a protected type within a
4162 precondition of a protected operation. This is needed because
4163 the original precondition has been analyzed in the context of
4164 the protected declaration, but in the body of the operation
4165 references to the discriminants have been replaved by references
4166 to the discriminants of the target object, and these references
4167 are only created when expanding the protected body.
4169 2017-09-08 Yannick Moy <moy@adacore.com>
4171 * sem_prag.adb (Analyze_Pragma): Issue more precise error messages on
4174 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4176 * exp_attr.adb (Build_Record_VS_Func): If the record is an
4177 unchecked union, do not emit checks for its (non-existent)
4178 discriminants, or for variant parts that depend on them.
4180 2017-09-08 Justin Squirek <squirek@adacore.com>
4182 * sem_ch4.adb (Find_Equality_Types.Try_One_Interp,
4183 Find_Comparison_Type.Try_One_Interp): Add check for generic
4186 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4188 * sem_ch3.adb, layout.adb, layout.ads, exp_attr.adb, debug.adb,
4189 exp_pakd.adb, sem_prag.adb, gnat1drv.adb, targparm.adb, targparm.ads,
4190 repinfo.adb, exp_ch6.adb, exp_aggr.adb, sem_eval.adb, sem_ch13.adb,
4191 exp_ch3.adb: Remove references to Frontend_Layout_On_Target and
4192 remaining references to AAMP_On_Target.
4194 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4196 * style.adb: Fix typo.
4198 2017-09-08 Javier Miranda <miranda@adacore.com>
4200 * einfo.adb (Underlying_Type): Add missing support for class-wide
4201 types that come from the limited view.
4202 * exp_attr.adb (Attribute_Address): Check class-wide type
4203 interfaces using the underlying type to handle limited-withed
4205 (Attribute_Tag): Check class-wide type interfaces using
4206 the underlying type to handle limited-withed types.
4208 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4210 * exp_ch5.adb (Expand_Predicated_Loop): Handle properly a loop
4211 over a subtype of a type with a static predicate, taking into
4212 account the predicate function of the parent type and the bounds
4213 given in the loop specification.
4214 * sem_ch3.adb (Inherit_Predicate_Flags): For qn Itype created for
4215 a loop specification that is a subtype indication whose type mark
4216 is a type with a static predicate, inherit predicate function,
4217 used to build case statement for rewritten loop.
4219 2017-09-08 Justin Squirek <squirek@adacore.com>
4221 * lib-load.adb: Modify printing of error message to exclude file
4224 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4226 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode):
4227 don't inline subprograms declared in both visible and private
4229 (In_Package_Spec): previously In_Package_Visible_Spec; now
4230 detects subprograms declared both in visible and private parts
4233 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4235 * exp_util.adb (Build_Invariant_Procedure_Declaration): If
4236 the type is an anonymous array in an object declaration, whose
4237 component type has an invariant, use the object declaration
4238 as the insertion point for the invariant procedure, given that
4239 there is no explicit type declaration for an anonymous array type.
4241 2017-09-08 Bob Duff <duff@adacore.com>
4243 * a-cbprqu.ads, a-cbdlli.adb: Suppress warnings.
4245 2017-09-08 Bob Duff <duff@adacore.com>
4247 * a-strfix.adb (Trim): Compute Low and High only if needed.
4249 2017-09-08 Justin Squirek <squirek@adacore.com>
4251 * lib-load.adb (Load_Main_Source): Add error output in the case a
4252 source file is missing.
4254 2017-09-08 Bob Duff <duff@adacore.com>
4257 * a-textio.adb, a-witeio.adb, a-ztexio.adb (Set_WCEM): Use
4258 Default_WCEM by default (i.e. if the encoding is not specified
4259 by the Form string).
4261 2017-09-08 Bob Duff <duff@adacore.com>
4263 * s-trasym.ads (Hexa_Traceback): If
4264 Suppress_Hex is True, print "..." instead of a hexadecimal
4266 * s-trasym.adb: Ignore No_Hex in this version.
4269 2017-09-08 Bob Duff <duff@adacore.com>
4271 * debug.adb: Minor reformatting.
4273 2017-09-08 Bob Duff <duff@adacore.com>
4275 * a-cbdlli.adb, a-cohama.adb, a-cohase.adb (Copy): Rewrite the
4276 code so it doesn't trigger an "uninit var" warning.
4278 2017-09-08 Nicolas Roche <roche@adacore.com>
4280 * s-hibaen.ads: Remove obsolete file.
4282 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4284 * a-locale.ads: Add comment explaining the state of this package.
4286 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4288 * sem_util.adb (Is_CCT_Instance): Allow calls in the context
4290 * sem_prag.ads, sem_prag.adb (Find_Related_Declaration_Or_Body):
4291 allow calls in the context of package spec (for pragma
4292 Initializes) and bodies (for pragma Refined_State).
4294 2017-09-08 Bob Duff <duff@adacore.com>
4296 * checks.adb (Insert_Valid_Check): Copy the Do_Range_Check flag to the
4299 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4301 * debug.adb (dA): Adjust comment.
4302 * gnat1drv.adb (Gnat1drv): Likewise.
4303 * opt.ads (List_Representation_Info_Extended): New variable.
4304 * repinfo.adb (List_Record_Info): Split implementation into...
4305 (Compute_Max_Length): ...this. Recurse on records if requested.
4306 (List_Record_Layout): Likewise.
4307 * switch-c.adb (Scan_Front_End_Switches) <'R'>: Use case
4308 statement, accept '0' and set List_Representation_Info_Extended
4310 * usage.adb (Usage): Document new -gnatRe variant.
4312 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4314 * sem_prag.adb (Analyze_Pragma, case Default_Storage_Pool):
4315 Do not save the given entity in the global variable Default_Pool
4316 if the pragma appears within a generic unit.
4318 2017-09-08 Bob Duff <duff@adacore.com>
4320 * errout.adb (Delete_Warning): Do not
4321 decrement Warnings_Treated_As_Errors. This is called before
4322 Warnings_Treated_As_Errors has been incremented to account for
4323 this warning. Decrementing it here can lead to negative values
4324 of Warnings_Treated_As_Errors, raising Constraint_Error in
4325 checks-on builds, and causing the compiler to return an error
4326 code in checks-off builds.
4328 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4330 * sem_util.ads, sem_util.adb (Is_CCT_Instance): Only expect
4331 entities of named concurrent types as Ref_Id and not of anonymous
4332 concurrent objects (because callers already know when a conversion
4333 is necessary and can easily do it); also, do not expect protected
4334 types or protected objects as Context_Id (because no flow-related
4335 SPARK pragmas are attached there); reflect these changes in a
4336 more precise comment.
4338 2017-09-08 Olivier Hainque <hainque@adacore.com>
4340 * g-altive.ads: Add documentation.
4342 2017-09-08 Bob Duff <duff@adacore.com>
4344 * sem_util.ads, debug.adb: Minor comment fix.
4345 * erroutc.ads: Comment fix.
4347 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4349 * sem_ch12.adb (Validate_Array_Type_Instance): Suppress check
4350 for compatibility of component types of formal and actual in an
4351 instantiation of a child unit, when the component type of the
4352 formal is itself a formal of an enclosing generic.
4354 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4356 * sem_util.ads, sem_util.adb (Is_CCT_Instance): moved from
4357 sem_prag.adb to make it available for GNATprove; for concurrent
4358 types replace custom scope climbing with Scope_Same_Or_Within; for
4359 single concurrent objects add scope climbing (with Scope_Within),
4360 which was not there (that's the primary semantic change of this
4361 commit); also, when comparing a single concurrent object with
4362 its corresponding concurrent type rely on equality of types,
4363 not of objects (because that's simpler to code).
4364 * sem_prag.adb (Is_CCT_Instance): lifted to sem_util.ads.
4365 (Analyze_Global_Item): adjust special-casing of references to the
4366 current instance of a concurrent unit in the Global contracts
4367 of task types and single tasks objects; similar for references
4368 in the protected operations and entries of protected types and
4369 single protected objects (in all these cases the current instance
4370 behaves as an implicit parameter and must not be mentioned in
4371 the Global contract).
4373 2017-09-08 Arnaud Charlet <charlet@adacore.com>
4375 * exp_ch6.adb (Expand_Call_Helper): Introduce temporary for
4376 function calls returning a record within a subprogram call,
4379 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4381 * sem_ch8.adb (Find_Expanded_Name): Handle properly an expanded
4382 name that designates the current instance of a child unit in its
4383 own body and appears as the prefix of a reference to an entity
4384 local to the child unit.
4385 * exp_ch6.adb, freeze.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb:
4388 2017-09-08 Yannick Moy <moy@adacore.com>
4390 * sem_res.adb (Resolve_Equality_Op): Do not warn on comparisons that
4393 2017-09-08 Tristan Gingold <gingold@adacore.com>
4395 * sem_warn.adb (Check_Unused_Withs): Remove test that disabled
4396 warnings on internal units in configurable run time mode.
4398 2017-09-08 Bob Duff <duff@adacore.com>
4400 * sem_ch3.adb (Build_Derived_Private_Type): Inherit
4401 representation items from interfaces that the derived type
4402 implements, not just from the parent type.
4403 * sem_util.ads, sem_util.adb (Abstract_Interface_List): Change
4404 this to return an empty list when there are no interfaces.
4405 * einfo.ads, sem_ch13.adb: Minor comment fixes.
4406 * sem_attr.adb: Minor comment fix.
4408 2017-09-08 Doug Rupp <rupp@adacore.com>
4410 * sigtramp-vxworks.c [i386]: Adjust the kernel context for
4413 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4415 * exp_ch4.adb (Expand_N_Allocator): Generate a
4416 call to Allocate_Any_Controlled when the allocation does not
4417 require any initialization.
4419 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4421 * sem_util.adb (Copy_Node_With_Replacement):
4422 Update the Renamed_Object field of a replicated object renaming
4425 2017-09-08 Patrick Bernardi <bernardi@adacore.com>
4427 * exp_ch9.adb (Is_Pure_Barrier): Allow type
4428 conversions and components of objects. Simplified the detection
4429 of the Count attribute by identifying the corresponding run-time
4432 2017-09-08 Yannick Moy <moy@adacore.com>
4434 * exp_ch9.adb, exp_disp.adb, repinfo.adb, sem_ch12.adb, sem_dim.adb,
4435 sem_type.adb, sinfo.ads: Minor reformatting.
4437 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4439 * freeze.adb (Has_Incomplete_Compoent): New predicate, subsidiary
4440 of Freeze_Profile, used to inhibit the freezing of the profile
4441 of an expression function declared within a nested package, when
4442 some type in the profile depends on a private type declared in
4443 an enclosing package.
4445 2017-09-08 Bob Duff <duff@adacore.com>
4447 * gnat1drv.adb (Gnat1drv): Do not set the Force_ALI_Tree_File flag in
4448 the subunit case. It's still OK to set it in the "missing subunits"
4449 case, because that won't cause the obsolete .ali files that cause
4452 2017-09-08 Bob Duff <duff@adacore.com>
4454 * sinput-l.adb: Remove unused "with Unchecked_Conversion;". It's
4455 unclear why this didn't cause a warning.
4456 * a-uncdea.ads, a-unccon.ads: Add "Ada." to names in the
4457 pragmas. It's unclear why this didn't cause an error.
4459 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4461 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration):
4463 (Expand_SPARK_Potential_Renaming): Code clean up.
4464 * sem_prag.adb (Analyze_Initialization_Item): Add a guard in case
4465 the item does not have a proper entity.
4466 (Analyze_Input_Item): Add a guard in case the item does not have a
4468 (Collect_States_And_Objects): Include object renamings in the
4469 items being collected.
4470 (Resolve_State): Update the documentation of this routine.
4471 * sem_util.adb (Entity_Of): Add circuitry to handle
4472 renamings of function results.
4473 (Remove_Entity): New routine.
4474 (Remove_Overloaded_Entity): Take advantage of factorization.
4475 * sem_util.ads (Entity_Of): Update the documentation
4477 (Remove_Entity): New routine.
4478 (Remove_Overloaded_Entity): Update the documentation of this
4481 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
4483 * repinfo.adb (List_Record_Info): During first loop,
4484 do not override the normalized position and first bit
4485 if they have already been set. Move fallback code
4486 for the packed case to the case where it belongs.
4487 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
4488 Also adjust the normalized position of components.
4489 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): Likewise.
4491 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4493 * exp_disp.adb (Make_DT, Set_All_DT_Position): Handle properly
4494 the placement of a primitive operation O that renames an operation
4495 R declared in an inner package, and which is thus not a primitive
4496 of the dispatching type of O. In this case O is a new primitive
4497 and does not inherit its dispatch table position from R (which
4500 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4502 * sem_dim.adb (Analyze_Dimension_If_Expression,
4503 Analyze_Dimension_Case_Expression): new subprograms to verify
4504 the dimensional correctness of Ada2012 conditional expressions,
4505 and set properly the dimensions of the construct.
4506 * sem_res.adb (Resolve_If_Expression, Resolve_Case_Expression)):
4507 call Analyze_Dimension.
4509 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4511 * sem_type.adb (Expand_Interface_Conversion): Prevent an infinite
4512 loop on an interface declared as a private extension of another
4513 synchronized interface.
4515 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4517 * sem_ch12.adb (Check_Generic_Parent): New procedure within
4518 Analyze_Associations, to handle actual packages that depend on
4519 previous instances. If a package IAP that is an instantiation is
4520 used as an actual in a subsequent instantiation SI in the same
4521 scope, and IAP has a body, IAP must be frozen before SI. If
4522 the generic parent of IAP is itself declared in a previous
4523 instantiation in the same scope, that instantiation must also
4524 be frozen before SI.
4525 (Install_Body): Prevent double insertion of freeze node for
4528 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
4530 * sem_prag.adb (Resolve_State): Update the
4531 comment on documentation. Generate a reference to the state once
4532 resolution takes place.
4534 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4536 * sem_ch13.adb (Analyze_Aspect_Specifications, case
4537 Linker_Section): If the aspect applies to an object declaration
4538 with explicit initialization, do not delay the freezing of the
4539 object, to prevent access-before-elaboration in the generated
4540 initialization code.
4542 2017-09-08 Ed Schonberg <schonberg@adacore.com>
4544 * a-wtdeio.adb (Put, all versions): Use Long_Long_Integer
4545 (Integer_Value (Item)) when the size of the fixed decimal type
4546 is larger than Integer.
4548 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
4551 * gcc-interface/decl.c (copy_and_substitute_in_layout): Put the fields
4552 in order of increasing position in more cases.
4554 2017-09-07 Yannick Moy <moy@adacore.com>
4556 * a-exetim-mingw.ads: Add contract Global=>null
4557 on all operations that are modeled as having no read or write
4558 of global variables in SPARK.
4560 2017-09-07 Raphael Amiard <amiard@adacore.com>
4562 * a-chtgop.adb, a-chtgop.ads (Generic_Iteration_With_Position): Added
4563 to Hmaps.Generic_Ops.
4564 * a-cohama.adb (Ada.Containers.Hmaps.Iterate): Pass proper position in
4566 * a-cihama.adb (Ada.Containers.Indefinite_Hmaps.Iterate): Pass pos in
4568 * a-cohase.adb (Ada.Containers.Hashed_Sets.Iterate): Pass proper
4569 position in cursors.
4571 2017-09-07 Javier Miranda <miranda@adacore.com>
4573 * sem_elab.adb (Check_Task_Activation): Adding switch -gnatd.y to
4574 allow disabling the generation of implicit pragma Elaborate_All
4577 2017-09-07 Javier Miranda <miranda@adacore.com>
4579 * exp_disp.adb (Make_Tags): Avoid suffix counter
4580 in the external name of the elaboration flag. Required to fix
4581 the regressions introduced by the initial version of this patch.
4583 2017-09-07 Bob Duff <duff@adacore.com>
4585 * sem_ch6.adb (Analyze_Function_Return): Do not
4586 insert an explicit conversion to force the displacement of the
4587 "this" pointer to reference the secondary dispatch table in the
4588 case where the return statement is returning a raise expression,
4589 as in "return raise ...".
4591 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4593 * sem_disp.adb (Is_User_Defined_Equality): Removed procedure.
4594 * sem_util.ads, sem_util.adb (Is_User_Defined_Equality): Copied
4595 procedure from sem_disp.adb.
4596 * sem_ch12.ads (Get_Unit_Instantiation_Node): rename Package
4598 * sem_ch12.adb (Get_Unit_Instantiation_Node): function extended to
4599 return the instantiation node for subprograms. Update references
4600 to Get_Unit_Instantiation_Node.
4601 * sem_ch7.adb (Install_Parent_Private_Declarations): update
4602 reference to Get_Unit_Instantiation_Node.
4603 * exp_dist.adb (Build_Package_Stubs): update reference to
4604 Get_Unit_Instantiation_Node.
4605 * sem_ch9.adb: minor typo in comment.
4606 * lib-xref-spark_specific.adb
4607 (Traverse_Declaration_Or_Statement): traverse into task type
4610 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4612 * sem_dim.adb (Analyze_Dimension_Type_Conversion): New procedure
4613 to handle properly various cases of type conversions where the
4614 target type and/or the expression carry dimension information.
4615 (Dimension_System_Root); If a subtype carries dimension
4616 information, obtain the source parent type that carries the
4619 2017-09-07 Dmitriy Anisimkov <anisimko@adacore.com>
4621 * g-socket.adb, g-socket.ads (GNAT.Sockets.To_Ada): New routine.
4623 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4625 * exp_attr.adb (Expand_N_Attribute_Reference, case 'Constrained):
4626 If the prefix is a reference to an object, rewrite it as an
4627 explicit dereference, as required by 3.7.2 (2) and as is done
4628 with most other attributes whose prefix is an access value.
4630 2017-09-07 Bob Duff <duff@adacore.com>
4632 * par-ch13.adb: Set the Inside_Depends flag if we are inside a
4633 Refined_Depends aspect.
4634 * par-ch2.adb: Set the Inside_Depends flag if we are inside a
4635 Refined_Depends pragma.
4636 * scans.ads: Fix documentation of Inside_Depends flag.
4637 * styleg.adb, styleg.ads: Minor reformatting and comment fixes.
4639 2017-09-07 Hristian Kirtchev <kirtchev@adacore.com>
4641 * exp_ch7.adb (Insert_Actions_In_Scope_Around):
4642 Account for the case where the are no lists to insert, but the
4643 secondary stack still requires management.
4644 * a-chtgop.adb, a-cihama.adb, a-cohama.adb, a-cohase.adb, a-tags.adb,
4645 comperr.adb, einfo.adb, exp_aggr.adb, exp_ch3.adb, exp_disp.adb,
4646 lib-xref.adb, lib-xref-spark_specific.adb, sem_ch12.adb, sem_ch13.adb,
4647 sem_ch6.adb, sem_dim.adb, sem_dim.ads, sem_elab.adb, sem_prag.adb:
4650 2017-09-07 Vincent Celier <celier@adacore.com>
4652 * clean.adb: Do not get the target parameters before calling
4655 2017-09-07 Nicolas Roche <roche@adacore.com>
4657 * s-osinte-solaris-posix.ads: Removed.
4659 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4661 * sem_prag.adb (Collect_States_And_Objects): Detect also instances of
4662 single concurrent objects.
4664 2017-09-07 Javier Miranda <miranda@adacore.com>
4666 * s-regexp.ads: Fix documentation of the globbing grammar.
4668 2017-09-07 Gary Dismukes <dismukes@adacore.com>
4670 * a-tags.ads, einfo.ads, exp_disp.ads: Minor reformatting.
4672 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4674 * gnat1drv.adb (Gnat1drv): Enable pragma Ignore_Pragma (Global)
4675 in CodePeer mode, to support more legacy code automatically.
4677 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4679 * exp_disp.adb (Replace_Formals): If thr formal is classwide,
4680 and thus not a controlling argument, preserve its type after
4681 rewriting because it may appear in an nested call with a classwide
4684 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4686 * comperr.adb (Delete_SCIL_Files): Handle case of
4687 N_Package_Instantiation.
4689 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4691 * sem_ch10.adb (Remove_Private_With_Clause): If a private with
4692 clause for a unit U appears in a context that includes a regular
4693 with_clause on U, rewrite the redundant private clause into a null
4694 statement, rather than removing it altogether from the context,
4695 so that ASIS tools can reconstruct the original source.
4697 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4699 * sem_ch13.adb (Check_Aspect_At_Freeze_Point): The expression
4700 for aspect Small can be of any real type (not only a universal
4701 real literal) as long as it is a static constant.
4703 2017-09-07 Thomas Quinot <quinot@adacore.com>
4705 * par_sco.adb: Minor reformatting.
4707 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4709 * s-parame-ae653.ads: Removed.
4711 2017-09-07 Nicolas Roche <roche@adacore.com>
4713 * s-traces-default.adb, s-trafor-default.adb, s-trafor-default.ads,
4714 s-traces.adb, s-traces.ads, s-tratas-default.adb, s-tfsetr-default.adb,
4715 s-tfsetr-vxworks.adb, s-tratas.adb, s-tratas.ads, s-tasuti.adb,
4716 s-parame-hpux.ads, s-tassta.adb, s-taasde.adb, s-tasren.adb,
4717 s-taprob.adb, a-caldel.adb, s-parame.ads, Makefile.rtl, s-tpobop.adb,
4718 s-taenca.adb, s-parame-vxworks.ads: Remove support for System.Traces.
4720 2017-09-07 Yannick Moy <moy@adacore.com>
4722 * a-ngelfu.ads Add preconditions to all functions
4723 listed in Ada RM A.5.1(19-33) as having constraints on inputs.
4725 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4727 * lib-xref.adb (Generate_Reference): ignore
4728 references to entities which are Part_Of single concurrent
4731 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
4733 * sem_ch7.adb (Hide_Public_Entities): Add paragraph to main
4736 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4738 * a-taside.adb (Activation_Is_Complete): Raise Program_Error if
4739 Null_Task_Id is passed.
4741 2017-09-07 Javier Miranda <miranda@adacore.com>
4743 * einfo.ads, einfo.adb (Access_Disp_Table_Elab_Flag): New
4744 attribute. Defined for record types and subtypes.
4745 * exp_ch3.ads (Init_Secondary_Tags): Adding new formal
4746 (Init_Tags_List) to facilitate generating separate code in the
4747 IP routine to initialize the object components and for completing
4748 the elaboration of dispatch tables.
4749 * exp_ch3.adb (Build_Init_Procedure): Improve the code
4750 generated in the IP routines by means of keeping separate
4751 the initialization of the object components from the
4752 initialization of its dispatch tables. (Init_Secondary_Tags):
4753 Adding new formal (Init_Tags_List) and adjusting calls to
4754 Ada.Tags.Set_Dynamic_Offset_To_Top since it has a new formal;
4755 adjusting also calls to Ada.Tags.Register_Interface_Offset
4756 because the type of one of its formals has been changed.
4757 * a-tags.ads, a-tags.adb (Register_Interface_Offset): Profile
4758 modified. Instead of receiving a pointer to an object this
4759 routine receives now a primary tag.
4760 (Set_Dyanic_Offset_To_Top): Profile modified. This routine receives an
4761 additional formal: the tag of the primary dispatch table.
4762 * exp_disp.ads (Elab_Flag_Needed): New subprogram.
4763 * exp_disp.adb (Elab_Flag_Needed): New subprogram.
4764 (Make_Tags): Adding the declaration of the elaboration flag (if needed).
4765 * exp_aggr.adb (Build_Record_Aggr_Code): Adding actual of new
4766 formal in calls to Init_Secondary_Tags.
4768 2017-09-07 Javier Miranda <miranda@adacore.com>
4770 * ghost.adb (Mark_And_Set_Ghost_Instantiation.Check_Ghost_Actuals): New
4772 * sem_prag.adb (Pragma_Ghost): Add missing support for ghost
4773 applied to generic subprograms.
4775 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4777 * sem_util.adb (Check_Part_Of_Reference): rename Conc_Typ to Conc_Obj
4778 (because it refers to the anonymous concurrent object, not its type);
4779 fix condition for emitting error message about task/protected type,
4781 2017-09-07 Bob Duff <duff@adacore.com>
4783 * binde.adb (Debug_Flag_Old): If both -do and -dp
4784 are specified, behave as if just -do was specified, rather than
4787 2017-09-07 Nicolas Roche <roche@adacore.com>
4789 * system-vxworks-sparcv9.ads, s-vxwork-m68k.ads, s-vxwork-mips.ads,
4790 system-vxworks-m68k.ads, system-vxworks-mips.ads: Removed.
4792 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4794 * sem_prag.adb (Find_Role): The Global_Seen flag
4795 is now consulted not only for abstract states and variables,
4796 but for all kinds of items.
4797 (Collect_Subprogram_Inputs_Outputs): Do not process formal
4798 generic parameters, because unlike ordinary formal parameters,
4799 generic formals only act as input/ outputs if they are explicitly
4800 mentioned in a Global contract.
4802 2017-09-07 Yannick Moy <moy@adacore.com>
4804 * ghost.adb (Check_Ghost_Context): Do not err on ghost code inside
4805 predicate procedure. Check predicate pragma/aspect with Ghost entity.
4806 * exp_ch6.adb, par-ch6.adb, sem_ch13.adb, sem_prag.adb; Minor
4809 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4811 * sem_aggr.adb: Move New_Copy_Tree_And_Dimensions to sem_dim
4813 * sem_ch3.adb (Build_Derived_Record_Type):i Call
4814 Copy_Dimensions_Of_Components after creating the copy of the
4816 * sem_dim.ads, sem_dim.adb (Copy_Dimensions_Of_Components): For a
4817 derived recor type, copy the dikensions if any of each component
4818 of the parent record to the corresponding component declarations
4819 of the derived record. These expressions are used among other
4820 things as default values in aggregates with box associations.
4821 * a-dirval-mingw.adb, g-cgi.adb, gnatcmd.adb, lib-xref.adb,
4822 repinfo.adb, sem_attr.adb, sem_ch10.adb, sem_ch6.adb, sem_prag.adb:
4825 2017-09-07 Arnaud Charlet <charlet@adacore.com>
4827 * sem_util.adb: Remove extra space after THEN.
4829 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
4831 * sem_ch7.adb (Has_Referencer): For a subprogram renaming,
4832 also mark the renamed subprogram as referenced.
4834 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4836 * par-ch6.adb (P_Subprogram): Improve error message on null
4837 procedure with misplaced aspect specification, which the parser
4838 first attempts to interpret as a malformed expression function.
4840 2017-09-07 Gary Dismukes <dismukes@adacore.com>
4842 * sem_attr.adb (Analyze_Attribute_Old_Result):
4843 Allow attributes Result and Old in the case of an expression
4846 2017-09-07 Justin Squirek <squirek@adacore.com>
4848 * sem_prag.adb (Process_Atomic_Independent_Shared_Volatile): Propagate
4849 Volatile to subcomponents.
4851 2017-09-07 Bob Duff <duff@adacore.com>
4853 * exp_ch7.adb (Find_Last_Init): Check for the
4854 case where a build-in-place function call has been replaced by a
4855 'Reference attribute reference.
4857 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
4859 * sem_ch7.adb (Has_Referencer): Recurse on Actions of freeze
4862 2017-09-07 Bob Duff <duff@adacore.com>
4864 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration,
4865 Make_Build_In_Place_Call_In_Anonymous_Context): Do not use the
4866 secondary stack for all functions that return limited tagged
4867 types -- just do it for dispatching calls. Misc cleanup.
4868 * sem_util.ads, sem_util.adb (Unqual_Conv): New function to
4869 remove qualifications and type conversions. Fix various bugs
4870 where only a single level of qualification or conversion was
4871 removed, so e.g. "T1'(T2'(X))" would incorrectly return "T2'(X)"
4873 * checks.adb, exp_util.ads, exp_util.adb, sem_res.adb: Misc related
4876 2017-09-07 Ed Schonberg <schonberg@adacore.com>
4878 * sem_ch6.adb (setr_Actual_Subtypes): Within a predicate function
4879 do not create actual subtypes that may generate further predicate
4881 * sem_ch13.adb (Build_Predicate_Functions): Indicate that entity
4882 of body is a predicate function as well.
4883 (Resolve_Aspect_Expressions, Resolve_Name): For a component
4884 association, only the expression needs resolution, not the name.
4885 (Resolve_Aspect_Expressions, case Predicates): Construct and
4886 analyze the predicate function declaration in the scope of the
4887 type, before making the type and its discriminants visible.
4889 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
4891 * gcc-interface/decl.c (warn_on_field_placement): Issue the warning
4892 only if the record type itself comes from source.
4894 2017-09-06 Gary Dismukes <dismukes@adacore.com>
4896 * sem_ch5.adb: Minor reformatting and a typo fix
4898 2017-09-06 Arnaud Charlet <charlet@adacore.com>
4900 * sinput-l.ads: minor remove extra period at the end of comment
4902 2017-09-06 Arnaud Charlet <charlet@adacore.com>
4904 * sem_prag.adb (Add_Item_To_Name_Buffer): remove support for
4906 (Find_Role): remove support for E_Discriminant.
4908 2017-09-06 Javier Miranda <miranda@adacore.com>
4910 * exp_ch6.adb (Expand_Simple_Function_Return):
4911 Add missing implicit type conversion to force displacement of the
4914 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
4916 * sem_ch3.adb, sem_aux.adb, sem_res.adb: Minor reformatting.
4918 2017-09-06 Yannick Moy <moy@adacore.com>
4920 * sem_ch12.adb (Analyze_Instance_And_Renamings): Refactor to set
4921 global variable Ignore_SPARK_Mode_Pragmas_In_Instance only once.
4923 2017-09-06 Bob Duff <duff@adacore.com>
4925 * sem_ch8.adb: Change Assert to be consistent with
4928 2017-09-06 Bob Duff <duff@adacore.com>
4930 * binde.adb (Find_Elab_Order): Do not run Elab_Old unless
4931 requested. Previously, the -do switch meant "run Elab_New and
4932 Elab_Old and use the order chosen by Elab_Old, possibly with
4933 debugging printouts comparing the two orders." Now it means
4934 "do not run Elab_New." This is of use if there are bugs that
4935 cause Elab_New to crash.
4936 (Elab_Position, Num_Chosen): Change type to Nat, to avoid various
4938 * ali.ads (Elab_Position): Change type to Nat, to avoid various
4941 2017-09-06 Arnaud Charlet <charlet@adacore.com>
4943 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Fix
4944 reference to SPARK RM.
4946 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
4948 * layout.adb: Use SSU short hand consistently throughout the file.
4950 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
4952 * freeze.adb (Freeze_Record_Type)
4953 <Sized_Component_Total_Round_RM_Size>: New local variable to
4954 accumulate the rounded RM_Size of components. Update it for
4955 every component whose RM_Size is statically known. Add missing
4956 guard to check that bit packing is really required before issuing
4957 the error about packing. Swap condition for clarity's sake.
4958 * sem_prag.adb (Usage_Error): Fix reference to SPARK RM in comment.
4960 2017-09-06 Fedor Rybin <frybin@adacore.com>
4962 * makeutl.adb, makeutl.ads, mlib.adb, mlib.ads, mlib-fil.adb,
4963 mlib-fil.ads, mlib-prj.adb, mlib-prj.ads, mlib-tgt.adb, mlib-tgt.ads,
4964 mlib-tgt-specific.adb, mlib-tgt-specific.ads,
4965 mlib-tgt-specific-aix.adb, mlib-tgt-specific-darwin.adb,
4966 mlib-tgt-specific-hpux.adb, mlib-tgt-specific-linux.adb,
4967 mlib-tgt-specific-mingw.adb, mlib-tgt-specific-solaris.adb,
4968 mlib-tgt-specific-vxworks.adb, mlib-tgt-specific-xi.adb, mlib-utl.adb,
4969 mlib-utl.ads, prj.adb, prj.ads, prj-attr.adb, prj-attr.ads,
4970 prj-attr-pm.adb, prj-attr-pm.ads, prj-com.ads, prj-conf.adb,
4971 prj-conf.ads, prj-dect.adb, prj-dect.ads, prj-env.adb, prj-env.ads,
4972 prj-err.adb, prj-err.ads, prj-ext.adb, prj-ext.ads, prj-makr.adb,
4973 prj-makr.ads, prj-nmsc.adb, prj-nmsc.ads, prj-pars.adb, prj-pars.ads,
4974 prj-part.adb, prj-part.ads, prj-pp.adb, prj-pp.ads, prj-proc.adb,
4975 prj-proc.ads, prj-strt.adb, prj-strt.ads, prj-tree.adb, prj-tree.ads,
4976 prj-util.adb, prj-util.ads, sinput-p.adb, sinput-p.ads: Remove obsolete
4977 project manager sources.
4979 2017-09-06 Ed Schonberg <schonberg@adacore.com>
4981 * sem_ch5.adb (Analyze_Assigment): If the left-hand side is an
4982 entity of a mutable type and the right-hand side is a conditional
4983 expression, resolve the alternatives of the conditional using
4984 the base type of the target entity, because the alternatives
4985 may have distinct subtypes. This is particularly relevant if
4986 the alternatives are aggregates.
4988 2017-09-06 Ed Schonberg <schonberg@adacore.com>
4990 * checks.adb (Apply_Predicate_Check): If the expression is an
4991 aggregate that is the RHS of an assignment, apply the check to
4992 the LHS after the assignment, rather than to the aggregate. This
4993 is more efficient than creating a temporary for the aggregate,
4994 and prevents back-end crashes when the aggregate includes a
4995 dynamic "others' association.
4997 2017-09-06 Yannick Moy <moy@adacore.com>
4999 * sem_ch12.adb (Analyze_Instance_And_Renamings):
5000 Set variable to ignore SPARK_Mode in instance before the analysis
5001 of the generated package declaration.
5003 2017-09-06 Yannick Moy <moy@adacore.com>
5005 * sem_res.adb (Resolve_Call): Do not issue a
5006 message for calls inside expression function, unless body was
5007 seen and is candidate for inlining.
5009 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5011 * sem_aux.adb (Is_Generic_Formal): Handle properly formal packages.
5012 * sem_ch3.adb (Analyze_Declarations): In a generic subprogram
5013 body. do not freeze the formals of the generic unit.
5015 2017-09-06 Gary Dismukes <dismukes@adacore.com>
5017 * errout.adb (Error_Msg): Separate the
5018 treatment for warning vs. style messages in inlinings and
5019 instantiations. Prevents blowups on calls to Warn_Insertion for
5020 style messages, which should not be called in that case because
5021 Warning_Msg_Char is not set.
5023 2017-09-06 Justin Squirek <squirek@adacore.com>
5025 * sem_prag.adb (Check_VFA_Conflicts): Created
5026 to group all Volatile_Full_Access checks relating to other
5027 representation pragmas (Mark_Component_Or_Object): Created
5028 to centeralize the flagging of attributes for the record type
5029 component case, a pragma applied individually to a component, and
5031 (Process_Atomic_Independent_Shared_Volatile):
5032 Add propagation of certain pragmas to record components and move
5033 evaluation of VFA checks
5035 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5037 * sem_prag.adb (Check_Postcondition_Use_In_Inlined_Subprogram):
5038 Do not warn on conditions that are not obeyed for Inline_Always
5039 subprograms, when assertions are not enabled.
5041 2017-09-06 Arnaud Charlet <charlet@adacore.com>
5043 * sem_util.adb (Unique_Entity): For abstract states return their
5046 2017-09-06 Bob Duff <duff@adacore.com>
5048 * sem_ch12.adb (Copy_Generic_Node): When we copy a node
5049 that is a proper body corresponding to a stub, we defer the
5050 adjustment of the sloc until after the correct adjustment has
5051 been computed. Otherwise, Adjust_Instantiation_Sloc will ignore
5052 the adjustment, because it will be outside the range in (the old,
5053 incorrect) S_Adjustment.
5054 * inline.adb: Use named notation for readability and uniformity.
5055 * sinput-l.adb: Minor improvements to debugging output printed
5057 * sinput-l.ads (Create_Instantiation_Source): Minor comment
5060 2017-09-06 Vincent Celier <celier@adacore.com>
5062 * make.adb: Do not invoke gprbuild for -bargs -P.
5064 2017-09-06 Sylvain Dailler <dailler@adacore.com>
5066 * sem_eval.adb (Compile_Time_Known_Value_Or_Aggr): Adding a
5067 case when Op is of kind N_Qualified_Expression. In this case,
5068 the function is called recursively on the subexpression like in
5070 * make.adb: Minor reformatting
5072 2017-09-06 Justin Squirek <squirek@adacore.com>
5074 * einfo.adb (Set_Linker_Section_Pragma): Modify
5075 Set_Linker_Section_Pragma to be consistant with the "getter"
5076 Linker_Section_Pragma.
5077 * exp_ch5.adb (Expand_Formal_Container_Loop): Add proper error
5078 checking for container loops so that the index cursor is not
5079 directly changable by the user with the use of E_Loop_Parameter.
5080 * sem_ch5.adb (Analyze_Block_Statement): Revert previous change.
5081 * sem_warn.adb (Check_References): Revert previous change.
5083 2017-09-06 Bob Duff <duff@adacore.com>
5085 * exp_util.adb (Is_Displace_Call): Make sure it works for indirect
5088 2017-09-06 Yannick Moy <moy@adacore.com>
5090 * sem_prag.adb (Analyze_Depends_Global): Reinforce test on object
5091 declarations to only consider valid uses of Global/Depends those on
5092 single concurrent objects.
5094 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5096 * sem_ch13.adb (Check_Record_Representation_Clause): Give an
5097 error as soon as one of the specified components overlaps the
5100 2017-09-06 Arnaud Charlet <charlet@adacore.com>
5102 * sem_prag.ads: minor fix typo in comment.
5104 2017-09-06 Justin Squirek <squirek@adacore.com>
5106 * sem_ch5.adb (Analyze_Block_Statement): Verify a block comes
5107 from source before checking source references.
5108 * sem_warn.adb (Check_References): Add check for internal block
5111 2017-09-06 Vincent Celier <celier@adacore.com>
5113 * make.adb, makeusg.adb, switch-m.adb, switch-m.ads, make_util.adb,
5114 make_util.ads, sinput.adb, sinput.ads, clean.adb, gnatls.adb,
5115 gnatname.adb: Remove the Project Manager from the GNAT tools.
5116 * gcc-interface/Makefile.in: ditto.
5118 2017-09-06 Bob Duff <duff@adacore.com>
5120 * sem_util.ads: Minor comment fix.
5122 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5124 * sem_ch12.adb (Analyze_Associations, case of Formal_Package):
5125 Generate a freeze node for the actual of a formal package, if
5126 the actual is declared in the same unit and has a corresponding
5127 body, to prevent the current instance from being frozen before
5130 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5132 * sem_ch7.adb (Entity_Table_Size): Change to nearest prime number.
5134 2017-09-06 Yannick Moy <moy@adacore.com>
5136 * sem_warn.adb: Minor refactoring.
5138 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5140 * einfo.ads, einfo.adb (Get_Classwwide_Pragma): New utility,
5141 to retrieve the inherited classwide precondition/postcondition
5143 * freeze.adb (Freeze_Entity): Use Get_Classwide_Pragma when
5144 freezing a subprogram, to complete the generation of the
5145 corresponding checking code.
5147 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5149 * exp_util.adb (Is_Controlled_Indexing): New routine.
5150 (Is_Displace_Call): Use routine Strip to remove indirections.
5151 (Is_Displacement_Of_Object_Or_Function_Result): Code clean up. Add a
5152 missing case of controlled generalized indexing.
5153 (Is_Source_Object): Use routine Strip to remove indirections.
5154 (Strip): New routine.
5156 2017-09-06 Bob Duff <duff@adacore.com>
5158 * sysdep.c (__gnat_has_cap_sys_nice): If HAVE_CAPABILITY is defined,
5159 we include the proper header. Otherwise, we just declare the necessary
5160 things from the capabilities library. This is so we can build on
5161 machines without that library, while still enabling that library.
5162 At run time, we're using weak symbols, so __gnat_has_cap_sys_nice will
5163 simply return 0 if the library is not present, or not included
5166 2017-09-06 Pierre-Marie de Rodat <derodat@adacore.com>
5168 * exp_dbug.adb (Debug_Renaming_Declaration): Do not create an encoding
5169 for renamings that involve function calls in prefix form.
5171 2017-09-06 Bob Duff <duff@adacore.com>
5173 * sem_ch3.adb (Analyze_Subtype_Declaration):
5174 Set Has_Delayed_Freeze on a subtype of an incomplete type.
5176 2017-09-06 Pierre-Marie de Rodat <derodat@adacore.com>
5178 * par_sco.adb (Extend_Statement_Sequence): When the accept statement
5179 has no parameter specification and no entry index, use the entry name
5180 as the end of the generated SCO statement.
5182 2017-09-06 Steve Baird <baird@adacore.com>
5184 * exp_util.adb (Side_Effect_Free): For CodePeer (only) treat
5185 uses of 'Image and related attributes as having side effects in
5186 order to avoid replicating such uses.
5187 * pprint.ads (Expression_Image) Add new generic formal flag
5188 Hide_Temp_Derefs. The flag defaults to False; CodePeer will
5189 (eventually) override the default.
5190 * pprint.adb (Expression_Image) If the new flag is set, then
5191 suppress the ".all" suffix when displaying a dereference whose
5192 prefix is a use of a value-capturing compiler temp of the sort
5193 generated by Expr_Util.Remove_Side_Effects .
5194 * exp_attr.adb, g-catiio.adb, inline.adb, sem_attr.adb, sem_ch13.adb,
5195 sem_ch7.adb, sem_dim.adb, sem_util.adb, sem_util.ads, sem_warn.adb:
5197 * inline.adb: Minor wording change.
5199 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5201 * sem_ch7.adb: Update comment.
5203 2017-09-06 Yannick Moy <moy@adacore.com>
5205 * einfo.adb, einfo.ads (Is_Subprogram_Or_Entry): New predicate.
5206 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Use new function.
5207 * sem_util.adb, sem_util.ads (Within_Protected_Type): Renaming
5208 with slight modification from Is_Subp_Or_Entry_Inside_Protected,
5209 so that applies to any entity.
5211 2017-09-06 Yannick Moy <moy@adacore.com>
5213 * sem_ch3.adb (Derived_Type_Declaration): Use
5214 Incomplete_Or_Partial_View rather than local Find_Partial_View.
5216 2017-09-06 Javier Miranda <miranda@adacore.com>
5218 * g-catiio.ads, g-catiio.adb (Value): Extended to parse an UTC time
5221 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5223 * sem_dim.adb (Analyze_Dimension): In an instance, a type
5224 conversion takes its dimensions from the expression, not from
5226 (Dimensions_Of_Operand): Ditto.
5228 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5230 * exp_ch6.adb (Expand_Call_Helper): Do not optimize calls to
5231 null procedures when GNAT coverage is used, so that their (empty)
5232 bodies are properly covered.
5234 2017-09-06 Bob Duff <duff@adacore.com>
5236 * sem_ch13.adb (Resolve_Aspect_Expressions): If
5237 the entity is a type with discriminants, make the discriminants
5238 directly visible in aspect clauses.
5240 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5242 * sem_res.adb (Resolve_Arithmentic_Op): If both operands are
5243 Universal_Real and the context is a floating-point type, resolve
5244 both operands to the target type.
5246 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5248 * a-comlin.adb, exp_aggr.adb, exp_ch6.adb, frontend.adb, gnatbind.adb,
5249 sem_ch3.adb, sem_util.adb: Minor reformatting.
5251 2017-09-06 Yannick Moy <moy@adacore.com>
5253 * freeze.adb (Check_Inherited_Conditions): Rewriting
5254 of inherited preconditions and postconditions should only occur
5255 in GNATprove mode, that is, when GNATprove_Mode is True, not to
5256 be confused with SPARK_Mode being On.
5258 2017-09-06 Yannick Moy <moy@adacore.com>
5260 * sem_warn.adb (Check_References): Take into
5261 account possibility of attribute reference as original node.
5263 2017-09-06 Yannick Moy <moy@adacore.com>
5265 * exp_attr.adb (Expand_N_Attribute_Reference): Protect against invalid
5268 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5270 * inline.adb (Split_Unconstrained_Function): Also set Is_Inlined
5271 on the procedure created to encapsulate the body.
5272 * sem_ch7.adb: Add with clause for GNAT.HTable.
5273 (Entity_Table_Size): New constant.
5274 (Entity_Hash): New function.
5275 (Subprogram_Table): New instantiation of GNAT.Htable.Simple_HTable.
5276 (Is_Subprogram_Ref): Rename into...
5277 (Scan_Subprogram_Ref): ...this. Record references to subprograms in
5278 the table instead of bailing out on them. Scan the value of constants
5279 if it is not known at compile time.
5280 (Contains_Subprograms_Refs): Rename into...
5281 (Scan_Subprogram_Refs): ...this.
5282 (Has_Referencer): Scan the body of all inlined subprograms. Reset the
5283 Is_Public flag on subprograms if they are not actually referenced.
5284 (Hide_Public_Entities): Beef up comment on the algorithm.
5285 Reset the table of subprograms on entry.
5287 2017-09-06 Yannick Moy <moy@adacore.com>
5289 * inline.adb: Add comments to Can_Be_Inlined_In_GNATprove_Mode.
5291 2017-09-06 Javier Miranda <miranda@adacore.com>
5293 * exp_aggr.adb (Component_Not_OK_For_Backend): The C backend
5294 cannot handle a type conversion of an array as an aggregate
5297 2017-09-06 Bob Duff <duff@adacore.com>
5299 * g-comlin.adb (Try_Help): Remove ".exe" so we
5300 get the same results on windows and unix.
5302 2017-09-06 Justin Squirek <squirek@adacore.com>
5304 * exp_imgv.adb (Expand_Image_Attribute),
5305 (Expand_Wide_Image_Attribute), (Expand_Wide_Wide_Image_Attribute):
5306 Added case to handle new-style 'Image expansion
5307 (Rewrite_Object_Image): Moved from exp_attr.adb
5308 * exp_attr.adb (Expand_N_Attribute_Reference): Modified Image
5309 attribute cases so that the relevant subprograms in exp_imgv.adb
5310 handle all expansion.
5311 (Rewrite_Object_Reference_Image): Moved to exp_imgv.adb
5312 * sem_attr.adb (Analyze_Attribute): Modified Image attribute
5313 cases to call common function Analyze_Image_Attribute.
5314 (Analyze_Image_Attribute): Created as a common path for all
5315 image attributes (Check_Object_Reference_Image): Removed
5316 * sem_util.ads, sem_util.adb (Is_Image_Applied_To_Object):
5317 Removed and refactored into Is_Object_Image (Is_Object_Image):
5318 Created as a replacement for Is_Image_Applied_To_Object
5320 2017-09-06 Yannick Moy <moy@adacore.com>
5322 * sem_prag.adb (Analyze_Depends_In_Decl_Part): Add continuation
5323 message for missing input.
5325 2017-09-06 Yannick Moy <moy@adacore.com>
5327 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Prevent inlining
5328 of protected subprograms and entries.
5329 * sem_util.adb, sem_util.ads (Is_Subp_Or_Entry_Inside_Protected):
5330 New function to detect when a subprogram of entry is defined
5331 inside a protected object.
5333 2017-09-06 Bob Duff <duff@adacore.com>
5335 * sysdep.c (__gnat_has_cap_sys_nice): New function to determine
5336 whether the current process has the CAP_SYS_NICE capability.
5337 * s-taprop-linux.adb (Get_Ceiling_Support): Update this to allow
5338 ceiling priorities if the current process has the CAP_SYS_NICE
5341 2017-09-06 Bob Duff <duff@adacore.com>
5343 * a-comlin.ads, a-comlin.adb (Argument): Move the constraint
5344 check back to the body, because SPARK is not yet ready for
5345 "or else raise Constraint_Error".
5347 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5349 * exp_ch6.adb (Expand_Call_Helper): Replace call to null
5350 procedure by a single null statement, after evaluating the
5351 actuals that require it.
5353 2017-09-06 Javier Miranda <miranda@adacore.com>
5355 * exp_aggr.adb (Backend_Processing_Possible.Component_Check):
5356 Generating C code improve the code that checks the use of nested
5357 aggregates to initialize object declarations.
5359 2017-09-06 Yannick Moy <moy@adacore.com>
5361 * sem_ch3.adb (Derived_Type_Declaration): Detect
5362 violations of new rule SPARK RM 3.4(1). Also refactor existing
5363 check to use the new function Find_Partial_View.
5365 2017-09-06 Vincent Celier <celier@adacore.com>
5367 * gnatcmd.adb: gnat ls -V -P... invokes gprls -V -P... The code
5368 from the Prj hierarchy has been removed from the GNAT driver.
5370 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5372 * sem_type.adb (Interface_Present_In_Ancestor): Within an
5373 expression function, or within a spec expression (default value,
5374 etc) a reference to an incomplete type is legal: legality of
5375 the operation will be checked when some related entity (type,
5376 object or subprogram) is frozen.
5378 2017-09-06 Gary Dismukes <dismukes@adacore.com>
5380 * exp_ch5.adb, s-diinio.ads, sem_ch4.adb, s-diflio.ads: Minor spelling
5381 adjustments and a typo fix.
5383 2017-09-06 Yannick Moy <moy@adacore.com>
5385 * sem_res.adb (Resolve_Call): Do not issue info
5386 message about inlining of calls to functions in assertions,
5387 for functions whose body has not been seen yet.
5389 2017-09-06 Bob Duff <duff@adacore.com>
5391 * a-comlin.ads, a-comlin.adb (Argument): Simplify the code, now that
5392 we can use modern Ada in this package.
5393 * s-resfil.ads, s-resfil.adb, a-clrefi.ads, a-clrefi.adb:
5394 Move Ada.Command_Line.Response_File to System.Response_File,
5395 and make Ada.Command_Line.Response_File into a rename of
5396 System.Response_File. This is to avoid having gnatbind depend
5397 Ada.Command_Line, which would damage the bootstrap process now
5398 that Ada.Command_Line contains modern Ada (the raise expression).
5399 * gnatbind.adb: Avoid dependence on
5400 Ada.Command_Line. Depend on System.Response_File instead
5401 of Ada.Command_Line.Response_File. Change one call to
5402 Ada.Command_Line.Command_Name to use Fill_Arg. Change one call
5403 to Ada.Command_Line.Argument_Count to use Arg_Count.
5404 * gcc-interface/Make-lang.in, Makefile.rtl: Take note of the new files.
5406 2017-09-06 Bob Duff <duff@adacore.com>
5408 * frontend.adb (Frontend): Skip -gnatec=gnat.adc
5409 switch, because we've already read gnat.adc by default.
5411 2017-09-06 Bob Duff <duff@adacore.com>
5413 * exp_ch5.adb (Get_Default_Iterator): Replace
5414 "Assert(False)" with "return Iter", because if an iterable
5415 type is derived from a noniterable one, then we won't find an
5416 overriding or inherited default iterator.
5418 2017-09-06 Yannick Moy <moy@adacore.com>
5420 * sem_warn.adb (Warn_On_Suspicious_Index): Improve warning when the
5421 literal index used to access a string is null or negative.
5423 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5425 * einfo.adb (Status_Flag_Or_Transient_Decl): The attribute is now
5426 allowed on loop parameters.
5427 (Set_Status_Flag_Or_Transient_Decl): The attribute is now allowed
5429 (Write_Field15_Name): Update the output for
5430 Status_Flag_Or_Transient_Decl.
5431 * einfo.ads: Attribute Status_Flag_Or_Transient_Decl now applies
5432 to loop parameters. Update the documentation of the attribute
5433 and the E_Loop_Parameter entity.
5434 * exp_ch7.adb (Process_Declarations): Remove the bogus guard
5435 which assumes that cursors can never be controlled.
5436 * exp_util.adb (Requires_Cleanup_Actions): Remove the bogus
5437 guard which assumes that cursors can never be controlled.
5439 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5441 * exp_attr.adb, sem_util.adb, sem_attr.adb, sem_ch6.adb, sem_ch8.adb,
5442 sem_warn.adb: Minor reformatting.
5444 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5446 * sem_warn.adb (Warn_On_Overlapping_Actuals): Refine previous
5447 fix and preserve older GNAT warning on overlapping actuals that
5448 are not elementary types.
5450 2017-09-06 Justin Squirek <squirek@adacore.com>
5452 * sem_attr.adb: Comment correction.
5454 2017-09-06 Gary Dismukes <dismukes@adacore.com>
5456 * sem_util.adb: Minor reformatting.
5458 2017-09-06 Yannick Moy <moy@adacore.com>
5460 * a-comlin.ads (Argument): Add precondition for analysis.
5462 2017-09-06 Yannick Moy <moy@adacore.com>
5464 * sem_res.adb (Resolve): Update message for function call as statement.
5466 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5468 * sem_ch6.adb (Check_Returns): Clean up warnings coming from
5469 generated bodies for renamings that are completions, when renamed
5470 procedure is No_Return.
5471 * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
5472 rule in 6.5.1 (7/2): if a renaming is a completion of a subprogram
5473 with No_Return, the renamed entity must be No_Return as well.
5475 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5477 * exp_ch5.adb, freeze.adb, exp_ch4.adb, exp_ch6.adb, lib-xref.adb:
5480 2017-09-06 Justin Squirek <squirek@adacore.com>
5482 * exp_attr.adb (Expand_N_Attribute_Reference): Modified Image
5483 attribute cases (Rewrite_Object_Reference_Image): Created to
5484 aid the rewriting of new-style 'Image attributes.
5485 * sem_attr.adb (Analyze_Attribute): Modified Image attribute cases
5486 (Check_Object_Reference_Image): Created to handle verification of
5487 'Image with object-references as prefixes.
5488 * sem_util.ads, sem_util.adb (Is_Image_Applied_To_Object):
5489 Create predicate to identify cases where an 'Image attribute's
5490 prefix applies to an object reference.
5492 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5494 * freeze.adb (Freeze_Entity): Do not generate a freeze
5495 node for a generic unit, even if it includes delayed aspect
5496 specifications. Freeze nodes for generic entities must never
5497 appear in the tree that reaches the back-end of the compiler.
5499 2017-09-06 Yannick Moy <moy@adacore.com>
5501 * treepr.adb (Print_Entity_Info): Do not print empty Elist.
5503 2017-09-06 Yannick Moy <moy@adacore.com>
5505 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Do not consider calls
5506 to subprograms in other units as possibly inlined.
5508 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5510 * freeze.adb (Freeze_Entity): For a derived type that has no
5511 explicit delayed aspects but may inherit delayed aspects from its
5512 parent type, analyze aspect at freeze point for proper capture
5513 of an inherited aspect.
5515 2017-09-06 Arnaud Charlet <charlet@adacore.com>
5517 * lib-xref.adb (Get_Through_Renamings): Get through subprogram
5518 renamings; also, avoid repeated calls to Renamed_Object when getting
5519 through object renamings.
5521 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5523 * sem_ch3.adb (Array_Type_Declaration): Handle properly an
5524 array type declaration in a private part, when an index is a
5525 subtype indication of a discrete type with a private partial view.
5527 2017-09-06 Javier Miranda <miranda@adacore.com>
5529 * exp_ch4.adb (Expand_Modular_Op): Force generating
5530 temporary to improve the generated code.
5532 2017-09-06 Tristan Gingold <gingold@adacore.com>
5534 * s-fatgen.adb: Minor typo fix in comment.
5536 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5538 * exp_ch5.adb (Make_Field_Assign): If the type
5539 of the right-hand side has stored constraint, use its values
5540 (except for those that are renamings of parent discriminants)
5541 to produce additional assignments for the discriminants of the
5542 left-hand side, which are invisible in the righ-hand side and
5543 not retrievable as selected components.
5545 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5547 * sem_util.adb (Needs_One_Formal): The first formal of such a
5548 function must be a controlling formal, so that Obj.F (X, Y)
5549 can have the interpretation F(Obj)(X, Y).
5550 * sem_util.ads: Clarify documentation.
5552 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5554 * table.ads, table.adb: Restore original implementation.
5555 * namet.h (Names_Ptr): Adjust back.
5556 (Name_Chars_Ptr): Likewise.
5557 * uintp.h (Uints_Ptr): Likewise.
5558 (Udigits_Ptr): Likewise.
5559 * g-table.ads: Remove pragma Compiler_Unit_Warning.
5560 * par_sco.adb: Do not with GNAT.Table and use Table consistently.
5561 * scos.ads: Replace GNAT.Table with Table and adjust instantiations.
5562 * spark_xrefs.ads: Likewise.
5563 * scos.h: Undo latest changes.
5565 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5567 * sem_ch12.adb (Analyze_Subprogram_Instantiation): Propagate
5568 No_Return flag to instance if pragma applies to generic unit. This
5569 must be done explicitly because the pragma does not appear
5570 directly in the generic declaration (unlike the corresponding
5571 aspect specification).
5573 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5575 * sem_ch7.adb (Has_Referencer): Move up and expand comment
5576 explaining the test used to detect inlining. Use same test
5577 in second occurrence.
5578 (Analyze_Package_Body_Helper): Minor formatting fixes.
5580 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5582 * exp_ch4.adb (Handle_Changed_Representation): For an untagged
5583 derived type with a mixture of renamed and constrained parent
5584 discriminants, the constraint for the target must obtain the
5585 discriminant values from both the operand and from the stored
5586 constraint for it, given that the constrained discriminants are
5587 not visible in the object.
5588 * exp_ch5.adb (Make_Field_Assign): The type of the right-hand
5589 side may be derived from that of the left-hand side (as in the
5590 case of an assignment with a change of representation) so the
5591 discriminant to be used in the retrieval of the value of the
5592 component must be the entity in the type of the right-hand side.
5594 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5596 * sem_ch3.adb, sem_ch7.adb, sem_util.adb, g-debpoo.adb, sem_ch4.adb,
5597 sem_ch6.adb, sem_ch8.adb: Minor reformatting.
5598 * exp_util.adb (Is_Source_Object): Account for
5599 the cases where the source object may appear as a dereference
5600 or within a type conversion.
5601 * exp_ch6.adb: Fix missing space in error message.
5603 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5605 * sem_prag.adb: Update description of Eliminate.
5607 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5609 * sem_attr.adb (Analyze_Attribute, case 'Loop_Entry): Handle
5610 properly an attribute reference 'Loop_Entry that appears in the
5611 list of indices of an indexed expression, to prevent an infinite
5612 loop in the compiler.
5614 2017-09-06 Bob Duff <duff@adacore.com>
5616 * s-fileio.adb (Name): Do not raise Use_Error for temp files.
5618 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5620 * sem_ch4.adb (Analyze_Set_Membership): If an alternative
5621 in a set membership is an overloaded enumeration literal, and
5622 the type of the alternative is resolved from a previous one,
5623 replace the entity of the alternative as well as the type,
5624 to prevent inconsistencies between the entity and the type.
5626 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5628 * ali.ads (ALIs_Record): Add No_Component_Reordering component.
5629 (No_Component_Reordering_Specified): New switch.
5630 * ali.adb (Initialize_ALI): Set No_Component_Reordering_Specified.
5631 (Scan_ALI): Set No_Component_Reordering and deal with NC marker.
5632 * bcheck.adb (Check_Consistent_No_Component_Reordering):
5634 (Check_Configuration_Consistency): Invoke it.
5635 * debug.adb (d.r): Toggle the effect of the switch.
5636 (d.v): Change to no-op.
5637 * einfo.ads (Has_Complex_Representation):
5638 Restrict to record types.
5639 (No_Reordering): New alias for Flag239.
5640 (OK_To_Reorder_Components): Delete.
5641 (No_Reordering): Declare.
5642 (Set_No_Reordering): Likewise.
5643 (OK_To_Reorder_Components): Delete.
5644 (Set_OK_To_Reorder_Components): Likewise.
5645 * einfo.adb (Has_Complex_Representation): Expect record types.
5646 (No_Reordering): New function.
5647 (OK_To_Reorder_Components): Delete.
5648 (Set_Has_Complex_Representation): Expect base record types.
5649 (Set_No_Reordering): New procedure.
5650 (Set_OK_To_Reorder_Components): Delete.
5651 (Write_Entity_Flags): Adjust to above change.
5652 * fe.h (Debug_Flag_Dot_R): New macro and declaration.
5653 * freeze.adb (Freeze_Record_Type): Remove conditional code setting
5654 OK_To_Reorder_Components on record types with convention Ada.
5655 * lib-writ.adb (Write_ALI): Deal with NC marker.
5656 * opt.ads (No_Component_Reordering): New flag.
5657 (No_Component_Reordering_Config): Likewise.
5658 (Config_Switches_Type): Add No_Component_Reordering component.
5659 * opt.adb (Register_Opt_Config_Switches): Copy
5660 No_Component_Reordering onto No_Component_Reordering_Config.
5661 (Restore_Opt_Config_Switches): Restore No_Component_Reordering.
5662 (Save_Opt_Config_Switches): Save No_Component_Reordering.
5663 (Set_Opt_Config_Switches): Set No_Component_Reordering.
5664 * par-prag.adb (Prag): Deal with Pragma_No_Component_Reordering.
5665 * sem_ch3.adb (Analyze_Private_Extension_Declaration): Also set the
5666 No_Reordering flag from the default.
5667 (Build_Derived_Private_Type): Likewise.
5668 (Build_Derived_Record_Type): Likewise. Then inherit it
5669 for untagged types and clean up handling of similar flags.
5670 (Record_Type_Declaration): Likewise.
5671 * sem_ch13.adb (Same_Representation): Deal with No_Reordering and
5672 remove redundant test on Is_Tagged_Type.
5673 * sem_prag.adb (Analyze_Pragma): Handle No_Component_Reordering.
5674 (Sig_Flags): Likewise.
5675 * snames.ads-tmpl (Name_No_Component_Reordering): New name.
5676 (Pragma_Id): Add Pragma_No_Component_Reordering value.
5677 * warnsw.adb (Set_GNAT_Mode_Warnings): Enable -gnatw.q as well.
5678 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>:
5679 Copy the layout of the parent type only if the No_Reordering
5681 (components_to_record): Reorder record types with
5682 convention Ada by default unless No_Reordering is set or -gnatd.r
5683 is specified and do not warn if No_Reordering is set in GNAT mode.
5685 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5687 * sem_util.ads, sem_util.adb (Check_Previous_Null_Procedure):
5688 new predicate to reject declarations that can be completions,
5689 when there is a visible prior homograph that is a null procedure.
5690 * sem_ch6.adb (Analyze_Null_Procedure): use it.
5691 * sem_ch8.adb (Analyze_Subprogram_Renaming): ditto.
5693 2017-09-06 Thomas Quinot <quinot@adacore.com>
5695 * s-regpat.adb (Compile.Parse_Literal): Fix handling of literal
5696 run of 253 characters or more.
5698 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5700 * einfo.adb (Designated_Type): Use Is_Incomplete_Type to handle
5701 properly incomplete subtypes that may be created by explicit or
5702 implicit declarations.
5703 (Is_Base_Type): Take E_Incomplete_Subtype into account.
5704 (Subtype_Kind): Ditto.
5705 * sem_ch3.adb (Build_Discriminated_Subtype): Set properly the
5706 Ekind of a subtype of a discriminated incomplete type.
5707 (Fixup_Bad_Constraint): Use Subtype_Kind in all cases, including
5708 incomplete types, to preserve error reporting.
5709 (Process_Incomplete_Dependents): Do not create a subtype
5710 declaration for an incomplete subtype that is created internally.
5711 * sem_ch7.adb (Analyze_Package_Specification): Handle properly
5712 incomplete subtypes that do not require a completion, either
5713 because they are limited views, of they are generic actuals.
5715 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5717 * checks.adb (Insert_Valid_Check): Remove the
5718 suspicious manipulation of the Do_Range_Check flag as ths is
5719 no linger needed. Suppress validity check when analysing the
5720 validation variable.
5722 2017-09-06 Philippe Gil <gil@adacore.com>
5724 * g-debpoo.adb: adapt GNAT.Debug_Pools to allow safe thread
5727 2017-09-06 Bob Duff <duff@adacore.com>
5729 * sem_elim.adb: Minor comment fix.
5731 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5733 * sem_util.adb (Is_Object_Reference): A function call is an
5734 object reference, and thus attribute references for attributes
5735 that are functions (such as Pred and Succ) as well as predefined
5736 operators are legal in contexts that require an object, such as
5737 the prefix of attribute Img and the Ada2020 version of 'Image.
5739 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
5741 * exp_util.adb, einfo.adb, sem_attr.adb, exp_ch4.adb, gnatls.adb,
5742 exp_ch3.adb, xoscons.adb: Minor reformatting.
5744 2017-09-06 Raphael Amiard <amiard@adacore.com>
5746 * a-chtgop.ads, a-chtgop.adb: Add versions of First and Next with
5747 Position parameter. If supplied, use it to provide efficient iteration.
5748 * a-cohase.ads, a-cohase.adb, a-cihama.ads, a-cihama.adb,
5749 a-cohama.ads, a-cohama.adb: Add/Use Position to provide efficient
5752 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5754 * exp_util.adb (Build_Allocate_Deallocate_Proc): If the
5755 designated type is class-wide and the expression is an unchecked
5756 conversion, preserve the conversion when checking the tag of the
5757 designated object, to prevent spurious semantic errors when the
5758 expression in the conversion has an untagged type (for example
5759 an address attribute).
5761 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5763 * sem_res.adb (Resolve_Entry_Call): Check whether a protected
5764 operation is subject to a pragma Eliminate.
5766 2017-09-06 Ed Schonberg <schonberg@adacore.com>
5768 * sem_elim.ads, exp_ch4.adb: Minor reformatting.
5770 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
5772 * fe.h (Eliminate_Error_Msg): Remove.
5774 2017-09-05 Richard Sandiford <richard.sandiford@linaro.org>
5776 * gcc-interface/utils.c (make_packable_type): Update call to
5779 2017-09-05 Richard Sandiford <richard.sandiford@linaro.org>
5781 * gcc-interface/utils2.c (build_load_modify_store):
5782 Use int_mode_for_size.
5784 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5787 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
5788 for Itypes that are E_Record_Subtype with a cloned subtype.
5789 <E_Record_Subtype>: Use the DECL of the cloned type directly, if any.
5791 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5793 * gcc-interface/trans.c (convert_with_check): Use a custom base type
5794 if the base type of the expression has a different machine mode.
5795 Rename a couple of parameters and local variable.
5797 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5799 * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Address>: Do not strip
5800 conversions around prefixes that are not references.
5802 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5804 * gcc-interface/utils.c (unchecked_convert): When the result type is a
5805 non-biased integral type with size 0, set the result to 0 directly.
5807 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5809 * gcc-interface/gigi.h (renaming_from_generic_instantiation_p): Turn to
5810 (renaming_from_instantiation_p): ...this.
5811 * gcc-interface/decl.c (gnat_to_gnu_entity): Use inline predicate
5812 instead of explicit tests on kind of entities. Adjust for renaming.
5813 (gnat_to_gnu_profile_type): Likewise.
5814 (gnat_to_gnu_subprog_type): Likewise.
5815 * gcc-interface/trans.c (Identifier_to_gnu): Likewise.
5816 (Case_Statement_to_gnu): Likewise.
5817 (gnat_to_gnu): Likewise.
5818 (process_freeze_entity): Likewise.
5819 (process_type): Likewise.
5820 (add_stmt_with_node): Adjust for renaming.
5821 * gcc-interface/utils.c (gnat_pushdecl): Adjust for renaming.
5822 (renaming_from_generic_instantiation_p): Rename to...
5823 (renaming_from_instantiation_p): ...this. Use inline predicate.
5824 (pad_type_hasher::keep_cache_entry): Fold.
5826 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5828 * gcc-interface/trans.c (adjust_for_implicit_deref): New function.
5829 (gnat_to_gnu) <N_Explicit_Dereference>: Translate result type first.
5830 (N_Indexed_Component): Invoke adjust_for_implicit_deref on the prefix.
5831 (N_Slice): Likewise.
5832 (N_Selected_Component): Likewise. Do not try again to translate it.
5833 (N_Free_Statement): Invoke adjust_for_implicit_deref on the expression.
5835 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5837 * repinfo.ads: Document new treatment of dynamic values.
5838 (TCode): Bump upper bound to 29.
5839 (Dynamic_Val): New constant set to 29.
5840 * repinfo.adb (Print_Expr) <Dynamic_Val>: New case.
5841 (Rep_Value) <Dynamic_Val>: Likewise.
5842 * repinfo.h (Dynamic_Val): New macro.
5843 * gcc-interface/decl.c (annotate_value): Tidy up and cache result for
5845 <INTEGER_CST>: Set TCODE instead of recursing.
5846 <COMPONENT_REF>: Set TCODE instead of calling Create_Node manually.
5847 <VAR_DECL>: New case.
5848 <MULT_EXPR, PLUS_EXPR>: Fold conversions into inner operations.
5849 <BIT_AND_EXPR>: Adjust.
5850 <CALL_EXPR>: Do not fall through.
5852 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5854 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
5855 there is no target, do not create a temporary for the return value for
5856 an allocator either.
5858 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
5860 * gcc-interface/trans.c (pos_to_constructor): Skip conversions to an
5861 unconstrained array type.
5863 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5864 Alan Hayward <alan.hayward@arm.com>
5865 David Sherwood <david.sherwood@arm.com>
5867 * gcc-interface/decl.c (validate_size): Use NARROWEST_INT_MODE
5868 instead of GET_CLASS_NARROWEST_MODE (MODE_INT).
5870 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5871 Alan Hayward <alan.hayward@arm.com>
5872 David Sherwood <david.sherwood@arm.com>
5874 * gcc-interface/decl.c (check_ok_for_atomic_type): Use
5875 is_a <scalar_int_mode>.
5876 * gcc-interface/trans.c (Pragma_to_gnu): Likewise.
5877 * gcc-interface/utils.c (gnat_type_for_mode): Likewise.
5879 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5880 Alan Hayward <alan.hayward@arm.com>
5881 David Sherwood <david.sherwood@arm.com>
5883 * gcc-interface/decl.c (gnat_to_gnu_entity): Use int_mode_for_size
5884 instead of mode_for_size.
5885 (gnat_to_gnu_subprog_type): Likewise.
5886 * gcc-interface/utils.c (make_type_from_size): Likewise.
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 opt_scalar_float_mode.
5893 (fp_size_to_prec): Likewise.
5895 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5896 Alan Hayward <alan.hayward@arm.com>
5897 David Sherwood <david.sherwood@arm.com>
5899 * gcc-interface/utils.c (gnat_type_for_mode): Use is_a
5900 <scalar_float_mode> instead of SCALAR_FLOAT_MODE_P.
5902 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5903 Alan Hayward <alan.hayward@arm.com>
5904 David Sherwood <david.sherwood@arm.com>
5906 * gcc-interface/decl.c (validate_size): Update use of
5907 GET_MODE_WIDER_MODE, forcing a wider mode to exist.
5909 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
5910 Alan Hayward <alan.hayward@arm.com>
5911 David Sherwood <david.sherwood@arm.com>
5913 * gcc-interface/misc.c (fp_prec_to_size): Use new mode iterators.
5914 (fp_size_to_prec): Likewise.
5916 2017-08-29 Martin Liska <mliska@suse.cz>
5919 * gcc-interface/trans.c (Pragma_to_gnu): Set argument to NULL.
5921 2017-08-08 Martin Liska <mliska@suse.cz>
5923 * gcc-interface/trans.c: Include header files.
5925 2017-07-29 Jakub Jelinek <jakub@redhat.com>
5927 * gcc-interface/utils.c (gnat_write_global_declarations): Pass false
5928 as new argument to the imported_module_or_decl debug hook.
5930 2017-07-25 Javier Miranda <miranda@adacore.com>
5932 * checks.adb (Apply_Divide_Checks): Ensure that operands are not
5935 2017-07-19 Jakub Jelinek <jakub@redhat.com>
5937 * gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE,
5938 TYPE_GCC_MIN_VALUE): Use TYPE_MIN_VALUE_RAW instead of TYPE_MINVAL.
5939 (TYPE_GCC_MAX_VALUE): Use TYPE_MAX_VALUE_RAW instead of TYPE_MAXVAL.
5941 2017-07-18 Mike Frysinger <vapier@chromium.org>
5943 * gcc-interface/Makefile.in (../../gnatmake$(exeext)): Delete $(P).
5944 (../../gnatlink$(exeext)): Likewise.
5946 2017-07-15 John Paul Adrian Glaubitz <glaubitz@physik.fu-berlin.de>
5949 * system-linux-m68k.ads: Add pragma No_Elaboration_Code_All.
5950 (Backend_Overflow_Checks): Set to True.
5952 2017-06-23 Jakub Jelinek <jakub@redhat.com>
5954 * gcc-interface/trans.c (gnat_to_gnu): Initialize sync to false.
5956 2017-06-21 Pierre-Marie de Rodat <derodat@adacore.com>
5958 * gcc-interface/ada-tree.h (DECL_FUNCTION_IS_DEF): Update copyright
5960 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Tag the subprogram
5962 (Compilation_Unit_to_gnu): Tag the elaboration procedure as a
5964 * gcc-interface/decl.c (gnat_to_gnu_entity): Tag declarations of
5965 imported subprograms for the current compilation unit as
5966 definitions. Disable debug info for references to variables.
5967 * gcc-interface/gigi.h (create_subprog_decl): Update declaration.
5968 * gcc-interface/utils.c (gnat_pushdecl): Add external DECLs that are
5969 not built-in functions to their binding scope.
5970 (create_subprog_decl): Add a DEFINITION parameter. If it is true, tag
5971 the function as a definition. Update all callers.
5972 (gnat_write_global_declarations): Emit debug info for imported
5973 functions. Filter out external variables for which debug info
5976 2017-06-15 Nicolas Boulenguez <nicolas.boulenguez@free.fr>
5979 * gcc-interface/Makefile.in (x86 kfreebsd): Adjust system.ads setting.
5980 (i[3456]86-pc-gnu): Likewise.
5981 (x86_64 kfreebsd): Likewise.
5983 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
5986 * exp_ch3.adb (Make_Predefined_Primitive_Specs): Use Positive index.
5988 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
5991 * s-interr-hwint.adb: Reinstate.
5992 * gcc-interface/Makefile.in (RTEMS): Use it again.
5994 2017-06-08 Olivier Hainque <hainque@adacore.com>
5996 * vx_crtbegin_auto.c: Update year in copyright notice.
5997 * vx_crtbegin.c: Likewise.
5998 * vx_crtbegin.inc: Likewise.
5999 * vx_crtend.c: Likewise.
6001 2017-06-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
6003 * Makefile.in (rtems): Use TLS implementation for s-tpopsp.adb.
6004 * s-tpopsp-rtems.adb: Delete.
6006 2017-06-02 Olivier Hainque <hainque@adacore.com>
6008 * vx_crtbegin_auto.c: New file.
6009 * vx_crtbegin.c: New file.
6010 * vx_crtbegin.inc: New file.
6011 * vx_crtend.c: New file.
6013 2017-05-25 Jonathan Wakely <jwakely@redhat.com>
6015 * gcc-interface/utils2.c (compare_elmt_bitpos): Remove redundant
6016 const qualifiers that cause -Wignored-qualifiers warnings.
6018 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
6020 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
6021 for Itypes that are E_Access_Subtype.
6022 <E_Access_Subtype>: Use the DECL of the base type directly.
6024 2017-05-22 Ed Schonberg <schonberg@adacore.com>
6025 Eric Botcazou <ebotcazou@adacore.com>
6027 * sem_ch4.adb (Analyze_Call): In Ada2012 an incomplete type from a
6028 limited view may appear in the profile of a function, and a call to
6029 that function in another unit in which the full view is available must
6030 use this full view to spurious type errors at the point of call.
6031 * inline.adb (Analyze_Inlined_Bodies): Remove restriction on loading
6032 of parent body with a with clause for the main unit.
6033 * gcc-interface/decl.c (defer_limited_with_list): Document new usage.
6034 (gnat_to_gnu_entity) <E_Access_Type>: Handle completed Taft Amendment
6035 types declared in external units like types from limited with clauses.
6036 Adjust final processing of defer_limited_with_list accordingly.
6037 * gcc-interface/trans.c (gnat_to_gnu) < N_Selected_Component>: Try
6038 again to translate the prefix after the field if it is incomplete.
6040 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
6042 * gcc-interface/decl.c (gnat_to_gnu_field): Do not enforce strict
6043 alignment for simple volatile fields and remove associated errors.
6045 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6047 * gcc-interface/gigi.h (get_elaboration_procedure): Delete.
6048 * gcc-interface/trans.c (get_elaboration_procedure): Make static.
6050 2017-05-15 Pierre-Marie de Rodat <derodat@adacore.com>
6052 * gcc-interface/utils.c (can_materialize_object_renaming_p):
6053 Synchronize with GNAT's Exp_Dbug.Debug_Renaming_Declaration:
6054 process Original_Node instead of expanded names.
6056 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6058 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Only apply the
6059 addressability check in the constrained case.
6061 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6063 * gcc-interface/trans.c (Identifier_to_gnu): Also accept incomplete
6064 types not coming from a limited context.
6066 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6068 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Skip subprograms on
6069 the inlined list that are not public.
6070 * gcc-interface/utils.c (create_subprog_decl): Clear TREE_PUBLIC if
6071 there is a pragma Inline_Always on the subprogram.
6073 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6075 * gcc-interface/trans.c (gnat_to_gnu) <N_Aggregate>: Fix formatting.
6076 <N_Allocator>: Use properly typed constants.
6077 (extract_values): Move around.
6078 (pos_to_constructor): Minor tweaks.
6079 (Sloc_to_locus): Fix formatting.
6080 * gcc-interface/utils.c (process_deferred_decl_context): Minor tweaks.
6081 * gcc-interface/gigi.h (MARK_VISITED): Remove blank line.
6082 (Gigi_Equivalent_Type): Adjust head comment.
6083 * gcc-interface/decl.c (Gigi_Equivalent_Type): Likewise.
6085 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
6087 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: When there
6088 is a representation clause on an extension, propagate the alignment of
6089 the parent type only if the platform requires strict alignment.
6091 2017-05-12 Eric Botcazou <ebotcazou@adacore.com>
6093 * system-linux-arm.ads (Memory_Size): Use Long_Integer'Size
6094 instead of Word_Size.
6097 2017-03-28 Andreas Schwab <schwab@suse.de>
6100 * system-linux-aarch64-ilp32.ads: New file.
6101 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
6102 from LIBGNAT_TARGET_PAIRS.
6103 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
6104 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
6105 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
6106 or -mabi=ilp32, resp.
6108 2017-05-10 H.J. Lu <hongjiu.lu@intel.com>
6111 * system-linux-x86.ads (Memory_Size): Use Long_Integer'Size
6112 instead of Word_Size.
6114 2017-05-10 Bernd Edlinger <bernd.edlinger@hotmail.de>
6116 * raise-gcc.c (exception_class_eq): Make ec parameter const.
6118 2017-05-02 Richard Biener <rguenther@suse.de>
6120 * gcc-interface/misc.c (gnat_post_options): Do not set
6123 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6125 * gcc-interface/trans.c (assoc_to_constructor): Make sure
6126 Corresponding_Discriminant is only called on discriminants.
6127 Skip the saving of the result only for them.
6128 (gnat_to_gnu) <N_Selected_Component>: Likewise.
6129 <N_Unchecked_Type_Conversion>: Translate the result type first.
6130 (gigi): Set TREE_NOTHROW on Begin_Handler.
6131 (stmt_list_cannot_raise_p): New predicate.
6132 (Exception_Handler_to_gnu_gcc): Emit a simple final call instead of
6133 a cleanup if the statements of the handler cannot raise.
6134 (process_freeze_entity): Use Is_Record_Type.
6135 (process_type): Likewise.
6137 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6139 * einfo.ads (Corresponding_Record_Component): New alias
6140 for Node21 used for E_Component and E_Discriminant.
6141 * einfo.adb (Corresponding_Record_Component): New function.
6142 (Set_Corresponding_Record_Component): New procedure.
6143 (Write_Field21_Name): Handle Corresponding_Record_Component.
6144 * sem_ch3.adb (Inherit_Component): Set
6145 Corresponding_Record_Component for every component in
6146 the untagged case. Clear it afterwards for non-girder
6148 * gcc-interface/decl.c (gnat_to_gnu_entity)
6149 <E_Record_Type>: For a derived untagged type with discriminants
6150 and constraints, apply the constraints to the layout of the
6151 parent type to deduce the layout.
6152 (field_is_aliased): Delete.
6153 (components_to_record): Test DECL_ALIASED_P directly.
6154 (annotate_rep): Check that fields are present except for
6156 (create_field_decl_from): Add DEBUG_INFO_P
6157 parameter and pass it in recursive and other calls. Add guard
6158 for the manual CSE on the size.
6159 (is_stored_discriminant): New predicate.
6160 (copy_and_substitute_in_layout): Consider only
6161 stored discriminants and check that original fields are present
6162 in the old type. Deal with derived types. Adjust call to
6163 create_variant_part_from.
6165 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6167 * exp_ch6.adb (Expand_Call_Helper): When locating the
6168 accessibility entity created for an access parameter, handle
6169 properly a reference to a formal of an enclosing subprogram. if
6170 the reference appears in an inherited class-wide condition, it
6171 is the rewriting of the reference in the ancestor expression,
6172 but the accessibility entity must be that of the current formal.
6174 2017-05-02 Javier Miranda <miranda@adacore.com>
6176 * exp_ch4.adb (Expand_Non_Binary_Modular_Op): New subprogram.
6177 (Expand_N_Op_Add, Expand_N_Op_Divide, Expand_N_Op_Minus,
6178 Expand_N_Op_Multiply, Expand_N_Op_Or, Expand_N_Op_Subtract):
6179 Call Expand_Non_Binary_Modular_Op.
6181 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6183 * sem_ch3.adb (Build_Derived_Private_Type): If the parent type
6184 has discriminants, do not override the Stored_Constraint list of
6185 the full view of the derived type with that of the derived type.
6187 2017-05-02 Bob Duff <duff@adacore.com>
6189 * sem_attr.adb (Attribute_Enum_Rep): Disallow T'Enum_Rep.
6191 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
6193 * s-os_lib.ads: Minor typo fix.
6195 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
6197 * gnatls.adb: Merge and refactor code from Prj.Env and remove
6198 this deprecated dependency.
6200 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6202 * exp_util.ads: minor comment addition.
6204 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6206 * sem_ch3.adb (Build_Derived_Record_Type): Fix a few typos and
6207 pastos in part #3 of the head comment.
6209 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6211 * exp_ch3.adb (Freeze_Type): Do not generate an invariant
6212 procedure body for a local (sub)type declaration within a
6213 predicate function. Invariant checks do not apply to these, and
6214 the expansion of the procedure will happen in the wrong scope,
6215 leading to misplaced freeze nodes.
6217 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6219 * exp_util.adb (Insert_Library_Level_Action): Use proper scope
6220 to analyze generated actions. If the main unit is a body,
6221 the required scope is that of the corresponding unit declaration.
6223 2017-05-02 Arnaud Charlet <charlet@adacore.com>
6225 * einfo.adb (Declaration_Node): flip branches of
6226 an IF statement to avoid repeated negations in its condition;
6227 no change in semantics, only to improve readability.
6229 2017-05-02 Arnaud Charlet <charlet@adacore.com>
6231 * sem_case.adb: Remove extra spaces in parameter declarations.
6233 2017-05-02 Justin Squirek <squirek@adacore.com>
6235 * usage.adb: Replace space with hyphen ("run time" -> "run-time")
6236 in usage line for new -gnatwE switch.
6238 2017-05-02 Claire Dross <dross@adacore.com>
6240 * a-cofuve.ads (Remove): Remove unnecessary
6241 conditions in precondition.
6243 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
6245 * a-stream.ads, exp_imgv.adb, sem_ch10.adb,
6246 sem_attr.adb, s-finmas.ads, osint.adb: Minor typo fix.
6248 2017-05-02 Justin Squirek <squirek@adacore.com>
6250 * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
6251 alternative expression.
6252 * sem_res.adb (Resolve_Case_Expression): Ditto.
6254 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6256 * exp_disp.adb (Set_All_DT_Position, In_Predef_Prim_DT):
6257 Refine predicate for the case where the primitive operation
6258 is a renaming of equality. An overriding operation that is
6259 a user-defined renaming of predefined equality inherits its
6260 slot from the overridden operation. Otherwise it is treated
6261 as a predefined op and occupies the same predefined slot as
6262 equality. A call to it is transformed into a call to its alias,
6263 which is the predefined equality. A dispatching call thus uses
6264 the proper slot if operation is further inherited and called
6265 with class-wide arguments.
6267 2017-05-02 Justin Squirek <squirek@adacore.com>
6269 * errout.adb (Set_Msg_Text): Add a case to switch the message
6270 type when the character '[' is detected signifying a warning
6271 about a run-time exception.
6272 * opt.ads Add a new Warning_Mode value for new switch
6273 * switch-b.adb (Scan_Binder_Switches): Add case for the binder
6274 to handle new warning mode
6275 * usage.adb (Usage): Add usage entry for -gnatwE
6276 * warnsw.adb (Set_Warning_Switch): Add case for the new switch
6278 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6280 * sem_prag.adb (Process_Conversion): Reject an intrinsic operator
6281 declaration that operates on some fixed point type.
6283 2017-05-02 Justin Squirek <squirek@adacore.com>
6285 * a-crbtgo.adb, s-taasde.adb: Remove unused use-type clauses.
6287 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6289 * sem_ch6.adb (Analyze_Null_Procedure): Revert previous change.
6291 2017-05-02 Justin Squirek <squirek@adacore.com>
6293 * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
6294 expression (Analyze_If_Expression): Add check for valid condition
6295 * sem_eval.adb (Eval_Case_Expression): Add check for error posted
6297 * sem_res.adb (Resolve_If_Expression): Add check for valid
6298 condition and then-expression.
6300 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6302 * exp_ch3.adb (Build_Initialization_Call): Generate a null
6303 statement if the initialization call is a null procedure, as
6304 can happen with a controlled type with no explicit Initialize
6305 procedure, or an array of such.
6306 * exp_ch7.adb (Process_Object_Declaration): For a type with
6307 controlled components that has a trivial Initialize procedure,
6308 insert declaration for finalization counter after object
6310 (Make_Deep_Array_Body, Build_Initialize_statements): Do not create
6311 finalization block and attendant declarations if component has
6312 a trivial Initialize procedure.
6313 (Make_Init_Call): Do not generate a call if controlled type has
6314 a trivial Initialize procedure.
6316 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6318 * g-forstr.ads (Data): Move Format component last.
6319 * g-forstr.adb ("+"): Adjust for above change.
6320 * g-rewdat.ads (Buffer): Move Buffer, Current, Pattern and Value last.
6321 * g-sechas.ads (Context): Move Key last.
6322 * g-socket.ads (Service_Entry_Type): Move Aliases last.
6323 * s-fileio.adb (Temp_File_Record): Move Name last.
6324 * s-regexp.adb (Regexp_Value): Move Case_Sensitive last.
6325 * xr_tabls.ads (Project_File): Move Src_Dir and Obj_Dir last.
6327 2017-05-02 Jerome Lambourg <lambourg@adacore.com>
6329 * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: Remove the -nognarl
6330 switch introduced recently. finally not needed.
6332 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6334 * sem_ch6.adb (Analyze_Null_Procedure): Set the
6335 Corresponding_Body link for a null procedure declaration.
6337 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6339 * atree.h (Flag290): Add missing terminating parenthesis.
6340 * einfo.adb (Is_Class_Wide_Clone): Use Flag290.
6341 (Set_Is_Class_Wide_Clone): Likewise.
6342 * einfo.ads (Is_Class_Wide_Clone): Likewise.
6344 2017-05-02 Gary Dismukes <dismukes@adacore.com>
6346 * checks.ads (Null_Exclusion_Static_Checks): Add Boolean
6347 parameter Array_Comp to indicate the case of an array object
6348 with null-excluding components.
6349 * checks.adb (Null_Exclusion_Static_Checks):
6350 Call Compile_Time_Constraint_Error instead of
6351 Apply_Compile_Time_Constraint_Error in the component case. Also
6352 call that when Array_Comp is True, with an appropriate warning for
6353 the array component case. Only create an explicit initialization
6354 by null in the case of an object of a null-excluding access type
6355 (and no longer do that in the component case).
6356 * sem_ch3.adb (Check_Component): Add a Boolean parameter
6357 Array_Comp defaulted to False. Pass Empty for the Comp
6358 actual when calling Null_Exclusion_Static_Checks in the case
6359 where Comp_Decl matches Object_Decl, because we don't have a
6360 component in that case. In the case of an object or component
6361 of an array type, pass True for Array_Comp on the recursive call
6364 2017-05-02 Bob Duff <duff@adacore.com>
6366 * s-taprop-linux.adb (Prio_To_Linux_Prio): New function to correctly
6367 compute the linux priority from the Ada priority. Call this everywhere
6368 required. In particular, the previous version was not doing this
6369 computation when setting the ceiling priority in various places. It
6370 was just converting to C.int, which results in a ceiling that is off
6373 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6375 * sem_ch3.adb: Comment predicate inheritance.
6377 2017-05-02 Tristan Gingold <gingold@adacore.com>
6379 * s-trasym.ads: Add comment.
6381 2017-05-02 Bob Duff <duff@adacore.com>
6383 * sem_elab.adb, sem_elab.ads: Minor comment fixes.
6384 * sem_ch4.adb: Minor reformatting.
6385 * s-taprop-linux.adb, s-taspri-posix.ads: Code refactoring.
6386 * s-taspri-posix-noaltstack.ads: Minor refactoring.
6387 * sinput.ads: Minor typo fix.
6389 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6391 * exp_ch9.adb (Discriminated_Size): Moved to sem_util.
6392 * sem_util.ads, sem_util.adb (Discriminated_Size): Predicate moved
6393 here from exp_ch9, to recognize objects whose creation requires
6394 dynamic allocation, so that the proper warning can be emitted
6395 when restriction No_Implicit_Heap_Allocation is in effect.
6396 * sem_ch3.adb (Analyze_Object_Declaration): Use Discriminated_Size
6397 to emit proper warning when an object that requires dynamic
6398 allocation is declared.
6400 2017-05-02 Tristan Gingold <gingold@adacore.com>
6402 * s-trasym.ads, s-trasym.adb (Enable_Cache): New.
6404 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6406 * sem_ch4.adb (Find_Equality_Types, Try_One_Interp): The same relaxed
6407 visibility rules for equality operators that apply within an
6408 instantiation apply within an inlined body.
6409 * sem_type.adb (Add_One_Interp): ditto.
6411 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6413 * sem_prag.adb (Analyze_Pragma): Forbid pragma Contract_Cases on null
6416 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6419 (Name_Assume, Name_Attribute_Definition, Name_Loop_Optimize,
6420 Name_No_Tagged_Streams): Move to regular pragmas. Add
6421 placeholders for Default_Scalar_Storage_Order, Dispatching_Domain,
6422 and Secondary_Stack_Size.
6423 (Pragma_Id): Move Pragma_Assume,
6424 Pragma_Attribute_Definition, Pragma_Loop_Optimize and
6425 Pragma_No_Tagged_Streams to second part.
6427 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6429 * exp_attr.adb: Minor reformatting.
6431 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6433 * sem_ch4.adb (Analyze_Selected_Component): Improve error
6434 detection for illegal references to private components or
6435 operations of a protected type in the body of the type.
6437 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6439 * opt.ads: Add missing GNAT markers in comments.
6440 * opt.adb (Set_Opt_Config_Switches): Do not override earlier
6441 settings of Optimize_Alignment at the end.
6443 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6445 * checks.adb (Apply_Constraint_Check): Do not apply
6446 a discriminant check when the associated type is a constrained
6447 subtype created for an unconstrained nominal type.
6448 * exp_attr.adb: Minor reformatting.
6450 2017-05-02 Bob Duff <duff@adacore.com>
6452 * sem_ch3.adb (OK_For_Limited_Init_In_05): Handle correctly
6453 the N_Raise_Expression case.
6454 * sem_ch6.adb (Check_Limited_Return): Minor: clarify comment,
6457 2017-05-02 Yannick Moy <moy@adacore.com>
6459 * exp_ch4.adb (Expand_N_Op_Ne): Do not bump parenthese level and
6460 optimize length comparison in GNATprove mode.
6461 * exp_spark.adb (Expand_SPARK_Op_Ne): New function to rewrite
6462 operator /= into negation of operator = when needed.
6463 (Expand_SPARK): Call new
6464 function to expand operator /=.
6466 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6468 * exp_fixd.adb (Expand_Divide_Fixed_By_Fixed_Giving_Fixed):
6469 Simplify the expression for a fixed-fixed division to remove
6470 divisions by constants whenever possible, as an optimization
6471 for restricted targets.
6473 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
6475 * checks.adb, sem_ch3.adb, sem_ch6.adb: Minor reformatting.
6477 2017-05-02 Bob Duff <duff@adacore.com>
6479 * exp_attr.adb (Callable, Identity, Terminated): Use Find_Prim_Op
6480 to find primitive ops, instead of using an Identifier that will
6481 later be looked up. This is necessary because these ops are not
6482 necessarily visible at all places where we need to call them.
6483 * exp_util.ads: Minor comment fix.
6485 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6487 * sem_ch6.adb (Fully_Conformant_Expressions): Two entity
6488 references are fully conformant if they are both expansions
6489 of the discriminant of a protected type, within one of the
6490 protected operations. One occurrence may be expanded into a
6491 constant declaration while the other is an input parameter to
6492 the corresponding generated subprogram.
6494 2017-05-02 Justin Squirek <squirek@adacore.com>
6496 * sem_ch3.adb (Check_For_Null_Excluding_Components): Created for
6497 recursivly searching composite-types for null-excluding access
6498 types and verifying them.
6499 (Analyze_Object_Declaration): Add a
6500 call to Check_Null_Excluding_Components for static verification
6501 of non-initialized objects.
6502 * checks.adb, checks.ads (Null_Exclusion_Static_Checks): Added
6503 a parameter for a composite-type's component and an extra case
6504 for printing component information.
6506 2017-05-02 Yannick Moy <moy@adacore.com>
6508 * sem_ch10.adb (Analyze_Subunit): Take
6509 configuration pragma into account when restoring appropriate
6510 pragma for analysis of subunit.
6512 2017-05-02 Justin Squirek <squirek@adacore.com>
6514 * s-tasren.adb, s-tasini.adb, s-taprop-linux.adb,
6515 s-mudido-affinity.adb,, a-exetim-posix.adb, a-direio.adb,
6516 g-socket.adb, s-taenca.adb, s-fileio.adb: Remove unused use-type
6517 clauses from the runtime.
6519 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
6521 * freeze.adb (Check_Component_Storage_Order): Do not treat bit-packed
6522 array components specially.
6524 2017-05-02 Ed Schonberg <schonberg@adacore.com>
6526 * sem_ch8.adb (Premature_Usage): If the premature usage of
6527 an entity is as the expression in its own object decaration,
6528 rewrite the reference as Any_Id to prevent cascaded errors or
6529 compiler loops when such an entity is used in an address clause.
6531 2017-05-01 Eric Botcazou <ebotcazou@adacore.com>
6533 * gcc-interface/decl.c (components_to_record): Add missing guard.
6535 2017-05-01 Eric Botcazou <ebotcazou@adacore.com>
6537 * gcc-interface/decl.c (components_to_record): Add more comments.
6538 Put back pending fields onto the regular list if the misalignment
6539 happens to cancel itself.
6541 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6543 * sem_ch4.adb (Complete_Object_Operation): When rewriting the
6544 controlling actual in a prefixed call, preserve the original node
6545 information if the prefix itself has been rewritten, for ASIS use.
6547 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6549 * exp_ch6.adb (Insert_Post_Call_Actions):
6550 Code clean up. Insert the post-call actions after an enclosing
6551 procedure call when N denotes a function call and appears as an
6552 actual parameter in the procedure call.
6554 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6556 * freeze.adb (Check_Component_Storage_Order): If there is a clause
6557 for the component, also reject the attribute if the component
6558 doesn't end on a byte boundary and its scalar storage order is
6559 different from that of the enclosing record type.
6561 2017-04-28 Javier Miranda <miranda@adacore.com>
6563 * atree.ads (Info_Messages): Removed.
6564 (Warning_Info_Messages): New counter.
6565 (Report_Info_Messages): New counter.
6566 * err_vars.ads Update documentation.
6567 * errout.adb (Delete_Warning_And_Continuations): Update
6568 Info_Message occurrences.
6569 (Error_Msg_Internal): Update Info_Message occurrences.
6570 (Delete_Warning): Update Info_Message occurrences.
6571 (Write_Error_Summary): Update Info_Message occurrences.
6572 (Output_Messages): Update Info_Message occurrences.
6573 (To_Be_Removed): Update Info_Message occurrences.
6574 (Reset_Warnings): Update Info_Message occurrences.
6575 * errutil.adb (Error_Msg): Update Info_Message occurrences.
6576 (Finalize): Update Info_Message occurrences.
6577 (Initialize): Update Info_Message occurrences.
6578 * erroutc.adb (Delete_Msg): Update Info_Message occurrences.
6579 (Compilation_Errors): Update Info_Message_Occurences.
6581 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6583 * exp_ch3.adb (Build_Init_Statements): Likewise on Nam.
6584 * freeze.adb (Check_Component_Storage_Order): And on Comp_Byte_Aligned.
6585 * sem_aggr.adb (Resolve_Record_Aggregate): Initialize Box_Node.
6586 * sem_attr.adb (Loop_Entry): Initialize Encl_Loop.
6587 * sem_ch12.adb (Build_Operator_Wrapper): Add pragma Warnings on Expr.
6588 * sem_ch13.adb (Validate_Address_Clauses): Initialize Y_Alignment and
6590 * sem_eval.adb (Why_Not_Static): Initialize Typ.
6591 * sem_prag.adb (Analyze_Pragma): Add pragma Warnings on Str.
6593 2017-04-28 Bob Duff <duff@adacore.com>
6595 * sem_util.ads, sem_util.adb (Might_Raise): New function
6596 that replaces Is_Exception_Safe, but has the opposite
6597 sense. Is_Exception_Safe was missing various cases -- calls inside
6598 a pragma Debug, calls inside an 'if' or assignment statement,
6599 etc. Might_Raise now walks the entire subtree looking for things
6601 * exp_ch9.adb (Is_Exception_Safe): Remove.
6602 (Build_Protected_Subprogram_Body): Replace call to
6603 Is_Exception_Safe with "not Might_Raise". Misc cleanup (use
6604 constants where possible).
6605 * exp_ch7.adb: Rename Is_Protected_Body -->
6606 Is_Protected_Subp_Body. A protected_body is something different
6609 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6611 * inline.adb (Expand_Inlined_Call): Initialize Targ1 variable.
6612 * par-ch3.adb (P_Component_Items): Initialize Decl_Node variable.
6613 (P_Discrete_Choice_List): Initialize Expr_Node variable.
6614 * par-ch9.adb (P_Task): Initialize Aspect_Sloc variable.
6615 (P_Protected): Likewise.
6616 * sem_case.adb (Check_Duplicates):
6617 Add pragma Warnings on variable.
6618 * sem_ch12.adb (Preanalyze_Actuals): Initialize Vis variable.
6619 * sem_ch4.adb (List_Operand_Interps): Add pragma Warnings on variable.
6620 * sem_ch5.adb (Analyze_Assignment): Initialize Save_Full_Analysis.
6621 (Analyze_Exit_Statement): Initialize Scope_Id variable.
6622 (Analyze_Iterator_Specification): Initialize Bas variable.
6623 * sem_ch9.adb (Allows_Lock_Free_Implementation): Initialize
6624 Error_Count (Satisfies_Lock_Free_Requirements): Likewise.
6625 (Analyze_Accept_Statement): Initialize Task_Nam.
6627 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6629 * checks.adb (Install_Primitive_Elaboration_Check):
6630 Do not generate an elaboration check if all checks have been
6633 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6635 * sem_ch13.adb (Analyze_Aspect_Specifications, case
6636 Interrupt_Handler and Attach_Handler): Generate reference
6637 to protected operation to prevent spurious warnings about
6638 unreferenced entities. Previous scheme failed with style checks
6641 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6643 * sem_prag.adb (Relocate_Pragmas_To_Body): A pragma Warnings
6644 that follows an expression function must not be relocated to
6645 the generated body, because it applies to the code that follows.
6647 2017-04-28 Gary Dismukes <dismukes@adacore.com>
6649 * sem_util.adb (Is_Dependent_Component_Of_Mutable_Object): Test
6650 Relaxed_RM_Semantics to avoid having CodePeer issue errors on
6651 code that might violate the more stringent checking for 'Access
6652 introduced in Ada 2005.
6654 2017-04-28 Arnaud Charlet <charlet@adacore.com>
6656 * a-cforse.adb: minor style fix in comment.
6658 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6660 * exp_ch9.adb (Build_Lock_Free_Unprotected_Subprogram_Body): Also
6661 initialize Block_Decls variable.
6662 (Expand_Entry_Barrier): Add pragma Warnings on Func_Body variable.
6663 (Build_Dispatching_Requeue): Add pragma Warnings on Op variable.
6664 * exp_disp.adb (Expand_Interface_Actuals): Initialize
6665 Formal_DDT and Actual_DDT variables.
6666 (Expand_Interface_Thunk): Initialize Iface_Formal.
6667 (Make_DT): Initialize Size_Comp.
6668 (Make_Select_Specific_Data_Table): Initialize Decls.
6669 * exp_dist.adb (Add_RACW_Primitive_Declarations_And_Bodies):
6670 Also initialize more RPC_Receiver_* variables.
6671 (Build_To_Any_Function): Initialize Cstr_Formal.
6672 * exp_prag.adb (Expand_Pragma_Contract_Cases): Initialize Msg_Str.
6674 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6676 * sem_ch6.adb (Freeze_Type_Refs): For an interface conversion
6677 node between access types, freeze the designated type as well,
6678 so that dispatch table pointers are created in the proper scope,
6679 and not in the constructed body of the expression function.
6681 2017-04-28 Bob Duff <duff@adacore.com>
6683 * alloc.ads (Nodes_Initial): Go back to previous value. The large
6684 value makes large compilations faster, but small compilations slower.
6686 2017-04-28 Arnaud Charlet <charlet@adacore.com>
6688 * sem_util.adb: minor typos in Is_Child_Or_Sibling.
6690 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6692 * erroutc.adb (Compilation_Errors): Do not consider info messages
6693 as suitable warnings when warnings must be treated as errors.
6694 * sem_ch7.adb (Analyze_Package_Specification): Do not consider
6695 internally-generated packages when outputting completion
6697 * errout.adb (Output_Messages): Do not consider info messages as
6698 suitable warnings when warnings must be treated as errors.
6699 * errutil.adb (Finalize): Do not consider info messages as
6700 suitable warnings when warnings must be treated as errors.
6702 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
6704 * warnsw.ads: Minor fix for incorrect wording in comment.
6706 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6708 * sem_res.adb (In_Instance_Code): New predicate in
6709 Valid_Conversion, to determine whether a type conversion appears
6710 as (or within) an actual for a formal object. Type conversions
6711 in instances are not rechecked in Valid_Conversion because
6712 visibility changes between generic location andi instance may
6713 lead to spurious errors, but conversions within an actual must be
6714 fully checked, and they are not fully resolved when pre-analyzing
6717 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6719 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Use
6720 New_Copy_Tree instead of Relocate_Node as any subsequent copies
6721 of the relocated node will have mangled Parent pointers.
6722 * sem_util.adb (Build_NCT_Hash_Tables): Reset both hash
6723 tables used in conjunction with entity and itype replication.
6724 (Visit_Entity): Rewrite the restriction on which entities
6725 require duplication. The restriction now includes all types.
6727 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6729 * a-cofuse.ads, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfinve.adb,
6730 a-cfinve.ads, a-cforma.adb, a-cforma.ads, a-cofuma.adb, a-cofuma.ads,
6731 a-cfhama.adb, a-cfhama.ads, a-cforse.adb: Minor reformatting and code
6734 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
6736 * exp_util.adb, g-dyntab.adb, par-ch4.adb, sem_util.adb, sem_attr.adb,
6737 gnat1drv.adb, exp_disp.adb, namet.adb, alloc.ads: Minor reformatting.
6739 2017-04-28 Gary Dismukes <dismukes@adacore.com>
6741 * exp_util.adb: Minor reformatting.
6743 2017-04-28 Ed Schonberg <schonberg@adacore.com>
6745 * sem_ch4.adb: Fix copy/pasto.
6747 2017-04-27 Tristan Gingold <gingold@adacore.com>
6749 * gcc-interface/Make-lang.in: Define EH_MECHANISM while building
6750 raise-gcc.c. Fix include search path for raise-gcc.c
6752 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
6754 * fe.h (Warn_On_Questionable_Layout): Declare.
6755 * warnsw.ads (Warn_On_Record_Holes): Move down.
6756 (Warn_On_Questionable_Layout): New boolean variable.
6757 (Warning_Record): Add Warn_On_Questionable_Layout field.
6758 * warnsw.adb (All_Warnings): Set Warn_On_Questionable_Layout.
6759 (Restore_Warnings): Likewise.
6760 (Save_Warnings): Likewise.
6761 (Set_Dot_Warning_Switch): Handle 'q' and 'Q' letters.
6762 * gcc-interface/decl.c (gnat_to_gnu_entity): Adjust call to
6763 components_to_record.
6764 (gnu_field_to_gnat): New function.
6765 (warn_on_field_placement): Likewise.
6766 (components_to_record): Add GNAT_RECORD_TYPE and remove REORDER
6767 parameters. Rename local variables and adjust recursive call.
6768 Rework final scan of the field list and implement warnings on the
6769 problematic placement of specific sorts of fields.
6771 2017-04-27 Bob Duff <duff@adacore.com>
6773 * errout.adb, exp_aggr.adb, exp_attr.adb, exp_code.adb, fname.adb,
6774 * fname.ads, freeze.adb, inline.adb, lib.adb, lib.ads, lib-list.adb,
6775 * lib-load.adb, lib-writ.adb, par.adb, restrict.adb, rtsfind.adb,
6776 * sem.adb, sem_cat.adb, sem_ch10.adb, sem_ch12.adb, sem_ch3.adb,
6777 * sem_ch4.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
6778 * sem_intr.adb, sem_res.adb, sem_util.adb, sem_warn.adb, sprint.adb:
6779 For efficiency, cache results of Is_Internal_File_Name and
6780 Is_Predefined_File_Name in the Units table. This avoids a lot
6781 of repeated text processing.
6783 2017-04-27 Emmanuel Briot <briot@adacore.com>
6785 * g-comlin.adb (Sort_Sections): remove useless test.
6787 2017-04-27 Claire Dross <dross@adacore.com>
6789 * a-cfhase.adb, a-cfhase.ads (=): Generic parameter removed to
6790 allow the use of regular equality over elements in contracts.
6791 (Formal_Model): Ghost package containing model functions that are
6792 used in subprogram contracts.
6793 (Current_To_Last): Removed, model functions should be used instead.
6794 (First_To_Previous): Removed, model functions should be used instead.
6795 (Strict_Equal): Removed, model functions should be used instead.
6796 (No_Overlap): Removed, model functions should be used instead.
6797 (Equivalent_Keys): Functions over cursors are removed. They were
6798 awkward with explicit container parameters.
6799 * a-cforse.adb, a-cforse.ads (=): Generic parameter removed to
6800 allow the use of regular equality over elements in contracts.
6801 (Formal_Model): Ghost package containing model functions that
6802 are used in subprogram contracts.
6803 (Current_To_Last): Removed, model functions should be used instead.
6804 (First_To_Previous): Removed, model functions should be used instead.
6805 (Strict_Equal): Removed, model functions should be used instead.
6806 (No_Overlap): Removed, model functions should be used instead.
6808 2017-04-27 Yannick Moy <moy@adacore.com>
6810 * gnat1drv.adb: Code cleanup.
6812 2017-04-27 Ed Schonberg <schonberg@adacore.com>
6814 * exp_util.adb (Replace_Entity): The prefix of a 'Result
6815 attribute reference in a post- condition is the subprogram to
6816 which the condition applies. If the condition is inherited
6817 by a type extension, the prefix becomes a reference to the
6818 inherited operation, but there is no need to create a wrapper
6819 for this operation, because 'Result is expanded independently
6820 when elaborating the postconditions.
6822 2017-04-27 Bob Duff <duff@adacore.com>
6824 * sinput.adb: Minor code cleanup.
6825 * namet.adb (Append): Create faster versions of
6826 Append(String) and Append(Name_Id) by using slice assignment
6828 * sem_util.adb (In_Instance): Speed this up by removing
6829 unnecessary tests; Is_Generic_Instance is defined for all
6831 * sem_util.ads, sem_util.adb (In_Parameter_Specification):
6832 Remove unused function.
6833 * alloc.ads (Nodes_Initial): Use a much larger value, because
6834 the compiler was spending a lot of time copying the nodes table
6835 when it grows. This number was chosen in 1996, so is rather out
6836 of date with current memory sizes. Anyway, it's virtual memory.
6837 Get rid of Orig_Nodes_...; use Node_... instead.
6838 * atree.adb (Lock): Do not release the Nodes tables; it's a
6840 Orig_Nodes_ ==> Nodes_
6841 * nlists.adb: Orig_Nodes_ ==> Nodes_
6842 * g-table.adb: Remove unused "with" clause.
6843 * g-table.ads, table.ads: Remove Big_Table_Type, which should
6844 not be used by clients.
6845 * g-dyntab.adb (Last_Allocated): New function
6846 to encapsulate T.P.Last_Allocated, which I'm thinking of changing.
6848 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6850 * sem_eval.adb (Subtypes_Statically_Compatible): Remove duplicated
6852 (Subtypes_Statically_Match): Remove duplicate check.
6853 * sem_prag.adb (Check_Arg_Is_External_Name): Remove duplicate check.
6855 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6857 * exp_aggr.adb (Replace_Type): Remove the special processing
6858 for selected components.
6859 * exp_attr.adb (Expand_N_Attribute_Reference): Merge the
6860 processing for attributes Fixed_Value and Integer_Value.
6861 * exp_util.adb (Side_Effect_Free): Merge the processing for
6862 qualified expressions, type conversions, and unchecked type
6864 * g-comlin.adb (Is_In_Config): Merge the processing for No_Space
6866 * par-ch3.adb (P_Declarative_Items): Merge the processing for
6867 tokens function, not, overriding, and procedure.
6868 * sem_ch6.adb (Fully_Conformant_Expressions): Merge the processing
6869 for qualified expressions, type conversions, and unchecked
6871 * sem_util.adb (Compile_Time_Constraint_Error): Merge the
6872 processing for Ada 83 and instances.
6873 (Object_Access_Level): Merge the processing for indexed components
6874 and selected components.
6875 * uname.adb (Add_Node_Name): Merge the processing for stubs.
6877 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6879 * checks.adb (Install_Primitive_Elaboration_Check):
6880 Do not generate the check when restriction No_Elaboration_Code
6883 2017-04-27 Ed Schonberg <schonberg@adacore.com>
6885 * exp_disp.adb (Build_Class_Wide_Check): New subsidiary
6886 of Expand_Dispatching_Call. If the denoted subprogram has a
6887 class-wide precondition, this is the only precondition that
6888 applies to the call, rather that the class-wide preconditions
6889 that may apply to the body that is executed. (This is specified
6892 2017-04-27 Yannick Moy <moy@adacore.com>
6894 * gnat1drv.adb (Adjust_Global_Switches): Issue
6895 a warning in GNATprove mode if the runtime library does not
6896 support IEEE-754 floats.
6898 2017-04-27 Ed Schonberg <schonberg@adacore.com>
6900 * sem_prag.adb (Inherit_Class_Wide_Pre): If the parent operation
6901 is itself inherited it does not carry any contract information,
6902 so examine its parent operation which is its Alias.
6904 2017-04-27 Ed Schonberg <schonberg@adacore.com>
6906 * sem_attr.adb (Analyze_Attribute, case 'Image): In Ada2012 the
6907 prefix can be an object reference in which case Obj'Image (X)
6908 can only be interpreted as an indexing of the parameterless
6909 version of the attribute.
6910 * par-ch4.adb (P_Name): An attribute reference can be the prefix of
6911 an indexing or a slice operation if the attribute does not require
6912 parameters. In Ada2012 'Image also belongs in this category,
6913 and A'Image (lo .. hi) is legal and must be parsed as a slice.
6915 2017-04-27 Yannick Moy <moy@adacore.com>
6917 * exp_ch4.adb: Minor reformatting.
6918 * gnat1drv.adb (Adjust_Global_Switches): When in GNATprove mode,
6919 disable the CodePeer and C generation modes. Similar to the
6920 opposite actions done in CodePeer mode.
6922 2017-04-27 Yannick Moy <moy@adacore.com>
6924 * sem_res.adb: Remove duplicate code.
6925 * sem_attr.adb: Delete duplicate code.
6927 2017-04-27 Bob Duff <duff@adacore.com>
6929 * g-dyntab.adb: Reduce the amount of copying in
6930 Release. No need to copy items past Last.
6932 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6934 * checks.adb Add with and use clauses for Sem_Disp.
6935 (Install_Primitive_Elaboration_Check): New routine.
6936 * checks.ads (Install_Primitive_Elaboration_Check): New routine.
6937 * exp_attr.adb (Expand_N_Attribute_Reference): Clean up the
6938 processing of 'Elaborated.
6939 * exp_ch6.adb (Expand_N_Subprogram_Body): Install a primitive
6942 2017-04-27 Bob Duff <duff@adacore.com>
6944 * g-dyntab.ads, g-dyntab.adb, g-table.ads: Remove incorrect assertion.
6945 If the table grows and then shrinks back to empty, we won't necessarily
6946 point back to the empty array. Code cleanups.
6947 * sinput.ads: Add 'Base to Size clause to match the declared
6950 2017-04-27 Claire Dross <dross@adacore.com>
6952 * a-cforma.adb, a-cforma.ads (=): Generic parameter removed to
6953 allow the use of regular equality over elements in contracts.
6954 (Formal_Model): Ghost package containing model functions that
6955 are used in subprogram contracts.
6956 (Current_To_Last): Removed, model functions should be used instead.
6957 (First_To_Previous): Removed, model functions should be used instead.
6958 (Strict_Equal): Removed, model functions should be used instead.
6959 (No_Overlap): Removed, model functions should be used instead.
6960 * a-cofuma.adb, a-cofuma.ads (Enable_Handling_Of_Equivalence)
6961 Boolean generic parameter to disable contracts for equivalence
6963 (Witness): Create a witness of a key that is used for handling of
6964 equivalence between keys.
6965 (Has_Witness): Check whether a witness is contained in a map.
6966 (W_Get): Get the element associated to a witness.
6967 (Lift_Equivalent_Keys): Removed, equivalence between keys is handled
6969 * a-cofuse.adb, a-cofuse.ads (Enable_Handling_Of_Equivalence)
6970 Boolean generic parameter to disable contracts for equivalence
6972 * a-cfhama.adb, a-cfhama.ads (Formal_Model.P) Disable handling
6973 of equivalence on functional maps.
6974 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.P) Disable handling
6975 of equivalence on functional maps.
6977 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6979 * exp_ch9.adb (Expand_Entry_Barrier): Code
6980 cleanup. Do not perform the optimization which removes the
6981 declarations of the discriminant and component renamings when
6982 validity checks on operands and attributes are in effect.
6984 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6986 * exp_spark.adb, exp_util.adb, sem_ch7.adb, g-dyntab.adb, g-dyntab.ads,
6987 freeze.adb, a-cfinve.ads, a-cofuma.adb, a-cofuma.ads, a-cfhama.adb,
6988 a-cfhama.ads, a-cofove.ads: Minor reformatting.
6990 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
6992 * g-debpoo.adb (Dump_Gnatmem): Protect against a possible null
6993 pointer dereference.
6994 * g-spipat.adb (Dump): Code clean up. Protect against a possible
6995 null pointer dereference.
6997 2017-04-27 Bob Duff <duff@adacore.com>
6999 * g-dyntab.ads, g-dyntab.adb: Default for Table_Low_Bound.
7000 Rename Empty --> Empty_Table_Ptr, and don't duplicate code for it.
7001 Free renames Init, since they do the same thing.
7002 * g-table.ads: Default for Table_Low_Bound.
7003 * table.ads: Default for Table_Low_Bound, Table_Initial, and
7006 2017-04-27 Bob Duff <duff@adacore.com>
7008 * g-dyntab.ads, g-dyntab.adb: Add assertions to subprograms that
7010 * atree.adb, elists.adb, fname-uf.adb, ghost.adb, inline.adb,
7011 * lib.adb, namet.adb, nlists.adb, sem.adb, sinput.adb, stringt.adb:
7012 Reorder code so that above assertions do not fail.
7013 * table.ads: Remove obsolete comment on Locked.
7015 2017-04-27 Claire Dross <dross@adacore.com>
7017 * a-cfdlli.ads: Code cleanup.
7019 2017-04-27 Yannick Moy <moy@adacore.com>
7021 * exp_spark.adb (Expand_SPARK_Freeze_Type): Build a DIC procedure
7022 when needed for proof. (Expand_SPARK): Call the new procedure.
7023 * exp_util.ads Fix typo.
7025 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7027 * a-cofuma.ads, a-cfhama.ads: Minor reformatting, grammar, and typo
7030 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7032 * sem_elab.adb Add new type Visited_Element
7033 and update the contents of table Elab_Visited. Various code clean up.
7034 (Check_Elab_Call): Determine whether a prior call to
7035 the same subprogram was already examined within the same context.
7036 (Check_Internal_Call_Continue): Register the subprogram being
7037 called as examined within a particular context. Do not suppress
7038 elaboration warnings.
7040 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7042 * xoscons.adb, osint.ads: Minor reformatting.
7044 2017-04-27 Bob Duff <duff@adacore.com>
7046 * g-dyntab.ads, g-dyntab.adb: Misc cleanup. Rename
7047 Table_Count_Type --> Table_Last_Type, because the name
7048 was confusing (a "count" usually starts at zero). Add
7049 functionality supported or needed by other tables packages
7050 (Move, Release_Threshold).
7051 * g-table.ads, g-table.adb: This is now just a thin wrapper
7052 around g-dyntab.ads/g-dyntab.adb. Add functionality supported
7053 or needed by other tables packages (Save, Restore).
7054 * table.ads, table.adb: This is now just a thin wrapper around
7055 * g-table.ads/g-table.adb.
7056 * namet.h, scos.h, uintp.h: These files are reaching into the
7057 private data of some instances of g-table, whose names changed,
7058 so the above change requires some adjustment here. It now uses
7061 2017-04-27 Bob Duff <duff@adacore.com>
7063 * namet.adb, namet.ads: Minor: remove unused procedures.
7065 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
7067 * checks.adb (Apply_Scalar_Range_Check): Initialize Ok variable too.
7068 (Minimize_Eliminate_Overflows): Initialize Llo and Lhi.
7069 Add pragma Warnings on Rtype variable in nested block. *
7070 * exp_ch3.adb (Build_Init_Statements): Initialize VAR_LOC.
7071 * exp_ch4.adb (Expand_Concatenate): Initialize 3 variables.
7072 (Size_In_Storage_Elements): Add pragma Warnings on Res variable.
7073 * exp_ch7.adb (Build_Adjust_Statements): Initialize Bod_Stmts.
7074 (Process_Component_List_For_Finalize): Initialize Counter_Id.
7075 (Build_Finalize_Statements): Initialize Bod_Stmts.
7076 * exp_disp.adb (Expand_Dispatching_Call): Initialize SCIL_Node.
7078 2017-04-27 Claire Dross <dross@adacore.com>
7080 * a-cfhama.adb, a-cfhamai.ads (=): Generic parameter removed to
7081 allow the use of regular equality over elements in contracts.
7082 (Formal_Model): Ghost package containing model functions that are
7083 used in subprogram contracts.
7084 (Current_To_Last): Removed, model
7085 functions should be used instead.
7086 (First_To_Previous): Removed, model functions should be used instead.
7087 (Strict_Equal): Removed, model functions should be used instead.
7088 (No_Overlap): Removed, model functions should be used instead.
7089 (Equivalent_Keys): Functions over cursors are removed. They were
7090 awkward with explicit container parameters.
7091 * a-cofuma.adb, a-cofuma.ads (Lift_Equivalent_Keys): New lemma
7092 (proof only) procedure to help GNATprove when equivalence over
7093 keys is not equality.
7095 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7097 * exp_util.adb, a-cfdlli.adb, a-cfdlli.ads, exp_ch9.adb, g-dyntab.adb,
7098 sem_dim.adb, a-cfinve.adb, a-cfinve.ads, a-cofove.adb, a-cofove.ads:
7099 Minor reformatting and code cleanups.
7101 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7103 * freeze.adb (Build_Inherited_Condition_Pragmas): New procedure,
7104 subsidiary of Check_Inherited_Conditions, to build pragmas for an
7105 operation whose ancestor has classwide pre/postconditions. This
7106 is used both to check the legality of the inheritance in Ada
7107 and in SPARK, and to determine whether a wrapper is needed for
7108 an inherited operation.
7109 * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity):
7110 Improve placement of error message for inherited classwide
7111 conditions that become illegal on type derivation.
7113 2017-04-27 Yannick Moy <moy@adacore.com>
7115 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Set
7116 SPARK_Mode from context on generic package.
7117 * sem_ch7.adb (Analyze_Package_Declaration): Simplify code to remove
7120 2017-04-27 Claire Dross <dross@adacore.com>
7122 * a-cofuve.ads (Range_Shifted): Rewrite precondition to avoid
7123 overflows in computations.
7124 * a-cofove.ads (Capacity_Range): Rewrite last bound to avoid
7125 overflows in computations.
7126 (Insert): Rewrite precondition to avoid overflows in computations.
7127 * a-cfinve.ads (Capacity_Range): Rewrite last bound to avoid
7128 overflows in computations.
7129 (Insert): Rewrite precondition to avoid overflows in computations.
7131 2017-04-27 Steve Baird <baird@adacore.com>
7133 * exp_ch9.adb (Expand_N_Asynchronous_Select): Initialize the Cancel
7134 flag when it is declared in order to avoid confusing CodePeer about
7135 the possibility of an uninitialized variable read.
7137 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7139 * sem_dim.adb (Analyze_Dimension_Object_Declaration): There is
7140 no dimensionality error if the subtype of the expression is
7141 identical to the nominal subtype in the declaration, even though
7142 the expression itself may have been constant-folded and lack a
7144 * sem_dim.ads: Add comments on setting of dimension vectors and
7145 its interaction with node rewritings and side-effect removal.
7147 2017-04-27 Bob Duff <duff@adacore.com>
7149 * debug.adb: Minor comment correction.
7150 * sem_dim.ads: Minor reformatting and typo fixes.
7152 2017-04-27 Bob Duff <duff@adacore.com>
7154 * g-table.adb, g-table.adsa, scos.h: From the C side, access First and
7155 Last of the tables via function calls, rather than relying on layout
7158 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7160 * exp_util.adb: No wrapper in GNATprove mode.
7162 2017-04-27 Yannick Moy <moy@adacore.com>
7164 * sem_res.adb (Resolve_Comparison_Op): Always
7165 evaluate comparisons between values of universal types.
7167 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7169 * sem_elab.adb (Check_Internal_Call_Continue): Do not generate
7170 an elaboration counter nor a check when in GNATprove mode.
7171 * sem_util.adb (Build_Elaboration_Entity): Do not create an
7172 elaboration counter when in GNATprove mode.
7174 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7176 * freeze.adb: copy-paste typo.
7178 2017-04-27 Yannick Moy <moy@adacore.com>
7180 * sem_prag.adb (Analyze_Pre_Post_In_Decl_Part):
7181 Use correct test to detect call in GNATprove mode instead of
7184 2017-04-27 Claire Dross <dross@adacore.com>
7186 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.M_Elements_In_Union):
7187 New property function expressing that the element of a
7188 sequence are contained in the union of two sequences.
7189 (Formal_Model.M_Elements_Included): New property function
7190 expressing that the element of a sequence are another sequence.
7191 (Generic_Sorting): Use new property functions to state that
7192 elements are preserved by Sort and Merge.
7193 * a-cofove.adb, a-cofove.ads (=): Generic parameter removed to
7194 allow the use of regular equality over elements in contracts.
7195 (Formal_Model): Ghost package containing model functions
7196 that are used in subprogram contracts. (Capacity):
7197 On unbounded containers, return the maximal capacity.
7198 (Current_To_Last): Removed, model functions should be used instead.
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 * a-cfinve.adb, a-cfinve.ads (=): Generic parameter removed to
7214 allow the use of regular equality over elements in contracts.
7215 (Formal_Model): Ghost package containing model functions
7216 that are used in subprogram contracts. (Capacity):
7217 On unbounded containers, return the maximal capacity.
7218 (Current_To_Last): Removed, model functions should be used
7220 (First_To_Previous): Removed, model functions should be used instead.
7221 (Append): Default parameter value replaced
7222 by new wrapper to allow more precise contracts.
7223 (Insert): Subprogram restored, it seems it was useful to users even if
7225 (Delete): Subprogram restored, it seems it was useful to users even if
7227 (Prepend): Subprogram restored, it seems it was useful to users even
7228 if it is inefficient.
7229 (Delete_First): Subprogram restored, it seems it
7230 was useful to users even if it is inefficient. (Delete_Last):
7231 Default parameter value replaced by new wrapper to allow more
7233 (Generic_Sorting.Merge): Subprogram restored.
7234 (Vector): Do not reuse formal vectors, as it is no longer possible
7235 to supply them with an equality function over elements.
7237 2017-04-27 Bob Duff <duff@adacore.com>
7239 * g-dyntab.adb (Release): When allocating the new
7240 table, use the correct slice of the old table to initialize it.
7242 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
7244 * einfo.ads: Minor fixes in comments.
7246 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7248 * sem_prag.adb: disable clones in SPARK_Mode.
7250 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7252 * sem_util.ads, contracts.adb: Minor reformatting.
7254 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7256 * sem_util.adb, sem_util.ads (Build_Class_Wide_Clone_Body):
7257 Build body of subprogram that has a class-wide condition that
7258 contains calls to other primitives.
7259 (Build_Class_Wide_Clone_Call); Build a call to the common
7260 class-wide clone of a subprogram with classwide conditions. The
7261 body of the subprogram becomes a wrapper for a call to the
7262 clone. The inherited operation becomes a similar wrapper to which
7263 modified conditions apply, and the call to the clone includes
7264 the proper conversion in a call the parent operation.
7265 (Build_Class_Wide_Clone_Decl (Spec_Id : Entity_Id): For a
7266 subprogram that has a classwide condition that contains calls to
7267 other primitives, build an internal subprogram that is invoked
7268 through a type-specific wrapper for all inherited subprograms
7269 that may have a modified condition.
7270 * sem_prag.adb (Check_References): If subprogram has a classwide
7271 condition, create entity for corresponding clone, to be invoked
7272 through wrapper subprograns.
7273 (Analyze_Pre_Post_Condition_In_Decl_Part): Do not emit error
7274 message about placement if pragma isi internally generated.
7275 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): If subprogram has
7276 a classwide clone, build body of clone as copy of original body,
7277 and rewrite original body as a wrapper as a wrapper for a call to
7278 the clone, so that it incorporates the original pre/postconditions
7280 * freeze.adb (Check_Inherited_Conditions): For an inherited
7281 subprogram that inherits a classwide condition, build spec and
7282 body of corresponding wrapper so that call to inherited operation
7283 gets the modified conditions.
7284 * contracts.adb (Analyze_Contracts): If analysis of classwide
7285 condition has created a clone for a primitive operation, analyze
7286 declaration of clone.
7288 2017-04-27 Steve Baird <baird@adacore.com>
7290 * exp_util.adb (Build_Allocate_Deallocate_Proc):
7291 Add "Suppress => All_Checks" to avoid generating unnecessary
7294 2017-04-27 Yannick Moy <moy@adacore.com>
7296 * debug.adb: Reserve debug flag 'm' for no inlining in GNATprove.
7297 * sem_ch6.adb (Anayze_Subprogram_Body_Helper): Skip creation of
7298 inlining body in GNATprove mode when switch -gnatdm used.
7299 * sem_res.adb (Resolve_Call): Skip detection of lack of inlining
7300 in GNATprove mode when switch -gnatdm used.
7302 2017-04-27 Arnaud Charlet <charlet@adacore.com>
7304 * sem_ch13.adb (Analyze_Attribute_Definition_Clause
7305 [Attribute_Address]): Call Set_Address_Taken when ignoring rep
7306 clauses, so that we keep an indication of the address clause
7307 before removing it from the tree.
7309 2017-04-27 Yannick Moy <moy@adacore.com>
7311 * exp_util.ads, exp_util.adb (Evaluate_Name): Force evaluation
7312 of expression being qualified, when not an object name, or else
7313 evaluate the underlying name.
7315 2017-04-27 Jerome Lambourg <lambourg@adacore.com>
7317 * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: add -nognarl switch.
7319 2017-04-27 Justin Squirek <squirek@adacore.com>
7321 * exp_ch7.adb (Build_Finalize_Statements): Move Num_Comps to
7322 Process_Component_List_For_Finalization as a local variable.
7323 (Process_Component_For_Finalize): Add an extra parameter to avoid
7325 (Process_Component_List_For_Finalization): Correct calls to
7326 Process_Component_For_Finalize to take Num_Comps as a parameter.
7328 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7330 * sem_ch8.adb (Find_Direct_Name): Account for the case where
7331 a use-visible entity is defined within a nested scope of an
7332 instance when giving priority to entities which were visible in
7333 the original generic.
7334 * sem_util.ads, sem_util.adb (Nearest_Enclosing_Instance): New routine.
7336 2017-04-27 Tristan Gingold <gingold@adacore.com>
7338 * raise-gcc.c: Don't use unwind.h while compiling
7339 for the frontend, but mimic host behavior.
7341 2017-04-27 Javier Miranda <miranda@adacore.com>
7343 * sem_ch3.adb (Build_Discriminated_Subtype):
7344 Propagate Has_Pragma_Unreferenced_Objects to the built subtype.
7346 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7348 * sem_prag.adb (Analyze_Global_Item):
7349 Do not consider discriminants because they are not "entire
7350 objects". Remove the discriminant-related checks because they are
7352 (Analyze_Input_Output): Do not consider discriminants
7353 because they are not "entire objects".
7355 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7357 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Do not
7358 perform check if the current scope does not come from source,
7359 as is the case for a rewritten task body, because check has
7360 been performed already, and may not be doable because of changed
7363 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7365 * a-cofuse.adb, a-cfdlli.adb, a-cofuse.ads, a-cfdlli.ads, a-cofuve.adb,
7366 a-cofuve.ads, a-cofuma.adb, a-cofuma.ads, sem_eval.adb, a-cofuba.adb:
7369 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7371 * sem_ch4.adb (Analyze_Call): If the return type of a function
7372 is incomplete in an context in which the full view is available,
7373 replace the type of the call by the full view, to prevent spurious
7375 * exp_disp.adb (Check_Premature_Freezing): Disable check on an
7376 abstract subprogram so that compiler does not reject a parameter
7377 of a primitive operation of a tagged type being frozen, when
7378 the untagged type of that parameter cannot be frozen.
7380 2017-04-27 Bob Duff <duff@adacore.com>
7382 * sem_attr.adb (Compute_Type_Key): Don't walk
7383 representation items for irrelevant types, which could be in a
7384 different source file.
7386 2017-04-27 Steve Baird <baird@adacore.com>
7388 * exp_attr.adb (Expand_N_Attribute_Reference):
7389 Don't expand Image, Wide_Image, Wide_Wide_Image attributes
7392 2017-04-27 Yannick Moy <moy@adacore.com>
7394 * exp_unst.ads: Fix typos in comments.
7396 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7398 * sem_eval.adb (Choice_Matches): Handle properly a real literal
7399 whose type has a defined static predicate.
7401 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7403 * exp_ch4.adb (Insert_Dereference_Action):
7404 Do not adjust the address of a controlled object when the
7405 associated access type is subject to pragma No_Heap_Finalization.
7408 2017-04-27 Pierre-Marie de Rodat <derodat@adacore.com>
7410 * gcc-interface/utils.c (gnat_type_for_size): Set
7411 TYPE_ARTIFICIAL on created types.
7413 2017-04-27 Claire Dross <dross@adacore.com>
7415 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
7416 modifications in functional containers.
7417 * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
7418 to improve readablity. Subprograms are separated between basic
7419 operations, constructors and properties. Universally quantified
7420 formulas in contracts are factorized in independant functions
7421 with a name and a comment. Names of parameters are improved.
7423 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7425 * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
7427 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7429 * sem_res.adb (Resolve_Type_Conversion): Do not
7430 install a predicate check here since this is already done during
7431 the expansion phase. Verify whether the operand satisfies the
7432 static predicate (if any) of the target type.
7433 * sem_ch3.adb (Analyze_Object_Declaration): Do
7434 not install a predicate check if the object is initialized by
7435 means of a type conversion because the conversion is subjected
7438 2017-04-27 Tristan Gingold <gingold@adacore.com>
7440 * raise.c (__gnat_builtin_longjmp): Remove.
7441 (__gnat_bracktrace):
7442 Add a dummy definition for the compiler (__gnat_eh_personality,
7443 __gnat_rcheck_04, __gnat_rcheck_10) (__gnat_rcheck_19,
7444 __gnat_rcheck_20, __gnat_rcheck_21) (__gnat_rcheck_30,
7445 __gnat_rcheck_31, __gnat_rcheck_32): Likewise.
7446 * a-exexpr.adb: Renamed from a-exexpr-gcc.adb
7447 * a-except.ads, a-except.adb: Renamed from a-except-2005.ads
7448 and a-except-2005.adb.
7449 * raise-gcc.c: Allow build in compiler, compiled as a C++
7451 (__gnat_Unwind_ForcedUnwind): Adjust prototype.
7452 (db): Constify msg_format.
7453 (get_call_site_action_for): Don't use void arithmetic.
7454 * system.ads (Frontend_Exceptions): Set to False.
7455 (ZCX_By_Default): Set to True.
7456 (GCC_ZC_Support): Set to True.
7457 * gcc-interface/Makefile.in: No more variants for a-exexpr.adb and
7459 * gcc-interface/Make-lang.in: Add support for backend zcx exceptions
7460 in gnat1 and gnatbind.
7461 * gnat1, gnatbind: link with raise-gcc.o, a-exctra.o, s-addima.o,
7462 s-excmac.o, s-imgint.o, s-traceb.o, s-trasym.o, s-wchstw.o
7463 * s-excmac.ads, s-excmac.adb: Copy of variants.
7464 * a-except.o: Adjust preequisites.
7465 Add handling of s-excmac-arm.adb and s-excmac-gcc.adb.
7467 2017-04-27 Claire Dross <dross@adacore.com>
7469 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
7470 modifications in functional containers.
7471 * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
7472 to improve readablity. Subprograms are separated between basic
7473 operations, constructors and properties. Universally quantified
7474 formulas in contracts are factorized in independant functions
7475 with a name and a comment. Names of parameters are improved.
7477 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7479 * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
7481 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7483 * sem_res.adb (Resolve_Type_Conversion): Do not
7484 install a predicate check here since this is already done during
7485 the expansion phase. Verify whether the operand satisfies the
7486 static predicate (if any) of the target type.
7487 * sem_ch3.adb (Analyze_Object_Declaration): Do
7488 not install a predicate check if the object is initialized by
7489 means of a type conversion because the conversion is subjected
7492 2017-04-27 Tristan Gingold <gingold@adacore.com>
7494 * a-except.ads, a-except.adb, a-exexpr.adb: Removed (will be
7495 replaced by their variants).
7497 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7499 * exp_prag.adb, a-cofuse.adb, a-cofuse.ads, einfo.adb, sem_prag.adb,
7500 cstand.adb, par-prag.adb, a-cofuve.adb, a-cofuve.ads, a-cofuma.adb,
7501 a-cofuma.ads, a-cofuba.adb, a-cofuba.ads: Minor reformatting.
7503 2017-04-27 Tristan Gingold <gingold@adacore.com>
7505 * s-excmac-gcc.ads, s-excmac-gcc.adb,
7506 s-excmac-arm.ads, s-excmac-arm.adb (New_Occurrence): Rewrite it in
7509 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7511 * exp_ch7.adb (Establish_Transient_Scope): Rewrite
7512 the loop which detects potential enclosing transient scopes. The
7513 loop now terminates much earlier as transient scopes are bounded
7514 by packages and subprograms.
7516 2017-04-27 Claire Dross <dross@adacore.com>
7518 * a-cfdlli.adb, a-cfdlli.ads (=): Generic parameter removed to
7519 allow the use of regular equality over elements in contracts.
7520 (Cursor): Type is now public so that it can be used in
7522 (Formal_Model): Ghost package containing
7523 model functions that are used in subprogram contracts.
7524 (Current_To_Last): Removed, model functions should be used
7526 (First_To_Previous): Removed, model functions should
7528 (Strict_Equal): Removed, model functions
7529 should be used instead.
7530 (Append): Default parameter value
7531 replaced by new wrapper to allow more precise contracts.
7532 (Insert): Default parameter value replaced by new wrapper to
7533 allow more precise contracts.
7534 (Delete): Default parameter
7535 value replaced by new wrapper to allow more precise contracts.
7536 (Prepend): Default parameter value replaced by new wrapper to
7537 allow more precise contracts.
7538 (Delete_First): Default parameter
7539 value replaced by new wrapper to allow more precise contracts.
7540 (Delete_Last): Default parameter value replaced by new wrapper
7541 to allow more precise contracts.
7543 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7545 * exp_spark.adb (Expand_SPARK): Perform specialized expansion
7546 for object declarations.
7547 (Expand_SPARK_N_Object_Declaration): New routine.
7548 * sem_elab.adb (Check_A_Call): Include calls to the
7549 Default_Initial_Condition procedure of a type under the SPARK
7550 elaboration checks umbrella.
7552 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7554 * sem.adb (Analyze): Diagnose an illegal iterated component
7556 * sem_util.ads, sem_util.adb
7557 (Diagnose_Iterated_Component_Association): New routine.
7559 2017-04-27 Bob Duff <duff@adacore.com>
7561 * adaint.c (__gnat_get_current_dir): Return 0 in length if
7563 * a-direct.adb, g-dirope.adb, osint.adb, s-os_lib.adb: Raise
7564 exception if getcwd failed.
7566 2017-04-27 Yannick Moy <moy@adacore.com>
7568 * exp_dbug.adb, exp_dbug.ads (Get_External_Name): Prefix ghost
7569 entities with special prefix.
7571 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7573 * debug.adb Change the documentation of switch -gnatd.s.
7574 * exp_ch7.adb (Make_Transient_Block): Transient blocks do not need
7575 to manage the secondary stack when an enclosing scope already
7576 performs this functionality (aka relaxed management). Switch
7577 -gnatd.s may be used to force strict management in which case
7578 the block will manage the secondary stack unconditionally. Add
7579 a guard to stop the traversal when encountering a package or a
7582 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7584 * sem_res.adb (Resolve_Call): Refine further the handling of
7585 limited views of return types in function calls. If the function
7586 that returns a limited view appears in the current unit,
7587 we do not replace its type by the non-limited view because
7588 this transformation is performed int the back-end. However,
7589 the type of the call itself must be the non-limited view, to
7590 prevent spurious resolution errors.
7592 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7594 * einfo,ads, einfo.adb (Class_Wide_Preconds, Class_Wide_Postconds):
7595 Removed, proposed implementation using generics for class-wide
7596 preconditions proved impractical.
7597 (Class_Wide_Clone): New attribute of subprogram. Designates
7598 subprogram created for primitive operations with class-wide
7599 pre/postconditions that contain calls to other primitives. The
7600 clone holds the body of the original primitive, but the
7601 pre/postonditions do not apply to it. The original body is
7602 rewritten as a wrapper for a call to the clone.
7603 (Is_Class_Wide_Clone): New flag to identify a Class_Wide_Clone. If
7604 the flag is set, no code for the corresponding pre/postconditions
7605 is inserted into its body.
7607 2017-04-27 Bob Duff <duff@adacore.com>
7609 * exp_prag.adb, par-prag.adb, sem_ch13.adb: Ignore
7610 Scalar_Storage_Order if -gnatI is given.
7611 * sem_prag.adb (Analyze_Pragma): Ignore
7612 Default_Scalar_Storage_Order if -gnatI is given.
7614 2017-04-27 Claire Dross <dross@adacore.com>
7616 * a-cofuba.ads (Add): Take as an additional input parameter
7617 the position where the element should be inserted.
7618 (Remove): New function that removes an element from the container.
7619 * a-cofuma.ads (Add): Adapt to the new API of Base.Add.
7620 * a-cofuse.ads (Add): Adapt to the new API of Base.Add.
7621 (Remove): New function that removes an element from a set.
7622 * a-cofuve.ads (Add): Adapt to the new API of Base.Add.
7623 (Remove): New function that removes an element from a sequence.
7624 (Insert): New function that adds anywhere in a sequence.
7626 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7628 * checks.adb (Generate_Range_Check): Revert previous change.
7630 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7632 * sem_util.adb: Minor reformatting/rewording.
7634 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7636 * lib-xref.adb (Generate_Reference): The use
7637 of attribute 'Result is not considered a violation of pragma
7640 2017-04-27 Justin Squirek <squirek@adacore.com>
7642 * cstand.adb (Create_Standard): Correctly set
7643 Directly_Designated_Type for Any_Access.
7644 * sem_type.adb (Covers): Minor grammar fixes.
7646 2017-04-27 Bob Duff <duff@adacore.com>
7648 * sem_attr.adb: Minor cleanup.
7650 2017-04-27 Claire Dross <dross@adacore.com>
7652 * a-cofuba.ads, a-cofuba.adb (Ada.Containers.Functional_Base): New
7653 private child of Ada.Containers used to implement all functional
7655 * a-cofuma.ads, a-cofuma.adb (Ada.Containers.Functional_Maps): New
7656 child of Ada.Containers. It provides functional indefinite unbounded
7657 maps which can be used as high level models for specification
7659 * a-cofuse.ads, a-cofuse.adb (Ada.Containers.Functional_Sets): New
7660 child of Ada.Containers. It provides functional indefinite unbounded
7661 sets which can be used as high level models for specification
7663 * a-cofuve.ads, a-cofuve.adb (Ada.Containers.Functional_Vectors): New
7664 child of Ada.Containers. It provides functional indefinite unbounded
7665 vectors which can be used as high level models for specification
7667 * Makefile.rtl: Add new packages.
7668 * impunit.adb: Add new packages.
7670 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7672 * sem_ch4.adb: Minor reformatting.
7674 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7676 * sem_ch12.adb (Analyze_Associations): minor reformatting.
7677 (Check_Fixed_Point_Actual): Do not emit a warning on a fixed
7678 point type actual that has user-defined arithmetic primitives,
7679 when there is a previous actual for a formal package that defines
7680 a fixed-point type with the parent user-defined operator.
7682 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7684 * checks.adb (Generate_Range_Check): Reinstate part of previous change.
7685 * sem_attr.adb (Resolve_Attribute): Generate a range check when
7686 the component type allows range checks.
7688 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7690 * sem_aux.adb (Is_Generic_Formal): Use original node to locate
7691 corresponding declaration, because formal derived types are
7692 rewritten as private extensions.
7694 2017-04-27 Ed Schonberg <schonberg@adacore.com>
7696 * sem_dim.adb (Analyze_Dimension_Binary_Op): Do not check
7697 dimensions of operands if node has been analyzed already, because
7698 previous analysis and dimension checking will have removed the
7699 dimension information from the operands.
7701 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7703 * debug.adb: Document the use of switch -gnatd.s.
7704 * einfo.ads Update the documentation on attribute
7705 Sec_Stack_Needed_For_Return and attribute Uses_Sec_Stack. Remove
7706 the uses of these attributes from certain entities.
7707 * exp_ch7.adb (Make_Transient_Block): Reimplement the circuitry
7708 which determines whether the block should continue to manage
7709 the secondary stack.
7710 (Manages_Sec_Stack): New routine.
7712 2017-04-27 Bob Duff <duff@adacore.com>
7714 * atree.ads: Minor edit.
7716 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
7718 * sinfo.ads: Update the section on Ghost mode. Add
7719 a section on SPARK mode. Update the placement of section on
7720 expression functions.
7722 2017-04-27 Bob Duff <duff@adacore.com>
7724 * sinput.adb (Get_Source_File_Index): Don't
7725 assert that S is in the right range in the case where this is
7726 a .dg file under construction.
7728 2017-04-27 Yannick Moy <moy@adacore.com>
7730 * sem_util.adb (Check_Result_And_Post_State):
7731 Handle more precisely each conjunct in expressions formed by
7732 and'ing sub-expressions.
7734 2017-04-27 Gary Dismukes <dismukes@adacore.com>
7736 * exp_ch4.adb, sem_ch4.adb: Minor typo fix and reformatting.
7738 2017-04-25 Arnaud Charlet <charlet@adacore.com>
7740 * gnat_rm.texi, gnat_ugn.texi,
7741 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
7742 doc/gnat_ugn/platform_specific_information.rst,
7743 doc/gnat_ugn/gnat_and_program_execution.rst,
7744 doc/gnat_ugn/gnat_utility_programs.rst,
7745 doc/gnat_ugn/the_gnat_compilation_model.rst,
7746 doc/gnat_rm/implementation_defined_attributes.rst,
7747 doc/gnat_rm/the_gnat_library.rst,
7748 doc/gnat_rm/implementation_defined_pragmas.rst,
7749 doc/gnat_rm/representation_clauses_and_pragmas.rst,
7750 doc/gnat_rm/implementation_of_specific_ada_features.rst,
7751 doc/gnat_rm/implementation_defined_aspects.rst,
7752 doc/gnat_rm/implementation_defined_characteristics.rst: Update
7755 2017-04-25 Arnaud Charlet <charlet@adacore.com>
7757 * exp_ch4.adb (Expand_N_Case_Expression): Emit error message when
7758 generating C code on complex case expressions.
7760 2017-04-25 Arnaud Charlet <charlet@adacore.com>
7762 * sem_prag.adb (Analyze_Pragma): Generate a warning instead
7763 of silently ignoring pragma Ada_xxx in Latest_Ada_Only mode.
7764 * directio.ads, ioexcept.ads, sequenio.ads, text_io.ads: Use
7765 Ada_2012 instead of Ada_2005 to be compatible with the above
7767 * bindgen.adb: Silence new warning on pragma Ada_95.
7769 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
7771 * checks.adb (Generate_Range_Check): Revert part of previous change.
7773 2017-04-25 Ed Schonberg <schonberg@adacore.com>
7775 * sem_ch4.adb (Try_Container_Indexing): Handle properly a
7776 container indexing operation that appears as a an actual in a
7777 parameter association in a procedure call.
7779 2017-04-25 Olivier Ramonat <ramonat@adacore.com>
7781 * prj-proc.adb, sem_util.adb, s-stposu.adb, sem_attr.adb, prj-conf.ads:
7782 Fix spelling mistakes.
7784 2017-04-25 Bob Duff <duff@adacore.com>
7786 * types.ads, osint.adb, sinput-c.adb, sinput-d.adb, sinput-l.adb,
7787 * sinput-p.adb: Use regular fat pointers, with bounds checking,
7788 for source buffers. Fix misc obscure bugs.
7789 * sinput.ads, sinput.adb: Use regular fat pointers, with bounds
7790 checking, for source buffers. Modify representation clause for
7791 Source_File_Record as appropriate. Move Source_File_Index_Table
7792 from spec to body, because it is not used outside the body.
7793 Move Set_Source_File_Index_Table into the private part, because
7794 it is used only in the body and in children. Use trickery to
7795 modify the dope in the generic instantiation case. It's ugly,
7796 but not as ugly as the previous method. Fix documentation.
7797 Remove obsolete code.
7798 * fname-sf.adb, targparm.adb: Fix misc out-of-bounds
7799 indexing in source buffers.
7800 * fmap.adb: Avoid conversions from one string type to another.
7801 Remove a use of global name buffer.
7802 * osint.ads, sfn_scan.ads, sfn_scan.adb, sinput-c.ads: Comment
7805 2017-04-25 Gary Dismukes <dismukes@adacore.com>
7807 * exp_util.adb, exp_ch4.adb: Minor reformatting.
7809 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
7811 * checks.adb: Code clean up in various routines.
7812 (Generate_Range_Check): Do not generate a range check when the
7813 expander is not active or when index/range checks are suppressed
7815 (Insert_List_After_And_Analyze, Insert_List_Before_And_Analyze):
7816 Remove variants that include a Supress parameter. These routines
7817 are never used, and were introduced before the current scope-based
7818 check suppression method.
7820 2017-04-25 Vasiliy Fofanov <fofanov@adacore.com>
7822 * prj-part.adb, cstreams.c, osint.adb, osint.ads: Remove VMS specific
7823 code and some subprogram calls that are now noop.
7825 2017-04-25 Arnaud Charlet <charlet@adacore.com>
7827 * exp_ch4.adb (Expand_N_Case_Expression): Take
7828 Minimize_Expression_With_Actions into account when possible.
7830 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
7832 * exp_util.adb (Known_Non_Null): Moved to Sem_Util.
7833 (Known_Null): Moved to Sem_Util.
7834 * exp_util.ads (Known_Non_Null): Moved to Sem_Util.
7835 (Known_Null): Moved to Sem_Util.
7836 * sem_util.adb Add new enumeration type Null_Status_Kind.
7837 (Known_Non_Null): Moved from Exp_Util. Most of the logic in
7838 this routine is now carried out by Null_Status.
7839 (Known_Null): Moved from Exp_Util. Most of the logic in this routine
7840 is now carried out by Null_Status.
7841 (Null_Status): New routine.
7842 * sem_util.ads (Known_Non_Null): Moved from Exp_Util.
7843 (Known_Null): Moved from Exp_Util.
7845 2017-04-25 Ed Schonberg <schonberg@adacore.com>
7847 * sem_ch6.adb (Analyze_Expression_Function): Do not report an
7848 error on the return type of an expression function that is a
7849 completion, if the type is derived from a generic formal type.
7851 2017-04-25 Ed Schonberg <schonberg@adacore.com>
7853 * sem_dim.adb (Dimensions_Of_Operand): The dimensions of a type
7854 conversion are those of the target type.
7856 2017-04-25 Bob Duff <duff@adacore.com>
7858 * a-clrefi.adb: Minor cleanup.
7860 2017-04-25 Gary Dismukes <dismukes@adacore.com>
7862 * exp_util.adb, exp_util.ads, types.ads: Minor reformatting.
7864 2017-04-25 Bob Duff <duff@adacore.com>
7866 * err_vars.ads, fmap.adb, fmap.ads, comperr.adb, fname-sf.adb,
7867 types.adb, types.ads, types.h, sinput-l.adb, targparm.adb,
7868 errout.adb, sinput.adb, sinput.ads, cstand.adb, scn.adb,
7869 scn.ads, gnatls.adb: Eliminate the vestigial Internal_Source_File and
7870 the Internal_Source buffer. This removes the incorrect call to "="
7871 the customer noticed.
7872 Wrap remaining calls to "=" in Null_Source_Buffer_Ptr. We
7873 eventually need to eliminate them altogether. Or else get rid
7874 of zero-origin addressing.
7876 2017-04-25 Claire Dross <dross@adacore.com>
7878 * exp_util.ads (Expression_Contains_Primitives_Calls_Of): New
7879 function used in GNATprove to know if an expression contains
7880 non-dispatching calls on primitives of a tagged type.
7882 2017-04-25 Bob Duff <duff@adacore.com>
7884 * rtsfind.adb (Initialize): Initialize
7885 First_Implicit_With. Building the compiler with Normalize_Scalars
7886 and validity checking finds this being used as an uninitialized
7889 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
7891 * contracts.adb (Analyze_Entry_Or_Subprogram_Body_Contract):
7892 Add a warning about SPARK mode management. The routine now
7893 saves and restores both the mode and associated pragma.
7894 (Analyze_Entry_Or_Subprogram_Contract): Add a warning about
7895 SPARK mode management. The routine now saves and restores both
7896 the mode and associated pragma.
7897 (Analyze_Object_Contract):
7898 Add a warning about SPARK mode management. The routine
7899 now saves and restores both the mode and associated pragma.
7900 (Analyze_Package_Body_Contract): Add a warning about SPARK mode
7901 management. The routine now saves and restores both the mode
7902 and associated pragma. (Analyze_Package_Contract): Add a warning
7903 about SPARK mode management. The routine now saves and restores
7904 both the mode and associated pragma.
7905 (Analyze_Task_Contract):
7906 Add a warning about SPARK mode management. The routine now saves
7907 and restores both the mode and associated pragma.
7908 * expander.adb (Expand): Change the way the Ghost mode is saved
7910 * exp_ch3.adb (Freeze_Type): Change the way the Ghost mode is
7912 * exp_disp.adb (Make_DT): Change the way the Ghost mode is saved
7914 * exp_util.adb (Build_DIC_Procedure_Body):
7915 Change the way the Ghost mode is saved and restored.
7916 (Build_DIC_Procedure_Declaration): Change the way the Ghost
7917 mode is saved and restored.
7918 (Build_Invariant_Procedure_Body):
7919 Change the way the Ghost mode is saved and restored.
7920 (Build_Invariant_Procedure_Declaration): Change the way the Ghost
7921 mode is saved and restored.
7922 (Make_Predicate_Call): Change the
7923 way the Ghost mode is saved and restored.
7924 * freeze.adb (Freeze_Entity): Change the way the Ghost mode is
7926 * ghost.adb (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
7928 (Mark_And_Set_Ghost_Body): Remove parameter
7929 Mode and its assignment.
7930 (Mark_And_Set_Ghost_Completion):
7931 Remove parameter Mode and its assignment.
7932 (Mark_And_Set_Ghost_Declaration): Remove parameter Mode and its
7934 (Mark_And_Set_Ghost_Instantiation): Remove parameter
7935 Mode and its assignment.
7936 (Mark_And_Set_Ghost_Procedure_Call):
7937 Remove parameter Mode and its assignment.
7939 Remove parameter Mode and its assignment.
7940 * ghost.ads (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
7941 and update the comment on usage.
7942 (Mark_And_Set_Ghost_Body):
7943 Remove parameter Mode and update the comment on usage.
7944 (Mark_And_Set_Ghost_Completion): Remove parameter Mode and
7945 update the comment on usage.
7946 (Mark_And_Set_Ghost_Declaration):
7947 Remove parameter Mode and update the comment on usage.
7948 (Mark_And_Set_Ghost_Instantiation): Remove parameter Mode and
7949 update the comment on usage.
7950 (Mark_And_Set_Ghost_Procedure_Call):
7951 Remove parameter Mode and update the comment on usage.
7952 (Set_Ghost_Mode): Remove parameter Mode and update the comment
7954 * lib.ads Remove obsolete fields SPARK_Mode_Pragma from various
7956 * lib-load.adb (Create_Dummy_Package_Unit): Remove the assignment
7957 of obsolete field SPARK_Mode_Pragma.
7958 (Load_Main_Source): Remove
7959 the assignment of obsolete field SPARK_Mode_Pragma.
7960 (Load_Unit): Remove the assignment of obsolete field SPARK_Mode_Pragma.
7961 * lib-writ.adb (Add_Preprocessing_Dependency): Remove
7962 the assignment of obsolete field SPARK_Mode_Pragma.
7963 (Ensure_System_Dependency): Remove the assignment of obsolete
7964 field SPARK_Mode_Pragma.
7965 * rtsfind.adb (Load_RTU): Add a warning about Ghost and SPARK
7966 mode management. Change the way Ghost and SPARK modes are saved
7968 * sem.adb (Analyze): Change the way the Ghost mode is saved
7970 * sem_ch3.adb (Analyze_Object_Declaration): Change the way the
7971 Ghost mode is saved and restored.
7972 (Process_Full_View): Change
7973 the way the Ghost mode is saved and restored.
7974 * sem_ch5.adb (Analyze_Assignment): Change the way the Ghost
7975 mode is saved and restored.
7976 * sem_ch6.adb (Analyze_Procedure_Call): Change the way the Ghost
7977 mode is saved and restored.
7978 (Analyze_Subprogram_Body_Helper):
7979 Change the way the Ghost mode is saved and restored.
7980 * sem_ch7.adb (Analyze_Package_Body_Helper): Change the way the
7981 Ghost mode is saved and restored.
7982 * sem_ch10.adb (Analyze_Subunit): Add a warning about SPARK mode
7983 management. Save the SPARK mode-related data prior to any changes
7984 to the scope stack and contexts. The mode is then reinstalled
7985 before the subunit is analyzed in order to restore the original
7986 view of the subunit.
7987 * sem_ch12.adb (Analyze_Package_Instantiation): Update the
7988 warning on region management. Change the way the Ghost and
7989 SPARK modes are saved and restored.
7990 (Inline_Instance_Body):
7991 Add a warning about SPARK mode management. Code clean up.
7992 (Analyze_Subprogram_Instantiation): Update the warning on region
7993 management. Change the way the Ghost and SPARK modes are saved
7995 (Instantiate_Package_Body): Update the warning
7996 on region management. Change the way the Ghost and SPARK modes
7997 are saved and restored.
7998 (Instantiate_Subprogram_Body): Update
7999 the warning on region management. Change the way the Ghost and
8000 SPARK modes are saved and restored.
8001 (Set_Instance_Env): Add a
8002 warning about SPARK mode management. Change the way SPARK mode
8003 is saved and restored.
8004 * sem_ch13.adb (Build_Predicate_Functions):
8005 Change the way the Ghost mode is saved and restored.
8006 (Build_Predicate_Function_Declaration): Change the way the Ghost
8007 mode is saved and restored.
8008 * sem_elab.adb (Check_Elab_Calls): Add a warning about SPARK
8009 mode management. Change the way SPARK mode is saved and restored.
8010 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
8011 Change the way the Ghost mode is saved and restored.
8012 (Analyze_Initial_Condition_In_Decl_Part): Change the way
8013 the Ghost mode is saved and restored.
8015 Change the way the Ghost mode is saved and restored.
8016 (Analyze_Pre_Post_Condition_In_Decl_Part): Change the way the
8017 Ghost mode is saved and restored.
8018 * sem_util.adb (Install_SPARK_Mode): New routine.
8019 (Restore_SPARK_Mode): New routine.
8020 (Save_SPARK_Mode_And_Set): Removed.
8021 (Set_SPARK_Mode): New routine.
8022 * sem_util.ads (Install_SPARK_Mode): New routine.
8023 (Restore_SPARK_Mode): New routine.
8024 (Save_SPARK_Mode_And_Set): Removed.
8025 (Set_SPARK_Mode): New routine.
8027 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8029 * sem_util.adb, sem_util.ads (From_Nested_Package): New predicate
8030 to determine whether a type is declared in a local package that
8031 has not yet been frozen.
8032 * freeze.adb (Freeze_Before): Use new predicate to determine
8033 whether a local package must be installed on the scope stack
8034 in order to evaluate in the proper scope actions generated by
8035 aspect specifications, such as Predicate
8036 * sem_ch13.adb: Simplify code in Analyze_Aspects_At_Freeze_Point
8037 using new predicate.
8039 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8041 * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not consider
8042 comparisons between non- scalar expressions expressions because
8043 their values cannot be invalidated.
8044 * sem_warn.ads (Warn_On_Constant_Valid_Condition): Update the
8047 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8049 * par_sco.adb: Minor reformatting.
8051 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8053 * sem_ch13.adb (Analyze_Aspects_At_Freeze_Point): If entity
8054 is a type from an unfrozen local package, install package to
8055 complete the analysis of delayed aspects of the type.
8057 2017-04-25 Tristan Gingold <gingold@adacore.com>
8059 * bingen.adb (System_Version_Control_Used): New variable.
8060 (Resolve_Binder_Options): Set the above variable.
8061 (Gen_Output_File_Ada): Conditionally call Gen_Versions.
8062 (Gen_Elab_Order): Emit blank line before.
8064 2017-04-25 Justin Squirek <squirek@adacore.com>
8066 * sem_cat.adb (Validate_RT_RAT_Component): Added
8067 an extra check to ignore incomplete types.
8069 2017-04-25 Thomas Quinot <quinot@adacore.com>
8071 * sem_prag.adb (Analyze_Pragma, case Pragma_Check): Remove
8072 bogus circuitry for the case where Name is Predicate.
8074 2017-04-25 Thomas Quinot <quinot@adacore.com>
8076 * par_sco.adb(Traverse_Declarations_Or_Statements.Traverse_Aspects):
8077 Create SCOs for Predicate aspects in disabled
8078 state initially, to be enabled later on by...
8079 * sem_ch13.adb (Build_Predicate_Functions.Add_Predicates): Mark
8080 SCO for predicate as enabled.
8082 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8084 * comperr.adb (Compiler_Abort): Remove now obsolete pair of
8085 pragmas Warnings Off / On.
8086 * namet.adb (Finalize): Remove now obsolete pair of pragmas
8088 * output.adb: Remove now obsolete pair of pragmas Warnings Off / On.
8089 * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not
8090 consider comparisons between static expressions because their
8091 values cannot be invalidated.
8092 * urealp.adb (Tree_Read): Remove now obsolete pair of pragmas
8094 (Tree_Write): Remove now obsolete pair of pragmas Warnings Off / On.
8095 * usage.adb Remove now obsolete pair of pragmas Warnings Off / On.
8097 2017-04-25 Bob Duff <duff@adacore.com>
8099 * sem_elab.adb (In_Task_Activation): Trace internal calls in
8102 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8104 * sem_prag.adb, sem_warn.adb, sem_eval.adb: Minor reformatting and
8107 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8109 * comperr.adb (Compiler_Abort): Add a pair of pragma Warnings
8110 On/Off to defend against a spurious warning in conditional
8112 * exp_ch4.adb (Rewrite_Comparison): Reimplemented.
8113 * namet.adb (Finalize): Add a pair of pragma Warnings On/Off to
8114 defend against a spurious warning in conditional compilation.
8115 * output.adb Add a pair of pragma Warnings On/Off to defend
8116 against a spurious warning in conditional compilation.
8117 * sem_eval.adb (Eval_Relational_Op): Major code clean up.
8118 (Fold_General_Op): New routine.
8119 (Fold_Static_Real_Op): New routine.
8120 (Test_Comparison): New routine.
8121 * sem_eval.ads (Test_Comparison): New routine.
8122 * sem_warn.adb (Is_Attribute_Constant_Comparison): New routine.
8123 (Warn_On_Constant_Valid_Condition): New routine.
8124 (Warn_On_Known_Condition): Use Is_Attribute_Constant_Comparison
8125 to detect a specific case.
8126 * sem_warn.adb (Warn_On_Constant_Valid_Condition): New routine.
8127 * urealp.adb (Tree_Read): Add a pair of pragma Warnings On/Off
8128 to defend against a spurious warning in conditional compilation.
8129 (Tree_Write): Add a pair of pragma Warnings On/Off to defend
8130 against a spurious warning in conditional compilation.
8131 * usage.adb Add a pair of pragma Warnings On/Off to defend
8132 against a spurious warning in conditional compilation.
8134 2017-04-25 Arnaud Charlet <charlet@adacore.com>
8136 * sinfo.ads, sem_ch13.adb: Update comment.
8138 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8140 * sem_util.adb (Is_Post_State): A reference to a
8141 generic in out parameter is considered a change in the post-state
8144 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8146 * sem_ch12.adb (Load_Parent_Of_Generic); When retrieving the
8147 declaration of a subprogram instance within its wrapper package,
8148 skip over null statements that may result from the rewriting of
8151 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8153 * exp_attr.adb (Expand_Attribute_Reference, case 'Read):
8154 If the type is an unchecked_union, replace the attribute with
8155 a Raise_Program_Error (rather than inserting such before the
8156 attribute reference) to handle properly the case where we are
8157 processing a component of a larger record, and we need to prevent
8158 further expansion for the unchecked union.
8159 (Expand_Attribute_Reference, case 'Write): If the type is
8160 an unchecked_union, check whether enclosing scope is a Write
8161 subprogram. Replace attribute with a Raise_Program_Error if the
8162 discriminants of the unchecked_union type have not default values
8163 because such a use is erroneous..
8165 2017-04-25 Tristan Gingold <gingold@adacore.com>
8167 * exp_ch9.adb (Expand_N_Task_Type_Declaration):
8168 Add relative_deadline to task record on edf profile.
8169 (Make_Initialize_Protection): Pass deadline_floor value on edf profile.
8170 (Make_Task_Create_Call): Pass relative_deadline value.
8171 * par-prag.adb (Prag): Handle Pragma_Deadline_Floor.
8172 * s-rident.ads (Profile_Name): Add GNAT_Ravenscar_EDF.
8173 (Profile_Info): Add info for GNAT_Ravenscar_EDF.
8174 * sem_prag.adb (Set_Ravenscar_Profile): Handle
8175 GNAT_Ravenscar_EDF (set scheduling policy).
8176 (Analyze_Pragma): Handle GNAT_Ravenscar_EDF profile and Deadline_Floor
8178 (Sig_Flags): Add choice for Pragma_Deadline_Floor.
8179 * snames.ads-tmpl (Name_Deadline_Floor, Name_Gnat_Ravenscar_EDF):
8181 (Pragma_Deadline_Floor): New pragma.
8182 * targparm.adb (Get_Target_Parameters): Recognize
8183 GNAT_Ravenscar_EDF profile.
8185 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
8187 * gnatvsn.ads (Library_Version): Bump to 8. Update comment.
8189 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8191 * sem_aux.adb (Nearest_Ancestor): Use original node of type
8192 declaration to locate nearest ancestor, because derived
8193 type declarations for record types are rewritten as record
8195 * sem_ch13.adb (Add_Call): Use an unchecked conversion to handle
8196 properly derivations that are completions of private types.
8197 (Add_Predicates): If type is private, examine rep. items of full
8198 view, which may include inherited predicates.
8199 (Build_Predicate_Functions): Ditto.
8201 2017-04-25 Javier Miranda <miranda@adacore.com>
8203 * sem_util.adb (New_Copy_Tree.Visit_Entity): Extend previous change
8204 to generate new entities for subtype declarations located in
8205 Expression_With_Action nodes.
8207 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8209 * sem_elab.adb (Check_A_Call): Remove
8210 local variables Is_DIC_Proc and Issue_In_SPARK. Verify the
8211 need for Elaborate_All when SPARK elaboration checks are
8212 required. Update the checks for instances, variables, and calls
8213 to Default_Initial_Condition procedures.
8215 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8217 * aspects.ads, aspects.adb: Make the GNAT-specific pragma No_Inline
8218 into a boolean aspect, in analogy with the Ada aspect No_Return.
8220 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8222 * exp_ch6.adb, sem_ch13.adb, sem_ch6.adb: Minor reformatting.
8224 2017-04-25 Bob Duff <duff@adacore.com>
8226 * sem_res.adb (Resolve_Actuals): Under -gnatd.q, reset
8227 Is_True_Constant for an array variable that is passed to a
8228 foreign function as an 'in' parameter.
8229 * debug.adb: Document -gnatd.q.
8231 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8233 * sem_ch6.adb (Analyze_Expression_Function): If expression function
8234 is completion and return type is an access type do not freeze
8235 designated type: this will be done in the process of freezing
8236 the expression if needed.
8237 (Freeze_Expr_Types): Check whether type is complete before
8238 creating freeze node, to provide a better error message if
8239 reference is premature.
8240 * sem_ch13.adb (Check_Indexing_Functions): Ignore inherited
8241 functions created by type derivations.
8243 2017-04-25 Pascal Obry <obry@adacore.com>
8245 * g-sercom.ads: Add simple usage of GNAT.Serial_Communication.
8247 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8249 * sem_res.adb (Resolve_Type_Conversion):
8250 When resolving against any fixed type, set the type of the
8251 operand as universal real when the operand is a multiplication
8252 or a division where both operands are of any fixed type.
8253 (Unique_Fixed_Point_Type): Add local variable ErrN. Improve the
8254 placement of an error message by pointing to the operand of a
8255 type conversion rather than the conversion itself.
8257 2017-04-25 Thomas Quinot <quinot@adacore.com>
8259 * sem_ch13.adb (Build_Predicate_Function_Declaration): Set
8260 Needs_Debug_Info when producing SCOs.
8262 2017-04-25 Thomas Quinot <quinot@adacore.com>
8264 * exp_ch6.adb (Add_Finalization_Master_Actual_To_Build_In_Place_Call):
8265 Always pass a null finalization master for a library level named access
8266 type to which a pragme No_Heap_Finalization applies.
8268 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
8272 * a-ngcoar.adb, a-ngrear.adb (Inverse): call Unit_Matrix with First_1
8273 set to A'First(2) and vice versa.
8275 2017-04-25 Yannick Moy <moy@adacore.com>
8277 * freeze.adb (Freeze_Record_Type): Remove obsolete
8278 rule on volatile tagged record restriction on SPARK code.
8280 2017-04-25 Yannick Moy <moy@adacore.com>
8282 * sem_prag.adb (minor) Fix SPARK RM reference.
8284 2017-04-25 Yannick Moy <moy@adacore.com>
8286 * sem_util.adb, sem_util.ads (Unique_Defining_Entity): Update
8287 comment to reflect which entity is chosen as unique entity.
8288 (Unique_Entity): Return full view instead of private spec for
8289 protected type or task type. Fix possible incorrect access when
8292 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8294 * sem_res.adb (Set_Slice_Subtype): Treat specially bit-packed
8295 array types only instead of all packed array types.
8297 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8299 * sem_ch6.adb (Conforming_Types): If type of formal as a specified
8300 dimension system, verify that dimensions of both match.
8301 (Check_Conformance): Add error message in case of dimension
8303 * sem_dim.ads, sem_dim.adb (Dimensions_Match): New utility
8306 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
8308 * gnatxref.adb, gnatfind.adb: Avoid using the term project file,
8311 2017-04-25 Yannick Moy <moy@adacore.com>
8313 * sem_util.adb: Minor refactoring.
8314 * freeze.adb (Freeze_Record_Type): Fix checking of SPARK RM 7.1.3(5).
8316 2017-04-25 Claire Dross <dross@adacore.com>
8318 * sem_prag.adb (Collect_Inherited_Class_Wide_Conditions): Go to
8319 ultimate alias when accessing overridden operation. Indeed, if the
8320 overridden operation is itself inherited, it won't have any explicit
8323 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8325 * sem_warn.adb (Warn_On_Overlapping_Actuals): There can be no
8326 overlap if the two formals have different types, because formally
8327 the corresponding actuals cannot designate the same objects.
8329 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8331 * sem_dim.adb (Dimensions_Of_Operand): minot cleanups: a) If
8332 dimensions are present from context, use them. b) If operand is
8333 a static constant rewritten as a literal, obtain the dimensions
8334 from the original declaration, otherwise use dimensions of type
8335 established from context.
8337 2017-04-25 Yannick Moy <moy@adacore.com>
8339 * sem_util.adb (Is_Effectively_Volatile): Protect against base type
8340 of array that is private.
8342 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8344 * sem_ch3.adb, exp_util.adb, sem_prag.adb, exp_ch4.adb: Minor
8347 2017-04-25 Yannick Moy <moy@adacore.com>
8349 * a-ngelfu.adb, a-ngelfu.ads: Add SPARK_Mode On on spec, Off
8352 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8354 * sem_disp.adb (Check_Dispatching_Context): Add guard to refine
8355 the check that recognizes a call to a private overridding and
8356 replaces the called subprogram with its alias.
8358 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8360 * exp_util.adb: Minor reformatting.
8362 2017-04-25 Justin Squirek <squirek@adacore.com>
8364 * exp_ch3.adb (Freeze_Type): Add condition to always treat
8365 interface types as a partial view of a private type for the
8366 generation of invariant procedure bodies.
8367 * exp_util.adb, exp_util.ads (Add_Inherited_Invariants):
8368 Add a condition to get the Corresponding_Record_Type for
8369 concurrent types, add condition to return in the absence of a
8370 class in the pragma, remove call to Replace_Type_References,
8371 and add call to Replace_References.
8372 (Add_Interface_Invariatns),
8373 (Add_Parent_Invariants): Modify call to Add_Inherited_Invariants
8374 to including the working type T.
8375 (Add_Own_Invariants): Remove
8376 legacy condition for separate units, remove dispatching for ASIS
8377 and save a copy of the expression in the pragma expression.
8378 (Build_Invariant_Procedure_Body): Default initalize vars,
8379 remove return condition on interfaces, always use the
8380 private type for interfaces, and move the processing of types
8381 until after the processing of invariants for the full view.
8382 (Build_Invariant_Procedure_Declaration): Remove condition
8383 to return if an interface type is encountered and add
8384 condition to convert the formal parameter to its class-wide
8385 counterpart if Work_Typ is abstract.
8386 (Replace_Type): Add call to Remove_Controlling_Arguments.
8387 (Replace_Type_Ref): Remove class-wide dispatching for the current
8388 instance of the type.
8389 (Replace_Type_References): Remove parameter "Derived"
8390 (Remove_Controlling_Arguments): Created in order to removing
8391 the controlliong argument from calls to primitives in the case
8392 of the formal parameter being an class-wide abstract type.
8393 * sem_ch3.adb (Build_Assertion_Bodies_For_Type): Almost identical
8394 to the change made to Freeze_Type in exp_ch3. Add a condition
8395 to treat interface types as a partial view.
8396 * sem_prag.adb (Analyze_Pragma): Modify parameters in the call
8397 to Build_Invariant_Procedure_Declaration to properly generate a
8398 "partial" invariant procedure when Typ is an interface.
8400 2017-04-25 Bob Duff <duff@adacore.com>
8402 * a-numeri.ads: Go back to using brackets encoding for the Greek
8405 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8407 * sem_ch3.adb (Derive_Subprogram): Implement rule in RM 6.1.1
8408 (10-15): if derived type T with progenitors is abstract,
8409 and primitive P of this type inherits non-trivial classwide
8410 preconditions from both a parent operation and from an interface
8411 operation, then the inherited operation is abstract if the parent
8412 operation is not null.
8413 * sem_disp.ads, sem_disp.adb: replace function Covers_Some_Interface
8414 with Covered_Interface_Op to yield the actual interface operation
8415 that is implemented by a given inherited operation.
8417 2017-04-25 Javier Miranda <miranda@adacore.com>
8419 * exp_ch4.adb (Expand_N_Op_Expon): Relocate left
8420 and right operands after performing the validity checks. Required
8421 because validity checks may remove side effects from the operands.
8423 2017-04-25 Javier Miranda <miranda@adacore.com>
8425 * exp_attr.adb (Attribute_Unrestricted_Access):
8426 Do not disable implicit type conversion. Required to generate
8427 code that displaces the pointer to reference the secondary
8430 2017-04-25 Pascal Obry <obry@adacore.com>
8432 * prj-attr.adb, snames.ads-tmpl: Add package Install's
8433 Required_Artifacts attribute.
8435 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8437 * sem_util.adb (Same_Value): String literals are compile-time
8438 values, and comparing them must use Expr_Value_S.
8440 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8442 * sem_ch4.adb (Complete_Object_Interpretation): If an explicit
8443 dereference is introduced for the object, and the object is
8444 overloaded, do not check whether it is aliased, because it may
8445 include an implicit dereference.
8446 * sem_type.adb (Disambiguate): If two interpretations are access
8447 attribute types with the same designated type keep either of
8448 them and do not report an ambiguity. A true ambiguity will be
8451 2017-04-25 Bob Duff <duff@adacore.com>
8453 * a-numeri.ads: Change the encoding of Greek letter Pi from
8454 brackets encoding to UTF-8. Use pragma Wide_Character_Encoding
8455 to indicate the encoding. We considered using a byte order mark
8456 (BOM), but that causes various trouble (misc software eats the
8457 BOM, if you have a patch with a BOM, then it's not at the start
8458 of the patch, so it's not a BOM, the BOM affects with-ing files,
8460 * scng.adb, s-wchcnv.adb: Minor.
8462 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8464 * sem_ch3.adb, sem_ch8.adb, sem_disp.adb: Minor reformatting.
8465 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8467 * sem_ch3.adb (Add_Internal_Interface_Entities): Move
8468 Has_Non_Trivial_Precondition to sem_util. for use elsewhere.
8469 Improve error message on operations that inherit non-conforming
8470 classwide preconditions from ancestor and progenitor.
8471 * sem_util.ads, sem_util.adb (Has_Non_Trivial_Precondition):
8472 moved here from sem_ch3.
8473 * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
8474 check given in RM 6.1.1 (17) concerning renamings of overriding
8475 operations that inherits class-wide preconditions from ancestor
8478 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8480 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Code cleanup.
8481 (Build_Adjust_Statements): Code cleanup.
8482 (Build_Finalizer): Update the initialization of
8484 (Build_Finalize_Statements): Code cleanup.
8485 (Build_Initialize_Statements): Code cleanup.
8486 (Make_Deep_Array_Body): Update the initialization of
8488 (Make_Deep_Record_Body): Update the initialization of Exceptions_OK.
8489 (Process_Object_Declaration): Generate a null exception handler only
8490 when exceptions are allowed.
8491 (Process_Transients_In_Scope): Update the initialization of
8493 * exp_util.ads, exp_util.adb (Exceptions_In_Finalization_OK): New
8495 * sem_ch11.adb (Analyze_Exception_Handlers): Do not check any
8496 restrictions when the handler is internally generated and the
8499 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8501 * sem_ch3.adb (Has_Non_Trivial_Precondition): New predicate to
8502 enforce legality rule on classwide preconditions inherited from
8503 both an ancestor and a progenitor (RM 6.1.1 (10-13).
8504 * sem_disp.adb (Check_Dispatching_Context): A call to an abstract
8505 subprogram need not be dispatching if it appears in a precondition
8506 for an abstract or null subprogram.
8508 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8510 * sem_ch10.adb: Minor typo fix.
8512 2017-04-25 Arnaud Charlet <charlet@adacore.com>
8514 * gcc-interface/Makefile.in: Cleanup VxWorks targets.
8516 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8518 * fname.adb (Is_Internal_File_Name): Arrange for the slices to
8519 have a length which is a power of 2.
8520 (Is_Predefined_File_Name): Likewise. Adjust comment.
8522 2017-04-25 Bob Duff <duff@adacore.com>
8524 * exp_aggr.adb (Component_Count): Protect the
8525 arithmetic from attempting to convert a value >= 2**31 to Int,
8526 which would otherwise raise Constraint_Error.
8528 2017-04-25 Bob Duff <duff@adacore.com>
8530 * opt.ads (Locking_Policy): Fix incorrect documentation. The
8531 first character of the policy name is not unique.
8533 2017-04-25 Bob Duff <duff@adacore.com>
8535 * s-fileio.adb (Name): Raise Use_Error if the file is a temp file.
8536 * s-ficobl.ads (Is_Temporary_File): Remove incorrect comment
8537 about this flag not being used. It was already used, and it is
8540 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8542 * einfo.adb Flag301 is now known as Ignore_SPARK_Mode_Pragmas.
8543 (Ignore_SPARK_Mode_Pragmas): New routine.
8544 (Set_Ignore_SPARK_Mode_Pragmas): New routine.
8545 (Write_Entity_Flags): Add an entry for Ignore_SPARK_Mode_Pragmas.
8546 * einfo.ads Add new attribute Ignore_SPARK_Mode_Pragmas and update
8548 (Ignore_SPARK_Mode_Pragmas): New routine
8549 along with pragma Inline.
8550 (Set_Ignore_SPARK_Mode_Pragmas): New routine along with pragma Inline.
8551 * opt.ads Rename flag Ignore_Pragma_SPARK_Mode to
8552 Ignore_SPARK_Mode_Pragmas_In_Instance.
8553 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
8554 Save and restore the value of global flag
8555 Ignore_SPARK_Mode_Pragmas_In_Instance. Set or reinstate the value
8556 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance when either
8557 the corresponding spec or the body must ignore all SPARK_Mode
8558 pragmas found within.
8559 (Analyze_Subprogram_Declaration): Mark
8560 the spec when it needs to ignore all SPARK_Mode pragmas found
8561 within to allow the body to infer this property in case it is
8562 instantiated or inlined later.
8563 * sem_ch7.adb (Analyze_Package_Body_Helper): Save and restore the
8564 value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
8565 the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
8566 when the corresponding spec also ignored all SPARK_Mode pragmas
8568 (Analyze_Package_Declaration): Mark the spec when
8569 it needs to ignore all SPARK_Mode pragmas found within to allow
8570 the body to infer this property in case it is instantiated or
8572 * sem_ch12.adb (Analyze_Formal_Package_Declaration):
8573 Save and restore the value of flag
8574 Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
8575 formal spec when it needs to ignore all SPARK_Mode
8576 pragmas found within to allow the body to infer this
8577 property in case it is instantiated or inlined later.
8578 (Analyze_Package_Instantiation): Save and restore the value
8579 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark
8580 the instance spec when it needs to ignore all SPARK_Mode
8581 pragmas found within to allow the body to infer this
8582 property in case it is instantiated or inlined later.
8583 (Analyze_Subprogram_Instantiation): Save and restore the value
8584 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
8585 instance spec and anonymous package when they need to ignore
8586 all SPARK_Mode pragmas found within to allow the body to infer
8587 this property in case it is instantiated or inlined later.
8588 (Instantiate_Package_Body): Save and restore the value of global
8589 flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set the value of
8590 global flag Ignore_SPARK_Mode_Pragmas_In_Instance when the
8591 corresponding instance spec also ignored all SPARK_Mode pragmas
8593 (Instantiate_Subprogram_Body): Save and restore the
8594 value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
8595 the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
8596 when the corresponding instance spec also ignored all SPARK_Mode
8597 pragmas found within.
8598 * sem_prag.adb (Analyze_Pragma): Update the reference to
8599 Ignore_Pragma_SPARK_Mode.
8600 * sem_util.adb (SPARK_Mode_Is_Off): A construct which ignored
8601 all SPARK_Mode pragmas defined within yields mode "off".
8603 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8605 * bindgen.adb, exp_dbug.adb, errout.adb, fname.adb: Minor reformatting.
8607 2017-04-25 Bob Duff <duff@adacore.com>
8609 * exp_atag.adb (Build_CW_Membership): Add "Suppress =>
8610 All_Checks" to avoid generating unnecessary checks.
8611 * exp_ch4.adb (Expand_N_In, Make_Tag_Check): Add "Suppress =>
8613 * sem.ads: Fix comment.
8614 * expander.ads: Fix comment.
8615 * exp_atag.ads: Fix comment: "Index = 0" should be
8618 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8620 * s-taprop-linux.adb: Minor editorial fixes.
8622 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8624 * sem_util.adb (New_Copy_Tree): Put back the declarations of the
8625 hash tables at library level. Reinstate the NCT_Hash_Tables_Used
8626 variable and set it to True whenever the main hash table is
8627 populated. Short- circuit the Assoc function if it is false
8628 and add associated guards.
8630 2017-04-25 Olivier Hainque <hainque@adacore.com>
8632 * bindgen.adb (Gen_Elab_Calls): Also update counter of lone
8633 specs without elaboration code that have an elaboration counter
8634 nevertheless, e.g. when compiled with -fpreserve-control-flow.
8635 * sem_ch10.adb (Analyze_Compilation_Unit):
8636 Set_Elaboration_Entity_Required when requested to preserve
8637 control flow, to ensure the unit elaboration is materialized at
8638 bind time, resulting in the inclusion of the unit object file
8639 in the executable closure at link time.
8641 2017-04-25 Pierre-Marie de Rodat <derodat@adacore.com>
8643 * exp_dbug.adb: In Debug_Renaming_Declaration,
8644 when dealing with indexed component, accept to produce a renaming
8645 symbol when the index is an IN parameter or when it is a name
8646 defined in an outer scope.
8648 2017-04-25 Yannick Moy <moy@adacore.com>
8650 * errout.adb (Error_Msg): Adapt continuation
8651 message in instantiations and inlined bodies for info messages.
8653 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8655 * fname.adb (Has_Internal_Extension): Add pragma Inline.
8656 Use direct 4-character slice comparisons.
8658 pragma Inline. (Has_Suffix): Delete.
8659 (Is_Internal_File_Name):
8660 Test Is_Predefined_File_Name first.
8661 (Is_Predefined_File_Name):
8662 Use direct slice comparisons as much as possible and limit all
8663 comparisons to at most 8 characters.
8665 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8667 * checks.adb (Insert_Valid_Check): Code cleanup.
8668 * exp_ch6.adb (Add_Validation_Call_By_Copy_Code): New routine.
8669 (Expand_Actuals): Generate proper copy-back for a validation
8670 variable when it acts as the argument of a type conversion.
8671 * sem_util.adb (Is_Validation_Variable_Reference): Augment the
8672 predicate to operate on type qualifications.
8674 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8676 * sem_prag.adb, exp_ch6.adb, binde.adb, sem_disp.adb, s-fileio.adb:
8679 2017-04-25 Bob Duff <duff@adacore.com>
8681 * sem_prag.adb (No_Return): Give an error if the pragma applies
8682 to a body. Specialize the error for the specless body case,
8683 as is done for (e.g.) pragma Convention.
8684 * debug.adb: Add switch -gnatd.J to disable the above legality
8685 checks. This is mainly for use in our test suite, to avoid
8686 rewriting a lot of illegal (but working) code. It might also
8687 be useful to customers. Under this switch, if a pragma No_Return
8688 applies to a body, and the procedure raises an exception (as it
8689 should), the pragma has no effect. If the procedure does return,
8690 execution is erroneous.
8692 2017-04-25 Bob Duff <duff@adacore.com>
8694 * exp_ch6.adb (Expand_Actuals): This is the
8695 root of the problem. It took N as an 'in out' parameter, and in
8696 some cases, rewrote N, but then set N to Original_Node(N). So
8697 the node returned in N had no Parent. The caller continued
8698 processing of this orphaned node. In some cases that caused a
8699 crash (e.g. Remove_Side_Effects climbs up Parents in a loop,
8700 and trips over the Empty Parent). The solution is to make N an
8701 'in' parameter. Instead of rewriting it, return the list of
8702 post-call actions, so the caller can do the rewriting later,
8703 after N has been fully processed.
8704 (Expand_Call_Helper): Move most of Expand_Call here. It has
8705 too many premature 'return' statements, and we want to do the
8706 rewriting on return.
8707 (Insert_Post_Call_Actions): New procedure to insert the post-call
8708 actions in the appropriate place. In the problematic case,
8709 that involves rewriting N as an Expression_With_Actions.
8710 (Expand_Call): Call the new procedures Expand_Call_Helper and
8711 Insert_Post_Call_Actions.
8713 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8715 * sem_prag.adb (Inherits_Class_Wide_Pre): Cleanup code, handle
8716 properly type derived from generic formal types, to handle
8717 properly modified version of ACATS 4.1B B611017.
8719 2017-04-25 Javier Miranda <miranda@adacore.com>
8721 * exp_unst.adb (Subp_Index): Adding missing
8722 support for renamings and functions that return a constrained
8723 array type (i.e. functions for which the frontend built a
8724 procedure with an extra out parameter).
8726 2017-04-25 Pascal Obry <obry@adacore.com>
8728 * s-string.adb: Minor code clean-up.
8730 2017-04-25 Bob Duff <duff@adacore.com>
8732 * s-os_lib.ads, s-os_lib.adb (Non_Blocking_Wait_Process): New
8734 * adaint.h, adaint.c (__gnat_portable_no_block_wait): C support
8735 function for Non_Blocking_Wait_Process.
8737 2017-04-25 Bob Duff <duff@adacore.com>
8739 * prep.adb (Preprocess): Remove incorrect
8740 Assert. Current character can be ASCII.CR.
8742 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8744 * sem_prag.adb (Set_Convention_From_Pragma): Cleanup code for
8745 convention Stdcall, which has a number of exceptions. Convention
8746 is legal on a component declaration whose type is an anonymous
8747 access to subprogram.
8749 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8751 * sem_ch4.adb: sem_ch4.adb Various reformattings.
8752 (Try_One_Prefix_Interpretation): Use the base type when dealing
8753 with a subtype created for purposes of constraining a private
8754 type with discriminants.
8756 2017-04-25 Javier Miranda <miranda@adacore.com>
8758 * einfo.ads, einfo.adb (Has_Private_Extension): new attribute.
8759 * warnsw.ads, warnsw.adb (All_Warnings): Set warning on late
8760 dispatching primitives (Restore_Warnings): Restore warning on
8761 late dispatching primitives (Save_Warnings): Save warning on late
8762 dispatching primitives (Do_Warning_Switch): Use -gnatw.j/-gnatw.J
8763 to enable/disable this warning.
8764 (WA_Warnings): Set warning on late dispatching primitives.
8765 * sem_ch3.adb (Analyze_Private_Extension_Declaration): Remember
8766 that its parent type has a private extension.
8767 * sem_disp.adb (Warn_On_Late_Primitive_After_Private_Extension):
8769 * usage.adb: Document -gnatw.j and -gnatw.J.
8771 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8773 * exp_ch7.adb, checks.adb, sem_prag.adb, eval_fat.adb: Minor
8776 2017-04-25 Bob Duff <duff@adacore.com>
8778 * binde.adb (Validate): Do not pass dynamic strings
8779 to pragma Assert, because older compilers do not support that.
8781 2017-04-25 Bob Duff <duff@adacore.com>
8783 * s-fileio.adb (Close): When a temp file is
8784 closed, delete it and clean up its Temp_File_Record immediately,
8785 rather than waiting until later.
8786 (Temp_File_Record): Add File
8787 component, so Close can know which Temp_File_Record corresponds
8788 to the file being closed.
8789 (Delete): Don't delete temp files,
8790 because they are deleted by Close.
8791 (Open): Set the File component
8792 of Temp_File_Record. This requires moving the creation of the
8793 Temp_File_Record to the end, after the AFCB has been created.
8795 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8797 * checks.adb (Insert_Valid_Check): Do not generate
8798 a validity check when inside a generic.
8800 2017-04-25 Yannick Moy <moy@adacore.com>
8802 * sem_res.adb (Resolve_Type_Conversion): Fix bad logic.
8804 2017-04-25 Arnaud Charlet <charlet@adacore.com>
8806 * snames.ads-tmpl (Snames): More names for detecting predefined
8807 potentially blocking subprograms.
8809 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8811 * sem_prag.adb (Analyze_Pre_Post_Condition): The rules
8812 concerning inheritance of class-wide preconditions do not apply
8815 2017-04-25 Bob Duff <duff@adacore.com>
8817 * s-ficobl.ads: Minor comment fix.
8819 2017-04-25 Yannick Moy <moy@adacore.com>
8821 * checks.adb (Apply_Scalar_Range_Check): Analyze precisely
8822 conversions from float to integer in GNATprove mode.
8823 (Apply_Type_Conversion_Checks): Make sure in GNATprove mode
8824 to call Apply_Type_Conversion_Checks, so that range checks
8825 are properly positioned when needed on conversions, including
8826 when converting from float to integer. (Determine_Range): In
8827 GNATprove mode, take into account the possibility of conversion
8828 from float to integer.
8829 * sem_res.adb (Resolve_Type_Conversion): Only enforce range
8830 check on conversions from fixed-point to integer, not anymore
8831 on conversions from floating-point to integer, when in GNATprove
8834 2017-04-25 Yannick Moy <moy@adacore.com>
8836 * checks.adb (Determine_Range_R): Special case type conversions
8837 from integer to float in order to get bounds in that case too.
8838 * eval_fat.adb (Machine): Avoid issuing warnings in GNATprove
8839 mode, for computations involved in interval checking.
8841 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8843 * checks.adb (Insert_Valid_Check): Partially reimplement validity
8845 * einfo.adb Node36 is now used as Validated_Object.
8846 (Validated_Object): New routine.
8847 (Set_Validated_Object): New routine.
8848 (Write_Field36_Name): Add an entry for Validated_Object.
8849 * einfo.ads Add new attribute Validated_Object along with
8851 (Validated_Object): New routine along with pragma Inline.
8852 (Set_Validated_Object): New routine along with pragma Inline.
8853 * exp_attr.adb (Make_Range_Test): Add processing for validation
8854 variables to avoid extra reads and copies of the prefix.
8855 * exp_ch6.adb (Expand_Actuals): Add copy-back for validation
8856 variables in order to reflect any changes done in the variable
8857 back into the original object.
8858 * sem_util.adb (Is_Validation_Variable_Reference): New routine.
8859 * sem_util.ads (Is_Validation_Variable_Reference): New routine.
8861 2017-04-25 Steve Baird <baird@adacore.com>
8863 * exp_ch7.adb (Build_Array_Deep_Procs,
8864 Build_Record_Deep_Procs, Make_Finalize_Address_Body): Don't
8865 generate Finalize_Address routines for CodePeer.
8867 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8869 * sem_prag.adb (Inherits_Class_Wide_Pre): subsidiary of
8870 Analyze_Pre_Post_Condition, to implement the legality checks
8871 mandated by AI12-0131: Pre'Class shall not be specified for an
8872 overriding primitive subprogram of a tagged type T unless the
8873 Pre'Class aspect is specified for the corresponding primitive
8874 subprogram of some ancestor of T.
8876 2017-04-25 Bob Duff <duff@adacore.com>
8878 * sem_ch8.adb (Use_One_Type): If a use_type_clause
8879 is redundant, set its Used_Operations to empty. This is only
8880 necessary for use clauses that appear in the parent of a generic
8881 child unit, because those use clauses get reanalyzed when we
8882 instantiate the generic, and we don't want the Used_Operations
8883 carried over from the original context (where it was probably
8886 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8888 * exp_ch6.adb: Minor reformatting.
8890 2017-04-25 Bob Duff <duff@adacore.com>
8892 * sem_prag.adb (Process_Restrictions_Or_Restriction_Warnings):
8893 Use Source_Index (Current_Sem_Unit) to find the correct casing.
8894 * exp_prag.adb (Expand_Pragma_Check): Use Source_Index
8895 (Current_Sem_Unit) to find the correct casing.
8896 * par.adb (Par): Null out Current_Source_File, to ensure that
8897 the above bugs won't rear their ugly heads again.
8899 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8901 * sem_ch8.adb (Find_Type): For an attribute reference
8902 'Class, if prefix type is synchronized and previous errors
8903 have suppressed the creation of the corresponding record type,
8904 create a spurious class-wide for the synchonized type itself,
8905 to catch other misuses of the attribute
8907 2017-04-25 Steve Baird <baird@adacore.com>
8909 * exp_ch6.adb (Expand_Simple_Function_Return): if CodePeer_Mode
8910 is True, then don't generate the accessibility check for the
8911 tag of a tagged result.
8912 * exp_intr.adb (Expand_Dispatching_Constructor_Call):
8913 if CodePeer_Mode is True, then don't generate the
8914 tag checks for the result of call to an instance of
8915 Ada.Tags.Generic_Dispatching_Constructor (i.e., both the "is a
8916 descendant of" check and the accessibility check).
8918 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8920 * sem_ch13.adb: Code cleanups.
8921 * a-strbou.ads: minor whitespace fix in Trim for bounded strings.
8922 * sem_ch8.ads: Minor comment fix.
8924 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
8926 * exp_ch4.adb (Library_Level_Target): New function.
8927 (Expand_Concatenate): When optimization is enabled, also expand
8928 the operation out-of-line if the concatenation is present within
8929 the expression of the declaration of a library-level object and
8930 not only if it is the expression of the declaration.
8932 2017-04-25 Bob Duff <duff@adacore.com>
8934 * freeze.adb (Freeze_Object_Declaration): Do
8935 not Remove_Side_Effects if there is a pragma Linker_Section,
8936 because in that case we want static initialization in the
8937 appropriate section.
8939 2017-04-25 Gary Dismukes <dismukes@adacore.com>
8941 * exp_dbug.adb: Minor rewording and reformatting.
8943 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8945 * sem_attr.adb (Statically_Denotes_Object): New predicate, to
8946 handle the proposed changes to rules concerning potentially
8947 unevaluated expressions, to include selected components that
8948 do not depend on discriminants, and indexed components with
8950 * sem_util.adb (Is_Potentially_Unevaluated): Add check for
8951 predicate in quantified expression, and fix bugs in the handling
8952 of case expressions and membership test.
8953 (Analyze_Attribute_Old_Result): use new predicate.
8954 (Analyze_Attribute, case Loop_Entry): ditto.
8956 2017-04-25 Bob Duff <duff@adacore.com>
8958 * s-secsta.adb (SS_Info): Add a comment
8959 explaining why we don't need to walk all the chunks in order to
8960 compute the total size.
8962 2017-04-25 Bob Duff <duff@adacore.com>
8964 * namet.ads, namet.adb (Global_Name_Buffer): Increase the length
8965 of the global name buffer to 4*Max_Line_Length.
8967 2017-04-25 Javier Miranda <miranda@adacore.com>
8969 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration): When creating a
8970 renaming entity for debug information, mark the entity as needing debug
8971 info if it comes from sources.
8973 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8975 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Remove the
8976 restriction converning the use of 'Address where the prefix is
8977 of a controlled type.
8979 2017-04-25 Pierre-Marie de Rodat <derodat@adacore.com>
8981 * exp_dbug.adb: In Debug_Renaming_Declaration,
8982 skip slices that are made redundant by an indexed component
8984 * atree.h: New definition for Original_Node.
8986 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
8988 * sem_prag.adb, sem_prag.ads: Minor reformatting.
8990 2017-04-25 Ed Schonberg <schonberg@adacore.com>
8992 * sem_ch3.adb (Check_Entry_Contract): Call
8993 Preanalyze_Spec_Expression so that resolution takes place as well.
8994 * sem_util.adb (Check_Internal_Protected_Use): Reject properly
8995 internal calls that appear in preconditions of protected
8996 operations, in default values for same, and in contract guards
8997 for contract cases in SPARK.
8999 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
9001 * a-numaux.ads: Fix description of a-numaux-darwin
9003 (Double): Define to Long_Float.
9004 * a-numaux-vxworks.ads (Double): Likewise.
9005 * a-numaux-darwin.ads
9007 * a-numaux-libc-x86.ads (Double): Define to Long_Long_Float.
9008 * a-numaux-x86.ads: Fix package description.
9009 * a-numaux-x86.adb (Is_Nan): Minor tweak.
9010 (Reduce): Adjust and complete description. Call Is_Nan instead of
9011 testing manually. Use an integer temporary to hold rounded value.
9012 * a-numaux-darwin.adb (Reduce): Likewise.
9013 (Is_Nan): New function.
9015 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9017 * sem_ch4.adb (Analyze_Selected_Component): Additional refinement
9018 on analysis of prefix whose type is a current instance of a
9019 synchronized type, but where the prefix itself is an entity that
9022 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9024 * exp_ch5.adb (Replace_Target): When rewriting the RHS, preserve
9025 the identity of callable entities therein, because they have been
9026 properly resolved, and prefixed calls may have been rewritten
9029 2017-04-25 Patrick Bernardi <bernardi@adacore.com>
9031 * exp_ch3.adb (Build_Init_Statements): Convert
9032 the expression of the pragma/aspect Secondary_Stack_Size to
9033 internal type System.Parameters.Size_Type before assigning
9034 it to the Secondary_Stack_Size component of the task type's
9035 corresponding record.
9037 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
9039 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal
9040 (etc) optimizations when the type is modular and the offsets
9043 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
9045 * s-osinte-freebsd.ads: Minor comment tweaks
9047 2017-04-25 Javier Miranda <miranda@adacore.com>
9049 * urealp.adb (UR_Write): Reverse previous patch
9050 adding documentation on why we generate multiplications instead
9051 of divisions (needed to avoid expressions whose computation with
9052 large numbers may cause division by 0).
9054 2017-04-25 Bob Duff <duff@adacore.com>
9056 * erroutc.adb (Set_Specific_Warning_Off,
9057 Set_Warnings_Mode_Off): Use the correct source file for
9058 Stop. Was using Current_Source_File, which is only valid during
9059 parsing. Current_Source_File will have a leftover value from
9060 whatever file happened to be parsed last, because of a with_clause
9063 2017-04-25 Bob Duff <duff@adacore.com>
9065 * lib.ads, lib.adb (In_Internal_Unit): New functions similar
9066 to In_Predefined_Unit, but including GNAT units.
9067 * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): Replace
9068 with Should_Ignore_Pragma_Par and Should_Ignore_Pragma_Sem,
9069 because Should_Ignore_Pragma was not working reliably outside
9070 the parser, because Current_Source_File is not valid.
9071 * sem_prag.adb, exp_prag.adb: Call Should_Ignore_Pragma_Sem.
9072 * par-prag.adb: Call Should_Ignore_Pragma_Par.
9074 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
9076 * gnat1drv.adb (Gnat1Drv): Disable Generate_Processed_File in
9079 2017-04-25 Javier Miranda <miranda@adacore.com>
9081 * urealp.adb (UR_Write): Fix output of constants with a base other
9084 2017-04-25 Justin Squirek <squirek@adacore.com>
9086 * sem_ch13.adb (Get_Interfacing_Aspects): Moved to sem_util.adb.
9087 * sem_prag.adb (Analyze_Pragma, Process_Import_Or_Interface):
9088 Add extra parameter for Process_Interface_Name.
9089 (Process_Interface_Name): Add parameter for pragma to analyze
9090 corresponding aspect.
9091 * sem_util.ads, sem_util.adb (Get_Interfacing_Aspects): Added
9094 2017-04-25 Gary Dismukes <dismukes@adacore.com>
9096 * exp_ch7.adb, einfo.ads, sem_prag.adb: Minor reformatting and typo
9099 2017-04-25 Yannick Moy <moy@adacore.com>
9101 * sem_res.adb (Resolve_Comparison_Op): Do not
9102 attempt evaluation of relational operations inside assertions.
9104 2017-04-25 Justin Squirek <squirek@adacore.com>
9106 * exp_util.adb (Add_Interface_Invariants):
9107 Restored, code moved back from Build_Invariant_Procedure_Body.
9108 (Add_Parent_Invariants): Restored, code moved back from
9109 Build_Invariant_Procedure_Body.
9110 (Build_Invariant_Procedure_Body):
9111 Remove refactored calls and integrated code from
9112 Add_Parent_Invariants and Add_Interface_Invariants.
9114 2017-04-25 Johannes Kanig <kanig@adacore.com>
9116 * errout.adb (Output_Messages): Adjust computation of total
9118 * erroutc.adb (Error_Msg): In statistics counts, deal
9119 correctly with informational messages that are not warnings.
9120 * errutil.adb (Finalize): adjust computation of total errors.
9122 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
9124 * terminals.c (__gnat_terminate_pid): New.
9125 * g-exptty.ads (Terminate_Process): New. Update comments.
9127 2017-04-25 Arnaud Charlet <charlet@adacore.com>
9129 * a-cfinve.ads, a-cofove.ads (Empty_Vector): add Global contract.
9131 2017-04-25 Justin Squirek <squirek@adacore.com>
9133 * sem_ch3.adb (Analyze_Declarations): Minor
9134 correction to comments, move out large conditional and scope
9135 traversal into a predicate.
9136 (Uses_Unseen_Lib_Unit_Priv): Predicate function made from extracted
9139 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9141 * sem_ch4.adb (Analyze_Selected_Component): Refine analysis
9142 of prefix whose type is a current instance of a synchronized
9143 type. If the prefix is an object this is an external call (or
9144 requeue) that can only access public operations of the object. The
9145 previous predicate was too restrictive, and did not allow public
9146 protected operations, only task entries.
9148 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9150 * sem_ch5.adb, fname.adb: Minor reformatting.
9152 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9154 * einfo.adb (Is_Anonymous_Access_Type): New routine.
9155 * einfo.ads Update the placement of
9156 E_Anonymous_Access_Subprogram_Type along with all subtypes that
9158 (Is_Anonymous_Access_Type): New routine.
9159 * exp_ch7.adb (Allows_Finalization_Master): Do not generate a
9160 master for an access type subject to pragma No_Heap_Finalization.
9161 * exp_util.adb (Build_Allocate_Deallocate_Proc): An object being
9162 allocated or deallocated does not finalization actions if the
9163 associated access type is subject to pragma No_Heap_Finalization.
9164 * opt.ads Add new global variable No_Heap_Finalization_Pragma.
9165 * par-prag.adb Pragma No_Heap_Finalization does not need special
9166 processing from the parser.
9167 * sem_ch6.adb (Check_Return_Subtype_Indication): Remove ancient
9168 ??? comments. Use the new predicate Is_Anonymous_Access_Type.
9169 * sem_prag.adb Add an entry in table Sig_Flags for pragma
9170 No_Heap_Finalization.
9171 (Analyze_Pragma): Add processing for
9172 pragma No_Heap_Finalization. Update various error messages to
9173 use Duplication_Error.
9174 * sem_util.ads, sem_util.adb (No_Heap_Finalization): New routine.
9175 * snames.ads-tmpl: Add new predefined name No_Heap_Finalization
9176 and corresponding pragma id.
9178 2017-04-25 Bob Duff <duff@adacore.com>
9180 * freeze.adb (Freeze_Record_Type): Use the
9181 underlying type of the component type to determine whether it's
9182 elementary. For representation clause purposes, a private type
9183 should behave the same as its full type.
9184 * fname.ads, fname.adb (Is_Predefined_File_Name):
9185 Make sure things like "system.ali" are recognized as predefined.
9187 2017-04-25 Javier Miranda <miranda@adacore.com>
9189 * debug.adb: Update documentation of -gnatd.6.
9191 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9193 * sem_ch5.adb (Preanalyze_Range): Handle properly an Ada2012
9194 element iterator when the name is an overloaded function call,
9195 one of whose interpretations yields an array.
9197 2017-04-25 Bob Duff <duff@adacore.com>
9199 * uname.ads, uname.adb (Is_Predefined_Unit_Name,
9200 Is_Internal_Unit_Name): New functions for operating on unit
9201 names, as opposed to file names. There's some duplicated code
9202 with fname.adb, which is unfortunate, but it seems like we don't
9203 want to add dependencies here.
9204 * fname-uf.adb (Get_File_Name): Change Is_Predefined_File_Name
9205 to Is_Predefined_Unit_Name; the former was wrong, because Uname
9206 is not a file name at all.
9207 * fname.ads, fname.adb: Document the fact that
9208 Is_Predefined_File_Name and Is_Internal_File_Name can be called
9209 for ALI files, and fix the code so it works properly for ALI
9210 files. E.g. these should return True for "system.ali".
9212 2017-04-25 Justin Squirek <squirek@adacore.com>
9214 * exp_util.adb (Add_Invariant): Removed,
9215 code moved to Add_Invariant_Check, Add_Inherited_Invariant,
9216 and Add_Own_Invariant. (Add_Invariant_Check): Used
9217 for adding runtime checks from any kind of invariant.
9218 (Add_Inherited_Invariant): Generates invariant checks for
9219 class-wide invariants (Add_Interface_Invariants): Removed, code
9220 moved to Build_Invariant_Procedure_Body (Add_Own_Invariant):
9221 Create a types own invariant procedure (Add_Parent_Invariants):
9222 Removed, code moved to Build_Invariant_Procedure_Body
9223 (Build_Invariant_Procedure_Body): Add refactored calls
9224 and integrated code from Add_Parent_Invariants and
9225 Add_Interface_Invariants.
9226 (Process_Type): Removed, the
9227 relavant code was inlined into both Add_Own_Invariant and
9228 Add_Inherited_Invariant.
9230 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9232 * make.adb, par-ch2.adb, sem_util.adb, scans.ads, sem_ch8.adb,
9233 scn.adb, osint.adb, fname.adb: Minor reformatting.
9235 2017-04-25 Pascal Obry <obry@adacore.com>
9237 * s-taprop-mingw.adb: Do not check for CloseHandle in
9240 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9242 * sem_util.adb (Check_Part_Of_Reference):
9243 Continue to examine the context if the reference appears within
9244 an expression function.
9246 2017-04-25 Justin Squirek <squirek@adacore.com>
9248 * exp_ch7.adb, exp_ch7.ads Remove Build_Invariant_Procedure_Body
9249 and Build_Invariant_Procedure_Declaration.
9250 * exp_util.ads, exp_util.adb Add Build_Invariant_Procedure_Body
9251 and Build_Invariant_Procedure_Declaration from exp_ch7
9252 and break-out Is_Untagged_Private_Derivation from
9253 Build_Invariant_Procedure_Body.
9254 (Replace_Type_References):
9255 Append an extra parameter to allow for dispatching replacements
9256 and add the corrasponding logic.
9257 (Type_Invariant): Remove
9258 Replace_Typ_Refs and replace its references with calls to
9259 Replace_Type_References.
9260 * sem_ch3.adb, sem_prag.adb: Remove with and use of exp_ch7.
9262 2017-04-25 Bob Duff <duff@adacore.com>
9264 * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): New function
9265 that returns True when appropriate.
9266 * par-prag.adb, exp_prag.adb, sem_prag.adb: Do not ignore pragmas
9267 when compiling predefined files.
9268 * fname.ads, fname.adb (Is_Predefined_File_Name): Fix bug:
9269 "gnat.adc" should not be considered a predefined file name.
9270 That required (or at least encouraged) a lot of cleanup of global
9271 variable usage. We shouldn't be communicating information via
9272 the global name buffer.
9273 * bindgen.adb, errout.adb, fname-uf.adb, lib-load.adb, make.adb,
9274 * restrict.adb, sem_ch10.adb, sem_ch6.adb, sem_ch8.adb: Changes
9275 required by the above-mentioned cleanup.
9277 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9279 * osint.adb (Find_File): Handle properly a request for a
9280 configuration file whose name is a directory.
9282 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9284 * sem_attr.adb, sem_ch5.adb: Minor reformatting.
9286 2017-04-25 Bob Duff <duff@adacore.com>
9288 * types.ads: Minor: Fix '???' comment.
9289 * sem_ch8.adb: Minor comment fix.
9291 2017-04-25 Bob Duff <duff@adacore.com>
9293 * sem_prag.adb: Remove suspicious uses of Name_Buf.
9294 * stringt.ads, stringt.adb, exp_dbug.adb, sem_dim.adb: Remove
9295 Add_String_To_Name_Buffer, to avoid using the global Name_Buf.
9296 Add String_To_Name with no side effects.
9298 2017-04-25 Justin Squirek <squirek@adacore.com>
9300 * sem_ch3.adb (Analyze_Declarations): Add
9301 additional condition for edge case.
9303 2017-04-25 Bob Duff <duff@adacore.com>
9305 * par-ch2.adb, scans.ads, scn.adb: Do not give an error for
9306 reserved words inside pragmas. This is necessary to allow the
9307 pragma name Interface to be used in pragma Ignore_Pragma.
9308 * par.adb: Minor comment fix.
9310 2017-04-25 Javier Miranda <miranda@adacore.com>
9312 * a-tags.ads, a-tags.adb (Type_Is_Abstract): Renamed as Is_Abstract.
9313 * rtsfind.ads (RE_Type_Is_Abstract): Renamed as Is_Abstract.
9314 * exp_disp.adb (Make_DT): Update occurrences of RE_Type_Is_Abstract.
9315 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Update
9316 occurrences of RE_Type_Is_Abstract
9318 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9320 * exp_util.adb (Build_Chain): Account for ancestor
9321 subtypes while traversing the derivation chain.
9323 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9325 * sem_attr.adb: minor reformatting.
9327 2017-04-25 Doug Rupp <rupp@adacore.com>
9329 * sigtramp-vxworks-target.inc [PPC64]: Add a .localentry pseudo-op.
9331 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9333 * sem_ch5.adb (Analyze_Assignment): Reset Full_Analysis flag on
9334 the first pass over an assignment statement with target names,
9335 to prevent the generation of subtypes (such as discriminated
9336 record components)that may carry the target name outside of the
9337 tree for the assignment. The subtypes will be generated when
9338 the assignment is reanalyzed in full.
9339 (Analyze_Target_Name): Handle properly class-wide types.
9341 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9343 * elists.ads, elists.adb (Prepend_Unique_Elmt): New routine.
9344 * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
9345 the purposes of freezing.
9346 * exp_util.adb Update the documentation and structure of the
9347 type map used in class-wide semantics of assertion expressions.
9348 (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
9349 and resolve the triaged expression because all substitutions
9350 refer to the proper entities. Update the replacement of
9352 (Build_DIC_Procedure_Body): Add formal parameter
9353 For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
9354 are now only processed when freezing occurs. Build a body only
9356 (Entity_Hash): Removed.
9357 (Map_Types): New routine.
9358 (Replace_Object_And_Primitive_References): Removed.
9359 (Replace_References): New routine.
9360 (Replace_Type_References): Moved to the library level of Exp_Util.
9361 (Type_Map_Hash): New routine.
9362 (Update_Primitives_Mapping): Update the mapping call.
9363 (Update_Primitives_Mapping_Of_Types): Removed.
9364 * exp_util.ads (Build_DIC_Procedure_Body): Add formal
9365 parameter For_Freeze and update the comment on usage.
9366 (Map_Types): New routine.
9367 (Replace_References): New routine.
9368 (Replace_Type_References): Moved to the library level of Exp_Util.
9369 (Update_Primitives_Mapping_Of_Types): Removed.
9370 * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
9371 properties of the private type to the full view in case the full
9372 view derives from a parent type and inherits a DIC pragma.
9373 * sem_prag.adb (Analyze_Pragma): Guard against a case where a
9374 DIC pragma is placed at the top of a declarative region.
9376 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
9378 * a-tasatt.adb: Complete previous change and use an unsigned
9379 int to avoid overflow checks.
9381 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9383 * sem_attr.adb (Analyze_Attribute, case 'Access): Specialize
9384 the error message when the attribute reference is an actual in
9385 a call to a subprogram inherited from a generic formal type with
9386 unknown discriminants, which makes the subprogram and its formal
9387 parameters intrinsic (see RM 6.3.1 (8) and (13)).
9389 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9391 * sem_aggr.adb, inline.adb, einfo.adb, einfo.ads, scng.adb,
9392 sem_prag.adb: Minor reformatting.
9394 2017-04-25 Bob Duff <duff@adacore.com>
9396 * sem_attr.adb (Type_Key): Add code in the
9397 recursive Compute_Type_Key to protect against fetching the source
9398 code for Standard, in case a component of the type is declared
9399 in Standard. There was already code to do this for the original
9400 type, but not for its components.
9402 2017-04-25 Javier Miranda <miranda@adacore.com>
9404 * exp_ch3.adb (Build_Initialization_Call): Handle
9405 subtypes of private types when searching for the underlying full
9406 view of a private type.
9408 2017-04-25 Javier Miranda <miranda@adacore.com>
9410 * sem_res.adb (Set_Mixed_Mode_Operand): A universal
9411 real conditional expression can appear in a fixed-type context
9412 and must be resolved with that context to facilitate the code
9413 generation to the backend.
9415 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9417 * einfo.adb, einfo.ads (Body_Needed_For_Inlining): New flag,
9418 to indicate whether during inline processing, when some unit U1
9419 appears in the context of a unit U2 compiled for instantiation
9420 or inlining purposes, the body of U1 needs to be compiled as well.
9421 * sem_prag.adb (Process_Inline): Set Body_Needed_For_Inlining if
9422 context is a package declaration.
9423 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration,
9424 Analyze_Generic_Package_Declaration): ditto.
9425 * inline.adb (Analyze_Inlined_Bodies): Check
9426 Body_Needed_For_Inlining.
9428 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9430 * par.adb (Current_Assign_Node): Global variable use to record
9431 the presence of a target_name in the right hand side of the
9432 assignment being parsed.
9433 * par-ch4.adb (P_Name): If the name is a target_name, mark the
9434 enclosing assignment node accordingly.
9435 * par-ch5.adb (P_Assignment_Statement): Set Current_Assign_Node
9437 * sem_ch5.adb (Analyze_Assignment): Disable expansion before
9438 analyzing RHS if the statement has target_names.
9439 * sem_aggr.adb (Resolve_Iterated_Component_Association): Handle
9440 properly choices that are subtype marks.
9441 * exp_ch5.adb: Code cleanup.
9443 2017-04-25 Bob Duff <duff@adacore.com>
9445 * s-memory.adb: Add a comment regarding efficiency.
9446 * atree.adb: Fix the assertion, and combine 2 assertions into one,
9447 "the source has an extension if and only if the destination does."
9448 * sem_ch3.adb, sem_ch13.adb: Address ??? comments.
9450 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
9452 * a-tasatt.adb (Set_Value): Fix handling of 32bits -> 64bits
9455 2017-04-25 Doug Rupp <rupp@adacore.com>
9457 * init.c (__gnat_error_handler) [vxworks]: Turn on sigtramp
9458 handling for ppc64-vx7.
9459 * sigtramp-vxworks-target.inc
9460 [SIGTRAMP_BODY]: Add section for ppc64-vx7.
9462 2017-04-25 Arnaud Charlet <charlet@adacore.com>
9464 * ada_get_targ.adb: New file.
9466 2017-04-25 Bob Duff <duff@adacore.com>
9468 * uintp.adb (Most_Sig_2_Digits): In case Direct (Right), fetch
9469 Direct_Val (Right), instead of the incorrect Direct_Val (Left).
9470 (UI_GCD): Remove ??? comment involving possible efficiency
9471 improvements. This just isn't important after all these years.
9473 * uintp.ads: Minor cleanup.
9475 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9477 * exp_util.adb, exp_util.ads, sem_ch7.adb, sem_prag.adb, exp_ch3.adb:
9478 Revert previous changes.
9479 * scng.adb: Minor reformatting.
9480 * s-stratt.ads: Fix unbalanced parens in comment.
9482 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9484 * sem_ch3.adb, exp_util.adb, sem_prag.adb, freeze.adb, sem_util.adb:
9487 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9489 * scng.adb (Scan): Handle '@' appropriately.
9490 * sem_ch5.adb: Code cleanup.
9492 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9494 * freeze.adb (Check_Expression_Function): Do not check for the
9495 use of deferred constants if the freezing of the expression
9496 function is triggered by its generated body, rather than a
9499 2017-04-25 Javier Miranda <miranda@adacore.com>
9501 * exp_attr.adb (Rewrite_Stream_Proc_Call): Handle
9502 subtypes of private types when performing the view conversion.
9504 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9506 * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
9507 the purposes of freezing.
9508 * exp_util.adb Update the documentation and structure of the
9509 type map used in class-wide semantics of assertion expressions.
9510 (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
9511 and resolve the triaged expression because all substitutions
9512 refer to the proper entities. Update the replacement of
9514 (Build_DIC_Procedure_Body): Add formal parameter
9515 For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
9516 are now only processed when freezing occurs. Build a body only
9518 (Entity_Hash): Removed.
9519 (Map_Types): New routine.
9520 (Replace_Object_And_Primitive_References): Removed.
9521 (Replace_References): New routine.
9522 (Replace_Type_References): Moved to the library level of Exp_Util.
9523 (Type_Map_Hash): New routine.
9524 (Update_Primitives_Mapping): Update the mapping call.
9525 (Update_Primitives_Mapping_Of_Types): Removed.
9526 * exp_util.ads (Build_DIC_Procedure_Body): Add formal
9527 parameter For_Freeze and update the comment on usage.
9528 (Map_Types): New routine.
9529 (Replace_References): New routine.
9530 (Replace_Type_References): Moved to the library level of Exp_Util.
9531 (Update_Primitives_Mapping_Of_Types): Removed.
9532 * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
9533 properties of the private type to the full view in case the full
9534 view derives from a parent type and inherits a DIC pragma.
9535 * sem_prag.adb (Analyze_Pragma): Guard against a case where a
9536 DIC pragma is placed at the top of a declarative region.
9538 2017-04-25 Tristan Gingold <gingold@adacore.com>
9540 * s-mmap.ads (Data): Add pragma Inline.
9542 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
9544 * checks.adb (Insert_Valid_Check): Do not use
9545 a renaming to alias a volatile name because this will lead to
9546 multiple evaluations of the volatile name. Use a constant to
9547 capture the value instead.
9549 2017-04-25 Doug Rupp <rupp@adacore.com>
9551 * init.c [VxWorks Section]: Disable sigtramp for ppc64-vx7.
9553 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9555 * exp_util.adb, exp_util.ads (Build_Class_Wide_Expression):
9556 Add out parameter to indicate to caller that a wrapper must
9557 be constructed for an inherited primitive whose inherited
9558 pre/postcondition has called to overridden primitives.
9559 * freeze.adb (Check_Inherited_Conditions): Build wrapper body
9560 for inherited primitive that requires it.
9561 * sem_disp.adb (Check_Dispatching_Operation): Such wrappers are
9562 legal primitive operations and belong to the list of bodies
9563 generated after the freeze point of a type.
9564 * sem_prag.adb (Build_Pragma_Check_Equivalent): Use new signature
9565 of Build_Class_Wide_Expression.
9566 * sem_util.adb, sem_util.ads (Build_Overriding_Spec): New procedure
9567 to construct the specification of the wrapper subprogram created
9568 for an inherited operation.
9570 2017-04-25 Bob Duff <duff@adacore.com>
9572 * s-osinte-linux.ads (pthread_mutexattr_setprotocol,
9573 pthread_mutexattr_setprioceiling): Add new interfaces for these
9575 * s-taprop-linux.adb (Initialize_Lock, Initialize_TCB): Set
9576 protocols as appropriate for Locking_Policy 'C' and 'I'.
9577 * s-taprop-posix.adb: Minor reformatting to make it more similar
9578 to s-taprop-linux.adb.
9580 2017-04-25 Ed Schonberg <schonberg@adacore.com>
9582 * sem_ch3.adb (Get_Discriminant_Value, Search_Derivation_Levels):
9583 Handle properly a multi- level derivation involving both renamed
9584 and constrained parent discriminants, when the type to be
9585 constrained has fewer discriminants that the ultimate ancestor.
9587 2017-04-25 Bob Duff <duff@adacore.com>
9589 * sem_util.adb (Is_Object_Reference): In the
9590 case of N_Explicit_Dereference, return False if it came from a
9591 conditional expression.
9593 2017-04-25 Bob Duff <duff@adacore.com>
9595 * par-ch4.adb (P_Case_Expression): If a semicolon
9596 is followed by "when", assume that ";" was meant to be ",".
9598 2017-04-25 Gary Dismukes <dismukes@adacore.com>
9600 * sem_ch9.adb, sem_ch10.adb, sem_util.adb: Minor reformatting and typo
9603 2017-04-25 Arnaud Charlet <charlet@adacore.com>
9605 * rtsfind.ads (SPARK_Implicit_Load): New procedure for forced
9606 loading of an entity.
9607 * rtsfind.adb (SPARK_Implicit_Load): Body with a pattern
9608 previously repeated in the analysis.
9609 * sem_ch9.adb (Analyze_Protected_Type_Declaration): use new
9610 procedure SPARK_Implicit_Load. (Analyze_Task_Type_Declaration):
9611 use new procedure SPARK_Implicit_Load.
9612 * sem_ch10.adb (Analyze_Compilation_Unit): Use new procedure
9613 SPARK_Implicit_Load.
9615 2017-04-25 Javier Miranda <miranda@adacore.com>
9617 * sem_util.adb (New_Copy_Tree): By default
9618 copying of defining identifiers is prohibited because
9619 this would introduce an entirely new entity into the
9620 tree. This patch introduces an exception to this general
9621 rule: the declaration of constants and variables located in
9622 Expression_With_Action nodes.
9623 (Copy_Itype_With_Replacement): Renamed as Copy_Entity_With_Replacement.
9624 (In_Map): New subprogram.
9625 (Visit_Entity): New subprogram.
9626 (Visit_Node): Handle EWA_Level,
9627 EWA_Inner_Scope_Level, and take care of defining entities defined
9628 in Expression_With_Action nodes.
9630 2017-04-25 Thomas Quinot <quinot@adacore.com>
9632 * exp_ch6.adb: minor comment edit.
9633 * sinfo.ads, sinfo.adb: New Null_Statement attribute for null
9634 procedure specifications that come from source.
9635 * par-ch6.adb (P_Subprogram, case of a null procedure): Set new
9636 Null_Statement attribute.
9637 * par_sco.adb (Traverse_Declarations_Or_Statements): For a null
9638 procedure, generate statement SCO for the generated NULL statement.
9639 * sem_ch6.adb (Analyze_Null_Procedure): Use null statement from
9640 parser, if available.
9642 2017-04-04 Andreas Krebbel <krebbel@linux.vnet.ibm.com>
9644 * system-linux-s390.ads: Use Long_Integer'Size to define
9647 2017-04-04 Eric Botcazou <ebotcazou@adacore.com>
9649 * sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
9651 2017-04-03 Jonathan Wakely <jwakely@redhat.com>
9653 * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo.
9654 * g-socket.adb (To_Host_Entry): Fix typo in comment.
9655 * gnat_ugn.texi: Fix typo.
9656 * raise.c (_gnat_builtin_longjmp): Fix capitalization in comment.
9657 * s-stposu.adb (Allocate_Any_Controlled): Fix typo in comment.
9658 * sem_ch3.adb (Build_Derived_Record_Type): Likewise.
9659 * sem_util.adb (Mark_Coextensions): Likewise.
9660 * sem_util.ads (Available_Full_View_Of_Component): Likewise.
9662 2017-03-28 Andreas Schwab <schwab@suse.de>
9665 * system-linux-aarch64-ilp32.ads: New file.
9666 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
9667 from LIBGNAT_TARGET_PAIRS.
9668 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
9669 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
9670 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
9671 or -mabi=ilp32, resp.
9673 2017-03-14 James Cowgill <James.Cowgill@imgtec.com>
9675 * s-osinte-linux.ads (struct_sigaction): Use correct type for sa_flags.
9677 2017-03-08 Thanassis Tsiodras <ttsiodras@gmail.com>
9680 * socket.c (__gnat_gethostbyaddr): Add missing test for __rtems__.
9682 2017-03-08 Eric Botcazou <ebotcazou@adacore.com>
9685 * system-linux-ppc.ads (Default_Bit_Order): Use Standard's setting.
9687 * system-linux-arm.ads (Default_Bit_Order): Likewise.
9688 * system-linux-mips.ads (Default_Bit_Order): Likewise.
9689 * system-linux-armeb.ads: Delete.
9690 * system-linux-mipsel.ads: Likewise.
9691 * gcc-interface/Makefile.in (MIPS/Linux): Adjust.
9692 (ARM/Linux): Likewise.
9694 2017-02-24 Jakub Jelinek <jakub@redhat.com>
9697 * gcc-interface/misc.c (gnat_handle_option): Pass true to
9698 handle_generated_option GENERATED_P.
9700 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9702 * gcc-interface/decl.c (gnat_to_gnu_field): Do not remove the wrapper
9703 around a justified modular type if it doesn't have the same scalar
9704 storage order as the enclosing record type.
9706 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9708 * gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
9709 of boolean rvalues to function calls.
9711 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9713 * gcc-interface/utils.c (fold_bit_position): New function.
9714 (rest_of_record_type_compilation): Call it instead of bit_position to
9715 compute the field position and remove the call to remove_conversions.
9716 (compute_related_constant): Factor out the multiplication in both
9717 operands, if any, and streamline the final test.
9719 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9721 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Add sanity check.
9723 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9725 * gcc-interface/decl.c: Include demangle.h.
9726 (is_cplusplus_method): Return again true for a primitive operation
9727 only if it is dispatching. For a subprogram with an interface name,
9728 call the demangler to get the number of C++ parameters and compare it
9729 with the number of Ada parameters.
9731 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9733 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu): If
9734 there is no end label, put the location of the At_End procedure on
9735 the call to the procedure.
9737 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9739 * gcc-interface/misc.c (gnat_type_max_size): Try to return a meaningful
9740 value for array types with TYPE_INDEX_TYPE set on their domain type.
9741 * gcc-interface/utils.c (max_size): For operations and expressions, do
9742 not build a new node if the operands have not changed or are missing.
9744 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
9746 * gcc-interface/utils.c (max_size) <tcc_expression>: Flip the second
9747 argument when recursing on TRUTH_NOT_EXPR.
9749 2017-02-12 John Marino <gnugcc@marino.st>
9751 * system-freebsd-x86.ads: Rename into...
9752 * system-freebsd.ads: ...this.
9753 (Default_Bit_Order): Define using Standard'Default_Bit_Order.
9754 * gcc-interface/Makefile.in: Support aarch64-freebsd.
9755 (x86-64/FreeBSD): Adjust to above renaming.
9756 (i386/FreeBSD): Likewise.
9758 2017-02-09 Gerald Pfeifer <gerald@pfeifer.com>
9760 * comperr.adb: Update FSF bug reporting URL.
9762 2017-02-01 Eric Botcazou <ebotcazou@adacore.com>
9763 Jakub Jelinek <jakub@redhat.com>
9766 * adaint.c (__gnat_killprocesstree): Fix broken string handling.
9768 2017-01-25 Maxim Ostapenko <m.ostapenko@samsung.com>
9771 * gcc-interface/utils.c (get_global_context): Pass main_input_filename
9772 to build_translation_unit_decl.
9774 2017-01-23 Javier Miranda <miranda@adacore.com>
9776 * sem_util.adb (New_Copy_Tree): Code cleanup:
9777 removal of the internal map (ie. variable Actual_Map, its
9778 associated local variables, and all the code handling it).
9779 * sem_ch9.adb (Analyze_Task_Type_Declaration): in GNATprove mode
9780 force loading of the System package when processing a task type.
9781 (Analyze_Protected_Type_Declaration): in GNATprove mode force
9782 loading of the System package when processing a protected type.
9783 * sem_ch10.adb (Analyze_Compilation_Unit): in GNATprove mode
9784 force loading of the System package when processing compilation
9785 unit with a main-like subprogram.
9786 * frontend.adb (Frontend): remove forced loading of the System
9789 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9791 * sem_prag.adb (Default_Initial_Condition): If the desired type
9792 declaration is a derived type declaration with discriminants,
9793 it is rewritten as a private type declaration.
9794 * sem_ch13.adb (Replace_Type_References_Generic,
9795 Visible_Component): A discriminated private type with descriminnts
9796 has components that must be rewritten as selected components
9797 if they appear as identifiers in an aspect expression such as
9798 a Default_Initial_Condition.
9799 * sem_util.adb (Defining_Entity): support N_Iterator_Specification
9802 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9804 * ghost.ads, ghost.adb (Is_Ignored_Ghost_Unit): New routine.
9805 * gnat1drv.adb Generate an empty object file for an ignored
9806 Ghost compilation unit.
9807 * inline.adb, sem_util.adb, sem_ch4.adb: Minor reformatting.
9809 2017-01-23 Yannick Moy <moy@adacore.com>
9811 * sem_ch4.adb (Analyze_Indexed_Component_Form):
9812 Adapt to inlined prefix with string literal subtype.
9813 * inline.adb (Expand_Inlined_Call): Keep unchecked
9814 conversion inside inlined call when formal type is constrained.
9816 2017-01-23 Javier Miranda <miranda@adacore.com>
9818 * sem_util.adb (New_Copy_Tree): Code cleanup:
9819 removal of global variables. All the global variables, global
9820 functions and tables of this subprogram are now declared locally.
9822 2017-01-23 Gary Dismukes <dismukes@adacore.com>
9824 * exp_strm.ads: Minor reformatting and typo fixes.
9826 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9828 * sem_aggr.adb, par_sco.adb, exp_util.adb, sem.adb, sem_ch4.adb,
9829 exp_aggr.adb: Minor reformatting.
9830 * g-diopit.adb: minor grammar/punctuation fix in comment.
9831 * g-byorma.ads: minor fix of unbalanced parens in comment.
9833 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9835 * par.adb: Update the documentation of component Labl.
9836 * par-ch6.adb (P_Return_Statement): Set the expected label of
9837 an extended return statement to Error.
9839 2017-01-23 Tristan Gingold <gingold@adacore.com>
9841 * s-boustr.ads, s-boustr.adb (Is_Full): New function.
9843 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9845 * expander.adb: Handle N_Delta_Aggregate.
9847 2017-01-23 Javier Miranda <miranda@adacore.com>
9849 * exp_ch6.adb (Expand_Call): Improve the code that
9850 checks if some formal of the called subprogram is a class-wide
9851 interface, to handle subtypes of class-wide interfaces.
9853 2017-01-23 Javier Miranda <miranda@adacore.com>
9855 * checks.adb (Apply_Parameter_Aliasing_Checks):
9856 Remove side effects of the actuals before generating the overlap
9859 2017-01-23 Justin Squirek <squirek@adacore.com>
9861 * exp_strm.ads, exp_strm.ads
9862 (Build_Record_Or_Elementary_Input_Function): Add an extra parameter so
9863 as to avoid getting the underlying type by default.
9864 * exp_attr.adb (Expand_N_Attribute_Reference): Remove use of
9865 underlying type in the Iiput and output attribute cases when
9866 building their respective functions.
9868 2017-01-23 Gary Dismukes <dismukes@adacore.com>
9870 * scng.adb: Minor reformatting of error message.
9872 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9874 * sem_ch6.adb (Analyze_Expression_Function): Do not attempt
9875 to freeze the return type of an expression funxtion that is a
9876 completion, if the type is a limited view and the non-limited
9879 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9881 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): Recognize delta
9882 aggregate construct.
9883 (P_Record_Or_Array_Component_Association): An array aggregate
9884 can start with an Iterated_Component_Association.
9885 * scng.adb: Modify error message on improper use of @ in earlier
9886 versions of the language.
9887 * sinfo.ads: New node kind N_Delta_Aggregate.
9888 * sinfo.adb: An N_Delta_Aggregate has component associations and
9890 * sem_res.adb (Resolve): Call Resolve_Delta_Aggregate.
9891 * sem_aggr.ads, sem_aggr.adb (Resolve_Iterated_Component_Association):
9892 Create a new index for each one of the choices in the association,
9893 to prevent spurious homonyms in the scope.
9894 (Resolve_Delta_Aggregate): New.
9895 * sem.adb: An N_Delta_Aggregate is analyzed like an aggregate.
9896 * exp_util.adb (Insert_Actions): Take into account
9898 * exp_aggr.ads: New procedure Expand_N_Delta_Aggregate.
9899 * exp_aggr.adb: New procedure Expand_N_Delta_Aggregate,
9900 and local procedures Expand_Delta_Array_Aggregate and
9901 expand_Delta_Record_Aggregate.
9902 * sprint.adb: Handle N_Delta_Aggregate.
9904 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9906 * exp_ch11.adb (Expand_N_Exception_Declaration): Generate an
9907 empty name when the exception declaration is subject to pragma
9909 (Null_String): New routine.
9911 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9913 * par-ch9.adb (P_Protected_Definition): Parse
9914 any optional and potentially illegal pragmas which appear in
9915 a protected operation declaration list.
9916 (P_Task_Items): Parse
9917 any optional and potentially illegal pragmas which appear in a
9920 2017-01-23 Pascal Obry <obry@adacore.com>
9922 * s-taprop-mingw.adb (Enter_Task): Initialize the Thread handle which
9923 is needed when a foreign thread call a Win32 API using a thread handle
9924 like GetThreadTimes() for example.
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 Hristian Kirtchev <kirtchev@adacore.com>
9949 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
9950 allow an 'Address clause to be specified on a prefix of a
9953 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
9955 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
9956 attribute 'Valid is a renaming of the original expression when
9957 the expression denotes a name. For all other kinds of expression,
9958 use a constant to capture the value.
9959 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
9960 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
9962 2017-01-23 Justin Squirek <squirek@adacore.com>
9964 * sem_eval.adb (Eval_Integer_Literal): Add special
9965 case to avoid optimizing out check if the literal appears in
9968 2017-01-23 Ed Schonberg <schonberg@adacore.com>
9970 * sem_ch4.adb (Try_Primitive_Operations,
9971 Is_Valid_First_Argument_Of): argument is valid if it is a derived
9972 type with unknown discriminants that matches its underlying
9974 * exp_util.adb (Expand_Subtype_From_Expr): Do not expand
9975 expression if its type is derived from a limited type with
9976 unknown discriminants, because the expansion (which is a call)
9977 must be expanded in the enclosing context to add the proper build-
9978 in-place parameters to the call.
9979 * lib.ads, exp_ch9.adb: Minor fixes in comments.
9981 2017-01-23 Yannick Moy <moy@adacore.com>
9983 * frontend.adb (Frontend): Do not load runtime
9984 unit for GNATprove when parsing failed.
9985 * exp_ch9.adb: minor removal of extra whitespace
9986 * exp_ch6.adb: minor typo in comment
9987 * sem_util.adb: Code cleanup.
9988 * exp_ch9.ads, par-ch2.adb: minor style fixes in whitespace and comment
9989 * a-ngcefu.adb: minor style fix in whitespace
9991 2017-01-23 Thomas Quinot <quinot@adacore.com>
9993 * scos.ads: Document usage of 'd' as default SCO kind for
9995 * par_sco.adb (Traverse_Declarations_Or_Statements.
9996 Traverse_Degenerate_Subprogram): New supporting routine for expression
9997 functions and null procedures.
9998 (Traverse_Declarations_Or_Statements.Traverse_One): Add
9999 N_Expression_Function to the subprogram case; add required
10000 support for null procedures and expression functions.
10002 2017-01-23 Bob Duff <duff@adacore.com>
10004 * namet.ads (Bounded_String): Decrease the size of type
10005 Bounded_String to avoid running out of stack space.
10006 * namet.ads (Append): Don't ignore buffer overflow; raise
10007 Program_Error instead.
10009 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10011 * exp_ch5.adb, freeze.adb, par-ch4.adb, scng.adb, sem_ch13.adb,
10012 sem_ch3.adb, sem_ch5.adb, sem_ch5.ads, sem_util.adb, sinfo.ads: Minor
10014 * exp_ch9.adb: minor style fix in comment.
10016 2017-01-23 Ed Schonberg <schonberg@adacore.com>
10018 * sem_ch4.adb (Analyze_Allocator): Handle properly a type derived
10019 for a limited record extension with unknown discriminants whose
10020 full view has no discriminants.
10022 2017-01-23 Yannick Moy <moy@adacore.com>
10024 * exp_spark.adb: Alphabetize with clauses.
10026 2017-01-23 Yannick Moy <moy@adacore.com>
10028 * sem_util.adb (Has_Enabled_Property): Treat
10029 protected objects and variables differently from other variables.
10031 2017-01-23 Thomas Quinot <quinot@adacore.com>
10033 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
10034 Split original Ada 95 part off into new subprogram
10035 below. Call that subprogram (instead of proceeding with
10036 AI95-0133 behaviour) if debug switch -gnatd.p is in use.
10037 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): ... new subprogram
10038 * debug.adb Document new switch -gnatd.p
10039 * freeze.adb (Freeze_Entity.Freeze_Record_Type): Do not adjust
10040 record for reverse bit order if an error has already been posted
10041 on the record type. This avoids generating extraneous "info:"
10042 messages for illegal code.
10044 2017-01-23 Justin Squirek <squirek@adacore.com>
10046 * sem_ch3.adb (Analyze_Declarations): Correct comments
10047 * freeze.adb (Find_Constant): Add detection of deferred constants
10048 so they are not incorrectly flagged as premature.
10050 2017-01-23 Ed Schonberg <schonberg@adacore.com>
10052 * scans.ads: New token At_Sign. Remove '@' from list of illegal
10053 characters for future version of the language. '@' is legal name.
10054 * scng.ads, scng.adb (Scan): Handle '@' appropriately.
10055 * scn.adb (Scan_Reserved_Identifier): An occurrence of '@'
10056 denotes a Target_Name.
10057 * par-ch4.adb (P_Name, P_Primary): Handle Target_Name.
10058 * sinfo.ads, sinfo.adb (N_Target_Name): New non-terminal node.
10059 (Has_Target_Names): New flag on N_Assignment_Statement, to
10060 indicate that RHS has occurrences of N_Target_Name.
10061 * sem.adb: Call Analyze_Target_Name.
10062 * sem_ch5.ads, sem_ch5.adb (Analyze_Target_Name): New subpogram.
10063 (urrent_LHS): Global variable that denotes LHS of assignment,
10064 used in the analysis of Target_Name nodes.
10065 * sem_res.adb (Resolve_Target_Name): New procedure.
10066 * exp_ch5.adb (Expand_Assign_With_Target_Names): (AI12-0125):
10067 N is an assignment statement whose RHS contains occurences of @
10068 that designate the value of the LHS of the assignment. If the
10069 LHS is side-effect free the target names can be replaced with
10070 a copy of the LHS; otherwise the semantics of the assignment
10071 is described in terms of a procedure with an in-out parameter,
10072 and expanded as such.
10073 (Expand_N_Assignment_Statement): Call
10074 Expand_Assign_With_Target_Names when needed.
10075 * exp_util.adb (Insert_Actions): Take into account N_Target_Name.
10076 * sprint.adb: Handle N_Target_Name.
10078 2017-01-23 Eric Botcazou <ebotcazou@adacore.com>
10080 * checks.adb: Minor fix in comment.
10082 2017-01-23 Philippe Gil <gil@adacore.com>
10084 * g-debpoo.adb (Do_Report) remove freed chunks from chunks
10085 count in Sort = Memory_Usage or Allocations_Count
10087 2017-01-23 Justin Squirek <squirek@adacore.com>
10089 * sem_ch3.adb: Code cleanup.
10091 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10093 * sem_prag.adb (Analyze_Refined_Depends_In_Decl_Part): Move all global
10094 variables to the local variable section. Update the profile
10095 of various nested routine that previously had visibility
10096 of those globals. One the matching phase has completed,
10097 remove certain classes of clauses which are considered noise.
10098 (Check_Dependency_Clause): Properly detect a match between two
10099 'Result attributes. Update the various post-match cases to use
10100 Is_Already_Matched as this routine now automatically recognizes
10101 a previously matched 'Result attribute.
10102 (Is_Already_Matched): New routine.
10103 (Remove_Extra_Clauses): New routine.
10104 (Report_Extra_Clauses): Remove the detection of ... => null
10105 clauses as this is now done in Remove_Extra_Clauses.
10107 2017-01-23 Ed Schonberg <schonberg@adacore.com>
10109 * sem_aggr.adb (Resolve_Array_Aggregate): In ASIS mode do not
10110 report on spurious overlaps between values involving a subtype
10111 with a static predicate, because the expansion of such a subtype
10112 into individual ranges in inhibited in ASIS mode.
10114 2017-01-23 Justin Squirek <squirek@adacore.com>
10116 * sem_ch3.adb (Analyze_Declarations): Add detection
10117 of an edge case and delay freezing if it is present.
10119 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10121 * sem_ch3.adb, exp_spark.adb, exp_attr.adb, sem_ch9.adb, sem_prag.adb,
10122 sem_util.adb, sem_warn.adb, exp_ch3.adb: Minor reformatting.
10124 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10126 * freeze.adb (Freeze_Subprogram): Ensure that all anonymous
10127 access-to-subprogram types inherit the convention of the
10128 associated subprogram. (Set_Profile_Convention): New routine.
10129 * sem_ch6.adb (Check_Conformance): Do not compare the conventions
10130 of the two entities directly, use Conventions_Match to account
10131 for anonymous access-to-subprogram and subprogram types.
10132 (Conventions_Match): New routine.
10134 2017-01-23 Claire Dross <dross@adacore.com>
10136 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For attributes
10137 which return Universal_Integer, force the overflow check flag for
10138 Length and Range_Length for types as big as Long_Long_Integer.
10140 2017-01-23 Claire Dross <dross@adacore.com>
10142 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For
10143 attributes which return Universal_Integer, introduce a conversion
10144 to the expected type with the appropriate check flags set.
10145 * sem_res.adb (Resolve_Range): The higher bound can be in Typ's
10146 base type if the range is null. It may still be invalid if it
10147 is higher than the lower bound. This is checked later in the
10148 context in which the range appears.
10150 2017-01-23 Pierre-Marie de Rodat <derodat@adacore.com>
10152 * scos.ads: Introduce a constant to represent ignored
10153 dependencies in SCO_Unit_Table_Entry.
10155 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
10157 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Remove extra
10158 spaces from error messages.
10160 2017-01-23 Ed Schonberg <schonberg@adacore.com>
10162 * exp_ch3.adb (Check_Large_Modular_Array): New procedure,
10163 subsidiary to Expand_N_Object_ Declaration, to compute a guard on
10164 an object declaration for an array type with a modular index type
10165 with the size of Long_Long_Integer. Special processing is needed
10166 in this case to compute reliably the size of the object, and
10167 eventually to raise Storage_Error, when wrap-around arithmetic
10168 might compute a meangingless size for the object.
10170 2017-01-23 Justin Squirek <squirek@adacore.com>
10172 * a-wtenau.adb, par-endh.adb, sem_prag.adb,
10173 sem_type.adb: Code cleanups.
10175 2017-01-23 Bob Duff <duff@adacore.com>
10177 * sem_res.adb (Resolve_Call): In the part of the code where
10178 it is deciding whether to turn the call into an indexed
10179 component, avoid doing so if the call is to an instance of
10180 Unchecked_Conversion. Otherwise, the compiler turns it into an
10181 indexed component, and resolution of that turns it back into a
10182 function call, and so on, resulting in infinite recursion.
10183 * sem_util.adb (Needs_One_Actual): If the first formal has a
10184 default, then return False.
10186 2017-01-21 Eric Botcazou <ebotcazou@adacore.com>
10188 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal (etc)
10189 optimizations when the type is modular and the offsets are equal.
10191 2017-01-20 Thomas Quinot <quinot@adacore.com>
10193 * sem_warn.adb (Warn_On_Useless_Assignment): Adjust wording of warning
10196 2017-01-20 Nicolas Roche <roche@adacore.com>
10198 * terminals.c: Ignore failures on setpgid and tcsetpgrp commands.
10200 2017-01-20 Bob Duff <duff@adacore.com>
10202 * sem_eval.adb (Compile_Time_Compare): Disable the expr+literal
10203 (etc) optimizations when the type is modular.
10205 2017-01-20 Yannick Moy <moy@adacore.com>
10207 * sem_ch6.adb (Move_Pragmas): move some pragmas,
10208 but copy the SPARK_Mode pragma instead of moving it.
10209 (Build_Subprogram_Declaration): Ensure that the generated spec
10210 and original body share the same SPARK_Pragma aspect/pragma.
10211 * sem_util.adb, sem_util.ads (Copy_SPARK_Mode_Aspect): New
10212 procedure to copy SPARK_Mode aspect.
10214 2017-01-20 Bob Duff <duff@adacore.com>
10216 * sem_ch3.adb (Analyze_Declarations): Disable Resolve_Aspects
10218 * sem_ch13.adb (Resolve_Name): Enable setting the entity to
10219 Empty even in ASIS mode.
10221 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10223 * exp_ch9.adb: minor style fixes in comments.
10224 * sem_ch9.adb (Analyze_Delay_Relative): in GNATprove mode a delay
10225 relative statement introduces an implicit dependency on
10226 Ada.Real_Time.Clock_Time.
10227 * sem_util.adb: Minor reformatting.
10229 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10231 * sem_ch13.adb (Analyze_Aspect_Specifications): Aspect Alignment
10232 must be treated as delayed aspect even if the expression is
10233 a literal, because the aspect affects the freezing and the
10234 elaboration of the object to which it applies.
10236 2017-01-20 Tristan Gingold <gingold@adacore.com>
10238 * s-osinte-vxworks.ads (Interrup_Range): New subtype.
10240 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10242 * lib-xref.adb (Generate_Reference): Do not warn about the
10243 presence of a pragma Unreferenced if the entity appears as the
10244 actual in a procedure call that does not come from source.
10246 2017-01-20 Pascal Obry <obry@adacore.com>
10248 * expect.c, terminals.c: Fix some warnings about unused variables.
10249 * gsocket.h, adaint.c, adaint.h: Fix some more warnings in the C part
10252 2017-01-20 Bob Duff <duff@adacore.com>
10254 * exp_attr.adb (Constrained): Apply an access check (check that
10255 the prefix is not null) when the prefix denotes an object of an
10256 access type; that is, when there is an implicit dereference.
10258 2017-01-20 Gary Dismukes <dismukes@adacore.com>
10260 * s-rident.ads (constant Profile_Info): Remove
10261 No_Calendar from GNAT_Extended_Ravenscar restrictions.
10263 2017-01-20 Tristan Gingold <gingold@adacore.com>
10265 * s-maccod.ads: Add pragma No_Elaboration_Code_All
10267 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10269 * ghost.adb (Mark_Ghost_Clause): New routine.
10270 (Prune_Node): Do not prune compilation unit nodes.
10271 (Remove_Ignored_Ghost_Code): Prune the compilation unit node directly.
10272 This does not touch the node itself, but does prune all its fields.
10273 * ghost.ads (Mark_Ghost_Clause): New routine.
10274 * sem_ch8.adb (Analyze_Use_Package): Emit an error when a use
10275 package clause mentions Ghost and non-Ghost packages. Mark a
10276 use package clause as Ghost when it mentions a Ghost package.
10277 (Analyze_Use_Type): Emit an error when a use type clause mentions
10278 Ghost and non-Ghost types. Mark a use type clause as Ghost when
10279 it mentions a Ghost type.
10280 * sem_ch10.adb (Analyze_With_Clause): Mark a with clause as
10281 Ghost when it withs a Ghost unit.
10283 2017-01-20 Javier Miranda <miranda@adacore.com>
10285 * sem_res.adb (Resolve_Call): If a function call
10286 returns a limited view of a type and at the point of the call the
10287 function is not declared in the extended main unit then replace
10288 it with the non-limited view, which must be available. If the
10289 called function is in the extended main unit then no action is
10290 needed since the back-end handles this case.
10292 2017-01-20 Eric Botcazou <ebotcazou@adacore.com>
10294 * sem_ch7.adb (Contains_Subp_Or_Const_Refs): Rename into...
10295 (Contains_Subprograms_Refs): ...this. Adjust comment
10296 for constants. (Is_Subp_Or_Const_Ref): Rename into...
10297 (Is_Subprogram_Ref): ...this.
10298 (Has_Referencer): Rename Has_Non_Subp_Const_Referencer variable into
10299 Has_Non_Subprograms_Referencer and adjust comment. Remove
10300 incorrect shortcut for package declarations and bodies.
10302 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10304 * sem_ch3.adb (Complete_Private_Subtype): If the scope of the
10305 base type differs from that of the completion and the private
10306 subtype is an itype (created for a constraint on an access
10307 type e.g.), set Delayed_Freeze on both to prevent out-of-scope
10310 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10312 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
10313 When inheriting the SPARK_Mode of a prior expression function,
10314 look at the properly resolved entity rather than the initial
10315 candidate which may denote a homonym.
10317 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10319 * sem_prag.adb (Rewrite_Assertion_Kind): If the name is
10320 Precondition or Postcondition, and the context is pragma
10321 Check_Policy, indicate that this Pre-Ada2012 usage is deprecated
10322 and suggest the standard names Assertion_Policy /Pre /Post
10325 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10327 * sem_ch10.adb, sem_cat.adb: Minor reformatting.
10329 2017-01-20 Javier Miranda <miranda@adacore.com>
10331 * sem_ch3.adb (Access_Type_Declaration): Protect access to the
10333 * sem_ch10.adb (Install_Siblings): Skip processing malformed trees.
10334 * sem_cat.adb (Validate_Categoriztion_Dependency): Skip processing
10337 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10339 * sem_ch13.adb (Analyze_Aspect_Specification, case
10340 Dynamic_Predicate): If the entity E is a subtype that inherits
10341 a static predicate for its parent P,, the inherited and the
10342 new predicate combine in the generated predicate function,
10343 and E only has a dynamic predicate.
10345 2017-01-20 Tristan Gingold <gingold@adacore.com>
10347 * s-boustr.ads, s-boustr.adb: New package.
10348 * Makefile.rtl: Add s-boustr.
10350 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10352 * inline.adb (Process_Formals): Qualify the
10353 expression of a return statement when it yields a universal type.
10355 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10357 * freeze.adb (Freeze_All): Freeze the default
10358 expressions of all eligible formal parameters that appear in
10359 entries, entry families, and protected subprograms.
10361 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10363 * sem_ch3.adb (Check_Nonoverridable_Aspects); Refine check
10364 for illegal inherited Implicit_Dereference aspects with renamed
10367 2017-01-20 Javier Miranda <miranda@adacore.com>
10369 * debug.adb (switch d.6): do not avoid declaring unreferenced itypes.
10370 * nlists.ads (Lock_Lists, Unlock_Lists): New subprograms.
10371 * nlists.adb (Lock_Lists, Unlock_Lists): New subprograms.
10372 (Set_First, Set_Last, Set_List_Link, Set_Next, Set_Parent,
10373 Set_Prev, Tree_Read): Adding assertion.
10374 * atree.ads (Lock_Nodes, Unlock_Nodes): New subprograms.
10375 * atree.adb (Lock_Nodes, Unlock_Nodes): New subprograms.
10376 (Set_Analyzed, Set_Check_Actuals, Set_Comes_From_Source,
10377 Set_Ekind, Set_Error_Posted, Set_Has_Aspects,
10378 Set_Is_Ignored_Ghost_Node, Set_Original_Node, Set_Paren_Count,
10379 Set_Parent, Set_Sloc, Set_Nkind, Set_FieldNN, Set_NodeNN,
10380 Set_ListNN, Set_ElistNN, Set_NameN, Set_StrN, Set_UintNN,
10381 Set_UrealNN, Set_FlagNNN, Set_NodeN_With_Parent,
10382 Set_ListN_With_Parent): Adding assertion.
10384 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10386 * sem_prag.adb (Process_Convention): Diagnose properly a pragma
10387 import that applies to several homograph subprograms. when one
10388 of them is declared by a subprogram body.
10390 2017-01-20 Justin Squirek <squirek@adacore.com>
10392 * exp_ch6.adb (Expand_Call): Remove optimization
10393 that nulls out calls to null procedures.
10395 2017-01-20 Yannick Moy <moy@adacore.com>
10397 * inline.adb (Expand_Inlined_Call): Keep more
10398 precise type of actual for inlining whenever possible. In
10399 particular, do not switch to the formal type in GNATprove mode in
10400 some case where the GNAT backend might require it for visibility.
10402 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10404 * sem_ch3.adb (Check_Non_Overridable_Aspects): An inherited
10405 aspect Implicit_Dereference can be inherited by a full view if
10406 the partial view has no discriminants, because there is no way
10407 to apply the aspect to the partial view.
10408 (Build_Derived_Record_Type): If derived type renames discriminants
10409 of the parent, the new discriminant inherits the aspect from
10411 * sem_ch4.adb (Analyze_Call): Handle properly a parameterless
10412 call through an access discriminant designating a subprogram.
10413 * sem_ch5.adb (Analyze_Assignment): (Analyze_Call): Handle
10414 properly a parameterless call through an access discriminant on
10415 the left-hand side of an assignment.
10416 * sem_res.adb (resolve): If an interpreation involves a
10417 discriminant with an implicit dereference and the expression is an
10418 entity, resolution takes place later in the appropriate routine.
10419 * sem_ch13.adb (Analyze_Aspect_Implicit_Dereference): Recognize
10420 access discriminants that designate a subprogram type.
10422 2017-01-20 Pascal Obry <obry@adacore.com>
10424 * a-locale.adb, a-locale.ads: Update Ada.Locales for RM 2012 COR:1:2016
10426 2017-01-20 Yannick Moy <moy@adacore.com>
10428 * sem_ch10.adb (Check_No_Elab_Code_All): Do not issue an error
10429 on implicitly with'ed units in GNATprove mode.
10430 * sinfo.ads (Implicit_With): Document use of flag for implicitly
10431 with'ed units in GNATprove mode.
10433 2017-01-20 Ed Schonberg <schonberg@adacore.com>
10435 * sem_cat.adb (Validate_Static_Object_Name): In a preelaborated
10436 unit Do not report an error on a non-static entity that appears
10437 in the context of a spec expression, such as an aspect expression.
10439 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
10441 * einfo.adb: Flag298 now denotes Is_Underlying_Full_View.
10442 (Is_Underlying_Full_View): New routine.
10443 (Set_Is_Underlying_Full_View): New routine.
10444 (Write_Entity_Flags): Add an entry for Is_Underlying_Full_View.
10445 * einfo.ads Add new attribute Is_Underlying_Full_View.
10446 (Is_Underlying_Full_View): New routine along with pragma Inline.
10447 (Set_Is_Underlying_Full_View): New routine along with pragma Inline.
10448 * exp_util.adb (Build_DIC_Procedure_Body): Do not consider
10449 class-wide types and underlying full views. The first subtype
10450 is used as the working type for all Itypes, not just array base types.
10451 (Build_DIC_Procedure_Declaration): Do not consider
10452 class-wide types and underlying full views. The first subtype
10453 is used as the working type for all Itypes, not just array
10455 * freeze.adb (Freeze_Entity): Inherit the freeze node of a full
10456 view or an underlying full view without clobbering the attributes
10457 of a previous freeze node.
10458 (Inherit_Freeze_Node): New routine.
10459 * sem_ch3.adb (Build_Derived_Private_Type): Mark an underlying
10461 (Build_Underlying_Full_View): Mark an underlying full view as such.
10462 * sem_ch7.adb (Install_Private_Declarations): Mark an underlying
10465 2017-01-20 Yannick Moy <moy@adacore.com>
10467 * sinfo.ads: Document lack of Do_Division_Check flag
10468 on float exponentiation.
10470 2017-01-19 Javier Miranda <miranda@adacore.com>
10472 * ghost.adb (Propagate_Ignored_Ghost_Code): Protect access to the
10473 identifier attribute of a block-statement node. Required to avoid
10474 assertion failure when building the new containers library.
10476 2017-01-19 Bob Duff <duff@adacore.com>
10478 * exp_ch3.adb: Update comment.
10480 2017-01-19 Vincent Celier <celier@adacore.com>
10482 * gprep.adb (Gnatprep): Parse the definition file without
10483 "replace in comments" even when switch -C is used.
10485 2017-01-19 Justin Squirek <squirek@adacore.com>
10487 * exp_ch9.adb (Is_Pure_Barrier): Create function
10488 Is_Count_Attribute to identify an expansion of the 'Count
10491 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10493 * sem_ch5.adb (Analyze_Loop_Statement): In GNATprove mode the
10494 statements within an element iterator loop are only analyzed
10495 agter the loop is rewritten. Within a generic the analysis must
10496 be performed in any case to complete name capture.
10498 2017-01-19 Bob Duff <duff@adacore.com>
10500 * sem_prag.adb (Analyze_Pragma): Check for ignored pragmas first,
10501 before checking for unrecognized pragmas.
10502 Initialize Pname on its declarations; that's always good style.
10504 2017-01-19 Claire Dross <dross@adacore.com>
10506 * exp_ch7.adb (Build_Invariant_Procedure_Body): Semi-insert the
10507 body into the tree for GNATprove by setting its Parent field. The
10508 components invariants of composite types are not checked by
10509 the composite type's invariant procedure in GNATprove mode.
10510 (Build_Invariant_Procedure_Declaration): Semi-insert the
10511 declaration into the tree for GNATprove by setting its Parent
10513 * freeze.adb (Freeze_Arry_Type):In GNATprove mode, do not add
10514 the component invariants to the array type invariant procedure
10515 so that the procedure can be used to check the array type
10517 (Freeze_Record_Type): In GNATprove mode, do
10518 not add the component invariants to the record type invariant
10519 procedure so that the procedure can be used to check the record
10520 type invariants if any.
10522 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10524 * lib-xref-spark_specific.adb: Minor reformatting.
10525 * exp_ch7.adb (Add_Parent_Invariants): Do not process array types.
10527 2017-01-19 Javier Miranda <miranda@adacore.com>
10529 * exp_aggr.adb (Pass_Aggregate_To_Back_End): Renamed as
10530 Build_Back_End_Aggregate.
10531 (Generate_Aggregate_For_Derived_Type): Code cleanup.
10532 (Prepend_Stored_Values): Code cleanup.
10534 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10536 * sem_ch6.adb (Analyze_Expression_Function): Check for an
10537 incomplete return type after attempting to freeze it, so that
10538 other freeze actiona are generated in the proper order.
10540 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10542 * sem_aggr.adb (Resolve_Aggregate): If the type is a string
10543 type, ie. a type whose component is a character type, and the
10544 aggregate is positional, do not convert into a string literal
10545 if the index type is not an integer type, because the original
10546 type may be required in an enclosing operation.
10548 2017-01-19 Bob Duff <duff@adacore.com>
10550 * binde.adb, debug.adb: Enable new elaboration order algorithm
10551 by default. -dp switch reverts to the old algorithm.
10553 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10555 * sem_ch3.adb Add with and use clauses for Exp_Ch7.
10556 (Analyze_Declarations): Create the DIC and Invariant
10557 procedure bodies s after all freezing has taken place.
10558 (Build_Assertion_Bodies): New routine.
10559 * sem_ch7.adb Remove the with and use clauses for Exp_Ch7
10561 (Analyze_Package_Specification): Remove the
10562 generation of the DIC and Invariant procedure bodies. This is
10563 now done by Analyze_Declarations.
10564 * sem_disp.adb (Check_Dispatching_Operation): DIC and Invariant
10565 procedures are never treated as primitives.
10567 2017-01-19 Yannick Moy <moy@adacore.com>
10569 * frontend.adb: Analyze inlined bodies and check elaboration
10570 rules in GNATprove mode too.
10571 * sem_elab.adb (Delay_Element): Add Boolean component to save
10572 indication that call is in SPARK code. (Check_Elab_Calls):
10573 Check elaboration rules in GNATprove mode, and correctly set
10574 the current value of SPARK_Mode.
10575 * lib-xref-spark_specific.adb
10576 (Add_SPARK_Xrefs): Simplify iteration over dereferences.
10578 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10580 * exp_ch4.adb (Expand_Concatenate): Do no enable overflow
10581 checks on the expression for the high bound of concatenation
10582 when checks are disabled, to suppress warnings about potential
10583 constraint errors in restricted runtimes.
10585 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10587 * exp_ch3.adb (Expand_Freeze_Enumeration_Type): Mark the
10588 representation-to-position function as inlined.
10589 * sem_cat.adb (Set_Categorization_From_Scope): Do not modify
10590 the purity of an internally generated entity if it has been
10591 explicitly marked as pure for optimization purposes.
10592 * exp_aggr.adb: Minor reformatting.
10594 2017-01-19 Javier Miranda <miranda@adacore.com>
10596 * exp_ch6.adb (Expand_Call): Remove side effects on
10597 actuals that are allocators with qualified expression since the
10598 initialization of the object is performed by means of individual
10599 statements (and hence it must be done before the call).
10601 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10603 * sem_ch3.adb (Analyze_Declarations): Minor reformatting.
10604 (Build_Derived_Enumeration_Type): If the derived type inherits a
10605 dynamic predicate from its parent, the bounds of the type must
10606 freeze because an explicit constraint is constructed for the
10607 type and the corresponding range is elaborated now.
10609 2017-01-19 Arnaud Charlet <charlet@adacore.com>
10611 * sem_attr.ads: minor fix of inconsistent casing in comment
10612 * lib-writ.ads: minor align comments in columns
10613 * sem_ch3.adb: Minor reformatting.
10614 * spark_xrefs.ads: minor fix typo in SPARK-related comment
10615 * table.ads: minor style fix in comment
10616 * lib-xref-spark_specific.adb
10617 (Add_SPARK_Xrefs): simplify processing of SPARK cross-references.
10618 * sem_ch12.adb: minor whitespace fix
10619 * freeze.adb: Add comment.
10620 * sem_util.adb (Unique_Name): for instances of
10621 generic subprograms ignore the name of the wrapper package.
10623 2017-01-19 Javier Miranda <miranda@adacore.com>
10625 * exp_aggr.adb (Resolve_Record_Aggregate):
10626 Factorize code needed for aggregates of limited and unlimited
10627 types in a new routine.
10628 (Pass_Aggregate_To_Back_End): New subprogram.
10630 2017-01-19 Yannick Moy <moy@adacore.com>
10632 * sinfo.adb (Pragma_Name): Only access up to Last_Pair of Pragma_Map.
10634 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10636 * sem_ch4.ads, sem_ch4.adb (Try_Object_Operation): Make subprogram
10637 public, for use elsewhere.
10638 * sem_ch6.adb (Analyze_Procedure_Call): In SPARK_Mode and within
10639 an Inlined_body, recognize a call that uses object notation
10640 and has not been rewritten as a regular call because regular
10641 expansion has not taken place.
10643 2017-01-19 Bob Duff <duff@adacore.com>
10645 * checks.adb (Apply_Type_Conversion_Checks): Disable small optimization
10646 in case of generic formal discrete types, because it causes crashes in
10647 the compiler when built with assertions on.
10649 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10651 * lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads,
10652 sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting.
10654 2017-01-19 Bob Duff <duff@adacore.com>
10656 * bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking):
10657 Increment Warnings_Detected. It was decrementing, which is
10658 wrong since we just issued a warning message.
10659 * binderr.ads (Errors_Detected, Warnings_Detected): Declare
10660 these variables to be of subtype Nat instead of Int, because
10661 they should never be negative.
10663 2017-01-19 Javier Miranda <miranda@adacore.com>
10665 * contracts.adb (Build_Postconditions_Procedure): Replace
10666 Generate_C_Code by Modify_Tree_For_C.
10667 * exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate):
10668 Replace Generate_C_Code by Modify_Tree_For_C.
10669 * exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by
10671 * exp_ch11.adb (Expand_N_Exception_Declaration): Replace
10672 Generate_C_Code by Modify_Tree_For_C.
10673 * exp_ch4.adb (Expand_Allocator_Expression): Replace
10674 Generate_C_Code by Modify_Tree_For_C.
10675 * exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code
10676 by Modify_Tree_For_C.
10677 * exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace
10678 Generate_C_Code by Modify_Tree_For_C.
10679 * sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code
10680 by Modify_Tree_For_C.
10681 * sinfo.ads (Modify_Tree_For_C): Adding documentation.
10683 2017-01-19 Javier Miranda <miranda@adacore.com>
10685 * sem_util.ads, sem_util.adb (Expression_Of_Expression_Function): New
10687 (Is_Inlinable_Expression_Function): New subprogram.
10688 * exp_ch6.ads, exp_ch6.adb (Expression_Of_Expression_Function): Moved
10690 (Is_Inlinable_Expression_Function): Moved to Sem_Util.
10692 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10694 * sem_ch4.adb (Diagnose_Call): Improve error message when a
10695 selected component has a prefix that might be interpreted
10696 as a parameterless function call, but none of the candidate
10697 interpretations is parameterless, and there is a hidden homonym
10698 of the prefix that is a package.
10699 * sem_ch8.adb (Find_Selected_Component): If the prefix might be
10700 interpreted as a parameterless function call and its analysis
10701 fails, do not call Analyze_Selected_Component.
10703 2017-01-19 Steve Baird <baird@adacore.com>
10705 * sem_util.ads: Add new Use_Full_View Boolean parameter to
10707 * sem_util.adb (Get_Index_Bounds): replace calls to Scalar_Range with
10708 calls to a newly-defined Scalar_Range_Of_Right_View function.
10710 2017-01-19 Arnaud Charlet <charlet@adacore.com>
10712 * gnat1drv.adb: minor fix of unbalanced parens in comment
10713 * lib-xref.ads (Traverse_Compilation_Unit): declaration moved
10714 to visible part of the package to allow re-use in GNATprove.
10715 * lib-xref-spark_specific.adb (Traverse_Stub): routine refactored
10716 from repeated code of Traverse_Compilation_Unit.
10717 (Traverse_Declaration_Or_Statement): fixed detection of
10718 generic subprograms and packages; also, iteration over case
10719 statement alternatives rewritten to avoid testing if the first
10720 alternative is present (since it must be present due to Ada
10721 syntax restrictions).
10723 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
10725 * exp_ch6.adb (Expand_N_Subprogram_Body): Mark the spec as
10726 returning by reference not just for subprogram body stubs,
10727 but for all subprogram cases.
10728 * sem_util.adb: Code reformatting.
10729 (Requires_Transient_Scope): Update the call to Results_Differ.
10730 (Results_Differ): Update the parameter profile and the associated
10733 2017-01-19 Ed Schonberg <schonberg@adacore.com>
10735 * sem_dim.adb (Analyze_Dimension): Analyze object declaration and
10736 identifier nodes that do not come from source, to handle properly
10737 dimensionality check within an inlined body which inclddes both
10738 original operands and rewritten operands. This removes spurious
10739 dimensionality errors in the presence of front-end inlining,
10740 as well as in SPARK mode.
10742 2017-01-16 Jakub Jelinek <jakub@redhat.com>
10745 * gcc-interface/lang.opt (gant, gnatO, gnat): Add Driver flag.
10747 2017-01-13 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
10749 * gcc-interface/Makefile.in (SPARC/Solaris): Fix typo.
10751 2017-01-13 Arnaud Charlet <charlet@adacore.com>
10753 * doc/gnat_ugn/getting_started_with_gnat.rst,
10754 doc/gnat_ugn/inline_assembler.rst,
10755 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
10756 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
10757 doc/gnat_ugn/about_this_guide.rst,
10758 doc/gnat_ugn/platform_specific_information.rst,
10759 doc/gnat_ugn/example_of_binder_output.rst,
10760 doc/gnat_ugn/gnat_and_program_execution.rst,
10761 doc/gnat_ugn/gnat_utility_programs.rst,
10762 doc/gnat_ugn/the_gnat_compilation_model.rst,
10763 doc/gnat_rm/implementation_defined_attributes.rst,
10764 doc/gnat_rm/compatibility_and_porting_guide.rst,
10765 doc/gnat_rm/standard_library_routines.rst,
10766 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
10767 doc/gnat_rm/implementation_defined_pragmas.rst,
10768 doc/gnat_rm/the_gnat_library.rst,
10769 doc/gnat_rm/obsolescent_features.rst,
10770 doc/gnat_rm/about_this_guide.rst,
10771 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
10772 doc/gnat_rm/implementation_of_ada_2012_features.rst,
10773 doc/gnat_rm/interfacing_to_other_languages.rst,
10774 doc/gnat_rm/implementation_defined_aspects.rst,
10775 doc/gnat_rm.rst: Update documentation.
10776 * gnat_rm.texi, gnat_ugn.texi: Regenerated.
10778 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10780 * einfo.ads: minor grammar fixes in comment of Normalized_Position_Max.
10781 * scil_ll.adb: Minor style fix in comment.
10782 * sem_ch8.adb (Analyze_Expanded_Name): Perform dimension analysis
10783 even if entity is already set, because the node may be renalyzed
10784 after inlining transformations.
10786 2017-01-13 Javier Miranda <miranda@adacore.com>
10788 * sem_res.adb (Resolve_Call): Do not establish a transient scope
10789 for a call to inlinable expression function (since the call will
10790 be replaced by its returned object).
10791 * exp_ch6.ads (Is_Inlinable_Expression_Function): New subprogram.
10792 * exp_ch6.adb (Expression_Of_Expression_Function): New subprogram.
10793 (Expand_Call): For inlinable expression function call replace the
10794 call by its returned object.
10795 (Is_Inlinable_Expression_Function): New subprogram.
10797 2017-01-13 Gary Dismukes <dismukes@adacore.com>
10799 * checks.adb: Minor typo fix and reformatting.
10801 2017-01-13 Javier Miranda <miranda@adacore.com>
10803 * contracts.adb (Contract_Only_Subprograms): Remove formal.
10804 (Copy_Original_Specification): Removed.
10805 (Skip_Contract_Only_Subprogram): Move here checks previously
10806 located in the caller of this routine (to leave the code more clean).
10807 (Build_Contract_Only_Subprogram): Code cleanup.
10808 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): Removed.
10809 (Get_Contract_Only_Missing_Body_Name): Removed.
10811 2017-01-13 Javier Miranda <miranda@adacore.com>
10813 * sem_ch6.adb (Cloned_Expression): New subprogram.
10814 (Freeze_Expr_Types): Complete previous patch since the expression
10815 of an expression-function may have iterators and loops with
10816 defining identifiers which, as part of the preanalysis of the
10817 expression, may be left decorated with itypes that will not be
10818 available in the tree passed to the backend.
10820 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10822 * checks.adb (Apply_Type_Conversion_Checks): Optimize a type
10823 conversion to Integer of an expression that is an attribute
10824 reference 'Pos on an enumeration type.
10826 2017-01-13 Bob Duff <duff@adacore.com>
10828 * atree.ads: Minor comment fix.
10830 2017-01-13 Justin Squirek <squirek@adacore.com>
10832 * sem_ch6.adb (Check_Aggregate_Accessibility): Ignore function
10833 calls in accessibility check on return statement.
10835 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
10837 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
10838 Ensure that the input body is a subprogram body before trying to
10839 determine whether it denoted an expression function. Note that
10840 subprogram body stubs cannot denote expression functions.
10842 2017-01-13 Gary Dismukes <dismukes@adacore.com>
10844 * bindgen.adb, sem_ch6.adb, binde.adb, exp_ch3.adb: Minor reformatting
10847 2017-01-13 Javier Miranda <miranda@adacore.com>
10849 * einfo.ads (Component_Bit_Offset): Fix documentation.
10850 * sem_ch13.adb (Check_Record_Representation_Clause): Skip check
10851 on record holes for components with unknown compile-time offsets.
10853 2017-01-13 Bob Duff <duff@adacore.com>
10855 * ali.ads, ali.adb (Static_Elaboration_Model_Used): Remove unused flag.
10856 * g-locfil.ads: Minor comment fix.
10858 2017-01-13 Bob Duff <duff@adacore.com>
10860 * binde.adb (Elab_New): New elaboration order algorithm
10861 that is expected to cause fewer ABE issues. This is a work in
10862 progress. The new algorithm is currently disabled, and can be
10863 enable by the -dp switch, or by modifying the Do_Old and Do_New
10864 etc. flags and rebuilding. Experimental code is included to
10865 compare the results of the old and new algorithms.
10866 * binde.ads: Use GNAT.Dynamic_Tables instead of Table, so we
10867 can have multiple of these tables, so the old and new algorithms
10869 * bindgen.ads (Gen_Output_File): Pass Elab_Order as an 'in'
10870 parameter of type array. This avoids the global variable, and
10871 allows bounds checking (which is normally defeated by the tables
10872 packages). It also ensures that the Elab_Order is read-only
10874 * bindgen.adb: Pass Elab_Order as an 'in' parameter to all
10875 subprograms that need it, as above.
10876 * debug.adb: Document new -dp switch. Modify doc of old -do
10878 * gnatbind.adb (Gnatbind): Make use of new interfaces to Binde
10879 and Bindgen. Move writing of closure (-R and -Ra switches)
10880 to Binde; that's more convenient.
10882 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10884 * sem_ch6.adb (Analyze_Expression_Function): If the expression
10885 function is a completion, all entities referenced in the
10886 expression are frozen. As a consequence, a reference to an
10887 uncompleted private type from an enclosing scope is illegal.
10889 2017-01-13 Javier Miranda <miranda@adacore.com>
10891 * sem_ch6.adb (Freeze_Expr_Types): New subprogram.
10892 (Analyze_Subprogram_Body_Helper): At the occurrence of an
10893 expression function declaration that is a completion, its
10894 expression causes freezing (AI12-0103).
10896 2017-01-13 Vadim Godunko <godunko@adacore.com>
10898 * a-coinho-shared.adb: Fix memory leaks in Constant_Reference and
10899 Reference functions of Ada.Containers.Indefinite_Holders.
10901 2017-01-13 Bob Duff <duff@adacore.com>
10903 * s-os_lib.ads: Minor comment fixes.
10905 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
10907 * exp_ch3.adb (Default_Initialize_Object): Do not default
10908 initialize an object when it is of a task type and restriction
10909 No_Tasking is in effect because the initialization is obsolete.
10910 * exp_ch9.adb (Build_Master_Entity): Do not generate a master when
10911 restriction No_Tasking is in effect.
10912 (Build_Master_Renaming): Do not rename a master when restriction
10913 No_Tasking is in effect.
10915 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10917 * sem_aggr.adb (Resolve_Array_Aggregate): The code that verifies
10918 the legality of An others clause applies as well to a choice in
10919 an Iterated_component_ association.
10920 (Resolve_Iterated_Component_Association): An others choice
10922 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): An
10923 Iterated_Component_Association is not static.
10925 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
10927 * exp_ch3.adb (Freeze_Type): Mark the Ghost mode as set in case
10928 control is passed to the expresion handler before the new mode
10930 * sem_ch12.adb (Analyze_Package_Instantiation,
10931 Analyze_Subprogram_Instantiation): Mark the Ghost mode as set
10932 in case control is passed to the expresion handler before the
10935 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
10937 * sem_aggr.adb, sem_ch3.adb, inline.adb, sem_util.adb, exp_ch4.adb,
10938 exp_aggr.adb: Minor reformatting.
10940 2017-01-13 Gary Dismukes <dismukes@adacore.com>
10942 * inline.adb: Minor reformatting and typo fix.
10944 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10946 * sem_util.ads, sem_util.adb (Choice_List): Move function here
10947 from sem_aggr.adb, for use elsewhere.
10948 * sem_ch3.adb (Analyze_Object_Declaration): Use Choice_List.
10949 * sem_aggr.adb (Resolve_Array_Aggregate): Remove
10950 Iterated_Component_Present.
10951 * exp_aggr.adb: Use Choice_List throughout, to handle
10952 Iterated_Component_Associations.
10953 (Gen_Loop): Generate proper loop for an
10954 Iterated_Component_Association: loop variable has the identifier
10955 of the original association. Generate a loop even for a single
10956 component choice, in order to make loop parameter visible in
10958 (Flatten): An Iterated_Component_Association is not static.
10960 2017-01-13 Yannick Moy <moy@adacore.com>
10962 * exp_ch4.adb (Expand_N_Op_Expon): Ensure that the value of
10963 float exponentiation for statically known small negative values
10964 is the reciprocal of the exponentiation for the opposite value
10966 * s-exnllf.adb (Exn_Float, Exn_Long_Float, Exn_Long_Long_Float):
10967 Ensure that the value of float exponentiation for negative values
10968 is the reciprocal of the exponentiation for the opposite value
10970 * inline.adb (Expand_Inlined_Call): Fix the count
10971 for the number of generated gotos.
10973 2017-01-13 Yannick Moy <moy@adacore.com>
10975 * inline.adb: Code cleanup.
10976 * sem_util.adb (Is_OK_Volatile_Context): Add
10977 expression in delay statement as OK for volatile context.
10979 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10981 * sem_aggr.adb (Resolve_Array_Aggregate): In normal compilation
10982 mode a choice that is a subtype with a static predicate is
10983 replaced by the values it covers. This transformation must not
10984 be performed in ASIS mode, to preserve the source for analysis.
10986 2017-01-13 Justin Squirek <squirek@adacore.com>
10988 * nlists.ads: Correct minor typo.
10990 2017-01-13 Gary Dismukes <dismukes@adacore.com>
10992 * sem_ch13.adb: Minor reformatting and typo fix.
10994 2017-01-13 Ed Schonberg <schonberg@adacore.com>
10996 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): An
10997 Iterated_Component_Association is a named association in an
10999 * sem_aggr.adb (Resolve_Iterated_Component_Association): New
11000 procedure, subsidiary of Resolve_Array_Aggregate, to analyze
11001 and resolve the discrete choices and the expression of the
11003 * sinfo.adb, sinfo.ads: In analogy with N_Component_Association,
11004 Loop_Actions and Box_Present are attributes of
11005 N_Iterated_Component_Association nodes. Box_Present is always
11006 False in this case.
11007 * sprint.adb (Sprint_Node): An Iterated_Component_Association
11008 has a Discrete_Choices list, as specified in the RM. A
11009 Component_Association for aggregate uses instead a Choices list.
11010 We have to live with this small inconsistency because the new
11011 construct also has a defining identifier, and there is no way
11012 to merge the two node structures.
11014 2017-01-13 Yannick Moy <moy@adacore.com>
11016 * inline.adb (Remove_Aspects_And_Pragmas): Add Unused to the
11017 list of pragmas to remove. Remove pragmas from the list of
11018 statements in the body to inline.
11019 * namet.adb, namet.ads (Nam_In): New version with 12 parameters.
11021 2017-01-13 Ed Schonberg <schonberg@adacore.com>
11023 * sem_ch3.adb (Resolve_Aspects): New procedure, subsidiary of
11024 Analyze_Declarations, to analyze and resolve the expressions of
11025 aspect specifications in the current declarative list, so that
11026 the expressions have proper entity and type info. This is needed
11027 for ASIS when there is no subsequent expansion to generate this
11028 semantic information.
11029 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Use Etype of
11030 original expression, to suppress cascaded errors when expression
11031 has been constant-folded.
11032 (Resolve_Aspect_Expressions, Resolve_Name): Preserve entities in
11033 ASIS mode, because there is no subsequent expansion to decorate
11036 2017-01-13 Yannick Moy <moy@adacore.com>
11038 * inline.adb, inline.ads (Call_Can_Be_Inlined_In_GNATprove_Mode):
11039 New function to detect when a call may be inlined or not in
11041 (Expand_Inlined_Call): Ensure that a temporary
11042 is always created in the cases where a type conversion may be
11043 needed on an input parameter in GNATprove mode, so that GNATprove
11044 sees the check to perform.
11045 * sem_res.adb (Resolve_Call): In GNATprove mode, skip inlining
11046 when not applicable due to actual requiring type conversion
11047 with possible check but no temporary value can be copied for
11048 GNATprove to see the check.
11050 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11052 * sem_aggr.adb, par_sco.adb, s-osprim-mingw.adb, exp_ch5.adb,
11053 exp_prag.adb, sem_ch3.adb, xr_tabls.adb, lib-xref-spark_specific.adb,
11054 layout.adb, sem_dist.adb, exp_spark.adb, exp_ch7.adb, gnatcmd.adb,
11055 exp_util.adb, prj-proc.adb, sem_aux.adb, comperr.adb, g-memdum.adb,
11056 exp_attr.adb, s-intman-solaris.adb, exp_ch9.adb, make.adb, live.adb,
11057 g-sercom-linux.adb, sem_dim.adb, mlib-prj.adb, s-intman-posix.adb,
11058 sem_ch9.adb, sem_ch10.adb, prep.adb, einfo.adb, scng.adb, checks.adb,
11059 prj-strt.adb, sem_prag.adb, eval_fat.adb, sem_ch12.adb, sem.adb,
11060 a-numaux-x86.adb, a-stwifi.adb, i-cobol.adb, prj.adb,
11061 get_spark_xrefs.adb, s-tasini.adb, rtsfind.adb, freeze.adb,
11062 g-arrspl.adb, par-ch4.adb, sem_util.adb, sem_res.adb, expander.adb,
11063 sem_attr.adb, exp_dbug.adb, prj-pp.adb, a-stzfix.adb, s-interr.adb,
11064 s-wchcnv.adb, switch-m.adb, gnat1drv.adb, sinput-l.adb, stylesw.adb,
11065 contracts.adb, s-intman-android.adb, g-expect.adb, exp_ch4.adb,
11066 g-comlin.adb, errout.adb, sinput.adb, s-exctra.adb, repinfo.adb,
11067 g-spipat.adb, g-debpoo.adb, exp_ch6.adb, sem_ch4.adb, exp_ch13.adb,
11068 a-wtedit.adb, validsw.adb, pprint.adb, widechar.adb, makeutl.adb,
11069 ali.adb, set_targ.adb, sem_mech.adb, sem_ch6.adb, gnatdll.adb,
11070 get_scos.adb, g-pehage.adb, s-tratas-default.adb, gnatbind.adb,
11071 prj-dect.adb, g-socthi-mingw.adb, par-prag.adb, prj-nmsc.adb,
11072 exp_disp.adb, par-ch12.adb, binde.adb, sem_ch8.adb,
11073 s-tfsetr-default.adb, s-regexp.adb, gprep.adb, s-tpobop.adb,
11074 a-teioed.adb, sem_warn.adb, sem_eval.adb, g-awk.adb, s-io.adb,
11075 a-ztedit.adb, xoscons.adb, exp_intr.adb, sem_cat.adb, sprint.adb,
11076 g-socket.adb, exp_dist.adb, sem_ch13.adb, s-tfsetr-vxworks.adb,
11077 par-ch3.adb, treepr.adb, g-forstr.adb, g-catiio.adb, par-ch5.adb,
11078 uname.adb, osint.adb, exp_ch3.adb, prj-env.adb, a-strfix.adb,
11079 a-stzsup.adb, prj-tree.adb, s-fileio.adb: Update all eligible case
11080 statements to reflect the new style for case alternatives. Various
11081 code clean up and reformatting.
11083 2017-01-13 Gary Dismukes <dismukes@adacore.com>
11085 * exp_util.adb: Minor reformatting.
11087 2017-01-13 Yannick Moy <moy@adacore.com>
11089 * exp_spark.adb: Code cleanup.
11090 * sem_ch9.adb (Analyze_Delay_Until): Resolve
11091 expression so that calls are identified as such inside delay
11094 2017-01-13 Ed Schonberg <schonberg@adacore.com>
11096 * exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
11097 * par-ch3.adb (P_Discrete_Choice_List): An
11098 Iterated_Component_Association is an array aggregate component.
11099 * par-ch4.adb (P_Iterated_Component_Association): New procedure.
11100 (Is_Quantified_Expression): New function that performs a lookahead
11101 to distinguish quantified expressions from iterated component
11103 (P_Aggregate_Or_Paren_Expr): Recognize iterated component
11105 (P_Unparen_Cond_Case_Quant_Expression, P_Primary): Ditto.
11106 * sem.adb (Analyze): Handle Iterated_Component_Association.
11107 * sem_aggr.adb (Resolve_Array_Aggregate): Dummy handling of iterated
11108 component associations.
11109 * sinfo.ads, sinfo.adb: Entries for for
11110 N_Iterated_Component_Association and its fields.
11111 * sprint.adb (Sprint_Node_Actual): Handle
11112 N_Iterated_Component_Association.
11114 2017-01-13 Justin Squirek <squirek@adacore.com>
11116 * sem_ch12.adb (Analyze_Package_Instantiation): Move disabiling
11117 of the style check until after preanalysis of acutals.
11119 2017-01-13 Yannick Moy <moy@adacore.com>
11121 * sem_ch13.adb: Minor reformatting.
11122 * par-ch11.adb: minor style fix in whitespace
11123 * gnatbind.adb (Gnatbind): Scope of Std_Lib_File
11124 reduced to Add_Artificial_ALI_File; style fix in declaration of
11125 Text; grammar fix in comment.
11126 * osint-c.adb (Read_Library_Info): strip trailing NUL from result.
11127 * freeze.adb: Cleanup to pass pragma instead of
11128 expression to call.
11129 * exp_spark.adb (Expand_SPARK_Attribute_Reference): New procedure to
11130 replace System'To_Address by equivalent call.
11132 2017-01-13 Arnaud Charlet <charlet@adacore.com>
11134 * bindusg.adb: Improve usage output for -f switch.
11136 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11138 * frontend.adb, freeze.adb, sem_res.adb, sem_attr.adb, sem_ch8.adb:
11139 Minor reformatting.
11141 2017-01-13 Ed Schonberg <schonberg@adacore.com>
11143 * sem_ch13.adb (Is_Predicate_Static): Following the intent of the RM,
11144 treat comparisons on strings as legal in a Static_Predicate.
11145 (Is_Predicate_Static, Is_Type_Ref): Predicate also returns true on
11146 a function call that is the expansion of a string comparison.The
11147 function call is built when compiling the corresponding predicate
11148 function, but the expression has been found legal as a static
11149 predicate during earlier analysis.
11150 * sem_eval.adb (Real_Or_String_Static_Predicate_Matches): Handle
11151 properly a function call that is the expansion of a string
11152 comparison operation, in order to recover the Static_Predicate
11153 expression and apply it to a static argument when needed.
11155 2017-01-13 Tristan Gingold <gingold@adacore.com>
11157 * s-mmap.adb, s-mmap.ads (Open_Read_No_Exception): New function.
11158 (Open_Read): Re-implement using Open_Read_No_Exception.
11159 (Open_Write): Raise exception in case of error.
11160 * s-mmosin-mingw.adb (Open_Common): Do not raise exception.
11161 * s-mmosin-unix.adb (Open_Read, Open_Write): Do not
11163 * s-mmosin-mingw.ads, s-mmosin-unix.ads (Open_Read): Adjust comment.
11165 2017-01-13 Yannick Moy <moy@adacore.com>
11167 * checks.adb: Code cleanup.
11169 2017-01-13 Yannick Moy <moy@adacore.com>
11171 * freeze.adb (Check_Inherited_Conditions): Use analyzed pragma
11172 expression instead of unanalyzed aspect expression for checking
11173 the validity of inheriting an operation. Also copy the expression
11174 being passing it to Build_Class_Wide_Expression, as this call
11175 modifies its argument.
11176 * sem_util.ads Fix comment to reference correct function name
11179 2017-01-13 Javier Miranda <miranda@adacore.com>
11181 * sem_res.adb (Resolve_Generalized_Indexing): Compiling in ASIS mode,
11182 when we propagate information about the indexes back to the original
11183 indexing mode and the prefix of the index is a function call, do not
11184 remove any parameter from such call.
11186 2017-01-13 Gary Dismukes <dismukes@adacore.com>
11188 * exp_ch6.ads (Needs_BIP_Finalization_Master): Update comment.
11189 * exp_ch6.adb (Needs_BIP_Finalization_Master): Return True for
11190 a build-in-place function whose result type is tagged.
11192 2017-01-13 Yannick Moy <moy@adacore.com>
11194 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
11195 Do not generate a wrapper when the only candidate is a class-wide
11197 (Analyze_Subprogram_Renaming): Do not freeze the renaming or renamed
11198 inside a generic context.
11200 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11202 * exp_util.adb (Add_Inherited_Tagged_DIC):
11203 Pass the object parameters of both the parent and the derived
11204 type DIC procedure to the reference replacement circuitry.
11205 (Find_DIC_Type): Modify the circuitry to present the partial
11206 view of a private type in case the private type defines its own
11208 (Replace_Object_And_Primitive_References): Add two
11209 optional formal parameters. Update the comment on usage. Update
11210 the replacement of references to object parameters.
11212 2017-01-13 Gary Dismukes <dismukes@adacore.com>
11214 * einfo.adb, sem_ch6.adb, atree.adb: Minor reformatting and typo fix.
11216 2017-01-13 Ed Schonberg <schonberg@adacore.com>
11218 * sem_res.adb (Resolve_Actuals): Apply Scalar_Range_Check to
11219 an out parameter that is a type conversion, independently of th
11220 range check that may apply to the expression of the conversion,
11221 for use in GNATProve.
11223 2017-01-13 Yannick Moy <moy@adacore.com>
11225 * gnat1drv.adb (Gnat1drv): Move the implicit with for System in
11226 GNATprove_Mode here to Frontend.
11227 * frontend.adb (Frontend): Move the implicit with for System
11228 in GNATprove_Mode here as it ismore correct this way; the old
11229 place only worked by chance, since there were no overloaded names.
11230 * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_Tasking_State.
11231 * sem_attr.adb (Analyze_Attribute): In GNATprove_Mode, for the
11232 four attributes identified in SRM 9(18), add an implicit with
11233 to Ada.Task_Identification.
11234 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
11235 Deal specially with the wrapper introduced for AI05-0071 in GNATprove
11237 * checks.adb (Apply_Discriminant_Check,
11238 Apply_Selected_Length_Checks, Apply_Selected_Range_Checks):
11239 In GNATprove mode, we do not apply the checks, but we still
11240 analyze the expression to possibly issue errors on SPARK
11241 code when a run-time error can be detected at compile time.
11242 (Selected_Length_Checks, Selected_Range_Checks): Perform analysis
11245 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11247 * expander.adb (Expand): Add a warning about using return
11248 statements in Ghost management code.
11249 * exp_ch3.adb (Freeze_Type): Add a warning about using return
11250 statements in Ghost management code.
11251 * exp_ch7.adb (Build_Invariant_Procedure_Body,
11252 Build_Invariant_Procedure_Declaration): Add a warning about
11253 using return statements in Ghost management code.
11254 * exp_disp.adb (Make_DT): Add a warning about using return
11255 statements in Ghost management code.
11256 * exp_util.adb (Build_DIC_Procedure_Body,
11257 Build_DIC_Procedure_Declaration, Make_Predicated_Call): Add a
11258 warning about using return statements in Ghost management code.
11259 * freeze.adb (Freeze_Entity): Add a warning about using return
11260 statements in Ghost management code.
11261 * sem.adb (Analyze, Do_Analyze): Add a warning about using return
11262 statements in Ghost management code.
11263 * sem_ch3.adb (Analyze_Object_Declaration, Process_Full_View): Add
11264 a warning about using return statements in Ghost management code.
11265 * sem_ch5.adb (Analyze_Assignment): Add a warning about using
11266 return statements in Ghost management code.
11267 * sem_ch6.adb (Analyze_Procedure_Call,
11268 Analyze_Subprogram_Body_Helper): Add a warning about using return
11269 statements in Ghost management code.
11270 * sem_ch7.adb (Analyze_Package_Body_Helper): Add a warning about
11271 using return statements in Ghost management code.
11272 * sem_ch12.adb (Analyze_Package_Instantiation,
11273 Analyze_Subprogram_Instantiation, Instantiate_Package_Body,
11274 Instantiate_Subprogram_Body): Add a warning about using return
11275 statements in Ghost management code.
11276 * sem_ch13.adb (Build_Predicate_Functions,
11277 Build_Predicate_Function_Declarations): Add a warning about
11278 using return statements in Ghost management code.
11279 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part,
11280 Analyze_Initial_Condition_In_Decl_Part, Analyze_Pragma,
11281 Analyze_Pre_Post_Condition_In_Decl_Part): Add a warning about
11282 using return statements in Ghost management code.
11284 2017-01-13 Tristan Gingold <gingold@adacore.com>
11286 * s-mmosin-mingw.adb: Fix pragma import.
11288 2017-01-13 Arnaud Charlet <charlet@adacore.com>
11290 * gnat1drv.adb (Adjust_Global_Switches): Ignore -gnateE in
11293 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
11295 * atree.adb (Allocate_Initialize_Node): A newly created node is
11296 no longer marked as Ghost at this level.
11297 (Mark_New_Ghost_Node): New routine.
11298 (New_Copy): Mark the copy as Ghost.
11299 (New_Entity): Mark the entity as Ghost.
11300 (New_Node): Mark the node as Ghost.
11301 * einfo.adb (Is_Checked_Ghost_Entity): This attribute can now
11302 apply to unanalyzed entities.
11303 (Is_Ignored_Ghost_Entity): This attribute can now apply to unanalyzed
11305 (Set_Is_Checked_Ghost_Entity): This attribute now
11306 applies to all entities as well as unanalyzed entities.
11307 (Set_Is_Ignored_Ghost_Entity): This attribute now applies to
11308 all entities as well as unanalyzed entities.
11309 * expander.adb Add with and use clauses for Ghost.
11310 (Expand): Install and revert the Ghost region associated with the node
11312 * exp_ch3.adb (Expand_Freeze_Array_Type): Remove all Ghost-related code.
11313 (Expand_Freeze_Class_Wide_Type): Remoe all Ghost-related code.
11314 (Expand_Freeze_Enumeration_Type): Remove all Ghost-related code.
11315 (Expand_Freeze_Record_Type): Remove all Ghost-related code.
11316 (Freeze_Type): Install and revert the Ghost region associated
11317 with the type being frozen.
11318 * exp_ch5.adb Remove with and use clauses for Ghost.
11319 (Expand_N_Assignment_Statement): Remove all Ghost-related code.
11320 * exp_ch6.adb Remove with and use clauses for Ghost.
11321 (Expand_N_Procedure_Call_Statement): Remove all Ghost-relatd code.
11322 (Expand_N_Subprogram_Body): Remove all Ghost-related code.
11323 * exp_ch7.adb (Build_Invariant_Procedure_Body): Install and revert the
11324 Ghost region of the working type.
11325 (Build_Invariant_Procedure_Declaration): Install and revert
11326 the Ghost region of the working type.
11327 (Expand_N_Package_Body): Remove all Ghost-related code.
11328 * exp_ch8.adb Remove with and use clauses for Ghost.
11329 (Expand_N_Exception_Renaming_Declaration): Remove all Ghost-related
11331 (Expand_N_Object_Renaming_Declaration): Remove all Ghost-related code.
11332 (Expand_N_Package_Renaming_Declaration): Remove all Ghost-related code.
11333 (Expand_N_Subprogram_Renaming_Declaration): Remove all Ghost-related
11335 * exp_ch13.adb Remove with and use clauses for Ghost.
11336 (Expand_N_Freeze_Entity): Remove all Ghost-related code.
11337 * exp_disp.adb (Make_DT): Install and revert the Ghost region of
11338 the tagged type. Move the generation of various entities within
11339 the Ghost region of the type.
11340 * exp_prag.adb Remove with and use clauses for Ghost.
11341 (Expand_Pragma_Check): Remove all Ghost-related code.
11342 (Expand_Pragma_Contract_Cases): Remove all Ghost-related code.
11343 (Expand_Pragma_Initial_Condition): Remove all Ghost-related code.
11344 (Expand_Pragma_Loop_Variant): Remove all Ghost-related code.
11345 * exp_util.adb (Build_DIC_Procedure_Body): Install
11346 and revert the Ghost region of the working types.
11347 (Build_DIC_Procedure_Declaration): Install and revert the
11348 Ghost region of the working type.
11349 (Make_Invariant_Call): Install and revert the Ghost region of the
11351 (Make_Predicate_Call): Reimplemented. Install and revert the
11352 Ghost region of the associated type.
11353 * freeze.adb (Freeze_Entity): Install and revert the Ghost region
11354 of the entity being frozen.
11355 (New_Freeze_Node): Removed.
11356 * ghost.adb Remove with and use clauses for Opt.
11357 (Check_Ghost_Completion): Update the parameter profile
11358 and all references to formal parameters.
11359 (Ghost_Entity): Update the comment on usage.
11360 (Install_Ghost_Mode): New routines.
11361 (Is_Ghost_Assignment): New routine.
11362 (Is_Ghost_Declaration): New routine.
11363 (Is_Ghost_Pragma): New routine.
11364 (Is_Ghost_Procedure_Call): New routine.
11365 (Is_Ghost_Renaming): Removed.
11366 (Is_OK_Declaration): Reimplemented.
11367 (Is_OK_Pragma): Reimplemented.
11368 (Is_OK_Statement): Reimplemented.
11369 (Is_Subject_To_Ghost): Update the comment on usage.
11370 (Mark_And_Set_Ghost_Assignment): New routine.
11371 (Mark_And_Set_Ghost_Body): New routine.
11372 (Mark_And_Set_Ghost_Completion): New routine.
11373 (Mark_And_Set_Ghost_Declaration): New routine.
11374 (Mark_And_Set_Ghost_Instantiation): New routine.
11375 (Mark_And_Set_Ghost_Procedure_Call): New routine.
11376 (Mark_Full_View_As_Ghost): Removed.
11377 (Mark_Ghost_Declaration_Or_Body): New routine.
11378 (Mark_Ghost_Pragma): New routine.
11379 (Mark_Ghost_Renaming): New routine.
11380 (Mark_Pragma_As_Ghost): Removed.
11381 (Mark_Renaming_As_Ghost): Removed.
11382 (Propagate_Ignored_Ghost_Code): Update the comment on usage.
11383 (Prune_Node): Freeze nodes no longer need special pruning, they
11384 are processed by the general ignored Ghost code mechanism.
11385 (Restore_Ghost_Mode): New routine.
11386 (Set_Ghost_Mode): Reimplemented.
11387 (Set_Ghost_Mode_From_Entity): Removed.
11388 * ghost.ads Add with and use clauses for Ghost.
11389 (Check_Ghost_Completion): Update the parameter profile
11390 along with the comment on usage.
11391 (Install_Ghost_Mode): New routine.
11392 (Is_Ghost_Assignment): New routine.
11393 (Is_Ghost_Declaration): New routine.
11394 (Is_Ghost_Pragma): New routine.
11395 (Is_Ghost_Procedure_Call): New routine.
11396 (Mark_And_Set_Ghost_Assignment): New routine.
11397 (Mark_And_Set_Ghost_Body): New routine.
11398 (Mark_And_Set_Ghost_Completion): New routine.
11399 (Mark_And_Set_Ghost_Declaration): New routine.
11400 (Mark_And_Set_Ghost_Instantiation): New routine.
11401 (Mark_And_Set_Ghost_Procedure_Call): New routine.
11402 (Mark_Full_View_As_Ghost): Removed.
11403 (Mark_Ghost_Pragma): New routine.
11404 (Mark_Ghost_Renaming): New routine.
11405 (Mark_Pragma_As_Ghost): Removed.
11406 (Mark_Renaming_As_Ghost): Removed.
11407 (Restore_Ghost_Mode): New routine.
11408 (Set_Ghost_Mode): Redefined.
11409 (Set_Ghost_Mode_From_Entity): Removed.
11410 * sem.adb (Analyze): Install and revert the Ghost region of the
11411 node being analyzed.
11412 (Do_Analyze): Change the way a clean Ghost
11413 region is installed and reverted.
11414 * sem_ch3.adb (Analyze_Full_Type_Declaration): Remove
11415 all Ghost-related code.
11416 (Analyze_Incomplete_Type_Decl): Remove all Ghost-related code.
11417 (Analyze_Number_Declaration): Remove all Ghost-related code.
11418 (Analyze_Object_Declaration): Install and revert the Ghost region of
11419 a deferred object declaration's completion.
11420 (Array_Type_Declaration): Remove all Ghost-related code.
11421 (Build_Derived_Type): Update the comment on
11422 the propagation of Ghost attributes from a parent to a derived type.
11423 (Derive_Subprogram): Remove all Ghost-related code.
11424 (Make_Class_Wide_Type): Remove all Ghost-related code.
11425 (Make_Implicit_Base): Remove all Ghost-related code.
11426 (Process_Full_View): Install and revert the Ghost region of
11427 the partial view. There is no longer need to check the Ghost
11429 * sem_ch5.adb (Analyze_Assignment): Install and revert the Ghost
11430 region of the left hand side.
11431 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Remove
11432 all Ghost-related code.
11433 (Analyze_Expression_Function): Remove all Ghost-related code.
11434 (Analyze_Generic_Subprogram_Body): Remove all Ghost-related code.
11435 (Analyze_Procedure_Call): Install and revert the Ghost region of
11436 the procedure being called.
11437 (Analyze_Subprogram_Body_Helper): Install and revert the Ghost
11438 region of the spec or body.
11439 (Analyze_Subprogram_Declaration): Remove all Ghost-related code.
11440 (Build_Subprogram_Declaration): Remove all Ghost-related code.
11441 (Find_Corresponding_Spec): Remove all Ghost-related code.
11442 (Process_Formals): Remove all Ghost-related code.
11443 * sem_ch7.adb (Analyze_Package_Body_Helper): Install and revert
11444 the Ghost region of the spec.
11445 (Analyze_Package_Declaration): Remove all Ghost-related code.
11446 * sem_ch8.adb (Analyze_Exception_Renaming): Mark a renaming as
11447 Ghost when it aliases a Ghost entity.
11448 (Analyze_Generic_Renaming): Mark a renaming as Ghost when it aliases
11450 (Analyze_Object_Renaming): Mark a renaming as Ghost when
11451 it aliases a Ghost entity.
11452 (Analyze_Package_Renaming): Mark a renaming as Ghost when it aliases
11454 (Analyze_Subprogram_Renaming): Mark a renaming as Ghost when it
11455 aliases a Ghost entity.
11456 * sem_ch11.adb Remove with and use clauses for Ghost.
11457 (Analyze_Exception_Declaration): Remove all Ghost-related code.
11458 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Remove all
11459 Ghost-related code.
11460 (Analyze_Generic_Subprogram_Declaration): Remove all Ghost-related
11462 (Analyze_Package_Instantiation): Install and revert the Ghost region
11463 of the package instantiation.
11464 (Analyze_Subprogram_Instantiation): Install
11465 and revert the Ghost region of the subprogram instantiation.
11466 (Instantiate_Package_Body): Code clean up. Install and revert the
11467 Ghost region of the package body.
11468 (Instantiate_Subprogram_Body): Code clean up. Install and revert the
11469 Ghost region of the subprogram body.
11470 * sem_ch13.adb (Build_Predicate_Functions): Install
11471 and revert the Ghost region of the related type.
11472 (Build_Predicate_Function_Declaration): Code clean up. Install
11473 and rever the Ghost region of the related type.
11474 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
11475 Install and revert the Ghost region of the pragma.
11476 (Analyze_Initial_Condition_In_Decl_Part): Install and revert the
11477 Ghost region of the pragma.
11478 (Analyze_Pragma): Install and revert the Ghost region of various
11479 pragmas. Mark a pragma as Ghost when it is related to a Ghost entity
11480 or encloses a Ghost entity.
11481 (Analyze_Pre_Post_Condition): Install and revert the Ghost
11482 region of the pragma.
11483 (Analyze_Pre_Post_Condition_In_Decl_Part): Install and revert the
11484 Ghost region of the pragma.
11485 * sem_res.adb (Resolve): Remove all Ghost-related code.
11486 * sem_util.adb (Is_Declaration): Reimplemented.
11487 (Is_Declaration_Other_Than_Renaming): New routine.
11488 * sem_util.ads (Is_Declaration_Other_Than_Renaming): New routine.
11489 * sinfo.adb (Is_Checked_Ghost_Pragma): New routine.
11490 (Is_Ghost_Pragma): Removed.
11491 (Is_Ignored_Ghost_Pragma): New routine.
11492 (Set_Is_Checked_Ghost_Pragma): New routine.
11493 (Set_Is_Ghost_Pragma): Removed.
11494 (Set_Is_Ignored_Ghost_Pragma): New routine.
11495 * sinfo.ads: Update the documentation on Ghost mode and
11496 Ghost regions. New attributes Is_Checked_Ghost_Pragma
11497 and Is_Ignored_Ghost_Pragma along with usages in nodes.
11498 Remove attribute Is_Ghost_Pragma along with usages in nodes.
11499 (Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
11500 (Is_Ghost_Pragma): Removed along with pragma Inline.
11501 (Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
11502 (Set_Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
11503 (Set_Is_Ghost_Pragma): Removed along with pragma Inline.
11504 (Set_Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
11506 2017-01-12 Tristan Gingold <gingold@adacore.com>
11508 * s-mmap.ads, s-mmap.adb, s-mmosin-unix.ads, s-mmosin-unix.adb,
11509 s-mmauni-long.ads, s-mmosin-mingw.ads, s-mmosin-mingw.adb: New files.
11511 2017-01-12 Yannick Moy <moy@adacore.com>
11513 * errout.adb, errout.ads (Initialize): Factor common treatment
11515 (Reset_Warnings): New procedure to reset counts related to warnings.
11516 (Record_Compilation_Errors): New variable to store the presence of an
11517 error, used in gnat2why to allow changing the Warning_Mode.
11518 (Compilation_Errors): Use new variable Record_Compilation_Errors to
11519 store the presence of an error.
11521 2017-01-12 Javier Miranda <miranda@adacore.com>
11523 * sem_ch13.adb (Analyze_Aspect_Specifications):
11524 For Interrupt_Handler and Attach_ Handler aspects, decorate the
11525 internally built reference to the protected procedure as coming
11526 from sources and force its analysis.
11528 2017-01-12 Ed Schonberg <schonberg@adacore.com>
11530 * sem_ch3.adb (Build_Derived_Type): For a scalar derived type,
11531 inherit predicates if any from the first_subtype of the parent,
11532 not from the anonymous parent type.
11533 * sem_eval.adb (Is_Static_Subtype): A type that inherits a dynamic
11534 predicate is not a static subtype.
11536 2017-01-12 Gary Dismukes <dismukes@adacore.com>
11538 * freeze.adb (Check_Suspicious_Convention): New procedure
11539 performing a warning check on discriminated record types with
11540 convention C or C++. Factored out of procedure Freeze_Record_Type,
11541 and changed to only apply to base types (to avoid spurious
11542 warnings on subtypes). Minor improvement of warning messages
11543 to refer to discriminated rather than variant record types.
11544 (Freeze_Record_Type): Remove code for performing a suspicious
11546 (Freeze_Entity): Only call Freeze_Record_Type
11547 on types that aren't declared within any enclosing generic units
11548 (rather than just excluding the type when the innermost scope
11549 is generic). Call Check_Suspicious_Convention whether or not
11550 the type is declared within a generic unit.
11551 * sem_ch8.adb (In_Generic_Scope): Move this function to Sem_Util.
11552 * sem_util.ads, sem_util.adb (In_Generic_Scope): New function (moved
11555 2017-01-12 Tristan Gingold <gingold@adacore.com>
11557 * sysdep.c, adaint.c, rtinit.c, ming32.h:
11558 (__gnat_current_codepage): Renamed from CurrentCodePage
11559 (__gnat_current_ccs_encoding): Renamed from CurrentCCSEncoding
11561 2017-01-12 Ed Schonberg <schonberg@adacore.com>
11563 * sem_ch6.adb (Fully_Conformant_Expressions): Handle properly
11564 quantified expressions, following AI12-050: the loop parameters
11565 of two quantified expressions are conformant if they have the
11568 2017-01-12 Arnaud Charlet <charlet@adacore.com>
11570 * gcc-interface/Makefile.in: Clean up VxWorks targets.
11572 2017-01-12 Ed Schonberg <schonberg@adacore.com>
11574 * sem_attr.adb (Analyze_Attribute_Reference, case Loop_Entry):
11575 Hnadle properly the attribute reference when it appears as part
11576 of an expression in another loop aspect.
11578 2017-01-12 Ed Schonberg <schonberg@adacore.com>
11580 * exp_ch3.adb (Check_Predicated_Discriminant): New procedure,
11581 subsidiary of Build_Initialization_Call, to complete generation
11582 of predicate checks on discriminants whose (sub)types have
11583 predicates, and to add checks on variants that do not have an
11585 * sem_util.adb (Gather_Components): A missing Others alternative is
11586 not an error when the type of the discriminant is a static predicate
11587 (and coverage has been checked when analyzing the case statement). A
11588 runtime check is generated to verify that a given discriminant
11589 satisfies the predicate (RM 3.8.1. (21.1/2)).
11591 2017-01-12 Yannick Moy <moy@adacore.com>
11593 * gnat1drv.adb (Adjust_Global_Switches): Only
11594 perform checking of exception mechanism when generating code.
11596 2017-01-12 Justin Squirek <squirek@adacore.com>
11598 * exp_ch7.adb (Add_Type_Invariants, Process_Array_Component):
11599 Remove handling of access component with invariant.
11600 (Build_Invariant_Procedure_Declaration): Remove return on class
11602 * freeze.adb (Freeze_Array_Type, Freeze_Record_Type): Remove
11603 conditional exception for component or array so Has_Own_Invariants
11604 flag is not falsly set.
11605 * sem_ch3.adb (Make_Class_Wide_Type): Initialize copy of class
11606 wide type to have no invariant flags.
11608 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11610 * exp_ch9.adb, sem_prag.adb, s-tassta.adb, sem_util.adb, s-tarest.adb,
11611 sem_ch13.adb: Minor reformatting.
11613 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11615 * exp_aggr.adb (Build_Record_Aggr_Code): Guard against a missing
11616 adjustment primitive when the ancestor type was not properly frozen.
11617 (Gen_Assign): Guard against a missing initialization
11618 primitive when the component type was not properly frozen.
11619 (Initialize_Array_Component): Guard against a missing adjustment
11620 primitive when the component type was not properly frozen.
11621 (Initialize_Record_Component): Guard against a missing adjustment
11622 primitive when the component type was not properly frozen.
11623 (Process_Transient_Component_Completion): The transient object may
11624 not be finalized when its associated type was not properly frozen.
11625 * exp_ch3.adb (Build_Assignment): Guard against a missing
11626 adjustment primitive when the component type was not properly frozen.
11627 (Build_Initialization_Call): Guard against a missing
11628 initialization primitive when the associated type was not properly
11630 (Expand_N_Object_Declaration): Guard against a missing
11631 adjustment primitive when the base type was not properly frozen.
11632 (Predefined_Primitive_Bodies): Create an empty Deep_Adjust
11633 body when there is no adjustment primitive available. Create an
11634 empty Deep_Finalize body when there is no finalization primitive
11636 * exp_ch4.adb (Apply_Accessibility_Check): Guard against a
11637 missing finalization primitive when the designated type was
11638 not properly frozen.
11639 (Expand_N_Allocator): Guard against a missing initialization primitive
11640 when the designated type was not properly frozen.
11641 * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add the adjustment call
11642 only when the corresponding adjustment primitive is available.
11643 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Generate the
11644 adjustment/finalization statements only when there is an available
11645 primitive to carry out the action.
11646 (Build_Initialize_Statements): Generate the initialization/finalization
11647 statements only when there is an available primitive to carry out the
11649 (Make_Adjust_Call): Do not generate a call when the underlying
11650 type is not present due to a possible missing full view.
11651 (Make_Final_Call): Do not generate a call when the underlying
11652 type is not present due to a possible missing full view.
11653 (Make_Finalize_Address_Stmts): Generate an empty body when the
11654 designated type lacks a finalization primitive.
11655 (Make_Init_Call): Do not generate a call when the underlying type is
11656 not present due to a possible missing full view.
11657 (Process_Component_For_Adjust): Add the adjustment call only when the
11658 corresponding adjustment primitive is available.
11659 (Process_Component_For_Finalize): Add the finalization call only when
11660 the corresponding finalization primitive is available.
11661 (Process_Object_Declaration): Use a null statement to emulate a
11662 missing call to the finalization primitive of the object type.
11663 * exp_ch7.ads (Make_Adjust_Call): Update the comment on usage.
11664 (Make_Final_Call): Update the comment on usage.
11665 (Make_Init_Call): Update the comment on usage.
11666 * exp_util.adb (Build_Transient_Object_Statements): Code reformatting.
11668 2017-01-12 Arnaud Charlet <charlet@adacore.com>
11670 * einfo.ads: Update documentation of Address_Taken.
11671 * sem_attr.adb (Analyze_Access_Attribute, Resolve_Attribute
11672 [Access_Attribute]): Only consider 'Access/'Unchecked_Access
11673 for subprograms when setting Address_Taken flag.
11675 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
11677 * sem_ch10.adb (Analyze_With_Clause): Removed code that turned
11678 Configurable_Run_Time_Mode off when analysing with'ed predefined
11681 2017-01-12 Gary Dismukes <dismukes@adacore.com>
11683 * sem_prag.adb: Minor reformatting.
11684 * sem_util.adb (Unique_Entity): fix result for
11685 bodies of entry families.
11687 2017-01-12 Justin Squirek <squirek@adacore.com>
11689 * sem_prag.adb (Analyze_Pragma): Add appropriate calls to
11690 Resolve_Suppressible in the pragma Assertion_Policy case.
11691 (Resolve_Suppressible): Created this function to factor out
11692 common code used to resolve Suppress to either Ignore or Check
11693 * snames.ads-tmpl: Add name for Suppressible.
11695 2017-01-12 Gary Dismukes <dismukes@adacore.com>
11697 * exp_ch9.adb, s-secsta.adb, snames.ads-tmpl, exp_ch3.adb: Minor
11699 * debug.adb: Minor comment fixes.
11701 2017-01-12 Arnaud Charlet <charlet@adacore.com>
11703 * sem_util.adb (Unique_Entity): For concurrent
11704 bodies that are defined with stubs and complete a declaration
11705 of a single concurrent object return the entity of an implicit
11706 concurrent type, not the entity of the anonymous concurrent
11708 * debug.adb: -gnatd.J is no longer used.
11709 * make.adb (Globalize): Removed, no longer used.
11710 * sem_ch9.adb: minor typo in comment for entry index
11712 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
11714 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
11715 * exp_ch3.adb (Build_Init_Statements): As part of initialising
11716 the value record of a task, set its _Secondary_Stack_Size field
11718 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
11719 a _Secondary_Stack_Size field in the value record of
11720 the task if a Secondary_Stack_Size rep item is present.
11721 (Make_Task_Create_Call): Include secondary stack size
11722 parameter. If No_Secondary_Stack restriction is in place, passes
11724 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
11725 Secondary_Stack_Size.
11726 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
11727 function to define the overhead of the secondary stack.
11728 * s-tarest.adb (Create_Restricted_Task,
11729 Create_Restricted_Task_Sequential): Functions now include
11730 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
11731 * s-tarest.adb (Create_Restricted_Task,
11732 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB now
11733 include Secondary_Stack_Size parameter.
11734 (Task_Wrapper): Secondary stack now allocated to the size specified by
11735 the Secondary_Stack_Size parameter in the task's ATCB.
11736 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialize_ATCB): New
11737 Secondary_Stack_Size component.
11738 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
11739 Create_Restricted_Task_Sequential): Function now include
11740 Secondary_Stack_Size parameter.
11741 (Task_Wrapper): Secondary stack now allocated to the size
11742 specified by the Secondary_Stack_Size parameter in the task's
11744 * s-tproft.adb (Register_Foreign_Thread): Amended Initialize_ATCB call
11745 to include Secondary_Stack_Size parameter.
11746 * sem_ch13.adb (Analyze_Aspect_Specification): Add support for
11747 Secondary_Stack_Size aspect, turning the aspect into its corresponding
11748 internal attribute.
11749 (Analyze_Attribute_Definition): Process Secondary_Stack_Size attribute.
11750 * snames.adb-tmpl, snames.ads-tmpl: Added names
11751 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
11752 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
11754 2017-01-12 Yannick Moy <moy@adacore.com>
11756 * exp_spark.adb (Expand_SPARK_Potential_Renaming): Fix sloc of copied
11759 2017-01-12 Justin Squirek <squirek@adacore.com>
11761 * exp_attr.adb (Expand_N_Attribute_Reference):
11762 Fix Finalization_Size case by properly resolving the type after
11763 rewritting the node.
11765 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11767 * exp_util.adb (Build_DIC_Procedure_Body): Semi-insert the body into
11769 (Build_DIC_Procedure_Declaration): Semi-insert the body into the tree.
11770 * binde.adb, exp_ch5.adb, sem_type.adb, sem.ads, sem_res.adb,
11771 exp_sel.ads: Minor reformatting.
11773 2017-01-12 Justin Squirek <squirek@adacore.com>
11775 * exp_ch6.adb (Expand_Call): Add guard to prevent
11776 invariant checks from being created for internally generated
11779 2017-01-12 Bob Duff <duff@adacore.com>
11781 * lib-writ.ads: Remove incorrect comment.
11783 2017-01-12 Javier Miranda <miranda@adacore.com>
11785 * debug.adb (-gnatd.K): Enable generation of contract-only
11786 procedures in CodePeer mode.
11787 * contracts.adb (Build_And_Analyze_Contract_Only_Subprograms):
11789 (Analyze_Contracts): Generate contract-only procedures if -gnatdK is
11791 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): New
11793 (Get_Contract_Only_Missing_Body_Name): New subprogram.
11794 (Get_Contract_Only_Body): New subprogram.
11795 (Set_Contract_Only_Body): New subprogram.
11796 (Is_Contract_Only_Body): New subprogram.
11797 (Set_Is_Contract_Only_Body): New subprogram.
11798 (SCIL_Nodes): Replace table by hash-table.
11800 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11802 * exp_ch6.adb: Minor reformatting.
11803 * spark_xrefs.ads: minor cleanup of comments for SPARK xrefs
11805 2017-01-12 Bob Duff <duff@adacore.com>
11807 * binde.adb (Forced): New reason for a dependence.
11808 (Force_Elab_Order): Implementation of the new switch.
11809 * binde.ads: Minor comment fixes.
11810 * bindusg.adb: Add -f switch. Apparently, there was an -f switch
11811 long ago that is no longer supported; removed comment about that.
11812 * opt.ads (Force_Elab_Order_File): Name of file specified for
11814 * switch-b.adb: Parse -f switch.
11816 2017-01-12 Justin Squirek <squirek@adacore.com>
11818 * exp_ch6.adb (Check_View_Conversion): Created this function
11819 to properly chain calls to check type invariants that may be
11820 present in a subprogram call after the subprogram.
11821 (Expand_Call): Add a conditional to identify when a view conversion
11822 needs to be checked.
11823 * nlists.adb, nlists.ads (Prepend_New): New routine.
11824 (Prepend_New_To): New routine.
11826 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11828 * sinfo.ads: Minor reformatting.
11830 2017-01-12 Gary Dismukes <dismukes@adacore.com>
11832 * exp_util.adb, exp_util.ads, einfo.ads: Minor typo fixes and
11835 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
11837 * exp_ch6.adb (Make_Build_In_Place_Call_In_Anonymous_Context): Add new
11838 variable Definite. Create a local object and pass its 'Access to the
11839 BIP function when the result type is either definite or it does not
11840 require any finalization or secondary stack management.
11842 2017-01-12 Bob Duff <duff@adacore.com>
11844 * contracts.adb, einfo.adb, errout.adb, exp_attr.adb,
11845 exp_ch3.adb, exp_ch7.adb, exp_ch9.adb, exp_prag.adb, freeze.adb,
11846 frontend.adb, ghost.adb, inline.adb, lib-writ.adb, lib-xref.adb,
11847 par.adb, par-ch10.adb, par-ch2.adb, par-prag.adb, par_sco.adb,
11848 sem_attr.adb, sem_aux.adb, sem_ch10.adb, sem_ch12.adb,
11849 sem_ch13.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
11850 sem_prag.adb, sem_res.adb, sem_util.adb, sem_util.ads,
11851 sem_warn.adb, sinfo.adb, sinfo.ads, sprint.adb (Pragma_Name):
11852 Change name to Pragma_Name_Unmapped.
11853 (Pragma_Name_Mapped): Change name to Pragma_Name.
11854 This is because the "mapped" version should be the usual case.
11856 2017-01-09 Hristian Kirtchev <kirtchev@adacore.com>
11858 * einfo.ads, einfo.adb: Remove uses of flags Has_Default_Init_Cond,
11859 Is_Default_Init_Cond_Procedure, and
11860 Has_Inherited_Default_Init_Cond. Add uses of flags
11861 Has_Own_DIC, Is_DIC_Procedure, and Has_Inherited_DIC.
11862 (Default_Init_Cond_Procedure): Removed.
11863 (DIC_Procedure): New routine.
11864 (Has_Default_Init_Cond): Removed.
11865 (Has_DIC): New routine.
11866 (Has_Inheritable_Invariants): The attribute applies to the base type.
11867 (Has_Inherited_Default_Init_Cond): Removed.
11868 (Has_Inherited_DIC): New routine.
11869 (Has_Inherited_Invariants): The attribute applies to the base type.
11870 (Has_Own_DIC): New routine.
11871 (Has_Own_Invariants): The attribute applies to the base type.
11872 (Is_Default_Init_Cond_Procedure): Removed.
11873 (Is_DIC_Procedure): New routine.
11874 (Set_Default_Init_Cond_Procedure): Removed.
11875 (Set_DIC_Procedure): New routine.
11876 (Set_Has_Default_Init_Cond): Removed.
11877 (Set_Has_Inheritable_Invariants): The attribute applies
11879 (Set_Has_Inherited_Default_Init_Cond): Removed.
11880 (Set_Has_Inherited_DIC): New routine.
11881 (Set_Has_Inherited_Invariants): The attribute applies to the base type.
11882 (Set_Has_Own_DIC): New routine.
11883 (Set_Has_Own_Invariants): The attribute applies to the base type.
11884 (Set_Is_Default_Init_Cond_Procedure): Removed.
11885 (Set_Is_DIC_Procedure): New routine.
11886 (Write_Entity_Flags): Update the output of all flags related to
11887 default initial condition.
11888 * exp_ch3.adb (Expand_N_Object_Declaration): Update the generation
11889 of the call to the DIC procedure.
11890 (Freeze_Type): Generate the body of the DIC procedure.
11891 * exp_ch7.adb (Build_Invariant_Procedure_Body): Replace
11892 all occurrences of Create_Append with Append_New_To. Do
11893 not generate an invariant procedure for a class-wide type.
11894 The generated body acts as a freeze action of the working type.
11895 (Build_Invariant_Procedure_Declaration): Do not generate an
11896 invariant procedure for a class-wide type.
11897 (Create_Append): Removed.
11898 * exp_util.adb: Add with and use clauses for Sem_Ch3, sem_ch6,
11899 sem_Ch12, Sem_Disp, and GNAT.HTable. Move the handling of
11900 class-wide pre/postcondition description and data structures from
11902 (Build_Class_Wide_Expression): Moved from Sem_Prag.
11903 (Build_DIC_Call): New routine.
11904 (Build_DIC_Procedure_Body): New routine.
11905 (Build_DIC_Procedure_Declaration): New routine.
11906 (Entity_Hash): Moved from Sem_Prag.
11907 (Find_DIC_Type): New routine.
11908 (Update_Primitives_Mapping): Reimplemented.
11909 (Update_Primitives_Mapping_Of_Types): New routine.
11910 * exp_util.ads (Build_Class_Wide_Expression): Moved from Sem_Prag.
11911 (Build_DIC_Call): New routine.
11912 (Build_DIC_Procedure_Body): New routine.
11913 (Build_DIC_Procedure_Declaration): New routine.
11914 (Update_Primitives_Mapping): Moved from Sem_Prag.
11915 (Update_Primitives_Mapping_Of_Types): New routine.
11916 * nlists.adb (Append_New): New routine.
11917 (Append_New_To): New routine.
11918 * nlists.ads (Append_New): New routine.
11919 (Append_New_To): New routine.
11920 * sem_ch3.adb (Analyze_Declarations): Do not generate the bodies
11921 of DIC procedures here. This is now done at the end of the
11922 visible declarations, private declarations, and at the freeze
11924 (Analyze_Private_Extension_Declaration):
11925 A private extension inherits the DIC pragma of a parent type.
11926 (Analyze_Subtype_Declaration): No need to propagate invariant
11927 attributes to a subtype as those apply to the base type.
11928 (Build_Derived_Record_Type): No need to inherit invariants here
11929 as this is now done in Build_Derived_Type.
11930 (Build_Derived_Type): Inherit both the DIC pragma and invariants from
11932 (Process_Full_View): Update the propagation of DIC attributes.
11933 (Propagate_Default_Init_Cond_Attributes): Removed.
11934 * sem_ch7.adb Add with and use clauses for Exp_Util.
11935 (Analyze_Package_Specification): Create the body of the DIC
11936 procedure at the end of the visible and private declarations.
11937 (Preserve_Full_Attributes): Propagate DIC attributes.
11938 * sem_ch9.adb (Analyze_Protected_Type_Declaration): Propagate
11940 (Analyze_Task_Type_Declaration): Propagate DIC attributes.
11941 * sem_elab.adb (Check_A_Call): Update the call to
11942 Is_Nontrivial_Default_Init_Cond_Procedure.
11943 * sem_prag.adb Remove the with and use clauses for
11944 GNAT.HTable. Move the handling of class- wide pre/postcondition
11945 description and data structures to Exp_Util.
11946 (Analyze_Pragma): Create the declaration of the DIC procedure. There
11947 is no need to propagate invariant-related attributes at this point
11948 as this is done in Build_Invariant_Procedure_Declaration.
11949 (Build_Class_Wide_Expression): Moved to Exp_Util.
11950 (Entity_Hash): Moved to Exp_Util.
11951 (Update_Primitives_Mapping): Moved to Exp_Util.
11952 * sem_prag.ads (Build_Class_Wide_Expression): Moved to Exp_Util.
11953 (Update_Primitives_Mapping): Moved to Exp_Util.
11954 * sem_util.adb: Remove with and use clauses for Ghost
11956 (Build_Default_Init_Cond_Call): Removed.
11957 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
11958 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
11959 (Get_Views): Reimplemented.
11960 (Has_Full_Default_Initialization): Reimplement the section on DIC.
11961 (Inherit_Default_Init_Cond_Procedure): Removed.
11962 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
11963 (Is_Nontrivial_DIC_Procedure): New routine.
11964 (Is_Verifiable_DIC_Pragma): New routine.
11965 (Propagate_DIC_Attributes): New routine.
11966 * sem_util.ads (Build_Default_Init_Cond_Call): Removed.
11967 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
11968 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
11969 (Inherit_Default_Init_Cond_Procedure): Removed.
11970 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
11971 (Is_Nontrivial_DIC_Procedure): New routine.
11972 (Is_Verifiable_DIC_Pragma): New routine.
11973 (Propagate_DIC_Attributes): New routine.
11974 * sem_warn.adb (Is_OK_Fully_Initialized): Reimplement the section
11976 * sinfo.ads, sinfo.adb: Add new attribute Expression_Copy along with
11978 (Expression_Copy): New routine along with pragma Inline.
11979 (Set_Expression_Copy): New routine along with pragma Inline.
11981 2017-01-06 Bob Duff <duff@adacore.com>
11983 * bindgen.adb (Gen_Adainit, Gen_Adafinal): Change
11984 "Bind_Main_Program" to "not Bind_For_Library", because otherwise
11985 we won't generate the call to s_stalib_adafinal when the main
11986 is not written in Ada.
11988 2017-01-06 Bob Duff <duff@adacore.com>
11990 * sem_prag.adb: Minor: remove pragma Warnings.
11992 2017-01-06 Tristan Gingold <gingold@adacore.com>
11994 * Makefile.rtl: Do not compile s-stchop by default.
11996 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
11998 * aspects.adb, aspects.ads, exp_ch3.adb, exp_ch9.adb, par-prag.adb,
11999 sem_ch13.adb, sem_prag.adb, sem_prag.ads, snames.adb-tmpl,
12000 snames.ads-tmpl, s-secsta.adb, s-secsta.ads, s-tarest.adb,
12001 s-tarest.ads, s-taskin.adb, s-taskin.ads, s-tassta.adb, s-tassta.ads:
12002 Reverted previous change for now.
12004 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12006 * exp_ch3.adb (Build_Initialization_Call): Apply predicate
12007 check to default discriminant value if checks are enabled.
12008 (Build_Assignment): If type of component has static predicate,
12009 apply check to its default value, if any.
12011 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
12013 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
12014 * exp_ch3.adb (Build_Init_Statements): As part of initialising
12015 the value record of a task, set its _Secondary_Stack_Size field
12017 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
12018 a _Secondary_Stack_Size field in the value record of
12019 the task if a Secondary_Stack_Size rep item is present.
12020 (Make_Task_Create_Call): Include secondary stack size
12021 parameter. If No_Secondary_Stack restriction is in place, passes
12023 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
12024 Secondary_Stack_Size.
12025 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
12026 function to define the overhead of the secondary stack.
12027 * s-tarest.adb (Create_Restricted_Task,
12028 Create_Restricted_Task_Sequential): Functions now include
12029 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
12030 * s-tarest.adb (Create_Restricted_Task,
12031 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB
12032 now include Secondary_Stack_Size parameter.
12034 Secondary stack now allocated to the size specified by the
12035 Secondary_Stack_Size parameter in the task's ATCB.
12036 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialise_ATCB): New
12037 Secondary_Stack_Size component.
12038 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
12039 Create_Restricted_Task_Sequential): Function now include
12040 Secondary_Stack_Size parameter.
12041 (Task_Wrapper): Secondary stack
12042 now allocated to the size specified by the Secondary_Stack_Size
12043 parameter in the task's ATCB.
12044 * sem_ch13.adb (Analyze_Aspect_Specification): Add support
12045 for Secondary_Stack_Size aspect, turning the aspect into its
12046 corresponding internal attribute.
12047 (Analyze_Attribute_Definition):
12048 Process Secondary_Stack_Size attribute.
12049 * snames.adb-tmpl, snames.ads-tmpl: Added names
12050 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
12051 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
12053 2017-01-06 Pascal Obry <obry@adacore.com>
12055 * a-direio.adb, a-direio.ads, a-sequio.adb, a-sequio.ads: Add Flush to
12056 Sequential_IO and Direct_IO.
12058 2017-01-06 Bob Duff <duff@adacore.com>
12060 * snames.ads-tmpl (Renamed): New name for the pragma argument.
12061 * par-ch2.adb: Allow the new pragma (with analysis deferred
12063 * sinfo.ads, sinfo.adb (Map_Pragma_Name, Pragma_Name_Mapped):
12064 Keep a mapping from new pragma names to old names.
12065 * sem_prag.adb: Check legality of pragma Rename_Pragma, and
12066 implement it by calling Map_Pragma_Name.
12067 * checks.adb, contracts.adb, einfo.adb, errout.adb,
12068 * exp_attr.adb, exp_ch3.adb, exp_ch6.adb, exp_ch7.adb, exp_ch9.adb,
12069 * exp_prag.adb, exp_util.adb, freeze.adb, frontend.adb, ghost.adb,
12070 * inline.adb, lib-writ.adb, scans.adb, scans.ads, sem_attr.adb,
12071 * sem_aux.adb, sem_ch10.adb, sem_ch13.adb, sem_ch6.adb, sem_ch9.adb,
12072 * sem_elab.adb, sem_res.adb, sem_util.adb, sem_util.ads,
12073 * sem_warn.adb: Call Pragma_Name_Mapped instead of Pragma_Name
12076 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12078 * exp_ch9.adb: Minor reformatting.
12080 2017-01-06 Tristan Gingold <gingold@adacore.com>
12082 * exp_ch9.ads, exp_ch9.adb (Build_Entry_Names): Remove (unused).
12083 * rtsfind.ads (RE_Task_Entry_Names_Array, RO_ST_Set_Entry_Names)
12084 (RE_Protected_Entry_Names_Array, RO_PE_Set_Entry_Names): Remove
12086 * s-taskin.ads, s-taskin.adb (Set_Entry_Names,
12087 Task_Entry_Names_Array, Task_Entry_Names_Access): Remove.
12088 * s-tpoben.ads, s-tpoben.adb (Set_Entry_Names,
12089 Protected_Entry_Names_Array, Protected_Entry_Names_Access): Remove.
12091 2017-01-06 Bob Duff <duff@adacore.com>
12093 * sinfo.ads, sinfo.adb (Map_Pragma_Name): Preparation work,
12094 dummy implementation of Map_Pragma_Name.
12096 2017-01-06 Tristan Gingold <gingold@adacore.com>
12098 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Make the
12099 entry_body variable constant.
12100 * s-taprob.ads (Entry_Body_Access): Move to s-tposen.
12101 * s-tpoben.ads (Protected_Entry_Body_Access): Now access
12103 * s-tposen.ads (Entry_Body_Access): Moved from s-taprob,
12104 now access to constant.
12106 2017-01-06 Gary Dismukes <dismukes@adacore.com>
12108 * einfo.ads, sem_res.adb, sem_attr.adb, sem_ch6.adb: Minor
12109 reformatting and typo fixes.
12111 2017-01-06 Bob Duff <duff@adacore.com>
12113 * snames.ads-tmpl: New names for pragma renaming.
12114 * snames.adb-tmpl (Is_Configuration_Pragma_Name): Minor cleanup.
12115 * par-prag.adb: Add new pragma name to case statement.
12116 * sem_prag.adb (Rename_Pragma): Initial cut at semantic analysis
12118 * sinfo.ads, sinfo.adb (Pragma_Name_Mapped): Preparation work,
12119 Dummy implementation of Pragma_Name_Mapped.
12121 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12123 * exp_ch6.adb (Expand_Protected_Subprogram_Call): Add guard to
12124 better detect call within an entry_wrapper.
12125 * sem_res.adb (Resolve_Call): A protected call within an
12126 entity_wrapper is analyzed in the context of the protected
12127 object but corresponds to a pre-analysis and is not an access
12128 before elaboration.
12129 * sem_attr.adb: Minor reformatting.
12131 2017-01-06 Justin Squirek <squirek@adacore.com>
12133 * sem_attr.adb (Analyze_Attribute): Modify semantic checks for
12134 Finalization_Size to allow a prefix of any non-class-wide type.
12135 * sem_attr.ads Modify comment for Finalization_Size to include
12136 definite type use case.
12138 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12140 * einfo.ads, einfo.adb (Is_Entry_Wrapper): New flag, defined
12141 on procedures that are wrappers created for entries that have
12143 * sem_ch6.adb (Analyze_Subrogram_Body_Helper): If the subprogram
12144 body is an entry_wrapper, compile it in the context of the
12145 synchronized type, because a precondition may refer to funtions
12147 * exp_ch9.adb (Build_Contract_Wrapper): Set Is_Entry_Wrapper on
12149 * exp_ch6.adb (Expand_Protected_Subprogram_Call): if the call is
12150 within an Entry_Wrapper this is an external call whose target
12151 is the synchronized object that is the actual in the call to
12154 2017-01-06 Yannick Moy <moy@adacore.com>
12156 * sem_attr.adb (Analyze_Attribute/Attribute_Loop_Entry): Analyze node
12157 in tree, which means not analyzing the previous prefix if the node has
12158 been rewritten into its prefix.
12160 2017-01-06 Gary Dismukes <dismukes@adacore.com>
12162 * s-tpobop.adb: Minor reformatting.
12164 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12166 * checks.adb (Ensure_Valid): Do not generate a validity check
12167 within a generated predicate function, validity checks will have
12168 been applied earlier when required.
12170 2017-01-06 Tristan Gingold <gingold@adacore.com>
12172 * s-tpoben.ads (Protection_Entries): Add comment and reorder
12173 components for performances.
12174 * s-tpobop.adb (PO_Do_Or_Queue): Implement Max_Queue_Length runtime
12177 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12179 * sem_eval.adb (Check_Expression_Against_Static_Predicate):
12180 If expression is compile-time known and obeys a static predicate
12181 it must be labelled as static, to prevent spurious warnings and
12182 run-time errors, e.g. in case statements. This is relevant when
12183 the expression is the result of constant-folding a type conversion
12184 whose expression is a variable with a known static value.
12186 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12188 * exp_attr.adb, sem_attr.ads: Minor reformatting.
12190 2017-01-06 Justin Squirek <squirek@adacore.com>
12192 * exp_attr.adb (Expand_N_Attribute_Reference): Add entry for
12193 expansion of Finalization_Size attribute.
12194 * sem_attr.adb (Analyze_Attribute): Add entry to check the
12195 semantics of Finalization_Size.
12196 (Eval_Attribute): Add null entry for Finalization_Size.
12197 * sem_attr.ads: Add Finalization_Size to the implementation
12198 dependent attribute list.
12199 * snames.ads-tmpl: Add name entry for Finalization_Size attribute.
12201 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12203 * sem_ch5.adb (Analyze_Loop_Statement): If the loop includes an
12204 iterator specification with a serious syntactic error, transform
12205 construct into an infinite loop in order to continue analysis
12206 and prevent a compiler abort.
12208 2017-01-06 Tristan Gingold <gingold@adacore.com>
12210 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Do not generate
12211 max_queue_lengths_array if unused.
12213 2017-01-06 Bob Duff <duff@adacore.com>
12215 * errout.adb (Set_Msg_Text): Protect against out-of-bounds
12216 array access, in case "\" is at the end of Text.
12217 * stylesw.adb (Set_Style_Check_Options): Don't include input
12218 characters in the error message template, because they could
12219 be control characters such as "\", which Errout will try to
12222 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12224 * sem_ch4.adb (Find_Indexing_Operations, Inspect_Declarations):
12225 For a private type examine the visible declarations that follow
12226 the partial view, not just the private declarations that follow
12229 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12231 * exp_ch5.adb, sem_ch3.adb, checks.adb: Minor reformatting and
12234 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12236 * exp_ch5.adb (Get_Default_Iterator): For a derived type, the
12237 alias of the inherited op is the parent iterator, no need to
12238 examine dispatch table positions which might not be established
12239 yet if type is not frozen.
12240 * sem_disp.adb (Check_Controlling_Formals): The formal of a
12241 predicate function may be a subtype of a tagged type.
12242 * sem_ch3.adb (Complete_Private_Subtype): Adjust inheritance
12243 of representation items for the completion of a type extension
12244 where a predicate applies to the partial view.
12245 * checks.ads, checks.adb (Apply_Predicate_Check): Add optional
12246 parameter that designates function whose actual receives a
12247 predicate check, to improve warning message when the check will
12248 lead to infinite recursion.
12249 * sem_res.adb (Resolve_Actuals): Pass additional parameter to
12250 Apply_Predicate_Check.
12252 2017-01-06 Tristan Gingold <gingold@adacore.com>
12254 * s-rident.ads (Profile_Info): Remove No_Entry_Queue from
12255 Gnat_Extended_Ravenscar.
12256 * exp_ch9.adb, s-tpoben.adb, s-tpoben.ads: Fix spelling.
12258 2017-01-06 Gary Dismukes <dismukes@adacore.com>
12260 * sem_util.ads: Minor typo fix and reformatting.
12262 2017-01-06 Yannick Moy <moy@adacore.com>
12264 * ghost.adb Minor fixing of references to SPARK RM.
12265 (Check_Ghost_Context): Check whether reference is to a lvalue
12266 before issuing an error about violation of SPARK RM 6.9(13)
12267 when declaration has Ghost policy Check and reference has Ghost
12269 * sem_util.adb Minor indentation.
12270 * sem_ch10.adb (Analyze_Package_Body_Stub, Analyze_Protected_Body_Stub,
12271 Analyze_Task_Body_Stub): Set Ekind of the defining identifier.
12272 * sem_util.ads (Unique_Defining_Entity): Document the result
12273 for package body stubs.
12275 2017-01-06 Tristan Gingold <gingold@adacore.com>
12277 * raise-gcc.c (abort): Macro to call Abort_Propagation.
12278 * s-tpoben.ads (Protected_Entry_Queue_Max_Access): Make it access
12280 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
12281 Do not generate the Entry_Max_Queue_Lengths_Array if all default
12283 * exp_util.adb (Corresponding_Runtime_Package): Consider
12284 Max_Queue_Length pragma.
12286 2017-01-06 Justin Squirek <squirek@adacore.com>
12288 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
12289 Remove declaration generation in the case of
12290 System_Tasking_Protected_Objects_Single_Entry being used,
12291 and add a warning message when this is detected to occur.
12292 (Make_Initialize_Protection): Remove reference pass in the case
12293 of System_Tasking_Protected_Objects_Single_Entry.
12294 * rtsfind.ads: Remove RE_Protected_Entry_Queue_Max
12295 * s-tposen.adb (Initialize_Protection_Entry): Remove
12296 Entry_Queue_Max parameter.
12297 * s-tposen.ads: Remove the types use to store the entry queue
12299 * sem_prag.adb (Analyze_Pragma): Remove entry families restriction
12301 2017-01-06 Yannick Moy <moy@adacore.com>
12303 * sem_util.adb, sem_util.ads (Get_Enum_Lit_From_Pos): Strengthen
12304 behavior of function, to also accept out of range positions
12305 and raise Constraint_Error in such case, and to copy sloc from
12306 literal if No_Location passed as location.
12307 * uintp.adb, uintp.ads (UI_To_Int, UI_To_CC): Strengthen behavior
12308 of functions to raise Constraint_Error in case of value not in
12311 2017-01-06 Tristan Gingold <gingold@adacore.com>
12313 * sem_util.adb, s-taprop-linux.adb (Finalize_TCB): Remove call to
12314 Invalidate_Stack_Cache.
12316 2017-01-06 Eric Botcazou <ebotcazou@adacore.com>
12318 * s-os_lib.adb: Minor fix to the signature of Readlink.
12320 2017-01-06 Javier Miranda <miranda@adacore.com>
12322 * sem_ch6.adb (Conforming_Types): Handle another
12323 confusion between views in a nested instance with an actual
12324 private type whose full view is not in scope.
12326 2017-01-06 Arnaud Charlet <charlet@adacore.com>
12328 * exp_ch5.adb (Expand_N_If_Statement): Obey existing comment and
12329 mark a rewritten if statement as explicit (Comes_From_Source).
12331 2017-01-06 Gary Dismukes <dismukes@adacore.com>
12333 * sem_prag.adb, rtsfind.adb, sem_util.adb: Minor typo fixes.
12335 2017-01-06 Tristan Gingold <gingold@adacore.com>
12337 * ada.ads, a-unccon.ads: Add pragma No_Elaboration_Code_All.
12339 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12341 * sem_case.adb: Minor reformatting.
12343 2017-01-06 Thomas Quinot <quinot@adacore.com>
12345 * g-socthi-mingw.adb: Remove now extraneous USE TYPE clause
12347 2017-01-06 Justin Squirek <squirek@adacore.com>
12349 * aspects.adb: Register aspect in Canonical_Aspect.
12350 * aspects.ads: Associate qualities of Aspect_Max_Queue_Length
12351 into respective tables.
12352 * einfo.ads, einfo.adb: Add a new attribute for
12353 handling the parameters for Pragma_Max_Entry_Queue
12354 (Entry_Max_Queue_Lengths_Array) in E_Protected_Type. Subprograms
12355 for accessing and setting were added as well.
12356 * par-prag.adb (Prag): Register Pramga_Max_Entry_Queue.
12357 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Emit
12358 declaration for pramga arguments and store them in the protected
12360 (Make_Initialize_Protection): Pass a reference to
12361 the Entry_Max_Queue_Lengths_Array in the protected type node to
12363 * rtsfind.adb: Minor grammar fix.
12364 * rtsfind.ads: Register new types taken from the
12365 runtime libraries RE_Protected_Entry_Queue_Max and
12366 RE_Protected_Entry_Queue_Max_Array
12367 * s-tposen.adb, s-tpoben.adb
12368 (Initialize_Protection_Entry/Initialize_Protection_Entries):
12369 Add extra parameter and add assignment to local object.
12370 * s-tposen.ads, s-tpoben.ads: Add new types to
12371 store entry queue maximums and a field to the entry object record.
12372 * sem_ch13.adb (Analyze_Aspect_Specifications): Add case statement
12373 for Aspect_Max_Queue_Length.
12374 (Check_Aspect_At_Freeze_Point):
12375 Add aspect to list of aspects that don't require delayed analysis.
12376 * sem_prag.adb (Analyze_Pragma): Add case statement for
12377 Pragma_Max_Queue_Length, check semantics, and register arugments
12378 in the respective entry nodes.
12379 * sem_util.adb, sem_util.ads Add functions Get_Max_Queue_Length
12380 and Has_Max_Queue_Length
12381 * snames.ads-tmpl: Add constant for the new aspect-name
12382 Name_Max_Queue_Length and corrasponding pragma.
12384 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12386 * exp_util.adb (Is_Controlled_Function_Call):
12387 Reimplemented. Consider any node which has an entity as the
12388 function call may appear in various ways.
12390 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12392 * exp_attr.adb (Rewrite_Stream_Proc_Call): Use
12393 an unchecked type conversion when performing a view conversion
12394 to/from a private type. In all other cases use a regular type
12395 conversion to ensure that any relevant checks are properly
12398 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
12400 * sem_prag.adb, sem_ch8.adb: Minor reformatting.
12402 2017-01-06 Ed Schonberg <schonberg@adacore.com>
12404 * sem_case.adb (Explain_Non_Static_Bound): Suppress cascaded
12405 error on case expression that is an entity, when coverage is
12406 incomplete and entity has a static value obtained by local
12408 (Handle_Static_Predicate): New procedure, subsidiary of
12409 Check_Choices, to handle case alternatives that are either
12410 subtype names or subtype indications involving subtypes that
12411 have static predicates.
12413 2017-01-06 Thomas Quinot <quinot@adacore.com>
12415 * s-oscons-tmplt.c, g-socket.adb, g-socket.ads, g-sothco.ads:
12416 (GNAT.Socket): Add support for Busy_Polling and Generic_Option
12418 2017-01-06 Bob Duff <duff@adacore.com>
12420 * sem_elab.adb (Activate_Elaborate_All_Desirable): Don't add
12421 Elaborate_All(P) to P itself. That could happen in obscure cases,
12422 and always introduced a cycle (P body must be elaborated before
12424 * lib-writ.ads: Comment clarification.
12425 * ali-util.ads: Minor comment fix.
12426 * ali.adb: Minor reformatting.
12428 2017-01-06 Tristan Gingold <gingold@adacore.com>
12430 * a-exexpr-gcc.adb: Improve comment.
12432 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
12434 * s-linux-mips.ads: Use correct signal and errno constants.
12435 (sa_handler_pos, sa_mask_pos): Fix offsets for 64-bit MIPS.
12437 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
12439 * s-linux-mips.ads: Rename from s-linux-mipsel.ads.
12440 * gcc-interface/Makefile.in (MIPS/Linux): Merge mips and mipsel
12443 2017-01-01 Eric Botcazou <ebotcazou@adacore.com>
12445 * gnatvsn.ads: Bump copyright year.
12447 2017-01-01 Jakub Jelinek <jakub@redhat.com>
12449 * gnat_ugn.texi: Bump @copying's copyright year.
12450 * gnat_rm.texi: Likewise.
12452 Copyright (C) 2017 Free Software Foundation, Inc.
12454 Copying and distribution of this file, with or without modification,
12455 are permitted in any medium without royalty provided the copyright
12456 notice and this notice are preserved.