* gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
[official-gcc.git] / gcc / ada / ChangeLog
blobaddb1cb9d158f847aeae69ef143722f8ea22f6e7
1 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3         * gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
4         of boolean rvalues to function calls.
6 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
8         * gcc-interface/utils.c (fold_bit_position): New function.
9         (rest_of_record_type_compilation): Call it instead of bit_position to
10         compute the field position and remove the call to remove_conversions.
11         (compute_related_constant): Factor out the multiplication in both
12         operands, if any, and streamline the final test.
14 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
16         * gcc-interface/trans.c (return_value_ok_for_nrv_p): Add sanity check.
18 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
20         * gcc-interface/decl.c: Include demangle.h.
21         (is_cplusplus_method): Return again true for a primitive operation
22         only if it is dispatching.  For a subprogram with an interface name,
23         call the demangler to get the number of C++ parameters and compare it
24         with the number of Ada parameters.
26 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
28         * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu): If
29         there is no end label, put the location of the At_End procedure on
30         the call to the procedure.
32 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
34         * gcc-interface/misc.c (gnat_type_max_size): Try to return a meaningful
35         value for array types with TYPE_INDEX_TYPE set on their domain type.
36         * gcc-interface/utils.c (max_size): For operations and expressions, do
37         not build a new node if the operands have not changed or are missing.
39 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
41         * gcc-interface/utils.c (max_size) <tcc_expression>: Flip the second
42         argument when recursing on TRUTH_NOT_EXPR.
44 2017-02-12  John Marino  <gnugcc@marino.st>
46         * system-freebsd-x86.ads: Rename into...
47         * system-freebsd.ads: ...this.
48         (Default_Bit_Order): Define using Standard'Default_Bit_Order.
49         * gcc-interface/Makefile.in: Support aarch64-freebsd.
50         (x86-64/FreeBSD): Adjust to above renaming.
51         (i386/FreeBSD): Likewise.
53 2017-02-09  Gerald Pfeifer  <gerald@pfeifer.com>
55         * comperr.adb: Update FSF bug reporting URL.
57 2017-02-01  Eric Botcazou  <ebotcazou@adacore.com>
58             Jakub Jelinek  <jakub@redhat.com>
60         PR ada/79309
61         * adaint.c (__gnat_killprocesstree): Fix broken string handling.
63 2017-01-25  Maxim Ostapenko  <m.ostapenko@samsung.com>
65         PR lto/79061
66         * gcc-interface/utils.c (get_global_context): Pass main_input_filename
67         to build_translation_unit_decl.
69 2017-01-23  Javier Miranda  <miranda@adacore.com>
71         * sem_util.adb (New_Copy_Tree): Code cleanup:
72         removal of the internal map (ie. variable Actual_Map, its
73         associated local variables, and all the code handling it).
74         * sem_ch9.adb (Analyze_Task_Type_Declaration): in GNATprove mode
75         force loading of the System package when processing a task type.
76         (Analyze_Protected_Type_Declaration): in GNATprove mode force
77         loading of the System package when processing a protected type.
78         * sem_ch10.adb (Analyze_Compilation_Unit): in GNATprove mode
79         force loading of the System package when processing compilation
80         unit with a main-like subprogram.
81         * frontend.adb (Frontend): remove forced loading of the System
82         package.
84 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
86         * sem_prag.adb (Default_Initial_Condition): If the desired type
87         declaration is a derived type declaration with discriminants,
88         it is rewritten as a private type declaration.
89         * sem_ch13.adb (Replace_Type_References_Generic,
90         Visible_Component): A discriminated private type with descriminnts
91         has components that must be rewritten as selected components
92         if they appear as identifiers in an aspect expression such as
93         a Default_Initial_Condition.
94         * sem_util.adb (Defining_Entity): support N_Iterator_Specification
95         nodes.
97 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
99         * ghost.ads, ghost.adb (Is_Ignored_Ghost_Unit): New routine.
100         * gnat1drv.adb Generate an empty object file for an ignored
101         Ghost compilation unit.
102         * inline.adb, sem_util.adb, sem_ch4.adb: Minor reformatting.
104 2017-01-23  Yannick Moy  <moy@adacore.com>
106         * sem_ch4.adb (Analyze_Indexed_Component_Form):
107         Adapt to inlined prefix with string literal subtype.
108         * inline.adb (Expand_Inlined_Call): Keep unchecked
109         conversion inside inlined call when formal type is constrained.
111 2017-01-23  Javier Miranda  <miranda@adacore.com>
113         * sem_util.adb (New_Copy_Tree): Code cleanup:
114         removal of global variables. All the global variables, global
115         functions and tables of this subprogram are now declared locally.
117 2017-01-23  Gary Dismukes  <dismukes@adacore.com>
119         * exp_strm.ads: Minor reformatting and typo fixes.
121 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
123         * sem_aggr.adb, par_sco.adb, exp_util.adb, sem.adb, sem_ch4.adb,
124         exp_aggr.adb: Minor reformatting.
125         * g-diopit.adb: minor grammar/punctuation fix in comment.
126         * g-byorma.ads: minor fix of unbalanced parens in comment.
128 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
130         * par.adb: Update the documentation of component Labl.
131         * par-ch6.adb (P_Return_Statement): Set the expected label of
132         an extended return statement to Error.
134 2017-01-23  Tristan Gingold  <gingold@adacore.com>
136         * s-boustr.ads, s-boustr.adb (Is_Full): New function.
138 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
140         * expander.adb: Handle N_Delta_Aggregate.
142 2017-01-23  Javier Miranda  <miranda@adacore.com>
144         * exp_ch6.adb (Expand_Call): Improve the code that
145         checks if some formal of the called subprogram is a class-wide
146         interface, to handle subtypes of class-wide interfaces.
148 2017-01-23  Javier Miranda  <miranda@adacore.com>
150         * checks.adb (Apply_Parameter_Aliasing_Checks):
151         Remove side effects of the actuals before generating the overlap
152         check.
154 2017-01-23  Justin Squirek  <squirek@adacore.com>
156         * exp_strm.ads, exp_strm.ads
157         (Build_Record_Or_Elementary_Input_Function): Add an extra parameter so
158         as to avoid getting the underlying type by default.
159         * exp_attr.adb (Expand_N_Attribute_Reference): Remove use of
160         underlying type in the Iiput and output attribute cases when
161         building their respective functions.
163 2017-01-23  Gary Dismukes  <dismukes@adacore.com>
165         * scng.adb: Minor reformatting of error message.
167 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
169         * sem_ch6.adb (Analyze_Expression_Function): Do not attempt
170         to freeze the return type of an expression funxtion that is a
171         completion, if the type is a limited view and the non-limited
172         view is available.
174 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
176         * par-ch4.adb (P_Aggregate_Or_Parent_Expr): Recognize delta
177         aggregate construct.
178         (P_Record_Or_Array_Component_Association): An array aggregate
179         can start with an Iterated_Component_Association.
180         * scng.adb: Modify error message on improper use of @ in earlier
181         versions of the language.
182         * sinfo.ads: New node kind N_Delta_Aggregate.
183         * sinfo.adb: An N_Delta_Aggregate has component associations and
184         an expression.
185         * sem_res.adb (Resolve): Call Resolve_Delta_Aggregate.
186         * sem_aggr.ads, sem_aggr.adb (Resolve_Iterated_Component_Association):
187         Create a new index for each one of the choices in the association,
188         to prevent spurious homonyms in the scope.
189         (Resolve_Delta_Aggregate): New.
190         * sem.adb: An N_Delta_Aggregate is analyzed like an aggregate.
191         * exp_util.adb (Insert_Actions): Take into account
192         N_Delta_Aggregate.
193         * exp_aggr.ads: New procedure Expand_N_Delta_Aggregate.
194         * exp_aggr.adb: New procedure Expand_N_Delta_Aggregate,
195         and local procedures Expand_Delta_Array_Aggregate and
196         expand_Delta_Record_Aggregate.
197         * sprint.adb: Handle N_Delta_Aggregate.
199 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
201         * exp_ch11.adb (Expand_N_Exception_Declaration): Generate an
202         empty name when the exception declaration is subject to pragma
203         Discard_Names.
204         (Null_String): New routine.
206 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
208         * par-ch9.adb (P_Protected_Definition): Parse
209         any optional and potentially illegal pragmas which appear in
210         a protected operation declaration list.
211         (P_Task_Items): Parse
212         any optional and potentially illegal pragmas which appear in a
213         task item list.
215 2017-01-23  Pascal Obry  <obry@adacore.com>
217         * s-taprop-mingw.adb (Enter_Task): Initialize the Thread handle which
218         is needed when a foreign thread call a Win32 API using a thread handle
219         like GetThreadTimes() for example.
221 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
223         * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
224         allow an 'Address clause to be specified on a prefix of a
225         class-wide type.
227 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
229         * checks.adb (Insert_Valid_Check): Ensure that the prefix of
230         attribute 'Valid is a renaming of the original expression when
231         the expression denotes a name. For all other kinds of expression,
232         use a constant to capture the value.
233         * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
234         * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
236 2017-01-23  Justin Squirek  <squirek@adacore.com>
238         * sem_eval.adb (Eval_Integer_Literal): Add special
239         case to avoid optimizing out check if the literal appears in
240         an if-expression.
242 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
244         * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
245         allow an 'Address clause to be specified on a prefix of a
246         class-wide type.
248 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
250         * checks.adb (Insert_Valid_Check): Ensure that the prefix of
251         attribute 'Valid is a renaming of the original expression when
252         the expression denotes a name. For all other kinds of expression,
253         use a constant to capture the value.
254         * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
255         * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
257 2017-01-23  Justin Squirek  <squirek@adacore.com>
259         * sem_eval.adb (Eval_Integer_Literal): Add special
260         case to avoid optimizing out check if the literal appears in
261         an if-expression.
263 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
265         * sem_ch4.adb (Try_Primitive_Operations,
266         Is_Valid_First_Argument_Of): argument is valid if it is a derived
267         type with unknown discriminants that matches its underlying
268         record view.
269         * exp_util.adb (Expand_Subtype_From_Expr): Do not expand
270         expression if its type is derived from a limited type with
271         unknown discriminants, because the expansion (which is a call)
272         must be expanded in the enclosing context to add the proper build-
273         in-place parameters to the call.
274         * lib.ads, exp_ch9.adb: Minor fixes in comments.
276 2017-01-23  Yannick Moy  <moy@adacore.com>
278         * frontend.adb (Frontend): Do not load runtime
279         unit for GNATprove when parsing failed.
280         * exp_ch9.adb: minor removal of extra whitespace
281         * exp_ch6.adb: minor typo in comment
282         * sem_util.adb: Code cleanup.
283         * exp_ch9.ads, par-ch2.adb: minor style fixes in whitespace and comment
284         * a-ngcefu.adb: minor style fix in whitespace
286 2017-01-23  Thomas Quinot  <quinot@adacore.com>
288         * scos.ads: Document usage of 'd' as default SCO kind for
289         declarations.
290         * par_sco.adb (Traverse_Declarations_Or_Statements.
291         Traverse_Degenerate_Subprogram): New supporting routine for expression
292         functions and null procedures.
293         (Traverse_Declarations_Or_Statements.Traverse_One): Add
294         N_Expression_Function to the subprogram case; add required
295         support for null procedures and expression functions.
297 2017-01-23  Bob Duff  <duff@adacore.com>
299         * namet.ads (Bounded_String): Decrease the size of type
300         Bounded_String to avoid running out of stack space.
301         * namet.ads (Append): Don't ignore buffer overflow; raise
302         Program_Error instead.
304 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
306         * exp_ch5.adb, freeze.adb, par-ch4.adb, scng.adb, sem_ch13.adb,
307         sem_ch3.adb, sem_ch5.adb, sem_ch5.ads, sem_util.adb, sinfo.ads: Minor
308         reformatting.
309         * exp_ch9.adb: minor style fix in comment.
311 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
313         * sem_ch4.adb (Analyze_Allocator): Handle properly a type derived
314         for a limited record extension with unknown discriminants whose
315         full view has no discriminants.
317 2017-01-23  Yannick Moy  <moy@adacore.com>
319         * exp_spark.adb: Alphabetize with clauses.
321 2017-01-23  Yannick Moy  <moy@adacore.com>
323         * sem_util.adb (Has_Enabled_Property): Treat
324         protected objects and variables differently from other variables.
326 2017-01-23  Thomas Quinot  <quinot@adacore.com>
328         * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
329         Split original Ada 95 part off into new subprogram
330         below. Call that subprogram (instead of proceeding with
331         AI95-0133 behaviour) if debug switch -gnatd.p is in use.
332         (Adjust_Record_For_Reverse_Bit_Order_Ada_95): ... new subprogram
333         * debug.adb Document new switch -gnatd.p
334         * freeze.adb (Freeze_Entity.Freeze_Record_Type): Do not adjust
335         record for reverse bit order if an error has already been posted
336         on the record type.  This avoids generating extraneous "info:"
337         messages for illegal code.
339 2017-01-23  Justin Squirek  <squirek@adacore.com>
341         * sem_ch3.adb (Analyze_Declarations): Correct comments
342         * freeze.adb (Find_Constant): Add detection of deferred constants
343         so they are not incorrectly flagged as premature.
345 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
347         * scans.ads: New token At_Sign. Remove '@' from list of illegal
348         characters for future version of the language. '@' is legal name.
349         * scng.ads, scng.adb (Scan):  Handle '@' appropriately.
350         * scn.adb (Scan_Reserved_Identifier): An occurrence of '@'
351         denotes a Target_Name.
352         * par-ch4.adb (P_Name, P_Primary): Handle Target_Name.
353         * sinfo.ads, sinfo.adb (N_Target_Name): New non-terminal node.
354         (Has_Target_Names): New flag on N_Assignment_Statement, to
355         indicate that RHS has occurrences of N_Target_Name.
356         * sem.adb: Call Analyze_Target_Name.
357         * sem_ch5.ads, sem_ch5.adb (Analyze_Target_Name): New subpogram.
358         (urrent_LHS): Global variable that denotes LHS of assignment,
359         used in the analysis of Target_Name nodes.
360         * sem_res.adb (Resolve_Target_Name): New procedure.
361         * exp_ch5.adb (Expand_Assign_With_Target_Names): (AI12-0125):
362         N is an assignment statement whose RHS contains occurences of @
363         that designate the value of the LHS of the assignment. If the
364         LHS is side-effect free the target names can be replaced with
365         a copy of the LHS; otherwise the semantics of the assignment
366         is described in terms of a procedure with an in-out parameter,
367         and expanded as such.
368         (Expand_N_Assignment_Statement): Call
369         Expand_Assign_With_Target_Names when needed.
370         * exp_util.adb (Insert_Actions): Take into account N_Target_Name.
371         * sprint.adb: Handle N_Target_Name.
373 2017-01-23  Eric Botcazou  <ebotcazou@adacore.com>
375         * checks.adb: Minor fix in comment.
377 2017-01-23  Philippe Gil  <gil@adacore.com>
379         * g-debpoo.adb (Do_Report) remove freed chunks from chunks
380         count in Sort = Memory_Usage or Allocations_Count
382 2017-01-23  Justin Squirek  <squirek@adacore.com>
384         * sem_ch3.adb: Code cleanup.
386 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
388         * sem_prag.adb (Analyze_Refined_Depends_In_Decl_Part): Move all global
389         variables to the local variable section. Update the profile
390         of various nested routine that previously had visibility
391         of those globals. One the matching phase has completed,
392         remove certain classes of clauses which are considered noise.
393         (Check_Dependency_Clause): Properly detect a match between two
394         'Result attributes. Update the various post-match cases to use
395         Is_Already_Matched as this routine now automatically recognizes
396         a previously matched 'Result attribute.
397         (Is_Already_Matched): New routine.
398         (Remove_Extra_Clauses): New routine.
399         (Report_Extra_Clauses): Remove the detection of ... => null
400         clauses as this is now done in Remove_Extra_Clauses.
402 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
404         * sem_aggr.adb (Resolve_Array_Aggregate): In ASIS mode do not
405         report on spurious overlaps between values involving a subtype
406         with a static predicate, because the expansion of such a subtype
407         into individual ranges in inhibited in ASIS mode.
409 2017-01-23  Justin Squirek  <squirek@adacore.com>
411         * sem_ch3.adb (Analyze_Declarations): Add detection
412         of an edge case and delay freezing if it is present.
414 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
416         * sem_ch3.adb, exp_spark.adb, exp_attr.adb, sem_ch9.adb, sem_prag.adb,
417         sem_util.adb, sem_warn.adb, exp_ch3.adb: Minor reformatting.
419 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
421         * freeze.adb (Freeze_Subprogram): Ensure that all anonymous
422         access-to-subprogram types inherit the convention of the
423         associated subprogram.  (Set_Profile_Convention): New routine.
424         * sem_ch6.adb (Check_Conformance): Do not compare the conventions
425         of the two entities directly, use Conventions_Match to account
426         for anonymous access-to-subprogram and subprogram types.
427         (Conventions_Match): New routine.
429 2017-01-23  Claire Dross  <dross@adacore.com>
431         * exp_spark.adb (Expand_SPARK_Attribute_Reference): For attributes
432         which return Universal_Integer, force the overflow check flag for
433         Length and Range_Length for types as big as Long_Long_Integer.
435 2017-01-23  Claire Dross  <dross@adacore.com>
437         * exp_spark.adb (Expand_SPARK_Attribute_Reference):  For
438         attributes which return Universal_Integer, introduce a conversion
439         to the expected type with the appropriate check flags set.
440         * sem_res.adb (Resolve_Range): The higher bound can be in Typ's
441         base type if the range is null. It may still be invalid if it
442         is higher than the lower bound. This is checked later in the
443         context in which the range appears.
445 2017-01-23  Pierre-Marie de Rodat  <derodat@adacore.com>
447         * scos.ads: Introduce a constant to represent ignored
448         dependencies in SCO_Unit_Table_Entry.
450 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
452         * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Remove extra
453         spaces from error messages.
455 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
457         * exp_ch3.adb (Check_Large_Modular_Array): New procedure,
458         subsidiary to Expand_N_Object_ Declaration, to compute a guard on
459         an object declaration for an array type with a modular index type
460         with the size of Long_Long_Integer. Special processing is needed
461         in this case to compute reliably the size of the object, and
462         eventually  to raise Storage_Error, when wrap-around arithmetic
463         might compute a meangingless size for the object.
465 2017-01-23  Justin Squirek  <squirek@adacore.com>
467         * a-wtenau.adb, par-endh.adb, sem_prag.adb,
468         sem_type.adb: Code cleanups.
470 2017-01-23  Bob Duff  <duff@adacore.com>
472         * sem_res.adb (Resolve_Call): In the part of the code where
473         it is deciding whether to turn the call into an indexed
474         component, avoid doing so if the call is to an instance of
475         Unchecked_Conversion. Otherwise, the compiler turns it into an
476         indexed component, and resolution of that turns it back into a
477         function call, and so on, resulting in infinite recursion.
478         * sem_util.adb (Needs_One_Actual): If the first formal has a
479         default, then return False.
481 2017-01-21  Eric Botcazou  <ebotcazou@adacore.com>
483         * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal (etc)
484         optimizations when the type is modular and the offsets are equal.
486 2017-01-20  Thomas Quinot  <quinot@adacore.com>
488         * sem_warn.adb (Warn_On_Useless_Assignment): Adjust wording of warning
489         message.
491 2017-01-20  Nicolas Roche  <roche@adacore.com>
493         * terminals.c: Ignore failures on setpgid and tcsetpgrp commands.
495 2017-01-20  Bob Duff  <duff@adacore.com>
497         * sem_eval.adb (Compile_Time_Compare): Disable the expr+literal
498         (etc) optimizations when the type is modular.
500 2017-01-20  Yannick Moy  <moy@adacore.com>
502         * sem_ch6.adb (Move_Pragmas): move some pragmas,
503         but copy the SPARK_Mode pragma instead of moving it.
504         (Build_Subprogram_Declaration): Ensure that the generated spec
505         and original body share the same SPARK_Pragma aspect/pragma.
506         * sem_util.adb, sem_util.ads (Copy_SPARK_Mode_Aspect): New
507         procedure to copy SPARK_Mode aspect.
509 2017-01-20  Bob Duff  <duff@adacore.com>
511         * sem_ch3.adb (Analyze_Declarations): Disable Resolve_Aspects
512         even in ASIS mode.
513         * sem_ch13.adb (Resolve_Name): Enable setting the entity to
514         Empty even in ASIS mode.
516 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
518         * exp_ch9.adb: minor style fixes in comments.
519         * sem_ch9.adb (Analyze_Delay_Relative): in GNATprove mode a delay
520         relative statement introduces an implicit dependency on
521         Ada.Real_Time.Clock_Time.
522         * sem_util.adb: Minor reformatting.
524 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
526         * sem_ch13.adb (Analyze_Aspect_Specifications): Aspect Alignment
527         must be treated as delayed aspect even if the expression is
528         a literal, because the aspect affects the freezing and the
529         elaboration of the object to which it applies.
531 2017-01-20  Tristan Gingold  <gingold@adacore.com>
533         * s-osinte-vxworks.ads (Interrup_Range): New subtype.
535 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
537         * lib-xref.adb (Generate_Reference): Do not warn about the
538         presence of a pragma Unreferenced if the entity appears as the
539         actual in a procedure call that does not come from source.
541 2017-01-20  Pascal Obry  <obry@adacore.com>
543         * expect.c, terminals.c: Fix some warnings about unused variables.
544         * gsocket.h, adaint.c, adaint.h: Fix some more warnings in the C part
545         of the runtime.
547 2017-01-20  Bob Duff  <duff@adacore.com>
549         * exp_attr.adb (Constrained): Apply an access check (check that
550         the prefix is not null) when the prefix denotes an object of an
551         access type; that is, when there is an implicit dereference.
553 2017-01-20  Gary Dismukes  <dismukes@adacore.com>
555         * s-rident.ads (constant Profile_Info): Remove
556         No_Calendar from GNAT_Extended_Ravenscar restrictions.
558 2017-01-20  Tristan Gingold  <gingold@adacore.com>
560         *  s-maccod.ads: Add pragma No_Elaboration_Code_All
562 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
564         * ghost.adb (Mark_Ghost_Clause): New routine.
565         (Prune_Node): Do not prune compilation unit nodes.
566         (Remove_Ignored_Ghost_Code): Prune the compilation unit node directly.
567         This does not touch the node itself, but does prune all its fields.
568         * ghost.ads (Mark_Ghost_Clause): New routine.
569         * sem_ch8.adb (Analyze_Use_Package): Emit an error when a use
570         package clause mentions Ghost and non-Ghost packages. Mark a
571         use package clause as Ghost when it mentions a Ghost package.
572         (Analyze_Use_Type): Emit an error when a use type clause mentions
573         Ghost and non-Ghost types. Mark a use type clause as Ghost when
574         it mentions a Ghost type.
575         * sem_ch10.adb (Analyze_With_Clause): Mark a with clause as
576         Ghost when it withs a Ghost unit.
578 2017-01-20  Javier Miranda  <miranda@adacore.com>
580         * sem_res.adb (Resolve_Call): If a function call
581         returns a limited view of a type and at the point of the call the
582         function is not declared in the extended main unit then replace
583         it with the non-limited view, which must be available. If the
584         called function is in the extended main unit then no action is
585         needed since the back-end handles this case.
587 2017-01-20  Eric Botcazou  <ebotcazou@adacore.com>
589         * sem_ch7.adb (Contains_Subp_Or_Const_Refs): Rename into...
590         (Contains_Subprograms_Refs): ...this.  Adjust comment
591         for constants.  (Is_Subp_Or_Const_Ref): Rename into...
592         (Is_Subprogram_Ref): ...this.
593         (Has_Referencer): Rename Has_Non_Subp_Const_Referencer variable into
594         Has_Non_Subprograms_Referencer and adjust comment.  Remove
595         incorrect shortcut for package declarations and bodies.
597 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
599         * sem_ch3.adb (Complete_Private_Subtype): If the scope of the
600         base type differs from that of the completion and the private
601         subtype is an itype (created for a constraint on an access
602         type e.g.), set Delayed_Freeze on both to prevent out-of-scope
603         anomalies in gigi.
605 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
607         * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
608         When inheriting the SPARK_Mode of a prior expression function,
609         look at the properly resolved entity rather than the initial
610         candidate which may denote a homonym.
612 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
614         * sem_prag.adb (Rewrite_Assertion_Kind): If the name is
615         Precondition or Postcondition, and the context is pragma
616         Check_Policy, indicate that this Pre-Ada2012 usage is deprecated
617         and suggest the standard names Assertion_Policy /Pre /Post
618         instead.
620 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
622         * sem_ch10.adb, sem_cat.adb: Minor reformatting.
624 2017-01-20  Javier Miranda  <miranda@adacore.com>
626         * sem_ch3.adb (Access_Type_Declaration): Protect access to the
627         Entity attribute.
628         * sem_ch10.adb (Install_Siblings): Skip processing malformed trees.
629         * sem_cat.adb (Validate_Categoriztion_Dependency): Skip processing
630         malformed trees.
632 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
634         * sem_ch13.adb (Analyze_Aspect_Specification, case
635         Dynamic_Predicate): If the entity E is a subtype that inherits
636         a static predicate for its parent P,, the inherited and the
637         new predicate combine in the generated predicate function,
638         and E only has a dynamic predicate.
640 2017-01-20  Tristan Gingold  <gingold@adacore.com>
642         * s-boustr.ads, s-boustr.adb: New package.
643         * Makefile.rtl: Add s-boustr.
645 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
647         * inline.adb (Process_Formals): Qualify the
648         expression of a return statement when it yields a universal type.
650 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
652         * freeze.adb (Freeze_All): Freeze the default
653         expressions of all eligible formal parameters that appear in
654         entries, entry families, and protected subprograms.
656 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
658         * sem_ch3.adb (Check_Nonoverridable_Aspects); Refine check
659         for illegal inherited Implicit_Dereference aspects with renamed
660         discriminants.
662 2017-01-20  Javier Miranda  <miranda@adacore.com>
664         * debug.adb (switch d.6): do not avoid declaring unreferenced itypes.
665         * nlists.ads (Lock_Lists, Unlock_Lists): New subprograms.
666         * nlists.adb (Lock_Lists, Unlock_Lists): New subprograms.
667         (Set_First, Set_Last, Set_List_Link, Set_Next, Set_Parent,
668         Set_Prev, Tree_Read): Adding assertion.
669         * atree.ads (Lock_Nodes, Unlock_Nodes): New subprograms.
670         * atree.adb (Lock_Nodes, Unlock_Nodes): New subprograms.
671         (Set_Analyzed, Set_Check_Actuals, Set_Comes_From_Source,
672         Set_Ekind, Set_Error_Posted, Set_Has_Aspects,
673         Set_Is_Ignored_Ghost_Node, Set_Original_Node, Set_Paren_Count,
674         Set_Parent, Set_Sloc, Set_Nkind, Set_FieldNN, Set_NodeNN,
675         Set_ListNN, Set_ElistNN, Set_NameN, Set_StrN, Set_UintNN,
676         Set_UrealNN, Set_FlagNNN, Set_NodeN_With_Parent,
677         Set_ListN_With_Parent): Adding assertion.
679 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
681         * sem_prag.adb (Process_Convention): Diagnose properly a pragma
682         import that applies to several homograph subprograms. when one
683         of them is declared by a subprogram body.
685 2017-01-20  Justin Squirek  <squirek@adacore.com>
687         * exp_ch6.adb (Expand_Call): Remove optimization
688         that nulls out calls to null procedures.
690 2017-01-20  Yannick Moy  <moy@adacore.com>
692         * inline.adb (Expand_Inlined_Call): Keep more
693         precise type of actual for inlining whenever possible. In
694         particular, do not switch to the formal type in GNATprove mode in
695         some case where the GNAT backend might require it for visibility.
697 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
699         * sem_ch3.adb (Check_Non_Overridable_Aspects): An inherited
700         aspect Implicit_Dereference can be inherited by a full view if
701         the partial view has no discriminants, because there is no way
702         to apply the aspect to the partial view.
703         (Build_Derived_Record_Type): If derived type renames discriminants
704         of the parent, the new discriminant inherits the aspect from
705         the old one.
706         * sem_ch4.adb (Analyze_Call): Handle properly a parameterless
707         call through an access discriminant designating a subprogram.
708         * sem_ch5.adb (Analyze_Assignment): (Analyze_Call): Handle
709         properly a parameterless call through an access discriminant on
710         the left-hand side of an assignment.
711         * sem_res.adb (resolve): If an interpreation involves a
712         discriminant with an implicit dereference and the expression is an
713         entity, resolution takes place later in the appropriate routine.
714         * sem_ch13.adb (Analyze_Aspect_Implicit_Dereference): Recognize
715         access discriminants that designate a subprogram type.
717 2017-01-20  Pascal Obry  <obry@adacore.com>
719         * a-locale.adb, a-locale.ads: Update Ada.Locales for RM 2012 COR:1:2016
721 2017-01-20  Yannick Moy  <moy@adacore.com>
723         * sem_ch10.adb (Check_No_Elab_Code_All): Do not issue an error
724         on implicitly with'ed units in GNATprove mode.
725         * sinfo.ads (Implicit_With): Document use of flag for implicitly
726         with'ed units in GNATprove mode.
728 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
730         * sem_cat.adb (Validate_Static_Object_Name): In a preelaborated
731         unit Do not report an error on a non-static entity that appears
732         in the context of a spec expression, such as an aspect expression.
734 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
736         * einfo.adb: Flag298 now denotes Is_Underlying_Full_View.
737         (Is_Underlying_Full_View): New routine.
738         (Set_Is_Underlying_Full_View): New routine.
739         (Write_Entity_Flags): Add an entry for Is_Underlying_Full_View.
740         * einfo.ads Add new attribute Is_Underlying_Full_View.
741         (Is_Underlying_Full_View): New routine along with pragma Inline.
742         (Set_Is_Underlying_Full_View): New routine along with pragma Inline.
743         * exp_util.adb (Build_DIC_Procedure_Body): Do not consider
744         class-wide types and underlying full views. The first subtype
745         is used as the working type for all Itypes, not just array base types.
746         (Build_DIC_Procedure_Declaration): Do not consider
747         class-wide types and underlying full views. The first subtype
748         is used as the working type for all Itypes, not just array
749         base types.
750         * freeze.adb (Freeze_Entity): Inherit the freeze node of a full
751         view or an underlying full view without clobbering the attributes
752         of a previous freeze node.
753         (Inherit_Freeze_Node): New routine.
754         * sem_ch3.adb (Build_Derived_Private_Type): Mark an underlying
755         full view as such.
756         (Build_Underlying_Full_View): Mark an underlying full view as such.
757         * sem_ch7.adb (Install_Private_Declarations): Mark an underlying
758         full view as such.
760 2017-01-20  Yannick Moy  <moy@adacore.com>
762         * sinfo.ads: Document lack of Do_Division_Check flag
763         on float exponentiation.
765 2017-01-19  Javier Miranda  <miranda@adacore.com>
767         * ghost.adb (Propagate_Ignored_Ghost_Code): Protect access to the
768         identifier attribute of a block-statement node. Required to avoid
769         assertion failure when building the new containers library.
771 2017-01-19  Bob Duff  <duff@adacore.com>
773         * exp_ch3.adb: Update comment.
775 2017-01-19  Vincent Celier  <celier@adacore.com>
777         * gprep.adb (Gnatprep): Parse the definition file without
778         "replace in comments" even when switch -C is used.
780 2017-01-19  Justin Squirek  <squirek@adacore.com>
782         * exp_ch9.adb (Is_Pure_Barrier): Create function
783         Is_Count_Attribute to identify an expansion of the 'Count
784         attribute.
786 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
788         * sem_ch5.adb (Analyze_Loop_Statement): In GNATprove mode the
789         statements within an element iterator loop are only analyzed
790         agter the loop is rewritten. Within a generic the analysis must
791         be performed in any case to complete name capture.
793 2017-01-19  Bob Duff  <duff@adacore.com>
795         * sem_prag.adb (Analyze_Pragma): Check for ignored pragmas first,
796         before checking for unrecognized pragmas.
797         Initialize Pname on its declarations; that's always good style.
799 2017-01-19  Claire Dross  <dross@adacore.com>
801         * exp_ch7.adb (Build_Invariant_Procedure_Body): Semi-insert the
802         body into the tree for GNATprove by setting its Parent field. The
803         components invariants of composite types are not checked by
804         the composite type's invariant procedure in GNATprove mode.
805         (Build_Invariant_Procedure_Declaration): Semi-insert the
806         declaration into the tree for GNATprove by setting its Parent
807         field.
808         * freeze.adb (Freeze_Arry_Type):In GNATprove mode, do not add
809         the component invariants to the array type  invariant procedure
810         so that the procedure can be used to  check the array type
811         invariants if any.
812         (Freeze_Record_Type): In GNATprove mode, do
813         not add the component invariants to the record type  invariant
814         procedure so that the procedure can be used to  check the record
815         type invariants if any.
817 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
819         * lib-xref-spark_specific.adb: Minor reformatting.
820         * exp_ch7.adb (Add_Parent_Invariants): Do not process array types.
822 2017-01-19  Javier Miranda  <miranda@adacore.com>
824         * exp_aggr.adb (Pass_Aggregate_To_Back_End): Renamed as
825         Build_Back_End_Aggregate.
826         (Generate_Aggregate_For_Derived_Type): Code cleanup.
827         (Prepend_Stored_Values): Code cleanup.
829 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
831         * sem_ch6.adb (Analyze_Expression_Function): Check for an
832         incomplete return type after attempting to freeze it, so that
833         other freeze actiona are generated in the proper order.
835 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
837         * sem_aggr.adb (Resolve_Aggregate): If the type is a string
838         type, ie. a type whose component is a character type, and the
839         aggregate is positional, do not convert into a string literal
840         if the index type is not an integer type, because the original
841         type may be required in an enclosing operation.
843 2017-01-19  Bob Duff  <duff@adacore.com>
845         * binde.adb, debug.adb: Enable new elaboration order algorithm
846         by default. -dp switch reverts to the old algorithm.
848 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
850         * sem_ch3.adb Add with and use clauses for Exp_Ch7.
851         (Analyze_Declarations): Create the DIC and Invariant
852         procedure bodies s after all freezing has taken place.
853         (Build_Assertion_Bodies): New routine.
854         * sem_ch7.adb Remove the with and use clauses for Exp_Ch7
855         and Exp_Util.
856         (Analyze_Package_Specification): Remove the
857         generation of the DIC and Invariant procedure bodies. This is
858         now done by Analyze_Declarations.
859         * sem_disp.adb (Check_Dispatching_Operation): DIC and Invariant
860         procedures are never treated as primitives.
862 2017-01-19  Yannick Moy  <moy@adacore.com>
864         * frontend.adb: Analyze inlined bodies and check elaboration
865         rules in GNATprove mode too.
866         * sem_elab.adb (Delay_Element): Add Boolean component to save
867         indication that call is in SPARK code.  (Check_Elab_Calls):
868         Check elaboration rules in GNATprove mode, and correctly set
869         the current value of SPARK_Mode.
870         * lib-xref-spark_specific.adb
871         (Add_SPARK_Xrefs): Simplify iteration over dereferences.
873 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
875         * exp_ch4.adb (Expand_Concatenate): Do no enable overflow
876         checks on the expression for the high bound of concatenation
877         when checks are disabled, to suppress warnings about potential
878         constraint errors in restricted runtimes.
880 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
882         * exp_ch3.adb (Expand_Freeze_Enumeration_Type): Mark the
883         representation-to-position function as inlined.
884         * sem_cat.adb (Set_Categorization_From_Scope): Do not modify
885         the purity of an internally generated entity if it has been
886         explicitly marked as pure for optimization purposes.
887         * exp_aggr.adb: Minor reformatting.
889 2017-01-19  Javier Miranda  <miranda@adacore.com>
891         * exp_ch6.adb (Expand_Call): Remove side effects on
892         actuals that are allocators with qualified expression since the
893         initialization of the object is performed by means of individual
894         statements (and hence it must be done before the call).
896 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
898         * sem_ch3.adb (Analyze_Declarations): Minor reformatting.
899         (Build_Derived_Enumeration_Type): If the derived type inherits a
900         dynamic predicate from its parent, the bounds of the type must
901         freeze because an explicit constraint is constructed for the
902         type and the corresponding range is elaborated now.
904 2017-01-19  Arnaud Charlet  <charlet@adacore.com>
906         * sem_attr.ads: minor fix of inconsistent casing in comment
907         * lib-writ.ads: minor align comments in columns
908         * sem_ch3.adb: Minor reformatting.
909         * spark_xrefs.ads: minor fix typo in SPARK-related comment
910         * table.ads: minor style fix in comment
911         * lib-xref-spark_specific.adb
912         (Add_SPARK_Xrefs): simplify processing of SPARK cross-references.
913         * sem_ch12.adb: minor whitespace fix
914         * freeze.adb: Add comment.
915         * sem_util.adb (Unique_Name): for instances of
916         generic subprograms ignore the name of the wrapper package.
918 2017-01-19  Javier Miranda  <miranda@adacore.com>
920         * exp_aggr.adb (Resolve_Record_Aggregate):
921         Factorize code needed for aggregates of limited and unlimited
922         types in a new routine.
923         (Pass_Aggregate_To_Back_End): New subprogram.
925 2017-01-19  Yannick Moy  <moy@adacore.com>
927         * sinfo.adb (Pragma_Name): Only access up to Last_Pair of Pragma_Map.
929 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
931         * sem_ch4.ads, sem_ch4.adb (Try_Object_Operation): Make subprogram
932         public, for use elsewhere.
933         * sem_ch6.adb (Analyze_Procedure_Call): In SPARK_Mode and within
934         an Inlined_body, recognize a call that uses object notation
935         and has not been rewritten as a regular call because regular
936         expansion has not taken place.
938 2017-01-19  Bob Duff  <duff@adacore.com>
940         * checks.adb (Apply_Type_Conversion_Checks): Disable small optimization
941         in case of generic formal discrete types, because it causes crashes in
942         the compiler when built with assertions on.
944 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
946         * lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads,
947         sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting.
949 2017-01-19  Bob Duff  <duff@adacore.com>
951         * bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking):
952         Increment Warnings_Detected.  It was decrementing, which is
953         wrong since we just issued a warning message.
954         * binderr.ads (Errors_Detected, Warnings_Detected): Declare
955         these variables to be of subtype Nat instead of Int, because
956         they should never be negative.
958 2017-01-19  Javier Miranda  <miranda@adacore.com>
960         * contracts.adb (Build_Postconditions_Procedure): Replace
961         Generate_C_Code by Modify_Tree_For_C.
962         * exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate):
963         Replace Generate_C_Code by Modify_Tree_For_C.
964         * exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by
965         Modify_Tree_For_C.
966         * exp_ch11.adb (Expand_N_Exception_Declaration): Replace
967         Generate_C_Code by Modify_Tree_For_C.
968         * exp_ch4.adb (Expand_Allocator_Expression): Replace
969         Generate_C_Code by Modify_Tree_For_C.
970         * exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code
971         by Modify_Tree_For_C.
972         * exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace
973         Generate_C_Code by Modify_Tree_For_C.
974         * sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code
975         by Modify_Tree_For_C.
976         * sinfo.ads (Modify_Tree_For_C): Adding documentation.
978 2017-01-19  Javier Miranda  <miranda@adacore.com>
980         * sem_util.ads, sem_util.adb (Expression_Of_Expression_Function): New
981         subprogram.
982         (Is_Inlinable_Expression_Function): New subprogram.
983         * exp_ch6.ads, exp_ch6.adb (Expression_Of_Expression_Function): Moved
984         to Sem_Util.
985         (Is_Inlinable_Expression_Function): Moved to Sem_Util.
987 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
989         * sem_ch4.adb (Diagnose_Call): Improve error message when a
990         selected component has a prefix that might be interpreted
991         as a parameterless function call, but none of the candidate
992         interpretations is parameterless, and there is a hidden homonym
993         of the prefix that is a package.
994         * sem_ch8.adb (Find_Selected_Component): If the prefix might be
995         interpreted as a parameterless function call and its analysis
996         fails, do not call Analyze_Selected_Component.
998 2017-01-19  Steve Baird  <baird@adacore.com>
1000         * sem_util.ads: Add new Use_Full_View Boolean parameter to
1001         Get_Index_Bounds.
1002         * sem_util.adb (Get_Index_Bounds): replace calls to Scalar_Range with
1003         calls to a newly-defined Scalar_Range_Of_Right_View function.
1005 2017-01-19  Arnaud Charlet  <charlet@adacore.com>
1007         * gnat1drv.adb: minor fix of unbalanced parens in comment
1008         * lib-xref.ads (Traverse_Compilation_Unit): declaration moved
1009         to visible part of the package to allow re-use in GNATprove.
1010         * lib-xref-spark_specific.adb (Traverse_Stub): routine refactored
1011         from repeated code of Traverse_Compilation_Unit.
1012         (Traverse_Declaration_Or_Statement): fixed detection of
1013         generic subprograms and packages; also, iteration over case
1014         statement alternatives rewritten to avoid testing if the first
1015         alternative is present (since it must be present due to Ada
1016         syntax restrictions).
1018 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
1020         * exp_ch6.adb (Expand_N_Subprogram_Body): Mark the spec as
1021         returning by reference not just for subprogram body stubs,
1022         but for all subprogram cases.
1023         * sem_util.adb: Code reformatting.
1024         (Requires_Transient_Scope): Update the call to Results_Differ.
1025         (Results_Differ): Update the parameter profile and the associated
1026         comment on usage.
1028 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
1030         * sem_dim.adb (Analyze_Dimension): Analyze object declaration and
1031         identifier nodes that do not come from source, to handle properly
1032         dimensionality check within an inlined body which inclddes both
1033         original operands and rewritten operands. This removes spurious
1034         dimensionality errors in the presence of front-end inlining,
1035         as well as in SPARK mode.
1037 2017-01-16  Jakub Jelinek  <jakub@redhat.com>
1039         PR driver/49726
1040         * gcc-interface/lang.opt (gant, gnatO, gnat): Add Driver flag.
1042 2017-01-13  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
1044         * gcc-interface/Makefile.in (SPARC/Solaris): Fix typo.
1046 2017-01-13  Arnaud Charlet  <charlet@adacore.com>
1048         * doc/gnat_ugn/getting_started_with_gnat.rst,
1049         doc/gnat_ugn/inline_assembler.rst,
1050         doc/gnat_ugn/building_executable_programs_with_gnat.rst,
1051         doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
1052         doc/gnat_ugn/about_this_guide.rst,
1053         doc/gnat_ugn/platform_specific_information.rst,
1054         doc/gnat_ugn/example_of_binder_output.rst,
1055         doc/gnat_ugn/gnat_and_program_execution.rst,
1056         doc/gnat_ugn/gnat_utility_programs.rst,
1057         doc/gnat_ugn/the_gnat_compilation_model.rst,
1058         doc/gnat_rm/implementation_defined_attributes.rst,
1059         doc/gnat_rm/compatibility_and_porting_guide.rst,
1060         doc/gnat_rm/standard_library_routines.rst,
1061         doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
1062         doc/gnat_rm/implementation_defined_pragmas.rst,
1063         doc/gnat_rm/the_gnat_library.rst,
1064         doc/gnat_rm/obsolescent_features.rst,
1065         doc/gnat_rm/about_this_guide.rst,
1066         doc/gnat_rm/the_implementation_of_standard_i_o.rst,
1067         doc/gnat_rm/implementation_of_ada_2012_features.rst,
1068         doc/gnat_rm/interfacing_to_other_languages.rst,
1069         doc/gnat_rm/implementation_defined_aspects.rst,
1070         doc/gnat_rm.rst: Update documentation.
1071         * gnat_rm.texi, gnat_ugn.texi: Regenerated.
1073 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1075         * einfo.ads: minor grammar fixes in comment of Normalized_Position_Max.
1076         * scil_ll.adb: Minor style fix in comment.
1077         * sem_ch8.adb (Analyze_Expanded_Name): Perform dimension analysis
1078         even if entity is already set, because the node may be renalyzed
1079         after inlining transformations.
1081 2017-01-13  Javier Miranda  <miranda@adacore.com>
1083         * sem_res.adb (Resolve_Call): Do not establish a transient scope
1084         for a call to inlinable expression function (since the call will
1085         be replaced by its returned object).
1086         * exp_ch6.ads (Is_Inlinable_Expression_Function): New subprogram.
1087         * exp_ch6.adb (Expression_Of_Expression_Function): New subprogram.
1088         (Expand_Call): For inlinable expression function call replace the
1089         call by its returned object.
1090         (Is_Inlinable_Expression_Function): New subprogram.
1092 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
1094         * checks.adb: Minor typo fix and reformatting.
1096 2017-01-13  Javier Miranda  <miranda@adacore.com>
1098         * contracts.adb (Contract_Only_Subprograms): Remove formal.
1099         (Copy_Original_Specification): Removed.
1100         (Skip_Contract_Only_Subprogram): Move here checks previously
1101         located in the caller of this routine (to leave the code more clean).
1102         (Build_Contract_Only_Subprogram): Code cleanup.
1103         * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): Removed.
1104         (Get_Contract_Only_Missing_Body_Name): Removed.
1106 2017-01-13  Javier Miranda  <miranda@adacore.com>
1108         * sem_ch6.adb (Cloned_Expression): New subprogram.
1109         (Freeze_Expr_Types): Complete previous patch since the expression
1110         of an expression-function may have iterators and loops with
1111         defining identifiers which, as part of the preanalysis of the
1112         expression, may be left decorated with itypes that will not be
1113         available in the tree passed to the backend.
1115 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1117         * checks.adb (Apply_Type_Conversion_Checks): Optimize a type
1118         conversion to Integer of an expression that is an attribute
1119         reference 'Pos on an enumeration type.
1121 2017-01-13  Bob Duff  <duff@adacore.com>
1123         * atree.ads: Minor comment fix.
1125 2017-01-13  Justin Squirek  <squirek@adacore.com>
1127         * sem_ch6.adb (Check_Aggregate_Accessibility): Ignore function
1128         calls in accessibility check on return statement.
1130 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1132         * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
1133         Ensure that the input body is a subprogram body before trying to
1134         determine whether it denoted an expression function.  Note that
1135         subprogram body stubs cannot denote expression functions.
1137 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
1139         * bindgen.adb, sem_ch6.adb, binde.adb, exp_ch3.adb: Minor reformatting
1140         and typo fixes.
1142 2017-01-13  Javier Miranda  <miranda@adacore.com>
1144         * einfo.ads (Component_Bit_Offset): Fix documentation.
1145         * sem_ch13.adb (Check_Record_Representation_Clause): Skip check
1146         on record holes for components with unknown compile-time offsets.
1148 2017-01-13  Bob Duff  <duff@adacore.com>
1150         * ali.ads, ali.adb (Static_Elaboration_Model_Used): Remove unused flag.
1151         * g-locfil.ads: Minor comment fix.
1153 2017-01-13  Bob Duff  <duff@adacore.com>
1155         * binde.adb (Elab_New): New elaboration order algorithm
1156         that is expected to cause fewer ABE issues. This is a work in
1157         progress. The new algorithm is currently disabled, and can be
1158         enable by the -dp switch, or by modifying the Do_Old and Do_New
1159         etc. flags and rebuilding. Experimental code is included to
1160         compare the results of the old and new algorithms.
1161         * binde.ads: Use GNAT.Dynamic_Tables instead of Table, so we
1162         can have multiple of these tables, so the old and new algorithms
1163         can coexist.
1164         * bindgen.ads (Gen_Output_File): Pass Elab_Order as an 'in'
1165         parameter of type array. This avoids the global variable, and
1166         allows bounds checking (which is normally defeated by the tables
1167         packages). It also ensures that the Elab_Order is read-only
1168         to Bindgen.
1169         * bindgen.adb: Pass Elab_Order as an 'in' parameter to all
1170         subprograms that need it, as above.
1171         * debug.adb: Document new -dp switch. Modify doc of old -do
1172         switch.
1173         * gnatbind.adb (Gnatbind): Make use of new interfaces to Binde
1174         and Bindgen.  Move writing of closure (-R and -Ra switches)
1175         to Binde; that's more convenient.
1177 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1179         * sem_ch6.adb (Analyze_Expression_Function): If the expression
1180         function is a completion, all entities referenced in the
1181         expression are frozen. As a consequence, a reference to an
1182         uncompleted private type from an enclosing scope is illegal.
1184 2017-01-13  Javier Miranda  <miranda@adacore.com>
1186         * sem_ch6.adb (Freeze_Expr_Types): New subprogram.
1187         (Analyze_Subprogram_Body_Helper): At the occurrence of an
1188         expression function declaration that is a completion, its
1189         expression causes freezing (AI12-0103).
1191 2017-01-13  Vadim Godunko  <godunko@adacore.com>
1193         * a-coinho-shared.adb: Fix memory leaks in Constant_Reference and
1194         Reference functions of Ada.Containers.Indefinite_Holders.
1196 2017-01-13  Bob Duff  <duff@adacore.com>
1198         * s-os_lib.ads: Minor comment fixes.
1200 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1202         * exp_ch3.adb (Default_Initialize_Object): Do not default
1203         initialize an object when it is of a task type and restriction
1204         No_Tasking is in effect because the initialization is obsolete.
1205         * exp_ch9.adb (Build_Master_Entity): Do not generate a master when
1206         restriction No_Tasking is in effect.
1207         (Build_Master_Renaming): Do not rename a master when restriction
1208         No_Tasking is in effect.
1210 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1212         * sem_aggr.adb (Resolve_Array_Aggregate): The code that verifies
1213         the legality of An others clause applies as well to a choice in
1214         an Iterated_component_ association.
1215         (Resolve_Iterated_Component_Association): An others choice
1216         is legal.
1217         * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): An
1218         Iterated_Component_Association is not static.
1220 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1222         * exp_ch3.adb (Freeze_Type): Mark the Ghost mode as set in case
1223         control is passed to the expresion handler before the new mode
1224         is set.
1225         * sem_ch12.adb (Analyze_Package_Instantiation,
1226         Analyze_Subprogram_Instantiation): Mark the Ghost mode as set
1227         in case control is passed to the expresion handler before the
1228         new mode is set.
1230 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1232         * sem_aggr.adb, sem_ch3.adb, inline.adb, sem_util.adb, exp_ch4.adb,
1233         exp_aggr.adb: Minor reformatting.
1235 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
1237         * inline.adb: Minor reformatting and typo fix.
1239 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1241         * sem_util.ads, sem_util.adb (Choice_List): Move function here
1242         from sem_aggr.adb, for use elsewhere.
1243         * sem_ch3.adb (Analyze_Object_Declaration): Use Choice_List.
1244         * sem_aggr.adb (Resolve_Array_Aggregate): Remove
1245         Iterated_Component_Present.
1246         * exp_aggr.adb: Use Choice_List throughout, to handle
1247         Iterated_Component_Associations.
1248         (Gen_Loop): Generate proper loop for an
1249         Iterated_Component_Association: loop variable has the identifier
1250         of the original association. Generate a loop even for a single
1251         component choice, in order to make loop parameter visible in
1252         expression.
1253         (Flatten): An Iterated_Component_Association is not static.
1255 2017-01-13  Yannick Moy  <moy@adacore.com>
1257         * exp_ch4.adb (Expand_N_Op_Expon): Ensure that the value of
1258         float exponentiation for statically known small negative values
1259         is the reciprocal of the exponentiation for the opposite value
1260         of the exponent.
1261         * s-exnllf.adb (Exn_Float, Exn_Long_Float, Exn_Long_Long_Float):
1262         Ensure that the value of float exponentiation for negative values
1263         is the reciprocal of the exponentiation for the opposite value
1264         of the exponent.
1265         * inline.adb (Expand_Inlined_Call): Fix the count
1266         for the number of generated gotos.
1268 2017-01-13  Yannick Moy  <moy@adacore.com>
1270         * inline.adb: Code cleanup.
1271         * sem_util.adb (Is_OK_Volatile_Context): Add
1272         expression in delay statement as OK for volatile context.
1274 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1276         * sem_aggr.adb (Resolve_Array_Aggregate): In normal compilation
1277         mode a choice that is a subtype with a static predicate is
1278         replaced by the values it covers. This transformation must not
1279         be performed in ASIS mode, to preserve the source for analysis.
1281 2017-01-13  Justin Squirek  <squirek@adacore.com>
1283         * nlists.ads: Correct minor typo.
1285 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
1287         * sem_ch13.adb: Minor reformatting and typo fix.
1289 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1291         * par-ch4.adb (P_Aggregate_Or_Parent_Expr): An
1292         Iterated_Component_Association is a named association in an
1293         array aggregate.
1294         * sem_aggr.adb (Resolve_Iterated_Component_Association): New
1295         procedure, subsidiary of Resolve_Array_Aggregate, to analyze
1296         and resolve the discrete choices and the expression of the
1297         new construct.
1298         * sinfo.adb, sinfo.ads: In analogy with N_Component_Association,
1299         Loop_Actions and Box_Present are attributes of
1300         N_Iterated_Component_Association nodes. Box_Present is always
1301         False in this case.
1302         * sprint.adb (Sprint_Node): An Iterated_Component_Association
1303         has a Discrete_Choices list, as specified in the RM. A
1304         Component_Association for aggregate uses instead a Choices list.
1305         We have to live with this small inconsistency because the new
1306         construct also has a defining identifier, and there is no way
1307         to merge the two node structures.
1309 2017-01-13  Yannick Moy  <moy@adacore.com>
1311         * inline.adb (Remove_Aspects_And_Pragmas): Add Unused to the
1312         list of pragmas to remove.  Remove pragmas from the list of
1313         statements in the body to inline.
1314         * namet.adb, namet.ads (Nam_In): New version with 12 parameters.
1316 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1318         * sem_ch3.adb (Resolve_Aspects): New procedure, subsidiary of
1319         Analyze_Declarations, to analyze and resolve the expressions of
1320         aspect specifications in the current declarative list, so that
1321         the expressions have proper entity and type info.  This is needed
1322         for ASIS when there is no subsequent expansion to generate this
1323         semantic information.
1324         * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Use Etype of
1325         original expression, to suppress cascaded errors when expression
1326         has been constant-folded.
1327         (Resolve_Aspect_Expressions, Resolve_Name): Preserve entities in
1328         ASIS mode, because there is no subsequent expansion to decorate
1329         the tree.
1331 2017-01-13  Yannick Moy  <moy@adacore.com>
1333         * inline.adb, inline.ads (Call_Can_Be_Inlined_In_GNATprove_Mode):
1334         New function to detect when a call may be inlined or not in
1335         GNATprove mode.
1336         (Expand_Inlined_Call): Ensure that a temporary
1337         is always created in the cases where a type conversion may be
1338         needed on an input parameter in GNATprove mode, so that GNATprove
1339         sees the check to perform.
1340         * sem_res.adb (Resolve_Call): In GNATprove mode, skip inlining
1341         when not applicable due to actual requiring type conversion
1342         with possible check but no temporary value can be copied for
1343         GNATprove to see the check.
1345 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1347         * sem_aggr.adb, par_sco.adb, s-osprim-mingw.adb, exp_ch5.adb,
1348         exp_prag.adb, sem_ch3.adb, xr_tabls.adb, lib-xref-spark_specific.adb,
1349         layout.adb, sem_dist.adb, exp_spark.adb, exp_ch7.adb, gnatcmd.adb,
1350         exp_util.adb, prj-proc.adb, sem_aux.adb, comperr.adb, g-memdum.adb,
1351         exp_attr.adb, s-intman-solaris.adb, exp_ch9.adb, make.adb, live.adb,
1352         g-sercom-linux.adb, sem_dim.adb, mlib-prj.adb, s-intman-posix.adb,
1353         sem_ch9.adb, sem_ch10.adb, prep.adb, einfo.adb, scng.adb, checks.adb,
1354         prj-strt.adb, sem_prag.adb, eval_fat.adb, sem_ch12.adb, sem.adb,
1355         a-numaux-x86.adb, a-stwifi.adb, i-cobol.adb, prj.adb,
1356         get_spark_xrefs.adb, s-tasini.adb, rtsfind.adb, freeze.adb,
1357         g-arrspl.adb, par-ch4.adb, sem_util.adb, sem_res.adb, expander.adb,
1358         sem_attr.adb, exp_dbug.adb, prj-pp.adb, a-stzfix.adb, s-interr.adb,
1359         s-wchcnv.adb, switch-m.adb, gnat1drv.adb, sinput-l.adb, stylesw.adb,
1360         contracts.adb, s-intman-android.adb, g-expect.adb, exp_ch4.adb,
1361         g-comlin.adb, errout.adb, sinput.adb, s-exctra.adb, repinfo.adb,
1362         g-spipat.adb, g-debpoo.adb, exp_ch6.adb, sem_ch4.adb, exp_ch13.adb,
1363         a-wtedit.adb, validsw.adb, pprint.adb, widechar.adb, makeutl.adb,
1364         ali.adb, set_targ.adb, sem_mech.adb, sem_ch6.adb, gnatdll.adb,
1365         get_scos.adb, g-pehage.adb, s-tratas-default.adb, gnatbind.adb,
1366         prj-dect.adb, g-socthi-mingw.adb, par-prag.adb, prj-nmsc.adb,
1367         exp_disp.adb, par-ch12.adb, binde.adb, sem_ch8.adb,
1368         s-tfsetr-default.adb, s-regexp.adb, gprep.adb, s-tpobop.adb,
1369         a-teioed.adb, sem_warn.adb, sem_eval.adb, g-awk.adb, s-io.adb,
1370         a-ztedit.adb, xoscons.adb, exp_intr.adb, sem_cat.adb, sprint.adb,
1371         g-socket.adb, exp_dist.adb, sem_ch13.adb, s-tfsetr-vxworks.adb,
1372         par-ch3.adb, treepr.adb, g-forstr.adb, g-catiio.adb, par-ch5.adb,
1373         uname.adb, osint.adb, exp_ch3.adb, prj-env.adb, a-strfix.adb,
1374         a-stzsup.adb, prj-tree.adb, s-fileio.adb: Update all eligible case
1375         statements to reflect the new style for case alternatives. Various
1376         code clean up and reformatting.
1378 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
1380         * exp_util.adb: Minor reformatting.
1382 2017-01-13  Yannick Moy  <moy@adacore.com>
1384         * exp_spark.adb: Code cleanup.
1385         * sem_ch9.adb (Analyze_Delay_Until): Resolve
1386         expression so that calls are identified as such inside delay
1387         until.
1389 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1391         * exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
1392         * par-ch3.adb (P_Discrete_Choice_List): An
1393         Iterated_Component_Association is an array aggregate component.
1394         * par-ch4.adb (P_Iterated_Component_Association): New procedure.
1395         (Is_Quantified_Expression): New function that performs a lookahead
1396         to distinguish quantified expressions from iterated component
1397         associations.
1398         (P_Aggregate_Or_Paren_Expr): Recognize iterated component
1399         associations.
1400         (P_Unparen_Cond_Case_Quant_Expression, P_Primary): Ditto.
1401         * sem.adb (Analyze): Handle Iterated_Component_Association.
1402         * sem_aggr.adb (Resolve_Array_Aggregate): Dummy handling of iterated
1403         component associations.
1404         * sinfo.ads, sinfo.adb: Entries for for
1405         N_Iterated_Component_Association and its fields.
1406         * sprint.adb (Sprint_Node_Actual): Handle
1407         N_Iterated_Component_Association.
1409 2017-01-13  Justin Squirek  <squirek@adacore.com>
1411         * sem_ch12.adb (Analyze_Package_Instantiation): Move disabiling
1412         of the style check until after preanalysis of acutals.
1414 2017-01-13  Yannick Moy  <moy@adacore.com>
1416         * sem_ch13.adb: Minor reformatting.
1417         * par-ch11.adb: minor style fix in whitespace
1418         * gnatbind.adb (Gnatbind): Scope of Std_Lib_File
1419         reduced to Add_Artificial_ALI_File; style fix in declaration of
1420         Text; grammar fix in comment.
1421         * osint-c.adb (Read_Library_Info): strip trailing NUL from result.
1422         * freeze.adb: Cleanup to pass pragma instead of
1423         expression to call.
1424         * exp_spark.adb (Expand_SPARK_Attribute_Reference): New procedure to
1425         replace System'To_Address by equivalent call.
1427 2017-01-13  Arnaud Charlet  <charlet@adacore.com>
1429         * bindusg.adb: Improve usage output for -f switch.
1431 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1433         * frontend.adb, freeze.adb, sem_res.adb, sem_attr.adb, sem_ch8.adb:
1434         Minor reformatting.
1436 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1438         * sem_ch13.adb (Is_Predicate_Static): Following the intent of the RM,
1439         treat comparisons on strings as legal in a Static_Predicate.
1440         (Is_Predicate_Static, Is_Type_Ref): Predicate also returns true on
1441         a function call that is the expansion of a string comparison.The
1442         function call is built when compiling the corresponding predicate
1443         function, but the expression has been found legal as a static
1444         predicate during earlier analysis.
1445         * sem_eval.adb (Real_Or_String_Static_Predicate_Matches): Handle
1446         properly a function call that is the expansion of a string
1447         comparison operation, in order to recover the Static_Predicate
1448         expression and apply it to a static argument when needed.
1450 2017-01-13  Tristan Gingold  <gingold@adacore.com>
1452         * s-mmap.adb, s-mmap.ads (Open_Read_No_Exception): New function.
1453         (Open_Read): Re-implement using Open_Read_No_Exception.
1454         (Open_Write): Raise exception in case of error.
1455         * s-mmosin-mingw.adb (Open_Common): Do not raise exception.
1456         * s-mmosin-unix.adb (Open_Read, Open_Write): Do not
1457         reaise exception.
1458         * s-mmosin-mingw.ads, s-mmosin-unix.ads (Open_Read): Adjust comment.
1460 2017-01-13  Yannick Moy  <moy@adacore.com>
1462         * checks.adb: Code cleanup.
1464 2017-01-13  Yannick Moy  <moy@adacore.com>
1466         * freeze.adb (Check_Inherited_Conditions): Use analyzed pragma
1467         expression instead of unanalyzed aspect expression for checking
1468         the validity of inheriting an operation. Also copy the expression
1469         being passing it to Build_Class_Wide_Expression, as this call
1470         modifies its argument.
1471         * sem_util.ads Fix comment to reference correct function name
1472         New_Copy_Tree.
1474 2017-01-13  Javier Miranda  <miranda@adacore.com>
1476         * sem_res.adb (Resolve_Generalized_Indexing): Compiling in ASIS mode,
1477         when we propagate information about the indexes back to the original
1478         indexing mode and the prefix of the index is a function call, do not
1479         remove any parameter from such call.
1481 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
1483         * exp_ch6.ads (Needs_BIP_Finalization_Master): Update comment.
1484         * exp_ch6.adb (Needs_BIP_Finalization_Master): Return True for
1485         a build-in-place function whose result type is tagged.
1487 2017-01-13  Yannick Moy  <moy@adacore.com>
1489         * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
1490         Do not generate a wrapper when the only candidate is a class-wide
1491         subprogram.
1492         (Analyze_Subprogram_Renaming): Do not freeze the renaming or renamed
1493         inside a generic context.
1495 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1497         * exp_util.adb (Add_Inherited_Tagged_DIC):
1498         Pass the object parameters of both the parent and the derived
1499         type DIC procedure to the reference replacement circuitry.
1500         (Find_DIC_Type): Modify the circuitry to present the partial
1501         view of a private type in case the private type defines its own
1502         DIC pragma.
1503         (Replace_Object_And_Primitive_References): Add two
1504         optional formal parameters.  Update the comment on usage. Update
1505         the replacement of references to object parameters.
1507 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
1509         * einfo.adb, sem_ch6.adb, atree.adb: Minor reformatting and typo fix.
1511 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
1513         * sem_res.adb (Resolve_Actuals): Apply Scalar_Range_Check to
1514         an out parameter that is a type conversion, independently of th
1515         range check that may apply to the expression of the conversion,
1516         for use in GNATProve.
1518 2017-01-13  Yannick Moy  <moy@adacore.com>
1520         * gnat1drv.adb (Gnat1drv): Move the implicit with for System in
1521         GNATprove_Mode here to Frontend.
1522         * frontend.adb (Frontend): Move the implicit with for System
1523         in GNATprove_Mode here as it ismore correct this way; the old
1524         place only worked by chance, since there were no overloaded names.
1525         * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_Tasking_State.
1526         * sem_attr.adb (Analyze_Attribute): In GNATprove_Mode, for the
1527         four attributes identified in SRM 9(18), add an implicit with
1528         to Ada.Task_Identification.
1529         * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
1530         Deal specially with the wrapper introduced for AI05-0071 in GNATprove
1531         mode.
1532         * checks.adb (Apply_Discriminant_Check,
1533         Apply_Selected_Length_Checks, Apply_Selected_Range_Checks):
1534         In GNATprove mode, we do not apply the checks, but we still
1535         analyze the expression to possibly issue errors on SPARK
1536         code when a run-time error can be detected at compile time.
1537         (Selected_Length_Checks, Selected_Range_Checks): Perform analysis
1538         in GNATprove mode.
1540 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1542         * expander.adb (Expand): Add a warning about using return
1543         statements in Ghost management code.
1544         * exp_ch3.adb (Freeze_Type): Add a warning about using return
1545         statements in Ghost management code.
1546         * exp_ch7.adb (Build_Invariant_Procedure_Body,
1547         Build_Invariant_Procedure_Declaration): Add a warning about
1548         using return statements in Ghost management code.
1549         * exp_disp.adb (Make_DT): Add a warning about using return
1550         statements in Ghost management code.
1551         * exp_util.adb (Build_DIC_Procedure_Body,
1552         Build_DIC_Procedure_Declaration, Make_Predicated_Call): Add a
1553         warning about using return statements in Ghost management code.
1554         * freeze.adb (Freeze_Entity): Add a warning about using return
1555         statements in Ghost management code.
1556         * sem.adb (Analyze, Do_Analyze): Add a warning about using return
1557         statements in Ghost management code.
1558         * sem_ch3.adb (Analyze_Object_Declaration, Process_Full_View): Add
1559         a warning about using return statements in Ghost management code.
1560         * sem_ch5.adb (Analyze_Assignment): Add a warning about using
1561         return statements in Ghost management code.
1562         * sem_ch6.adb (Analyze_Procedure_Call,
1563         Analyze_Subprogram_Body_Helper): Add a warning about using return
1564         statements in Ghost management code.
1565         * sem_ch7.adb (Analyze_Package_Body_Helper): Add a warning about
1566         using return statements in Ghost management code.
1567         * sem_ch12.adb (Analyze_Package_Instantiation,
1568         Analyze_Subprogram_Instantiation, Instantiate_Package_Body,
1569         Instantiate_Subprogram_Body): Add a warning about using return
1570         statements in Ghost management code.
1571         * sem_ch13.adb (Build_Predicate_Functions,
1572         Build_Predicate_Function_Declarations): Add a warning about
1573         using return statements in Ghost management code.
1574         * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part,
1575         Analyze_Initial_Condition_In_Decl_Part, Analyze_Pragma,
1576         Analyze_Pre_Post_Condition_In_Decl_Part):  Add a warning about
1577         using return statements in Ghost management code.
1579 2017-01-13  Tristan Gingold  <gingold@adacore.com>
1581         * s-mmosin-mingw.adb: Fix pragma import.
1583 2017-01-13  Arnaud Charlet  <charlet@adacore.com>
1585         * gnat1drv.adb (Adjust_Global_Switches): Ignore -gnateE in
1586         codepeer mode.
1588 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
1590         * atree.adb (Allocate_Initialize_Node): A newly created node is
1591         no longer marked as Ghost at this level.
1592         (Mark_New_Ghost_Node): New routine.
1593         (New_Copy): Mark the copy as Ghost.
1594         (New_Entity): Mark the entity as Ghost.
1595         (New_Node): Mark the node as Ghost.
1596         * einfo.adb (Is_Checked_Ghost_Entity): This attribute can now
1597         apply to unanalyzed entities.
1598         (Is_Ignored_Ghost_Entity): This attribute can now apply to unanalyzed
1599         entities.
1600         (Set_Is_Checked_Ghost_Entity): This attribute now
1601         applies to all entities as well as unanalyzed entities.
1602         (Set_Is_Ignored_Ghost_Entity): This attribute now applies to
1603         all entities as well as unanalyzed entities.
1604         * expander.adb Add with and use clauses for Ghost.
1605         (Expand): Install and revert the Ghost region associated with the node
1606         being expanded.
1607         * exp_ch3.adb (Expand_Freeze_Array_Type): Remove all Ghost-related code.
1608         (Expand_Freeze_Class_Wide_Type): Remoe all Ghost-related code.
1609         (Expand_Freeze_Enumeration_Type): Remove all Ghost-related code.
1610         (Expand_Freeze_Record_Type): Remove all Ghost-related code.
1611         (Freeze_Type): Install and revert the Ghost region associated
1612         with the type being frozen.
1613         * exp_ch5.adb Remove with and use clauses for Ghost.
1614         (Expand_N_Assignment_Statement): Remove all Ghost-related code.
1615         * exp_ch6.adb Remove with and use clauses for Ghost.
1616         (Expand_N_Procedure_Call_Statement): Remove all Ghost-relatd code.
1617         (Expand_N_Subprogram_Body): Remove all Ghost-related code.
1618         * exp_ch7.adb (Build_Invariant_Procedure_Body): Install and revert the
1619         Ghost region of the working type.
1620         (Build_Invariant_Procedure_Declaration): Install and revert
1621         the Ghost region of the working type.
1622         (Expand_N_Package_Body): Remove all Ghost-related code.
1623         * exp_ch8.adb Remove with and use clauses for Ghost.
1624         (Expand_N_Exception_Renaming_Declaration): Remove all Ghost-related
1625         code.
1626         (Expand_N_Object_Renaming_Declaration): Remove all Ghost-related code.
1627         (Expand_N_Package_Renaming_Declaration): Remove all Ghost-related code.
1628         (Expand_N_Subprogram_Renaming_Declaration): Remove all Ghost-related
1629         code.
1630         * exp_ch13.adb Remove with and use clauses for Ghost.
1631         (Expand_N_Freeze_Entity): Remove all Ghost-related code.
1632         * exp_disp.adb (Make_DT): Install and revert the Ghost region of
1633         the tagged type. Move the generation of various entities within
1634         the Ghost region of the type.
1635         * exp_prag.adb Remove with and use clauses for Ghost.
1636         (Expand_Pragma_Check): Remove all Ghost-related code.
1637         (Expand_Pragma_Contract_Cases): Remove all Ghost-related code.
1638         (Expand_Pragma_Initial_Condition): Remove all Ghost-related code.
1639         (Expand_Pragma_Loop_Variant): Remove all Ghost-related code.
1640         * exp_util.adb (Build_DIC_Procedure_Body): Install
1641         and revert the Ghost region of the working types.
1642         (Build_DIC_Procedure_Declaration): Install and revert the
1643         Ghost region of the working type.
1644         (Make_Invariant_Call): Install and revert the Ghost region of the
1645         associated type.
1646         (Make_Predicate_Call): Reimplemented. Install and revert the
1647         Ghost region of the associated type.
1648         * freeze.adb (Freeze_Entity): Install and revert the Ghost region
1649         of the entity being frozen.
1650         (New_Freeze_Node): Removed.
1651         * ghost.adb Remove with and use clauses for Opt.
1652         (Check_Ghost_Completion): Update the parameter profile
1653         and all references to formal parameters.
1654         (Ghost_Entity): Update the comment on usage.
1655         (Install_Ghost_Mode): New routines.
1656         (Is_Ghost_Assignment): New routine.
1657         (Is_Ghost_Declaration): New routine.
1658         (Is_Ghost_Pragma): New routine.
1659         (Is_Ghost_Procedure_Call): New routine.
1660         (Is_Ghost_Renaming): Removed.
1661         (Is_OK_Declaration): Reimplemented.
1662         (Is_OK_Pragma): Reimplemented.
1663         (Is_OK_Statement): Reimplemented.
1664         (Is_Subject_To_Ghost): Update the comment on usage.
1665         (Mark_And_Set_Ghost_Assignment): New routine.
1666         (Mark_And_Set_Ghost_Body): New routine.
1667         (Mark_And_Set_Ghost_Completion): New routine.
1668         (Mark_And_Set_Ghost_Declaration): New routine.
1669         (Mark_And_Set_Ghost_Instantiation): New routine.
1670         (Mark_And_Set_Ghost_Procedure_Call): New routine.
1671         (Mark_Full_View_As_Ghost): Removed.
1672         (Mark_Ghost_Declaration_Or_Body): New routine.
1673         (Mark_Ghost_Pragma): New routine.
1674         (Mark_Ghost_Renaming): New routine.
1675         (Mark_Pragma_As_Ghost): Removed.
1676         (Mark_Renaming_As_Ghost): Removed.
1677         (Propagate_Ignored_Ghost_Code): Update the comment on usage.
1678         (Prune_Node): Freeze nodes no longer need special pruning, they
1679         are processed by the general ignored Ghost code mechanism.
1680         (Restore_Ghost_Mode): New routine.
1681         (Set_Ghost_Mode): Reimplemented.
1682         (Set_Ghost_Mode_From_Entity): Removed.
1683         * ghost.ads Add with and use clauses for Ghost.
1684         (Check_Ghost_Completion): Update the parameter profile
1685         along with the comment on usage.
1686         (Install_Ghost_Mode): New routine.
1687         (Is_Ghost_Assignment): New routine.
1688         (Is_Ghost_Declaration): New routine.
1689         (Is_Ghost_Pragma): New routine.
1690         (Is_Ghost_Procedure_Call): New routine.
1691         (Mark_And_Set_Ghost_Assignment): New routine.
1692         (Mark_And_Set_Ghost_Body): New routine.
1693         (Mark_And_Set_Ghost_Completion): New routine.
1694         (Mark_And_Set_Ghost_Declaration): New routine.
1695         (Mark_And_Set_Ghost_Instantiation): New routine.
1696         (Mark_And_Set_Ghost_Procedure_Call): New routine.
1697         (Mark_Full_View_As_Ghost): Removed.
1698         (Mark_Ghost_Pragma): New routine.
1699         (Mark_Ghost_Renaming): New routine.
1700         (Mark_Pragma_As_Ghost): Removed.
1701         (Mark_Renaming_As_Ghost): Removed.
1702         (Restore_Ghost_Mode): New routine.
1703         (Set_Ghost_Mode): Redefined.
1704         (Set_Ghost_Mode_From_Entity): Removed.
1705         * sem.adb (Analyze): Install and revert the Ghost region of the
1706         node being analyzed.
1707         (Do_Analyze): Change the way a clean Ghost
1708         region is installed and reverted.
1709         * sem_ch3.adb (Analyze_Full_Type_Declaration): Remove
1710         all Ghost-related code.
1711         (Analyze_Incomplete_Type_Decl): Remove all Ghost-related code.
1712         (Analyze_Number_Declaration): Remove all Ghost-related code.
1713         (Analyze_Object_Declaration): Install and revert the Ghost region of
1714         a deferred object declaration's completion.
1715         (Array_Type_Declaration): Remove all Ghost-related code.
1716         (Build_Derived_Type): Update the comment on
1717         the propagation of Ghost attributes from a parent to a derived type.
1718         (Derive_Subprogram): Remove all Ghost-related code.
1719         (Make_Class_Wide_Type): Remove all Ghost-related code.
1720         (Make_Implicit_Base): Remove all Ghost-related code.
1721         (Process_Full_View): Install and revert the Ghost region of
1722         the partial view.  There is no longer need to check the Ghost
1723         completion here.
1724         * sem_ch5.adb (Analyze_Assignment): Install and revert the Ghost
1725         region of the left hand side.
1726         * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Remove
1727         all Ghost-related code.
1728         (Analyze_Expression_Function): Remove all Ghost-related code.
1729         (Analyze_Generic_Subprogram_Body): Remove all Ghost-related code.
1730         (Analyze_Procedure_Call): Install and revert the Ghost region of
1731         the procedure being called.
1732         (Analyze_Subprogram_Body_Helper): Install and revert the Ghost
1733         region of the spec or body.
1734         (Analyze_Subprogram_Declaration): Remove all Ghost-related code.
1735         (Build_Subprogram_Declaration): Remove all Ghost-related code.
1736         (Find_Corresponding_Spec): Remove all Ghost-related code.
1737         (Process_Formals): Remove all Ghost-related code.
1738         * sem_ch7.adb (Analyze_Package_Body_Helper): Install and revert
1739         the Ghost region of the spec.
1740         (Analyze_Package_Declaration): Remove all Ghost-related code.
1741         * sem_ch8.adb (Analyze_Exception_Renaming): Mark a renaming as
1742         Ghost when it aliases a Ghost entity.
1743         (Analyze_Generic_Renaming): Mark a renaming as Ghost when it aliases
1744         a Ghost entity.
1745         (Analyze_Object_Renaming): Mark a renaming as Ghost when
1746         it aliases a Ghost entity.
1747         (Analyze_Package_Renaming): Mark a renaming as Ghost when it aliases
1748         a Ghost entity.
1749         (Analyze_Subprogram_Renaming): Mark a renaming as Ghost when it
1750         aliases a Ghost entity.
1751         * sem_ch11.adb Remove with and use clauses for Ghost.
1752         (Analyze_Exception_Declaration): Remove all Ghost-related code.
1753         * sem_ch12.adb (Analyze_Generic_Package_Declaration): Remove all
1754         Ghost-related code.
1755         (Analyze_Generic_Subprogram_Declaration): Remove all Ghost-related
1756         code.
1757         (Analyze_Package_Instantiation): Install and revert the Ghost region
1758         of the package instantiation.
1759         (Analyze_Subprogram_Instantiation): Install
1760         and revert the Ghost region of the subprogram instantiation.
1761         (Instantiate_Package_Body): Code clean up. Install and revert the
1762         Ghost region of the package body.
1763         (Instantiate_Subprogram_Body): Code clean up. Install and revert the
1764         Ghost region of the subprogram body.
1765         * sem_ch13.adb (Build_Predicate_Functions): Install
1766         and revert the Ghost region of the related type.
1767         (Build_Predicate_Function_Declaration): Code clean up. Install
1768         and rever the Ghost region of the related type.
1769         * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
1770         Install and revert the Ghost region of the pragma.
1771         (Analyze_Initial_Condition_In_Decl_Part): Install and revert the
1772         Ghost region of the pragma.
1773         (Analyze_Pragma): Install and revert the Ghost region of various
1774         pragmas.  Mark a pragma as Ghost when it is related to a Ghost entity
1775         or encloses a Ghost entity.
1776         (Analyze_Pre_Post_Condition): Install and revert the Ghost
1777         region of the pragma.
1778         (Analyze_Pre_Post_Condition_In_Decl_Part): Install and revert the
1779         Ghost region of the pragma.
1780         * sem_res.adb (Resolve): Remove all Ghost-related code.
1781         * sem_util.adb (Is_Declaration): Reimplemented.
1782         (Is_Declaration_Other_Than_Renaming): New routine.
1783         * sem_util.ads (Is_Declaration_Other_Than_Renaming): New routine.
1784         * sinfo.adb (Is_Checked_Ghost_Pragma): New routine.
1785         (Is_Ghost_Pragma): Removed.
1786         (Is_Ignored_Ghost_Pragma): New routine.
1787         (Set_Is_Checked_Ghost_Pragma): New routine.
1788         (Set_Is_Ghost_Pragma): Removed.
1789         (Set_Is_Ignored_Ghost_Pragma): New routine.
1790         * sinfo.ads: Update the documentation on Ghost mode and
1791         Ghost regions.  New attributes Is_Checked_Ghost_Pragma
1792         and Is_Ignored_Ghost_Pragma along with usages in nodes.
1793         Remove attribute Is_Ghost_Pragma along with usages in nodes.
1794         (Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
1795         (Is_Ghost_Pragma): Removed along with pragma Inline.
1796         (Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
1797         (Set_Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
1798         (Set_Is_Ghost_Pragma): Removed along with pragma Inline.
1799         (Set_Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
1801 2017-01-12  Tristan Gingold  <gingold@adacore.com>
1803         * s-mmap.ads, s-mmap.adb, s-mmosin-unix.ads, s-mmosin-unix.adb,
1804         s-mmauni-long.ads, s-mmosin-mingw.ads, s-mmosin-mingw.adb: New files.
1806 2017-01-12  Yannick Moy  <moy@adacore.com>
1808         * errout.adb, errout.ads (Initialize): Factor common treatment
1809         in Reset_Warnings.
1810         (Reset_Warnings): New procedure to reset counts related to warnings.
1811         (Record_Compilation_Errors): New variable to store the presence of an
1812         error, used in gnat2why to allow changing the Warning_Mode.
1813         (Compilation_Errors): Use new variable Record_Compilation_Errors to
1814         store the presence of an error.
1816 2017-01-12  Javier Miranda  <miranda@adacore.com>
1818         * sem_ch13.adb (Analyze_Aspect_Specifications):
1819         For Interrupt_Handler and Attach_ Handler aspects, decorate the
1820         internally built reference to the protected procedure as coming
1821         from sources and force its analysis.
1823 2017-01-12  Ed Schonberg  <schonberg@adacore.com>
1825         * sem_ch3.adb (Build_Derived_Type): For a scalar derived type,
1826         inherit predicates if any from the first_subtype of the parent,
1827         not from the anonymous parent type.
1828         * sem_eval.adb (Is_Static_Subtype): A type that inherits a dynamic
1829         predicate is not a static subtype.
1831 2017-01-12  Gary Dismukes  <dismukes@adacore.com>
1833         * freeze.adb (Check_Suspicious_Convention): New procedure
1834         performing a warning check on discriminated record types with
1835         convention C or C++. Factored out of procedure Freeze_Record_Type,
1836         and changed to only apply to base types (to avoid spurious
1837         warnings on subtypes). Minor improvement of warning messages
1838         to refer to discriminated rather than variant record types.
1839         (Freeze_Record_Type): Remove code for performing a suspicious
1840         convention check.
1841         (Freeze_Entity): Only call Freeze_Record_Type
1842         on types that aren't declared within any enclosing generic units
1843         (rather than just excluding the type when the innermost scope
1844         is generic). Call Check_Suspicious_Convention whether or not
1845         the type is declared within a generic unit.
1846         * sem_ch8.adb (In_Generic_Scope): Move this function to Sem_Util.
1847         * sem_util.ads, sem_util.adb (In_Generic_Scope): New function (moved
1848         from Sem_Ch8).
1850 2017-01-12  Tristan Gingold  <gingold@adacore.com>
1852         * sysdep.c, adaint.c, rtinit.c, ming32.h:
1853         (__gnat_current_codepage): Renamed from CurrentCodePage
1854         (__gnat_current_ccs_encoding): Renamed from CurrentCCSEncoding
1856 2017-01-12  Ed Schonberg  <schonberg@adacore.com>
1858         * sem_ch6.adb (Fully_Conformant_Expressions): Handle properly
1859         quantified expressions, following AI12-050: the loop parameters
1860         of two quantified expressions are conformant if they have the
1861         same identifier.
1863 2017-01-12  Arnaud Charlet  <charlet@adacore.com>
1865         * gcc-interface/Makefile.in: Clean up VxWorks targets.
1867 2017-01-12  Ed Schonberg  <schonberg@adacore.com>
1869         * sem_attr.adb (Analyze_Attribute_Reference, case Loop_Entry):
1870         Hnadle properly the attribute reference when it appears as part
1871         of an expression in another loop aspect.
1873 2017-01-12  Ed Schonberg  <schonberg@adacore.com>
1875         * exp_ch3.adb (Check_Predicated_Discriminant): New procedure,
1876         subsidiary of Build_Initialization_Call, to complete generation
1877         of predicate checks on discriminants whose (sub)types have
1878         predicates, and to add checks on variants that do not have an
1879         others clause.
1880         * sem_util.adb (Gather_Components): A missing Others alternative is
1881         not an error when the type of the discriminant is a static predicate
1882         (and coverage has been checked when analyzing the case statement). A
1883         runtime check is generated to verify that a given discriminant
1884         satisfies the predicate (RM 3.8.1. (21.1/2)).
1886 2017-01-12  Yannick Moy  <moy@adacore.com>
1888         * gnat1drv.adb (Adjust_Global_Switches): Only
1889         perform checking of exception mechanism when generating code.
1891 2017-01-12  Justin Squirek  <squirek@adacore.com>
1893         * exp_ch7.adb (Add_Type_Invariants, Process_Array_Component):
1894         Remove handling of access component with invariant.
1895         (Build_Invariant_Procedure_Declaration): Remove return on class
1896         wide type.
1897         * freeze.adb (Freeze_Array_Type, Freeze_Record_Type): Remove
1898         conditional exception for component or array so Has_Own_Invariants
1899         flag is not falsly set.
1900         * sem_ch3.adb (Make_Class_Wide_Type): Initialize copy of class
1901         wide type to have no invariant flags.
1903 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
1905         * exp_ch9.adb, sem_prag.adb, s-tassta.adb, sem_util.adb, s-tarest.adb,
1906         sem_ch13.adb: Minor reformatting.
1908 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
1910         * exp_aggr.adb (Build_Record_Aggr_Code): Guard against a missing
1911         adjustment primitive when the ancestor type was not properly frozen.
1912         (Gen_Assign): Guard against a missing initialization
1913         primitive when the component type was not properly frozen.
1914         (Initialize_Array_Component): Guard against a missing adjustment
1915         primitive when the component type was not properly frozen.
1916         (Initialize_Record_Component): Guard against a missing adjustment
1917         primitive when the component type was not properly frozen.
1918         (Process_Transient_Component_Completion): The transient object may
1919         not be finalized when its associated type was not properly frozen.
1920         * exp_ch3.adb (Build_Assignment): Guard against a missing
1921         adjustment primitive when the component type was not properly frozen.
1922         (Build_Initialization_Call): Guard against a missing
1923         initialization primitive when the associated type was not properly
1924         frozen.
1925         (Expand_N_Object_Declaration): Guard against a missing
1926         adjustment primitive when the base type was not properly frozen.
1927         (Predefined_Primitive_Bodies): Create an empty Deep_Adjust
1928         body when there is no adjustment primitive available. Create an
1929         empty Deep_Finalize body when there is no finalization primitive
1930         available.
1931         * exp_ch4.adb (Apply_Accessibility_Check): Guard against a
1932         missing finalization primitive when the designated type was
1933         not properly frozen.
1934         (Expand_N_Allocator): Guard against a missing initialization primitive
1935         when the designated type was not properly frozen.
1936         * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add the adjustment call
1937         only when the corresponding adjustment primitive is available.
1938         * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Generate the
1939         adjustment/finalization statements only when there is an available
1940         primitive to carry out the action.
1941         (Build_Initialize_Statements): Generate the initialization/finalization
1942         statements only when there is an available primitive to carry out the
1943         action.
1944         (Make_Adjust_Call): Do not generate a call when the underlying
1945         type is not present due to a possible missing full view.
1946         (Make_Final_Call): Do not generate a call when the underlying
1947         type is not present due to a possible missing full view.
1948         (Make_Finalize_Address_Stmts): Generate an empty body when the
1949         designated type lacks a finalization primitive.
1950         (Make_Init_Call): Do not generate a call when the underlying type is
1951         not present due to a possible missing full view.
1952         (Process_Component_For_Adjust): Add the adjustment call only when the
1953         corresponding adjustment primitive is available.
1954         (Process_Component_For_Finalize): Add the finalization call only when
1955         the corresponding finalization primitive is available.
1956         (Process_Object_Declaration): Use a null statement to emulate a
1957         missing call to the finalization primitive of the object type.
1958         * exp_ch7.ads (Make_Adjust_Call): Update the comment on usage.
1959         (Make_Final_Call): Update the comment on usage.
1960         (Make_Init_Call): Update the comment on usage.
1961         * exp_util.adb (Build_Transient_Object_Statements): Code reformatting.
1963 2017-01-12  Arnaud Charlet  <charlet@adacore.com>
1965         * einfo.ads: Update documentation of Address_Taken.
1966         * sem_attr.adb (Analyze_Access_Attribute, Resolve_Attribute
1967         [Access_Attribute]): Only consider 'Access/'Unchecked_Access
1968         for subprograms when setting Address_Taken flag.
1970 2017-01-12  Patrick Bernardi  <bernardi@adacore.com>
1972         * sem_ch10.adb (Analyze_With_Clause): Removed code that turned
1973         Configurable_Run_Time_Mode off when analysing with'ed predefined
1974         libraries.
1976 2017-01-12  Gary Dismukes  <dismukes@adacore.com>
1978         * sem_prag.adb: Minor reformatting.
1979         * sem_util.adb (Unique_Entity): fix result for
1980         bodies of entry families.
1982 2017-01-12  Justin Squirek  <squirek@adacore.com>
1984         * sem_prag.adb (Analyze_Pragma): Add appropriate calls to
1985         Resolve_Suppressible in the pragma Assertion_Policy case.
1986         (Resolve_Suppressible): Created this function to factor out
1987         common code used to resolve Suppress to either Ignore or Check
1988         * snames.ads-tmpl: Add name for Suppressible.
1990 2017-01-12  Gary Dismukes  <dismukes@adacore.com>
1992         * exp_ch9.adb, s-secsta.adb, snames.ads-tmpl, exp_ch3.adb: Minor
1993         reformatting.
1994         * debug.adb: Minor comment fixes.
1996 2017-01-12  Arnaud Charlet  <charlet@adacore.com>
1998         * sem_util.adb (Unique_Entity): For concurrent
1999         bodies that are defined with stubs and complete a declaration
2000         of a single concurrent object return the entity of an implicit
2001         concurrent type, not the entity of the anonymous concurrent
2002         object.
2003         * debug.adb: -gnatd.J is no longer used.
2004         * make.adb (Globalize): Removed, no longer used.
2005         * sem_ch9.adb: minor typo in comment for entry index
2007 2017-01-12  Patrick Bernardi  <bernardi@adacore.com>
2009         * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
2010         * exp_ch3.adb (Build_Init_Statements): As part of initialising
2011         the value record of a task, set its _Secondary_Stack_Size field
2012         if present.
2013         * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
2014         a _Secondary_Stack_Size field in the value record of
2015         the task if a Secondary_Stack_Size rep item is present.
2016         (Make_Task_Create_Call): Include secondary stack size
2017         parameter. If No_Secondary_Stack restriction is in place, passes
2018         stack size of 0.
2019         * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
2020         Secondary_Stack_Size.
2021         * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
2022         function to define the overhead of the secondary stack.
2023         * s-tarest.adb (Create_Restricted_Task,
2024         Create_Restricted_Task_Sequential): Functions now include
2025         Secondary_Stack_Size parameter to pass to Initialize_ATCB.
2026         * s-tarest.adb (Create_Restricted_Task,
2027         Create_Restricted_Task_Sequential): Calls to Initialize_ATCB now
2028         include Secondary_Stack_Size parameter.
2029         (Task_Wrapper): Secondary stack now allocated to the size specified by
2030         the Secondary_Stack_Size parameter in the task's ATCB.
2031         * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialize_ATCB): New
2032         Secondary_Stack_Size component.
2033         * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
2034         Create_Restricted_Task_Sequential): Function now include
2035         Secondary_Stack_Size parameter.
2036         (Task_Wrapper): Secondary stack now allocated to the size
2037         specified by the Secondary_Stack_Size parameter in the task's
2038         ATCB.
2039         * s-tproft.adb (Register_Foreign_Thread): Amended Initialize_ATCB call
2040         to include Secondary_Stack_Size parameter.
2041         * sem_ch13.adb (Analyze_Aspect_Specification): Add support for
2042         Secondary_Stack_Size aspect, turning the aspect into its corresponding
2043         internal attribute.
2044         (Analyze_Attribute_Definition): Process Secondary_Stack_Size attribute.
2045         * snames.adb-tmpl, snames.ads-tmpl: Added names
2046         Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
2047         Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
2049 2017-01-12  Yannick Moy  <moy@adacore.com>
2051         * exp_spark.adb (Expand_SPARK_Potential_Renaming): Fix sloc of copied
2052         subtree.
2054 2017-01-12  Justin Squirek  <squirek@adacore.com>
2056         * exp_attr.adb (Expand_N_Attribute_Reference):
2057         Fix Finalization_Size case by properly resolving the type after
2058         rewritting the node.
2060 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
2062         * exp_util.adb (Build_DIC_Procedure_Body): Semi-insert the body into
2063         the tree.
2064         (Build_DIC_Procedure_Declaration): Semi-insert the body into the tree.
2065         * binde.adb, exp_ch5.adb, sem_type.adb, sem.ads, sem_res.adb,
2066         exp_sel.ads: Minor reformatting.
2068 2017-01-12  Justin Squirek  <squirek@adacore.com>
2070         * exp_ch6.adb (Expand_Call): Add guard to prevent
2071         invariant checks from being created for internally generated
2072         subprograms.
2074 2017-01-12  Bob Duff  <duff@adacore.com>
2076         * lib-writ.ads: Remove incorrect comment.
2078 2017-01-12  Javier Miranda  <miranda@adacore.com>
2080         * debug.adb (-gnatd.K): Enable generation of contract-only
2081         procedures in CodePeer mode.
2082         * contracts.adb (Build_And_Analyze_Contract_Only_Subprograms):
2083         New subprogram.
2084         (Analyze_Contracts): Generate contract-only procedures if -gnatdK is
2085         set.
2086         * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): New
2087         subprogram.
2088         (Get_Contract_Only_Missing_Body_Name): New subprogram.
2089         (Get_Contract_Only_Body): New subprogram.
2090         (Set_Contract_Only_Body): New subprogram.
2091         (Is_Contract_Only_Body): New subprogram.
2092         (Set_Is_Contract_Only_Body): New subprogram.
2093         (SCIL_Nodes): Replace table by hash-table.
2095 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
2097         * exp_ch6.adb: Minor reformatting.
2098         * spark_xrefs.ads: minor cleanup of comments for SPARK xrefs
2100 2017-01-12  Bob Duff  <duff@adacore.com>
2102         * binde.adb (Forced): New reason for a dependence.
2103         (Force_Elab_Order): Implementation of the new switch.
2104         * binde.ads: Minor comment fixes.
2105         * bindusg.adb: Add -f switch. Apparently, there was an -f switch
2106         long ago that is no longer supported; removed comment about that.
2107         * opt.ads (Force_Elab_Order_File): Name of file specified for
2108         -f switch.
2109         * switch-b.adb: Parse -f switch.
2111 2017-01-12  Justin Squirek  <squirek@adacore.com>
2113         * exp_ch6.adb (Check_View_Conversion): Created this function
2114         to properly chain calls to check type invariants that may be
2115         present in a subprogram call after the subprogram.
2116         (Expand_Call): Add a conditional to identify when a view conversion
2117         needs to be checked.
2118         * nlists.adb, nlists.ads (Prepend_New): New routine.
2119         (Prepend_New_To): New routine.
2121 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
2123         * sinfo.ads: Minor reformatting.
2125 2017-01-12  Gary Dismukes  <dismukes@adacore.com>
2127         * exp_util.adb, exp_util.ads, einfo.ads: Minor typo fixes and
2128         reformatting.
2130 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
2132         * exp_ch6.adb (Make_Build_In_Place_Call_In_Anonymous_Context): Add new
2133         variable Definite. Create a local object and pass its 'Access to the
2134         BIP function when the result type is either definite or it does not
2135         require any finalization or secondary stack management.
2137 2017-01-12  Bob Duff  <duff@adacore.com>
2139         * contracts.adb, einfo.adb, errout.adb, exp_attr.adb,
2140         exp_ch3.adb, exp_ch7.adb, exp_ch9.adb, exp_prag.adb, freeze.adb,
2141         frontend.adb, ghost.adb, inline.adb, lib-writ.adb, lib-xref.adb,
2142         par.adb, par-ch10.adb, par-ch2.adb, par-prag.adb, par_sco.adb,
2143         sem_attr.adb, sem_aux.adb, sem_ch10.adb, sem_ch12.adb,
2144         sem_ch13.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
2145         sem_prag.adb, sem_res.adb, sem_util.adb, sem_util.ads,
2146         sem_warn.adb, sinfo.adb, sinfo.ads, sprint.adb (Pragma_Name):
2147         Change name to Pragma_Name_Unmapped.
2148         (Pragma_Name_Mapped): Change name to Pragma_Name.
2149         This is because the "mapped" version should be the usual case.
2151 2017-01-09  Hristian Kirtchev  <kirtchev@adacore.com>
2153         * einfo.ads, einfo.adb: Remove uses of flags Has_Default_Init_Cond,
2154         Is_Default_Init_Cond_Procedure, and
2155         Has_Inherited_Default_Init_Cond.  Add uses of flags
2156         Has_Own_DIC, Is_DIC_Procedure, and Has_Inherited_DIC.
2157         (Default_Init_Cond_Procedure): Removed.
2158         (DIC_Procedure): New routine.
2159         (Has_Default_Init_Cond): Removed.
2160         (Has_DIC): New routine.
2161         (Has_Inheritable_Invariants): The attribute applies to the base type.
2162         (Has_Inherited_Default_Init_Cond): Removed.
2163         (Has_Inherited_DIC): New routine.
2164         (Has_Inherited_Invariants): The attribute applies to the base type.
2165         (Has_Own_DIC): New routine.
2166         (Has_Own_Invariants): The attribute applies to the base type.
2167         (Is_Default_Init_Cond_Procedure): Removed.
2168         (Is_DIC_Procedure): New routine.
2169         (Set_Default_Init_Cond_Procedure): Removed.
2170         (Set_DIC_Procedure): New routine.
2171         (Set_Has_Default_Init_Cond): Removed.
2172         (Set_Has_Inheritable_Invariants): The attribute applies
2173         to the base type.
2174         (Set_Has_Inherited_Default_Init_Cond): Removed.
2175         (Set_Has_Inherited_DIC): New routine.
2176         (Set_Has_Inherited_Invariants): The attribute applies to the base type.
2177         (Set_Has_Own_DIC): New routine.
2178         (Set_Has_Own_Invariants): The attribute applies to the base type.
2179         (Set_Is_Default_Init_Cond_Procedure): Removed.
2180         (Set_Is_DIC_Procedure): New routine.
2181         (Write_Entity_Flags): Update the output of all flags related to
2182         default initial condition.
2183         * exp_ch3.adb (Expand_N_Object_Declaration): Update the generation
2184         of the call to the DIC procedure.
2185         (Freeze_Type): Generate the body of the DIC procedure.
2186         * exp_ch7.adb (Build_Invariant_Procedure_Body): Replace
2187         all occurrences of Create_Append with Append_New_To. Do
2188         not generate an invariant procedure for a class-wide type.
2189         The generated body acts as a freeze action of the working type.
2190         (Build_Invariant_Procedure_Declaration): Do not generate an
2191         invariant procedure for a class-wide type.
2192         (Create_Append): Removed.
2193         * exp_util.adb: Add with and use clauses for Sem_Ch3, sem_ch6,
2194         sem_Ch12, Sem_Disp, and GNAT.HTable. Move the handling of
2195         class-wide pre/postcondition description and data structures from
2196         Sem_Prag.
2197         (Build_Class_Wide_Expression): Moved from Sem_Prag.
2198         (Build_DIC_Call): New routine.
2199         (Build_DIC_Procedure_Body): New routine.
2200         (Build_DIC_Procedure_Declaration): New routine.
2201         (Entity_Hash): Moved from Sem_Prag.
2202         (Find_DIC_Type): New routine.
2203         (Update_Primitives_Mapping): Reimplemented.
2204         (Update_Primitives_Mapping_Of_Types): New routine.
2205         * exp_util.ads (Build_Class_Wide_Expression): Moved from Sem_Prag.
2206         (Build_DIC_Call): New routine.
2207         (Build_DIC_Procedure_Body): New routine.
2208         (Build_DIC_Procedure_Declaration): New routine.
2209         (Update_Primitives_Mapping): Moved from Sem_Prag.
2210         (Update_Primitives_Mapping_Of_Types): New routine.
2211         * nlists.adb (Append_New): New routine.
2212         (Append_New_To): New routine.
2213         * nlists.ads (Append_New): New routine.
2214         (Append_New_To): New routine.
2215         * sem_ch3.adb (Analyze_Declarations): Do not generate the bodies
2216         of DIC procedures here. This is now done at the end of the
2217         visible declarations, private declarations, and at the freeze
2218         point of a type.
2219         (Analyze_Private_Extension_Declaration):
2220         A private extension inherits the DIC pragma of a parent type.
2221         (Analyze_Subtype_Declaration): No need to propagate invariant
2222         attributes to a subtype as those apply to the base type.
2223         (Build_Derived_Record_Type): No need to inherit invariants here
2224         as this is now done in Build_Derived_Type.
2225         (Build_Derived_Type): Inherit both the DIC pragma and invariants from
2226         a parent type.
2227         (Process_Full_View): Update the propagation of DIC attributes.
2228         (Propagate_Default_Init_Cond_Attributes): Removed.
2229         * sem_ch7.adb Add with and use clauses for Exp_Util.
2230         (Analyze_Package_Specification): Create the body of the DIC
2231         procedure at the end of the visible and private declarations.
2232         (Preserve_Full_Attributes): Propagate DIC attributes.
2233         * sem_ch9.adb (Analyze_Protected_Type_Declaration): Propagate
2234         DIC attributes.
2235         (Analyze_Task_Type_Declaration): Propagate DIC attributes.
2236         * sem_elab.adb (Check_A_Call): Update the call to
2237         Is_Nontrivial_Default_Init_Cond_Procedure.
2238         * sem_prag.adb Remove the with and use clauses for
2239         GNAT.HTable. Move the handling of class- wide pre/postcondition
2240         description and data structures to Exp_Util.
2241         (Analyze_Pragma): Create the declaration of the DIC procedure. There
2242         is no need to propagate invariant-related attributes at this point
2243         as this is done in Build_Invariant_Procedure_Declaration.
2244         (Build_Class_Wide_Expression): Moved to Exp_Util.
2245         (Entity_Hash): Moved to Exp_Util.
2246         (Update_Primitives_Mapping): Moved to Exp_Util.
2247         * sem_prag.ads (Build_Class_Wide_Expression): Moved to Exp_Util.
2248         (Update_Primitives_Mapping): Moved to Exp_Util.
2249         * sem_util.adb: Remove with and use clauses for Ghost
2250         and Sem_Ch13.
2251         (Build_Default_Init_Cond_Call): Removed.
2252         (Build_Default_Init_Cond_Procedure_Bodies): Removed.
2253         (Build_Default_Init_Cond_Procedure_Declaration): Removed.
2254         (Get_Views): Reimplemented.
2255         (Has_Full_Default_Initialization): Reimplement the section on DIC.
2256         (Inherit_Default_Init_Cond_Procedure): Removed.
2257         (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
2258         (Is_Nontrivial_DIC_Procedure): New routine.
2259         (Is_Verifiable_DIC_Pragma): New routine.
2260         (Propagate_DIC_Attributes): New routine.
2261         * sem_util.ads (Build_Default_Init_Cond_Call): Removed.
2262         (Build_Default_Init_Cond_Procedure_Bodies): Removed.
2263         (Build_Default_Init_Cond_Procedure_Declaration): Removed.
2264         (Inherit_Default_Init_Cond_Procedure): Removed.
2265         (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
2266         (Is_Nontrivial_DIC_Procedure): New routine.
2267         (Is_Verifiable_DIC_Pragma): New routine.
2268         (Propagate_DIC_Attributes): New routine.
2269         * sem_warn.adb (Is_OK_Fully_Initialized): Reimplement the section
2270         on DIC.
2271         * sinfo.ads, sinfo.adb: Add new attribute Expression_Copy along with
2272         usage in nodes.
2273         (Expression_Copy): New routine along with pragma Inline.
2274         (Set_Expression_Copy): New routine along with pragma Inline.
2276 2017-01-06  Bob Duff  <duff@adacore.com>
2278         * bindgen.adb (Gen_Adainit, Gen_Adafinal): Change
2279         "Bind_Main_Program" to "not Bind_For_Library", because otherwise
2280         we won't generate the call to s_stalib_adafinal when the main
2281         is not written in Ada.
2283 2017-01-06  Bob Duff  <duff@adacore.com>
2285         * sem_prag.adb: Minor: remove pragma Warnings.
2287 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2289         * Makefile.rtl: Do not compile s-stchop by default.
2291 2017-01-06  Patrick Bernardi  <bernardi@adacore.com>
2293         * aspects.adb, aspects.ads, exp_ch3.adb, exp_ch9.adb, par-prag.adb,
2294         sem_ch13.adb, sem_prag.adb, sem_prag.ads, snames.adb-tmpl,
2295         snames.ads-tmpl, s-secsta.adb, s-secsta.ads, s-tarest.adb,
2296         s-tarest.ads, s-taskin.adb, s-taskin.ads, s-tassta.adb, s-tassta.ads:
2297         Reverted previous change for now.
2299 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2301         * exp_ch3.adb (Build_Initialization_Call): Apply predicate
2302         check to default discriminant value if checks are enabled.
2303         (Build_Assignment): If type of component has static predicate,
2304         apply check to its default value, if any.
2306 2017-01-06  Patrick Bernardi  <bernardi@adacore.com>
2308         * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
2309         * exp_ch3.adb (Build_Init_Statements): As part of initialising
2310         the value record of a task, set its _Secondary_Stack_Size field
2311         if present.
2312         * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
2313         a _Secondary_Stack_Size field in the value record of
2314         the task if a Secondary_Stack_Size rep item is present.
2315         (Make_Task_Create_Call): Include secondary stack size
2316         parameter. If No_Secondary_Stack restriction is in place, passes
2317         stack size of 0.
2318         * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
2319         Secondary_Stack_Size.
2320         * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
2321         function to define the overhead of the secondary stack.
2322         * s-tarest.adb (Create_Restricted_Task,
2323         Create_Restricted_Task_Sequential): Functions now include
2324         Secondary_Stack_Size parameter to pass to Initialize_ATCB.
2325         * s-tarest.adb (Create_Restricted_Task,
2326         Create_Restricted_Task_Sequential): Calls to Initialize_ATCB
2327         now include Secondary_Stack_Size parameter.
2328         (Task_Wrapper):
2329         Secondary stack now allocated to the size specified by the
2330         Secondary_Stack_Size parameter in the task's ATCB.
2331         * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialise_ATCB): New
2332         Secondary_Stack_Size component.
2333         * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
2334         Create_Restricted_Task_Sequential): Function now include
2335         Secondary_Stack_Size parameter.
2336         (Task_Wrapper): Secondary stack
2337         now allocated to the size specified by the Secondary_Stack_Size
2338         parameter in the task's ATCB.
2339         * sem_ch13.adb (Analyze_Aspect_Specification): Add support
2340         for Secondary_Stack_Size aspect, turning the aspect into its
2341         corresponding internal attribute.
2342         (Analyze_Attribute_Definition):
2343         Process Secondary_Stack_Size attribute.
2344         * snames.adb-tmpl, snames.ads-tmpl: Added names
2345         Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
2346         Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
2348 2017-01-06  Pascal Obry  <obry@adacore.com>
2350         * a-direio.adb, a-direio.ads, a-sequio.adb, a-sequio.ads: Add Flush to
2351         Sequential_IO and Direct_IO.
2353 2017-01-06  Bob Duff  <duff@adacore.com>
2355         * snames.ads-tmpl (Renamed): New name for the pragma argument.
2356         * par-ch2.adb: Allow the new pragma (with analysis deferred
2357         to Sem_Prag).
2358         * sinfo.ads, sinfo.adb (Map_Pragma_Name, Pragma_Name_Mapped):
2359         Keep a mapping from new pragma names to old names.
2360         * sem_prag.adb: Check legality of pragma Rename_Pragma, and
2361         implement it by calling Map_Pragma_Name.
2362         * checks.adb, contracts.adb, einfo.adb, errout.adb,
2363         * exp_attr.adb, exp_ch3.adb, exp_ch6.adb, exp_ch7.adb, exp_ch9.adb,
2364         * exp_prag.adb, exp_util.adb, freeze.adb, frontend.adb, ghost.adb,
2365         * inline.adb, lib-writ.adb, scans.adb, scans.ads, sem_attr.adb,
2366         * sem_aux.adb, sem_ch10.adb, sem_ch13.adb, sem_ch6.adb, sem_ch9.adb,
2367         * sem_elab.adb, sem_res.adb, sem_util.adb, sem_util.ads,
2368         * sem_warn.adb: Call Pragma_Name_Mapped instead of Pragma_Name
2369         as appropriate.
2371 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
2373         * exp_ch9.adb: Minor reformatting.
2375 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2377         * exp_ch9.ads, exp_ch9.adb (Build_Entry_Names): Remove (unused).
2378         * rtsfind.ads (RE_Task_Entry_Names_Array, RO_ST_Set_Entry_Names)
2379         (RE_Protected_Entry_Names_Array, RO_PE_Set_Entry_Names): Remove
2380         (unused).
2381         * s-taskin.ads, s-taskin.adb (Set_Entry_Names,
2382         Task_Entry_Names_Array, Task_Entry_Names_Access): Remove.
2383         * s-tpoben.ads, s-tpoben.adb (Set_Entry_Names,
2384         Protected_Entry_Names_Array, Protected_Entry_Names_Access): Remove.
2386 2017-01-06  Bob Duff  <duff@adacore.com>
2388         * sinfo.ads, sinfo.adb (Map_Pragma_Name): Preparation work,
2389         dummy implementation of Map_Pragma_Name.
2391 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2393         * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Make the
2394         entry_body variable constant.
2395         * s-taprob.ads (Entry_Body_Access): Move to s-tposen.
2396         * s-tpoben.ads (Protected_Entry_Body_Access): Now access
2397         to constant.
2398         * s-tposen.ads (Entry_Body_Access): Moved from s-taprob,
2399         now access to constant.
2401 2017-01-06  Gary Dismukes  <dismukes@adacore.com>
2403         * einfo.ads, sem_res.adb, sem_attr.adb, sem_ch6.adb: Minor
2404         reformatting and typo fixes.
2406 2017-01-06  Bob Duff  <duff@adacore.com>
2408         * snames.ads-tmpl: New names for pragma renaming.
2409         * snames.adb-tmpl (Is_Configuration_Pragma_Name): Minor cleanup.
2410         * par-prag.adb: Add new pragma name to case statement.
2411         * sem_prag.adb (Rename_Pragma): Initial cut at semantic analysis
2412         of the pragma.
2413         * sinfo.ads, sinfo.adb (Pragma_Name_Mapped): Preparation work,
2414         Dummy implementation of Pragma_Name_Mapped.
2416 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2418         * exp_ch6.adb (Expand_Protected_Subprogram_Call): Add guard to
2419         better detect call within an entry_wrapper.
2420         * sem_res.adb (Resolve_Call): A protected call within an
2421         entity_wrapper is analyzed in the context of the protected
2422         object but corresponds to a pre-analysis and is not an access
2423         before elaboration.
2424         * sem_attr.adb: Minor reformatting.
2426 2017-01-06  Justin Squirek  <squirek@adacore.com>
2428         * sem_attr.adb (Analyze_Attribute): Modify semantic checks for
2429         Finalization_Size to allow a prefix of any non-class-wide type.
2430         * sem_attr.ads Modify comment for Finalization_Size to include
2431         definite type use case.
2433 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2435         * einfo.ads, einfo.adb (Is_Entry_Wrapper): New flag, defined
2436         on procedures that are wrappers created for entries that have
2437         preconditions.
2438         * sem_ch6.adb (Analyze_Subrogram_Body_Helper): If the subprogram
2439         body is an entry_wrapper, compile it in the context of the
2440         synchronized type, because a precondition may refer to funtions
2441         of the type.
2442         * exp_ch9.adb (Build_Contract_Wrapper): Set Is_Entry_Wrapper on
2443         body entity.
2444         * exp_ch6.adb (Expand_Protected_Subprogram_Call): if the call is
2445         within an Entry_Wrapper this is an external call whose target
2446         is the synchronized object that is the actual in the call to
2447         the wrapper.
2449 2017-01-06  Yannick Moy  <moy@adacore.com>
2451         * sem_attr.adb (Analyze_Attribute/Attribute_Loop_Entry): Analyze node
2452         in tree, which means not analyzing the previous prefix if the node has
2453         been rewritten into its prefix.
2455 2017-01-06  Gary Dismukes  <dismukes@adacore.com>
2457         * s-tpobop.adb: Minor reformatting.
2459 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2461         * checks.adb (Ensure_Valid): Do not generate a validity check
2462         within a generated predicate function, validity checks will have
2463         been applied earlier when required.
2465 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2467         * s-tpoben.ads (Protection_Entries): Add comment and reorder
2468         components for performances.
2469         * s-tpobop.adb (PO_Do_Or_Queue): Implement Max_Queue_Length runtime
2470         semantic.
2472 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2474         * sem_eval.adb (Check_Expression_Against_Static_Predicate):
2475         If expression is compile-time known and obeys a static predicate
2476         it must be labelled as static, to prevent spurious warnings and
2477         run-time errors, e.g. in case statements. This is relevant when
2478         the expression is the result of constant-folding a type conversion
2479         whose expression is a variable with a known static value.
2481 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
2483         * exp_attr.adb, sem_attr.ads: Minor reformatting.
2485 2017-01-06  Justin Squirek  <squirek@adacore.com>
2487         * exp_attr.adb (Expand_N_Attribute_Reference): Add entry for
2488         expansion of Finalization_Size attribute.
2489         * sem_attr.adb (Analyze_Attribute): Add entry to check the
2490         semantics of Finalization_Size.
2491         (Eval_Attribute): Add null entry for Finalization_Size.
2492         * sem_attr.ads: Add Finalization_Size to the implementation
2493         dependent attribute list.
2494         * snames.ads-tmpl: Add name entry for Finalization_Size attribute.
2496 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2498         * sem_ch5.adb (Analyze_Loop_Statement): If the loop includes an
2499         iterator specification with a serious syntactic error, transform
2500         construct into an infinite loop in order to continue analysis
2501         and prevent a compiler abort.
2503 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2505         * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Do not generate
2506         max_queue_lengths_array if unused.
2508 2017-01-06  Bob Duff  <duff@adacore.com>
2510         * errout.adb (Set_Msg_Text): Protect against out-of-bounds
2511         array access, in case "\" is at the end of Text.
2512         * stylesw.adb (Set_Style_Check_Options): Don't include input
2513         characters in the error message template, because they could
2514         be control characters such as "\", which Errout will try to
2515         interpret.
2517 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2519         * sem_ch4.adb (Find_Indexing_Operations, Inspect_Declarations):
2520         For a private type examine the visible declarations that follow
2521         the partial view, not just the private declarations that follow
2522         the full view.
2524 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
2526         * exp_ch5.adb, sem_ch3.adb, checks.adb: Minor reformatting and
2527         code cleanup.
2529 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2531         * exp_ch5.adb (Get_Default_Iterator): For a derived type, the
2532         alias of the inherited op is the parent iterator, no need to
2533         examine dispatch table positions which might not be established
2534         yet if type is not frozen.
2535         * sem_disp.adb (Check_Controlling_Formals): The formal of a
2536         predicate function may be a subtype of a tagged type.
2537         * sem_ch3.adb (Complete_Private_Subtype): Adjust inheritance
2538         of representation items for the completion of a type extension
2539         where a predicate applies to the partial view.
2540         * checks.ads, checks.adb (Apply_Predicate_Check): Add optional
2541         parameter that designates function whose actual receives a
2542         predicate check, to improve warning message when the check will
2543         lead to infinite recursion.
2544         * sem_res.adb (Resolve_Actuals): Pass additional parameter to
2545         Apply_Predicate_Check.
2547 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2549         * s-rident.ads (Profile_Info): Remove No_Entry_Queue from
2550         Gnat_Extended_Ravenscar.
2551         * exp_ch9.adb, s-tpoben.adb, s-tpoben.ads: Fix spelling.
2553 2017-01-06  Gary Dismukes  <dismukes@adacore.com>
2555         * sem_util.ads: Minor typo fix and reformatting.
2557 2017-01-06  Yannick Moy  <moy@adacore.com>
2559         * ghost.adb Minor fixing of references to SPARK RM.
2560         (Check_Ghost_Context): Check whether reference is to a lvalue
2561         before issuing an error about violation of SPARK RM 6.9(13)
2562         when declaration has Ghost policy Check and reference has Ghost
2563         policy Ignore.
2564         * sem_util.adb Minor indentation.
2565         * sem_ch10.adb (Analyze_Package_Body_Stub, Analyze_Protected_Body_Stub,
2566         Analyze_Task_Body_Stub): Set Ekind of the defining identifier.
2567         * sem_util.ads (Unique_Defining_Entity): Document the result
2568         for package body stubs.
2570 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2572         * raise-gcc.c (abort): Macro to call Abort_Propagation.
2573         * s-tpoben.ads (Protected_Entry_Queue_Max_Access): Make it access
2574         constant.
2575         * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
2576         Do not generate the Entry_Max_Queue_Lengths_Array if all default
2577         values.
2578         * exp_util.adb (Corresponding_Runtime_Package): Consider
2579         Max_Queue_Length pragma.
2581 2017-01-06  Justin Squirek  <squirek@adacore.com>
2583         * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
2584         Remove declaration generation in the case of
2585         System_Tasking_Protected_Objects_Single_Entry being used,
2586         and add a warning message when this is detected to occur.
2587         (Make_Initialize_Protection): Remove reference pass in the case
2588         of System_Tasking_Protected_Objects_Single_Entry.
2589         * rtsfind.ads: Remove RE_Protected_Entry_Queue_Max
2590         * s-tposen.adb (Initialize_Protection_Entry): Remove
2591         Entry_Queue_Max parameter.
2592         * s-tposen.ads: Remove the types use to store the entry queue
2593         maximum.
2594         * sem_prag.adb (Analyze_Pragma): Remove entry families restriction
2596 2017-01-06  Yannick Moy  <moy@adacore.com>
2598         * sem_util.adb, sem_util.ads (Get_Enum_Lit_From_Pos): Strengthen
2599         behavior of function, to also accept out of range positions
2600         and raise Constraint_Error in such case, and to copy sloc from
2601         literal if No_Location passed as location.
2602         * uintp.adb, uintp.ads (UI_To_Int, UI_To_CC): Strengthen behavior
2603         of functions to raise Constraint_Error in case of value not in
2604         appropriate range.
2606 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2608         * sem_util.adb, s-taprop-linux.adb (Finalize_TCB): Remove call to
2609         Invalidate_Stack_Cache.
2611 2017-01-06  Eric Botcazou  <ebotcazou@adacore.com>
2613         * s-os_lib.adb: Minor fix to the signature of Readlink.
2615 2017-01-06  Javier Miranda  <miranda@adacore.com>
2617         * sem_ch6.adb (Conforming_Types): Handle another
2618         confusion between views in a nested instance with an actual
2619         private type whose full view is not in scope.
2621 2017-01-06  Arnaud Charlet  <charlet@adacore.com>
2623         * exp_ch5.adb (Expand_N_If_Statement): Obey existing comment and
2624         mark a rewritten if statement as explicit (Comes_From_Source).
2626 2017-01-06  Gary Dismukes  <dismukes@adacore.com>
2628         * sem_prag.adb, rtsfind.adb, sem_util.adb: Minor typo fixes.
2630 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2632         * ada.ads, a-unccon.ads: Add pragma No_Elaboration_Code_All.
2634 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
2636         * sem_case.adb: Minor reformatting.
2638 2017-01-06  Thomas Quinot  <quinot@adacore.com>
2640         * g-socthi-mingw.adb: Remove now extraneous USE TYPE clause
2642 2017-01-06  Justin Squirek  <squirek@adacore.com>
2644         * aspects.adb: Register aspect in Canonical_Aspect.
2645         * aspects.ads: Associate qualities of Aspect_Max_Queue_Length
2646         into respective tables.
2647         * einfo.ads, einfo.adb: Add a new attribute for
2648         handling the parameters for Pragma_Max_Entry_Queue
2649         (Entry_Max_Queue_Lengths_Array) in E_Protected_Type. Subprograms
2650         for accessing and setting were added as well.
2651         * par-prag.adb (Prag): Register Pramga_Max_Entry_Queue.
2652         * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Emit
2653         declaration for pramga arguments and store them in the protected
2654         type node.
2655         (Make_Initialize_Protection): Pass a reference to
2656         the Entry_Max_Queue_Lengths_Array in the protected type node to
2657         the runtime.
2658         * rtsfind.adb: Minor grammar fix.
2659         * rtsfind.ads: Register new types taken from the
2660         runtime libraries RE_Protected_Entry_Queue_Max and
2661         RE_Protected_Entry_Queue_Max_Array
2662         * s-tposen.adb, s-tpoben.adb
2663         (Initialize_Protection_Entry/Initialize_Protection_Entries):
2664         Add extra parameter and add assignment to local object.
2665         * s-tposen.ads, s-tpoben.ads: Add new types to
2666         store entry queue maximums and a field to the entry object record.
2667         * sem_ch13.adb (Analyze_Aspect_Specifications): Add case statement
2668         for Aspect_Max_Queue_Length.
2669         (Check_Aspect_At_Freeze_Point):
2670         Add aspect to list of aspects that don't require delayed analysis.
2671         * sem_prag.adb (Analyze_Pragma): Add case statement for
2672         Pragma_Max_Queue_Length, check semantics, and register arugments
2673         in the respective entry nodes.
2674         * sem_util.adb, sem_util.ads Add functions Get_Max_Queue_Length
2675         and Has_Max_Queue_Length
2676         * snames.ads-tmpl: Add constant for the new aspect-name
2677         Name_Max_Queue_Length and corrasponding pragma.
2679 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
2681         * exp_util.adb (Is_Controlled_Function_Call):
2682         Reimplemented. Consider any node which has an entity as the
2683         function call may appear in various ways.
2685 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
2687         * exp_attr.adb (Rewrite_Stream_Proc_Call): Use
2688         an unchecked type conversion when performing a view conversion
2689         to/from a private type. In all other cases use a regular type
2690         conversion to ensure that any relevant checks are properly
2691         installed.
2693 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
2695         * sem_prag.adb, sem_ch8.adb: Minor reformatting.
2697 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
2699         * sem_case.adb (Explain_Non_Static_Bound): Suppress cascaded
2700         error on case expression that is an entity, when coverage is
2701         incomplete and entity has a static value obtained by local
2702         propagation.
2703         (Handle_Static_Predicate): New procedure, subsidiary of
2704         Check_Choices, to handle case alternatives that are either
2705         subtype names or subtype indications involving subtypes that
2706         have static predicates.
2708 2017-01-06  Thomas Quinot  <quinot@adacore.com>
2710         * s-oscons-tmplt.c, g-socket.adb, g-socket.ads, g-sothco.ads:
2711         (GNAT.Socket): Add support for Busy_Polling and Generic_Option
2713 2017-01-06  Bob Duff  <duff@adacore.com>
2715         * sem_elab.adb (Activate_Elaborate_All_Desirable): Don't add
2716         Elaborate_All(P) to P itself. That could happen in obscure cases,
2717         and always introduced a cycle (P body must be elaborated before
2718         P body).
2719         * lib-writ.ads: Comment clarification.
2720         * ali-util.ads: Minor comment fix.
2721         * ali.adb: Minor reformatting.
2723 2017-01-06  Tristan Gingold  <gingold@adacore.com>
2725         * a-exexpr-gcc.adb: Improve comment.
2727 2017-01-03  James Cowgill  <James.Cowgill@imgtec.com>
2729         * s-linux-mips.ads: Use correct signal and errno constants.
2730         (sa_handler_pos, sa_mask_pos): Fix offsets for 64-bit MIPS.
2732 2017-01-03  James Cowgill  <James.Cowgill@imgtec.com>
2734         * s-linux-mips.ads: Rename from s-linux-mipsel.ads.
2735         * gcc-interface/Makefile.in (MIPS/Linux): Merge mips and mipsel
2736         sections.
2738 2017-01-01  Eric Botcazou  <ebotcazou@adacore.com>
2740         * gnatvsn.ads: Bump copyright year.
2742 2017-01-01  Jakub Jelinek  <jakub@redhat.com>
2744         * gnat_ugn.texi: Bump @copying's copyright year.
2745         * gnat_rm.texi: Likewise.
2747 Copyright (C) 2017 Free Software Foundation, Inc.
2749 Copying and distribution of this file, with or without modification,
2750 are permitted in any medium without royalty provided the copyright
2751 notice and this notice are preserved.