1 2018-01-25 Release Manager
5 2017-12-14 Eric Botcazou <ebotcazou@adacore.com>
7 * gcc-interface/decl.c (gnat_to_gnu_field): Do not set the alignment
8 of the enclosing record type if it is not already set.
10 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
12 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Initialize locus.
14 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
16 * gcc-interface/trans.c (process_freeze_entity): Be prepared for a
19 2017-12-13 Eric Botcazou <ebotcazou@adacore.com>
21 * gcc-interface/decl.c (gnat_to_gnu_entity): Robustify test for types
22 descendant of System.Address.
23 (gnat_to_gnu_subprog_type): Likewise.
25 2017-12-04 Sebastian Huber <sebastian.huber@embedded-brains.de>
27 * gcc-interface/Makefile.in (RTEMS): Use s-osprim.adb.
28 * s-osprim-rtems.adb: New file.
29 * s-osinte-rtems.adb (pthread_cond_t): Fix alignment.
30 (pthread_mutexattr_t): Likewise.
31 (pthread_rwlockattr_t): Likewise.
32 (pthread_rwlock_t): Likewise.
33 (time_t): Use 64-bit integer.
35 2017-12-01 Sebastian Huber <sebastian.huber@embedded-brains.de>
37 * s-osinte-rtems.ads (pthread_cond_t): Use correct size and
39 (pthread_mutex_t): Likewise.
40 (pthread_rwlock_t): Likewise.
42 2017-11-10 Eric Botcazou <ebotcazou@adacore.com>
44 * gcc-interface/utils.c (convert) <RECORD_TYPE>: Add comment and do
45 not fall through to the next case.
46 <ARRAY_TYPE>: Deal specially with a dereference from another array
47 type with the same element type.
49 2017-10-21 Eric Botcazou <ebotcazou@adacore.com>
51 * gcc-interface/Makefile.in: Remove bogus settings for VxWorks.
53 2017-10-05 Eric Botcazou <ebotcazou@adacore.com>
56 * mingw32.h (_O_U8TEXT, _O_U16TEXT, _O_WTEXT): Delete.
57 * sysdep.c (__gnat_set_mode ): Use DJGPP version for Cygwin.
59 2017-09-15 Martin Liska <mliska@suse.cz>
61 Backport from mainline
62 2017-08-29 Martin Liska <mliska@suse.cz>
65 * gcc-interface/trans.c (Pragma_to_gnu): Set argument to NULL.
67 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
69 * gcc-interface/decl.c (promote_object_alignment): New function taken
71 (gnat_to_gnu_entity) <E_Variable>: ...here. Invoke it.
72 (gnat_to_gnu_field): If the field is Atomic or VFA, invoke it and
73 create a padding type on success before doing the atomic check.
75 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
77 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Apply the
78 promotion to static memory earlier in the processing.
80 2017-09-09 Eric Botcazou <ebotcazou@adacore.com>
82 * sem_util.ads (Set_Rep_Info): New inline procedure.
83 * sem_util.adb (Set_Rep_Info): Implement it.
84 * sem_ch3.adb (Process_Subtype): If the case of a constraint present,
85 always copy the representation aspects onto the subtype.
86 * gcc-interface/decl.c (gnat_to_gnu_entity): Only set the TYPE_ALIGN_OK
87 and TYPE_BY_REFERENCE_P flags on types after various promotions.
88 * gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:
89 Consider all kinds of entities.
91 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
94 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
95 for Itypes that are E_Record_Subtype with a cloned subtype.
96 <E_Record_Subtype>: Use the DECL of the cloned type directly, if any.
98 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
100 * gcc-interface/utils.c (unchecked_convert): When the result type is a
101 non-biased integral type with size 0, set the result to 0 directly.
103 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
105 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
106 there is no target, do not create a temporary for the return value for
109 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
111 * gcc-interface/trans.c (pos_to_constructor): Skip conversions to an
112 unconstrained array type.
114 2017-08-14 Release Manager
116 * GCC 7.2.0 released.
118 2017-07-15 John Paul Adrian Glaubitz <glaubitz@physik.fu-berlin.de>
121 * system-linux-m68k.ads: Add pragma No_Elaboration_Code_All.
122 (Backend_Overflow_Checks): Set to True.
124 2017-06-15 Nicolas Boulenguez <nicolas.boulenguez@free.fr>
127 * gcc-interface/Makefile.in (x86 kfreebsd): Adjust system.ads setting.
128 (i[3456]86-pc-gnu): Likewise.
129 (x86_64 kfreebsd): Likewise.
131 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
134 * s-interr-hwint.adb: Reinstate.
135 * gcc-interface/Makefile.in (RTEMS): Use it again.
137 2017-06-12 Sebastian Huber <sebastian.huber@embedded-brains.de>
139 Backport from mainline
140 2017-06-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
142 * Makefile.in (rtems): Use TLS implementation for s-tpopsp.adb.
143 * s-tpopsp-rtems.adb: Delete.
145 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
147 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
148 for Itypes that are E_Access_Subtype.
149 <E_Access_Subtype>: Use the DECL of the base type directly.
151 2017-05-17 Eric Botcazou <ebotcazou@adacore.com>
154 Backport from mainline
156 2017-05-02 Ed Schonberg <schonberg@adacore.com>
158 * exp_ch3.adb (Freeze_Type): Do not generate an invariant
159 procedure body for a local (sub)type declaration within a
160 predicate function. Invariant checks do not apply to these, and
161 the expansion of the procedure will happen in the wrong scope,
162 leading to misplaced freeze nodes.
164 2017-05-12 Eric Botcazou <ebotcazou@adacore.com>
166 * system-linux-arm.ads (Memory_Size): Use Long_Integer'Size
167 instead of Word_Size.
170 2017-03-28 Andreas Schwab <schwab@suse.de>
173 * system-linux-aarch64-ilp32.ads: New file.
174 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
175 from LIBGNAT_TARGET_PAIRS.
176 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
177 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
178 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
179 or -mabi=ilp32, resp.
181 2017-05-10 H.J. Lu <hongjiu.lu@intel.com>
183 Back port from mainline
184 2017-05-10 H.J. Lu <hongjiu.lu@intel.com>
187 * system-linux-x86.ads (Memory_Size): Use Long_Integer'Size
188 instead of Word_Size.
190 2017-05-02 Release Manager
192 * GCC 7.1.0 released.
194 2017-04-04 Andreas Krebbel <krebbel@linux.vnet.ibm.com>
196 * system-linux-s390.ads: Use Long_Integer'Size to define
199 2017-04-04 Eric Botcazou <ebotcazou@adacore.com>
201 * sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
203 2017-04-03 Jonathan Wakely <jwakely@redhat.com>
205 * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo.
206 * g-socket.adb (To_Host_Entry): Fix typo in comment.
207 * gnat_ugn.texi: Fix typo.
208 * raise.c (_gnat_builtin_longjmp): Fix capitalization in comment.
209 * s-stposu.adb (Allocate_Any_Controlled): Fix typo in comment.
210 * sem_ch3.adb (Build_Derived_Record_Type): Likewise.
211 * sem_util.adb (Mark_Coextensions): Likewise.
212 * sem_util.ads (Available_Full_View_Of_Component): Likewise.
214 2017-03-28 Andreas Schwab <schwab@suse.de>
217 * system-linux-aarch64-ilp32.ads: New file.
218 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
219 from LIBGNAT_TARGET_PAIRS.
220 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
221 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
222 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
223 or -mabi=ilp32, resp.
225 2017-03-14 James Cowgill <James.Cowgill@imgtec.com>
227 * s-osinte-linux.ads (struct_sigaction): Use correct type for sa_flags.
229 2017-03-08 Thanassis Tsiodras <ttsiodras@gmail.com>
232 * socket.c (__gnat_gethostbyaddr): Add missing test for __rtems__.
234 2017-03-08 Eric Botcazou <ebotcazou@adacore.com>
237 * system-linux-ppc.ads (Default_Bit_Order): Use Standard's setting.
239 * system-linux-arm.ads (Default_Bit_Order): Likewise.
240 * system-linux-mips.ads (Default_Bit_Order): Likewise.
241 * system-linux-armeb.ads: Delete.
242 * system-linux-mipsel.ads: Likewise.
243 * gcc-interface/Makefile.in (MIPS/Linux): Adjust.
244 (ARM/Linux): Likewise.
246 2017-02-24 Jakub Jelinek <jakub@redhat.com>
249 * gcc-interface/misc.c (gnat_handle_option): Pass true to
250 handle_generated_option GENERATED_P.
252 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
254 * gcc-interface/decl.c (gnat_to_gnu_field): Do not remove the wrapper
255 around a justified modular type if it doesn't have the same scalar
256 storage order as the enclosing record type.
258 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
260 * gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
261 of boolean rvalues to function calls.
263 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
265 * gcc-interface/utils.c (fold_bit_position): New function.
266 (rest_of_record_type_compilation): Call it instead of bit_position to
267 compute the field position and remove the call to remove_conversions.
268 (compute_related_constant): Factor out the multiplication in both
269 operands, if any, and streamline the final test.
271 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
273 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Add sanity check.
275 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
277 * gcc-interface/decl.c: Include demangle.h.
278 (is_cplusplus_method): Return again true for a primitive operation
279 only if it is dispatching. For a subprogram with an interface name,
280 call the demangler to get the number of C++ parameters and compare it
281 with the number of Ada parameters.
283 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
285 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu): If
286 there is no end label, put the location of the At_End procedure on
287 the call to the procedure.
289 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
291 * gcc-interface/misc.c (gnat_type_max_size): Try to return a meaningful
292 value for array types with TYPE_INDEX_TYPE set on their domain type.
293 * gcc-interface/utils.c (max_size): For operations and expressions, do
294 not build a new node if the operands have not changed or are missing.
296 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
298 * gcc-interface/utils.c (max_size) <tcc_expression>: Flip the second
299 argument when recursing on TRUTH_NOT_EXPR.
301 2017-02-12 John Marino <gnugcc@marino.st>
303 * system-freebsd-x86.ads: Rename into...
304 * system-freebsd.ads: ...this.
305 (Default_Bit_Order): Define using Standard'Default_Bit_Order.
306 * gcc-interface/Makefile.in: Support aarch64-freebsd.
307 (x86-64/FreeBSD): Adjust to above renaming.
308 (i386/FreeBSD): Likewise.
310 2017-02-09 Gerald Pfeifer <gerald@pfeifer.com>
312 * comperr.adb: Update FSF bug reporting URL.
314 2017-02-01 Eric Botcazou <ebotcazou@adacore.com>
315 Jakub Jelinek <jakub@redhat.com>
318 * adaint.c (__gnat_killprocesstree): Fix broken string handling.
320 2017-01-25 Maxim Ostapenko <m.ostapenko@samsung.com>
323 * gcc-interface/utils.c (get_global_context): Pass main_input_filename
324 to build_translation_unit_decl.
326 2017-01-23 Javier Miranda <miranda@adacore.com>
328 * sem_util.adb (New_Copy_Tree): Code cleanup:
329 removal of the internal map (ie. variable Actual_Map, its
330 associated local variables, and all the code handling it).
331 * sem_ch9.adb (Analyze_Task_Type_Declaration): in GNATprove mode
332 force loading of the System package when processing a task type.
333 (Analyze_Protected_Type_Declaration): in GNATprove mode force
334 loading of the System package when processing a protected type.
335 * sem_ch10.adb (Analyze_Compilation_Unit): in GNATprove mode
336 force loading of the System package when processing compilation
337 unit with a main-like subprogram.
338 * frontend.adb (Frontend): remove forced loading of the System
341 2017-01-23 Ed Schonberg <schonberg@adacore.com>
343 * sem_prag.adb (Default_Initial_Condition): If the desired type
344 declaration is a derived type declaration with discriminants,
345 it is rewritten as a private type declaration.
346 * sem_ch13.adb (Replace_Type_References_Generic,
347 Visible_Component): A discriminated private type with descriminnts
348 has components that must be rewritten as selected components
349 if they appear as identifiers in an aspect expression such as
350 a Default_Initial_Condition.
351 * sem_util.adb (Defining_Entity): support N_Iterator_Specification
354 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
356 * ghost.ads, ghost.adb (Is_Ignored_Ghost_Unit): New routine.
357 * gnat1drv.adb Generate an empty object file for an ignored
358 Ghost compilation unit.
359 * inline.adb, sem_util.adb, sem_ch4.adb: Minor reformatting.
361 2017-01-23 Yannick Moy <moy@adacore.com>
363 * sem_ch4.adb (Analyze_Indexed_Component_Form):
364 Adapt to inlined prefix with string literal subtype.
365 * inline.adb (Expand_Inlined_Call): Keep unchecked
366 conversion inside inlined call when formal type is constrained.
368 2017-01-23 Javier Miranda <miranda@adacore.com>
370 * sem_util.adb (New_Copy_Tree): Code cleanup:
371 removal of global variables. All the global variables, global
372 functions and tables of this subprogram are now declared locally.
374 2017-01-23 Gary Dismukes <dismukes@adacore.com>
376 * exp_strm.ads: Minor reformatting and typo fixes.
378 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
380 * sem_aggr.adb, par_sco.adb, exp_util.adb, sem.adb, sem_ch4.adb,
381 exp_aggr.adb: Minor reformatting.
382 * g-diopit.adb: minor grammar/punctuation fix in comment.
383 * g-byorma.ads: minor fix of unbalanced parens in comment.
385 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
387 * par.adb: Update the documentation of component Labl.
388 * par-ch6.adb (P_Return_Statement): Set the expected label of
389 an extended return statement to Error.
391 2017-01-23 Tristan Gingold <gingold@adacore.com>
393 * s-boustr.ads, s-boustr.adb (Is_Full): New function.
395 2017-01-23 Ed Schonberg <schonberg@adacore.com>
397 * expander.adb: Handle N_Delta_Aggregate.
399 2017-01-23 Javier Miranda <miranda@adacore.com>
401 * exp_ch6.adb (Expand_Call): Improve the code that
402 checks if some formal of the called subprogram is a class-wide
403 interface, to handle subtypes of class-wide interfaces.
405 2017-01-23 Javier Miranda <miranda@adacore.com>
407 * checks.adb (Apply_Parameter_Aliasing_Checks):
408 Remove side effects of the actuals before generating the overlap
411 2017-01-23 Justin Squirek <squirek@adacore.com>
413 * exp_strm.ads, exp_strm.ads
414 (Build_Record_Or_Elementary_Input_Function): Add an extra parameter so
415 as to avoid getting the underlying type by default.
416 * exp_attr.adb (Expand_N_Attribute_Reference): Remove use of
417 underlying type in the Iiput and output attribute cases when
418 building their respective functions.
420 2017-01-23 Gary Dismukes <dismukes@adacore.com>
422 * scng.adb: Minor reformatting of error message.
424 2017-01-23 Ed Schonberg <schonberg@adacore.com>
426 * sem_ch6.adb (Analyze_Expression_Function): Do not attempt
427 to freeze the return type of an expression funxtion that is a
428 completion, if the type is a limited view and the non-limited
431 2017-01-23 Ed Schonberg <schonberg@adacore.com>
433 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): Recognize delta
435 (P_Record_Or_Array_Component_Association): An array aggregate
436 can start with an Iterated_Component_Association.
437 * scng.adb: Modify error message on improper use of @ in earlier
438 versions of the language.
439 * sinfo.ads: New node kind N_Delta_Aggregate.
440 * sinfo.adb: An N_Delta_Aggregate has component associations and
442 * sem_res.adb (Resolve): Call Resolve_Delta_Aggregate.
443 * sem_aggr.ads, sem_aggr.adb (Resolve_Iterated_Component_Association):
444 Create a new index for each one of the choices in the association,
445 to prevent spurious homonyms in the scope.
446 (Resolve_Delta_Aggregate): New.
447 * sem.adb: An N_Delta_Aggregate is analyzed like an aggregate.
448 * exp_util.adb (Insert_Actions): Take into account
450 * exp_aggr.ads: New procedure Expand_N_Delta_Aggregate.
451 * exp_aggr.adb: New procedure Expand_N_Delta_Aggregate,
452 and local procedures Expand_Delta_Array_Aggregate and
453 expand_Delta_Record_Aggregate.
454 * sprint.adb: Handle N_Delta_Aggregate.
456 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
458 * exp_ch11.adb (Expand_N_Exception_Declaration): Generate an
459 empty name when the exception declaration is subject to pragma
461 (Null_String): New routine.
463 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
465 * par-ch9.adb (P_Protected_Definition): Parse
466 any optional and potentially illegal pragmas which appear in
467 a protected operation declaration list.
468 (P_Task_Items): Parse
469 any optional and potentially illegal pragmas which appear in a
472 2017-01-23 Pascal Obry <obry@adacore.com>
474 * s-taprop-mingw.adb (Enter_Task): Initialize the Thread handle which
475 is needed when a foreign thread call a Win32 API using a thread handle
476 like GetThreadTimes() for example.
478 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
480 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
481 allow an 'Address clause to be specified on a prefix of a
484 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
486 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
487 attribute 'Valid is a renaming of the original expression when
488 the expression denotes a name. For all other kinds of expression,
489 use a constant to capture the value.
490 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
491 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
493 2017-01-23 Justin Squirek <squirek@adacore.com>
495 * sem_eval.adb (Eval_Integer_Literal): Add special
496 case to avoid optimizing out check if the literal appears in
499 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
501 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
502 allow an 'Address clause to be specified on a prefix of a
505 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
507 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
508 attribute 'Valid is a renaming of the original expression when
509 the expression denotes a name. For all other kinds of expression,
510 use a constant to capture the value.
511 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
512 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
514 2017-01-23 Justin Squirek <squirek@adacore.com>
516 * sem_eval.adb (Eval_Integer_Literal): Add special
517 case to avoid optimizing out check if the literal appears in
520 2017-01-23 Ed Schonberg <schonberg@adacore.com>
522 * sem_ch4.adb (Try_Primitive_Operations,
523 Is_Valid_First_Argument_Of): argument is valid if it is a derived
524 type with unknown discriminants that matches its underlying
526 * exp_util.adb (Expand_Subtype_From_Expr): Do not expand
527 expression if its type is derived from a limited type with
528 unknown discriminants, because the expansion (which is a call)
529 must be expanded in the enclosing context to add the proper build-
530 in-place parameters to the call.
531 * lib.ads, exp_ch9.adb: Minor fixes in comments.
533 2017-01-23 Yannick Moy <moy@adacore.com>
535 * frontend.adb (Frontend): Do not load runtime
536 unit for GNATprove when parsing failed.
537 * exp_ch9.adb: minor removal of extra whitespace
538 * exp_ch6.adb: minor typo in comment
539 * sem_util.adb: Code cleanup.
540 * exp_ch9.ads, par-ch2.adb: minor style fixes in whitespace and comment
541 * a-ngcefu.adb: minor style fix in whitespace
543 2017-01-23 Thomas Quinot <quinot@adacore.com>
545 * scos.ads: Document usage of 'd' as default SCO kind for
547 * par_sco.adb (Traverse_Declarations_Or_Statements.
548 Traverse_Degenerate_Subprogram): New supporting routine for expression
549 functions and null procedures.
550 (Traverse_Declarations_Or_Statements.Traverse_One): Add
551 N_Expression_Function to the subprogram case; add required
552 support for null procedures and expression functions.
554 2017-01-23 Bob Duff <duff@adacore.com>
556 * namet.ads (Bounded_String): Decrease the size of type
557 Bounded_String to avoid running out of stack space.
558 * namet.ads (Append): Don't ignore buffer overflow; raise
559 Program_Error instead.
561 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
563 * exp_ch5.adb, freeze.adb, par-ch4.adb, scng.adb, sem_ch13.adb,
564 sem_ch3.adb, sem_ch5.adb, sem_ch5.ads, sem_util.adb, sinfo.ads: Minor
566 * exp_ch9.adb: minor style fix in comment.
568 2017-01-23 Ed Schonberg <schonberg@adacore.com>
570 * sem_ch4.adb (Analyze_Allocator): Handle properly a type derived
571 for a limited record extension with unknown discriminants whose
572 full view has no discriminants.
574 2017-01-23 Yannick Moy <moy@adacore.com>
576 * exp_spark.adb: Alphabetize with clauses.
578 2017-01-23 Yannick Moy <moy@adacore.com>
580 * sem_util.adb (Has_Enabled_Property): Treat
581 protected objects and variables differently from other variables.
583 2017-01-23 Thomas Quinot <quinot@adacore.com>
585 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
586 Split original Ada 95 part off into new subprogram
587 below. Call that subprogram (instead of proceeding with
588 AI95-0133 behaviour) if debug switch -gnatd.p is in use.
589 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): ... new subprogram
590 * debug.adb Document new switch -gnatd.p
591 * freeze.adb (Freeze_Entity.Freeze_Record_Type): Do not adjust
592 record for reverse bit order if an error has already been posted
593 on the record type. This avoids generating extraneous "info:"
594 messages for illegal code.
596 2017-01-23 Justin Squirek <squirek@adacore.com>
598 * sem_ch3.adb (Analyze_Declarations): Correct comments
599 * freeze.adb (Find_Constant): Add detection of deferred constants
600 so they are not incorrectly flagged as premature.
602 2017-01-23 Ed Schonberg <schonberg@adacore.com>
604 * scans.ads: New token At_Sign. Remove '@' from list of illegal
605 characters for future version of the language. '@' is legal name.
606 * scng.ads, scng.adb (Scan): Handle '@' appropriately.
607 * scn.adb (Scan_Reserved_Identifier): An occurrence of '@'
608 denotes a Target_Name.
609 * par-ch4.adb (P_Name, P_Primary): Handle Target_Name.
610 * sinfo.ads, sinfo.adb (N_Target_Name): New non-terminal node.
611 (Has_Target_Names): New flag on N_Assignment_Statement, to
612 indicate that RHS has occurrences of N_Target_Name.
613 * sem.adb: Call Analyze_Target_Name.
614 * sem_ch5.ads, sem_ch5.adb (Analyze_Target_Name): New subpogram.
615 (urrent_LHS): Global variable that denotes LHS of assignment,
616 used in the analysis of Target_Name nodes.
617 * sem_res.adb (Resolve_Target_Name): New procedure.
618 * exp_ch5.adb (Expand_Assign_With_Target_Names): (AI12-0125):
619 N is an assignment statement whose RHS contains occurences of @
620 that designate the value of the LHS of the assignment. If the
621 LHS is side-effect free the target names can be replaced with
622 a copy of the LHS; otherwise the semantics of the assignment
623 is described in terms of a procedure with an in-out parameter,
624 and expanded as such.
625 (Expand_N_Assignment_Statement): Call
626 Expand_Assign_With_Target_Names when needed.
627 * exp_util.adb (Insert_Actions): Take into account N_Target_Name.
628 * sprint.adb: Handle N_Target_Name.
630 2017-01-23 Eric Botcazou <ebotcazou@adacore.com>
632 * checks.adb: Minor fix in comment.
634 2017-01-23 Philippe Gil <gil@adacore.com>
636 * g-debpoo.adb (Do_Report) remove freed chunks from chunks
637 count in Sort = Memory_Usage or Allocations_Count
639 2017-01-23 Justin Squirek <squirek@adacore.com>
641 * sem_ch3.adb: Code cleanup.
643 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
645 * sem_prag.adb (Analyze_Refined_Depends_In_Decl_Part): Move all global
646 variables to the local variable section. Update the profile
647 of various nested routine that previously had visibility
648 of those globals. One the matching phase has completed,
649 remove certain classes of clauses which are considered noise.
650 (Check_Dependency_Clause): Properly detect a match between two
651 'Result attributes. Update the various post-match cases to use
652 Is_Already_Matched as this routine now automatically recognizes
653 a previously matched 'Result attribute.
654 (Is_Already_Matched): New routine.
655 (Remove_Extra_Clauses): New routine.
656 (Report_Extra_Clauses): Remove the detection of ... => null
657 clauses as this is now done in Remove_Extra_Clauses.
659 2017-01-23 Ed Schonberg <schonberg@adacore.com>
661 * sem_aggr.adb (Resolve_Array_Aggregate): In ASIS mode do not
662 report on spurious overlaps between values involving a subtype
663 with a static predicate, because the expansion of such a subtype
664 into individual ranges in inhibited in ASIS mode.
666 2017-01-23 Justin Squirek <squirek@adacore.com>
668 * sem_ch3.adb (Analyze_Declarations): Add detection
669 of an edge case and delay freezing if it is present.
671 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
673 * sem_ch3.adb, exp_spark.adb, exp_attr.adb, sem_ch9.adb, sem_prag.adb,
674 sem_util.adb, sem_warn.adb, exp_ch3.adb: Minor reformatting.
676 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
678 * freeze.adb (Freeze_Subprogram): Ensure that all anonymous
679 access-to-subprogram types inherit the convention of the
680 associated subprogram. (Set_Profile_Convention): New routine.
681 * sem_ch6.adb (Check_Conformance): Do not compare the conventions
682 of the two entities directly, use Conventions_Match to account
683 for anonymous access-to-subprogram and subprogram types.
684 (Conventions_Match): New routine.
686 2017-01-23 Claire Dross <dross@adacore.com>
688 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For attributes
689 which return Universal_Integer, force the overflow check flag for
690 Length and Range_Length for types as big as Long_Long_Integer.
692 2017-01-23 Claire Dross <dross@adacore.com>
694 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For
695 attributes which return Universal_Integer, introduce a conversion
696 to the expected type with the appropriate check flags set.
697 * sem_res.adb (Resolve_Range): The higher bound can be in Typ's
698 base type if the range is null. It may still be invalid if it
699 is higher than the lower bound. This is checked later in the
700 context in which the range appears.
702 2017-01-23 Pierre-Marie de Rodat <derodat@adacore.com>
704 * scos.ads: Introduce a constant to represent ignored
705 dependencies in SCO_Unit_Table_Entry.
707 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
709 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Remove extra
710 spaces from error messages.
712 2017-01-23 Ed Schonberg <schonberg@adacore.com>
714 * exp_ch3.adb (Check_Large_Modular_Array): New procedure,
715 subsidiary to Expand_N_Object_ Declaration, to compute a guard on
716 an object declaration for an array type with a modular index type
717 with the size of Long_Long_Integer. Special processing is needed
718 in this case to compute reliably the size of the object, and
719 eventually to raise Storage_Error, when wrap-around arithmetic
720 might compute a meangingless size for the object.
722 2017-01-23 Justin Squirek <squirek@adacore.com>
724 * a-wtenau.adb, par-endh.adb, sem_prag.adb,
725 sem_type.adb: Code cleanups.
727 2017-01-23 Bob Duff <duff@adacore.com>
729 * sem_res.adb (Resolve_Call): In the part of the code where
730 it is deciding whether to turn the call into an indexed
731 component, avoid doing so if the call is to an instance of
732 Unchecked_Conversion. Otherwise, the compiler turns it into an
733 indexed component, and resolution of that turns it back into a
734 function call, and so on, resulting in infinite recursion.
735 * sem_util.adb (Needs_One_Actual): If the first formal has a
736 default, then return False.
738 2017-01-21 Eric Botcazou <ebotcazou@adacore.com>
740 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal (etc)
741 optimizations when the type is modular and the offsets are equal.
743 2017-01-20 Thomas Quinot <quinot@adacore.com>
745 * sem_warn.adb (Warn_On_Useless_Assignment): Adjust wording of warning
748 2017-01-20 Nicolas Roche <roche@adacore.com>
750 * terminals.c: Ignore failures on setpgid and tcsetpgrp commands.
752 2017-01-20 Bob Duff <duff@adacore.com>
754 * sem_eval.adb (Compile_Time_Compare): Disable the expr+literal
755 (etc) optimizations when the type is modular.
757 2017-01-20 Yannick Moy <moy@adacore.com>
759 * sem_ch6.adb (Move_Pragmas): move some pragmas,
760 but copy the SPARK_Mode pragma instead of moving it.
761 (Build_Subprogram_Declaration): Ensure that the generated spec
762 and original body share the same SPARK_Pragma aspect/pragma.
763 * sem_util.adb, sem_util.ads (Copy_SPARK_Mode_Aspect): New
764 procedure to copy SPARK_Mode aspect.
766 2017-01-20 Bob Duff <duff@adacore.com>
768 * sem_ch3.adb (Analyze_Declarations): Disable Resolve_Aspects
770 * sem_ch13.adb (Resolve_Name): Enable setting the entity to
771 Empty even in ASIS mode.
773 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
775 * exp_ch9.adb: minor style fixes in comments.
776 * sem_ch9.adb (Analyze_Delay_Relative): in GNATprove mode a delay
777 relative statement introduces an implicit dependency on
778 Ada.Real_Time.Clock_Time.
779 * sem_util.adb: Minor reformatting.
781 2017-01-20 Ed Schonberg <schonberg@adacore.com>
783 * sem_ch13.adb (Analyze_Aspect_Specifications): Aspect Alignment
784 must be treated as delayed aspect even if the expression is
785 a literal, because the aspect affects the freezing and the
786 elaboration of the object to which it applies.
788 2017-01-20 Tristan Gingold <gingold@adacore.com>
790 * s-osinte-vxworks.ads (Interrup_Range): New subtype.
792 2017-01-20 Ed Schonberg <schonberg@adacore.com>
794 * lib-xref.adb (Generate_Reference): Do not warn about the
795 presence of a pragma Unreferenced if the entity appears as the
796 actual in a procedure call that does not come from source.
798 2017-01-20 Pascal Obry <obry@adacore.com>
800 * expect.c, terminals.c: Fix some warnings about unused variables.
801 * gsocket.h, adaint.c, adaint.h: Fix some more warnings in the C part
804 2017-01-20 Bob Duff <duff@adacore.com>
806 * exp_attr.adb (Constrained): Apply an access check (check that
807 the prefix is not null) when the prefix denotes an object of an
808 access type; that is, when there is an implicit dereference.
810 2017-01-20 Gary Dismukes <dismukes@adacore.com>
812 * s-rident.ads (constant Profile_Info): Remove
813 No_Calendar from GNAT_Extended_Ravenscar restrictions.
815 2017-01-20 Tristan Gingold <gingold@adacore.com>
817 * s-maccod.ads: Add pragma No_Elaboration_Code_All
819 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
821 * ghost.adb (Mark_Ghost_Clause): New routine.
822 (Prune_Node): Do not prune compilation unit nodes.
823 (Remove_Ignored_Ghost_Code): Prune the compilation unit node directly.
824 This does not touch the node itself, but does prune all its fields.
825 * ghost.ads (Mark_Ghost_Clause): New routine.
826 * sem_ch8.adb (Analyze_Use_Package): Emit an error when a use
827 package clause mentions Ghost and non-Ghost packages. Mark a
828 use package clause as Ghost when it mentions a Ghost package.
829 (Analyze_Use_Type): Emit an error when a use type clause mentions
830 Ghost and non-Ghost types. Mark a use type clause as Ghost when
831 it mentions a Ghost type.
832 * sem_ch10.adb (Analyze_With_Clause): Mark a with clause as
833 Ghost when it withs a Ghost unit.
835 2017-01-20 Javier Miranda <miranda@adacore.com>
837 * sem_res.adb (Resolve_Call): If a function call
838 returns a limited view of a type and at the point of the call the
839 function is not declared in the extended main unit then replace
840 it with the non-limited view, which must be available. If the
841 called function is in the extended main unit then no action is
842 needed since the back-end handles this case.
844 2017-01-20 Eric Botcazou <ebotcazou@adacore.com>
846 * sem_ch7.adb (Contains_Subp_Or_Const_Refs): Rename into...
847 (Contains_Subprograms_Refs): ...this. Adjust comment
848 for constants. (Is_Subp_Or_Const_Ref): Rename into...
849 (Is_Subprogram_Ref): ...this.
850 (Has_Referencer): Rename Has_Non_Subp_Const_Referencer variable into
851 Has_Non_Subprograms_Referencer and adjust comment. Remove
852 incorrect shortcut for package declarations and bodies.
854 2017-01-20 Ed Schonberg <schonberg@adacore.com>
856 * sem_ch3.adb (Complete_Private_Subtype): If the scope of the
857 base type differs from that of the completion and the private
858 subtype is an itype (created for a constraint on an access
859 type e.g.), set Delayed_Freeze on both to prevent out-of-scope
862 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
864 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
865 When inheriting the SPARK_Mode of a prior expression function,
866 look at the properly resolved entity rather than the initial
867 candidate which may denote a homonym.
869 2017-01-20 Ed Schonberg <schonberg@adacore.com>
871 * sem_prag.adb (Rewrite_Assertion_Kind): If the name is
872 Precondition or Postcondition, and the context is pragma
873 Check_Policy, indicate that this Pre-Ada2012 usage is deprecated
874 and suggest the standard names Assertion_Policy /Pre /Post
877 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
879 * sem_ch10.adb, sem_cat.adb: Minor reformatting.
881 2017-01-20 Javier Miranda <miranda@adacore.com>
883 * sem_ch3.adb (Access_Type_Declaration): Protect access to the
885 * sem_ch10.adb (Install_Siblings): Skip processing malformed trees.
886 * sem_cat.adb (Validate_Categoriztion_Dependency): Skip processing
889 2017-01-20 Ed Schonberg <schonberg@adacore.com>
891 * sem_ch13.adb (Analyze_Aspect_Specification, case
892 Dynamic_Predicate): If the entity E is a subtype that inherits
893 a static predicate for its parent P,, the inherited and the
894 new predicate combine in the generated predicate function,
895 and E only has a dynamic predicate.
897 2017-01-20 Tristan Gingold <gingold@adacore.com>
899 * s-boustr.ads, s-boustr.adb: New package.
900 * Makefile.rtl: Add s-boustr.
902 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
904 * inline.adb (Process_Formals): Qualify the
905 expression of a return statement when it yields a universal type.
907 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
909 * freeze.adb (Freeze_All): Freeze the default
910 expressions of all eligible formal parameters that appear in
911 entries, entry families, and protected subprograms.
913 2017-01-20 Ed Schonberg <schonberg@adacore.com>
915 * sem_ch3.adb (Check_Nonoverridable_Aspects); Refine check
916 for illegal inherited Implicit_Dereference aspects with renamed
919 2017-01-20 Javier Miranda <miranda@adacore.com>
921 * debug.adb (switch d.6): do not avoid declaring unreferenced itypes.
922 * nlists.ads (Lock_Lists, Unlock_Lists): New subprograms.
923 * nlists.adb (Lock_Lists, Unlock_Lists): New subprograms.
924 (Set_First, Set_Last, Set_List_Link, Set_Next, Set_Parent,
925 Set_Prev, Tree_Read): Adding assertion.
926 * atree.ads (Lock_Nodes, Unlock_Nodes): New subprograms.
927 * atree.adb (Lock_Nodes, Unlock_Nodes): New subprograms.
928 (Set_Analyzed, Set_Check_Actuals, Set_Comes_From_Source,
929 Set_Ekind, Set_Error_Posted, Set_Has_Aspects,
930 Set_Is_Ignored_Ghost_Node, Set_Original_Node, Set_Paren_Count,
931 Set_Parent, Set_Sloc, Set_Nkind, Set_FieldNN, Set_NodeNN,
932 Set_ListNN, Set_ElistNN, Set_NameN, Set_StrN, Set_UintNN,
933 Set_UrealNN, Set_FlagNNN, Set_NodeN_With_Parent,
934 Set_ListN_With_Parent): Adding assertion.
936 2017-01-20 Ed Schonberg <schonberg@adacore.com>
938 * sem_prag.adb (Process_Convention): Diagnose properly a pragma
939 import that applies to several homograph subprograms. when one
940 of them is declared by a subprogram body.
942 2017-01-20 Justin Squirek <squirek@adacore.com>
944 * exp_ch6.adb (Expand_Call): Remove optimization
945 that nulls out calls to null procedures.
947 2017-01-20 Yannick Moy <moy@adacore.com>
949 * inline.adb (Expand_Inlined_Call): Keep more
950 precise type of actual for inlining whenever possible. In
951 particular, do not switch to the formal type in GNATprove mode in
952 some case where the GNAT backend might require it for visibility.
954 2017-01-20 Ed Schonberg <schonberg@adacore.com>
956 * sem_ch3.adb (Check_Non_Overridable_Aspects): An inherited
957 aspect Implicit_Dereference can be inherited by a full view if
958 the partial view has no discriminants, because there is no way
959 to apply the aspect to the partial view.
960 (Build_Derived_Record_Type): If derived type renames discriminants
961 of the parent, the new discriminant inherits the aspect from
963 * sem_ch4.adb (Analyze_Call): Handle properly a parameterless
964 call through an access discriminant designating a subprogram.
965 * sem_ch5.adb (Analyze_Assignment): (Analyze_Call): Handle
966 properly a parameterless call through an access discriminant on
967 the left-hand side of an assignment.
968 * sem_res.adb (resolve): If an interpreation involves a
969 discriminant with an implicit dereference and the expression is an
970 entity, resolution takes place later in the appropriate routine.
971 * sem_ch13.adb (Analyze_Aspect_Implicit_Dereference): Recognize
972 access discriminants that designate a subprogram type.
974 2017-01-20 Pascal Obry <obry@adacore.com>
976 * a-locale.adb, a-locale.ads: Update Ada.Locales for RM 2012 COR:1:2016
978 2017-01-20 Yannick Moy <moy@adacore.com>
980 * sem_ch10.adb (Check_No_Elab_Code_All): Do not issue an error
981 on implicitly with'ed units in GNATprove mode.
982 * sinfo.ads (Implicit_With): Document use of flag for implicitly
983 with'ed units in GNATprove mode.
985 2017-01-20 Ed Schonberg <schonberg@adacore.com>
987 * sem_cat.adb (Validate_Static_Object_Name): In a preelaborated
988 unit Do not report an error on a non-static entity that appears
989 in the context of a spec expression, such as an aspect expression.
991 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
993 * einfo.adb: Flag298 now denotes Is_Underlying_Full_View.
994 (Is_Underlying_Full_View): New routine.
995 (Set_Is_Underlying_Full_View): New routine.
996 (Write_Entity_Flags): Add an entry for Is_Underlying_Full_View.
997 * einfo.ads Add new attribute Is_Underlying_Full_View.
998 (Is_Underlying_Full_View): New routine along with pragma Inline.
999 (Set_Is_Underlying_Full_View): New routine along with pragma Inline.
1000 * exp_util.adb (Build_DIC_Procedure_Body): Do not consider
1001 class-wide types and underlying full views. The first subtype
1002 is used as the working type for all Itypes, not just array base types.
1003 (Build_DIC_Procedure_Declaration): Do not consider
1004 class-wide types and underlying full views. The first subtype
1005 is used as the working type for all Itypes, not just array
1007 * freeze.adb (Freeze_Entity): Inherit the freeze node of a full
1008 view or an underlying full view without clobbering the attributes
1009 of a previous freeze node.
1010 (Inherit_Freeze_Node): New routine.
1011 * sem_ch3.adb (Build_Derived_Private_Type): Mark an underlying
1013 (Build_Underlying_Full_View): Mark an underlying full view as such.
1014 * sem_ch7.adb (Install_Private_Declarations): Mark an underlying
1017 2017-01-20 Yannick Moy <moy@adacore.com>
1019 * sinfo.ads: Document lack of Do_Division_Check flag
1020 on float exponentiation.
1022 2017-01-19 Javier Miranda <miranda@adacore.com>
1024 * ghost.adb (Propagate_Ignored_Ghost_Code): Protect access to the
1025 identifier attribute of a block-statement node. Required to avoid
1026 assertion failure when building the new containers library.
1028 2017-01-19 Bob Duff <duff@adacore.com>
1030 * exp_ch3.adb: Update comment.
1032 2017-01-19 Vincent Celier <celier@adacore.com>
1034 * gprep.adb (Gnatprep): Parse the definition file without
1035 "replace in comments" even when switch -C is used.
1037 2017-01-19 Justin Squirek <squirek@adacore.com>
1039 * exp_ch9.adb (Is_Pure_Barrier): Create function
1040 Is_Count_Attribute to identify an expansion of the 'Count
1043 2017-01-19 Ed Schonberg <schonberg@adacore.com>
1045 * sem_ch5.adb (Analyze_Loop_Statement): In GNATprove mode the
1046 statements within an element iterator loop are only analyzed
1047 agter the loop is rewritten. Within a generic the analysis must
1048 be performed in any case to complete name capture.
1050 2017-01-19 Bob Duff <duff@adacore.com>
1052 * sem_prag.adb (Analyze_Pragma): Check for ignored pragmas first,
1053 before checking for unrecognized pragmas.
1054 Initialize Pname on its declarations; that's always good style.
1056 2017-01-19 Claire Dross <dross@adacore.com>
1058 * exp_ch7.adb (Build_Invariant_Procedure_Body): Semi-insert the
1059 body into the tree for GNATprove by setting its Parent field. The
1060 components invariants of composite types are not checked by
1061 the composite type's invariant procedure in GNATprove mode.
1062 (Build_Invariant_Procedure_Declaration): Semi-insert the
1063 declaration into the tree for GNATprove by setting its Parent
1065 * freeze.adb (Freeze_Arry_Type):In GNATprove mode, do not add
1066 the component invariants to the array type invariant procedure
1067 so that the procedure can be used to check the array type
1069 (Freeze_Record_Type): In GNATprove mode, do
1070 not add the component invariants to the record type invariant
1071 procedure so that the procedure can be used to check the record
1072 type invariants if any.
1074 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
1076 * lib-xref-spark_specific.adb: Minor reformatting.
1077 * exp_ch7.adb (Add_Parent_Invariants): Do not process array types.
1079 2017-01-19 Javier Miranda <miranda@adacore.com>
1081 * exp_aggr.adb (Pass_Aggregate_To_Back_End): Renamed as
1082 Build_Back_End_Aggregate.
1083 (Generate_Aggregate_For_Derived_Type): Code cleanup.
1084 (Prepend_Stored_Values): Code cleanup.
1086 2017-01-19 Ed Schonberg <schonberg@adacore.com>
1088 * sem_ch6.adb (Analyze_Expression_Function): Check for an
1089 incomplete return type after attempting to freeze it, so that
1090 other freeze actiona are generated in the proper order.
1092 2017-01-19 Ed Schonberg <schonberg@adacore.com>
1094 * sem_aggr.adb (Resolve_Aggregate): If the type is a string
1095 type, ie. a type whose component is a character type, and the
1096 aggregate is positional, do not convert into a string literal
1097 if the index type is not an integer type, because the original
1098 type may be required in an enclosing operation.
1100 2017-01-19 Bob Duff <duff@adacore.com>
1102 * binde.adb, debug.adb: Enable new elaboration order algorithm
1103 by default. -dp switch reverts to the old algorithm.
1105 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
1107 * sem_ch3.adb Add with and use clauses for Exp_Ch7.
1108 (Analyze_Declarations): Create the DIC and Invariant
1109 procedure bodies s after all freezing has taken place.
1110 (Build_Assertion_Bodies): New routine.
1111 * sem_ch7.adb Remove the with and use clauses for Exp_Ch7
1113 (Analyze_Package_Specification): Remove the
1114 generation of the DIC and Invariant procedure bodies. This is
1115 now done by Analyze_Declarations.
1116 * sem_disp.adb (Check_Dispatching_Operation): DIC and Invariant
1117 procedures are never treated as primitives.
1119 2017-01-19 Yannick Moy <moy@adacore.com>
1121 * frontend.adb: Analyze inlined bodies and check elaboration
1122 rules in GNATprove mode too.
1123 * sem_elab.adb (Delay_Element): Add Boolean component to save
1124 indication that call is in SPARK code. (Check_Elab_Calls):
1125 Check elaboration rules in GNATprove mode, and correctly set
1126 the current value of SPARK_Mode.
1127 * lib-xref-spark_specific.adb
1128 (Add_SPARK_Xrefs): Simplify iteration over dereferences.
1130 2017-01-19 Ed Schonberg <schonberg@adacore.com>
1132 * exp_ch4.adb (Expand_Concatenate): Do no enable overflow
1133 checks on the expression for the high bound of concatenation
1134 when checks are disabled, to suppress warnings about potential
1135 constraint errors in restricted runtimes.
1137 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
1139 * exp_ch3.adb (Expand_Freeze_Enumeration_Type): Mark the
1140 representation-to-position function as inlined.
1141 * sem_cat.adb (Set_Categorization_From_Scope): Do not modify
1142 the purity of an internally generated entity if it has been
1143 explicitly marked as pure for optimization purposes.
1144 * exp_aggr.adb: Minor reformatting.
1146 2017-01-19 Javier Miranda <miranda@adacore.com>
1148 * exp_ch6.adb (Expand_Call): Remove side effects on
1149 actuals that are allocators with qualified expression since the
1150 initialization of the object is performed by means of individual
1151 statements (and hence it must be done before the call).
1153 2017-01-19 Ed Schonberg <schonberg@adacore.com>
1155 * sem_ch3.adb (Analyze_Declarations): Minor reformatting.
1156 (Build_Derived_Enumeration_Type): If the derived type inherits a
1157 dynamic predicate from its parent, the bounds of the type must
1158 freeze because an explicit constraint is constructed for the
1159 type and the corresponding range is elaborated now.
1161 2017-01-19 Arnaud Charlet <charlet@adacore.com>
1163 * sem_attr.ads: minor fix of inconsistent casing in comment
1164 * lib-writ.ads: minor align comments in columns
1165 * sem_ch3.adb: Minor reformatting.
1166 * spark_xrefs.ads: minor fix typo in SPARK-related comment
1167 * table.ads: minor style fix in comment
1168 * lib-xref-spark_specific.adb
1169 (Add_SPARK_Xrefs): simplify processing of SPARK cross-references.
1170 * sem_ch12.adb: minor whitespace fix
1171 * freeze.adb: Add comment.
1172 * sem_util.adb (Unique_Name): for instances of
1173 generic subprograms ignore the name of the wrapper package.
1175 2017-01-19 Javier Miranda <miranda@adacore.com>
1177 * exp_aggr.adb (Resolve_Record_Aggregate):
1178 Factorize code needed for aggregates of limited and unlimited
1179 types in a new routine.
1180 (Pass_Aggregate_To_Back_End): New subprogram.
1182 2017-01-19 Yannick Moy <moy@adacore.com>
1184 * sinfo.adb (Pragma_Name): Only access up to Last_Pair of Pragma_Map.
1186 2017-01-19 Ed Schonberg <schonberg@adacore.com>
1188 * sem_ch4.ads, sem_ch4.adb (Try_Object_Operation): Make subprogram
1189 public, for use elsewhere.
1190 * sem_ch6.adb (Analyze_Procedure_Call): In SPARK_Mode and within
1191 an Inlined_body, recognize a call that uses object notation
1192 and has not been rewritten as a regular call because regular
1193 expansion has not taken place.
1195 2017-01-19 Bob Duff <duff@adacore.com>
1197 * checks.adb (Apply_Type_Conversion_Checks): Disable small optimization
1198 in case of generic formal discrete types, because it causes crashes in
1199 the compiler when built with assertions on.
1201 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
1203 * lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads,
1204 sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting.
1206 2017-01-19 Bob Duff <duff@adacore.com>
1208 * bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking):
1209 Increment Warnings_Detected. It was decrementing, which is
1210 wrong since we just issued a warning message.
1211 * binderr.ads (Errors_Detected, Warnings_Detected): Declare
1212 these variables to be of subtype Nat instead of Int, because
1213 they should never be negative.
1215 2017-01-19 Javier Miranda <miranda@adacore.com>
1217 * contracts.adb (Build_Postconditions_Procedure): Replace
1218 Generate_C_Code by Modify_Tree_For_C.
1219 * exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate):
1220 Replace Generate_C_Code by Modify_Tree_For_C.
1221 * exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by
1223 * exp_ch11.adb (Expand_N_Exception_Declaration): Replace
1224 Generate_C_Code by Modify_Tree_For_C.
1225 * exp_ch4.adb (Expand_Allocator_Expression): Replace
1226 Generate_C_Code by Modify_Tree_For_C.
1227 * exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code
1228 by Modify_Tree_For_C.
1229 * exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace
1230 Generate_C_Code by Modify_Tree_For_C.
1231 * sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code
1232 by Modify_Tree_For_C.
1233 * sinfo.ads (Modify_Tree_For_C): Adding documentation.
1235 2017-01-19 Javier Miranda <miranda@adacore.com>
1237 * sem_util.ads, sem_util.adb (Expression_Of_Expression_Function): New
1239 (Is_Inlinable_Expression_Function): New subprogram.
1240 * exp_ch6.ads, exp_ch6.adb (Expression_Of_Expression_Function): Moved
1242 (Is_Inlinable_Expression_Function): Moved to Sem_Util.
1244 2017-01-19 Ed Schonberg <schonberg@adacore.com>
1246 * sem_ch4.adb (Diagnose_Call): Improve error message when a
1247 selected component has a prefix that might be interpreted
1248 as a parameterless function call, but none of the candidate
1249 interpretations is parameterless, and there is a hidden homonym
1250 of the prefix that is a package.
1251 * sem_ch8.adb (Find_Selected_Component): If the prefix might be
1252 interpreted as a parameterless function call and its analysis
1253 fails, do not call Analyze_Selected_Component.
1255 2017-01-19 Steve Baird <baird@adacore.com>
1257 * sem_util.ads: Add new Use_Full_View Boolean parameter to
1259 * sem_util.adb (Get_Index_Bounds): replace calls to Scalar_Range with
1260 calls to a newly-defined Scalar_Range_Of_Right_View function.
1262 2017-01-19 Arnaud Charlet <charlet@adacore.com>
1264 * gnat1drv.adb: minor fix of unbalanced parens in comment
1265 * lib-xref.ads (Traverse_Compilation_Unit): declaration moved
1266 to visible part of the package to allow re-use in GNATprove.
1267 * lib-xref-spark_specific.adb (Traverse_Stub): routine refactored
1268 from repeated code of Traverse_Compilation_Unit.
1269 (Traverse_Declaration_Or_Statement): fixed detection of
1270 generic subprograms and packages; also, iteration over case
1271 statement alternatives rewritten to avoid testing if the first
1272 alternative is present (since it must be present due to Ada
1273 syntax restrictions).
1275 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
1277 * exp_ch6.adb (Expand_N_Subprogram_Body): Mark the spec as
1278 returning by reference not just for subprogram body stubs,
1279 but for all subprogram cases.
1280 * sem_util.adb: Code reformatting.
1281 (Requires_Transient_Scope): Update the call to Results_Differ.
1282 (Results_Differ): Update the parameter profile and the associated
1285 2017-01-19 Ed Schonberg <schonberg@adacore.com>
1287 * sem_dim.adb (Analyze_Dimension): Analyze object declaration and
1288 identifier nodes that do not come from source, to handle properly
1289 dimensionality check within an inlined body which inclddes both
1290 original operands and rewritten operands. This removes spurious
1291 dimensionality errors in the presence of front-end inlining,
1292 as well as in SPARK mode.
1294 2017-01-16 Jakub Jelinek <jakub@redhat.com>
1297 * gcc-interface/lang.opt (gant, gnatO, gnat): Add Driver flag.
1299 2017-01-13 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
1301 * gcc-interface/Makefile.in (SPARC/Solaris): Fix typo.
1303 2017-01-13 Arnaud Charlet <charlet@adacore.com>
1305 * doc/gnat_ugn/getting_started_with_gnat.rst,
1306 doc/gnat_ugn/inline_assembler.rst,
1307 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
1308 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
1309 doc/gnat_ugn/about_this_guide.rst,
1310 doc/gnat_ugn/platform_specific_information.rst,
1311 doc/gnat_ugn/example_of_binder_output.rst,
1312 doc/gnat_ugn/gnat_and_program_execution.rst,
1313 doc/gnat_ugn/gnat_utility_programs.rst,
1314 doc/gnat_ugn/the_gnat_compilation_model.rst,
1315 doc/gnat_rm/implementation_defined_attributes.rst,
1316 doc/gnat_rm/compatibility_and_porting_guide.rst,
1317 doc/gnat_rm/standard_library_routines.rst,
1318 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
1319 doc/gnat_rm/implementation_defined_pragmas.rst,
1320 doc/gnat_rm/the_gnat_library.rst,
1321 doc/gnat_rm/obsolescent_features.rst,
1322 doc/gnat_rm/about_this_guide.rst,
1323 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
1324 doc/gnat_rm/implementation_of_ada_2012_features.rst,
1325 doc/gnat_rm/interfacing_to_other_languages.rst,
1326 doc/gnat_rm/implementation_defined_aspects.rst,
1327 doc/gnat_rm.rst: Update documentation.
1328 * gnat_rm.texi, gnat_ugn.texi: Regenerated.
1330 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1332 * einfo.ads: minor grammar fixes in comment of Normalized_Position_Max.
1333 * scil_ll.adb: Minor style fix in comment.
1334 * sem_ch8.adb (Analyze_Expanded_Name): Perform dimension analysis
1335 even if entity is already set, because the node may be renalyzed
1336 after inlining transformations.
1338 2017-01-13 Javier Miranda <miranda@adacore.com>
1340 * sem_res.adb (Resolve_Call): Do not establish a transient scope
1341 for a call to inlinable expression function (since the call will
1342 be replaced by its returned object).
1343 * exp_ch6.ads (Is_Inlinable_Expression_Function): New subprogram.
1344 * exp_ch6.adb (Expression_Of_Expression_Function): New subprogram.
1345 (Expand_Call): For inlinable expression function call replace the
1346 call by its returned object.
1347 (Is_Inlinable_Expression_Function): New subprogram.
1349 2017-01-13 Gary Dismukes <dismukes@adacore.com>
1351 * checks.adb: Minor typo fix and reformatting.
1353 2017-01-13 Javier Miranda <miranda@adacore.com>
1355 * contracts.adb (Contract_Only_Subprograms): Remove formal.
1356 (Copy_Original_Specification): Removed.
1357 (Skip_Contract_Only_Subprogram): Move here checks previously
1358 located in the caller of this routine (to leave the code more clean).
1359 (Build_Contract_Only_Subprogram): Code cleanup.
1360 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): Removed.
1361 (Get_Contract_Only_Missing_Body_Name): Removed.
1363 2017-01-13 Javier Miranda <miranda@adacore.com>
1365 * sem_ch6.adb (Cloned_Expression): New subprogram.
1366 (Freeze_Expr_Types): Complete previous patch since the expression
1367 of an expression-function may have iterators and loops with
1368 defining identifiers which, as part of the preanalysis of the
1369 expression, may be left decorated with itypes that will not be
1370 available in the tree passed to the backend.
1372 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1374 * checks.adb (Apply_Type_Conversion_Checks): Optimize a type
1375 conversion to Integer of an expression that is an attribute
1376 reference 'Pos on an enumeration type.
1378 2017-01-13 Bob Duff <duff@adacore.com>
1380 * atree.ads: Minor comment fix.
1382 2017-01-13 Justin Squirek <squirek@adacore.com>
1384 * sem_ch6.adb (Check_Aggregate_Accessibility): Ignore function
1385 calls in accessibility check on return statement.
1387 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1389 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
1390 Ensure that the input body is a subprogram body before trying to
1391 determine whether it denoted an expression function. Note that
1392 subprogram body stubs cannot denote expression functions.
1394 2017-01-13 Gary Dismukes <dismukes@adacore.com>
1396 * bindgen.adb, sem_ch6.adb, binde.adb, exp_ch3.adb: Minor reformatting
1399 2017-01-13 Javier Miranda <miranda@adacore.com>
1401 * einfo.ads (Component_Bit_Offset): Fix documentation.
1402 * sem_ch13.adb (Check_Record_Representation_Clause): Skip check
1403 on record holes for components with unknown compile-time offsets.
1405 2017-01-13 Bob Duff <duff@adacore.com>
1407 * ali.ads, ali.adb (Static_Elaboration_Model_Used): Remove unused flag.
1408 * g-locfil.ads: Minor comment fix.
1410 2017-01-13 Bob Duff <duff@adacore.com>
1412 * binde.adb (Elab_New): New elaboration order algorithm
1413 that is expected to cause fewer ABE issues. This is a work in
1414 progress. The new algorithm is currently disabled, and can be
1415 enable by the -dp switch, or by modifying the Do_Old and Do_New
1416 etc. flags and rebuilding. Experimental code is included to
1417 compare the results of the old and new algorithms.
1418 * binde.ads: Use GNAT.Dynamic_Tables instead of Table, so we
1419 can have multiple of these tables, so the old and new algorithms
1421 * bindgen.ads (Gen_Output_File): Pass Elab_Order as an 'in'
1422 parameter of type array. This avoids the global variable, and
1423 allows bounds checking (which is normally defeated by the tables
1424 packages). It also ensures that the Elab_Order is read-only
1426 * bindgen.adb: Pass Elab_Order as an 'in' parameter to all
1427 subprograms that need it, as above.
1428 * debug.adb: Document new -dp switch. Modify doc of old -do
1430 * gnatbind.adb (Gnatbind): Make use of new interfaces to Binde
1431 and Bindgen. Move writing of closure (-R and -Ra switches)
1432 to Binde; that's more convenient.
1434 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1436 * sem_ch6.adb (Analyze_Expression_Function): If the expression
1437 function is a completion, all entities referenced in the
1438 expression are frozen. As a consequence, a reference to an
1439 uncompleted private type from an enclosing scope is illegal.
1441 2017-01-13 Javier Miranda <miranda@adacore.com>
1443 * sem_ch6.adb (Freeze_Expr_Types): New subprogram.
1444 (Analyze_Subprogram_Body_Helper): At the occurrence of an
1445 expression function declaration that is a completion, its
1446 expression causes freezing (AI12-0103).
1448 2017-01-13 Vadim Godunko <godunko@adacore.com>
1450 * a-coinho-shared.adb: Fix memory leaks in Constant_Reference and
1451 Reference functions of Ada.Containers.Indefinite_Holders.
1453 2017-01-13 Bob Duff <duff@adacore.com>
1455 * s-os_lib.ads: Minor comment fixes.
1457 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1459 * exp_ch3.adb (Default_Initialize_Object): Do not default
1460 initialize an object when it is of a task type and restriction
1461 No_Tasking is in effect because the initialization is obsolete.
1462 * exp_ch9.adb (Build_Master_Entity): Do not generate a master when
1463 restriction No_Tasking is in effect.
1464 (Build_Master_Renaming): Do not rename a master when restriction
1465 No_Tasking is in effect.
1467 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1469 * sem_aggr.adb (Resolve_Array_Aggregate): The code that verifies
1470 the legality of An others clause applies as well to a choice in
1471 an Iterated_component_ association.
1472 (Resolve_Iterated_Component_Association): An others choice
1474 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): An
1475 Iterated_Component_Association is not static.
1477 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1479 * exp_ch3.adb (Freeze_Type): Mark the Ghost mode as set in case
1480 control is passed to the expresion handler before the new mode
1482 * sem_ch12.adb (Analyze_Package_Instantiation,
1483 Analyze_Subprogram_Instantiation): Mark the Ghost mode as set
1484 in case control is passed to the expresion handler before the
1487 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1489 * sem_aggr.adb, sem_ch3.adb, inline.adb, sem_util.adb, exp_ch4.adb,
1490 exp_aggr.adb: Minor reformatting.
1492 2017-01-13 Gary Dismukes <dismukes@adacore.com>
1494 * inline.adb: Minor reformatting and typo fix.
1496 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1498 * sem_util.ads, sem_util.adb (Choice_List): Move function here
1499 from sem_aggr.adb, for use elsewhere.
1500 * sem_ch3.adb (Analyze_Object_Declaration): Use Choice_List.
1501 * sem_aggr.adb (Resolve_Array_Aggregate): Remove
1502 Iterated_Component_Present.
1503 * exp_aggr.adb: Use Choice_List throughout, to handle
1504 Iterated_Component_Associations.
1505 (Gen_Loop): Generate proper loop for an
1506 Iterated_Component_Association: loop variable has the identifier
1507 of the original association. Generate a loop even for a single
1508 component choice, in order to make loop parameter visible in
1510 (Flatten): An Iterated_Component_Association is not static.
1512 2017-01-13 Yannick Moy <moy@adacore.com>
1514 * exp_ch4.adb (Expand_N_Op_Expon): Ensure that the value of
1515 float exponentiation for statically known small negative values
1516 is the reciprocal of the exponentiation for the opposite value
1518 * s-exnllf.adb (Exn_Float, Exn_Long_Float, Exn_Long_Long_Float):
1519 Ensure that the value of float exponentiation for negative values
1520 is the reciprocal of the exponentiation for the opposite value
1522 * inline.adb (Expand_Inlined_Call): Fix the count
1523 for the number of generated gotos.
1525 2017-01-13 Yannick Moy <moy@adacore.com>
1527 * inline.adb: Code cleanup.
1528 * sem_util.adb (Is_OK_Volatile_Context): Add
1529 expression in delay statement as OK for volatile context.
1531 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1533 * sem_aggr.adb (Resolve_Array_Aggregate): In normal compilation
1534 mode a choice that is a subtype with a static predicate is
1535 replaced by the values it covers. This transformation must not
1536 be performed in ASIS mode, to preserve the source for analysis.
1538 2017-01-13 Justin Squirek <squirek@adacore.com>
1540 * nlists.ads: Correct minor typo.
1542 2017-01-13 Gary Dismukes <dismukes@adacore.com>
1544 * sem_ch13.adb: Minor reformatting and typo fix.
1546 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1548 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): An
1549 Iterated_Component_Association is a named association in an
1551 * sem_aggr.adb (Resolve_Iterated_Component_Association): New
1552 procedure, subsidiary of Resolve_Array_Aggregate, to analyze
1553 and resolve the discrete choices and the expression of the
1555 * sinfo.adb, sinfo.ads: In analogy with N_Component_Association,
1556 Loop_Actions and Box_Present are attributes of
1557 N_Iterated_Component_Association nodes. Box_Present is always
1559 * sprint.adb (Sprint_Node): An Iterated_Component_Association
1560 has a Discrete_Choices list, as specified in the RM. A
1561 Component_Association for aggregate uses instead a Choices list.
1562 We have to live with this small inconsistency because the new
1563 construct also has a defining identifier, and there is no way
1564 to merge the two node structures.
1566 2017-01-13 Yannick Moy <moy@adacore.com>
1568 * inline.adb (Remove_Aspects_And_Pragmas): Add Unused to the
1569 list of pragmas to remove. Remove pragmas from the list of
1570 statements in the body to inline.
1571 * namet.adb, namet.ads (Nam_In): New version with 12 parameters.
1573 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1575 * sem_ch3.adb (Resolve_Aspects): New procedure, subsidiary of
1576 Analyze_Declarations, to analyze and resolve the expressions of
1577 aspect specifications in the current declarative list, so that
1578 the expressions have proper entity and type info. This is needed
1579 for ASIS when there is no subsequent expansion to generate this
1580 semantic information.
1581 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Use Etype of
1582 original expression, to suppress cascaded errors when expression
1583 has been constant-folded.
1584 (Resolve_Aspect_Expressions, Resolve_Name): Preserve entities in
1585 ASIS mode, because there is no subsequent expansion to decorate
1588 2017-01-13 Yannick Moy <moy@adacore.com>
1590 * inline.adb, inline.ads (Call_Can_Be_Inlined_In_GNATprove_Mode):
1591 New function to detect when a call may be inlined or not in
1593 (Expand_Inlined_Call): Ensure that a temporary
1594 is always created in the cases where a type conversion may be
1595 needed on an input parameter in GNATprove mode, so that GNATprove
1596 sees the check to perform.
1597 * sem_res.adb (Resolve_Call): In GNATprove mode, skip inlining
1598 when not applicable due to actual requiring type conversion
1599 with possible check but no temporary value can be copied for
1600 GNATprove to see the check.
1602 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1604 * sem_aggr.adb, par_sco.adb, s-osprim-mingw.adb, exp_ch5.adb,
1605 exp_prag.adb, sem_ch3.adb, xr_tabls.adb, lib-xref-spark_specific.adb,
1606 layout.adb, sem_dist.adb, exp_spark.adb, exp_ch7.adb, gnatcmd.adb,
1607 exp_util.adb, prj-proc.adb, sem_aux.adb, comperr.adb, g-memdum.adb,
1608 exp_attr.adb, s-intman-solaris.adb, exp_ch9.adb, make.adb, live.adb,
1609 g-sercom-linux.adb, sem_dim.adb, mlib-prj.adb, s-intman-posix.adb,
1610 sem_ch9.adb, sem_ch10.adb, prep.adb, einfo.adb, scng.adb, checks.adb,
1611 prj-strt.adb, sem_prag.adb, eval_fat.adb, sem_ch12.adb, sem.adb,
1612 a-numaux-x86.adb, a-stwifi.adb, i-cobol.adb, prj.adb,
1613 get_spark_xrefs.adb, s-tasini.adb, rtsfind.adb, freeze.adb,
1614 g-arrspl.adb, par-ch4.adb, sem_util.adb, sem_res.adb, expander.adb,
1615 sem_attr.adb, exp_dbug.adb, prj-pp.adb, a-stzfix.adb, s-interr.adb,
1616 s-wchcnv.adb, switch-m.adb, gnat1drv.adb, sinput-l.adb, stylesw.adb,
1617 contracts.adb, s-intman-android.adb, g-expect.adb, exp_ch4.adb,
1618 g-comlin.adb, errout.adb, sinput.adb, s-exctra.adb, repinfo.adb,
1619 g-spipat.adb, g-debpoo.adb, exp_ch6.adb, sem_ch4.adb, exp_ch13.adb,
1620 a-wtedit.adb, validsw.adb, pprint.adb, widechar.adb, makeutl.adb,
1621 ali.adb, set_targ.adb, sem_mech.adb, sem_ch6.adb, gnatdll.adb,
1622 get_scos.adb, g-pehage.adb, s-tratas-default.adb, gnatbind.adb,
1623 prj-dect.adb, g-socthi-mingw.adb, par-prag.adb, prj-nmsc.adb,
1624 exp_disp.adb, par-ch12.adb, binde.adb, sem_ch8.adb,
1625 s-tfsetr-default.adb, s-regexp.adb, gprep.adb, s-tpobop.adb,
1626 a-teioed.adb, sem_warn.adb, sem_eval.adb, g-awk.adb, s-io.adb,
1627 a-ztedit.adb, xoscons.adb, exp_intr.adb, sem_cat.adb, sprint.adb,
1628 g-socket.adb, exp_dist.adb, sem_ch13.adb, s-tfsetr-vxworks.adb,
1629 par-ch3.adb, treepr.adb, g-forstr.adb, g-catiio.adb, par-ch5.adb,
1630 uname.adb, osint.adb, exp_ch3.adb, prj-env.adb, a-strfix.adb,
1631 a-stzsup.adb, prj-tree.adb, s-fileio.adb: Update all eligible case
1632 statements to reflect the new style for case alternatives. Various
1633 code clean up and reformatting.
1635 2017-01-13 Gary Dismukes <dismukes@adacore.com>
1637 * exp_util.adb: Minor reformatting.
1639 2017-01-13 Yannick Moy <moy@adacore.com>
1641 * exp_spark.adb: Code cleanup.
1642 * sem_ch9.adb (Analyze_Delay_Until): Resolve
1643 expression so that calls are identified as such inside delay
1646 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1648 * exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
1649 * par-ch3.adb (P_Discrete_Choice_List): An
1650 Iterated_Component_Association is an array aggregate component.
1651 * par-ch4.adb (P_Iterated_Component_Association): New procedure.
1652 (Is_Quantified_Expression): New function that performs a lookahead
1653 to distinguish quantified expressions from iterated component
1655 (P_Aggregate_Or_Paren_Expr): Recognize iterated component
1657 (P_Unparen_Cond_Case_Quant_Expression, P_Primary): Ditto.
1658 * sem.adb (Analyze): Handle Iterated_Component_Association.
1659 * sem_aggr.adb (Resolve_Array_Aggregate): Dummy handling of iterated
1660 component associations.
1661 * sinfo.ads, sinfo.adb: Entries for for
1662 N_Iterated_Component_Association and its fields.
1663 * sprint.adb (Sprint_Node_Actual): Handle
1664 N_Iterated_Component_Association.
1666 2017-01-13 Justin Squirek <squirek@adacore.com>
1668 * sem_ch12.adb (Analyze_Package_Instantiation): Move disabiling
1669 of the style check until after preanalysis of acutals.
1671 2017-01-13 Yannick Moy <moy@adacore.com>
1673 * sem_ch13.adb: Minor reformatting.
1674 * par-ch11.adb: minor style fix in whitespace
1675 * gnatbind.adb (Gnatbind): Scope of Std_Lib_File
1676 reduced to Add_Artificial_ALI_File; style fix in declaration of
1677 Text; grammar fix in comment.
1678 * osint-c.adb (Read_Library_Info): strip trailing NUL from result.
1679 * freeze.adb: Cleanup to pass pragma instead of
1681 * exp_spark.adb (Expand_SPARK_Attribute_Reference): New procedure to
1682 replace System'To_Address by equivalent call.
1684 2017-01-13 Arnaud Charlet <charlet@adacore.com>
1686 * bindusg.adb: Improve usage output for -f switch.
1688 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1690 * frontend.adb, freeze.adb, sem_res.adb, sem_attr.adb, sem_ch8.adb:
1693 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1695 * sem_ch13.adb (Is_Predicate_Static): Following the intent of the RM,
1696 treat comparisons on strings as legal in a Static_Predicate.
1697 (Is_Predicate_Static, Is_Type_Ref): Predicate also returns true on
1698 a function call that is the expansion of a string comparison.The
1699 function call is built when compiling the corresponding predicate
1700 function, but the expression has been found legal as a static
1701 predicate during earlier analysis.
1702 * sem_eval.adb (Real_Or_String_Static_Predicate_Matches): Handle
1703 properly a function call that is the expansion of a string
1704 comparison operation, in order to recover the Static_Predicate
1705 expression and apply it to a static argument when needed.
1707 2017-01-13 Tristan Gingold <gingold@adacore.com>
1709 * s-mmap.adb, s-mmap.ads (Open_Read_No_Exception): New function.
1710 (Open_Read): Re-implement using Open_Read_No_Exception.
1711 (Open_Write): Raise exception in case of error.
1712 * s-mmosin-mingw.adb (Open_Common): Do not raise exception.
1713 * s-mmosin-unix.adb (Open_Read, Open_Write): Do not
1715 * s-mmosin-mingw.ads, s-mmosin-unix.ads (Open_Read): Adjust comment.
1717 2017-01-13 Yannick Moy <moy@adacore.com>
1719 * checks.adb: Code cleanup.
1721 2017-01-13 Yannick Moy <moy@adacore.com>
1723 * freeze.adb (Check_Inherited_Conditions): Use analyzed pragma
1724 expression instead of unanalyzed aspect expression for checking
1725 the validity of inheriting an operation. Also copy the expression
1726 being passing it to Build_Class_Wide_Expression, as this call
1727 modifies its argument.
1728 * sem_util.ads Fix comment to reference correct function name
1731 2017-01-13 Javier Miranda <miranda@adacore.com>
1733 * sem_res.adb (Resolve_Generalized_Indexing): Compiling in ASIS mode,
1734 when we propagate information about the indexes back to the original
1735 indexing mode and the prefix of the index is a function call, do not
1736 remove any parameter from such call.
1738 2017-01-13 Gary Dismukes <dismukes@adacore.com>
1740 * exp_ch6.ads (Needs_BIP_Finalization_Master): Update comment.
1741 * exp_ch6.adb (Needs_BIP_Finalization_Master): Return True for
1742 a build-in-place function whose result type is tagged.
1744 2017-01-13 Yannick Moy <moy@adacore.com>
1746 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
1747 Do not generate a wrapper when the only candidate is a class-wide
1749 (Analyze_Subprogram_Renaming): Do not freeze the renaming or renamed
1750 inside a generic context.
1752 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1754 * exp_util.adb (Add_Inherited_Tagged_DIC):
1755 Pass the object parameters of both the parent and the derived
1756 type DIC procedure to the reference replacement circuitry.
1757 (Find_DIC_Type): Modify the circuitry to present the partial
1758 view of a private type in case the private type defines its own
1760 (Replace_Object_And_Primitive_References): Add two
1761 optional formal parameters. Update the comment on usage. Update
1762 the replacement of references to object parameters.
1764 2017-01-13 Gary Dismukes <dismukes@adacore.com>
1766 * einfo.adb, sem_ch6.adb, atree.adb: Minor reformatting and typo fix.
1768 2017-01-13 Ed Schonberg <schonberg@adacore.com>
1770 * sem_res.adb (Resolve_Actuals): Apply Scalar_Range_Check to
1771 an out parameter that is a type conversion, independently of th
1772 range check that may apply to the expression of the conversion,
1773 for use in GNATProve.
1775 2017-01-13 Yannick Moy <moy@adacore.com>
1777 * gnat1drv.adb (Gnat1drv): Move the implicit with for System in
1778 GNATprove_Mode here to Frontend.
1779 * frontend.adb (Frontend): Move the implicit with for System
1780 in GNATprove_Mode here as it ismore correct this way; the old
1781 place only worked by chance, since there were no overloaded names.
1782 * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_Tasking_State.
1783 * sem_attr.adb (Analyze_Attribute): In GNATprove_Mode, for the
1784 four attributes identified in SRM 9(18), add an implicit with
1785 to Ada.Task_Identification.
1786 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
1787 Deal specially with the wrapper introduced for AI05-0071 in GNATprove
1789 * checks.adb (Apply_Discriminant_Check,
1790 Apply_Selected_Length_Checks, Apply_Selected_Range_Checks):
1791 In GNATprove mode, we do not apply the checks, but we still
1792 analyze the expression to possibly issue errors on SPARK
1793 code when a run-time error can be detected at compile time.
1794 (Selected_Length_Checks, Selected_Range_Checks): Perform analysis
1797 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1799 * expander.adb (Expand): Add a warning about using return
1800 statements in Ghost management code.
1801 * exp_ch3.adb (Freeze_Type): Add a warning about using return
1802 statements in Ghost management code.
1803 * exp_ch7.adb (Build_Invariant_Procedure_Body,
1804 Build_Invariant_Procedure_Declaration): Add a warning about
1805 using return statements in Ghost management code.
1806 * exp_disp.adb (Make_DT): Add a warning about using return
1807 statements in Ghost management code.
1808 * exp_util.adb (Build_DIC_Procedure_Body,
1809 Build_DIC_Procedure_Declaration, Make_Predicated_Call): Add a
1810 warning about using return statements in Ghost management code.
1811 * freeze.adb (Freeze_Entity): Add a warning about using return
1812 statements in Ghost management code.
1813 * sem.adb (Analyze, Do_Analyze): Add a warning about using return
1814 statements in Ghost management code.
1815 * sem_ch3.adb (Analyze_Object_Declaration, Process_Full_View): Add
1816 a warning about using return statements in Ghost management code.
1817 * sem_ch5.adb (Analyze_Assignment): Add a warning about using
1818 return statements in Ghost management code.
1819 * sem_ch6.adb (Analyze_Procedure_Call,
1820 Analyze_Subprogram_Body_Helper): Add a warning about using return
1821 statements in Ghost management code.
1822 * sem_ch7.adb (Analyze_Package_Body_Helper): Add a warning about
1823 using return statements in Ghost management code.
1824 * sem_ch12.adb (Analyze_Package_Instantiation,
1825 Analyze_Subprogram_Instantiation, Instantiate_Package_Body,
1826 Instantiate_Subprogram_Body): Add a warning about using return
1827 statements in Ghost management code.
1828 * sem_ch13.adb (Build_Predicate_Functions,
1829 Build_Predicate_Function_Declarations): Add a warning about
1830 using return statements in Ghost management code.
1831 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part,
1832 Analyze_Initial_Condition_In_Decl_Part, Analyze_Pragma,
1833 Analyze_Pre_Post_Condition_In_Decl_Part): Add a warning about
1834 using return statements in Ghost management code.
1836 2017-01-13 Tristan Gingold <gingold@adacore.com>
1838 * s-mmosin-mingw.adb: Fix pragma import.
1840 2017-01-13 Arnaud Charlet <charlet@adacore.com>
1842 * gnat1drv.adb (Adjust_Global_Switches): Ignore -gnateE in
1845 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
1847 * atree.adb (Allocate_Initialize_Node): A newly created node is
1848 no longer marked as Ghost at this level.
1849 (Mark_New_Ghost_Node): New routine.
1850 (New_Copy): Mark the copy as Ghost.
1851 (New_Entity): Mark the entity as Ghost.
1852 (New_Node): Mark the node as Ghost.
1853 * einfo.adb (Is_Checked_Ghost_Entity): This attribute can now
1854 apply to unanalyzed entities.
1855 (Is_Ignored_Ghost_Entity): This attribute can now apply to unanalyzed
1857 (Set_Is_Checked_Ghost_Entity): This attribute now
1858 applies to all entities as well as unanalyzed entities.
1859 (Set_Is_Ignored_Ghost_Entity): This attribute now applies to
1860 all entities as well as unanalyzed entities.
1861 * expander.adb Add with and use clauses for Ghost.
1862 (Expand): Install and revert the Ghost region associated with the node
1864 * exp_ch3.adb (Expand_Freeze_Array_Type): Remove all Ghost-related code.
1865 (Expand_Freeze_Class_Wide_Type): Remoe all Ghost-related code.
1866 (Expand_Freeze_Enumeration_Type): Remove all Ghost-related code.
1867 (Expand_Freeze_Record_Type): Remove all Ghost-related code.
1868 (Freeze_Type): Install and revert the Ghost region associated
1869 with the type being frozen.
1870 * exp_ch5.adb Remove with and use clauses for Ghost.
1871 (Expand_N_Assignment_Statement): Remove all Ghost-related code.
1872 * exp_ch6.adb Remove with and use clauses for Ghost.
1873 (Expand_N_Procedure_Call_Statement): Remove all Ghost-relatd code.
1874 (Expand_N_Subprogram_Body): Remove all Ghost-related code.
1875 * exp_ch7.adb (Build_Invariant_Procedure_Body): Install and revert the
1876 Ghost region of the working type.
1877 (Build_Invariant_Procedure_Declaration): Install and revert
1878 the Ghost region of the working type.
1879 (Expand_N_Package_Body): Remove all Ghost-related code.
1880 * exp_ch8.adb Remove with and use clauses for Ghost.
1881 (Expand_N_Exception_Renaming_Declaration): Remove all Ghost-related
1883 (Expand_N_Object_Renaming_Declaration): Remove all Ghost-related code.
1884 (Expand_N_Package_Renaming_Declaration): Remove all Ghost-related code.
1885 (Expand_N_Subprogram_Renaming_Declaration): Remove all Ghost-related
1887 * exp_ch13.adb Remove with and use clauses for Ghost.
1888 (Expand_N_Freeze_Entity): Remove all Ghost-related code.
1889 * exp_disp.adb (Make_DT): Install and revert the Ghost region of
1890 the tagged type. Move the generation of various entities within
1891 the Ghost region of the type.
1892 * exp_prag.adb Remove with and use clauses for Ghost.
1893 (Expand_Pragma_Check): Remove all Ghost-related code.
1894 (Expand_Pragma_Contract_Cases): Remove all Ghost-related code.
1895 (Expand_Pragma_Initial_Condition): Remove all Ghost-related code.
1896 (Expand_Pragma_Loop_Variant): Remove all Ghost-related code.
1897 * exp_util.adb (Build_DIC_Procedure_Body): Install
1898 and revert the Ghost region of the working types.
1899 (Build_DIC_Procedure_Declaration): Install and revert the
1900 Ghost region of the working type.
1901 (Make_Invariant_Call): Install and revert the Ghost region of the
1903 (Make_Predicate_Call): Reimplemented. Install and revert the
1904 Ghost region of the associated type.
1905 * freeze.adb (Freeze_Entity): Install and revert the Ghost region
1906 of the entity being frozen.
1907 (New_Freeze_Node): Removed.
1908 * ghost.adb Remove with and use clauses for Opt.
1909 (Check_Ghost_Completion): Update the parameter profile
1910 and all references to formal parameters.
1911 (Ghost_Entity): Update the comment on usage.
1912 (Install_Ghost_Mode): New routines.
1913 (Is_Ghost_Assignment): New routine.
1914 (Is_Ghost_Declaration): New routine.
1915 (Is_Ghost_Pragma): New routine.
1916 (Is_Ghost_Procedure_Call): New routine.
1917 (Is_Ghost_Renaming): Removed.
1918 (Is_OK_Declaration): Reimplemented.
1919 (Is_OK_Pragma): Reimplemented.
1920 (Is_OK_Statement): Reimplemented.
1921 (Is_Subject_To_Ghost): Update the comment on usage.
1922 (Mark_And_Set_Ghost_Assignment): New routine.
1923 (Mark_And_Set_Ghost_Body): New routine.
1924 (Mark_And_Set_Ghost_Completion): New routine.
1925 (Mark_And_Set_Ghost_Declaration): New routine.
1926 (Mark_And_Set_Ghost_Instantiation): New routine.
1927 (Mark_And_Set_Ghost_Procedure_Call): New routine.
1928 (Mark_Full_View_As_Ghost): Removed.
1929 (Mark_Ghost_Declaration_Or_Body): New routine.
1930 (Mark_Ghost_Pragma): New routine.
1931 (Mark_Ghost_Renaming): New routine.
1932 (Mark_Pragma_As_Ghost): Removed.
1933 (Mark_Renaming_As_Ghost): Removed.
1934 (Propagate_Ignored_Ghost_Code): Update the comment on usage.
1935 (Prune_Node): Freeze nodes no longer need special pruning, they
1936 are processed by the general ignored Ghost code mechanism.
1937 (Restore_Ghost_Mode): New routine.
1938 (Set_Ghost_Mode): Reimplemented.
1939 (Set_Ghost_Mode_From_Entity): Removed.
1940 * ghost.ads Add with and use clauses for Ghost.
1941 (Check_Ghost_Completion): Update the parameter profile
1942 along with the comment on usage.
1943 (Install_Ghost_Mode): New routine.
1944 (Is_Ghost_Assignment): New routine.
1945 (Is_Ghost_Declaration): New routine.
1946 (Is_Ghost_Pragma): New routine.
1947 (Is_Ghost_Procedure_Call): New routine.
1948 (Mark_And_Set_Ghost_Assignment): New routine.
1949 (Mark_And_Set_Ghost_Body): New routine.
1950 (Mark_And_Set_Ghost_Completion): New routine.
1951 (Mark_And_Set_Ghost_Declaration): New routine.
1952 (Mark_And_Set_Ghost_Instantiation): New routine.
1953 (Mark_And_Set_Ghost_Procedure_Call): New routine.
1954 (Mark_Full_View_As_Ghost): Removed.
1955 (Mark_Ghost_Pragma): New routine.
1956 (Mark_Ghost_Renaming): New routine.
1957 (Mark_Pragma_As_Ghost): Removed.
1958 (Mark_Renaming_As_Ghost): Removed.
1959 (Restore_Ghost_Mode): New routine.
1960 (Set_Ghost_Mode): Redefined.
1961 (Set_Ghost_Mode_From_Entity): Removed.
1962 * sem.adb (Analyze): Install and revert the Ghost region of the
1963 node being analyzed.
1964 (Do_Analyze): Change the way a clean Ghost
1965 region is installed and reverted.
1966 * sem_ch3.adb (Analyze_Full_Type_Declaration): Remove
1967 all Ghost-related code.
1968 (Analyze_Incomplete_Type_Decl): Remove all Ghost-related code.
1969 (Analyze_Number_Declaration): Remove all Ghost-related code.
1970 (Analyze_Object_Declaration): Install and revert the Ghost region of
1971 a deferred object declaration's completion.
1972 (Array_Type_Declaration): Remove all Ghost-related code.
1973 (Build_Derived_Type): Update the comment on
1974 the propagation of Ghost attributes from a parent to a derived type.
1975 (Derive_Subprogram): Remove all Ghost-related code.
1976 (Make_Class_Wide_Type): Remove all Ghost-related code.
1977 (Make_Implicit_Base): Remove all Ghost-related code.
1978 (Process_Full_View): Install and revert the Ghost region of
1979 the partial view. There is no longer need to check the Ghost
1981 * sem_ch5.adb (Analyze_Assignment): Install and revert the Ghost
1982 region of the left hand side.
1983 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Remove
1984 all Ghost-related code.
1985 (Analyze_Expression_Function): Remove all Ghost-related code.
1986 (Analyze_Generic_Subprogram_Body): Remove all Ghost-related code.
1987 (Analyze_Procedure_Call): Install and revert the Ghost region of
1988 the procedure being called.
1989 (Analyze_Subprogram_Body_Helper): Install and revert the Ghost
1990 region of the spec or body.
1991 (Analyze_Subprogram_Declaration): Remove all Ghost-related code.
1992 (Build_Subprogram_Declaration): Remove all Ghost-related code.
1993 (Find_Corresponding_Spec): Remove all Ghost-related code.
1994 (Process_Formals): Remove all Ghost-related code.
1995 * sem_ch7.adb (Analyze_Package_Body_Helper): Install and revert
1996 the Ghost region of the spec.
1997 (Analyze_Package_Declaration): Remove all Ghost-related code.
1998 * sem_ch8.adb (Analyze_Exception_Renaming): Mark a renaming as
1999 Ghost when it aliases a Ghost entity.
2000 (Analyze_Generic_Renaming): Mark a renaming as Ghost when it aliases
2002 (Analyze_Object_Renaming): Mark a renaming as Ghost when
2003 it aliases a Ghost entity.
2004 (Analyze_Package_Renaming): Mark a renaming as Ghost when it aliases
2006 (Analyze_Subprogram_Renaming): Mark a renaming as Ghost when it
2007 aliases a Ghost entity.
2008 * sem_ch11.adb Remove with and use clauses for Ghost.
2009 (Analyze_Exception_Declaration): Remove all Ghost-related code.
2010 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Remove all
2012 (Analyze_Generic_Subprogram_Declaration): Remove all Ghost-related
2014 (Analyze_Package_Instantiation): Install and revert the Ghost region
2015 of the package instantiation.
2016 (Analyze_Subprogram_Instantiation): Install
2017 and revert the Ghost region of the subprogram instantiation.
2018 (Instantiate_Package_Body): Code clean up. Install and revert the
2019 Ghost region of the package body.
2020 (Instantiate_Subprogram_Body): Code clean up. Install and revert the
2021 Ghost region of the subprogram body.
2022 * sem_ch13.adb (Build_Predicate_Functions): Install
2023 and revert the Ghost region of the related type.
2024 (Build_Predicate_Function_Declaration): Code clean up. Install
2025 and rever the Ghost region of the related type.
2026 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
2027 Install and revert the Ghost region of the pragma.
2028 (Analyze_Initial_Condition_In_Decl_Part): Install and revert the
2029 Ghost region of the pragma.
2030 (Analyze_Pragma): Install and revert the Ghost region of various
2031 pragmas. Mark a pragma as Ghost when it is related to a Ghost entity
2032 or encloses a Ghost entity.
2033 (Analyze_Pre_Post_Condition): Install and revert the Ghost
2034 region of the pragma.
2035 (Analyze_Pre_Post_Condition_In_Decl_Part): Install and revert the
2036 Ghost region of the pragma.
2037 * sem_res.adb (Resolve): Remove all Ghost-related code.
2038 * sem_util.adb (Is_Declaration): Reimplemented.
2039 (Is_Declaration_Other_Than_Renaming): New routine.
2040 * sem_util.ads (Is_Declaration_Other_Than_Renaming): New routine.
2041 * sinfo.adb (Is_Checked_Ghost_Pragma): New routine.
2042 (Is_Ghost_Pragma): Removed.
2043 (Is_Ignored_Ghost_Pragma): New routine.
2044 (Set_Is_Checked_Ghost_Pragma): New routine.
2045 (Set_Is_Ghost_Pragma): Removed.
2046 (Set_Is_Ignored_Ghost_Pragma): New routine.
2047 * sinfo.ads: Update the documentation on Ghost mode and
2048 Ghost regions. New attributes Is_Checked_Ghost_Pragma
2049 and Is_Ignored_Ghost_Pragma along with usages in nodes.
2050 Remove attribute Is_Ghost_Pragma along with usages in nodes.
2051 (Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
2052 (Is_Ghost_Pragma): Removed along with pragma Inline.
2053 (Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
2054 (Set_Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
2055 (Set_Is_Ghost_Pragma): Removed along with pragma Inline.
2056 (Set_Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
2058 2017-01-12 Tristan Gingold <gingold@adacore.com>
2060 * s-mmap.ads, s-mmap.adb, s-mmosin-unix.ads, s-mmosin-unix.adb,
2061 s-mmauni-long.ads, s-mmosin-mingw.ads, s-mmosin-mingw.adb: New files.
2063 2017-01-12 Yannick Moy <moy@adacore.com>
2065 * errout.adb, errout.ads (Initialize): Factor common treatment
2067 (Reset_Warnings): New procedure to reset counts related to warnings.
2068 (Record_Compilation_Errors): New variable to store the presence of an
2069 error, used in gnat2why to allow changing the Warning_Mode.
2070 (Compilation_Errors): Use new variable Record_Compilation_Errors to
2071 store the presence of an error.
2073 2017-01-12 Javier Miranda <miranda@adacore.com>
2075 * sem_ch13.adb (Analyze_Aspect_Specifications):
2076 For Interrupt_Handler and Attach_ Handler aspects, decorate the
2077 internally built reference to the protected procedure as coming
2078 from sources and force its analysis.
2080 2017-01-12 Ed Schonberg <schonberg@adacore.com>
2082 * sem_ch3.adb (Build_Derived_Type): For a scalar derived type,
2083 inherit predicates if any from the first_subtype of the parent,
2084 not from the anonymous parent type.
2085 * sem_eval.adb (Is_Static_Subtype): A type that inherits a dynamic
2086 predicate is not a static subtype.
2088 2017-01-12 Gary Dismukes <dismukes@adacore.com>
2090 * freeze.adb (Check_Suspicious_Convention): New procedure
2091 performing a warning check on discriminated record types with
2092 convention C or C++. Factored out of procedure Freeze_Record_Type,
2093 and changed to only apply to base types (to avoid spurious
2094 warnings on subtypes). Minor improvement of warning messages
2095 to refer to discriminated rather than variant record types.
2096 (Freeze_Record_Type): Remove code for performing a suspicious
2098 (Freeze_Entity): Only call Freeze_Record_Type
2099 on types that aren't declared within any enclosing generic units
2100 (rather than just excluding the type when the innermost scope
2101 is generic). Call Check_Suspicious_Convention whether or not
2102 the type is declared within a generic unit.
2103 * sem_ch8.adb (In_Generic_Scope): Move this function to Sem_Util.
2104 * sem_util.ads, sem_util.adb (In_Generic_Scope): New function (moved
2107 2017-01-12 Tristan Gingold <gingold@adacore.com>
2109 * sysdep.c, adaint.c, rtinit.c, ming32.h:
2110 (__gnat_current_codepage): Renamed from CurrentCodePage
2111 (__gnat_current_ccs_encoding): Renamed from CurrentCCSEncoding
2113 2017-01-12 Ed Schonberg <schonberg@adacore.com>
2115 * sem_ch6.adb (Fully_Conformant_Expressions): Handle properly
2116 quantified expressions, following AI12-050: the loop parameters
2117 of two quantified expressions are conformant if they have the
2120 2017-01-12 Arnaud Charlet <charlet@adacore.com>
2122 * gcc-interface/Makefile.in: Clean up VxWorks targets.
2124 2017-01-12 Ed Schonberg <schonberg@adacore.com>
2126 * sem_attr.adb (Analyze_Attribute_Reference, case Loop_Entry):
2127 Hnadle properly the attribute reference when it appears as part
2128 of an expression in another loop aspect.
2130 2017-01-12 Ed Schonberg <schonberg@adacore.com>
2132 * exp_ch3.adb (Check_Predicated_Discriminant): New procedure,
2133 subsidiary of Build_Initialization_Call, to complete generation
2134 of predicate checks on discriminants whose (sub)types have
2135 predicates, and to add checks on variants that do not have an
2137 * sem_util.adb (Gather_Components): A missing Others alternative is
2138 not an error when the type of the discriminant is a static predicate
2139 (and coverage has been checked when analyzing the case statement). A
2140 runtime check is generated to verify that a given discriminant
2141 satisfies the predicate (RM 3.8.1. (21.1/2)).
2143 2017-01-12 Yannick Moy <moy@adacore.com>
2145 * gnat1drv.adb (Adjust_Global_Switches): Only
2146 perform checking of exception mechanism when generating code.
2148 2017-01-12 Justin Squirek <squirek@adacore.com>
2150 * exp_ch7.adb (Add_Type_Invariants, Process_Array_Component):
2151 Remove handling of access component with invariant.
2152 (Build_Invariant_Procedure_Declaration): Remove return on class
2154 * freeze.adb (Freeze_Array_Type, Freeze_Record_Type): Remove
2155 conditional exception for component or array so Has_Own_Invariants
2156 flag is not falsly set.
2157 * sem_ch3.adb (Make_Class_Wide_Type): Initialize copy of class
2158 wide type to have no invariant flags.
2160 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
2162 * exp_ch9.adb, sem_prag.adb, s-tassta.adb, sem_util.adb, s-tarest.adb,
2163 sem_ch13.adb: Minor reformatting.
2165 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
2167 * exp_aggr.adb (Build_Record_Aggr_Code): Guard against a missing
2168 adjustment primitive when the ancestor type was not properly frozen.
2169 (Gen_Assign): Guard against a missing initialization
2170 primitive when the component type was not properly frozen.
2171 (Initialize_Array_Component): Guard against a missing adjustment
2172 primitive when the component type was not properly frozen.
2173 (Initialize_Record_Component): Guard against a missing adjustment
2174 primitive when the component type was not properly frozen.
2175 (Process_Transient_Component_Completion): The transient object may
2176 not be finalized when its associated type was not properly frozen.
2177 * exp_ch3.adb (Build_Assignment): Guard against a missing
2178 adjustment primitive when the component type was not properly frozen.
2179 (Build_Initialization_Call): Guard against a missing
2180 initialization primitive when the associated type was not properly
2182 (Expand_N_Object_Declaration): Guard against a missing
2183 adjustment primitive when the base type was not properly frozen.
2184 (Predefined_Primitive_Bodies): Create an empty Deep_Adjust
2185 body when there is no adjustment primitive available. Create an
2186 empty Deep_Finalize body when there is no finalization primitive
2188 * exp_ch4.adb (Apply_Accessibility_Check): Guard against a
2189 missing finalization primitive when the designated type was
2190 not properly frozen.
2191 (Expand_N_Allocator): Guard against a missing initialization primitive
2192 when the designated type was not properly frozen.
2193 * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add the adjustment call
2194 only when the corresponding adjustment primitive is available.
2195 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Generate the
2196 adjustment/finalization statements only when there is an available
2197 primitive to carry out the action.
2198 (Build_Initialize_Statements): Generate the initialization/finalization
2199 statements only when there is an available primitive to carry out the
2201 (Make_Adjust_Call): Do not generate a call when the underlying
2202 type is not present due to a possible missing full view.
2203 (Make_Final_Call): Do not generate a call when the underlying
2204 type is not present due to a possible missing full view.
2205 (Make_Finalize_Address_Stmts): Generate an empty body when the
2206 designated type lacks a finalization primitive.
2207 (Make_Init_Call): Do not generate a call when the underlying type is
2208 not present due to a possible missing full view.
2209 (Process_Component_For_Adjust): Add the adjustment call only when the
2210 corresponding adjustment primitive is available.
2211 (Process_Component_For_Finalize): Add the finalization call only when
2212 the corresponding finalization primitive is available.
2213 (Process_Object_Declaration): Use a null statement to emulate a
2214 missing call to the finalization primitive of the object type.
2215 * exp_ch7.ads (Make_Adjust_Call): Update the comment on usage.
2216 (Make_Final_Call): Update the comment on usage.
2217 (Make_Init_Call): Update the comment on usage.
2218 * exp_util.adb (Build_Transient_Object_Statements): Code reformatting.
2220 2017-01-12 Arnaud Charlet <charlet@adacore.com>
2222 * einfo.ads: Update documentation of Address_Taken.
2223 * sem_attr.adb (Analyze_Access_Attribute, Resolve_Attribute
2224 [Access_Attribute]): Only consider 'Access/'Unchecked_Access
2225 for subprograms when setting Address_Taken flag.
2227 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
2229 * sem_ch10.adb (Analyze_With_Clause): Removed code that turned
2230 Configurable_Run_Time_Mode off when analysing with'ed predefined
2233 2017-01-12 Gary Dismukes <dismukes@adacore.com>
2235 * sem_prag.adb: Minor reformatting.
2236 * sem_util.adb (Unique_Entity): fix result for
2237 bodies of entry families.
2239 2017-01-12 Justin Squirek <squirek@adacore.com>
2241 * sem_prag.adb (Analyze_Pragma): Add appropriate calls to
2242 Resolve_Suppressible in the pragma Assertion_Policy case.
2243 (Resolve_Suppressible): Created this function to factor out
2244 common code used to resolve Suppress to either Ignore or Check
2245 * snames.ads-tmpl: Add name for Suppressible.
2247 2017-01-12 Gary Dismukes <dismukes@adacore.com>
2249 * exp_ch9.adb, s-secsta.adb, snames.ads-tmpl, exp_ch3.adb: Minor
2251 * debug.adb: Minor comment fixes.
2253 2017-01-12 Arnaud Charlet <charlet@adacore.com>
2255 * sem_util.adb (Unique_Entity): For concurrent
2256 bodies that are defined with stubs and complete a declaration
2257 of a single concurrent object return the entity of an implicit
2258 concurrent type, not the entity of the anonymous concurrent
2260 * debug.adb: -gnatd.J is no longer used.
2261 * make.adb (Globalize): Removed, no longer used.
2262 * sem_ch9.adb: minor typo in comment for entry index
2264 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
2266 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
2267 * exp_ch3.adb (Build_Init_Statements): As part of initialising
2268 the value record of a task, set its _Secondary_Stack_Size field
2270 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
2271 a _Secondary_Stack_Size field in the value record of
2272 the task if a Secondary_Stack_Size rep item is present.
2273 (Make_Task_Create_Call): Include secondary stack size
2274 parameter. If No_Secondary_Stack restriction is in place, passes
2276 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
2277 Secondary_Stack_Size.
2278 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
2279 function to define the overhead of the secondary stack.
2280 * s-tarest.adb (Create_Restricted_Task,
2281 Create_Restricted_Task_Sequential): Functions now include
2282 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
2283 * s-tarest.adb (Create_Restricted_Task,
2284 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB now
2285 include Secondary_Stack_Size parameter.
2286 (Task_Wrapper): Secondary stack now allocated to the size specified by
2287 the Secondary_Stack_Size parameter in the task's ATCB.
2288 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialize_ATCB): New
2289 Secondary_Stack_Size component.
2290 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
2291 Create_Restricted_Task_Sequential): Function now include
2292 Secondary_Stack_Size parameter.
2293 (Task_Wrapper): Secondary stack now allocated to the size
2294 specified by the Secondary_Stack_Size parameter in the task's
2296 * s-tproft.adb (Register_Foreign_Thread): Amended Initialize_ATCB call
2297 to include Secondary_Stack_Size parameter.
2298 * sem_ch13.adb (Analyze_Aspect_Specification): Add support for
2299 Secondary_Stack_Size aspect, turning the aspect into its corresponding
2301 (Analyze_Attribute_Definition): Process Secondary_Stack_Size attribute.
2302 * snames.adb-tmpl, snames.ads-tmpl: Added names
2303 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
2304 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
2306 2017-01-12 Yannick Moy <moy@adacore.com>
2308 * exp_spark.adb (Expand_SPARK_Potential_Renaming): Fix sloc of copied
2311 2017-01-12 Justin Squirek <squirek@adacore.com>
2313 * exp_attr.adb (Expand_N_Attribute_Reference):
2314 Fix Finalization_Size case by properly resolving the type after
2315 rewritting the node.
2317 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
2319 * exp_util.adb (Build_DIC_Procedure_Body): Semi-insert the body into
2321 (Build_DIC_Procedure_Declaration): Semi-insert the body into the tree.
2322 * binde.adb, exp_ch5.adb, sem_type.adb, sem.ads, sem_res.adb,
2323 exp_sel.ads: Minor reformatting.
2325 2017-01-12 Justin Squirek <squirek@adacore.com>
2327 * exp_ch6.adb (Expand_Call): Add guard to prevent
2328 invariant checks from being created for internally generated
2331 2017-01-12 Bob Duff <duff@adacore.com>
2333 * lib-writ.ads: Remove incorrect comment.
2335 2017-01-12 Javier Miranda <miranda@adacore.com>
2337 * debug.adb (-gnatd.K): Enable generation of contract-only
2338 procedures in CodePeer mode.
2339 * contracts.adb (Build_And_Analyze_Contract_Only_Subprograms):
2341 (Analyze_Contracts): Generate contract-only procedures if -gnatdK is
2343 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): New
2345 (Get_Contract_Only_Missing_Body_Name): New subprogram.
2346 (Get_Contract_Only_Body): New subprogram.
2347 (Set_Contract_Only_Body): New subprogram.
2348 (Is_Contract_Only_Body): New subprogram.
2349 (Set_Is_Contract_Only_Body): New subprogram.
2350 (SCIL_Nodes): Replace table by hash-table.
2352 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
2354 * exp_ch6.adb: Minor reformatting.
2355 * spark_xrefs.ads: minor cleanup of comments for SPARK xrefs
2357 2017-01-12 Bob Duff <duff@adacore.com>
2359 * binde.adb (Forced): New reason for a dependence.
2360 (Force_Elab_Order): Implementation of the new switch.
2361 * binde.ads: Minor comment fixes.
2362 * bindusg.adb: Add -f switch. Apparently, there was an -f switch
2363 long ago that is no longer supported; removed comment about that.
2364 * opt.ads (Force_Elab_Order_File): Name of file specified for
2366 * switch-b.adb: Parse -f switch.
2368 2017-01-12 Justin Squirek <squirek@adacore.com>
2370 * exp_ch6.adb (Check_View_Conversion): Created this function
2371 to properly chain calls to check type invariants that may be
2372 present in a subprogram call after the subprogram.
2373 (Expand_Call): Add a conditional to identify when a view conversion
2374 needs to be checked.
2375 * nlists.adb, nlists.ads (Prepend_New): New routine.
2376 (Prepend_New_To): New routine.
2378 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
2380 * sinfo.ads: Minor reformatting.
2382 2017-01-12 Gary Dismukes <dismukes@adacore.com>
2384 * exp_util.adb, exp_util.ads, einfo.ads: Minor typo fixes and
2387 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
2389 * exp_ch6.adb (Make_Build_In_Place_Call_In_Anonymous_Context): Add new
2390 variable Definite. Create a local object and pass its 'Access to the
2391 BIP function when the result type is either definite or it does not
2392 require any finalization or secondary stack management.
2394 2017-01-12 Bob Duff <duff@adacore.com>
2396 * contracts.adb, einfo.adb, errout.adb, exp_attr.adb,
2397 exp_ch3.adb, exp_ch7.adb, exp_ch9.adb, exp_prag.adb, freeze.adb,
2398 frontend.adb, ghost.adb, inline.adb, lib-writ.adb, lib-xref.adb,
2399 par.adb, par-ch10.adb, par-ch2.adb, par-prag.adb, par_sco.adb,
2400 sem_attr.adb, sem_aux.adb, sem_ch10.adb, sem_ch12.adb,
2401 sem_ch13.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
2402 sem_prag.adb, sem_res.adb, sem_util.adb, sem_util.ads,
2403 sem_warn.adb, sinfo.adb, sinfo.ads, sprint.adb (Pragma_Name):
2404 Change name to Pragma_Name_Unmapped.
2405 (Pragma_Name_Mapped): Change name to Pragma_Name.
2406 This is because the "mapped" version should be the usual case.
2408 2017-01-09 Hristian Kirtchev <kirtchev@adacore.com>
2410 * einfo.ads, einfo.adb: Remove uses of flags Has_Default_Init_Cond,
2411 Is_Default_Init_Cond_Procedure, and
2412 Has_Inherited_Default_Init_Cond. Add uses of flags
2413 Has_Own_DIC, Is_DIC_Procedure, and Has_Inherited_DIC.
2414 (Default_Init_Cond_Procedure): Removed.
2415 (DIC_Procedure): New routine.
2416 (Has_Default_Init_Cond): Removed.
2417 (Has_DIC): New routine.
2418 (Has_Inheritable_Invariants): The attribute applies to the base type.
2419 (Has_Inherited_Default_Init_Cond): Removed.
2420 (Has_Inherited_DIC): New routine.
2421 (Has_Inherited_Invariants): The attribute applies to the base type.
2422 (Has_Own_DIC): New routine.
2423 (Has_Own_Invariants): The attribute applies to the base type.
2424 (Is_Default_Init_Cond_Procedure): Removed.
2425 (Is_DIC_Procedure): New routine.
2426 (Set_Default_Init_Cond_Procedure): Removed.
2427 (Set_DIC_Procedure): New routine.
2428 (Set_Has_Default_Init_Cond): Removed.
2429 (Set_Has_Inheritable_Invariants): The attribute applies
2431 (Set_Has_Inherited_Default_Init_Cond): Removed.
2432 (Set_Has_Inherited_DIC): New routine.
2433 (Set_Has_Inherited_Invariants): The attribute applies to the base type.
2434 (Set_Has_Own_DIC): New routine.
2435 (Set_Has_Own_Invariants): The attribute applies to the base type.
2436 (Set_Is_Default_Init_Cond_Procedure): Removed.
2437 (Set_Is_DIC_Procedure): New routine.
2438 (Write_Entity_Flags): Update the output of all flags related to
2439 default initial condition.
2440 * exp_ch3.adb (Expand_N_Object_Declaration): Update the generation
2441 of the call to the DIC procedure.
2442 (Freeze_Type): Generate the body of the DIC procedure.
2443 * exp_ch7.adb (Build_Invariant_Procedure_Body): Replace
2444 all occurrences of Create_Append with Append_New_To. Do
2445 not generate an invariant procedure for a class-wide type.
2446 The generated body acts as a freeze action of the working type.
2447 (Build_Invariant_Procedure_Declaration): Do not generate an
2448 invariant procedure for a class-wide type.
2449 (Create_Append): Removed.
2450 * exp_util.adb: Add with and use clauses for Sem_Ch3, sem_ch6,
2451 sem_Ch12, Sem_Disp, and GNAT.HTable. Move the handling of
2452 class-wide pre/postcondition description and data structures from
2454 (Build_Class_Wide_Expression): Moved from Sem_Prag.
2455 (Build_DIC_Call): New routine.
2456 (Build_DIC_Procedure_Body): New routine.
2457 (Build_DIC_Procedure_Declaration): New routine.
2458 (Entity_Hash): Moved from Sem_Prag.
2459 (Find_DIC_Type): New routine.
2460 (Update_Primitives_Mapping): Reimplemented.
2461 (Update_Primitives_Mapping_Of_Types): New routine.
2462 * exp_util.ads (Build_Class_Wide_Expression): Moved from Sem_Prag.
2463 (Build_DIC_Call): New routine.
2464 (Build_DIC_Procedure_Body): New routine.
2465 (Build_DIC_Procedure_Declaration): New routine.
2466 (Update_Primitives_Mapping): Moved from Sem_Prag.
2467 (Update_Primitives_Mapping_Of_Types): New routine.
2468 * nlists.adb (Append_New): New routine.
2469 (Append_New_To): New routine.
2470 * nlists.ads (Append_New): New routine.
2471 (Append_New_To): New routine.
2472 * sem_ch3.adb (Analyze_Declarations): Do not generate the bodies
2473 of DIC procedures here. This is now done at the end of the
2474 visible declarations, private declarations, and at the freeze
2476 (Analyze_Private_Extension_Declaration):
2477 A private extension inherits the DIC pragma of a parent type.
2478 (Analyze_Subtype_Declaration): No need to propagate invariant
2479 attributes to a subtype as those apply to the base type.
2480 (Build_Derived_Record_Type): No need to inherit invariants here
2481 as this is now done in Build_Derived_Type.
2482 (Build_Derived_Type): Inherit both the DIC pragma and invariants from
2484 (Process_Full_View): Update the propagation of DIC attributes.
2485 (Propagate_Default_Init_Cond_Attributes): Removed.
2486 * sem_ch7.adb Add with and use clauses for Exp_Util.
2487 (Analyze_Package_Specification): Create the body of the DIC
2488 procedure at the end of the visible and private declarations.
2489 (Preserve_Full_Attributes): Propagate DIC attributes.
2490 * sem_ch9.adb (Analyze_Protected_Type_Declaration): Propagate
2492 (Analyze_Task_Type_Declaration): Propagate DIC attributes.
2493 * sem_elab.adb (Check_A_Call): Update the call to
2494 Is_Nontrivial_Default_Init_Cond_Procedure.
2495 * sem_prag.adb Remove the with and use clauses for
2496 GNAT.HTable. Move the handling of class- wide pre/postcondition
2497 description and data structures to Exp_Util.
2498 (Analyze_Pragma): Create the declaration of the DIC procedure. There
2499 is no need to propagate invariant-related attributes at this point
2500 as this is done in Build_Invariant_Procedure_Declaration.
2501 (Build_Class_Wide_Expression): Moved to Exp_Util.
2502 (Entity_Hash): Moved to Exp_Util.
2503 (Update_Primitives_Mapping): Moved to Exp_Util.
2504 * sem_prag.ads (Build_Class_Wide_Expression): Moved to Exp_Util.
2505 (Update_Primitives_Mapping): Moved to Exp_Util.
2506 * sem_util.adb: Remove with and use clauses for Ghost
2508 (Build_Default_Init_Cond_Call): Removed.
2509 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
2510 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
2511 (Get_Views): Reimplemented.
2512 (Has_Full_Default_Initialization): Reimplement the section on DIC.
2513 (Inherit_Default_Init_Cond_Procedure): Removed.
2514 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
2515 (Is_Nontrivial_DIC_Procedure): New routine.
2516 (Is_Verifiable_DIC_Pragma): New routine.
2517 (Propagate_DIC_Attributes): New routine.
2518 * sem_util.ads (Build_Default_Init_Cond_Call): Removed.
2519 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
2520 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
2521 (Inherit_Default_Init_Cond_Procedure): Removed.
2522 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
2523 (Is_Nontrivial_DIC_Procedure): New routine.
2524 (Is_Verifiable_DIC_Pragma): New routine.
2525 (Propagate_DIC_Attributes): New routine.
2526 * sem_warn.adb (Is_OK_Fully_Initialized): Reimplement the section
2528 * sinfo.ads, sinfo.adb: Add new attribute Expression_Copy along with
2530 (Expression_Copy): New routine along with pragma Inline.
2531 (Set_Expression_Copy): New routine along with pragma Inline.
2533 2017-01-06 Bob Duff <duff@adacore.com>
2535 * bindgen.adb (Gen_Adainit, Gen_Adafinal): Change
2536 "Bind_Main_Program" to "not Bind_For_Library", because otherwise
2537 we won't generate the call to s_stalib_adafinal when the main
2538 is not written in Ada.
2540 2017-01-06 Bob Duff <duff@adacore.com>
2542 * sem_prag.adb: Minor: remove pragma Warnings.
2544 2017-01-06 Tristan Gingold <gingold@adacore.com>
2546 * Makefile.rtl: Do not compile s-stchop by default.
2548 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
2550 * aspects.adb, aspects.ads, exp_ch3.adb, exp_ch9.adb, par-prag.adb,
2551 sem_ch13.adb, sem_prag.adb, sem_prag.ads, snames.adb-tmpl,
2552 snames.ads-tmpl, s-secsta.adb, s-secsta.ads, s-tarest.adb,
2553 s-tarest.ads, s-taskin.adb, s-taskin.ads, s-tassta.adb, s-tassta.ads:
2554 Reverted previous change for now.
2556 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2558 * exp_ch3.adb (Build_Initialization_Call): Apply predicate
2559 check to default discriminant value if checks are enabled.
2560 (Build_Assignment): If type of component has static predicate,
2561 apply check to its default value, if any.
2563 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
2565 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
2566 * exp_ch3.adb (Build_Init_Statements): As part of initialising
2567 the value record of a task, set its _Secondary_Stack_Size field
2569 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
2570 a _Secondary_Stack_Size field in the value record of
2571 the task if a Secondary_Stack_Size rep item is present.
2572 (Make_Task_Create_Call): Include secondary stack size
2573 parameter. If No_Secondary_Stack restriction is in place, passes
2575 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
2576 Secondary_Stack_Size.
2577 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
2578 function to define the overhead of the secondary stack.
2579 * s-tarest.adb (Create_Restricted_Task,
2580 Create_Restricted_Task_Sequential): Functions now include
2581 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
2582 * s-tarest.adb (Create_Restricted_Task,
2583 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB
2584 now include Secondary_Stack_Size parameter.
2586 Secondary stack now allocated to the size specified by the
2587 Secondary_Stack_Size parameter in the task's ATCB.
2588 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialise_ATCB): New
2589 Secondary_Stack_Size component.
2590 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
2591 Create_Restricted_Task_Sequential): Function now include
2592 Secondary_Stack_Size parameter.
2593 (Task_Wrapper): Secondary stack
2594 now allocated to the size specified by the Secondary_Stack_Size
2595 parameter in the task's ATCB.
2596 * sem_ch13.adb (Analyze_Aspect_Specification): Add support
2597 for Secondary_Stack_Size aspect, turning the aspect into its
2598 corresponding internal attribute.
2599 (Analyze_Attribute_Definition):
2600 Process Secondary_Stack_Size attribute.
2601 * snames.adb-tmpl, snames.ads-tmpl: Added names
2602 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
2603 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
2605 2017-01-06 Pascal Obry <obry@adacore.com>
2607 * a-direio.adb, a-direio.ads, a-sequio.adb, a-sequio.ads: Add Flush to
2608 Sequential_IO and Direct_IO.
2610 2017-01-06 Bob Duff <duff@adacore.com>
2612 * snames.ads-tmpl (Renamed): New name for the pragma argument.
2613 * par-ch2.adb: Allow the new pragma (with analysis deferred
2615 * sinfo.ads, sinfo.adb (Map_Pragma_Name, Pragma_Name_Mapped):
2616 Keep a mapping from new pragma names to old names.
2617 * sem_prag.adb: Check legality of pragma Rename_Pragma, and
2618 implement it by calling Map_Pragma_Name.
2619 * checks.adb, contracts.adb, einfo.adb, errout.adb,
2620 * exp_attr.adb, exp_ch3.adb, exp_ch6.adb, exp_ch7.adb, exp_ch9.adb,
2621 * exp_prag.adb, exp_util.adb, freeze.adb, frontend.adb, ghost.adb,
2622 * inline.adb, lib-writ.adb, scans.adb, scans.ads, sem_attr.adb,
2623 * sem_aux.adb, sem_ch10.adb, sem_ch13.adb, sem_ch6.adb, sem_ch9.adb,
2624 * sem_elab.adb, sem_res.adb, sem_util.adb, sem_util.ads,
2625 * sem_warn.adb: Call Pragma_Name_Mapped instead of Pragma_Name
2628 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
2630 * exp_ch9.adb: Minor reformatting.
2632 2017-01-06 Tristan Gingold <gingold@adacore.com>
2634 * exp_ch9.ads, exp_ch9.adb (Build_Entry_Names): Remove (unused).
2635 * rtsfind.ads (RE_Task_Entry_Names_Array, RO_ST_Set_Entry_Names)
2636 (RE_Protected_Entry_Names_Array, RO_PE_Set_Entry_Names): Remove
2638 * s-taskin.ads, s-taskin.adb (Set_Entry_Names,
2639 Task_Entry_Names_Array, Task_Entry_Names_Access): Remove.
2640 * s-tpoben.ads, s-tpoben.adb (Set_Entry_Names,
2641 Protected_Entry_Names_Array, Protected_Entry_Names_Access): Remove.
2643 2017-01-06 Bob Duff <duff@adacore.com>
2645 * sinfo.ads, sinfo.adb (Map_Pragma_Name): Preparation work,
2646 dummy implementation of Map_Pragma_Name.
2648 2017-01-06 Tristan Gingold <gingold@adacore.com>
2650 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Make the
2651 entry_body variable constant.
2652 * s-taprob.ads (Entry_Body_Access): Move to s-tposen.
2653 * s-tpoben.ads (Protected_Entry_Body_Access): Now access
2655 * s-tposen.ads (Entry_Body_Access): Moved from s-taprob,
2656 now access to constant.
2658 2017-01-06 Gary Dismukes <dismukes@adacore.com>
2660 * einfo.ads, sem_res.adb, sem_attr.adb, sem_ch6.adb: Minor
2661 reformatting and typo fixes.
2663 2017-01-06 Bob Duff <duff@adacore.com>
2665 * snames.ads-tmpl: New names for pragma renaming.
2666 * snames.adb-tmpl (Is_Configuration_Pragma_Name): Minor cleanup.
2667 * par-prag.adb: Add new pragma name to case statement.
2668 * sem_prag.adb (Rename_Pragma): Initial cut at semantic analysis
2670 * sinfo.ads, sinfo.adb (Pragma_Name_Mapped): Preparation work,
2671 Dummy implementation of Pragma_Name_Mapped.
2673 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2675 * exp_ch6.adb (Expand_Protected_Subprogram_Call): Add guard to
2676 better detect call within an entry_wrapper.
2677 * sem_res.adb (Resolve_Call): A protected call within an
2678 entity_wrapper is analyzed in the context of the protected
2679 object but corresponds to a pre-analysis and is not an access
2681 * sem_attr.adb: Minor reformatting.
2683 2017-01-06 Justin Squirek <squirek@adacore.com>
2685 * sem_attr.adb (Analyze_Attribute): Modify semantic checks for
2686 Finalization_Size to allow a prefix of any non-class-wide type.
2687 * sem_attr.ads Modify comment for Finalization_Size to include
2688 definite type use case.
2690 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2692 * einfo.ads, einfo.adb (Is_Entry_Wrapper): New flag, defined
2693 on procedures that are wrappers created for entries that have
2695 * sem_ch6.adb (Analyze_Subrogram_Body_Helper): If the subprogram
2696 body is an entry_wrapper, compile it in the context of the
2697 synchronized type, because a precondition may refer to funtions
2699 * exp_ch9.adb (Build_Contract_Wrapper): Set Is_Entry_Wrapper on
2701 * exp_ch6.adb (Expand_Protected_Subprogram_Call): if the call is
2702 within an Entry_Wrapper this is an external call whose target
2703 is the synchronized object that is the actual in the call to
2706 2017-01-06 Yannick Moy <moy@adacore.com>
2708 * sem_attr.adb (Analyze_Attribute/Attribute_Loop_Entry): Analyze node
2709 in tree, which means not analyzing the previous prefix if the node has
2710 been rewritten into its prefix.
2712 2017-01-06 Gary Dismukes <dismukes@adacore.com>
2714 * s-tpobop.adb: Minor reformatting.
2716 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2718 * checks.adb (Ensure_Valid): Do not generate a validity check
2719 within a generated predicate function, validity checks will have
2720 been applied earlier when required.
2722 2017-01-06 Tristan Gingold <gingold@adacore.com>
2724 * s-tpoben.ads (Protection_Entries): Add comment and reorder
2725 components for performances.
2726 * s-tpobop.adb (PO_Do_Or_Queue): Implement Max_Queue_Length runtime
2729 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2731 * sem_eval.adb (Check_Expression_Against_Static_Predicate):
2732 If expression is compile-time known and obeys a static predicate
2733 it must be labelled as static, to prevent spurious warnings and
2734 run-time errors, e.g. in case statements. This is relevant when
2735 the expression is the result of constant-folding a type conversion
2736 whose expression is a variable with a known static value.
2738 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
2740 * exp_attr.adb, sem_attr.ads: Minor reformatting.
2742 2017-01-06 Justin Squirek <squirek@adacore.com>
2744 * exp_attr.adb (Expand_N_Attribute_Reference): Add entry for
2745 expansion of Finalization_Size attribute.
2746 * sem_attr.adb (Analyze_Attribute): Add entry to check the
2747 semantics of Finalization_Size.
2748 (Eval_Attribute): Add null entry for Finalization_Size.
2749 * sem_attr.ads: Add Finalization_Size to the implementation
2750 dependent attribute list.
2751 * snames.ads-tmpl: Add name entry for Finalization_Size attribute.
2753 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2755 * sem_ch5.adb (Analyze_Loop_Statement): If the loop includes an
2756 iterator specification with a serious syntactic error, transform
2757 construct into an infinite loop in order to continue analysis
2758 and prevent a compiler abort.
2760 2017-01-06 Tristan Gingold <gingold@adacore.com>
2762 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Do not generate
2763 max_queue_lengths_array if unused.
2765 2017-01-06 Bob Duff <duff@adacore.com>
2767 * errout.adb (Set_Msg_Text): Protect against out-of-bounds
2768 array access, in case "\" is at the end of Text.
2769 * stylesw.adb (Set_Style_Check_Options): Don't include input
2770 characters in the error message template, because they could
2771 be control characters such as "\", which Errout will try to
2774 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2776 * sem_ch4.adb (Find_Indexing_Operations, Inspect_Declarations):
2777 For a private type examine the visible declarations that follow
2778 the partial view, not just the private declarations that follow
2781 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
2783 * exp_ch5.adb, sem_ch3.adb, checks.adb: Minor reformatting and
2786 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2788 * exp_ch5.adb (Get_Default_Iterator): For a derived type, the
2789 alias of the inherited op is the parent iterator, no need to
2790 examine dispatch table positions which might not be established
2791 yet if type is not frozen.
2792 * sem_disp.adb (Check_Controlling_Formals): The formal of a
2793 predicate function may be a subtype of a tagged type.
2794 * sem_ch3.adb (Complete_Private_Subtype): Adjust inheritance
2795 of representation items for the completion of a type extension
2796 where a predicate applies to the partial view.
2797 * checks.ads, checks.adb (Apply_Predicate_Check): Add optional
2798 parameter that designates function whose actual receives a
2799 predicate check, to improve warning message when the check will
2800 lead to infinite recursion.
2801 * sem_res.adb (Resolve_Actuals): Pass additional parameter to
2802 Apply_Predicate_Check.
2804 2017-01-06 Tristan Gingold <gingold@adacore.com>
2806 * s-rident.ads (Profile_Info): Remove No_Entry_Queue from
2807 Gnat_Extended_Ravenscar.
2808 * exp_ch9.adb, s-tpoben.adb, s-tpoben.ads: Fix spelling.
2810 2017-01-06 Gary Dismukes <dismukes@adacore.com>
2812 * sem_util.ads: Minor typo fix and reformatting.
2814 2017-01-06 Yannick Moy <moy@adacore.com>
2816 * ghost.adb Minor fixing of references to SPARK RM.
2817 (Check_Ghost_Context): Check whether reference is to a lvalue
2818 before issuing an error about violation of SPARK RM 6.9(13)
2819 when declaration has Ghost policy Check and reference has Ghost
2821 * sem_util.adb Minor indentation.
2822 * sem_ch10.adb (Analyze_Package_Body_Stub, Analyze_Protected_Body_Stub,
2823 Analyze_Task_Body_Stub): Set Ekind of the defining identifier.
2824 * sem_util.ads (Unique_Defining_Entity): Document the result
2825 for package body stubs.
2827 2017-01-06 Tristan Gingold <gingold@adacore.com>
2829 * raise-gcc.c (abort): Macro to call Abort_Propagation.
2830 * s-tpoben.ads (Protected_Entry_Queue_Max_Access): Make it access
2832 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
2833 Do not generate the Entry_Max_Queue_Lengths_Array if all default
2835 * exp_util.adb (Corresponding_Runtime_Package): Consider
2836 Max_Queue_Length pragma.
2838 2017-01-06 Justin Squirek <squirek@adacore.com>
2840 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
2841 Remove declaration generation in the case of
2842 System_Tasking_Protected_Objects_Single_Entry being used,
2843 and add a warning message when this is detected to occur.
2844 (Make_Initialize_Protection): Remove reference pass in the case
2845 of System_Tasking_Protected_Objects_Single_Entry.
2846 * rtsfind.ads: Remove RE_Protected_Entry_Queue_Max
2847 * s-tposen.adb (Initialize_Protection_Entry): Remove
2848 Entry_Queue_Max parameter.
2849 * s-tposen.ads: Remove the types use to store the entry queue
2851 * sem_prag.adb (Analyze_Pragma): Remove entry families restriction
2853 2017-01-06 Yannick Moy <moy@adacore.com>
2855 * sem_util.adb, sem_util.ads (Get_Enum_Lit_From_Pos): Strengthen
2856 behavior of function, to also accept out of range positions
2857 and raise Constraint_Error in such case, and to copy sloc from
2858 literal if No_Location passed as location.
2859 * uintp.adb, uintp.ads (UI_To_Int, UI_To_CC): Strengthen behavior
2860 of functions to raise Constraint_Error in case of value not in
2863 2017-01-06 Tristan Gingold <gingold@adacore.com>
2865 * sem_util.adb, s-taprop-linux.adb (Finalize_TCB): Remove call to
2866 Invalidate_Stack_Cache.
2868 2017-01-06 Eric Botcazou <ebotcazou@adacore.com>
2870 * s-os_lib.adb: Minor fix to the signature of Readlink.
2872 2017-01-06 Javier Miranda <miranda@adacore.com>
2874 * sem_ch6.adb (Conforming_Types): Handle another
2875 confusion between views in a nested instance with an actual
2876 private type whose full view is not in scope.
2878 2017-01-06 Arnaud Charlet <charlet@adacore.com>
2880 * exp_ch5.adb (Expand_N_If_Statement): Obey existing comment and
2881 mark a rewritten if statement as explicit (Comes_From_Source).
2883 2017-01-06 Gary Dismukes <dismukes@adacore.com>
2885 * sem_prag.adb, rtsfind.adb, sem_util.adb: Minor typo fixes.
2887 2017-01-06 Tristan Gingold <gingold@adacore.com>
2889 * ada.ads, a-unccon.ads: Add pragma No_Elaboration_Code_All.
2891 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
2893 * sem_case.adb: Minor reformatting.
2895 2017-01-06 Thomas Quinot <quinot@adacore.com>
2897 * g-socthi-mingw.adb: Remove now extraneous USE TYPE clause
2899 2017-01-06 Justin Squirek <squirek@adacore.com>
2901 * aspects.adb: Register aspect in Canonical_Aspect.
2902 * aspects.ads: Associate qualities of Aspect_Max_Queue_Length
2903 into respective tables.
2904 * einfo.ads, einfo.adb: Add a new attribute for
2905 handling the parameters for Pragma_Max_Entry_Queue
2906 (Entry_Max_Queue_Lengths_Array) in E_Protected_Type. Subprograms
2907 for accessing and setting were added as well.
2908 * par-prag.adb (Prag): Register Pramga_Max_Entry_Queue.
2909 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Emit
2910 declaration for pramga arguments and store them in the protected
2912 (Make_Initialize_Protection): Pass a reference to
2913 the Entry_Max_Queue_Lengths_Array in the protected type node to
2915 * rtsfind.adb: Minor grammar fix.
2916 * rtsfind.ads: Register new types taken from the
2917 runtime libraries RE_Protected_Entry_Queue_Max and
2918 RE_Protected_Entry_Queue_Max_Array
2919 * s-tposen.adb, s-tpoben.adb
2920 (Initialize_Protection_Entry/Initialize_Protection_Entries):
2921 Add extra parameter and add assignment to local object.
2922 * s-tposen.ads, s-tpoben.ads: Add new types to
2923 store entry queue maximums and a field to the entry object record.
2924 * sem_ch13.adb (Analyze_Aspect_Specifications): Add case statement
2925 for Aspect_Max_Queue_Length.
2926 (Check_Aspect_At_Freeze_Point):
2927 Add aspect to list of aspects that don't require delayed analysis.
2928 * sem_prag.adb (Analyze_Pragma): Add case statement for
2929 Pragma_Max_Queue_Length, check semantics, and register arugments
2930 in the respective entry nodes.
2931 * sem_util.adb, sem_util.ads Add functions Get_Max_Queue_Length
2932 and Has_Max_Queue_Length
2933 * snames.ads-tmpl: Add constant for the new aspect-name
2934 Name_Max_Queue_Length and corrasponding pragma.
2936 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
2938 * exp_util.adb (Is_Controlled_Function_Call):
2939 Reimplemented. Consider any node which has an entity as the
2940 function call may appear in various ways.
2942 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
2944 * exp_attr.adb (Rewrite_Stream_Proc_Call): Use
2945 an unchecked type conversion when performing a view conversion
2946 to/from a private type. In all other cases use a regular type
2947 conversion to ensure that any relevant checks are properly
2950 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
2952 * sem_prag.adb, sem_ch8.adb: Minor reformatting.
2954 2017-01-06 Ed Schonberg <schonberg@adacore.com>
2956 * sem_case.adb (Explain_Non_Static_Bound): Suppress cascaded
2957 error on case expression that is an entity, when coverage is
2958 incomplete and entity has a static value obtained by local
2960 (Handle_Static_Predicate): New procedure, subsidiary of
2961 Check_Choices, to handle case alternatives that are either
2962 subtype names or subtype indications involving subtypes that
2963 have static predicates.
2965 2017-01-06 Thomas Quinot <quinot@adacore.com>
2967 * s-oscons-tmplt.c, g-socket.adb, g-socket.ads, g-sothco.ads:
2968 (GNAT.Socket): Add support for Busy_Polling and Generic_Option
2970 2017-01-06 Bob Duff <duff@adacore.com>
2972 * sem_elab.adb (Activate_Elaborate_All_Desirable): Don't add
2973 Elaborate_All(P) to P itself. That could happen in obscure cases,
2974 and always introduced a cycle (P body must be elaborated before
2976 * lib-writ.ads: Comment clarification.
2977 * ali-util.ads: Minor comment fix.
2978 * ali.adb: Minor reformatting.
2980 2017-01-06 Tristan Gingold <gingold@adacore.com>
2982 * a-exexpr-gcc.adb: Improve comment.
2984 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
2986 * s-linux-mips.ads: Use correct signal and errno constants.
2987 (sa_handler_pos, sa_mask_pos): Fix offsets for 64-bit MIPS.
2989 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
2991 * s-linux-mips.ads: Rename from s-linux-mipsel.ads.
2992 * gcc-interface/Makefile.in (MIPS/Linux): Merge mips and mipsel
2995 2017-01-01 Eric Botcazou <ebotcazou@adacore.com>
2997 * gnatvsn.ads: Bump copyright year.
2999 2017-01-01 Jakub Jelinek <jakub@redhat.com>
3001 * gnat_ugn.texi: Bump @copying's copyright year.
3002 * gnat_rm.texi: Likewise.
3004 Copyright (C) 2017 Free Software Foundation, Inc.
3006 Copying and distribution of this file, with or without modification,
3007 are permitted in any medium without royalty provided the copyright
3008 notice and this notice are preserved.