PR ada/81070
[official-gcc.git] / gcc / ada / ChangeLog
blob07ddbe830deb50ae91f50d21c4a5b8b76ba1d079
1 2017-06-12  Eric Botcazou  <ebotcazou@adacore.com>
3         PR ada/81070
4         * s-interr-hwint.adb: Reinstate.
5         * gcc-interface/Makefile.in (RTEMS): Use it again.
7 2017-06-08  Olivier Hainque  <hainque@adacore.com>
9         * vx_crtbegin_auto.c: Update year in copyright notice.
10         * vx_crtbegin.c: Likewise.
11         * vx_crtbegin.inc: Likewise. 
12         * vx_crtend.c:  Likewise.
14 2017-06-07  Sebastian Huber  <sebastian.huber@embedded-brains.de>
16         * Makefile.in (rtems): Use TLS implementation for s-tpopsp.adb.
17         * s-tpopsp-rtems.adb: Delete.
19 2017-06-02  Olivier Hainque  <hainque@adacore.com>
21         * vx_crtbegin_auto.c: New file.
22         * vx_crtbegin.c: New file.
23         * vx_crtbegin.inc: New file.
24         * vx_crtend.c: New file.
26 2017-05-25  Jonathan Wakely  <jwakely@redhat.com>
28         * gcc-interface/utils2.c (compare_elmt_bitpos): Remove redundant
29         const qualifiers that cause -Wignored-qualifiers warnings.
31 2017-05-22  Eric Botcazou  <ebotcazou@adacore.com>
33         * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
34         for Itypes that are E_Access_Subtype.
35         <E_Access_Subtype>: Use the DECL of the base type directly.
37 2017-05-22  Ed Schonberg  <schonberg@adacore.com>
38             Eric Botcazou  <ebotcazou@adacore.com>
40         * sem_ch4.adb (Analyze_Call): In Ada2012 an incomplete type from a
41         limited view may appear in the profile of a function, and a call to
42         that function in another unit in which the full view is available must
43         use this full view to spurious type errors at the point of call.
44         * inline.adb (Analyze_Inlined_Bodies): Remove restriction on loading
45         of parent body with a with clause for the main unit.
46         * gcc-interface/decl.c (defer_limited_with_list): Document new usage.
47         (gnat_to_gnu_entity) <E_Access_Type>: Handle completed Taft Amendment
48         types declared in external units like types from limited with clauses.
49         Adjust final processing of defer_limited_with_list accordingly.
50         * gcc-interface/trans.c (gnat_to_gnu) < N_Selected_Component>: Try
51         again to translate the prefix after the field if it is incomplete.
53 2017-05-22  Eric Botcazou  <ebotcazou@adacore.com>
55         * gcc-interface/decl.c (gnat_to_gnu_field): Do not enforce strict
56         alignment for simple volatile fields and remove associated errors.
58 2017-05-15  Eric Botcazou  <ebotcazou@adacore.com>
60         * gcc-interface/gigi.h (get_elaboration_procedure): Delete.
61         * gcc-interface/trans.c (get_elaboration_procedure): Make static.
63 2017-05-15  Pierre-Marie de Rodat  <derodat@adacore.com>
65         * gcc-interface/utils.c (can_materialize_object_renaming_p):
66         Synchronize with GNAT's Exp_Dbug.Debug_Renaming_Declaration:
67         process Original_Node instead of expanded names.
69 2017-05-15  Eric Botcazou  <ebotcazou@adacore.com>
71         * gcc-interface/trans.c (return_value_ok_for_nrv_p): Only apply the
72         addressability check in the constrained case.
74 2017-05-15  Eric Botcazou  <ebotcazou@adacore.com>
76         * gcc-interface/trans.c (Identifier_to_gnu): Also accept incomplete
77         types not coming from a limited context.
79 2017-05-15  Eric Botcazou  <ebotcazou@adacore.com>
81         * gcc-interface/trans.c (Compilation_Unit_to_gnu): Skip subprograms on
82         the inlined list that are not public.
83         * gcc-interface/utils.c (create_subprog_decl): Clear TREE_PUBLIC if
84         there is a pragma Inline_Always on the subprogram.
86 2017-05-15  Eric Botcazou  <ebotcazou@adacore.com>
88         * gcc-interface/trans.c (gnat_to_gnu) <N_Aggregate>: Fix formatting.
89         <N_Allocator>: Use properly typed constants.
90         (extract_values): Move around.
91         (pos_to_constructor): Minor tweaks.
92         (Sloc_to_locus): Fix formatting.
93         * gcc-interface/utils.c (process_deferred_decl_context): Minor tweaks.
94         * gcc-interface/gigi.h (MARK_VISITED): Remove blank line.
95         (Gigi_Equivalent_Type): Adjust head comment.
96         * gcc-interface/decl.c (Gigi_Equivalent_Type): Likewise.
98 2017-05-15  Eric Botcazou  <ebotcazou@adacore.com>
100         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: When there
101         is a representation clause on an extension, propagate the alignment of
102         the parent type only if the platform requires strict alignment.
104 2017-05-12  Eric Botcazou  <ebotcazou@adacore.com>
106         * system-linux-arm.ads (Memory_Size): Use Long_Integer'Size
107         instead of Word_Size.
109         Revert
110         2017-03-28  Andreas Schwab  <schwab@suse.de>
112         PR ada/80117
113         * system-linux-aarch64-ilp32.ads: New file.
114         * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
115         from LIBGNAT_TARGET_PAIRS.
116         (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
117         (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
118         LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
119         or -mabi=ilp32, resp.
121 2017-05-10  H.J. Lu  <hongjiu.lu@intel.com>
123         PR ada/80626
124         * system-linux-x86.ads (Memory_Size): Use Long_Integer'Size
125         instead of Word_Size.
127 2017-05-10  Bernd Edlinger  <bernd.edlinger@hotmail.de>
129         * raise-gcc.c (exception_class_eq): Make ec parameter const.
131 2017-05-02  Richard Biener  <rguenther@suse.de>
133         * gcc-interface/misc.c (gnat_post_options): Do not set
134         -fstrict-overflow.
136 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
138         * gcc-interface/trans.c (assoc_to_constructor): Make sure
139         Corresponding_Discriminant is only called on discriminants.
140         Skip the saving of the result only for them.
141         (gnat_to_gnu) <N_Selected_Component>: Likewise.
142         <N_Unchecked_Type_Conversion>: Translate the result type first.
143         (gigi): Set TREE_NOTHROW on Begin_Handler.
144         (stmt_list_cannot_raise_p): New predicate.
145         (Exception_Handler_to_gnu_gcc): Emit a simple final call instead of
146         a cleanup if the statements of the handler cannot raise.
147         (process_freeze_entity): Use Is_Record_Type.
148         (process_type): Likewise.
150 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
152         * einfo.ads (Corresponding_Record_Component): New alias
153         for Node21 used for E_Component and E_Discriminant.
154         * einfo.adb (Corresponding_Record_Component): New function.
155         (Set_Corresponding_Record_Component): New procedure.
156         (Write_Field21_Name): Handle Corresponding_Record_Component.
157         * sem_ch3.adb (Inherit_Component): Set
158         Corresponding_Record_Component for every component in
159         the untagged case.  Clear it afterwards for non-girder
160         discriminants.
161         * gcc-interface/decl.c (gnat_to_gnu_entity)
162         <E_Record_Type>: For a derived untagged type with discriminants
163         and constraints, apply the constraints to the layout of the
164         parent type to deduce the layout.
165         (field_is_aliased): Delete.
166         (components_to_record): Test DECL_ALIASED_P directly.
167         (annotate_rep): Check that fields are present except for
168         an extension.
169         (create_field_decl_from): Add DEBUG_INFO_P
170         parameter and pass it in recursive and other calls.  Add guard
171         for the manual CSE on the size.
172         (is_stored_discriminant): New predicate.
173         (copy_and_substitute_in_layout): Consider only
174         stored discriminants and check that original fields are present
175         in the old type.  Deal with derived types.  Adjust call to
176         create_variant_part_from.
178 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
180         * exp_ch6.adb (Expand_Call_Helper): When locating the
181         accessibility entity created for an access parameter, handle
182         properly a reference to a formal of an enclosing subprogram. if
183         the reference appears in an inherited class-wide condition, it
184         is the rewriting of the reference in the ancestor expression,
185         but the accessibility entity must be that of the current formal.
187 2017-05-02  Javier Miranda  <miranda@adacore.com>
189         * exp_ch4.adb (Expand_Non_Binary_Modular_Op): New subprogram.
190         (Expand_N_Op_Add, Expand_N_Op_Divide, Expand_N_Op_Minus,
191         Expand_N_Op_Multiply, Expand_N_Op_Or, Expand_N_Op_Subtract):
192         Call Expand_Non_Binary_Modular_Op.
194 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
196         * sem_ch3.adb (Build_Derived_Private_Type): If the parent type
197         has discriminants, do not override the Stored_Constraint list of
198         the full view of the derived type with that of the derived type.
200 2017-05-02  Bob Duff  <duff@adacore.com>
202         * sem_attr.adb (Attribute_Enum_Rep): Disallow T'Enum_Rep.
204 2017-05-02  Vasiliy Fofanov  <fofanov@adacore.com>
206         * s-os_lib.ads: Minor typo fix.
208 2017-05-02  Vasiliy Fofanov  <fofanov@adacore.com>
210         * gnatls.adb: Merge and refactor code from Prj.Env and remove
211         this deprecated dependency.
213 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
215         * exp_util.ads: minor comment addition.
217 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
219         * sem_ch3.adb (Build_Derived_Record_Type): Fix a few typos and
220         pastos in part #3 of the head comment.
222 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
224         * exp_ch3.adb (Freeze_Type): Do not generate an invariant
225         procedure body for a local (sub)type declaration within a
226         predicate function. Invariant checks do not apply to these, and
227         the expansion of the procedure will happen in the wrong scope,
228         leading to misplaced freeze nodes.
230 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
232         * exp_util.adb (Insert_Library_Level_Action): Use proper scope
233         to analyze generated actions.  If the main unit is a body,
234         the required scope is that of the corresponding unit declaration.
236 2017-05-02  Arnaud Charlet  <charlet@adacore.com>
238         * einfo.adb (Declaration_Node): flip branches of
239         an IF statement to avoid repeated negations in its condition;
240         no change in semantics, only to improve readability.
242 2017-05-02  Arnaud Charlet  <charlet@adacore.com>
244         * sem_case.adb: Remove extra spaces in parameter declarations.
246 2017-05-02  Justin Squirek  <squirek@adacore.com>
248         * usage.adb: Replace space with hyphen ("run time" -> "run-time")
249         in usage line for new -gnatwE switch.
251 2017-05-02  Claire Dross  <dross@adacore.com>
253         * a-cofuve.ads (Remove): Remove unnecessary
254         conditions in precondition.
256 2017-05-02  Vasiliy Fofanov  <fofanov@adacore.com>
258         * a-stream.ads, exp_imgv.adb, sem_ch10.adb,
259         sem_attr.adb, s-finmas.ads, osint.adb: Minor typo fix.
261 2017-05-02  Justin Squirek  <squirek@adacore.com>
263         * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
264         alternative expression.
265         * sem_res.adb (Resolve_Case_Expression): Ditto.
267 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
269         * exp_disp.adb (Set_All_DT_Position, In_Predef_Prim_DT):
270         Refine predicate for the case where the primitive operation
271         is a renaming of equality.  An overriding operation that is
272         a user-defined renaming of predefined equality inherits its
273         slot from the overridden operation. Otherwise it is treated
274         as a predefined op and occupies the same predefined slot as
275         equality. A call to it is transformed into a call to its alias,
276         which is the predefined equality. A dispatching call thus uses
277         the proper slot if operation is further inherited and called
278         with class-wide arguments.
280 2017-05-02  Justin Squirek  <squirek@adacore.com>
282         * errout.adb (Set_Msg_Text): Add a case to switch the message
283         type when the character '[' is detected signifying a warning
284         about a run-time exception.
285         * opt.ads Add a new Warning_Mode value for new switch
286         * switch-b.adb (Scan_Binder_Switches): Add case for the binder
287         to handle new warning mode
288         * usage.adb (Usage): Add usage entry for -gnatwE
289         * warnsw.adb (Set_Warning_Switch): Add case for the new switch
291 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
293         * sem_prag.adb (Process_Conversion): Reject an intrinsic operator
294         declaration that operates on some fixed point type.
296 2017-05-02  Justin Squirek  <squirek@adacore.com>
298         * a-crbtgo.adb, s-taasde.adb: Remove unused use-type clauses.
300 2017-05-02  Hristian Kirtchev  <kirtchev@adacore.com>
302         * sem_ch6.adb (Analyze_Null_Procedure): Revert previous change.
304 2017-05-02  Justin Squirek  <squirek@adacore.com>
306         * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
307         expression (Analyze_If_Expression): Add check for valid condition
308         * sem_eval.adb (Eval_Case_Expression): Add check for error posted
309         on case-expression
310         * sem_res.adb (Resolve_If_Expression): Add check for valid
311         condition and then-expression.
313 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
315         * exp_ch3.adb (Build_Initialization_Call): Generate a null
316         statement if the initialization call is a null procedure, as
317         can happen with a controlled type with no explicit Initialize
318         procedure, or an array of such.
319         * exp_ch7.adb (Process_Object_Declaration): For a type with
320         controlled components that has a trivial Initialize procedure,
321         insert declaration for finalization counter after object
322         declaration itself.
323         (Make_Deep_Array_Body, Build_Initialize_statements): Do not create
324         finalization block and attendant declarations if component has
325         a trivial Initialize procedure.
326         (Make_Init_Call): Do not generate a call if controlled type has
327         a trivial Initialize procedure.
329 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
331         * g-forstr.ads (Data): Move Format component last.
332         * g-forstr.adb ("+"): Adjust for above change.
333         * g-rewdat.ads (Buffer): Move Buffer, Current, Pattern and Value last.
334         * g-sechas.ads (Context): Move Key last.
335         * g-socket.ads (Service_Entry_Type): Move Aliases last.
336         * s-fileio.adb (Temp_File_Record): Move Name last.
337         * s-regexp.adb (Regexp_Value): Move Case_Sensitive last.
338         * xr_tabls.ads (Project_File): Move Src_Dir and Obj_Dir last.
340 2017-05-02  Jerome Lambourg  <lambourg@adacore.com>
342         * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: Remove the -nognarl
343         switch introduced recently. finally not needed.
345 2017-05-02  Hristian Kirtchev  <kirtchev@adacore.com>
347         * sem_ch6.adb (Analyze_Null_Procedure): Set the
348         Corresponding_Body link for a null procedure declaration.
350 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
352         * atree.h (Flag290): Add missing terminating parenthesis.
353         * einfo.adb (Is_Class_Wide_Clone): Use Flag290.
354         (Set_Is_Class_Wide_Clone): Likewise.
355         * einfo.ads (Is_Class_Wide_Clone): Likewise.
357 2017-05-02  Gary Dismukes  <dismukes@adacore.com>
359         * checks.ads (Null_Exclusion_Static_Checks): Add Boolean
360         parameter Array_Comp to indicate the case of an array object
361         with null-excluding components.
362         * checks.adb (Null_Exclusion_Static_Checks):
363         Call Compile_Time_Constraint_Error instead of
364         Apply_Compile_Time_Constraint_Error in the component case. Also
365         call that when Array_Comp is True, with an appropriate warning for
366         the array component case. Only create an explicit initialization
367         by null in the case of an object of a null-excluding access type
368         (and no longer do that in the component case).
369         * sem_ch3.adb (Check_Component): Add a Boolean parameter
370         Array_Comp defaulted to False.  Pass Empty for the Comp
371         actual when calling Null_Exclusion_Static_Checks in the case
372         where Comp_Decl matches Object_Decl, because we don't have a
373         component in that case. In the case of an object or component
374         of an array type, pass True for Array_Comp on the recursive call
375         to Check_Component.
377 2017-05-02  Bob Duff  <duff@adacore.com>
379         * s-taprop-linux.adb (Prio_To_Linux_Prio): New function to correctly
380         compute the linux priority from the Ada priority. Call this everywhere
381         required. In particular, the previous version was not doing this
382         computation when setting the ceiling priority in various places. It
383         was just converting to C.int, which results in a ceiling that is off
384         by 1.
386 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
388         * sem_ch3.adb: Comment predicate inheritance.
390 2017-05-02  Tristan Gingold  <gingold@adacore.com>
392         * s-trasym.ads: Add comment.
394 2017-05-02  Bob Duff  <duff@adacore.com>
396         * sem_elab.adb, sem_elab.ads: Minor comment fixes.
397         * sem_ch4.adb: Minor reformatting.
398         * s-taprop-linux.adb, s-taspri-posix.ads: Code refactoring.
399         * s-taspri-posix-noaltstack.ads: Minor refactoring.
400         * sinput.ads: Minor typo fix.
402 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
404         * exp_ch9.adb (Discriminated_Size): Moved to sem_util.
405         * sem_util.ads, sem_util.adb (Discriminated_Size): Predicate moved
406         here from exp_ch9, to recognize objects whose creation requires
407         dynamic allocation, so that the proper warning can be emitted
408         when restriction No_Implicit_Heap_Allocation is in effect.
409         * sem_ch3.adb (Analyze_Object_Declaration): Use Discriminated_Size
410         to emit proper warning when an object that requires dynamic
411         allocation is declared.
413 2017-05-02  Tristan Gingold  <gingold@adacore.com>
415         * s-trasym.ads, s-trasym.adb (Enable_Cache): New.
417 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
419         * sem_ch4.adb (Find_Equality_Types, Try_One_Interp): The same relaxed
420         visibility rules for equality operators that apply within an
421         instantiation apply within an inlined body.
422         * sem_type.adb (Add_One_Interp): ditto.
424 2017-05-02  Hristian Kirtchev  <kirtchev@adacore.com>
426         * sem_prag.adb (Analyze_Pragma): Forbid pragma Contract_Cases on null
427         procedures.
429 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
431         * snames.ads-tmpl
432         (Name_Assume, Name_Attribute_Definition, Name_Loop_Optimize,
433         Name_No_Tagged_Streams): Move to regular pragmas.  Add
434         placeholders for Default_Scalar_Storage_Order, Dispatching_Domain,
435         and Secondary_Stack_Size.
436         (Pragma_Id): Move Pragma_Assume,
437         Pragma_Attribute_Definition, Pragma_Loop_Optimize and
438         Pragma_No_Tagged_Streams to second part.
440 2017-05-02  Hristian Kirtchev  <kirtchev@adacore.com>
442         * exp_attr.adb: Minor reformatting.
444 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
446         * sem_ch4.adb (Analyze_Selected_Component): Improve error
447         detection for illegal references to private components or
448         operations of a protected type in the body of the type.
450 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
452         * opt.ads: Add missing GNAT markers in comments.
453         * opt.adb (Set_Opt_Config_Switches): Do not override earlier
454         settings of Optimize_Alignment at the end.
456 2017-05-02  Hristian Kirtchev  <kirtchev@adacore.com>
458         * checks.adb (Apply_Constraint_Check): Do not apply
459         a discriminant check when the associated type is a constrained
460         subtype created for an unconstrained nominal type.
461         * exp_attr.adb: Minor reformatting.
463 2017-05-02  Bob Duff  <duff@adacore.com>
465         * sem_ch3.adb (OK_For_Limited_Init_In_05): Handle correctly
466         the N_Raise_Expression case.
467         * sem_ch6.adb (Check_Limited_Return): Minor: clarify comment,
468         and add assertions.
470 2017-05-02  Yannick Moy  <moy@adacore.com>
472         * exp_ch4.adb (Expand_N_Op_Ne): Do not bump parenthese level and
473         optimize length comparison in GNATprove mode.
474         * exp_spark.adb (Expand_SPARK_Op_Ne): New function to rewrite
475         operator /= into negation of operator = when needed.
476         (Expand_SPARK): Call new
477         function to expand operator /=.
479 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
481         * exp_fixd.adb (Expand_Divide_Fixed_By_Fixed_Giving_Fixed):
482         Simplify the expression for a fixed-fixed division to remove
483         divisions by constants whenever possible, as an optimization
484         for restricted targets.
486 2017-05-02  Hristian Kirtchev  <kirtchev@adacore.com>
488         * checks.adb, sem_ch3.adb, sem_ch6.adb: Minor reformatting.
490 2017-05-02  Bob Duff  <duff@adacore.com>
492         * exp_attr.adb (Callable, Identity, Terminated): Use Find_Prim_Op
493         to find primitive ops, instead of using an Identifier that will
494         later be looked up. This is necessary because these ops are not
495         necessarily visible at all places where we need to call them.
496         * exp_util.ads: Minor comment fix.
498 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
500         * sem_ch6.adb (Fully_Conformant_Expressions): Two entity
501         references are fully conformant if they are both expansions
502         of the discriminant of a protected type, within one of the
503         protected operations. One occurrence may be expanded into a
504         constant declaration while the other is an input parameter to
505         the corresponding generated subprogram.
507 2017-05-02  Justin Squirek  <squirek@adacore.com>
509         * sem_ch3.adb (Check_For_Null_Excluding_Components): Created for
510         recursivly searching composite-types for null-excluding access
511         types and verifying them.
512         (Analyze_Object_Declaration): Add a
513         call to Check_Null_Excluding_Components for static verification
514         of non-initialized objects.
515         * checks.adb, checks.ads (Null_Exclusion_Static_Checks): Added
516         a parameter for a composite-type's component and an extra case
517         for printing component information.
519 2017-05-02  Yannick Moy  <moy@adacore.com>
521         * sem_ch10.adb (Analyze_Subunit): Take
522         configuration pragma into account when restoring appropriate
523         pragma for analysis of subunit.
525 2017-05-02  Justin Squirek  <squirek@adacore.com>
527         * s-tasren.adb, s-tasini.adb, s-taprop-linux.adb,
528         s-mudido-affinity.adb,, a-exetim-posix.adb, a-direio.adb,
529         g-socket.adb, s-taenca.adb, s-fileio.adb: Remove unused use-type
530         clauses from the runtime.
532 2017-05-02  Eric Botcazou  <ebotcazou@adacore.com>
534         * freeze.adb (Check_Component_Storage_Order): Do not treat bit-packed
535         array components specially.
537 2017-05-02  Ed Schonberg  <schonberg@adacore.com>
539         * sem_ch8.adb (Premature_Usage): If the premature usage of
540         an entity is as the expression in its own object decaration,
541         rewrite the reference as Any_Id to prevent cascaded errors or
542         compiler loops when such an entity is used in an address clause.
544 2017-05-01  Eric Botcazou  <ebotcazou@adacore.com>
546         * gcc-interface/decl.c (components_to_record): Add missing guard.
548 2017-05-01  Eric Botcazou  <ebotcazou@adacore.com>
550         * gcc-interface/decl.c (components_to_record): Add more comments.
551         Put back pending fields onto the regular list if the misalignment
552         happens to cancel itself.
554 2017-04-28  Ed Schonberg  <schonberg@adacore.com>
556         * sem_ch4.adb (Complete_Object_Operation): When rewriting the
557         controlling actual in a prefixed call, preserve the original node
558         information if the prefix itself has been rewritten, for ASIS use.
560 2017-04-28  Hristian Kirtchev  <kirtchev@adacore.com>
562         * exp_ch6.adb (Insert_Post_Call_Actions):
563         Code clean up. Insert the post-call actions after an enclosing
564         procedure call when N denotes a function call and appears as an
565         actual parameter in the procedure call.
567 2017-04-28  Eric Botcazou  <ebotcazou@adacore.com>
569         * freeze.adb (Check_Component_Storage_Order): If there is a clause
570         for the component, also reject the attribute if the component
571         doesn't end on a byte boundary and its scalar storage order is
572         different from that of the enclosing record type.
574 2017-04-28  Javier Miranda  <miranda@adacore.com>
576         * atree.ads (Info_Messages): Removed.
577         (Warning_Info_Messages): New counter.
578         (Report_Info_Messages): New counter.
579         * err_vars.ads Update documentation.
580         * errout.adb (Delete_Warning_And_Continuations): Update
581         Info_Message occurrences.
582         (Error_Msg_Internal): Update Info_Message occurrences.
583         (Delete_Warning): Update Info_Message occurrences.
584         (Write_Error_Summary): Update Info_Message occurrences.
585         (Output_Messages): Update Info_Message occurrences.
586         (To_Be_Removed): Update Info_Message occurrences.
587         (Reset_Warnings): Update Info_Message occurrences.
588         * errutil.adb (Error_Msg): Update Info_Message occurrences.
589         (Finalize): Update Info_Message occurrences.
590         (Initialize): Update Info_Message occurrences.
591         * erroutc.adb (Delete_Msg): Update Info_Message occurrences.
592         (Compilation_Errors): Update Info_Message_Occurences.
594 2017-04-28  Eric Botcazou  <ebotcazou@adacore.com>
596         * exp_ch3.adb (Build_Init_Statements): Likewise on Nam.
597         * freeze.adb (Check_Component_Storage_Order): And on Comp_Byte_Aligned.
598         * sem_aggr.adb (Resolve_Record_Aggregate): Initialize Box_Node.
599         * sem_attr.adb (Loop_Entry): Initialize Encl_Loop.
600         * sem_ch12.adb (Build_Operator_Wrapper): Add pragma Warnings on Expr.
601         * sem_ch13.adb (Validate_Address_Clauses): Initialize Y_Alignment and
602         Y_Size.
603         * sem_eval.adb (Why_Not_Static): Initialize Typ.
604         * sem_prag.adb (Analyze_Pragma): Add pragma Warnings on Str.
606 2017-04-28  Bob Duff  <duff@adacore.com>
608         * sem_util.ads, sem_util.adb (Might_Raise): New function
609         that replaces Is_Exception_Safe, but has the opposite
610         sense. Is_Exception_Safe was missing various cases -- calls inside
611         a pragma Debug, calls inside an 'if' or assignment statement,
612         etc. Might_Raise now walks the entire subtree looking for things
613         that can raise.
614         * exp_ch9.adb (Is_Exception_Safe): Remove.
615         (Build_Protected_Subprogram_Body): Replace call to
616         Is_Exception_Safe with "not Might_Raise". Misc cleanup (use
617         constants where possible).
618         * exp_ch7.adb: Rename Is_Protected_Body -->
619         Is_Protected_Subp_Body. A protected_body is something different
620         in the grammar.
622 2017-04-28  Eric Botcazou  <ebotcazou@adacore.com>
624         * inline.adb (Expand_Inlined_Call): Initialize Targ1 variable.
625         * par-ch3.adb (P_Component_Items): Initialize Decl_Node variable.
626         (P_Discrete_Choice_List): Initialize Expr_Node variable.
627         * par-ch9.adb (P_Task): Initialize Aspect_Sloc variable.
628         (P_Protected): Likewise.
629         * sem_case.adb (Check_Duplicates):
630         Add pragma Warnings on variable.
631         * sem_ch12.adb (Preanalyze_Actuals): Initialize Vis variable.
632         * sem_ch4.adb (List_Operand_Interps):  Add pragma Warnings on variable.
633         * sem_ch5.adb (Analyze_Assignment): Initialize Save_Full_Analysis.
634         (Analyze_Exit_Statement): Initialize Scope_Id variable.
635         (Analyze_Iterator_Specification): Initialize Bas variable.
636         * sem_ch9.adb (Allows_Lock_Free_Implementation): Initialize
637         Error_Count (Satisfies_Lock_Free_Requirements): Likewise.
638         (Analyze_Accept_Statement): Initialize Task_Nam.
640 2017-04-28  Hristian Kirtchev  <kirtchev@adacore.com>
642         * checks.adb (Install_Primitive_Elaboration_Check):
643         Do not generate an elaboration check if all checks have been
644         suppressed.
646 2017-04-28  Ed Schonberg  <schonberg@adacore.com>
648         * sem_ch13.adb (Analyze_Aspect_Specifications, case
649         Interrupt_Handler and Attach_Handler): Generate reference
650         to protected operation to prevent spurious warnings about
651         unreferenced entities. Previous scheme failed with style checks
652         enabled.
654 2017-04-28  Ed Schonberg  <schonberg@adacore.com>
656         * sem_prag.adb (Relocate_Pragmas_To_Body): A pragma Warnings
657         that follows an expression function must not be relocated to
658         the generated body, because it applies to the code that follows.
660 2017-04-28  Gary Dismukes  <dismukes@adacore.com>
662         * sem_util.adb (Is_Dependent_Component_Of_Mutable_Object): Test
663         Relaxed_RM_Semantics to avoid having CodePeer issue errors on
664         code that might violate the more stringent checking for 'Access
665         introduced in Ada 2005.
667 2017-04-28  Arnaud Charlet  <charlet@adacore.com>
669         * a-cforse.adb: minor style fix in comment.
671 2017-04-28  Eric Botcazou  <ebotcazou@adacore.com>
673         * exp_ch9.adb (Build_Lock_Free_Unprotected_Subprogram_Body): Also
674         initialize Block_Decls variable.
675         (Expand_Entry_Barrier): Add pragma Warnings on Func_Body variable.
676         (Build_Dispatching_Requeue): Add pragma Warnings on Op variable.
677         * exp_disp.adb (Expand_Interface_Actuals): Initialize
678         Formal_DDT and Actual_DDT variables.
679         (Expand_Interface_Thunk): Initialize Iface_Formal.
680         (Make_DT): Initialize Size_Comp.
681         (Make_Select_Specific_Data_Table): Initialize Decls.
682         * exp_dist.adb (Add_RACW_Primitive_Declarations_And_Bodies):
683         Also initialize more RPC_Receiver_* variables.
684         (Build_To_Any_Function): Initialize Cstr_Formal.
685         * exp_prag.adb (Expand_Pragma_Contract_Cases): Initialize Msg_Str.
687 2017-04-28  Ed Schonberg  <schonberg@adacore.com>
689         * sem_ch6.adb (Freeze_Type_Refs): For an interface conversion
690         node between access types, freeze the designated type as well,
691         so that dispatch table pointers are created in the proper scope,
692         and not in the constructed body of the expression function.
694 2017-04-28  Bob Duff  <duff@adacore.com>
696         * alloc.ads (Nodes_Initial): Go back to previous value. The large
697         value makes large compilations faster, but small compilations slower.
699 2017-04-28  Arnaud Charlet  <charlet@adacore.com>
701         * sem_util.adb: minor typos in Is_Child_Or_Sibling.
703 2017-04-28  Hristian Kirtchev  <kirtchev@adacore.com>
705         * erroutc.adb (Compilation_Errors): Do not consider info messages
706         as suitable warnings when warnings must be treated as errors.
707         * sem_ch7.adb (Analyze_Package_Specification): Do not consider
708         internally-generated packages when outputting completion
709         information.
710         * errout.adb (Output_Messages): Do not consider info messages as
711         suitable warnings when warnings must be treated as errors.
712         * errutil.adb (Finalize): Do not consider info messages as
713         suitable warnings when warnings must be treated as errors.
715 2017-04-28  Eric Botcazou  <ebotcazou@adacore.com>
717         * warnsw.ads: Minor fix for incorrect wording in comment.
719 2017-04-28  Ed Schonberg  <schonberg@adacore.com>
721         * sem_res.adb (In_Instance_Code): New predicate in
722         Valid_Conversion, to determine whether a type conversion appears
723         as (or within) an actual for a formal object.  Type conversions
724         in instances are not rechecked in Valid_Conversion because
725         visibility changes between generic location andi instance may
726         lead to spurious errors, but conversions within an actual must be
727         fully checked, and they are not fully resolved when pre-analyzing
728         the actuals.
730 2017-04-28  Hristian Kirtchev  <kirtchev@adacore.com>
732         * exp_ch6.adb (Expand_N_Extended_Return_Statement): Use
733         New_Copy_Tree instead of Relocate_Node as any subsequent copies
734         of the relocated node will have mangled Parent pointers.
735         * sem_util.adb (Build_NCT_Hash_Tables): Reset both hash
736         tables used in conjunction with entity and itype replication.
737         (Visit_Entity): Rewrite the restriction on which entities
738         require duplication.  The restriction now includes all types.
740 2017-04-28  Hristian Kirtchev  <kirtchev@adacore.com>
742         * a-cofuse.ads, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfinve.adb,
743         a-cfinve.ads, a-cforma.adb, a-cforma.ads, a-cofuma.adb, a-cofuma.ads,
744         a-cfhama.adb, a-cfhama.ads, a-cforse.adb: Minor reformatting and code
745         cleanups.
747 2017-04-28  Hristian Kirtchev  <kirtchev@adacore.com>
749         * exp_util.adb, g-dyntab.adb, par-ch4.adb, sem_util.adb, sem_attr.adb,
750         gnat1drv.adb, exp_disp.adb, namet.adb, alloc.ads: Minor reformatting.
752 2017-04-28  Gary Dismukes  <dismukes@adacore.com>
754         * exp_util.adb: Minor reformatting.
756 2017-04-28  Ed Schonberg  <schonberg@adacore.com>
758         * sem_ch4.adb: Fix copy/pasto.
760 2017-04-27  Tristan Gingold  <gingold@adacore.com>
762         * gcc-interface/Make-lang.in: Define EH_MECHANISM while building
763         raise-gcc.c. Fix include search path for raise-gcc.c
765 2017-04-27  Eric Botcazou  <ebotcazou@adacore.com>
767         * fe.h (Warn_On_Questionable_Layout): Declare.
768         * warnsw.ads (Warn_On_Record_Holes): Move down.
769         (Warn_On_Questionable_Layout): New boolean variable.
770         (Warning_Record): Add Warn_On_Questionable_Layout field.
771         * warnsw.adb (All_Warnings): Set Warn_On_Questionable_Layout.
772         (Restore_Warnings): Likewise.
773         (Save_Warnings): Likewise.
774         (Set_Dot_Warning_Switch): Handle 'q' and 'Q' letters.
775         * gcc-interface/decl.c (gnat_to_gnu_entity): Adjust call to
776         components_to_record.
777         (gnu_field_to_gnat): New function.
778         (warn_on_field_placement): Likewise.
779         (components_to_record): Add GNAT_RECORD_TYPE and remove REORDER
780         parameters.  Rename local variables and adjust recursive call.
781         Rework final scan of the field list and implement warnings on the
782         problematic placement of specific sorts of fields.
784 2017-04-27  Bob Duff  <duff@adacore.com>
786         * errout.adb, exp_aggr.adb, exp_attr.adb, exp_code.adb, fname.adb,
787         * fname.ads, freeze.adb, inline.adb, lib.adb, lib.ads, lib-list.adb,
788         * lib-load.adb, lib-writ.adb, par.adb, restrict.adb, rtsfind.adb,
789         * sem.adb, sem_cat.adb, sem_ch10.adb, sem_ch12.adb, sem_ch3.adb,
790         * sem_ch4.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
791         * sem_intr.adb, sem_res.adb, sem_util.adb, sem_warn.adb, sprint.adb:
792         For efficiency, cache results of Is_Internal_File_Name and
793         Is_Predefined_File_Name in the Units table. This avoids a lot
794         of repeated text processing.
796 2017-04-27  Emmanuel Briot  <briot@adacore.com>
798         * g-comlin.adb (Sort_Sections): remove useless test.
800 2017-04-27  Claire Dross  <dross@adacore.com>
802         * a-cfhase.adb, a-cfhase.ads (=): Generic parameter removed to
803         allow the use of regular equality over elements in contracts.
804         (Formal_Model): Ghost package containing model functions that are
805         used in subprogram contracts.
806         (Current_To_Last): Removed, model functions should be used instead.
807         (First_To_Previous): Removed, model functions should be used instead.
808         (Strict_Equal): Removed, model functions should be used instead.
809         (No_Overlap): Removed, model functions should be used instead.
810         (Equivalent_Keys): Functions over cursors are removed. They were
811         awkward with explicit container parameters.
812         * a-cforse.adb, a-cforse.ads (=): Generic parameter removed to
813         allow the use of regular equality over elements in contracts.
814         (Formal_Model): Ghost package containing model functions that
815         are used in subprogram contracts.
816         (Current_To_Last): Removed, model functions should be used instead.
817         (First_To_Previous): Removed, model functions should be used instead.
818         (Strict_Equal): Removed, model functions should be used instead.
819         (No_Overlap): Removed, model functions should be used instead.
821 2017-04-27  Yannick Moy  <moy@adacore.com>
823         * gnat1drv.adb: Code cleanup.
825 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
827         * exp_util.adb (Replace_Entity): The prefix of a 'Result
828         attribute reference in a post- condition is the subprogram to
829         which the condition applies. If the condition is inherited
830         by a type extension, the prefix becomes a reference to the
831         inherited operation, but there is no need to create a wrapper
832         for this operation, because 'Result is expanded independently
833         when elaborating the postconditions.
835 2017-04-27  Bob Duff  <duff@adacore.com>
837         * sinput.adb: Minor code cleanup.
838         * namet.adb (Append): Create faster versions of
839         Append(String) and Append(Name_Id) by using slice assignment
840         instead of loops.
841         * sem_util.adb (In_Instance): Speed this up by removing
842         unnecessary tests; Is_Generic_Instance is defined for all
843         entities.
844         * sem_util.ads, sem_util.adb (In_Parameter_Specification):
845         Remove unused function.
846         * alloc.ads (Nodes_Initial): Use a much larger value, because
847         the compiler was spending a lot of time copying the nodes table
848         when it grows. This number was chosen in 1996, so is rather out
849         of date with current memory sizes. Anyway, it's virtual memory.
850         Get rid of Orig_Nodes_...; use Node_... instead.
851         * atree.adb (Lock): Do not release the Nodes tables; it's a
852         waste of time.
853         Orig_Nodes_ ==> Nodes_
854         * nlists.adb: Orig_Nodes_ ==> Nodes_
855         * g-table.adb: Remove unused "with" clause.
856         * g-table.ads, table.ads: Remove Big_Table_Type, which should
857         not be used by clients.
858         * g-dyntab.adb (Last_Allocated): New function
859         to encapsulate T.P.Last_Allocated, which I'm thinking of changing.
861 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
863         * sem_eval.adb (Subtypes_Statically_Compatible): Remove duplicated
864         check.
865         (Subtypes_Statically_Match): Remove duplicate check.
866         * sem_prag.adb (Check_Arg_Is_External_Name): Remove duplicate check.
868 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
870         * exp_aggr.adb (Replace_Type): Remove the special processing
871         for selected components.
872         * exp_attr.adb (Expand_N_Attribute_Reference): Merge the
873         processing for attributes Fixed_Value and Integer_Value.
874         * exp_util.adb (Side_Effect_Free): Merge the processing for
875         qualified expressions, type conversions, and unchecked type
876         conversions.
877         * g-comlin.adb (Is_In_Config): Merge the processing for No_Space
878         and Optional.
879         * par-ch3.adb (P_Declarative_Items): Merge the processing for
880         tokens function, not, overriding, and procedure.
881         * sem_ch6.adb (Fully_Conformant_Expressions): Merge the processing
882         for qualified expressions, type conversions, and unchecked
883         type conversions.
884         * sem_util.adb (Compile_Time_Constraint_Error): Merge the
885         processing for Ada 83 and instances.
886         (Object_Access_Level): Merge the processing for indexed components
887         and selected components.
888         * uname.adb (Add_Node_Name): Merge the processing for stubs.
890 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
892         * checks.adb (Install_Primitive_Elaboration_Check):
893         Do not generate the check when restriction No_Elaboration_Code
894         is in effect.
896 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
898         * exp_disp.adb (Build_Class_Wide_Check): New subsidiary
899         of Expand_Dispatching_Call. If the denoted subprogram has a
900         class-wide precondition, this is the only precondition that
901         applies to the call, rather that the class-wide preconditions
902         that may apply to the body that is executed. (This is specified
903         in AI12-0195).
905 2017-04-27  Yannick Moy  <moy@adacore.com>
907         * gnat1drv.adb (Adjust_Global_Switches): Issue
908         a warning in GNATprove mode if the runtime library does not
909         support IEEE-754 floats.
911 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
913         * sem_prag.adb (Inherit_Class_Wide_Pre): If the parent operation
914         is itself inherited it does not carry any contract information,
915         so examine its parent operation which is its Alias.
917 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
919         * sem_attr.adb (Analyze_Attribute, case 'Image): In Ada2012 the
920         prefix can be an object reference in which case Obj'Image (X)
921         can only be interpreted as an indexing of the parameterless
922         version of the attribute.
923         * par-ch4.adb (P_Name): An attribute reference can be the prefix of
924         an indexing or a slice operation if the attribute does not require
925         parameters. In Ada2012 'Image also belongs in this category,
926         and A'Image (lo .. hi) is legal and must be parsed as a slice.
928 2017-04-27  Yannick Moy  <moy@adacore.com>
930         * exp_ch4.adb: Minor reformatting.
931         * gnat1drv.adb (Adjust_Global_Switches): When in GNATprove mode,
932         disable the CodePeer and C generation modes. Similar to the
933         opposite actions done in CodePeer mode.
935 2017-04-27  Yannick Moy  <moy@adacore.com>
937         * sem_res.adb: Remove duplicate code.
938         * sem_attr.adb: Delete duplicate code.
940 2017-04-27  Bob Duff  <duff@adacore.com>
942         * g-dyntab.adb: Reduce the amount of copying in
943         Release. No need to copy items past Last.
945 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
947         * checks.adb Add with and use clauses for Sem_Disp.
948         (Install_Primitive_Elaboration_Check): New routine.
949         * checks.ads (Install_Primitive_Elaboration_Check): New routine.
950         * exp_attr.adb (Expand_N_Attribute_Reference): Clean up the
951         processing of 'Elaborated.
952         * exp_ch6.adb (Expand_N_Subprogram_Body): Install a primitive
953         elaboration check.
955 2017-04-27  Bob Duff  <duff@adacore.com>
957         * g-dyntab.ads, g-dyntab.adb, g-table.ads: Remove incorrect assertion.
958         If the table grows and then shrinks back to empty, we won't necessarily
959         point back to the empty array. Code cleanups.
960         * sinput.ads: Add 'Base to Size clause to match the declared
961         component subtypes.
963 2017-04-27  Claire Dross  <dross@adacore.com>
965         * a-cforma.adb, a-cforma.ads (=): Generic parameter removed to
966         allow the use of regular equality over elements in contracts.
967         (Formal_Model): Ghost package containing model functions that
968         are used in subprogram contracts.
969         (Current_To_Last): Removed, model functions should be used instead.
970         (First_To_Previous): Removed, model functions should be used instead.
971         (Strict_Equal): Removed, model functions should be used instead.
972         (No_Overlap): Removed, model functions should be used instead.
973         * a-cofuma.adb, a-cofuma.ads (Enable_Handling_Of_Equivalence)
974         Boolean generic parameter to disable contracts for equivalence
975         between keys.
976         (Witness): Create a witness of a key that is used for handling of
977         equivalence between keys.
978         (Has_Witness): Check whether a witness is contained in a map.
979         (W_Get): Get the element associated to a witness.
980         (Lift_Equivalent_Keys): Removed, equivalence between keys is handled
981         directly.
982         * a-cofuse.adb, a-cofuse.ads (Enable_Handling_Of_Equivalence)
983         Boolean generic parameter to disable contracts for equivalence
984         between keys.
985         * a-cfhama.adb, a-cfhama.ads (Formal_Model.P) Disable handling
986         of equivalence on functional maps.
987         * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.P) Disable handling
988         of equivalence on functional maps.
990 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
992         * exp_ch9.adb (Expand_Entry_Barrier): Code
993         cleanup. Do not perform the optimization which removes the
994         declarations of the discriminant and component renamings when
995         validity checks on operands and attributes are in effect.
997 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
999         * exp_spark.adb, exp_util.adb, sem_ch7.adb, g-dyntab.adb, g-dyntab.ads,
1000         freeze.adb, a-cfinve.ads, a-cofuma.adb, a-cofuma.ads, a-cfhama.adb,
1001         a-cfhama.ads, a-cofove.ads: Minor reformatting.
1003 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1005         * g-debpoo.adb (Dump_Gnatmem): Protect against a possible null
1006         pointer dereference.
1007         * g-spipat.adb (Dump): Code clean up. Protect against a possible
1008         null pointer dereference.
1010 2017-04-27  Bob Duff  <duff@adacore.com>
1012         * g-dyntab.ads, g-dyntab.adb: Default for Table_Low_Bound.
1013         Rename Empty --> Empty_Table_Ptr, and don't duplicate code for it.
1014         Free renames Init, since they do the same thing.
1015         * g-table.ads: Default for Table_Low_Bound.
1016         * table.ads: Default for Table_Low_Bound, Table_Initial, and
1017         Table_Increment.
1019 2017-04-27  Bob Duff  <duff@adacore.com>
1021         * g-dyntab.ads, g-dyntab.adb: Add assertions to subprograms that
1022         can reallocate.
1023         * atree.adb, elists.adb, fname-uf.adb, ghost.adb, inline.adb,
1024         * lib.adb, namet.adb, nlists.adb, sem.adb, sinput.adb, stringt.adb:
1025         Reorder code so that above assertions do not fail.
1026         * table.ads: Remove obsolete comment on Locked.
1028 2017-04-27  Claire Dross  <dross@adacore.com>
1030         * a-cfdlli.ads: Code cleanup.
1032 2017-04-27  Yannick Moy  <moy@adacore.com>
1034         * exp_spark.adb (Expand_SPARK_Freeze_Type): Build a DIC procedure
1035         when needed for proof.  (Expand_SPARK): Call the new procedure.
1036         * exp_util.ads Fix typo.
1038 2017-04-27  Gary Dismukes  <dismukes@adacore.com>
1040         * a-cofuma.ads, a-cfhama.ads: Minor reformatting, grammar, and typo
1041         fixes.
1043 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1045         * sem_elab.adb Add new type Visited_Element
1046         and update the contents of table Elab_Visited.  Various code clean up.
1047         (Check_Elab_Call): Determine whether a prior call to
1048         the same subprogram was already examined within the same context.
1049         (Check_Internal_Call_Continue): Register the subprogram being
1050         called as examined within a particular context. Do not suppress
1051         elaboration warnings.
1053 2017-04-27  Gary Dismukes  <dismukes@adacore.com>
1055         * xoscons.adb, osint.ads: Minor reformatting.
1057 2017-04-27  Bob Duff  <duff@adacore.com>
1059         * g-dyntab.ads, g-dyntab.adb: Misc cleanup. Rename
1060         Table_Count_Type --> Table_Last_Type, because the name
1061         was confusing (a "count" usually starts at zero).  Add
1062         functionality supported or needed by other tables packages
1063         (Move, Release_Threshold).
1064         * g-table.ads, g-table.adb: This is now just a thin wrapper
1065         around g-dyntab.ads/g-dyntab.adb.  Add functionality supported
1066         or needed by other tables packages (Save, Restore).
1067         * table.ads, table.adb: This is now just a thin wrapper around
1068         * g-table.ads/g-table.adb.
1069         * namet.h, scos.h, uintp.h: These files are reaching into the
1070         private data of some instances of g-table, whose names changed,
1071         so the above change requires some adjustment here. It now uses
1072         public interfaces.
1074 2017-04-27  Bob Duff  <duff@adacore.com>
1076         * namet.adb, namet.ads: Minor: remove unused procedures.
1078 2017-04-27  Eric Botcazou  <ebotcazou@adacore.com>
1080         * checks.adb (Apply_Scalar_Range_Check): Initialize Ok variable too.
1081         (Minimize_Eliminate_Overflows): Initialize Llo and Lhi.
1082         Add pragma Warnings on Rtype variable in nested block.  *
1083         * exp_ch3.adb (Build_Init_Statements): Initialize VAR_LOC.
1084         * exp_ch4.adb (Expand_Concatenate): Initialize 3 variables.
1085         (Size_In_Storage_Elements): Add pragma Warnings on Res variable.
1086         * exp_ch7.adb (Build_Adjust_Statements): Initialize Bod_Stmts.
1087         (Process_Component_List_For_Finalize): Initialize Counter_Id.
1088         (Build_Finalize_Statements): Initialize Bod_Stmts.
1089         * exp_disp.adb (Expand_Dispatching_Call): Initialize SCIL_Node.
1091 2017-04-27  Claire Dross  <dross@adacore.com>
1093         * a-cfhama.adb, a-cfhamai.ads (=): Generic parameter removed to
1094         allow the use of regular equality over elements in contracts.
1095         (Formal_Model): Ghost package containing model functions that are
1096         used in subprogram contracts.
1097         (Current_To_Last): Removed, model
1098         functions should be used instead.
1099         (First_To_Previous): Removed, model functions should be used instead.
1100         (Strict_Equal): Removed, model functions should be used instead.
1101         (No_Overlap): Removed, model functions should be used instead.
1102         (Equivalent_Keys): Functions over cursors are removed. They were
1103         awkward with explicit container parameters.
1104         * a-cofuma.adb, a-cofuma.ads (Lift_Equivalent_Keys): New lemma
1105         (proof only) procedure to help GNATprove when equivalence over
1106         keys is not equality.
1108 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1110         * exp_util.adb, a-cfdlli.adb, a-cfdlli.ads, exp_ch9.adb, g-dyntab.adb,
1111         sem_dim.adb, a-cfinve.adb, a-cfinve.ads, a-cofove.adb, a-cofove.ads:
1112         Minor reformatting and code cleanups.
1114 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1116         * freeze.adb (Build_Inherited_Condition_Pragmas): New procedure,
1117         subsidiary of Check_Inherited_Conditions, to build pragmas for an
1118         operation whose ancestor has classwide pre/postconditions. This
1119         is used both to check the legality of the inheritance in Ada
1120         and in SPARK, and to determine whether a wrapper is needed for
1121         an inherited operation.
1122         * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity):
1123         Improve placement of error message for inherited classwide
1124         conditions that become illegal on type derivation.
1126 2017-04-27  Yannick Moy  <moy@adacore.com>
1128         * sem_ch12.adb (Analyze_Generic_Package_Declaration): Set
1129         SPARK_Mode from context on generic package.
1130         * sem_ch7.adb (Analyze_Package_Declaration): Simplify code to remove
1131         useless test.
1133 2017-04-27  Claire Dross  <dross@adacore.com>
1135         * a-cofuve.ads (Range_Shifted): Rewrite precondition to avoid
1136         overflows in computations.
1137         * a-cofove.ads (Capacity_Range): Rewrite last bound to avoid
1138         overflows in computations.
1139         (Insert): Rewrite precondition to avoid overflows in computations.
1140         * a-cfinve.ads (Capacity_Range): Rewrite last bound to avoid
1141         overflows in computations.
1142         (Insert): Rewrite precondition to avoid overflows in computations.
1144 2017-04-27  Steve Baird  <baird@adacore.com>
1146         * exp_ch9.adb (Expand_N_Asynchronous_Select): Initialize the Cancel
1147         flag when it is declared in order to avoid confusing CodePeer about
1148         the possibility of an uninitialized variable read.
1150 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1152         * sem_dim.adb (Analyze_Dimension_Object_Declaration): There is
1153         no dimensionality error if the subtype of the expression is
1154         identical to the nominal subtype in the declaration, even though
1155         the expression itself may have been constant-folded and lack a
1156         dimension vector.
1157         * sem_dim.ads: Add comments on setting of dimension vectors and
1158         its interaction with node rewritings and side-effect removal.
1160 2017-04-27  Bob Duff  <duff@adacore.com>
1162         * debug.adb: Minor comment correction.
1163         * sem_dim.ads: Minor reformatting and typo fixes.
1165 2017-04-27  Bob Duff  <duff@adacore.com>
1167         * g-table.adb, g-table.adsa, scos.h: From the C side, access First and
1168         Last of the tables via function calls, rather than relying on layout
1169         of data structures.
1171 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1173         * exp_util.adb: No wrapper in GNATprove mode.
1175 2017-04-27  Yannick Moy  <moy@adacore.com>
1177         * sem_res.adb (Resolve_Comparison_Op): Always
1178         evaluate comparisons between values of universal types.
1180 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1182         * sem_elab.adb (Check_Internal_Call_Continue): Do not generate
1183         an elaboration counter nor a check when in GNATprove mode.
1184         * sem_util.adb (Build_Elaboration_Entity): Do not create an
1185         elaboration counter when in GNATprove mode.
1187 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1189         * freeze.adb: copy-paste typo.
1191 2017-04-27  Yannick Moy  <moy@adacore.com>
1193         * sem_prag.adb (Analyze_Pre_Post_In_Decl_Part):
1194         Use correct test to detect call in GNATprove mode instead of
1195         compilation.
1197 2017-04-27  Claire Dross  <dross@adacore.com>
1199         * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.M_Elements_In_Union):
1200         New property function expressing that the element of a
1201         sequence are contained in the union of two sequences.
1202         (Formal_Model.M_Elements_Included): New property function
1203         expressing that the element of a sequence are another sequence.
1204         (Generic_Sorting): Use new property functions to state that
1205         elements are preserved by Sort and Merge.
1206         * a-cofove.adb, a-cofove.ads (=): Generic parameter removed to
1207         allow the use of regular equality over elements in contracts.
1208         (Formal_Model): Ghost package containing model functions
1209         that are used in subprogram contracts.  (Capacity):
1210         On unbounded containers, return the maximal capacity.
1211         (Current_To_Last): Removed, model functions should be used instead.
1212         (First_To_Previous): Removed, model functions should be used instead.
1213         (Append): Default parameter value replaced
1214         by new wrapper to allow more precise contracts.
1215         (Insert): Subprogram restored, it seems it was useful to users even if
1216         it is inefficient.
1217         (Delete): Subprogram restored, it seems it was useful to users even if
1218         it is inefficient.
1219         (Prepend): Subprogram restored, it seems it was useful to users even
1220         if it is inefficient.
1221         (Delete_First): Subprogram restored, it seems it
1222         was useful to users even if it is inefficient.  (Delete_Last):
1223         Default parameter value replaced by new wrapper to allow more
1224         precise contracts.
1225         (Generic_Sorting.Merge): Subprogram restored.
1226         * a-cfinve.adb, a-cfinve.ads (=): Generic parameter removed to
1227         allow the use of regular equality over elements in contracts.
1228         (Formal_Model): Ghost package containing model functions
1229         that are used in subprogram contracts.  (Capacity):
1230         On unbounded containers, return the maximal capacity.
1231         (Current_To_Last): Removed, model functions should be used
1232         instead.
1233         (First_To_Previous): Removed, model functions should be used instead.
1234         (Append): Default parameter value replaced
1235         by new wrapper to allow more precise contracts.
1236         (Insert): Subprogram restored, it seems it was useful to users even if
1237         it is inefficient.
1238         (Delete): Subprogram restored, it seems it was useful to users even if
1239         it is inefficient.
1240         (Prepend): Subprogram restored, it seems it was useful to users even
1241         if it is inefficient.
1242         (Delete_First): Subprogram restored, it seems it
1243         was useful to users even if it is inefficient.  (Delete_Last):
1244         Default parameter value replaced by new wrapper to allow more
1245         precise contracts.
1246         (Generic_Sorting.Merge): Subprogram restored.
1247         (Vector): Do not reuse formal vectors, as it is no longer possible
1248         to supply them with an equality function over elements.
1250 2017-04-27  Bob Duff  <duff@adacore.com>
1252         * g-dyntab.adb (Release): When allocating the new
1253         table, use the correct slice of the old table to initialize it.
1255 2017-04-27  Eric Botcazou  <ebotcazou@adacore.com>
1257         * einfo.ads: Minor fixes in comments.
1259 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1261         * sem_prag.adb: disable clones in SPARK_Mode.
1263 2017-04-27  Gary Dismukes  <dismukes@adacore.com>
1265         * sem_util.ads, contracts.adb: Minor reformatting.
1267 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1269         * sem_util.adb, sem_util.ads (Build_Class_Wide_Clone_Body):
1270         Build body of subprogram that has a class-wide condition that
1271         contains calls to other primitives.
1272         (Build_Class_Wide_Clone_Call); Build a call to the common
1273         class-wide clone of a subprogram with classwide conditions. The
1274         body of the subprogram becomes a wrapper for a call to the
1275         clone. The inherited operation becomes a similar wrapper to which
1276         modified conditions apply, and the call to the clone includes
1277         the proper conversion in a call the parent operation.
1278         (Build_Class_Wide_Clone_Decl (Spec_Id : Entity_Id): For a
1279         subprogram that has a classwide condition that contains calls to
1280         other primitives, build an internal subprogram that is invoked
1281         through a type-specific wrapper for all inherited subprograms
1282         that may have a modified condition.
1283         * sem_prag.adb (Check_References): If subprogram has a classwide
1284         condition, create entity for corresponding clone, to be invoked
1285         through wrapper subprograns.
1286         (Analyze_Pre_Post_Condition_In_Decl_Part): Do not emit error
1287         message about placement if pragma isi internally generated.
1288         * sem_ch6.adb (Analyze_Subprogram_Body_Helper): If subprogram has
1289         a classwide clone, build body of clone as copy of original body,
1290         and rewrite original body as a wrapper as a wrapper for a call to
1291         the clone, so that it incorporates the original pre/postconditions
1292         of the subprogram.
1293         * freeze.adb (Check_Inherited_Conditions): For an inherited
1294         subprogram that inherits a classwide condition, build spec and
1295         body of corresponding wrapper so that call to inherited operation
1296         gets the modified conditions.
1297         * contracts.adb (Analyze_Contracts): If analysis of classwide
1298         condition has created a clone for a primitive operation, analyze
1299         declaration of clone.
1301 2017-04-27  Steve Baird  <baird@adacore.com>
1303         * exp_util.adb (Build_Allocate_Deallocate_Proc):
1304         Add "Suppress => All_Checks" to avoid generating unnecessary
1305         checks.
1307 2017-04-27  Yannick Moy  <moy@adacore.com>
1309         * debug.adb: Reserve debug flag 'm' for no inlining in GNATprove.
1310         * sem_ch6.adb (Anayze_Subprogram_Body_Helper): Skip creation of
1311         inlining body in GNATprove mode when switch -gnatdm used.
1312         * sem_res.adb (Resolve_Call): Skip detection of lack of inlining
1313         in GNATprove mode when switch -gnatdm used.
1315 2017-04-27  Arnaud Charlet  <charlet@adacore.com>
1317         * sem_ch13.adb (Analyze_Attribute_Definition_Clause
1318         [Attribute_Address]): Call Set_Address_Taken when ignoring rep
1319         clauses, so that we keep an indication of the address clause
1320         before removing it from the tree.
1322 2017-04-27  Yannick Moy  <moy@adacore.com>
1324         * exp_util.ads, exp_util.adb (Evaluate_Name): Force evaluation
1325         of expression being qualified, when not an object name, or else
1326         evaluate the underlying name.
1328 2017-04-27  Jerome Lambourg  <lambourg@adacore.com>
1330         * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: add -nognarl switch.
1332 2017-04-27  Justin Squirek  <squirek@adacore.com>
1334         * exp_ch7.adb (Build_Finalize_Statements): Move Num_Comps to
1335         Process_Component_List_For_Finalization as a local variable.
1336         (Process_Component_For_Finalize): Add an extra parameter to avoid
1337         global references.
1338         (Process_Component_List_For_Finalization): Correct calls to
1339         Process_Component_For_Finalize to take Num_Comps as a parameter.
1341 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1343         * sem_ch8.adb (Find_Direct_Name): Account for the case where
1344         a use-visible entity is defined within a nested scope of an
1345         instance when giving priority to entities which were visible in
1346         the original generic.
1347         * sem_util.ads, sem_util.adb (Nearest_Enclosing_Instance): New routine.
1349 2017-04-27  Tristan Gingold  <gingold@adacore.com>
1351         * raise-gcc.c: Don't use unwind.h while compiling
1352         for the frontend, but mimic host behavior.
1354 2017-04-27  Javier Miranda  <miranda@adacore.com>
1356         * sem_ch3.adb (Build_Discriminated_Subtype):
1357         Propagate Has_Pragma_Unreferenced_Objects to the built subtype.
1359 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1361         * sem_prag.adb (Analyze_Global_Item):
1362         Do not consider discriminants because they are not "entire
1363         objects". Remove the discriminant-related checks because they are
1364         obsolete.
1365         (Analyze_Input_Output): Do not consider discriminants
1366         because they are not "entire objects".
1368 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1370         * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Do not
1371         perform check if the current scope does not come from source,
1372         as is the case for a rewritten task body, because check has
1373         been performed already, and may not be doable because of changed
1374         visibility.
1376 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1378         * a-cofuse.adb, a-cfdlli.adb, a-cofuse.ads, a-cfdlli.ads, a-cofuve.adb,
1379         a-cofuve.ads, a-cofuma.adb, a-cofuma.ads, sem_eval.adb, a-cofuba.adb:
1380         Minor reformatting.
1382 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1384         * sem_ch4.adb (Analyze_Call): If the return type of a function
1385         is incomplete in an context in which the full view is available,
1386         replace the type of the call by the full view, to prevent spurious
1387         type errors.
1388         * exp_disp.adb (Check_Premature_Freezing): Disable check on an
1389         abstract subprogram so that compiler does not reject a parameter
1390         of a primitive operation of a tagged type being frozen, when
1391         the untagged type of that parameter cannot be frozen.
1393 2017-04-27  Bob Duff  <duff@adacore.com>
1395         * sem_attr.adb (Compute_Type_Key): Don't walk
1396         representation items for irrelevant types, which could be in a
1397         different source file.
1399 2017-04-27  Steve Baird  <baird@adacore.com>
1401         * exp_attr.adb (Expand_N_Attribute_Reference):
1402         Don't expand Image, Wide_Image, Wide_Wide_Image attributes
1403         for CodePeer.
1405 2017-04-27  Yannick Moy  <moy@adacore.com>
1407         * exp_unst.ads: Fix typos in comments.
1409 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1411         * sem_eval.adb (Choice_Matches): Handle properly a real literal
1412         whose type has a defined static predicate.
1414 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1416         * exp_ch4.adb (Insert_Dereference_Action):
1417         Do not adjust the address of a controlled object when the
1418         associated access type is subject to pragma No_Heap_Finalization.
1419         Code reformatting.
1421 2017-04-27  Pierre-Marie de Rodat  <derodat@adacore.com>
1423         * gcc-interface/utils.c (gnat_type_for_size): Set
1424         TYPE_ARTIFICIAL on created types.
1426 2017-04-27  Claire Dross  <dross@adacore.com>
1428         * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
1429         modifications in functional containers.
1430         * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
1431         to improve readablity. Subprograms are separated between basic
1432         operations, constructors and properties. Universally quantified
1433         formulas in contracts are factorized in independant functions
1434         with a name and a comment.  Names of parameters are improved.
1436 2017-04-27  Gary Dismukes  <dismukes@adacore.com>
1438         * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
1440 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1442         * sem_res.adb (Resolve_Type_Conversion): Do not
1443         install a predicate check here since this is already done during
1444         the expansion phase. Verify whether the operand satisfies the
1445         static predicate (if any) of the target type.
1446         * sem_ch3.adb (Analyze_Object_Declaration): Do
1447         not install a predicate check if the object is initialized by
1448         means of a type conversion because the conversion is subjected
1449         to the same check.
1451 2017-04-27  Tristan Gingold  <gingold@adacore.com>
1453         * raise.c (__gnat_builtin_longjmp): Remove.
1454         (__gnat_bracktrace):
1455         Add a dummy definition for the compiler (__gnat_eh_personality,
1456         __gnat_rcheck_04, __gnat_rcheck_10) (__gnat_rcheck_19,
1457         __gnat_rcheck_20, __gnat_rcheck_21) (__gnat_rcheck_30,
1458         __gnat_rcheck_31, __gnat_rcheck_32): Likewise.
1459         * a-exexpr.adb: Renamed from a-exexpr-gcc.adb
1460         * a-except.ads, a-except.adb: Renamed from a-except-2005.ads
1461         and a-except-2005.adb.
1462         * raise-gcc.c: Allow build in compiler, compiled as a C++
1463         file.
1464         (__gnat_Unwind_ForcedUnwind): Adjust prototype.
1465         (db): Constify msg_format.
1466         (get_call_site_action_for): Don't use void arithmetic.
1467         * system.ads (Frontend_Exceptions): Set to False.
1468         (ZCX_By_Default): Set to True.
1469         (GCC_ZC_Support): Set to True.
1470         * gcc-interface/Makefile.in: No more variants for a-exexpr.adb and
1471         a-except.ad[sb].
1472         * gcc-interface/Make-lang.in: Add support for backend zcx exceptions
1473         in gnat1 and gnatbind.
1474         * gnat1, gnatbind: link with raise-gcc.o, a-exctra.o, s-addima.o,
1475         s-excmac.o, s-imgint.o, s-traceb.o, s-trasym.o, s-wchstw.o
1476         * s-excmac.ads, s-excmac.adb: Copy of variants.
1477         * a-except.o: Adjust preequisites.
1478         Add handling of s-excmac-arm.adb and s-excmac-gcc.adb.
1480 2017-04-27  Claire Dross  <dross@adacore.com>
1482         * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
1483         modifications in functional containers.
1484         * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
1485         to improve readablity. Subprograms are separated between basic
1486         operations, constructors and properties. Universally quantified
1487         formulas in contracts are factorized in independant functions
1488         with a name and a comment.  Names of parameters are improved.
1490 2017-04-27  Gary Dismukes  <dismukes@adacore.com>
1492         * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
1494 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1496         * sem_res.adb (Resolve_Type_Conversion): Do not
1497         install a predicate check here since this is already done during
1498         the expansion phase. Verify whether the operand satisfies the
1499         static predicate (if any) of the target type.
1500         * sem_ch3.adb (Analyze_Object_Declaration): Do
1501         not install a predicate check if the object is initialized by
1502         means of a type conversion because the conversion is subjected
1503         to the same check.
1505 2017-04-27  Tristan Gingold  <gingold@adacore.com>
1507         * a-except.ads, a-except.adb, a-exexpr.adb: Removed (will be
1508         replaced by their variants).
1510 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1512         * exp_prag.adb, a-cofuse.adb, a-cofuse.ads, einfo.adb, sem_prag.adb,
1513         cstand.adb, par-prag.adb, a-cofuve.adb, a-cofuve.ads, a-cofuma.adb,
1514         a-cofuma.ads, a-cofuba.adb, a-cofuba.ads: Minor reformatting.
1516 2017-04-27  Tristan Gingold  <gingold@adacore.com>
1518         * s-excmac-gcc.ads, s-excmac-gcc.adb,
1519         s-excmac-arm.ads, s-excmac-arm.adb (New_Occurrence): Rewrite it in
1520         Ada95.
1522 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1524         * exp_ch7.adb (Establish_Transient_Scope): Rewrite
1525         the loop which detects potential enclosing transient scopes. The
1526         loop now terminates much earlier as transient scopes are bounded
1527         by packages and subprograms.
1529 2017-04-27  Claire Dross  <dross@adacore.com>
1531         * a-cfdlli.adb, a-cfdlli.ads (=): Generic parameter removed to
1532         allow the use of regular equality over elements in contracts.
1533         (Cursor): Type is now public so that it can be used in
1534         model functions.
1535         (Formal_Model): Ghost package containing
1536         model functions that are used in subprogram contracts.
1537         (Current_To_Last): Removed, model functions should be used
1538         instead.
1539         (First_To_Previous): Removed, model functions should
1540         be used instead.
1541         (Strict_Equal): Removed, model functions
1542         should be used instead.
1543         (Append): Default parameter value
1544         replaced by new wrapper to allow more precise contracts.
1545         (Insert): Default parameter value replaced by new wrapper to
1546         allow more precise contracts.
1547         (Delete): Default parameter
1548         value replaced by new wrapper to allow more precise contracts.
1549         (Prepend): Default parameter value replaced by new wrapper to
1550         allow more precise contracts.
1551         (Delete_First): Default parameter
1552         value replaced by new wrapper to allow more precise contracts.
1553         (Delete_Last): Default parameter value replaced by new wrapper
1554         to allow more precise contracts.
1556 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1558         * exp_spark.adb (Expand_SPARK): Perform specialized expansion
1559         for object declarations.
1560         (Expand_SPARK_N_Object_Declaration): New routine.
1561         * sem_elab.adb (Check_A_Call): Include calls to the
1562         Default_Initial_Condition procedure of a type under the SPARK
1563         elaboration checks umbrella.
1565 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1567         * sem.adb (Analyze): Diagnose an illegal iterated component
1568         association.
1569         * sem_util.ads, sem_util.adb
1570         (Diagnose_Iterated_Component_Association): New routine.
1572 2017-04-27  Bob Duff  <duff@adacore.com>
1574         * adaint.c (__gnat_get_current_dir): Return 0 in length if
1575         getcwd fails.
1576         * a-direct.adb, g-dirope.adb, osint.adb, s-os_lib.adb: Raise
1577         exception if getcwd failed.
1579 2017-04-27  Yannick Moy  <moy@adacore.com>
1581         * exp_dbug.adb, exp_dbug.ads (Get_External_Name): Prefix ghost
1582         entities with special prefix.
1584 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1586         * debug.adb Change the documentation of switch -gnatd.s.
1587         * exp_ch7.adb (Make_Transient_Block): Transient blocks do not need
1588         to manage the secondary stack when an enclosing scope already
1589         performs this functionality (aka relaxed management). Switch
1590         -gnatd.s may be used to force strict management in which case
1591         the block will manage the secondary stack unconditionally. Add
1592         a guard to stop the traversal when encountering a package or a
1593         subprogram scope.
1595 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1597         * sem_res.adb (Resolve_Call): Refine further the handling of
1598         limited views of return types in function calls. If the function
1599         that returns a limited view appears in the current unit,
1600         we do not replace its type by the non-limited view because
1601         this transformation is performed int the back-end. However,
1602         the type of the call itself must be the non-limited view, to
1603         prevent spurious resolution errors.
1605 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1607         * einfo,ads, einfo.adb (Class_Wide_Preconds, Class_Wide_Postconds):
1608         Removed, proposed implementation using generics for class-wide
1609         preconditions proved impractical.
1610         (Class_Wide_Clone): New attribute of subprogram. Designates
1611         subprogram created for primitive operations with class-wide
1612         pre/postconditions that contain calls to other primitives. The
1613         clone holds the body of the original primitive, but the
1614         pre/postonditions do not apply to it. The original body is
1615         rewritten as a wrapper for a call to the clone.
1616         (Is_Class_Wide_Clone): New flag to identify a Class_Wide_Clone. If
1617         the flag is set, no code for the corresponding pre/postconditions
1618         is inserted into its body.
1620 2017-04-27  Bob Duff  <duff@adacore.com>
1622         * exp_prag.adb, par-prag.adb, sem_ch13.adb: Ignore
1623         Scalar_Storage_Order if -gnatI is given.
1624         * sem_prag.adb (Analyze_Pragma): Ignore
1625         Default_Scalar_Storage_Order if -gnatI is given.
1627 2017-04-27  Claire Dross  <dross@adacore.com>
1629         * a-cofuba.ads (Add): Take as an additional input parameter
1630         the position where the element should be inserted.
1631         (Remove): New function that removes an element from the container.
1632         * a-cofuma.ads (Add): Adapt to the new API of Base.Add.
1633         * a-cofuse.ads (Add): Adapt to the new API of Base.Add.
1634         (Remove): New function that removes an element from a set.
1635         * a-cofuve.ads (Add): Adapt to the new API of Base.Add.
1636         (Remove): New function that removes an element from a sequence.
1637         (Insert): New function that adds anywhere in a sequence.
1639 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1641         * checks.adb (Generate_Range_Check): Revert previous change.
1643 2017-04-27  Gary Dismukes  <dismukes@adacore.com>
1645         * sem_util.adb: Minor reformatting/rewording.
1647 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1649         * lib-xref.adb (Generate_Reference): The use
1650         of attribute 'Result is not considered a violation of pragma
1651         Unreferenced.
1653 2017-04-27  Justin Squirek  <squirek@adacore.com>
1655         * cstand.adb (Create_Standard): Correctly set
1656         Directly_Designated_Type for Any_Access.
1657         * sem_type.adb (Covers): Minor grammar fixes.
1659 2017-04-27  Bob Duff  <duff@adacore.com>
1661         * sem_attr.adb: Minor cleanup.
1663 2017-04-27  Claire Dross  <dross@adacore.com>
1665         * a-cofuba.ads, a-cofuba.adb (Ada.Containers.Functional_Base): New
1666         private child of Ada.Containers used to implement all functional
1667         containers.
1668         * a-cofuma.ads, a-cofuma.adb (Ada.Containers.Functional_Maps): New
1669         child of Ada.Containers. It provides functional indefinite unbounded
1670         maps which can be used as high level models for specification
1671         of data structures.
1672         * a-cofuse.ads, a-cofuse.adb (Ada.Containers.Functional_Sets): New
1673         child of Ada.Containers. It provides functional indefinite unbounded
1674         sets which can be used as high level models for specification
1675         of data structures.
1676         * a-cofuve.ads, a-cofuve.adb (Ada.Containers.Functional_Vectors): New
1677         child of Ada.Containers.  It provides functional indefinite unbounded
1678         vectors which can be used as high level models for specification
1679         of data structures.
1680         * Makefile.rtl: Add new packages.
1681         * impunit.adb: Add new packages.
1683 2017-04-27  Gary Dismukes  <dismukes@adacore.com>
1685         * sem_ch4.adb: Minor reformatting.
1687 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1689         * sem_ch12.adb (Analyze_Associations): minor reformatting.
1690         (Check_Fixed_Point_Actual): Do not emit a warning on a fixed
1691         point type actual that has user-defined arithmetic primitives,
1692         when there is a previous actual for a formal package that defines
1693         a fixed-point type with the parent user-defined operator.
1695 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1697         * checks.adb (Generate_Range_Check): Reinstate part of previous change.
1698         * sem_attr.adb (Resolve_Attribute): Generate a range check when
1699         the component type allows range checks.
1701 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1703         * sem_aux.adb (Is_Generic_Formal): Use original node to locate
1704         corresponding declaration, because formal derived types are
1705         rewritten as private extensions.
1707 2017-04-27  Ed Schonberg  <schonberg@adacore.com>
1709         * sem_dim.adb (Analyze_Dimension_Binary_Op): Do not check
1710         dimensions of operands if node has been analyzed already, because
1711         previous analysis and dimension checking will have removed the
1712         dimension information from the operands.
1714 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1716         * debug.adb: Document the use of switch -gnatd.s.
1717         * einfo.ads Update the documentation on attribute
1718         Sec_Stack_Needed_For_Return and attribute Uses_Sec_Stack. Remove
1719         the uses of these attributes from certain entities.
1720         * exp_ch7.adb (Make_Transient_Block): Reimplement the circuitry
1721         which determines whether the block should continue to manage
1722         the secondary stack.
1723         (Manages_Sec_Stack): New routine.
1725 2017-04-27  Bob Duff  <duff@adacore.com>
1727         * atree.ads: Minor edit.
1729 2017-04-27  Hristian Kirtchev  <kirtchev@adacore.com>
1731         * sinfo.ads: Update the section on Ghost mode. Add
1732         a section on SPARK mode. Update the placement of section on
1733         expression functions.
1735 2017-04-27  Bob Duff  <duff@adacore.com>
1737         * sinput.adb (Get_Source_File_Index): Don't
1738         assert that S is in the right range in the case where this is
1739         a .dg file under construction.
1741 2017-04-27  Yannick Moy  <moy@adacore.com>
1743         * sem_util.adb (Check_Result_And_Post_State):
1744         Handle more precisely each conjunct in expressions formed by
1745         and'ing sub-expressions.
1747 2017-04-27  Gary Dismukes  <dismukes@adacore.com>
1749         * exp_ch4.adb, sem_ch4.adb: Minor typo fix and reformatting.
1751 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
1753         * gnat_rm.texi, gnat_ugn.texi,
1754         doc/gnat_ugn/building_executable_programs_with_gnat.rst,
1755         doc/gnat_ugn/platform_specific_information.rst,
1756         doc/gnat_ugn/gnat_and_program_execution.rst,
1757         doc/gnat_ugn/gnat_utility_programs.rst,
1758         doc/gnat_ugn/the_gnat_compilation_model.rst,
1759         doc/gnat_rm/implementation_defined_attributes.rst,
1760         doc/gnat_rm/the_gnat_library.rst,
1761         doc/gnat_rm/implementation_defined_pragmas.rst,
1762         doc/gnat_rm/representation_clauses_and_pragmas.rst,
1763         doc/gnat_rm/implementation_of_specific_ada_features.rst,
1764         doc/gnat_rm/implementation_defined_aspects.rst,
1765         doc/gnat_rm/implementation_defined_characteristics.rst: Update
1766         documentation.
1768 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
1770         * exp_ch4.adb (Expand_N_Case_Expression): Emit error message when
1771         generating C code on complex case expressions.
1773 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
1775         * sem_prag.adb (Analyze_Pragma): Generate a warning instead
1776         of silently ignoring pragma Ada_xxx in Latest_Ada_Only mode.
1777         * directio.ads, ioexcept.ads, sequenio.ads, text_io.ads: Use
1778         Ada_2012 instead of Ada_2005 to be compatible with the above
1779         change.
1780         * bindgen.adb: Silence new warning on pragma Ada_95.
1782 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
1784         * checks.adb (Generate_Range_Check): Revert part of previous change.
1786 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
1788         * sem_ch4.adb (Try_Container_Indexing): Handle properly a
1789         container indexing operation that appears as a an actual in a
1790         parameter association in a procedure call.
1792 2017-04-25  Olivier Ramonat  <ramonat@adacore.com>
1794         * prj-proc.adb, sem_util.adb, s-stposu.adb, sem_attr.adb, prj-conf.ads:
1795         Fix spelling mistakes.
1797 2017-04-25  Bob Duff  <duff@adacore.com>
1799         * types.ads, osint.adb, sinput-c.adb, sinput-d.adb, sinput-l.adb,
1800         * sinput-p.adb: Use regular fat pointers, with bounds checking,
1801         for source buffers.  Fix misc obscure bugs.
1802         * sinput.ads, sinput.adb: Use regular fat pointers, with bounds
1803         checking, for source buffers.  Modify representation clause for
1804         Source_File_Record as appropriate.  Move Source_File_Index_Table
1805         from spec to body, because it is not used outside the body.
1806         Move Set_Source_File_Index_Table into the private part, because
1807         it is used only in the body and in children.  Use trickery to
1808         modify the dope in the generic instantiation case.  It's ugly,
1809         but not as ugly as the previous method.  Fix documentation.
1810         Remove obsolete code.
1811         * fname-sf.adb, targparm.adb: Fix misc out-of-bounds
1812         indexing in source buffers.
1813         * fmap.adb: Avoid conversions from one string type to another.
1814         Remove a use of global name buffer.
1815         * osint.ads, sfn_scan.ads, sfn_scan.adb, sinput-c.ads: Comment
1816         fixes.
1818 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
1820         * exp_util.adb, exp_ch4.adb: Minor reformatting.
1822 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
1824         * checks.adb: Code clean up in various routines.
1825         (Generate_Range_Check): Do not generate a range check when the
1826         expander is not active or when index/range checks are suppressed
1827         on the target type.
1828         (Insert_List_After_And_Analyze, Insert_List_Before_And_Analyze):
1829         Remove variants that include a Supress parameter. These routines
1830         are never used, and were introduced before the current scope-based
1831         check suppression method.
1833 2017-04-25  Vasiliy Fofanov  <fofanov@adacore.com>
1835         * prj-part.adb, cstreams.c, osint.adb, osint.ads: Remove VMS specific
1836         code and some subprogram calls that are now noop.
1838 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
1840         * exp_ch4.adb (Expand_N_Case_Expression): Take
1841         Minimize_Expression_With_Actions into account when possible.
1843 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
1845         * exp_util.adb (Known_Non_Null): Moved to Sem_Util.
1846         (Known_Null): Moved to Sem_Util.
1847         * exp_util.ads (Known_Non_Null): Moved to Sem_Util.
1848         (Known_Null): Moved to Sem_Util.
1849         * sem_util.adb Add new enumeration type Null_Status_Kind.
1850         (Known_Non_Null): Moved from Exp_Util. Most of the logic in
1851         this routine is now carried out by Null_Status.
1852         (Known_Null): Moved from Exp_Util. Most of the logic in this routine
1853         is now carried out by Null_Status.
1854         (Null_Status): New routine.
1855         * sem_util.ads (Known_Non_Null): Moved from Exp_Util.
1856         (Known_Null): Moved from Exp_Util.
1858 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
1860         * sem_ch6.adb (Analyze_Expression_Function): Do not report an
1861         error on the return type of an expression function that is a
1862         completion, if the type is derived from a generic formal type.
1864 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
1866         * sem_dim.adb (Dimensions_Of_Operand): The dimensions of a type
1867         conversion are those of the target type.
1869 2017-04-25  Bob Duff  <duff@adacore.com>
1871         * a-clrefi.adb: Minor cleanup.
1873 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
1875         * exp_util.adb, exp_util.ads, types.ads: Minor reformatting.
1877 2017-04-25  Bob Duff  <duff@adacore.com>
1879         * err_vars.ads, fmap.adb, fmap.ads, comperr.adb, fname-sf.adb,
1880         types.adb, types.ads, types.h, sinput-l.adb, targparm.adb,
1881         errout.adb, sinput.adb, sinput.ads, cstand.adb, scn.adb,
1882         scn.ads, gnatls.adb: Eliminate the vestigial Internal_Source_File and
1883         the Internal_Source buffer. This removes the incorrect call to "="
1884         the customer noticed.
1885         Wrap remaining calls to "=" in Null_Source_Buffer_Ptr. We
1886         eventually need to eliminate them altogether. Or else get rid
1887         of zero-origin addressing.
1889 2017-04-25  Claire Dross  <dross@adacore.com>
1891         * exp_util.ads (Expression_Contains_Primitives_Calls_Of): New
1892         function used in GNATprove to know if an expression contains
1893         non-dispatching calls on primitives of a tagged type.
1895 2017-04-25  Bob Duff  <duff@adacore.com>
1897         * rtsfind.adb (Initialize): Initialize
1898         First_Implicit_With. Building the compiler with Normalize_Scalars
1899         and validity checking finds this being used as an uninitialized
1900         variable.
1902 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
1904         * contracts.adb (Analyze_Entry_Or_Subprogram_Body_Contract):
1905         Add a warning about SPARK mode management. The routine now
1906         saves and restores both the mode and associated pragma.
1907         (Analyze_Entry_Or_Subprogram_Contract): Add a warning about
1908         SPARK mode management. The routine now saves and restores both
1909         the mode and associated pragma.
1910         (Analyze_Object_Contract):
1911         Add a warning about SPARK mode management. The routine
1912         now saves and restores both the mode and associated pragma.
1913         (Analyze_Package_Body_Contract): Add a warning about SPARK mode
1914         management.  The routine now saves and restores both the mode
1915         and associated pragma.  (Analyze_Package_Contract): Add a warning
1916         about SPARK mode management. The routine now saves and restores
1917         both the mode and associated pragma.
1918         (Analyze_Task_Contract):
1919         Add a warning about SPARK mode management. The routine now saves
1920         and restores both the mode and associated pragma.
1921         * expander.adb (Expand): Change the way the Ghost mode is saved
1922         and restored.
1923         * exp_ch3.adb (Freeze_Type): Change the way the Ghost mode is
1924         saved and restored.
1925         * exp_disp.adb (Make_DT): Change the way the Ghost mode is saved
1926         and restored.
1927         * exp_util.adb (Build_DIC_Procedure_Body):
1928         Change the way the Ghost mode is saved and restored.
1929         (Build_DIC_Procedure_Declaration): Change the way the Ghost
1930         mode is saved and restored.
1931         (Build_Invariant_Procedure_Body):
1932         Change the way the Ghost mode is saved and restored.
1933         (Build_Invariant_Procedure_Declaration): Change the way the Ghost
1934         mode is saved and restored.
1935         (Make_Predicate_Call): Change the
1936         way the Ghost mode is saved and restored.
1937         * freeze.adb (Freeze_Entity): Change the way the Ghost mode is
1938         saved and restored.
1939         * ghost.adb (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
1940         and its assignment.
1941         (Mark_And_Set_Ghost_Body): Remove parameter
1942         Mode and its assignment.
1943         (Mark_And_Set_Ghost_Completion):
1944         Remove parameter Mode and its assignment.
1945         (Mark_And_Set_Ghost_Declaration): Remove parameter Mode and its
1946         assignment.
1947         (Mark_And_Set_Ghost_Instantiation): Remove parameter
1948         Mode and its assignment.
1949         (Mark_And_Set_Ghost_Procedure_Call):
1950         Remove parameter Mode and its assignment.
1951         (Set_Ghost_Mode):
1952         Remove parameter Mode and its assignment.
1953         * ghost.ads (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
1954         and update the comment on usage.
1955         (Mark_And_Set_Ghost_Body):
1956         Remove parameter Mode and update the comment on usage.
1957         (Mark_And_Set_Ghost_Completion): Remove parameter Mode and
1958         update the comment on usage.
1959         (Mark_And_Set_Ghost_Declaration):
1960         Remove parameter Mode and update the comment on usage.
1961         (Mark_And_Set_Ghost_Instantiation): Remove parameter Mode and
1962         update the comment on usage.
1963         (Mark_And_Set_Ghost_Procedure_Call):
1964         Remove parameter Mode and update the comment on usage.
1965         (Set_Ghost_Mode): Remove parameter Mode and update the comment
1966         on usage.
1967         * lib.ads Remove obsolete fields SPARK_Mode_Pragma from various
1968         types.
1969         * lib-load.adb (Create_Dummy_Package_Unit): Remove the assignment
1970         of obsolete field SPARK_Mode_Pragma.
1971         (Load_Main_Source): Remove
1972         the assignment of obsolete field SPARK_Mode_Pragma.
1973         (Load_Unit): Remove the assignment of obsolete field SPARK_Mode_Pragma.
1974         * lib-writ.adb (Add_Preprocessing_Dependency): Remove
1975         the assignment of obsolete field SPARK_Mode_Pragma.
1976         (Ensure_System_Dependency): Remove the assignment of obsolete
1977         field SPARK_Mode_Pragma.
1978         * rtsfind.adb (Load_RTU): Add a warning about Ghost and SPARK
1979         mode management. Change the way Ghost and SPARK modes are saved
1980         and restored.
1981         * sem.adb (Analyze): Change the way the Ghost mode is saved
1982         and restored.
1983         * sem_ch3.adb (Analyze_Object_Declaration): Change the way the
1984         Ghost mode is saved and restored.
1985         (Process_Full_View): Change
1986         the way the Ghost mode is saved and restored.
1987         * sem_ch5.adb (Analyze_Assignment): Change the way the Ghost
1988         mode is saved and restored.
1989         * sem_ch6.adb (Analyze_Procedure_Call): Change the way the Ghost
1990         mode is saved and restored.
1991         (Analyze_Subprogram_Body_Helper):
1992         Change the way the Ghost mode is saved and restored.
1993         * sem_ch7.adb (Analyze_Package_Body_Helper): Change the way the
1994         Ghost mode is saved and restored.
1995         * sem_ch10.adb (Analyze_Subunit): Add a warning about SPARK mode
1996         management. Save the SPARK mode-related data prior to any changes
1997         to the scope stack and contexts. The mode is then reinstalled
1998         before the subunit is analyzed in order to restore the original
1999         view of the subunit.
2000         * sem_ch12.adb (Analyze_Package_Instantiation): Update the
2001         warning on region management.  Change the way the Ghost and
2002         SPARK modes are saved and restored.
2003         (Inline_Instance_Body):
2004         Add a warning about SPARK mode management. Code clean up.
2005         (Analyze_Subprogram_Instantiation): Update the warning on region
2006         management.  Change the way the Ghost and SPARK modes are saved
2007         and restored.
2008         (Instantiate_Package_Body): Update the warning
2009         on region management. Change the way the Ghost and SPARK modes
2010         are saved and restored.
2011         (Instantiate_Subprogram_Body): Update
2012         the warning on region management. Change the way the Ghost and
2013         SPARK modes are saved and restored.
2014         (Set_Instance_Env): Add a
2015         warning about SPARK mode management. Change the way SPARK mode
2016         is saved and restored.
2017         * sem_ch13.adb (Build_Predicate_Functions):
2018         Change the way the Ghost mode is saved and restored.
2019         (Build_Predicate_Function_Declaration): Change the way the Ghost
2020         mode is saved and restored.
2021         * sem_elab.adb (Check_Elab_Calls): Add a warning about SPARK
2022         mode management. Change the way SPARK mode is saved and restored.
2023         * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
2024         Change the way the Ghost mode is saved and restored.
2025         (Analyze_Initial_Condition_In_Decl_Part): Change the way
2026         the Ghost mode is saved and restored.
2027         (Analyze_Pragma):
2028         Change the way the Ghost mode is saved and restored.
2029         (Analyze_Pre_Post_Condition_In_Decl_Part): Change the way the
2030         Ghost mode is saved and restored.
2031         * sem_util.adb (Install_SPARK_Mode): New routine.
2032         (Restore_SPARK_Mode): New routine.
2033         (Save_SPARK_Mode_And_Set): Removed.
2034         (Set_SPARK_Mode): New routine.
2035         * sem_util.ads (Install_SPARK_Mode): New routine.
2036         (Restore_SPARK_Mode): New routine.
2037         (Save_SPARK_Mode_And_Set): Removed.
2038         (Set_SPARK_Mode): New routine.
2040 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2042         * sem_util.adb, sem_util.ads (From_Nested_Package): New predicate
2043         to determine whether a type is declared in a local package that
2044         has not yet been frozen.
2045         * freeze.adb (Freeze_Before): Use new predicate to determine
2046         whether a local package must be installed on the scope stack
2047         in order to evaluate in the proper scope actions generated by
2048         aspect specifications, such as Predicate
2049         * sem_ch13.adb: Simplify code in Analyze_Aspects_At_Freeze_Point
2050         using new predicate.
2052 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2054         * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not consider
2055         comparisons between non- scalar expressions expressions because
2056         their values cannot be invalidated.
2057         * sem_warn.ads (Warn_On_Constant_Valid_Condition): Update the
2058         comment on usage.
2060 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2062         * par_sco.adb: Minor reformatting.
2064 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2066         * sem_ch13.adb (Analyze_Aspects_At_Freeze_Point): If entity
2067         is a type from an unfrozen local package, install package to
2068         complete the analysis of delayed aspects of the type.
2070 2017-04-25  Tristan Gingold  <gingold@adacore.com>
2072         * bingen.adb (System_Version_Control_Used): New variable.
2073         (Resolve_Binder_Options): Set the above variable.
2074         (Gen_Output_File_Ada): Conditionally call Gen_Versions.
2075         (Gen_Elab_Order): Emit blank line before.
2077 2017-04-25  Justin Squirek  <squirek@adacore.com>
2079         * sem_cat.adb (Validate_RT_RAT_Component): Added
2080         an extra check to ignore incomplete types.
2082 2017-04-25  Thomas Quinot  <quinot@adacore.com>
2084         * sem_prag.adb (Analyze_Pragma, case Pragma_Check): Remove
2085         bogus circuitry for the case where Name is Predicate.
2087 2017-04-25  Thomas Quinot  <quinot@adacore.com>
2089         * par_sco.adb(Traverse_Declarations_Or_Statements.Traverse_Aspects):
2090         Create SCOs for Predicate aspects in disabled
2091         state initially, to be enabled later on by...
2092         * sem_ch13.adb (Build_Predicate_Functions.Add_Predicates): Mark
2093         SCO for predicate as enabled.
2095 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2097         * comperr.adb (Compiler_Abort): Remove now obsolete pair of
2098         pragmas Warnings Off / On.
2099         * namet.adb (Finalize): Remove now obsolete pair of pragmas
2100         Warnings Off / On.
2101         * output.adb: Remove now obsolete pair of pragmas Warnings Off / On.
2102         * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not
2103         consider comparisons between static expressions because their
2104         values cannot be invalidated.
2105         * urealp.adb (Tree_Read): Remove now obsolete pair of pragmas
2106         Warnings Off / On.
2107         (Tree_Write): Remove now obsolete pair of pragmas Warnings Off / On.
2108         * usage.adb Remove now obsolete pair of pragmas Warnings Off / On.
2110 2017-04-25  Bob Duff  <duff@adacore.com>
2112         * sem_elab.adb (In_Task_Activation): Trace internal calls in
2113         task bodies.
2115 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
2117         * sem_prag.adb, sem_warn.adb, sem_eval.adb: Minor reformatting and
2118         typo fixes.
2120 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2122         * comperr.adb (Compiler_Abort): Add a pair of pragma Warnings
2123         On/Off to defend against a spurious warning in conditional
2124         compilation.
2125         * exp_ch4.adb (Rewrite_Comparison): Reimplemented.
2126         * namet.adb (Finalize): Add a pair of pragma Warnings On/Off to
2127         defend against a spurious warning in conditional compilation.
2128         * output.adb Add a pair of pragma Warnings On/Off to defend
2129         against a spurious warning in conditional compilation.
2130         * sem_eval.adb (Eval_Relational_Op): Major code clean up.
2131         (Fold_General_Op): New routine.
2132         (Fold_Static_Real_Op): New routine.
2133         (Test_Comparison): New routine.
2134         * sem_eval.ads (Test_Comparison): New routine.
2135         * sem_warn.adb (Is_Attribute_Constant_Comparison): New routine.
2136         (Warn_On_Constant_Valid_Condition): New routine.
2137         (Warn_On_Known_Condition): Use Is_Attribute_Constant_Comparison
2138         to detect a specific case.
2139         * sem_warn.adb (Warn_On_Constant_Valid_Condition): New routine.
2140         * urealp.adb (Tree_Read): Add a pair of pragma Warnings On/Off
2141         to defend against a spurious warning in conditional compilation.
2142         (Tree_Write): Add a pair of pragma Warnings On/Off to defend
2143         against a spurious warning in conditional compilation.
2144         * usage.adb Add a pair of pragma Warnings On/Off to defend
2145         against a spurious warning in conditional compilation.
2147 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
2149         * sinfo.ads, sem_ch13.adb: Update comment.
2151 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2153         * sem_util.adb (Is_Post_State): A reference to a
2154         generic in out parameter is considered a change in the post-state
2155         of a subprogram.
2157 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2159         * sem_ch12.adb (Load_Parent_Of_Generic); When retrieving the
2160         declaration of a subprogram instance within its wrapper package,
2161         skip over null statements that may result from the rewriting of
2162         ignored pragmas.
2164 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2166         * exp_attr.adb (Expand_Attribute_Reference, case 'Read):
2167         If the type is an unchecked_union, replace the attribute with
2168         a Raise_Program_Error (rather than inserting such before the
2169         attribute reference) to handle properly the case where we are
2170         processing a component of a larger record, and we need to prevent
2171         further expansion for the unchecked union.
2172         (Expand_Attribute_Reference, case 'Write): If the type is
2173         an unchecked_union, check whether enclosing scope is a Write
2174         subprogram. Replace attribute with a Raise_Program_Error if the
2175         discriminants of the unchecked_union type have not default values
2176         because such a use is erroneous..
2178 2017-04-25  Tristan Gingold  <gingold@adacore.com>
2180         * exp_ch9.adb (Expand_N_Task_Type_Declaration):
2181         Add relative_deadline to task record on edf profile.
2182         (Make_Initialize_Protection): Pass deadline_floor value on edf profile.
2183         (Make_Task_Create_Call): Pass relative_deadline value.
2184         * par-prag.adb (Prag): Handle Pragma_Deadline_Floor.
2185         * s-rident.ads (Profile_Name): Add GNAT_Ravenscar_EDF.
2186         (Profile_Info): Add info for GNAT_Ravenscar_EDF.
2187         * sem_prag.adb (Set_Ravenscar_Profile): Handle
2188         GNAT_Ravenscar_EDF (set scheduling policy).
2189         (Analyze_Pragma): Handle GNAT_Ravenscar_EDF profile and Deadline_Floor
2190         pragma.
2191         (Sig_Flags): Add choice for Pragma_Deadline_Floor.
2192         * snames.ads-tmpl (Name_Deadline_Floor, Name_Gnat_Ravenscar_EDF):
2193         New names.
2194         (Pragma_Deadline_Floor): New pragma.
2195         * targparm.adb (Get_Target_Parameters): Recognize
2196         GNAT_Ravenscar_EDF profile.
2198 2017-04-25  Arnaud Charlet  <charlet@adacore.com trojanek>
2200         * gnatvsn.ads (Library_Version): Bump to 8. Update comment.
2202 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2204         * sem_aux.adb (Nearest_Ancestor): Use original node of type
2205         declaration to locate nearest ancestor, because derived
2206         type declarations for record types are rewritten as record
2207         declarations.
2208         * sem_ch13.adb (Add_Call): Use an unchecked conversion to handle
2209         properly derivations that are completions of private types.
2210         (Add_Predicates): If type is private, examine rep. items of full
2211         view, which may include inherited predicates.
2212         (Build_Predicate_Functions): Ditto.
2214 2017-04-25  Javier Miranda  <miranda@adacore.com>
2216         * sem_util.adb (New_Copy_Tree.Visit_Entity): Extend previous change
2217         to generate new entities for subtype declarations located in
2218         Expression_With_Action nodes.
2220 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2222         * sem_elab.adb (Check_A_Call): Remove
2223         local variables Is_DIC_Proc and Issue_In_SPARK. Verify the
2224         need for Elaborate_All when SPARK elaboration checks are
2225         required. Update the checks for instances, variables, and calls
2226         to Default_Initial_Condition procedures.
2228 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2230         * aspects.ads, aspects.adb: Make the GNAT-specific pragma No_Inline
2231         into a boolean aspect, in analogy with the Ada aspect No_Return.
2233 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2235         * exp_ch6.adb, sem_ch13.adb, sem_ch6.adb: Minor reformatting.
2237 2017-04-25  Bob Duff  <duff@adacore.com>
2239         * sem_res.adb (Resolve_Actuals): Under -gnatd.q, reset
2240         Is_True_Constant for an array variable that is passed to a
2241         foreign function as an 'in' parameter.
2242         * debug.adb: Document -gnatd.q.
2244 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2246         * sem_ch6.adb (Analyze_Expression_Function): If expression function
2247         is completion and return type is an access type do not freeze
2248         designated type: this will be done in the process of freezing
2249         the expression if needed.
2250         (Freeze_Expr_Types): Check whether type is complete before
2251         creating freeze node, to provide a better error message if
2252         reference is premature.
2253         * sem_ch13.adb (Check_Indexing_Functions): Ignore inherited
2254         functions created by type derivations.
2256 2017-04-25  Pascal Obry  <obry@adacore.com>
2258         * g-sercom.ads: Add simple usage of GNAT.Serial_Communication.
2260 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2262         * sem_res.adb (Resolve_Type_Conversion):
2263         When resolving against any fixed type, set the type of the
2264         operand as universal real when the operand is a multiplication
2265         or a division where both operands are of any fixed type.
2266         (Unique_Fixed_Point_Type): Add local variable ErrN. Improve the
2267         placement of an error message by pointing to the operand of a
2268         type conversion rather than the conversion itself.
2270 2017-04-25  Thomas Quinot  <quinot@adacore.com>
2272         * sem_ch13.adb (Build_Predicate_Function_Declaration): Set
2273         Needs_Debug_Info when producing SCOs.
2275 2017-04-25  Thomas Quinot  <quinot@adacore.com>
2277         * exp_ch6.adb (Add_Finalization_Master_Actual_To_Build_In_Place_Call):
2278         Always pass a null finalization master for a library level named access
2279         type to which a pragme No_Heap_Finalization applies.
2281 2017-04-25  Arnaud Charlet  <charlet@adacore.com trojanek>
2283         PR ada/78845
2285         * a-ngcoar.adb, a-ngrear.adb (Inverse): call Unit_Matrix with First_1
2286         set to A'First(2) and vice versa.
2288 2017-04-25  Yannick Moy  <moy@adacore.com>
2290         * freeze.adb (Freeze_Record_Type): Remove obsolete
2291         rule on volatile tagged record restriction on SPARK code.
2293 2017-04-25  Yannick Moy  <moy@adacore.com>
2295         * sem_prag.adb (minor) Fix SPARK RM reference.
2297 2017-04-25  Yannick Moy  <moy@adacore.com>
2299         * sem_util.adb, sem_util.ads (Unique_Defining_Entity): Update
2300         comment to reflect which entity is chosen as unique entity.
2301         (Unique_Entity): Return full view instead of private spec for
2302         protected type or task type. Fix possible incorrect access when
2303         called on entry.
2305 2017-04-25  Eric Botcazou  <ebotcazou@adacore.com>
2307         * sem_res.adb (Set_Slice_Subtype): Treat specially bit-packed
2308         array types only instead of all packed array types.
2310 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2312         * sem_ch6.adb (Conforming_Types): If type of formal as a specified
2313         dimension system, verify that dimensions of both match.
2314         (Check_Conformance): Add error message in case of dimension
2315         mismatch.
2316         * sem_dim.ads, sem_dim.adb (Dimensions_Match): New utility
2317         predicate.
2319 2017-04-25  Arnaud Charlet  <charlet@adacore.com trojanek>
2321         * gnatxref.adb, gnatfind.adb: Avoid using the term project file,
2322         confusing.
2324 2017-04-25  Yannick Moy  <moy@adacore.com>
2326         * sem_util.adb: Minor refactoring.
2327         * freeze.adb (Freeze_Record_Type): Fix checking of SPARK RM 7.1.3(5).
2329 2017-04-25  Claire Dross  <dross@adacore.com>
2331         * sem_prag.adb (Collect_Inherited_Class_Wide_Conditions): Go to
2332         ultimate alias when accessing overridden operation. Indeed, if the
2333         overridden operation is itself inherited, it won't have any explicit
2334         contract.
2336 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2338         * sem_warn.adb (Warn_On_Overlapping_Actuals): There can be no
2339         overlap if the two formals have different types, because formally
2340         the corresponding actuals cannot designate the same objects.
2342 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2344         * sem_dim.adb (Dimensions_Of_Operand): minot cleanups: a) If
2345         dimensions are present from context, use them.  b) If operand is
2346         a static constant rewritten as a literal, obtain the dimensions
2347         from the original declaration, otherwise use dimensions of type
2348         established from context.
2350 2017-04-25  Yannick Moy  <moy@adacore.com>
2352         * sem_util.adb (Is_Effectively_Volatile): Protect against base type
2353         of array that is private.
2355 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
2357         * sem_ch3.adb, exp_util.adb, sem_prag.adb, exp_ch4.adb: Minor
2358         reformatting.
2360 2017-04-25  Yannick Moy  <moy@adacore.com>
2362         * a-ngelfu.adb, a-ngelfu.ads: Add SPARK_Mode On on spec, Off
2363         on body.
2365 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2367         * sem_disp.adb (Check_Dispatching_Context): Add guard to refine
2368         the check that recognizes a call to a private overridding and
2369         replaces the called subprogram with its alias.
2371 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2373         * exp_util.adb: Minor reformatting.
2375 2017-04-25  Justin Squirek  <squirek@adacore.com>
2377         * exp_ch3.adb (Freeze_Type): Add condition to always treat
2378         interface types as a partial view of a private type for the
2379         generation of invariant procedure bodies.
2380         * exp_util.adb, exp_util.ads (Add_Inherited_Invariants):
2381         Add a condition to get the Corresponding_Record_Type for
2382         concurrent types, add condition to return in the absence of a
2383         class in the pragma, remove call to Replace_Type_References,
2384         and add call to Replace_References.
2385         (Add_Interface_Invariatns),
2386         (Add_Parent_Invariants): Modify call to Add_Inherited_Invariants
2387         to including the working type T.
2388         (Add_Own_Invariants): Remove
2389         legacy condition for separate units, remove dispatching for ASIS
2390         and save a copy of the expression in the pragma expression.
2391         (Build_Invariant_Procedure_Body): Default initalize vars,
2392         remove return condition on interfaces, always use the
2393         private type for interfaces, and move the processing of types
2394         until after the processing of invariants for the full view.
2395         (Build_Invariant_Procedure_Declaration): Remove condition
2396         to return if an interface type is encountered and add
2397         condition to convert the formal parameter to its class-wide
2398         counterpart if Work_Typ is abstract.
2399         (Replace_Type): Add call to Remove_Controlling_Arguments.
2400         (Replace_Type_Ref): Remove class-wide dispatching for the current
2401         instance of the type.
2402         (Replace_Type_References): Remove parameter "Derived"
2403         (Remove_Controlling_Arguments): Created in order to removing
2404         the controlliong argument from calls to primitives in the case
2405         of the formal parameter being an class-wide abstract type.
2406         * sem_ch3.adb (Build_Assertion_Bodies_For_Type): Almost identical
2407         to the change made to Freeze_Type in exp_ch3. Add a condition
2408         to treat interface types as a partial view.
2409         * sem_prag.adb (Analyze_Pragma): Modify parameters in the call
2410         to Build_Invariant_Procedure_Declaration to properly generate a
2411         "partial" invariant procedure when Typ is an interface.
2413 2017-04-25  Bob Duff  <duff@adacore.com>
2415         * a-numeri.ads: Go back to using brackets encoding for the Greek
2416         letter pi.
2418 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2420         * sem_ch3.adb (Derive_Subprogram): Implement rule in RM 6.1.1
2421         (10-15): if derived type T with progenitors is abstract,
2422         and primitive P of this type inherits non-trivial classwide
2423         preconditions from both a parent operation and from an interface
2424         operation, then the inherited operation is abstract if the parent
2425         operation is not null.
2426         * sem_disp.ads, sem_disp.adb: replace function Covers_Some_Interface
2427         with Covered_Interface_Op to yield the actual interface operation
2428         that is implemented by a given inherited operation.
2430 2017-04-25  Javier Miranda  <miranda@adacore.com>
2432         * exp_ch4.adb (Expand_N_Op_Expon): Relocate left
2433         and right operands after performing the validity checks. Required
2434         because validity checks may remove side effects from the operands.
2436 2017-04-25  Javier Miranda  <miranda@adacore.com>
2438         * exp_attr.adb (Attribute_Unrestricted_Access):
2439         Do not disable implicit type conversion.  Required to generate
2440         code that displaces the pointer to reference the secondary
2441         dispatch table.
2443 2017-04-25  Pascal Obry  <obry@adacore.com>
2445         * prj-attr.adb, snames.ads-tmpl: Add package Install's
2446         Required_Artifacts attribute.
2448 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2450         * sem_util.adb (Same_Value): String literals are compile-time
2451         values, and comparing them must use Expr_Value_S.
2453 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2455         * sem_ch4.adb (Complete_Object_Interpretation): If an explicit
2456         dereference is introduced for the object, and the object is
2457         overloaded, do not check whether it is aliased, because it may
2458         include an implicit dereference.
2459         * sem_type.adb (Disambiguate): If two interpretations are access
2460         attribute types with the same designated type keep either of
2461         them and do not report an ambiguity.  A true ambiguity will be
2462         reported elsewhere.
2464 2017-04-25  Bob Duff  <duff@adacore.com>
2466         * a-numeri.ads: Change the encoding of Greek letter Pi from
2467         brackets encoding to UTF-8.  Use pragma Wide_Character_Encoding
2468         to indicate the encoding. We considered using a byte order mark
2469         (BOM), but that causes various trouble (misc software eats the
2470         BOM, if you have a patch with a BOM, then it's not at the start
2471         of the patch, so it's not a BOM, the BOM affects with-ing files,
2472         etc.).
2473         * scng.adb, s-wchcnv.adb: Minor.
2475 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2477         * sem_ch3.adb, sem_ch8.adb, sem_disp.adb: Minor reformatting.
2478 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2480         * sem_ch3.adb (Add_Internal_Interface_Entities): Move
2481         Has_Non_Trivial_Precondition to sem_util. for use elsewhere.
2482         Improve error message on operations that inherit non-conforming
2483         classwide preconditions from ancestor and progenitor.
2484         * sem_util.ads, sem_util.adb (Has_Non_Trivial_Precondition):
2485         moved here from sem_ch3.
2486         * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
2487         check given in RM 6.1.1 (17) concerning renamings of overriding
2488         operations that inherits class-wide preconditions from ancestor
2489         or progenitor.
2491 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2493         * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Code cleanup.
2494         (Build_Adjust_Statements): Code cleanup.
2495         (Build_Finalizer): Update the initialization of
2496         Exceptions_OK.
2497         (Build_Finalize_Statements): Code cleanup.
2498         (Build_Initialize_Statements): Code cleanup.
2499         (Make_Deep_Array_Body): Update the initialization of
2500         Exceptions_OK.
2501         (Make_Deep_Record_Body): Update the initialization of Exceptions_OK.
2502         (Process_Object_Declaration): Generate a null exception handler only
2503         when exceptions are allowed.
2504         (Process_Transients_In_Scope): Update the initialization of
2505         Exceptions_OK.
2506         * exp_util.ads, exp_util.adb (Exceptions_In_Finalization_OK): New
2507         routine.
2508         * sem_ch11.adb (Analyze_Exception_Handlers): Do not check any
2509         restrictions when the handler is internally generated and the
2510         mode is warnings.
2512 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2514         * sem_ch3.adb (Has_Non_Trivial_Precondition): New predicate to
2515         enforce legality rule on classwide preconditions inherited from
2516         both an ancestor and a progenitor (RM 6.1.1 (10-13).
2517         * sem_disp.adb (Check_Dispatching_Context): A call to an abstract
2518         subprogram need not be dispatching if it appears in a precondition
2519         for an abstract or null subprogram.
2521 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
2523         * sem_ch10.adb: Minor typo fix.
2525 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
2527         * gcc-interface/Makefile.in: Cleanup VxWorks targets.
2529 2017-04-25  Eric Botcazou  <ebotcazou@adacore.com>
2531         * fname.adb (Is_Internal_File_Name): Arrange for the slices to
2532         have a length which is a power of 2.
2533         (Is_Predefined_File_Name): Likewise. Adjust comment.
2535 2017-04-25  Bob Duff  <duff@adacore.com>
2537         * exp_aggr.adb (Component_Count): Protect the
2538         arithmetic from attempting to convert a value >= 2**31 to Int,
2539         which would otherwise raise Constraint_Error.
2541 2017-04-25  Bob Duff  <duff@adacore.com>
2543         * opt.ads (Locking_Policy): Fix incorrect documentation. The
2544         first character of the policy name is not unique.
2546 2017-04-25  Bob Duff  <duff@adacore.com>
2548         * s-fileio.adb (Name): Raise Use_Error if the file is a temp file.
2549         * s-ficobl.ads (Is_Temporary_File): Remove incorrect comment
2550         about this flag not being used. It was already used, and it is
2551         now used more.
2553 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2555         * einfo.adb Flag301 is now known as Ignore_SPARK_Mode_Pragmas.
2556         (Ignore_SPARK_Mode_Pragmas): New routine.
2557         (Set_Ignore_SPARK_Mode_Pragmas): New routine.
2558         (Write_Entity_Flags): Add an entry for Ignore_SPARK_Mode_Pragmas.
2559         * einfo.ads Add new attribute Ignore_SPARK_Mode_Pragmas and update
2560         related entities.
2561         (Ignore_SPARK_Mode_Pragmas): New routine
2562         along with pragma Inline.
2563         (Set_Ignore_SPARK_Mode_Pragmas): New routine along with pragma Inline.
2564         * opt.ads Rename flag Ignore_Pragma_SPARK_Mode to
2565         Ignore_SPARK_Mode_Pragmas_In_Instance.
2566         * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
2567         Save and restore the value of global flag
2568         Ignore_SPARK_Mode_Pragmas_In_Instance. Set or reinstate the value
2569         of global flag Ignore_SPARK_Mode_Pragmas_In_Instance when either
2570         the corresponding spec or the body must ignore all SPARK_Mode
2571         pragmas found within.
2572         (Analyze_Subprogram_Declaration): Mark
2573         the spec when it needs to ignore all SPARK_Mode pragmas found
2574         within to allow the body to infer this property in case it is
2575         instantiated or inlined later.
2576         * sem_ch7.adb (Analyze_Package_Body_Helper): Save and restore the
2577         value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
2578         the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
2579         when the corresponding spec also ignored all SPARK_Mode pragmas
2580         found within.
2581         (Analyze_Package_Declaration): Mark the spec when
2582         it needs to ignore all SPARK_Mode pragmas found within to allow
2583         the body to infer this property in case it is instantiated or
2584         inlined later.
2585         * sem_ch12.adb (Analyze_Formal_Package_Declaration):
2586         Save and restore the value of flag
2587         Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
2588         formal spec when it needs to ignore all SPARK_Mode
2589         pragmas found within to allow the body to infer this
2590         property in case it is instantiated or inlined later.
2591         (Analyze_Package_Instantiation): Save and restore the value
2592         of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark
2593         the instance spec when it needs to ignore all SPARK_Mode
2594         pragmas found within to allow the body to infer this
2595         property in case it is instantiated or inlined later.
2596         (Analyze_Subprogram_Instantiation): Save and restore the value
2597         of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
2598         instance spec and anonymous package when they need to ignore
2599         all SPARK_Mode pragmas found within to allow the body to infer
2600         this property in case it is instantiated or inlined later.
2601         (Instantiate_Package_Body): Save and restore the value of global
2602         flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set the value of
2603         global flag Ignore_SPARK_Mode_Pragmas_In_Instance when the
2604         corresponding instance spec also ignored all SPARK_Mode pragmas
2605         found within.
2606         (Instantiate_Subprogram_Body): Save and restore the
2607         value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
2608         the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
2609         when the corresponding instance spec also ignored all SPARK_Mode
2610         pragmas found within.
2611         * sem_prag.adb (Analyze_Pragma): Update the reference to
2612         Ignore_Pragma_SPARK_Mode.
2613         * sem_util.adb (SPARK_Mode_Is_Off): A construct which ignored
2614         all SPARK_Mode pragmas defined within yields mode "off".
2616 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2618         * bindgen.adb, exp_dbug.adb, errout.adb, fname.adb: Minor reformatting.
2620 2017-04-25  Bob Duff  <duff@adacore.com>
2622         * exp_atag.adb (Build_CW_Membership): Add "Suppress =>
2623         All_Checks" to avoid generating unnecessary checks.
2624         * exp_ch4.adb (Expand_N_In, Make_Tag_Check): Add "Suppress =>
2625         All_Checks".
2626         * sem.ads: Fix comment.
2627         * expander.ads: Fix comment.
2628         * exp_atag.ads: Fix comment: "Index = 0" should be
2629         "Index >= 0".
2631 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
2633         * s-taprop-linux.adb: Minor editorial fixes.
2635 2017-04-25  Eric Botcazou  <ebotcazou@adacore.com>
2637         * sem_util.adb (New_Copy_Tree): Put back the declarations of the
2638         hash tables at library level.  Reinstate the NCT_Hash_Tables_Used
2639         variable and set it to True whenever the main hash table is
2640         populated.  Short- circuit the Assoc function if it is false
2641         and add associated guards.
2643 2017-04-25  Olivier Hainque  <hainque@adacore.com>
2645         * bindgen.adb (Gen_Elab_Calls): Also update counter of lone
2646         specs without elaboration code that have an elaboration counter
2647         nevertheless, e.g.  when compiled with -fpreserve-control-flow.
2648         * sem_ch10.adb (Analyze_Compilation_Unit):
2649         Set_Elaboration_Entity_Required when requested to preserve
2650         control flow, to ensure the unit elaboration is materialized at
2651         bind time, resulting in the inclusion of the unit object file
2652         in the executable closure at link time.
2654 2017-04-25  Pierre-Marie de Rodat  <derodat@adacore.com>
2656         * exp_dbug.adb: In Debug_Renaming_Declaration,
2657         when dealing with indexed component, accept to produce a renaming
2658         symbol when the index is an IN parameter or when it is a name
2659         defined in an outer scope.
2661 2017-04-25  Yannick Moy  <moy@adacore.com>
2663         * errout.adb (Error_Msg): Adapt continuation
2664         message in instantiations and inlined bodies for info messages.
2666 2017-04-25  Eric Botcazou  <ebotcazou@adacore.com>
2668         * fname.adb (Has_Internal_Extension): Add pragma Inline.
2669         Use direct 4-character slice comparisons.
2670         (Has_Prefix): Add
2671         pragma Inline.  (Has_Suffix): Delete.
2672         (Is_Internal_File_Name):
2673         Test Is_Predefined_File_Name first.
2674         (Is_Predefined_File_Name):
2675         Use direct slice comparisons as much as possible and limit all
2676         comparisons to at most 8 characters.
2678 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2680         * checks.adb (Insert_Valid_Check): Code cleanup.
2681         * exp_ch6.adb (Add_Validation_Call_By_Copy_Code): New routine.
2682         (Expand_Actuals): Generate proper copy-back for a validation
2683         variable when it acts as the argument of a type conversion.
2684         * sem_util.adb (Is_Validation_Variable_Reference): Augment the
2685         predicate to operate on type qualifications.
2687 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2689         * sem_prag.adb, exp_ch6.adb, binde.adb, sem_disp.adb, s-fileio.adb:
2690         Minor reformatting.
2692 2017-04-25  Bob Duff  <duff@adacore.com>
2694         * sem_prag.adb (No_Return): Give an error if the pragma applies
2695         to a body. Specialize the error for the specless body case,
2696         as is done for (e.g.) pragma Convention.
2697         * debug.adb: Add switch -gnatd.J to disable the above legality
2698         checks. This is mainly for use in our test suite, to avoid
2699         rewriting a lot of illegal (but working) code.  It might also
2700         be useful to customers. Under this switch, if a pragma No_Return
2701         applies to a body, and the procedure raises an exception (as it
2702         should), the pragma has no effect. If the procedure does return,
2703         execution is erroneous.
2705 2017-04-25  Bob Duff  <duff@adacore.com>
2707         * exp_ch6.adb (Expand_Actuals): This is the
2708         root of the problem. It took N as an 'in out' parameter, and in
2709         some cases, rewrote N, but then set N to Original_Node(N). So
2710         the node returned in N had no Parent. The caller continued
2711         processing of this orphaned node. In some cases that caused a
2712         crash (e.g. Remove_Side_Effects climbs up Parents in a loop,
2713         and trips over the Empty Parent). The solution is to make N an
2714         'in' parameter.  Instead of rewriting it, return the list of
2715         post-call actions, so the caller can do the rewriting later,
2716         after N has been fully processed.
2717         (Expand_Call_Helper): Move most of Expand_Call here. It has
2718         too many premature 'return' statements, and we want to do the
2719         rewriting on return.
2720         (Insert_Post_Call_Actions): New procedure to insert the post-call
2721         actions in the appropriate place. In the problematic case,
2722         that involves rewriting N as an Expression_With_Actions.
2723         (Expand_Call): Call the new procedures Expand_Call_Helper and
2724         Insert_Post_Call_Actions.
2726 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2728         * sem_prag.adb (Inherits_Class_Wide_Pre): Cleanup code, handle
2729         properly type derived from generic formal types, to handle
2730         properly modified version of ACATS 4.1B B611017.
2732 2017-04-25  Javier Miranda  <miranda@adacore.com>
2734         * exp_unst.adb (Subp_Index): Adding missing
2735         support for renamings and functions that return a constrained
2736         array type (i.e. functions for which the frontend built a
2737         procedure with an extra out parameter).
2739 2017-04-25  Pascal Obry  <obry@adacore.com>
2741         * s-string.adb: Minor code clean-up.
2743 2017-04-25  Bob Duff  <duff@adacore.com>
2745         * s-os_lib.ads, s-os_lib.adb (Non_Blocking_Wait_Process): New
2746         procedure.
2747         * adaint.h, adaint.c (__gnat_portable_no_block_wait): C support
2748         function for Non_Blocking_Wait_Process.
2750 2017-04-25  Bob Duff  <duff@adacore.com>
2752         * prep.adb (Preprocess): Remove incorrect
2753         Assert. Current character can be ASCII.CR.
2755 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2757         * sem_prag.adb (Set_Convention_From_Pragma): Cleanup code for
2758         convention Stdcall, which has a number of exceptions. Convention
2759         is legal on a component declaration whose type is an anonymous
2760         access to subprogram.
2762 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2764         * sem_ch4.adb: sem_ch4.adb Various reformattings.
2765         (Try_One_Prefix_Interpretation): Use the base type when dealing
2766         with a subtype created for purposes of constraining a private
2767         type with discriminants.
2769 2017-04-25  Javier Miranda  <miranda@adacore.com>
2771         * einfo.ads, einfo.adb (Has_Private_Extension): new attribute.
2772         * warnsw.ads, warnsw.adb (All_Warnings): Set warning on late
2773         dispatching primitives (Restore_Warnings): Restore warning on
2774         late dispatching primitives (Save_Warnings): Save warning on late
2775         dispatching primitives (Do_Warning_Switch): Use -gnatw.j/-gnatw.J
2776         to enable/disable this warning.
2777         (WA_Warnings): Set warning on late dispatching primitives.
2778         * sem_ch3.adb (Analyze_Private_Extension_Declaration): Remember
2779         that its parent type has a private extension.
2780         * sem_disp.adb (Warn_On_Late_Primitive_After_Private_Extension):
2781         New subprogram.
2782         * usage.adb: Document -gnatw.j and -gnatw.J.
2784 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2786         * exp_ch7.adb, checks.adb, sem_prag.adb, eval_fat.adb: Minor
2787         reformatting.
2789 2017-04-25  Bob Duff  <duff@adacore.com>
2791         * binde.adb (Validate): Do not pass dynamic strings
2792         to pragma Assert, because older compilers do not support that.
2794 2017-04-25  Bob Duff  <duff@adacore.com>
2796         * s-fileio.adb (Close): When a temp file is
2797         closed, delete it and clean up its Temp_File_Record immediately,
2798         rather than waiting until later.
2799         (Temp_File_Record): Add File
2800         component, so Close can know which Temp_File_Record corresponds
2801         to the file being closed.
2802         (Delete): Don't delete temp files,
2803         because they are deleted by Close.
2804         (Open): Set the File component
2805         of Temp_File_Record. This requires moving the creation of the
2806         Temp_File_Record to the end, after the AFCB has been created.
2808 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2810         * checks.adb (Insert_Valid_Check): Do not generate
2811         a validity check when inside a generic.
2813 2017-04-25  Yannick Moy  <moy@adacore.com>
2815         * sem_res.adb (Resolve_Type_Conversion): Fix bad logic.
2817 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
2819         * snames.ads-tmpl (Snames): More names for detecting predefined
2820         potentially blocking subprograms.
2822 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2824         * sem_prag.adb (Analyze_Pre_Post_Condition): The rules
2825         concerning inheritance of class-wide preconditions do not apply
2826         to postconditions.
2828 2017-04-25  Bob Duff  <duff@adacore.com>
2830         * s-ficobl.ads: Minor comment fix.
2832 2017-04-25  Yannick Moy  <moy@adacore.com>
2834         * checks.adb (Apply_Scalar_Range_Check): Analyze precisely
2835         conversions from float to integer in GNATprove mode.
2836         (Apply_Type_Conversion_Checks): Make sure in GNATprove mode
2837         to call Apply_Type_Conversion_Checks, so that range checks
2838         are properly positioned when needed on conversions, including
2839         when converting from float to integer.  (Determine_Range): In
2840         GNATprove mode, take into account the possibility of conversion
2841         from float to integer.
2842         * sem_res.adb (Resolve_Type_Conversion): Only enforce range
2843         check on conversions from fixed-point to integer, not anymore
2844         on conversions from floating-point to integer, when in GNATprove
2845         mode.
2847 2017-04-25  Yannick Moy  <moy@adacore.com>
2849         * checks.adb (Determine_Range_R): Special case type conversions
2850         from integer to float in order to get bounds in that case too.
2851         * eval_fat.adb (Machine): Avoid issuing warnings in GNATprove
2852         mode, for computations involved in interval checking.
2854 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2856         * checks.adb (Insert_Valid_Check): Partially reimplement validity
2857         checks.
2858         * einfo.adb Node36 is now used as Validated_Object.
2859         (Validated_Object): New routine.
2860         (Set_Validated_Object): New routine.
2861         (Write_Field36_Name): Add an entry for Validated_Object.
2862         * einfo.ads Add new attribute Validated_Object along with
2863         usage in entities.
2864         (Validated_Object): New routine along with pragma Inline.
2865         (Set_Validated_Object): New routine along with pragma Inline.
2866         * exp_attr.adb (Make_Range_Test): Add processing for validation
2867         variables to avoid extra reads and copies of the prefix.
2868         * exp_ch6.adb (Expand_Actuals): Add copy-back for validation
2869         variables in order to reflect any changes done in the variable
2870         back into the original object.
2871         * sem_util.adb (Is_Validation_Variable_Reference): New routine.
2872         * sem_util.ads (Is_Validation_Variable_Reference): New routine.
2874 2017-04-25  Steve Baird  <baird@adacore.com>
2876         * exp_ch7.adb (Build_Array_Deep_Procs,
2877         Build_Record_Deep_Procs, Make_Finalize_Address_Body): Don't
2878         generate Finalize_Address routines for CodePeer.
2880 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2882         * sem_prag.adb (Inherits_Class_Wide_Pre): subsidiary of
2883         Analyze_Pre_Post_Condition, to implement the legality checks
2884         mandated by AI12-0131: Pre'Class shall not be specified for an
2885         overriding primitive subprogram of a tagged type T unless the
2886         Pre'Class aspect is specified for the corresponding primitive
2887         subprogram of some ancestor of T.
2889 2017-04-25  Bob Duff  <duff@adacore.com>
2891         * sem_ch8.adb (Use_One_Type): If a use_type_clause
2892         is redundant, set its Used_Operations to empty. This is only
2893         necessary for use clauses that appear in the parent of a generic
2894         child unit, because those use clauses get reanalyzed when we
2895         instantiate the generic, and we don't want the Used_Operations
2896         carried over from the original context (where it was probably
2897         not redundant).
2899 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2901         * exp_ch6.adb: Minor reformatting.
2903 2017-04-25  Bob Duff  <duff@adacore.com>
2905         * sem_prag.adb (Process_Restrictions_Or_Restriction_Warnings):
2906         Use Source_Index (Current_Sem_Unit) to find the correct casing.
2907         * exp_prag.adb (Expand_Pragma_Check): Use Source_Index
2908         (Current_Sem_Unit) to find the correct casing.
2909         * par.adb (Par): Null out Current_Source_File, to ensure that
2910         the above bugs won't rear their ugly heads again.
2912 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2914         * sem_ch8.adb (Find_Type): For an attribute reference
2915         'Class, if prefix type is synchronized and previous errors
2916         have suppressed the creation of the corresponding record type,
2917         create a spurious class-wide for the synchonized type itself,
2918         to catch other misuses of the attribute
2920 2017-04-25  Steve Baird  <baird@adacore.com>
2922         * exp_ch6.adb (Expand_Simple_Function_Return): if CodePeer_Mode
2923         is True, then don't generate the accessibility check for the
2924         tag of a tagged result.
2925         * exp_intr.adb (Expand_Dispatching_Constructor_Call):
2926         if CodePeer_Mode is True, then don't generate the
2927         tag checks for the result of call to an instance of
2928         Ada.Tags.Generic_Dispatching_Constructor (i.e., both the "is a
2929         descendant of" check and the accessibility check).
2931 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2933         * sem_ch13.adb: Code cleanups.
2934         * a-strbou.ads: minor whitespace fix in Trim for bounded strings.
2935         * sem_ch8.ads: Minor comment fix.
2937 2017-04-25  Eric Botcazou  <ebotcazou@adacore.com>
2939         * exp_ch4.adb (Library_Level_Target): New function.
2940         (Expand_Concatenate): When optimization is enabled, also expand
2941         the operation out-of-line if the concatenation is present within
2942         the expression of the declaration of a library-level object and
2943         not only if it is the expression of the declaration.
2945 2017-04-25  Bob Duff  <duff@adacore.com>
2947         * freeze.adb (Freeze_Object_Declaration): Do
2948         not Remove_Side_Effects if there is a pragma Linker_Section,
2949         because in that case we want static initialization in the
2950         appropriate section.
2952 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
2954         * exp_dbug.adb: Minor rewording and reformatting.
2956 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
2958         * sem_attr.adb (Statically_Denotes_Object): New predicate, to
2959         handle the proposed changes to rules concerning potentially
2960         unevaluated expressions, to include selected components that
2961         do not depend on discriminants, and indexed components with
2962         static indices.
2963         * sem_util.adb (Is_Potentially_Unevaluated): Add check for
2964         predicate in quantified expression, and fix bugs in the handling
2965         of case expressions and membership test.
2966         (Analyze_Attribute_Old_Result): use new predicate.
2967         (Analyze_Attribute, case Loop_Entry): ditto.
2969 2017-04-25  Bob Duff  <duff@adacore.com>
2971         * s-secsta.adb (SS_Info): Add a comment
2972         explaining why we don't need to walk all the chunks in order to
2973         compute the total size.
2975 2017-04-25  Bob Duff  <duff@adacore.com>
2977         * namet.ads, namet.adb (Global_Name_Buffer): Increase the length
2978         of the global name buffer to 4*Max_Line_Length.
2980 2017-04-25  Javier Miranda  <miranda@adacore.com>
2982         * exp_ch8.adb (Expand_N_Object_Renaming_Declaration): When creating a
2983         renaming entity for debug information, mark the entity as needing debug
2984         info if it comes from sources.
2986 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
2988         * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Remove the
2989         restriction converning the use of 'Address where the prefix is
2990         of a controlled type.
2992 2017-04-25  Pierre-Marie de Rodat  <derodat@adacore.com>
2994         * exp_dbug.adb: In Debug_Renaming_Declaration,
2995         skip slices that are made redundant by an indexed component
2996         access.
2997         * atree.h: New definition for Original_Node.
2999 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3001         * sem_prag.adb, sem_prag.ads: Minor reformatting.
3003 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3005         * sem_ch3.adb (Check_Entry_Contract): Call
3006         Preanalyze_Spec_Expression so that resolution takes place as well.
3007         * sem_util.adb (Check_Internal_Protected_Use): Reject properly
3008         internal calls that appear in preconditions of protected
3009         operations, in default values for same, and in contract guards
3010         for contract cases in SPARK.
3012 2017-04-25  Eric Botcazou  <ebotcazou@adacore.com>
3014         * a-numaux.ads: Fix description of a-numaux-darwin
3015         and a-numaux-x86.
3016         (Double): Define to Long_Float.
3017         * a-numaux-vxworks.ads (Double): Likewise.
3018         * a-numaux-darwin.ads
3019         (Double): Likewise.
3020         * a-numaux-libc-x86.ads (Double): Define to Long_Long_Float.
3021         * a-numaux-x86.ads: Fix package description.
3022         * a-numaux-x86.adb (Is_Nan): Minor tweak.
3023         (Reduce): Adjust and complete description. Call Is_Nan instead of
3024         testing manually. Use an integer temporary to hold rounded value.
3025         * a-numaux-darwin.adb (Reduce): Likewise.
3026         (Is_Nan): New function.
3028 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3030         * sem_ch4.adb (Analyze_Selected_Component): Additional refinement
3031         on analysis of prefix whose type is a current instance of a
3032         synchronized type, but where the prefix itself is an entity that
3033         is an object.
3035 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3037         * exp_ch5.adb (Replace_Target): When rewriting the RHS, preserve
3038         the identity of callable entities therein, because they have been
3039         properly resolved, and prefixed calls may have been rewritten
3040         as normal calls.
3042 2017-04-25  Patrick Bernardi  <bernardi@adacore.com>
3044         * exp_ch3.adb (Build_Init_Statements): Convert
3045         the expression of the pragma/aspect Secondary_Stack_Size to
3046         internal type System.Parameters.Size_Type before assigning
3047         it to the Secondary_Stack_Size component of the task type's
3048         corresponding record.
3050 2017-04-25  Eric Botcazou  <ebotcazou@adacore.com>
3052         * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal
3053         (etc) optimizations when the type is modular and the offsets
3054         are equal.
3056 2017-04-25  Eric Botcazou  <ebotcazou@adacore.com>
3058         * s-osinte-freebsd.ads: Minor comment tweaks
3060 2017-04-25  Javier Miranda  <miranda@adacore.com>
3062         * urealp.adb (UR_Write): Reverse previous patch
3063         adding documentation on why we generate multiplications instead
3064         of divisions (needed to avoid expressions whose computation with
3065         large numbers may cause division by 0).
3067 2017-04-25  Bob Duff  <duff@adacore.com>
3069         * erroutc.adb (Set_Specific_Warning_Off,
3070         Set_Warnings_Mode_Off): Use the correct source file for
3071         Stop. Was using Current_Source_File, which is only valid during
3072         parsing. Current_Source_File will have a leftover value from
3073         whatever file happened to be parsed last, because of a with_clause
3074         or something.
3076 2017-04-25  Bob Duff  <duff@adacore.com>
3078         * lib.ads, lib.adb (In_Internal_Unit): New functions similar
3079         to In_Predefined_Unit, but including GNAT units.
3080         * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): Replace
3081         with Should_Ignore_Pragma_Par and Should_Ignore_Pragma_Sem,
3082         because Should_Ignore_Pragma was not working reliably outside
3083         the parser, because Current_Source_File is not valid.
3084         * sem_prag.adb, exp_prag.adb: Call Should_Ignore_Pragma_Sem.
3085         * par-prag.adb: Call Should_Ignore_Pragma_Par.
3087 2017-04-25  Arnaud Charlet  <charlet@adacore.com trojanek>
3089         * gnat1drv.adb (Gnat1Drv): Disable Generate_Processed_File in
3090         codepeer mode.
3092 2017-04-25  Javier Miranda  <miranda@adacore.com>
3094         * urealp.adb (UR_Write): Fix output of constants with a base other
3095         that 10.
3097 2017-04-25  Justin Squirek  <squirek@adacore.com>
3099         * sem_ch13.adb (Get_Interfacing_Aspects): Moved to sem_util.adb.
3100         * sem_prag.adb (Analyze_Pragma, Process_Import_Or_Interface):
3101         Add extra parameter for Process_Interface_Name.
3102         (Process_Interface_Name): Add parameter for pragma to analyze
3103         corresponding aspect.
3104         * sem_util.ads, sem_util.adb (Get_Interfacing_Aspects): Added
3105         from sem_ch13.adb
3107 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
3109         * exp_ch7.adb, einfo.ads, sem_prag.adb: Minor reformatting and typo
3110         correction.
3112 2017-04-25  Yannick Moy  <moy@adacore.com>
3114         * sem_res.adb (Resolve_Comparison_Op): Do not
3115         attempt evaluation of relational operations inside assertions.
3117 2017-04-25  Justin Squirek  <squirek@adacore.com>
3119         * exp_util.adb (Add_Interface_Invariants):
3120         Restored, code moved back from Build_Invariant_Procedure_Body.
3121         (Add_Parent_Invariants): Restored, code moved back from
3122         Build_Invariant_Procedure_Body.
3123         (Build_Invariant_Procedure_Body):
3124         Remove refactored calls and integrated code from
3125         Add_Parent_Invariants and Add_Interface_Invariants.
3127 2017-04-25  Johannes Kanig  <kanig@adacore.com>
3129         * errout.adb (Output_Messages): Adjust computation of total
3130         errors
3131         * erroutc.adb (Error_Msg): In statistics counts, deal
3132         correctly with informational messages that are not warnings.
3133         * errutil.adb (Finalize): adjust computation of total errors.
3135 2017-04-25  Arnaud Charlet  <charlet@adacore.com trojanek>
3137         * terminals.c (__gnat_terminate_pid): New.
3138         * g-exptty.ads (Terminate_Process): New. Update comments.
3140 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
3142         * a-cfinve.ads, a-cofove.ads (Empty_Vector): add Global contract.
3144 2017-04-25  Justin Squirek  <squirek@adacore.com>
3146         * sem_ch3.adb (Analyze_Declarations): Minor
3147         correction to comments, move out large conditional and scope
3148         traversal into a predicate.
3149         (Uses_Unseen_Lib_Unit_Priv): Predicate function made from extracted
3150         logic.
3152 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3154         * sem_ch4.adb (Analyze_Selected_Component): Refine analysis
3155         of prefix whose type is a current instance of a synchronized
3156         type. If the prefix is an object this is an external call (or
3157         requeue) that can only access public operations of the object. The
3158         previous predicate was too restrictive, and did not allow public
3159         protected operations, only task entries.
3161 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3163         * sem_ch5.adb, fname.adb: Minor reformatting.
3165 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3167         * einfo.adb (Is_Anonymous_Access_Type): New routine.
3168         * einfo.ads Update the placement of
3169         E_Anonymous_Access_Subprogram_Type along with all subtypes that
3170         mention the ekind.
3171         (Is_Anonymous_Access_Type): New routine.
3172         * exp_ch7.adb (Allows_Finalization_Master): Do not generate a
3173         master for an access type subject to pragma No_Heap_Finalization.
3174         * exp_util.adb (Build_Allocate_Deallocate_Proc): An object being
3175         allocated or deallocated does not finalization actions if the
3176         associated access type is subject to pragma No_Heap_Finalization.
3177         * opt.ads Add new global variable No_Heap_Finalization_Pragma.
3178         * par-prag.adb Pragma No_Heap_Finalization does not need special
3179         processing from the parser.
3180         * sem_ch6.adb (Check_Return_Subtype_Indication): Remove ancient
3181         ??? comments. Use the new predicate Is_Anonymous_Access_Type.
3182         * sem_prag.adb Add an entry in table Sig_Flags for pragma
3183         No_Heap_Finalization.
3184         (Analyze_Pragma): Add processing for
3185         pragma No_Heap_Finalization. Update various error messages to
3186         use Duplication_Error.
3187         * sem_util.ads, sem_util.adb (No_Heap_Finalization): New routine.
3188         * snames.ads-tmpl: Add new predefined name No_Heap_Finalization
3189         and corresponding pragma id.
3191 2017-04-25  Bob Duff  <duff@adacore.com>
3193         * freeze.adb (Freeze_Record_Type): Use the
3194         underlying type of the component type to determine whether it's
3195         elementary. For representation clause purposes, a private type
3196         should behave the same as its full type.
3197         * fname.ads, fname.adb (Is_Predefined_File_Name):
3198         Make sure things like "system.ali" are recognized as predefined.
3200 2017-04-25  Javier Miranda  <miranda@adacore.com>
3202         * debug.adb: Update documentation of -gnatd.6.
3204 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3206         * sem_ch5.adb (Preanalyze_Range): Handle properly an Ada2012
3207         element iterator when the name is an overloaded function call,
3208         one of whose interpretations yields an array.
3210 2017-04-25  Bob Duff  <duff@adacore.com>
3212         * uname.ads, uname.adb (Is_Predefined_Unit_Name,
3213         Is_Internal_Unit_Name): New functions for operating on unit
3214         names, as opposed to file names. There's some duplicated code
3215         with fname.adb, which is unfortunate, but it seems like we don't
3216         want to add dependencies here.
3217         * fname-uf.adb (Get_File_Name): Change Is_Predefined_File_Name
3218         to Is_Predefined_Unit_Name; the former was wrong, because Uname
3219         is not a file name at all.
3220         * fname.ads, fname.adb: Document the fact that
3221         Is_Predefined_File_Name and Is_Internal_File_Name can be called
3222         for ALI files, and fix the code so it works properly for ALI
3223         files. E.g. these should return True for "system.ali".
3225 2017-04-25  Justin Squirek  <squirek@adacore.com>
3227         * exp_util.adb (Add_Invariant): Removed,
3228         code moved to Add_Invariant_Check, Add_Inherited_Invariant,
3229         and Add_Own_Invariant.  (Add_Invariant_Check): Used
3230         for adding runtime checks from any kind of invariant.
3231         (Add_Inherited_Invariant): Generates invariant checks for
3232         class-wide invariants (Add_Interface_Invariants): Removed, code
3233         moved to Build_Invariant_Procedure_Body (Add_Own_Invariant):
3234         Create a types own invariant procedure (Add_Parent_Invariants):
3235         Removed, code moved to Build_Invariant_Procedure_Body
3236         (Build_Invariant_Procedure_Body): Add refactored calls
3237         and integrated code from Add_Parent_Invariants and
3238         Add_Interface_Invariants.
3239         (Process_Type): Removed, the
3240         relavant code was inlined into both Add_Own_Invariant and
3241         Add_Inherited_Invariant.
3243 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3245         * make.adb, par-ch2.adb, sem_util.adb, scans.ads, sem_ch8.adb,
3246         scn.adb, osint.adb, fname.adb: Minor reformatting.
3248 2017-04-25  Pascal Obry  <obry@adacore.com>
3250         * s-taprop-mingw.adb: Do not check for CloseHandle in
3251         Finalize_TCB.
3253 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3255         * sem_util.adb (Check_Part_Of_Reference):
3256         Continue to examine the context if the reference appears within
3257         an expression function.
3259 2017-04-25  Justin Squirek  <squirek@adacore.com>
3261         * exp_ch7.adb, exp_ch7.ads Remove Build_Invariant_Procedure_Body
3262         and Build_Invariant_Procedure_Declaration.
3263         * exp_util.ads, exp_util.adb Add Build_Invariant_Procedure_Body
3264         and Build_Invariant_Procedure_Declaration from exp_ch7
3265         and break-out Is_Untagged_Private_Derivation from
3266         Build_Invariant_Procedure_Body.
3267         (Replace_Type_References):
3268         Append an extra parameter to allow for dispatching replacements
3269         and add the corrasponding logic.
3270         (Type_Invariant): Remove
3271         Replace_Typ_Refs and replace its references with calls to
3272         Replace_Type_References.
3273         * sem_ch3.adb, sem_prag.adb: Remove with and use of exp_ch7.
3275 2017-04-25  Bob Duff  <duff@adacore.com>
3277         * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): New function
3278         that returns True when appropriate.
3279         * par-prag.adb, exp_prag.adb, sem_prag.adb: Do not ignore pragmas
3280         when compiling predefined files.
3281         * fname.ads, fname.adb (Is_Predefined_File_Name): Fix bug:
3282         "gnat.adc" should not be considered a predefined file name.
3283         That required (or at least encouraged) a lot of cleanup of global
3284         variable usage. We shouldn't be communicating information via
3285         the global name buffer.
3286         * bindgen.adb, errout.adb, fname-uf.adb, lib-load.adb, make.adb,
3287         * restrict.adb, sem_ch10.adb, sem_ch6.adb, sem_ch8.adb: Changes
3288         required by the above-mentioned cleanup.
3290 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3292         * osint.adb (Find_File): Handle properly a request for a
3293         configuration file whose name is a directory.
3295 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3297         * sem_attr.adb, sem_ch5.adb: Minor reformatting.
3299 2017-04-25  Bob Duff  <duff@adacore.com>
3301         * types.ads: Minor: Fix '???' comment.
3302         * sem_ch8.adb: Minor comment fix.
3304 2017-04-25  Bob Duff  <duff@adacore.com>
3306         * sem_prag.adb: Remove suspicious uses of Name_Buf.
3307         * stringt.ads, stringt.adb, exp_dbug.adb, sem_dim.adb: Remove
3308         Add_String_To_Name_Buffer, to avoid using the global Name_Buf.
3309         Add String_To_Name with no side effects.
3311 2017-04-25  Justin Squirek  <squirek@adacore.com>
3313         * sem_ch3.adb (Analyze_Declarations): Add
3314         additional condition for edge case.
3316 2017-04-25  Bob Duff  <duff@adacore.com>
3318         * par-ch2.adb, scans.ads, scn.adb: Do not give an error for
3319         reserved words inside pragmas. This is necessary to allow the
3320         pragma name Interface to be used in pragma Ignore_Pragma.
3321         * par.adb: Minor comment fix.
3323 2017-04-25  Javier Miranda  <miranda@adacore.com>
3325         * a-tags.ads, a-tags.adb (Type_Is_Abstract): Renamed as Is_Abstract.
3326         * rtsfind.ads (RE_Type_Is_Abstract): Renamed as Is_Abstract.
3327         * exp_disp.adb (Make_DT): Update occurrences of RE_Type_Is_Abstract.
3328         * exp_intr.adb (Expand_Dispatching_Constructor_Call): Update
3329         occurrences of RE_Type_Is_Abstract
3331 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3333         * exp_util.adb (Build_Chain): Account for ancestor
3334         subtypes while traversing the derivation chain.
3336 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3338         * sem_attr.adb: minor reformatting.
3340 2017-04-25  Doug Rupp  <rupp@adacore.com>
3342         * sigtramp-vxworks-target.inc [PPC64]: Add a .localentry pseudo-op.
3344 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3346         * sem_ch5.adb (Analyze_Assignment): Reset Full_Analysis flag on
3347         the first pass over an assignment statement with target names,
3348         to prevent the generation of subtypes (such as discriminated
3349         record components)that may carry the target name outside of the
3350         tree for the assignment. The subtypes will be generated when
3351         the assignment is reanalyzed in full.
3352         (Analyze_Target_Name): Handle properly class-wide types.
3354 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3356         * elists.ads, elists.adb (Prepend_Unique_Elmt): New routine.
3357         * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
3358         the purposes of freezing.
3359         * exp_util.adb Update the documentation and structure of the
3360         type map used in class-wide semantics of assertion expressions.
3361         (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
3362         and resolve the triaged expression because all substitutions
3363         refer to the proper entities.  Update the replacement of
3364         references.
3365         (Build_DIC_Procedure_Body): Add formal parameter
3366         For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
3367         are now only processed when freezing occurs.  Build a body only
3368         when one is needed.
3369         (Entity_Hash): Removed.
3370         (Map_Types): New routine.
3371         (Replace_Object_And_Primitive_References): Removed.
3372         (Replace_References): New routine.
3373         (Replace_Type_References): Moved to the library level of Exp_Util.
3374         (Type_Map_Hash): New routine.
3375         (Update_Primitives_Mapping): Update the mapping call.
3376         (Update_Primitives_Mapping_Of_Types): Removed.
3377         * exp_util.ads (Build_DIC_Procedure_Body): Add formal
3378         parameter For_Freeze and update the comment on usage.
3379         (Map_Types): New routine.
3380         (Replace_References): New routine.
3381         (Replace_Type_References): Moved to the library level of Exp_Util.
3382         (Update_Primitives_Mapping_Of_Types): Removed.
3383         * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
3384         properties of the private type to the full view in case the full
3385         view derives from a parent type and inherits a DIC pragma.
3386         * sem_prag.adb (Analyze_Pragma): Guard against a case where a
3387         DIC pragma is placed at the top of a declarative region.
3389 2017-04-25  Arnaud Charlet  <charlet@adacore.com trojanek>
3391         * a-tasatt.adb: Complete previous change and use an unsigned
3392         int to avoid overflow checks.
3394 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3396         * sem_attr.adb (Analyze_Attribute, case 'Access): Specialize
3397         the error message when the attribute reference is an actual in
3398         a call to a subprogram inherited from a generic formal type with
3399         unknown discriminants, which makes the subprogram and its formal
3400         parameters intrinsic (see RM 6.3.1 (8) and (13)).
3402 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3404         * sem_aggr.adb, inline.adb, einfo.adb, einfo.ads, scng.adb,
3405         sem_prag.adb: Minor reformatting.
3407 2017-04-25  Bob Duff  <duff@adacore.com>
3409         * sem_attr.adb (Type_Key): Add code in the
3410         recursive Compute_Type_Key to protect against fetching the source
3411         code for Standard, in case a component of the type is declared
3412         in Standard. There was already code to do this for the original
3413         type, but not for its components.
3415 2017-04-25  Javier Miranda  <miranda@adacore.com>
3417         * exp_ch3.adb (Build_Initialization_Call): Handle
3418         subtypes of private types when searching for the underlying full
3419         view of a private type.
3421 2017-04-25  Javier Miranda  <miranda@adacore.com>
3423         * sem_res.adb (Set_Mixed_Mode_Operand): A universal
3424         real conditional expression can appear in a fixed-type context
3425         and must be resolved with that context to facilitate the code
3426         generation to the backend.
3428 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3430         * einfo.adb, einfo.ads (Body_Needed_For_Inlining): New flag,
3431         to indicate whether during inline processing, when some unit U1
3432         appears in the context of a unit U2 compiled for instantiation
3433         or inlining purposes, the body of U1 needs to be compiled as well.
3434         * sem_prag.adb (Process_Inline): Set Body_Needed_For_Inlining if
3435         context is a package declaration.
3436         * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration,
3437         Analyze_Generic_Package_Declaration): ditto.
3438         * inline.adb (Analyze_Inlined_Bodies): Check
3439         Body_Needed_For_Inlining.
3441 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3443         * par.adb (Current_Assign_Node): Global variable use to record
3444         the presence of a target_name in the right hand side of the
3445         assignment being parsed.
3446         * par-ch4.adb (P_Name): If the name is a target_name, mark the
3447         enclosing assignment node accordingly.
3448         * par-ch5.adb (P_Assignment_Statement): Set Current_Assign_Node
3449         appropriately.
3450         * sem_ch5.adb (Analyze_Assignment): Disable expansion before
3451         analyzing RHS if the statement has target_names.
3452         * sem_aggr.adb (Resolve_Iterated_Component_Association): Handle
3453         properly choices that are subtype marks.
3454         * exp_ch5.adb: Code cleanup.
3456 2017-04-25  Bob Duff  <duff@adacore.com>
3458         * s-memory.adb: Add a comment regarding efficiency.
3459         * atree.adb: Fix the assertion, and combine 2 assertions into one,
3460         "the source has an extension if and only if the destination does."
3461         * sem_ch3.adb, sem_ch13.adb: Address ??? comments.
3463 2017-04-25  Arnaud Charlet  <charlet@adacore.com trojanek>
3465         * a-tasatt.adb (Set_Value): Fix handling of 32bits -> 64bits
3466         conversion.
3468 2017-04-25  Doug Rupp  <rupp@adacore.com>
3470         * init.c (__gnat_error_handler) [vxworks]: Turn on sigtramp
3471         handling for ppc64-vx7.
3472         * sigtramp-vxworks-target.inc
3473         [SIGTRAMP_BODY]: Add section for ppc64-vx7.
3475 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
3477         * ada_get_targ.adb: New file.
3479 2017-04-25  Bob Duff  <duff@adacore.com>
3481         * uintp.adb (Most_Sig_2_Digits): In case Direct (Right), fetch
3482         Direct_Val (Right), instead of the incorrect Direct_Val (Left).
3483         (UI_GCD): Remove ??? comment involving possible efficiency
3484         improvements. This just isn't important after all these years.
3485         Also minor cleanup.
3486         * uintp.ads: Minor cleanup.
3488 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3490         * exp_util.adb, exp_util.ads, sem_ch7.adb, sem_prag.adb, exp_ch3.adb:
3491         Revert previous changes.
3492         * scng.adb: Minor reformatting.
3493         * s-stratt.ads: Fix unbalanced parens in comment.
3495 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3497         * sem_ch3.adb, exp_util.adb, sem_prag.adb, freeze.adb, sem_util.adb:
3498         Minor reformatting.
3500 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3502         * scng.adb (Scan): Handle '@' appropriately.
3503         * sem_ch5.adb: Code cleanup.
3505 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3507         * freeze.adb (Check_Expression_Function): Do not check for the
3508         use of deferred constants if the freezing of the expression
3509         function is triggered by its generated body, rather than a
3510         premature use.
3512 2017-04-25  Javier Miranda  <miranda@adacore.com>
3514         * exp_attr.adb (Rewrite_Stream_Proc_Call): Handle
3515         subtypes of private types when performing the view conversion.
3517 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3519         * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
3520         the purposes of freezing.
3521         * exp_util.adb Update the documentation and structure of the
3522         type map used in class-wide semantics of assertion expressions.
3523         (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
3524         and resolve the triaged expression because all substitutions
3525         refer to the proper entities.  Update the replacement of
3526         references.
3527         (Build_DIC_Procedure_Body): Add formal parameter
3528         For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
3529         are now only processed when freezing occurs.  Build a body only
3530         when one is needed.
3531         (Entity_Hash): Removed.
3532         (Map_Types): New routine.
3533         (Replace_Object_And_Primitive_References): Removed.
3534         (Replace_References): New routine.
3535         (Replace_Type_References): Moved to the library level of Exp_Util.
3536         (Type_Map_Hash): New routine.
3537         (Update_Primitives_Mapping): Update the mapping call.
3538         (Update_Primitives_Mapping_Of_Types): Removed.
3539         * exp_util.ads (Build_DIC_Procedure_Body): Add formal
3540         parameter For_Freeze and update the comment on usage.
3541         (Map_Types): New routine.
3542         (Replace_References): New routine.
3543         (Replace_Type_References): Moved to the library level of Exp_Util.
3544         (Update_Primitives_Mapping_Of_Types): Removed.
3545         * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
3546         properties of the private type to the full view in case the full
3547         view derives from a parent type and inherits a DIC pragma.
3548         * sem_prag.adb (Analyze_Pragma): Guard against a case where a
3549         DIC pragma is placed at the top of a declarative region.
3551 2017-04-25  Tristan Gingold  <gingold@adacore.com>
3553         * s-mmap.ads (Data): Add pragma Inline.
3555 2017-04-25  Hristian Kirtchev  <kirtchev@adacore.com>
3557         * checks.adb (Insert_Valid_Check): Do not use
3558         a renaming to alias a volatile name because this will lead to
3559         multiple evaluations of the volatile name. Use a constant to
3560         capture the value instead.
3562 2017-04-25  Doug Rupp  <rupp@adacore.com>
3564         * init.c [VxWorks Section]: Disable sigtramp for ppc64-vx7.
3566 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3568         * exp_util.adb, exp_util.ads (Build_Class_Wide_Expression):
3569         Add out parameter to indicate to caller that a wrapper must
3570         be constructed for an inherited primitive whose inherited
3571         pre/postcondition has called to overridden primitives.
3572         * freeze.adb (Check_Inherited_Conditions): Build wrapper body
3573         for inherited primitive that requires it.
3574         * sem_disp.adb (Check_Dispatching_Operation): Such wrappers are
3575         legal primitive operations and belong to the list of bodies
3576         generated after the freeze point of a type.
3577         * sem_prag.adb (Build_Pragma_Check_Equivalent): Use new signature
3578         of Build_Class_Wide_Expression.
3579         * sem_util.adb, sem_util.ads (Build_Overriding_Spec): New procedure
3580         to construct the specification of the wrapper subprogram created
3581         for an inherited operation.
3583 2017-04-25  Bob Duff  <duff@adacore.com>
3585         * s-osinte-linux.ads (pthread_mutexattr_setprotocol,
3586         pthread_mutexattr_setprioceiling): Add new interfaces for these
3587         pthread operations.
3588         * s-taprop-linux.adb (Initialize_Lock, Initialize_TCB): Set
3589         protocols as appropriate for Locking_Policy 'C' and 'I'.
3590         * s-taprop-posix.adb: Minor reformatting to make it more similar
3591         to s-taprop-linux.adb.
3593 2017-04-25  Ed Schonberg  <schonberg@adacore.com>
3595         * sem_ch3.adb (Get_Discriminant_Value, Search_Derivation_Levels):
3596         Handle properly a multi- level derivation involving both renamed
3597         and constrained parent discriminants, when the type to be
3598         constrained has fewer discriminants that the ultimate ancestor.
3600 2017-04-25  Bob Duff  <duff@adacore.com>
3602         * sem_util.adb (Is_Object_Reference): In the
3603         case of N_Explicit_Dereference, return False if it came from a
3604         conditional expression.
3606 2017-04-25  Bob Duff  <duff@adacore.com>
3608         * par-ch4.adb (P_Case_Expression): If a semicolon
3609         is followed by "when", assume that ";" was meant to be ",".
3611 2017-04-25  Gary Dismukes  <dismukes@adacore.com>
3613         * sem_ch9.adb, sem_ch10.adb, sem_util.adb: Minor reformatting and typo
3614         fixes.
3616 2017-04-25  Arnaud Charlet  <charlet@adacore.com>
3618         * rtsfind.ads (SPARK_Implicit_Load): New procedure for forced
3619         loading of an entity.
3620         * rtsfind.adb (SPARK_Implicit_Load): Body with a pattern
3621         previously repeated in the analysis.
3622         * sem_ch9.adb (Analyze_Protected_Type_Declaration): use new
3623         procedure SPARK_Implicit_Load.  (Analyze_Task_Type_Declaration):
3624         use new procedure SPARK_Implicit_Load.
3625         * sem_ch10.adb (Analyze_Compilation_Unit): Use new procedure
3626         SPARK_Implicit_Load.
3628 2017-04-25  Javier Miranda  <miranda@adacore.com>
3630         * sem_util.adb (New_Copy_Tree): By default
3631         copying of defining identifiers is prohibited because
3632         this would introduce an entirely new entity into the
3633         tree. This patch introduces an exception to this general
3634         rule: the declaration of constants and variables located in
3635         Expression_With_Action nodes.
3636         (Copy_Itype_With_Replacement): Renamed as Copy_Entity_With_Replacement.
3637         (In_Map): New subprogram.
3638         (Visit_Entity): New subprogram.
3639         (Visit_Node): Handle EWA_Level,
3640         EWA_Inner_Scope_Level, and take care of defining entities defined
3641         in Expression_With_Action nodes.
3643 2017-04-25  Thomas Quinot  <quinot@adacore.com>
3645         * exp_ch6.adb: minor comment edit.
3646         * sinfo.ads, sinfo.adb: New Null_Statement attribute for null
3647         procedure specifications that come from source.
3648         * par-ch6.adb (P_Subprogram, case of a null procedure): Set new
3649         Null_Statement attribute.
3650         * par_sco.adb (Traverse_Declarations_Or_Statements): For a null
3651         procedure, generate statement SCO for the generated NULL statement.
3652         * sem_ch6.adb (Analyze_Null_Procedure): Use null statement from
3653         parser, if available.
3655 2017-04-04  Andreas Krebbel  <krebbel@linux.vnet.ibm.com>
3657         * system-linux-s390.ads: Use Long_Integer'Size to define
3658         Memory_Size.
3660 2017-04-04  Eric Botcazou  <ebotcazou@adacore.com>
3662         * sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
3664 2017-04-03  Jonathan Wakely  <jwakely@redhat.com>
3666         * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo.
3667         * g-socket.adb (To_Host_Entry): Fix typo in comment.
3668         * gnat_ugn.texi: Fix typo.
3669         * raise.c (_gnat_builtin_longjmp): Fix capitalization in comment.
3670         * s-stposu.adb (Allocate_Any_Controlled): Fix typo in comment.
3671         * sem_ch3.adb (Build_Derived_Record_Type): Likewise.
3672         * sem_util.adb (Mark_Coextensions): Likewise.
3673         * sem_util.ads (Available_Full_View_Of_Component): Likewise.
3675 2017-03-28  Andreas Schwab  <schwab@suse.de>
3677         PR ada/80117
3678         * system-linux-aarch64-ilp32.ads: New file.
3679         * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
3680         from LIBGNAT_TARGET_PAIRS.
3681         (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
3682         (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
3683         LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
3684         or -mabi=ilp32, resp.
3686 2017-03-14  James Cowgill  <James.Cowgill@imgtec.com>
3688         * s-osinte-linux.ads (struct_sigaction): Use correct type for sa_flags.
3690 2017-03-08  Thanassis Tsiodras  <ttsiodras@gmail.com>
3692         PR ada/79903
3693         * socket.c (__gnat_gethostbyaddr): Add missing test for __rtems__.
3695 2017-03-08  Eric Botcazou  <ebotcazou@adacore.com>
3697         PR ada/79945
3698         * system-linux-ppc.ads (Default_Bit_Order): Use Standard's setting.
3700         * system-linux-arm.ads (Default_Bit_Order): Likewise.
3701         * system-linux-mips.ads (Default_Bit_Order): Likewise.
3702         * system-linux-armeb.ads: Delete.
3703         * system-linux-mipsel.ads: Likewise.
3704         * gcc-interface/Makefile.in (MIPS/Linux): Adjust.
3705         (ARM/Linux): Likewise.
3707 2017-02-24  Jakub Jelinek  <jakub@redhat.com>
3709         PR c/79677
3710         * gcc-interface/misc.c (gnat_handle_option): Pass true to
3711         handle_generated_option GENERATED_P.
3713 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3715         * gcc-interface/decl.c (gnat_to_gnu_field): Do not remove the wrapper
3716         around a justified modular type if it doesn't have the same scalar
3717         storage order as the enclosing record type.
3719 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3721         * gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
3722         of boolean rvalues to function calls.
3724 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3726         * gcc-interface/utils.c (fold_bit_position): New function.
3727         (rest_of_record_type_compilation): Call it instead of bit_position to
3728         compute the field position and remove the call to remove_conversions.
3729         (compute_related_constant): Factor out the multiplication in both
3730         operands, if any, and streamline the final test.
3732 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3734         * gcc-interface/trans.c (return_value_ok_for_nrv_p): Add sanity check.
3736 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3738         * gcc-interface/decl.c: Include demangle.h.
3739         (is_cplusplus_method): Return again true for a primitive operation
3740         only if it is dispatching.  For a subprogram with an interface name,
3741         call the demangler to get the number of C++ parameters and compare it
3742         with the number of Ada parameters.
3744 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3746         * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu): If
3747         there is no end label, put the location of the At_End procedure on
3748         the call to the procedure.
3750 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3752         * gcc-interface/misc.c (gnat_type_max_size): Try to return a meaningful
3753         value for array types with TYPE_INDEX_TYPE set on their domain type.
3754         * gcc-interface/utils.c (max_size): For operations and expressions, do
3755         not build a new node if the operands have not changed or are missing.
3757 2017-02-24  Eric Botcazou  <ebotcazou@adacore.com>
3759         * gcc-interface/utils.c (max_size) <tcc_expression>: Flip the second
3760         argument when recursing on TRUTH_NOT_EXPR.
3762 2017-02-12  John Marino  <gnugcc@marino.st>
3764         * system-freebsd-x86.ads: Rename into...
3765         * system-freebsd.ads: ...this.
3766         (Default_Bit_Order): Define using Standard'Default_Bit_Order.
3767         * gcc-interface/Makefile.in: Support aarch64-freebsd.
3768         (x86-64/FreeBSD): Adjust to above renaming.
3769         (i386/FreeBSD): Likewise.
3771 2017-02-09  Gerald Pfeifer  <gerald@pfeifer.com>
3773         * comperr.adb: Update FSF bug reporting URL.
3775 2017-02-01  Eric Botcazou  <ebotcazou@adacore.com>
3776             Jakub Jelinek  <jakub@redhat.com>
3778         PR ada/79309
3779         * adaint.c (__gnat_killprocesstree): Fix broken string handling.
3781 2017-01-25  Maxim Ostapenko  <m.ostapenko@samsung.com>
3783         PR lto/79061
3784         * gcc-interface/utils.c (get_global_context): Pass main_input_filename
3785         to build_translation_unit_decl.
3787 2017-01-23  Javier Miranda  <miranda@adacore.com>
3789         * sem_util.adb (New_Copy_Tree): Code cleanup:
3790         removal of the internal map (ie. variable Actual_Map, its
3791         associated local variables, and all the code handling it).
3792         * sem_ch9.adb (Analyze_Task_Type_Declaration): in GNATprove mode
3793         force loading of the System package when processing a task type.
3794         (Analyze_Protected_Type_Declaration): in GNATprove mode force
3795         loading of the System package when processing a protected type.
3796         * sem_ch10.adb (Analyze_Compilation_Unit): in GNATprove mode
3797         force loading of the System package when processing compilation
3798         unit with a main-like subprogram.
3799         * frontend.adb (Frontend): remove forced loading of the System
3800         package.
3802 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
3804         * sem_prag.adb (Default_Initial_Condition): If the desired type
3805         declaration is a derived type declaration with discriminants,
3806         it is rewritten as a private type declaration.
3807         * sem_ch13.adb (Replace_Type_References_Generic,
3808         Visible_Component): A discriminated private type with descriminnts
3809         has components that must be rewritten as selected components
3810         if they appear as identifiers in an aspect expression such as
3811         a Default_Initial_Condition.
3812         * sem_util.adb (Defining_Entity): support N_Iterator_Specification
3813         nodes.
3815 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3817         * ghost.ads, ghost.adb (Is_Ignored_Ghost_Unit): New routine.
3818         * gnat1drv.adb Generate an empty object file for an ignored
3819         Ghost compilation unit.
3820         * inline.adb, sem_util.adb, sem_ch4.adb: Minor reformatting.
3822 2017-01-23  Yannick Moy  <moy@adacore.com>
3824         * sem_ch4.adb (Analyze_Indexed_Component_Form):
3825         Adapt to inlined prefix with string literal subtype.
3826         * inline.adb (Expand_Inlined_Call): Keep unchecked
3827         conversion inside inlined call when formal type is constrained.
3829 2017-01-23  Javier Miranda  <miranda@adacore.com>
3831         * sem_util.adb (New_Copy_Tree): Code cleanup:
3832         removal of global variables. All the global variables, global
3833         functions and tables of this subprogram are now declared locally.
3835 2017-01-23  Gary Dismukes  <dismukes@adacore.com>
3837         * exp_strm.ads: Minor reformatting and typo fixes.
3839 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3841         * sem_aggr.adb, par_sco.adb, exp_util.adb, sem.adb, sem_ch4.adb,
3842         exp_aggr.adb: Minor reformatting.
3843         * g-diopit.adb: minor grammar/punctuation fix in comment.
3844         * g-byorma.ads: minor fix of unbalanced parens in comment.
3846 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3848         * par.adb: Update the documentation of component Labl.
3849         * par-ch6.adb (P_Return_Statement): Set the expected label of
3850         an extended return statement to Error.
3852 2017-01-23  Tristan Gingold  <gingold@adacore.com>
3854         * s-boustr.ads, s-boustr.adb (Is_Full): New function.
3856 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
3858         * expander.adb: Handle N_Delta_Aggregate.
3860 2017-01-23  Javier Miranda  <miranda@adacore.com>
3862         * exp_ch6.adb (Expand_Call): Improve the code that
3863         checks if some formal of the called subprogram is a class-wide
3864         interface, to handle subtypes of class-wide interfaces.
3866 2017-01-23  Javier Miranda  <miranda@adacore.com>
3868         * checks.adb (Apply_Parameter_Aliasing_Checks):
3869         Remove side effects of the actuals before generating the overlap
3870         check.
3872 2017-01-23  Justin Squirek  <squirek@adacore.com>
3874         * exp_strm.ads, exp_strm.ads
3875         (Build_Record_Or_Elementary_Input_Function): Add an extra parameter so
3876         as to avoid getting the underlying type by default.
3877         * exp_attr.adb (Expand_N_Attribute_Reference): Remove use of
3878         underlying type in the Iiput and output attribute cases when
3879         building their respective functions.
3881 2017-01-23  Gary Dismukes  <dismukes@adacore.com>
3883         * scng.adb: Minor reformatting of error message.
3885 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
3887         * sem_ch6.adb (Analyze_Expression_Function): Do not attempt
3888         to freeze the return type of an expression funxtion that is a
3889         completion, if the type is a limited view and the non-limited
3890         view is available.
3892 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
3894         * par-ch4.adb (P_Aggregate_Or_Parent_Expr): Recognize delta
3895         aggregate construct.
3896         (P_Record_Or_Array_Component_Association): An array aggregate
3897         can start with an Iterated_Component_Association.
3898         * scng.adb: Modify error message on improper use of @ in earlier
3899         versions of the language.
3900         * sinfo.ads: New node kind N_Delta_Aggregate.
3901         * sinfo.adb: An N_Delta_Aggregate has component associations and
3902         an expression.
3903         * sem_res.adb (Resolve): Call Resolve_Delta_Aggregate.
3904         * sem_aggr.ads, sem_aggr.adb (Resolve_Iterated_Component_Association):
3905         Create a new index for each one of the choices in the association,
3906         to prevent spurious homonyms in the scope.
3907         (Resolve_Delta_Aggregate): New.
3908         * sem.adb: An N_Delta_Aggregate is analyzed like an aggregate.
3909         * exp_util.adb (Insert_Actions): Take into account
3910         N_Delta_Aggregate.
3911         * exp_aggr.ads: New procedure Expand_N_Delta_Aggregate.
3912         * exp_aggr.adb: New procedure Expand_N_Delta_Aggregate,
3913         and local procedures Expand_Delta_Array_Aggregate and
3914         expand_Delta_Record_Aggregate.
3915         * sprint.adb: Handle N_Delta_Aggregate.
3917 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3919         * exp_ch11.adb (Expand_N_Exception_Declaration): Generate an
3920         empty name when the exception declaration is subject to pragma
3921         Discard_Names.
3922         (Null_String): New routine.
3924 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3926         * par-ch9.adb (P_Protected_Definition): Parse
3927         any optional and potentially illegal pragmas which appear in
3928         a protected operation declaration list.
3929         (P_Task_Items): Parse
3930         any optional and potentially illegal pragmas which appear in a
3931         task item list.
3933 2017-01-23  Pascal Obry  <obry@adacore.com>
3935         * s-taprop-mingw.adb (Enter_Task): Initialize the Thread handle which
3936         is needed when a foreign thread call a Win32 API using a thread handle
3937         like GetThreadTimes() for example.
3939 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3941         * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
3942         allow an 'Address clause to be specified on a prefix of a
3943         class-wide type.
3945 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3947         * checks.adb (Insert_Valid_Check): Ensure that the prefix of
3948         attribute 'Valid is a renaming of the original expression when
3949         the expression denotes a name. For all other kinds of expression,
3950         use a constant to capture the value.
3951         * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
3952         * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
3954 2017-01-23  Justin Squirek  <squirek@adacore.com>
3956         * sem_eval.adb (Eval_Integer_Literal): Add special
3957         case to avoid optimizing out check if the literal appears in
3958         an if-expression.
3960 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3962         * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
3963         allow an 'Address clause to be specified on a prefix of a
3964         class-wide type.
3966 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
3968         * checks.adb (Insert_Valid_Check): Ensure that the prefix of
3969         attribute 'Valid is a renaming of the original expression when
3970         the expression denotes a name. For all other kinds of expression,
3971         use a constant to capture the value.
3972         * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
3973         * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
3975 2017-01-23  Justin Squirek  <squirek@adacore.com>
3977         * sem_eval.adb (Eval_Integer_Literal): Add special
3978         case to avoid optimizing out check if the literal appears in
3979         an if-expression.
3981 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
3983         * sem_ch4.adb (Try_Primitive_Operations,
3984         Is_Valid_First_Argument_Of): argument is valid if it is a derived
3985         type with unknown discriminants that matches its underlying
3986         record view.
3987         * exp_util.adb (Expand_Subtype_From_Expr): Do not expand
3988         expression if its type is derived from a limited type with
3989         unknown discriminants, because the expansion (which is a call)
3990         must be expanded in the enclosing context to add the proper build-
3991         in-place parameters to the call.
3992         * lib.ads, exp_ch9.adb: Minor fixes in comments.
3994 2017-01-23  Yannick Moy  <moy@adacore.com>
3996         * frontend.adb (Frontend): Do not load runtime
3997         unit for GNATprove when parsing failed.
3998         * exp_ch9.adb: minor removal of extra whitespace
3999         * exp_ch6.adb: minor typo in comment
4000         * sem_util.adb: Code cleanup.
4001         * exp_ch9.ads, par-ch2.adb: minor style fixes in whitespace and comment
4002         * a-ngcefu.adb: minor style fix in whitespace
4004 2017-01-23  Thomas Quinot  <quinot@adacore.com>
4006         * scos.ads: Document usage of 'd' as default SCO kind for
4007         declarations.
4008         * par_sco.adb (Traverse_Declarations_Or_Statements.
4009         Traverse_Degenerate_Subprogram): New supporting routine for expression
4010         functions and null procedures.
4011         (Traverse_Declarations_Or_Statements.Traverse_One): Add
4012         N_Expression_Function to the subprogram case; add required
4013         support for null procedures and expression functions.
4015 2017-01-23  Bob Duff  <duff@adacore.com>
4017         * namet.ads (Bounded_String): Decrease the size of type
4018         Bounded_String to avoid running out of stack space.
4019         * namet.ads (Append): Don't ignore buffer overflow; raise
4020         Program_Error instead.
4022 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
4024         * exp_ch5.adb, freeze.adb, par-ch4.adb, scng.adb, sem_ch13.adb,
4025         sem_ch3.adb, sem_ch5.adb, sem_ch5.ads, sem_util.adb, sinfo.ads: Minor
4026         reformatting.
4027         * exp_ch9.adb: minor style fix in comment.
4029 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
4031         * sem_ch4.adb (Analyze_Allocator): Handle properly a type derived
4032         for a limited record extension with unknown discriminants whose
4033         full view has no discriminants.
4035 2017-01-23  Yannick Moy  <moy@adacore.com>
4037         * exp_spark.adb: Alphabetize with clauses.
4039 2017-01-23  Yannick Moy  <moy@adacore.com>
4041         * sem_util.adb (Has_Enabled_Property): Treat
4042         protected objects and variables differently from other variables.
4044 2017-01-23  Thomas Quinot  <quinot@adacore.com>
4046         * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
4047         Split original Ada 95 part off into new subprogram
4048         below. Call that subprogram (instead of proceeding with
4049         AI95-0133 behaviour) if debug switch -gnatd.p is in use.
4050         (Adjust_Record_For_Reverse_Bit_Order_Ada_95): ... new subprogram
4051         * debug.adb Document new switch -gnatd.p
4052         * freeze.adb (Freeze_Entity.Freeze_Record_Type): Do not adjust
4053         record for reverse bit order if an error has already been posted
4054         on the record type.  This avoids generating extraneous "info:"
4055         messages for illegal code.
4057 2017-01-23  Justin Squirek  <squirek@adacore.com>
4059         * sem_ch3.adb (Analyze_Declarations): Correct comments
4060         * freeze.adb (Find_Constant): Add detection of deferred constants
4061         so they are not incorrectly flagged as premature.
4063 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
4065         * scans.ads: New token At_Sign. Remove '@' from list of illegal
4066         characters for future version of the language. '@' is legal name.
4067         * scng.ads, scng.adb (Scan):  Handle '@' appropriately.
4068         * scn.adb (Scan_Reserved_Identifier): An occurrence of '@'
4069         denotes a Target_Name.
4070         * par-ch4.adb (P_Name, P_Primary): Handle Target_Name.
4071         * sinfo.ads, sinfo.adb (N_Target_Name): New non-terminal node.
4072         (Has_Target_Names): New flag on N_Assignment_Statement, to
4073         indicate that RHS has occurrences of N_Target_Name.
4074         * sem.adb: Call Analyze_Target_Name.
4075         * sem_ch5.ads, sem_ch5.adb (Analyze_Target_Name): New subpogram.
4076         (urrent_LHS): Global variable that denotes LHS of assignment,
4077         used in the analysis of Target_Name nodes.
4078         * sem_res.adb (Resolve_Target_Name): New procedure.
4079         * exp_ch5.adb (Expand_Assign_With_Target_Names): (AI12-0125):
4080         N is an assignment statement whose RHS contains occurences of @
4081         that designate the value of the LHS of the assignment. If the
4082         LHS is side-effect free the target names can be replaced with
4083         a copy of the LHS; otherwise the semantics of the assignment
4084         is described in terms of a procedure with an in-out parameter,
4085         and expanded as such.
4086         (Expand_N_Assignment_Statement): Call
4087         Expand_Assign_With_Target_Names when needed.
4088         * exp_util.adb (Insert_Actions): Take into account N_Target_Name.
4089         * sprint.adb: Handle N_Target_Name.
4091 2017-01-23  Eric Botcazou  <ebotcazou@adacore.com>
4093         * checks.adb: Minor fix in comment.
4095 2017-01-23  Philippe Gil  <gil@adacore.com>
4097         * g-debpoo.adb (Do_Report) remove freed chunks from chunks
4098         count in Sort = Memory_Usage or Allocations_Count
4100 2017-01-23  Justin Squirek  <squirek@adacore.com>
4102         * sem_ch3.adb: Code cleanup.
4104 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
4106         * sem_prag.adb (Analyze_Refined_Depends_In_Decl_Part): Move all global
4107         variables to the local variable section. Update the profile
4108         of various nested routine that previously had visibility
4109         of those globals. One the matching phase has completed,
4110         remove certain classes of clauses which are considered noise.
4111         (Check_Dependency_Clause): Properly detect a match between two
4112         'Result attributes. Update the various post-match cases to use
4113         Is_Already_Matched as this routine now automatically recognizes
4114         a previously matched 'Result attribute.
4115         (Is_Already_Matched): New routine.
4116         (Remove_Extra_Clauses): New routine.
4117         (Report_Extra_Clauses): Remove the detection of ... => null
4118         clauses as this is now done in Remove_Extra_Clauses.
4120 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
4122         * sem_aggr.adb (Resolve_Array_Aggregate): In ASIS mode do not
4123         report on spurious overlaps between values involving a subtype
4124         with a static predicate, because the expansion of such a subtype
4125         into individual ranges in inhibited in ASIS mode.
4127 2017-01-23  Justin Squirek  <squirek@adacore.com>
4129         * sem_ch3.adb (Analyze_Declarations): Add detection
4130         of an edge case and delay freezing if it is present.
4132 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
4134         * sem_ch3.adb, exp_spark.adb, exp_attr.adb, sem_ch9.adb, sem_prag.adb,
4135         sem_util.adb, sem_warn.adb, exp_ch3.adb: Minor reformatting.
4137 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
4139         * freeze.adb (Freeze_Subprogram): Ensure that all anonymous
4140         access-to-subprogram types inherit the convention of the
4141         associated subprogram.  (Set_Profile_Convention): New routine.
4142         * sem_ch6.adb (Check_Conformance): Do not compare the conventions
4143         of the two entities directly, use Conventions_Match to account
4144         for anonymous access-to-subprogram and subprogram types.
4145         (Conventions_Match): New routine.
4147 2017-01-23  Claire Dross  <dross@adacore.com>
4149         * exp_spark.adb (Expand_SPARK_Attribute_Reference): For attributes
4150         which return Universal_Integer, force the overflow check flag for
4151         Length and Range_Length for types as big as Long_Long_Integer.
4153 2017-01-23  Claire Dross  <dross@adacore.com>
4155         * exp_spark.adb (Expand_SPARK_Attribute_Reference):  For
4156         attributes which return Universal_Integer, introduce a conversion
4157         to the expected type with the appropriate check flags set.
4158         * sem_res.adb (Resolve_Range): The higher bound can be in Typ's
4159         base type if the range is null. It may still be invalid if it
4160         is higher than the lower bound. This is checked later in the
4161         context in which the range appears.
4163 2017-01-23  Pierre-Marie de Rodat  <derodat@adacore.com>
4165         * scos.ads: Introduce a constant to represent ignored
4166         dependencies in SCO_Unit_Table_Entry.
4168 2017-01-23  Hristian Kirtchev  <kirtchev@adacore.com>
4170         * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Remove extra
4171         spaces from error messages.
4173 2017-01-23  Ed Schonberg  <schonberg@adacore.com>
4175         * exp_ch3.adb (Check_Large_Modular_Array): New procedure,
4176         subsidiary to Expand_N_Object_ Declaration, to compute a guard on
4177         an object declaration for an array type with a modular index type
4178         with the size of Long_Long_Integer. Special processing is needed
4179         in this case to compute reliably the size of the object, and
4180         eventually  to raise Storage_Error, when wrap-around arithmetic
4181         might compute a meangingless size for the object.
4183 2017-01-23  Justin Squirek  <squirek@adacore.com>
4185         * a-wtenau.adb, par-endh.adb, sem_prag.adb,
4186         sem_type.adb: Code cleanups.
4188 2017-01-23  Bob Duff  <duff@adacore.com>
4190         * sem_res.adb (Resolve_Call): In the part of the code where
4191         it is deciding whether to turn the call into an indexed
4192         component, avoid doing so if the call is to an instance of
4193         Unchecked_Conversion. Otherwise, the compiler turns it into an
4194         indexed component, and resolution of that turns it back into a
4195         function call, and so on, resulting in infinite recursion.
4196         * sem_util.adb (Needs_One_Actual): If the first formal has a
4197         default, then return False.
4199 2017-01-21  Eric Botcazou  <ebotcazou@adacore.com>
4201         * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal (etc)
4202         optimizations when the type is modular and the offsets are equal.
4204 2017-01-20  Thomas Quinot  <quinot@adacore.com>
4206         * sem_warn.adb (Warn_On_Useless_Assignment): Adjust wording of warning
4207         message.
4209 2017-01-20  Nicolas Roche  <roche@adacore.com>
4211         * terminals.c: Ignore failures on setpgid and tcsetpgrp commands.
4213 2017-01-20  Bob Duff  <duff@adacore.com>
4215         * sem_eval.adb (Compile_Time_Compare): Disable the expr+literal
4216         (etc) optimizations when the type is modular.
4218 2017-01-20  Yannick Moy  <moy@adacore.com>
4220         * sem_ch6.adb (Move_Pragmas): move some pragmas,
4221         but copy the SPARK_Mode pragma instead of moving it.
4222         (Build_Subprogram_Declaration): Ensure that the generated spec
4223         and original body share the same SPARK_Pragma aspect/pragma.
4224         * sem_util.adb, sem_util.ads (Copy_SPARK_Mode_Aspect): New
4225         procedure to copy SPARK_Mode aspect.
4227 2017-01-20  Bob Duff  <duff@adacore.com>
4229         * sem_ch3.adb (Analyze_Declarations): Disable Resolve_Aspects
4230         even in ASIS mode.
4231         * sem_ch13.adb (Resolve_Name): Enable setting the entity to
4232         Empty even in ASIS mode.
4234 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
4236         * exp_ch9.adb: minor style fixes in comments.
4237         * sem_ch9.adb (Analyze_Delay_Relative): in GNATprove mode a delay
4238         relative statement introduces an implicit dependency on
4239         Ada.Real_Time.Clock_Time.
4240         * sem_util.adb: Minor reformatting.
4242 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4244         * sem_ch13.adb (Analyze_Aspect_Specifications): Aspect Alignment
4245         must be treated as delayed aspect even if the expression is
4246         a literal, because the aspect affects the freezing and the
4247         elaboration of the object to which it applies.
4249 2017-01-20  Tristan Gingold  <gingold@adacore.com>
4251         * s-osinte-vxworks.ads (Interrup_Range): New subtype.
4253 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4255         * lib-xref.adb (Generate_Reference): Do not warn about the
4256         presence of a pragma Unreferenced if the entity appears as the
4257         actual in a procedure call that does not come from source.
4259 2017-01-20  Pascal Obry  <obry@adacore.com>
4261         * expect.c, terminals.c: Fix some warnings about unused variables.
4262         * gsocket.h, adaint.c, adaint.h: Fix some more warnings in the C part
4263         of the runtime.
4265 2017-01-20  Bob Duff  <duff@adacore.com>
4267         * exp_attr.adb (Constrained): Apply an access check (check that
4268         the prefix is not null) when the prefix denotes an object of an
4269         access type; that is, when there is an implicit dereference.
4271 2017-01-20  Gary Dismukes  <dismukes@adacore.com>
4273         * s-rident.ads (constant Profile_Info): Remove
4274         No_Calendar from GNAT_Extended_Ravenscar restrictions.
4276 2017-01-20  Tristan Gingold  <gingold@adacore.com>
4278         *  s-maccod.ads: Add pragma No_Elaboration_Code_All
4280 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
4282         * ghost.adb (Mark_Ghost_Clause): New routine.
4283         (Prune_Node): Do not prune compilation unit nodes.
4284         (Remove_Ignored_Ghost_Code): Prune the compilation unit node directly.
4285         This does not touch the node itself, but does prune all its fields.
4286         * ghost.ads (Mark_Ghost_Clause): New routine.
4287         * sem_ch8.adb (Analyze_Use_Package): Emit an error when a use
4288         package clause mentions Ghost and non-Ghost packages. Mark a
4289         use package clause as Ghost when it mentions a Ghost package.
4290         (Analyze_Use_Type): Emit an error when a use type clause mentions
4291         Ghost and non-Ghost types. Mark a use type clause as Ghost when
4292         it mentions a Ghost type.
4293         * sem_ch10.adb (Analyze_With_Clause): Mark a with clause as
4294         Ghost when it withs a Ghost unit.
4296 2017-01-20  Javier Miranda  <miranda@adacore.com>
4298         * sem_res.adb (Resolve_Call): If a function call
4299         returns a limited view of a type and at the point of the call the
4300         function is not declared in the extended main unit then replace
4301         it with the non-limited view, which must be available. If the
4302         called function is in the extended main unit then no action is
4303         needed since the back-end handles this case.
4305 2017-01-20  Eric Botcazou  <ebotcazou@adacore.com>
4307         * sem_ch7.adb (Contains_Subp_Or_Const_Refs): Rename into...
4308         (Contains_Subprograms_Refs): ...this.  Adjust comment
4309         for constants.  (Is_Subp_Or_Const_Ref): Rename into...
4310         (Is_Subprogram_Ref): ...this.
4311         (Has_Referencer): Rename Has_Non_Subp_Const_Referencer variable into
4312         Has_Non_Subprograms_Referencer and adjust comment.  Remove
4313         incorrect shortcut for package declarations and bodies.
4315 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4317         * sem_ch3.adb (Complete_Private_Subtype): If the scope of the
4318         base type differs from that of the completion and the private
4319         subtype is an itype (created for a constraint on an access
4320         type e.g.), set Delayed_Freeze on both to prevent out-of-scope
4321         anomalies in gigi.
4323 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
4325         * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
4326         When inheriting the SPARK_Mode of a prior expression function,
4327         look at the properly resolved entity rather than the initial
4328         candidate which may denote a homonym.
4330 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4332         * sem_prag.adb (Rewrite_Assertion_Kind): If the name is
4333         Precondition or Postcondition, and the context is pragma
4334         Check_Policy, indicate that this Pre-Ada2012 usage is deprecated
4335         and suggest the standard names Assertion_Policy /Pre /Post
4336         instead.
4338 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
4340         * sem_ch10.adb, sem_cat.adb: Minor reformatting.
4342 2017-01-20  Javier Miranda  <miranda@adacore.com>
4344         * sem_ch3.adb (Access_Type_Declaration): Protect access to the
4345         Entity attribute.
4346         * sem_ch10.adb (Install_Siblings): Skip processing malformed trees.
4347         * sem_cat.adb (Validate_Categoriztion_Dependency): Skip processing
4348         malformed trees.
4350 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4352         * sem_ch13.adb (Analyze_Aspect_Specification, case
4353         Dynamic_Predicate): If the entity E is a subtype that inherits
4354         a static predicate for its parent P,, the inherited and the
4355         new predicate combine in the generated predicate function,
4356         and E only has a dynamic predicate.
4358 2017-01-20  Tristan Gingold  <gingold@adacore.com>
4360         * s-boustr.ads, s-boustr.adb: New package.
4361         * Makefile.rtl: Add s-boustr.
4363 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
4365         * inline.adb (Process_Formals): Qualify the
4366         expression of a return statement when it yields a universal type.
4368 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
4370         * freeze.adb (Freeze_All): Freeze the default
4371         expressions of all eligible formal parameters that appear in
4372         entries, entry families, and protected subprograms.
4374 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4376         * sem_ch3.adb (Check_Nonoverridable_Aspects); Refine check
4377         for illegal inherited Implicit_Dereference aspects with renamed
4378         discriminants.
4380 2017-01-20  Javier Miranda  <miranda@adacore.com>
4382         * debug.adb (switch d.6): do not avoid declaring unreferenced itypes.
4383         * nlists.ads (Lock_Lists, Unlock_Lists): New subprograms.
4384         * nlists.adb (Lock_Lists, Unlock_Lists): New subprograms.
4385         (Set_First, Set_Last, Set_List_Link, Set_Next, Set_Parent,
4386         Set_Prev, Tree_Read): Adding assertion.
4387         * atree.ads (Lock_Nodes, Unlock_Nodes): New subprograms.
4388         * atree.adb (Lock_Nodes, Unlock_Nodes): New subprograms.
4389         (Set_Analyzed, Set_Check_Actuals, Set_Comes_From_Source,
4390         Set_Ekind, Set_Error_Posted, Set_Has_Aspects,
4391         Set_Is_Ignored_Ghost_Node, Set_Original_Node, Set_Paren_Count,
4392         Set_Parent, Set_Sloc, Set_Nkind, Set_FieldNN, Set_NodeNN,
4393         Set_ListNN, Set_ElistNN, Set_NameN, Set_StrN, Set_UintNN,
4394         Set_UrealNN, Set_FlagNNN, Set_NodeN_With_Parent,
4395         Set_ListN_With_Parent): Adding assertion.
4397 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4399         * sem_prag.adb (Process_Convention): Diagnose properly a pragma
4400         import that applies to several homograph subprograms. when one
4401         of them is declared by a subprogram body.
4403 2017-01-20  Justin Squirek  <squirek@adacore.com>
4405         * exp_ch6.adb (Expand_Call): Remove optimization
4406         that nulls out calls to null procedures.
4408 2017-01-20  Yannick Moy  <moy@adacore.com>
4410         * inline.adb (Expand_Inlined_Call): Keep more
4411         precise type of actual for inlining whenever possible. In
4412         particular, do not switch to the formal type in GNATprove mode in
4413         some case where the GNAT backend might require it for visibility.
4415 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4417         * sem_ch3.adb (Check_Non_Overridable_Aspects): An inherited
4418         aspect Implicit_Dereference can be inherited by a full view if
4419         the partial view has no discriminants, because there is no way
4420         to apply the aspect to the partial view.
4421         (Build_Derived_Record_Type): If derived type renames discriminants
4422         of the parent, the new discriminant inherits the aspect from
4423         the old one.
4424         * sem_ch4.adb (Analyze_Call): Handle properly a parameterless
4425         call through an access discriminant designating a subprogram.
4426         * sem_ch5.adb (Analyze_Assignment): (Analyze_Call): Handle
4427         properly a parameterless call through an access discriminant on
4428         the left-hand side of an assignment.
4429         * sem_res.adb (resolve): If an interpreation involves a
4430         discriminant with an implicit dereference and the expression is an
4431         entity, resolution takes place later in the appropriate routine.
4432         * sem_ch13.adb (Analyze_Aspect_Implicit_Dereference): Recognize
4433         access discriminants that designate a subprogram type.
4435 2017-01-20  Pascal Obry  <obry@adacore.com>
4437         * a-locale.adb, a-locale.ads: Update Ada.Locales for RM 2012 COR:1:2016
4439 2017-01-20  Yannick Moy  <moy@adacore.com>
4441         * sem_ch10.adb (Check_No_Elab_Code_All): Do not issue an error
4442         on implicitly with'ed units in GNATprove mode.
4443         * sinfo.ads (Implicit_With): Document use of flag for implicitly
4444         with'ed units in GNATprove mode.
4446 2017-01-20  Ed Schonberg  <schonberg@adacore.com>
4448         * sem_cat.adb (Validate_Static_Object_Name): In a preelaborated
4449         unit Do not report an error on a non-static entity that appears
4450         in the context of a spec expression, such as an aspect expression.
4452 2017-01-20  Hristian Kirtchev  <kirtchev@adacore.com>
4454         * einfo.adb: Flag298 now denotes Is_Underlying_Full_View.
4455         (Is_Underlying_Full_View): New routine.
4456         (Set_Is_Underlying_Full_View): New routine.
4457         (Write_Entity_Flags): Add an entry for Is_Underlying_Full_View.
4458         * einfo.ads Add new attribute Is_Underlying_Full_View.
4459         (Is_Underlying_Full_View): New routine along with pragma Inline.
4460         (Set_Is_Underlying_Full_View): New routine along with pragma Inline.
4461         * exp_util.adb (Build_DIC_Procedure_Body): Do not consider
4462         class-wide types and underlying full views. The first subtype
4463         is used as the working type for all Itypes, not just array base types.
4464         (Build_DIC_Procedure_Declaration): Do not consider
4465         class-wide types and underlying full views. The first subtype
4466         is used as the working type for all Itypes, not just array
4467         base types.
4468         * freeze.adb (Freeze_Entity): Inherit the freeze node of a full
4469         view or an underlying full view without clobbering the attributes
4470         of a previous freeze node.
4471         (Inherit_Freeze_Node): New routine.
4472         * sem_ch3.adb (Build_Derived_Private_Type): Mark an underlying
4473         full view as such.
4474         (Build_Underlying_Full_View): Mark an underlying full view as such.
4475         * sem_ch7.adb (Install_Private_Declarations): Mark an underlying
4476         full view as such.
4478 2017-01-20  Yannick Moy  <moy@adacore.com>
4480         * sinfo.ads: Document lack of Do_Division_Check flag
4481         on float exponentiation.
4483 2017-01-19  Javier Miranda  <miranda@adacore.com>
4485         * ghost.adb (Propagate_Ignored_Ghost_Code): Protect access to the
4486         identifier attribute of a block-statement node. Required to avoid
4487         assertion failure when building the new containers library.
4489 2017-01-19  Bob Duff  <duff@adacore.com>
4491         * exp_ch3.adb: Update comment.
4493 2017-01-19  Vincent Celier  <celier@adacore.com>
4495         * gprep.adb (Gnatprep): Parse the definition file without
4496         "replace in comments" even when switch -C is used.
4498 2017-01-19  Justin Squirek  <squirek@adacore.com>
4500         * exp_ch9.adb (Is_Pure_Barrier): Create function
4501         Is_Count_Attribute to identify an expansion of the 'Count
4502         attribute.
4504 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
4506         * sem_ch5.adb (Analyze_Loop_Statement): In GNATprove mode the
4507         statements within an element iterator loop are only analyzed
4508         agter the loop is rewritten. Within a generic the analysis must
4509         be performed in any case to complete name capture.
4511 2017-01-19  Bob Duff  <duff@adacore.com>
4513         * sem_prag.adb (Analyze_Pragma): Check for ignored pragmas first,
4514         before checking for unrecognized pragmas.
4515         Initialize Pname on its declarations; that's always good style.
4517 2017-01-19  Claire Dross  <dross@adacore.com>
4519         * exp_ch7.adb (Build_Invariant_Procedure_Body): Semi-insert the
4520         body into the tree for GNATprove by setting its Parent field. The
4521         components invariants of composite types are not checked by
4522         the composite type's invariant procedure in GNATprove mode.
4523         (Build_Invariant_Procedure_Declaration): Semi-insert the
4524         declaration into the tree for GNATprove by setting its Parent
4525         field.
4526         * freeze.adb (Freeze_Arry_Type):In GNATprove mode, do not add
4527         the component invariants to the array type  invariant procedure
4528         so that the procedure can be used to  check the array type
4529         invariants if any.
4530         (Freeze_Record_Type): In GNATprove mode, do
4531         not add the component invariants to the record type  invariant
4532         procedure so that the procedure can be used to  check the record
4533         type invariants if any.
4535 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
4537         * lib-xref-spark_specific.adb: Minor reformatting.
4538         * exp_ch7.adb (Add_Parent_Invariants): Do not process array types.
4540 2017-01-19  Javier Miranda  <miranda@adacore.com>
4542         * exp_aggr.adb (Pass_Aggregate_To_Back_End): Renamed as
4543         Build_Back_End_Aggregate.
4544         (Generate_Aggregate_For_Derived_Type): Code cleanup.
4545         (Prepend_Stored_Values): Code cleanup.
4547 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
4549         * sem_ch6.adb (Analyze_Expression_Function): Check for an
4550         incomplete return type after attempting to freeze it, so that
4551         other freeze actiona are generated in the proper order.
4553 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
4555         * sem_aggr.adb (Resolve_Aggregate): If the type is a string
4556         type, ie. a type whose component is a character type, and the
4557         aggregate is positional, do not convert into a string literal
4558         if the index type is not an integer type, because the original
4559         type may be required in an enclosing operation.
4561 2017-01-19  Bob Duff  <duff@adacore.com>
4563         * binde.adb, debug.adb: Enable new elaboration order algorithm
4564         by default. -dp switch reverts to the old algorithm.
4566 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
4568         * sem_ch3.adb Add with and use clauses for Exp_Ch7.
4569         (Analyze_Declarations): Create the DIC and Invariant
4570         procedure bodies s after all freezing has taken place.
4571         (Build_Assertion_Bodies): New routine.
4572         * sem_ch7.adb Remove the with and use clauses for Exp_Ch7
4573         and Exp_Util.
4574         (Analyze_Package_Specification): Remove the
4575         generation of the DIC and Invariant procedure bodies. This is
4576         now done by Analyze_Declarations.
4577         * sem_disp.adb (Check_Dispatching_Operation): DIC and Invariant
4578         procedures are never treated as primitives.
4580 2017-01-19  Yannick Moy  <moy@adacore.com>
4582         * frontend.adb: Analyze inlined bodies and check elaboration
4583         rules in GNATprove mode too.
4584         * sem_elab.adb (Delay_Element): Add Boolean component to save
4585         indication that call is in SPARK code.  (Check_Elab_Calls):
4586         Check elaboration rules in GNATprove mode, and correctly set
4587         the current value of SPARK_Mode.
4588         * lib-xref-spark_specific.adb
4589         (Add_SPARK_Xrefs): Simplify iteration over dereferences.
4591 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
4593         * exp_ch4.adb (Expand_Concatenate): Do no enable overflow
4594         checks on the expression for the high bound of concatenation
4595         when checks are disabled, to suppress warnings about potential
4596         constraint errors in restricted runtimes.
4598 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
4600         * exp_ch3.adb (Expand_Freeze_Enumeration_Type): Mark the
4601         representation-to-position function as inlined.
4602         * sem_cat.adb (Set_Categorization_From_Scope): Do not modify
4603         the purity of an internally generated entity if it has been
4604         explicitly marked as pure for optimization purposes.
4605         * exp_aggr.adb: Minor reformatting.
4607 2017-01-19  Javier Miranda  <miranda@adacore.com>
4609         * exp_ch6.adb (Expand_Call): Remove side effects on
4610         actuals that are allocators with qualified expression since the
4611         initialization of the object is performed by means of individual
4612         statements (and hence it must be done before the call).
4614 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
4616         * sem_ch3.adb (Analyze_Declarations): Minor reformatting.
4617         (Build_Derived_Enumeration_Type): If the derived type inherits a
4618         dynamic predicate from its parent, the bounds of the type must
4619         freeze because an explicit constraint is constructed for the
4620         type and the corresponding range is elaborated now.
4622 2017-01-19  Arnaud Charlet  <charlet@adacore.com>
4624         * sem_attr.ads: minor fix of inconsistent casing in comment
4625         * lib-writ.ads: minor align comments in columns
4626         * sem_ch3.adb: Minor reformatting.
4627         * spark_xrefs.ads: minor fix typo in SPARK-related comment
4628         * table.ads: minor style fix in comment
4629         * lib-xref-spark_specific.adb
4630         (Add_SPARK_Xrefs): simplify processing of SPARK cross-references.
4631         * sem_ch12.adb: minor whitespace fix
4632         * freeze.adb: Add comment.
4633         * sem_util.adb (Unique_Name): for instances of
4634         generic subprograms ignore the name of the wrapper package.
4636 2017-01-19  Javier Miranda  <miranda@adacore.com>
4638         * exp_aggr.adb (Resolve_Record_Aggregate):
4639         Factorize code needed for aggregates of limited and unlimited
4640         types in a new routine.
4641         (Pass_Aggregate_To_Back_End): New subprogram.
4643 2017-01-19  Yannick Moy  <moy@adacore.com>
4645         * sinfo.adb (Pragma_Name): Only access up to Last_Pair of Pragma_Map.
4647 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
4649         * sem_ch4.ads, sem_ch4.adb (Try_Object_Operation): Make subprogram
4650         public, for use elsewhere.
4651         * sem_ch6.adb (Analyze_Procedure_Call): In SPARK_Mode and within
4652         an Inlined_body, recognize a call that uses object notation
4653         and has not been rewritten as a regular call because regular
4654         expansion has not taken place.
4656 2017-01-19  Bob Duff  <duff@adacore.com>
4658         * checks.adb (Apply_Type_Conversion_Checks): Disable small optimization
4659         in case of generic formal discrete types, because it causes crashes in
4660         the compiler when built with assertions on.
4662 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
4664         * lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads,
4665         sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting.
4667 2017-01-19  Bob Duff  <duff@adacore.com>
4669         * bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking):
4670         Increment Warnings_Detected.  It was decrementing, which is
4671         wrong since we just issued a warning message.
4672         * binderr.ads (Errors_Detected, Warnings_Detected): Declare
4673         these variables to be of subtype Nat instead of Int, because
4674         they should never be negative.
4676 2017-01-19  Javier Miranda  <miranda@adacore.com>
4678         * contracts.adb (Build_Postconditions_Procedure): Replace
4679         Generate_C_Code by Modify_Tree_For_C.
4680         * exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate):
4681         Replace Generate_C_Code by Modify_Tree_For_C.
4682         * exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by
4683         Modify_Tree_For_C.
4684         * exp_ch11.adb (Expand_N_Exception_Declaration): Replace
4685         Generate_C_Code by Modify_Tree_For_C.
4686         * exp_ch4.adb (Expand_Allocator_Expression): Replace
4687         Generate_C_Code by Modify_Tree_For_C.
4688         * exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code
4689         by Modify_Tree_For_C.
4690         * exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace
4691         Generate_C_Code by Modify_Tree_For_C.
4692         * sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code
4693         by Modify_Tree_For_C.
4694         * sinfo.ads (Modify_Tree_For_C): Adding documentation.
4696 2017-01-19  Javier Miranda  <miranda@adacore.com>
4698         * sem_util.ads, sem_util.adb (Expression_Of_Expression_Function): New
4699         subprogram.
4700         (Is_Inlinable_Expression_Function): New subprogram.
4701         * exp_ch6.ads, exp_ch6.adb (Expression_Of_Expression_Function): Moved
4702         to Sem_Util.
4703         (Is_Inlinable_Expression_Function): Moved to Sem_Util.
4705 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
4707         * sem_ch4.adb (Diagnose_Call): Improve error message when a
4708         selected component has a prefix that might be interpreted
4709         as a parameterless function call, but none of the candidate
4710         interpretations is parameterless, and there is a hidden homonym
4711         of the prefix that is a package.
4712         * sem_ch8.adb (Find_Selected_Component): If the prefix might be
4713         interpreted as a parameterless function call and its analysis
4714         fails, do not call Analyze_Selected_Component.
4716 2017-01-19  Steve Baird  <baird@adacore.com>
4718         * sem_util.ads: Add new Use_Full_View Boolean parameter to
4719         Get_Index_Bounds.
4720         * sem_util.adb (Get_Index_Bounds): replace calls to Scalar_Range with
4721         calls to a newly-defined Scalar_Range_Of_Right_View function.
4723 2017-01-19  Arnaud Charlet  <charlet@adacore.com>
4725         * gnat1drv.adb: minor fix of unbalanced parens in comment
4726         * lib-xref.ads (Traverse_Compilation_Unit): declaration moved
4727         to visible part of the package to allow re-use in GNATprove.
4728         * lib-xref-spark_specific.adb (Traverse_Stub): routine refactored
4729         from repeated code of Traverse_Compilation_Unit.
4730         (Traverse_Declaration_Or_Statement): fixed detection of
4731         generic subprograms and packages; also, iteration over case
4732         statement alternatives rewritten to avoid testing if the first
4733         alternative is present (since it must be present due to Ada
4734         syntax restrictions).
4736 2017-01-19  Hristian Kirtchev  <kirtchev@adacore.com>
4738         * exp_ch6.adb (Expand_N_Subprogram_Body): Mark the spec as
4739         returning by reference not just for subprogram body stubs,
4740         but for all subprogram cases.
4741         * sem_util.adb: Code reformatting.
4742         (Requires_Transient_Scope): Update the call to Results_Differ.
4743         (Results_Differ): Update the parameter profile and the associated
4744         comment on usage.
4746 2017-01-19  Ed Schonberg  <schonberg@adacore.com>
4748         * sem_dim.adb (Analyze_Dimension): Analyze object declaration and
4749         identifier nodes that do not come from source, to handle properly
4750         dimensionality check within an inlined body which inclddes both
4751         original operands and rewritten operands. This removes spurious
4752         dimensionality errors in the presence of front-end inlining,
4753         as well as in SPARK mode.
4755 2017-01-16  Jakub Jelinek  <jakub@redhat.com>
4757         PR driver/49726
4758         * gcc-interface/lang.opt (gant, gnatO, gnat): Add Driver flag.
4760 2017-01-13  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
4762         * gcc-interface/Makefile.in (SPARC/Solaris): Fix typo.
4764 2017-01-13  Arnaud Charlet  <charlet@adacore.com>
4766         * doc/gnat_ugn/getting_started_with_gnat.rst,
4767         doc/gnat_ugn/inline_assembler.rst,
4768         doc/gnat_ugn/building_executable_programs_with_gnat.rst,
4769         doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
4770         doc/gnat_ugn/about_this_guide.rst,
4771         doc/gnat_ugn/platform_specific_information.rst,
4772         doc/gnat_ugn/example_of_binder_output.rst,
4773         doc/gnat_ugn/gnat_and_program_execution.rst,
4774         doc/gnat_ugn/gnat_utility_programs.rst,
4775         doc/gnat_ugn/the_gnat_compilation_model.rst,
4776         doc/gnat_rm/implementation_defined_attributes.rst,
4777         doc/gnat_rm/compatibility_and_porting_guide.rst,
4778         doc/gnat_rm/standard_library_routines.rst,
4779         doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
4780         doc/gnat_rm/implementation_defined_pragmas.rst,
4781         doc/gnat_rm/the_gnat_library.rst,
4782         doc/gnat_rm/obsolescent_features.rst,
4783         doc/gnat_rm/about_this_guide.rst,
4784         doc/gnat_rm/the_implementation_of_standard_i_o.rst,
4785         doc/gnat_rm/implementation_of_ada_2012_features.rst,
4786         doc/gnat_rm/interfacing_to_other_languages.rst,
4787         doc/gnat_rm/implementation_defined_aspects.rst,
4788         doc/gnat_rm.rst: Update documentation.
4789         * gnat_rm.texi, gnat_ugn.texi: Regenerated.
4791 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
4793         * einfo.ads: minor grammar fixes in comment of Normalized_Position_Max.
4794         * scil_ll.adb: Minor style fix in comment.
4795         * sem_ch8.adb (Analyze_Expanded_Name): Perform dimension analysis
4796         even if entity is already set, because the node may be renalyzed
4797         after inlining transformations.
4799 2017-01-13  Javier Miranda  <miranda@adacore.com>
4801         * sem_res.adb (Resolve_Call): Do not establish a transient scope
4802         for a call to inlinable expression function (since the call will
4803         be replaced by its returned object).
4804         * exp_ch6.ads (Is_Inlinable_Expression_Function): New subprogram.
4805         * exp_ch6.adb (Expression_Of_Expression_Function): New subprogram.
4806         (Expand_Call): For inlinable expression function call replace the
4807         call by its returned object.
4808         (Is_Inlinable_Expression_Function): New subprogram.
4810 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
4812         * checks.adb: Minor typo fix and reformatting.
4814 2017-01-13  Javier Miranda  <miranda@adacore.com>
4816         * contracts.adb (Contract_Only_Subprograms): Remove formal.
4817         (Copy_Original_Specification): Removed.
4818         (Skip_Contract_Only_Subprogram): Move here checks previously
4819         located in the caller of this routine (to leave the code more clean).
4820         (Build_Contract_Only_Subprogram): Code cleanup.
4821         * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): Removed.
4822         (Get_Contract_Only_Missing_Body_Name): Removed.
4824 2017-01-13  Javier Miranda  <miranda@adacore.com>
4826         * sem_ch6.adb (Cloned_Expression): New subprogram.
4827         (Freeze_Expr_Types): Complete previous patch since the expression
4828         of an expression-function may have iterators and loops with
4829         defining identifiers which, as part of the preanalysis of the
4830         expression, may be left decorated with itypes that will not be
4831         available in the tree passed to the backend.
4833 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
4835         * checks.adb (Apply_Type_Conversion_Checks): Optimize a type
4836         conversion to Integer of an expression that is an attribute
4837         reference 'Pos on an enumeration type.
4839 2017-01-13  Bob Duff  <duff@adacore.com>
4841         * atree.ads: Minor comment fix.
4843 2017-01-13  Justin Squirek  <squirek@adacore.com>
4845         * sem_ch6.adb (Check_Aggregate_Accessibility): Ignore function
4846         calls in accessibility check on return statement.
4848 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
4850         * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
4851         Ensure that the input body is a subprogram body before trying to
4852         determine whether it denoted an expression function.  Note that
4853         subprogram body stubs cannot denote expression functions.
4855 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
4857         * bindgen.adb, sem_ch6.adb, binde.adb, exp_ch3.adb: Minor reformatting
4858         and typo fixes.
4860 2017-01-13  Javier Miranda  <miranda@adacore.com>
4862         * einfo.ads (Component_Bit_Offset): Fix documentation.
4863         * sem_ch13.adb (Check_Record_Representation_Clause): Skip check
4864         on record holes for components with unknown compile-time offsets.
4866 2017-01-13  Bob Duff  <duff@adacore.com>
4868         * ali.ads, ali.adb (Static_Elaboration_Model_Used): Remove unused flag.
4869         * g-locfil.ads: Minor comment fix.
4871 2017-01-13  Bob Duff  <duff@adacore.com>
4873         * binde.adb (Elab_New): New elaboration order algorithm
4874         that is expected to cause fewer ABE issues. This is a work in
4875         progress. The new algorithm is currently disabled, and can be
4876         enable by the -dp switch, or by modifying the Do_Old and Do_New
4877         etc. flags and rebuilding. Experimental code is included to
4878         compare the results of the old and new algorithms.
4879         * binde.ads: Use GNAT.Dynamic_Tables instead of Table, so we
4880         can have multiple of these tables, so the old and new algorithms
4881         can coexist.
4882         * bindgen.ads (Gen_Output_File): Pass Elab_Order as an 'in'
4883         parameter of type array. This avoids the global variable, and
4884         allows bounds checking (which is normally defeated by the tables
4885         packages). It also ensures that the Elab_Order is read-only
4886         to Bindgen.
4887         * bindgen.adb: Pass Elab_Order as an 'in' parameter to all
4888         subprograms that need it, as above.
4889         * debug.adb: Document new -dp switch. Modify doc of old -do
4890         switch.
4891         * gnatbind.adb (Gnatbind): Make use of new interfaces to Binde
4892         and Bindgen.  Move writing of closure (-R and -Ra switches)
4893         to Binde; that's more convenient.
4895 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
4897         * sem_ch6.adb (Analyze_Expression_Function): If the expression
4898         function is a completion, all entities referenced in the
4899         expression are frozen. As a consequence, a reference to an
4900         uncompleted private type from an enclosing scope is illegal.
4902 2017-01-13  Javier Miranda  <miranda@adacore.com>
4904         * sem_ch6.adb (Freeze_Expr_Types): New subprogram.
4905         (Analyze_Subprogram_Body_Helper): At the occurrence of an
4906         expression function declaration that is a completion, its
4907         expression causes freezing (AI12-0103).
4909 2017-01-13  Vadim Godunko  <godunko@adacore.com>
4911         * a-coinho-shared.adb: Fix memory leaks in Constant_Reference and
4912         Reference functions of Ada.Containers.Indefinite_Holders.
4914 2017-01-13  Bob Duff  <duff@adacore.com>
4916         * s-os_lib.ads: Minor comment fixes.
4918 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
4920         * exp_ch3.adb (Default_Initialize_Object): Do not default
4921         initialize an object when it is of a task type and restriction
4922         No_Tasking is in effect because the initialization is obsolete.
4923         * exp_ch9.adb (Build_Master_Entity): Do not generate a master when
4924         restriction No_Tasking is in effect.
4925         (Build_Master_Renaming): Do not rename a master when restriction
4926         No_Tasking is in effect.
4928 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
4930         * sem_aggr.adb (Resolve_Array_Aggregate): The code that verifies
4931         the legality of An others clause applies as well to a choice in
4932         an Iterated_component_ association.
4933         (Resolve_Iterated_Component_Association): An others choice
4934         is legal.
4935         * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): An
4936         Iterated_Component_Association is not static.
4938 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
4940         * exp_ch3.adb (Freeze_Type): Mark the Ghost mode as set in case
4941         control is passed to the expresion handler before the new mode
4942         is set.
4943         * sem_ch12.adb (Analyze_Package_Instantiation,
4944         Analyze_Subprogram_Instantiation): Mark the Ghost mode as set
4945         in case control is passed to the expresion handler before the
4946         new mode is set.
4948 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
4950         * sem_aggr.adb, sem_ch3.adb, inline.adb, sem_util.adb, exp_ch4.adb,
4951         exp_aggr.adb: Minor reformatting.
4953 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
4955         * inline.adb: Minor reformatting and typo fix.
4957 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
4959         * sem_util.ads, sem_util.adb (Choice_List): Move function here
4960         from sem_aggr.adb, for use elsewhere.
4961         * sem_ch3.adb (Analyze_Object_Declaration): Use Choice_List.
4962         * sem_aggr.adb (Resolve_Array_Aggregate): Remove
4963         Iterated_Component_Present.
4964         * exp_aggr.adb: Use Choice_List throughout, to handle
4965         Iterated_Component_Associations.
4966         (Gen_Loop): Generate proper loop for an
4967         Iterated_Component_Association: loop variable has the identifier
4968         of the original association. Generate a loop even for a single
4969         component choice, in order to make loop parameter visible in
4970         expression.
4971         (Flatten): An Iterated_Component_Association is not static.
4973 2017-01-13  Yannick Moy  <moy@adacore.com>
4975         * exp_ch4.adb (Expand_N_Op_Expon): Ensure that the value of
4976         float exponentiation for statically known small negative values
4977         is the reciprocal of the exponentiation for the opposite value
4978         of the exponent.
4979         * s-exnllf.adb (Exn_Float, Exn_Long_Float, Exn_Long_Long_Float):
4980         Ensure that the value of float exponentiation for negative values
4981         is the reciprocal of the exponentiation for the opposite value
4982         of the exponent.
4983         * inline.adb (Expand_Inlined_Call): Fix the count
4984         for the number of generated gotos.
4986 2017-01-13  Yannick Moy  <moy@adacore.com>
4988         * inline.adb: Code cleanup.
4989         * sem_util.adb (Is_OK_Volatile_Context): Add
4990         expression in delay statement as OK for volatile context.
4992 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
4994         * sem_aggr.adb (Resolve_Array_Aggregate): In normal compilation
4995         mode a choice that is a subtype with a static predicate is
4996         replaced by the values it covers. This transformation must not
4997         be performed in ASIS mode, to preserve the source for analysis.
4999 2017-01-13  Justin Squirek  <squirek@adacore.com>
5001         * nlists.ads: Correct minor typo.
5003 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
5005         * sem_ch13.adb: Minor reformatting and typo fix.
5007 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
5009         * par-ch4.adb (P_Aggregate_Or_Parent_Expr): An
5010         Iterated_Component_Association is a named association in an
5011         array aggregate.
5012         * sem_aggr.adb (Resolve_Iterated_Component_Association): New
5013         procedure, subsidiary of Resolve_Array_Aggregate, to analyze
5014         and resolve the discrete choices and the expression of the
5015         new construct.
5016         * sinfo.adb, sinfo.ads: In analogy with N_Component_Association,
5017         Loop_Actions and Box_Present are attributes of
5018         N_Iterated_Component_Association nodes. Box_Present is always
5019         False in this case.
5020         * sprint.adb (Sprint_Node): An Iterated_Component_Association
5021         has a Discrete_Choices list, as specified in the RM. A
5022         Component_Association for aggregate uses instead a Choices list.
5023         We have to live with this small inconsistency because the new
5024         construct also has a defining identifier, and there is no way
5025         to merge the two node structures.
5027 2017-01-13  Yannick Moy  <moy@adacore.com>
5029         * inline.adb (Remove_Aspects_And_Pragmas): Add Unused to the
5030         list of pragmas to remove.  Remove pragmas from the list of
5031         statements in the body to inline.
5032         * namet.adb, namet.ads (Nam_In): New version with 12 parameters.
5034 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
5036         * sem_ch3.adb (Resolve_Aspects): New procedure, subsidiary of
5037         Analyze_Declarations, to analyze and resolve the expressions of
5038         aspect specifications in the current declarative list, so that
5039         the expressions have proper entity and type info.  This is needed
5040         for ASIS when there is no subsequent expansion to generate this
5041         semantic information.
5042         * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Use Etype of
5043         original expression, to suppress cascaded errors when expression
5044         has been constant-folded.
5045         (Resolve_Aspect_Expressions, Resolve_Name): Preserve entities in
5046         ASIS mode, because there is no subsequent expansion to decorate
5047         the tree.
5049 2017-01-13  Yannick Moy  <moy@adacore.com>
5051         * inline.adb, inline.ads (Call_Can_Be_Inlined_In_GNATprove_Mode):
5052         New function to detect when a call may be inlined or not in
5053         GNATprove mode.
5054         (Expand_Inlined_Call): Ensure that a temporary
5055         is always created in the cases where a type conversion may be
5056         needed on an input parameter in GNATprove mode, so that GNATprove
5057         sees the check to perform.
5058         * sem_res.adb (Resolve_Call): In GNATprove mode, skip inlining
5059         when not applicable due to actual requiring type conversion
5060         with possible check but no temporary value can be copied for
5061         GNATprove to see the check.
5063 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
5065         * sem_aggr.adb, par_sco.adb, s-osprim-mingw.adb, exp_ch5.adb,
5066         exp_prag.adb, sem_ch3.adb, xr_tabls.adb, lib-xref-spark_specific.adb,
5067         layout.adb, sem_dist.adb, exp_spark.adb, exp_ch7.adb, gnatcmd.adb,
5068         exp_util.adb, prj-proc.adb, sem_aux.adb, comperr.adb, g-memdum.adb,
5069         exp_attr.adb, s-intman-solaris.adb, exp_ch9.adb, make.adb, live.adb,
5070         g-sercom-linux.adb, sem_dim.adb, mlib-prj.adb, s-intman-posix.adb,
5071         sem_ch9.adb, sem_ch10.adb, prep.adb, einfo.adb, scng.adb, checks.adb,
5072         prj-strt.adb, sem_prag.adb, eval_fat.adb, sem_ch12.adb, sem.adb,
5073         a-numaux-x86.adb, a-stwifi.adb, i-cobol.adb, prj.adb,
5074         get_spark_xrefs.adb, s-tasini.adb, rtsfind.adb, freeze.adb,
5075         g-arrspl.adb, par-ch4.adb, sem_util.adb, sem_res.adb, expander.adb,
5076         sem_attr.adb, exp_dbug.adb, prj-pp.adb, a-stzfix.adb, s-interr.adb,
5077         s-wchcnv.adb, switch-m.adb, gnat1drv.adb, sinput-l.adb, stylesw.adb,
5078         contracts.adb, s-intman-android.adb, g-expect.adb, exp_ch4.adb,
5079         g-comlin.adb, errout.adb, sinput.adb, s-exctra.adb, repinfo.adb,
5080         g-spipat.adb, g-debpoo.adb, exp_ch6.adb, sem_ch4.adb, exp_ch13.adb,
5081         a-wtedit.adb, validsw.adb, pprint.adb, widechar.adb, makeutl.adb,
5082         ali.adb, set_targ.adb, sem_mech.adb, sem_ch6.adb, gnatdll.adb,
5083         get_scos.adb, g-pehage.adb, s-tratas-default.adb, gnatbind.adb,
5084         prj-dect.adb, g-socthi-mingw.adb, par-prag.adb, prj-nmsc.adb,
5085         exp_disp.adb, par-ch12.adb, binde.adb, sem_ch8.adb,
5086         s-tfsetr-default.adb, s-regexp.adb, gprep.adb, s-tpobop.adb,
5087         a-teioed.adb, sem_warn.adb, sem_eval.adb, g-awk.adb, s-io.adb,
5088         a-ztedit.adb, xoscons.adb, exp_intr.adb, sem_cat.adb, sprint.adb,
5089         g-socket.adb, exp_dist.adb, sem_ch13.adb, s-tfsetr-vxworks.adb,
5090         par-ch3.adb, treepr.adb, g-forstr.adb, g-catiio.adb, par-ch5.adb,
5091         uname.adb, osint.adb, exp_ch3.adb, prj-env.adb, a-strfix.adb,
5092         a-stzsup.adb, prj-tree.adb, s-fileio.adb: Update all eligible case
5093         statements to reflect the new style for case alternatives. Various
5094         code clean up and reformatting.
5096 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
5098         * exp_util.adb: Minor reformatting.
5100 2017-01-13  Yannick Moy  <moy@adacore.com>
5102         * exp_spark.adb: Code cleanup.
5103         * sem_ch9.adb (Analyze_Delay_Until): Resolve
5104         expression so that calls are identified as such inside delay
5105         until.
5107 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
5109         * exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
5110         * par-ch3.adb (P_Discrete_Choice_List): An
5111         Iterated_Component_Association is an array aggregate component.
5112         * par-ch4.adb (P_Iterated_Component_Association): New procedure.
5113         (Is_Quantified_Expression): New function that performs a lookahead
5114         to distinguish quantified expressions from iterated component
5115         associations.
5116         (P_Aggregate_Or_Paren_Expr): Recognize iterated component
5117         associations.
5118         (P_Unparen_Cond_Case_Quant_Expression, P_Primary): Ditto.
5119         * sem.adb (Analyze): Handle Iterated_Component_Association.
5120         * sem_aggr.adb (Resolve_Array_Aggregate): Dummy handling of iterated
5121         component associations.
5122         * sinfo.ads, sinfo.adb: Entries for for
5123         N_Iterated_Component_Association and its fields.
5124         * sprint.adb (Sprint_Node_Actual): Handle
5125         N_Iterated_Component_Association.
5127 2017-01-13  Justin Squirek  <squirek@adacore.com>
5129         * sem_ch12.adb (Analyze_Package_Instantiation): Move disabiling
5130         of the style check until after preanalysis of acutals.
5132 2017-01-13  Yannick Moy  <moy@adacore.com>
5134         * sem_ch13.adb: Minor reformatting.
5135         * par-ch11.adb: minor style fix in whitespace
5136         * gnatbind.adb (Gnatbind): Scope of Std_Lib_File
5137         reduced to Add_Artificial_ALI_File; style fix in declaration of
5138         Text; grammar fix in comment.
5139         * osint-c.adb (Read_Library_Info): strip trailing NUL from result.
5140         * freeze.adb: Cleanup to pass pragma instead of
5141         expression to call.
5142         * exp_spark.adb (Expand_SPARK_Attribute_Reference): New procedure to
5143         replace System'To_Address by equivalent call.
5145 2017-01-13  Arnaud Charlet  <charlet@adacore.com>
5147         * bindusg.adb: Improve usage output for -f switch.
5149 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
5151         * frontend.adb, freeze.adb, sem_res.adb, sem_attr.adb, sem_ch8.adb:
5152         Minor reformatting.
5154 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
5156         * sem_ch13.adb (Is_Predicate_Static): Following the intent of the RM,
5157         treat comparisons on strings as legal in a Static_Predicate.
5158         (Is_Predicate_Static, Is_Type_Ref): Predicate also returns true on
5159         a function call that is the expansion of a string comparison.The
5160         function call is built when compiling the corresponding predicate
5161         function, but the expression has been found legal as a static
5162         predicate during earlier analysis.
5163         * sem_eval.adb (Real_Or_String_Static_Predicate_Matches): Handle
5164         properly a function call that is the expansion of a string
5165         comparison operation, in order to recover the Static_Predicate
5166         expression and apply it to a static argument when needed.
5168 2017-01-13  Tristan Gingold  <gingold@adacore.com>
5170         * s-mmap.adb, s-mmap.ads (Open_Read_No_Exception): New function.
5171         (Open_Read): Re-implement using Open_Read_No_Exception.
5172         (Open_Write): Raise exception in case of error.
5173         * s-mmosin-mingw.adb (Open_Common): Do not raise exception.
5174         * s-mmosin-unix.adb (Open_Read, Open_Write): Do not
5175         reaise exception.
5176         * s-mmosin-mingw.ads, s-mmosin-unix.ads (Open_Read): Adjust comment.
5178 2017-01-13  Yannick Moy  <moy@adacore.com>
5180         * checks.adb: Code cleanup.
5182 2017-01-13  Yannick Moy  <moy@adacore.com>
5184         * freeze.adb (Check_Inherited_Conditions): Use analyzed pragma
5185         expression instead of unanalyzed aspect expression for checking
5186         the validity of inheriting an operation. Also copy the expression
5187         being passing it to Build_Class_Wide_Expression, as this call
5188         modifies its argument.
5189         * sem_util.ads Fix comment to reference correct function name
5190         New_Copy_Tree.
5192 2017-01-13  Javier Miranda  <miranda@adacore.com>
5194         * sem_res.adb (Resolve_Generalized_Indexing): Compiling in ASIS mode,
5195         when we propagate information about the indexes back to the original
5196         indexing mode and the prefix of the index is a function call, do not
5197         remove any parameter from such call.
5199 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
5201         * exp_ch6.ads (Needs_BIP_Finalization_Master): Update comment.
5202         * exp_ch6.adb (Needs_BIP_Finalization_Master): Return True for
5203         a build-in-place function whose result type is tagged.
5205 2017-01-13  Yannick Moy  <moy@adacore.com>
5207         * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
5208         Do not generate a wrapper when the only candidate is a class-wide
5209         subprogram.
5210         (Analyze_Subprogram_Renaming): Do not freeze the renaming or renamed
5211         inside a generic context.
5213 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
5215         * exp_util.adb (Add_Inherited_Tagged_DIC):
5216         Pass the object parameters of both the parent and the derived
5217         type DIC procedure to the reference replacement circuitry.
5218         (Find_DIC_Type): Modify the circuitry to present the partial
5219         view of a private type in case the private type defines its own
5220         DIC pragma.
5221         (Replace_Object_And_Primitive_References): Add two
5222         optional formal parameters.  Update the comment on usage. Update
5223         the replacement of references to object parameters.
5225 2017-01-13  Gary Dismukes  <dismukes@adacore.com>
5227         * einfo.adb, sem_ch6.adb, atree.adb: Minor reformatting and typo fix.
5229 2017-01-13  Ed Schonberg  <schonberg@adacore.com>
5231         * sem_res.adb (Resolve_Actuals): Apply Scalar_Range_Check to
5232         an out parameter that is a type conversion, independently of th
5233         range check that may apply to the expression of the conversion,
5234         for use in GNATProve.
5236 2017-01-13  Yannick Moy  <moy@adacore.com>
5238         * gnat1drv.adb (Gnat1drv): Move the implicit with for System in
5239         GNATprove_Mode here to Frontend.
5240         * frontend.adb (Frontend): Move the implicit with for System
5241         in GNATprove_Mode here as it ismore correct this way; the old
5242         place only worked by chance, since there were no overloaded names.
5243         * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_Tasking_State.
5244         * sem_attr.adb (Analyze_Attribute): In GNATprove_Mode, for the
5245         four attributes identified in SRM 9(18), add an implicit with
5246         to Ada.Task_Identification.
5247         * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
5248         Deal specially with the wrapper introduced for AI05-0071 in GNATprove
5249         mode.
5250         * checks.adb (Apply_Discriminant_Check,
5251         Apply_Selected_Length_Checks, Apply_Selected_Range_Checks):
5252         In GNATprove mode, we do not apply the checks, but we still
5253         analyze the expression to possibly issue errors on SPARK
5254         code when a run-time error can be detected at compile time.
5255         (Selected_Length_Checks, Selected_Range_Checks): Perform analysis
5256         in GNATprove mode.
5258 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
5260         * expander.adb (Expand): Add a warning about using return
5261         statements in Ghost management code.
5262         * exp_ch3.adb (Freeze_Type): Add a warning about using return
5263         statements in Ghost management code.
5264         * exp_ch7.adb (Build_Invariant_Procedure_Body,
5265         Build_Invariant_Procedure_Declaration): Add a warning about
5266         using return statements in Ghost management code.
5267         * exp_disp.adb (Make_DT): Add a warning about using return
5268         statements in Ghost management code.
5269         * exp_util.adb (Build_DIC_Procedure_Body,
5270         Build_DIC_Procedure_Declaration, Make_Predicated_Call): Add a
5271         warning about using return statements in Ghost management code.
5272         * freeze.adb (Freeze_Entity): Add a warning about using return
5273         statements in Ghost management code.
5274         * sem.adb (Analyze, Do_Analyze): Add a warning about using return
5275         statements in Ghost management code.
5276         * sem_ch3.adb (Analyze_Object_Declaration, Process_Full_View): Add
5277         a warning about using return statements in Ghost management code.
5278         * sem_ch5.adb (Analyze_Assignment): Add a warning about using
5279         return statements in Ghost management code.
5280         * sem_ch6.adb (Analyze_Procedure_Call,
5281         Analyze_Subprogram_Body_Helper): Add a warning about using return
5282         statements in Ghost management code.
5283         * sem_ch7.adb (Analyze_Package_Body_Helper): Add a warning about
5284         using return statements in Ghost management code.
5285         * sem_ch12.adb (Analyze_Package_Instantiation,
5286         Analyze_Subprogram_Instantiation, Instantiate_Package_Body,
5287         Instantiate_Subprogram_Body): Add a warning about using return
5288         statements in Ghost management code.
5289         * sem_ch13.adb (Build_Predicate_Functions,
5290         Build_Predicate_Function_Declarations): Add a warning about
5291         using return statements in Ghost management code.
5292         * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part,
5293         Analyze_Initial_Condition_In_Decl_Part, Analyze_Pragma,
5294         Analyze_Pre_Post_Condition_In_Decl_Part):  Add a warning about
5295         using return statements in Ghost management code.
5297 2017-01-13  Tristan Gingold  <gingold@adacore.com>
5299         * s-mmosin-mingw.adb: Fix pragma import.
5301 2017-01-13  Arnaud Charlet  <charlet@adacore.com>
5303         * gnat1drv.adb (Adjust_Global_Switches): Ignore -gnateE in
5304         codepeer mode.
5306 2017-01-13  Hristian Kirtchev  <kirtchev@adacore.com>
5308         * atree.adb (Allocate_Initialize_Node): A newly created node is
5309         no longer marked as Ghost at this level.
5310         (Mark_New_Ghost_Node): New routine.
5311         (New_Copy): Mark the copy as Ghost.
5312         (New_Entity): Mark the entity as Ghost.
5313         (New_Node): Mark the node as Ghost.
5314         * einfo.adb (Is_Checked_Ghost_Entity): This attribute can now
5315         apply to unanalyzed entities.
5316         (Is_Ignored_Ghost_Entity): This attribute can now apply to unanalyzed
5317         entities.
5318         (Set_Is_Checked_Ghost_Entity): This attribute now
5319         applies to all entities as well as unanalyzed entities.
5320         (Set_Is_Ignored_Ghost_Entity): This attribute now applies to
5321         all entities as well as unanalyzed entities.
5322         * expander.adb Add with and use clauses for Ghost.
5323         (Expand): Install and revert the Ghost region associated with the node
5324         being expanded.
5325         * exp_ch3.adb (Expand_Freeze_Array_Type): Remove all Ghost-related code.
5326         (Expand_Freeze_Class_Wide_Type): Remoe all Ghost-related code.
5327         (Expand_Freeze_Enumeration_Type): Remove all Ghost-related code.
5328         (Expand_Freeze_Record_Type): Remove all Ghost-related code.
5329         (Freeze_Type): Install and revert the Ghost region associated
5330         with the type being frozen.
5331         * exp_ch5.adb Remove with and use clauses for Ghost.
5332         (Expand_N_Assignment_Statement): Remove all Ghost-related code.
5333         * exp_ch6.adb Remove with and use clauses for Ghost.
5334         (Expand_N_Procedure_Call_Statement): Remove all Ghost-relatd code.
5335         (Expand_N_Subprogram_Body): Remove all Ghost-related code.
5336         * exp_ch7.adb (Build_Invariant_Procedure_Body): Install and revert the
5337         Ghost region of the working type.
5338         (Build_Invariant_Procedure_Declaration): Install and revert
5339         the Ghost region of the working type.
5340         (Expand_N_Package_Body): Remove all Ghost-related code.
5341         * exp_ch8.adb Remove with and use clauses for Ghost.
5342         (Expand_N_Exception_Renaming_Declaration): Remove all Ghost-related
5343         code.
5344         (Expand_N_Object_Renaming_Declaration): Remove all Ghost-related code.
5345         (Expand_N_Package_Renaming_Declaration): Remove all Ghost-related code.
5346         (Expand_N_Subprogram_Renaming_Declaration): Remove all Ghost-related
5347         code.
5348         * exp_ch13.adb Remove with and use clauses for Ghost.
5349         (Expand_N_Freeze_Entity): Remove all Ghost-related code.
5350         * exp_disp.adb (Make_DT): Install and revert the Ghost region of
5351         the tagged type. Move the generation of various entities within
5352         the Ghost region of the type.
5353         * exp_prag.adb Remove with and use clauses for Ghost.
5354         (Expand_Pragma_Check): Remove all Ghost-related code.
5355         (Expand_Pragma_Contract_Cases): Remove all Ghost-related code.
5356         (Expand_Pragma_Initial_Condition): Remove all Ghost-related code.
5357         (Expand_Pragma_Loop_Variant): Remove all Ghost-related code.
5358         * exp_util.adb (Build_DIC_Procedure_Body): Install
5359         and revert the Ghost region of the working types.
5360         (Build_DIC_Procedure_Declaration): Install and revert the
5361         Ghost region of the working type.
5362         (Make_Invariant_Call): Install and revert the Ghost region of the
5363         associated type.
5364         (Make_Predicate_Call): Reimplemented. Install and revert the
5365         Ghost region of the associated type.
5366         * freeze.adb (Freeze_Entity): Install and revert the Ghost region
5367         of the entity being frozen.
5368         (New_Freeze_Node): Removed.
5369         * ghost.adb Remove with and use clauses for Opt.
5370         (Check_Ghost_Completion): Update the parameter profile
5371         and all references to formal parameters.
5372         (Ghost_Entity): Update the comment on usage.
5373         (Install_Ghost_Mode): New routines.
5374         (Is_Ghost_Assignment): New routine.
5375         (Is_Ghost_Declaration): New routine.
5376         (Is_Ghost_Pragma): New routine.
5377         (Is_Ghost_Procedure_Call): New routine.
5378         (Is_Ghost_Renaming): Removed.
5379         (Is_OK_Declaration): Reimplemented.
5380         (Is_OK_Pragma): Reimplemented.
5381         (Is_OK_Statement): Reimplemented.
5382         (Is_Subject_To_Ghost): Update the comment on usage.
5383         (Mark_And_Set_Ghost_Assignment): New routine.
5384         (Mark_And_Set_Ghost_Body): New routine.
5385         (Mark_And_Set_Ghost_Completion): New routine.
5386         (Mark_And_Set_Ghost_Declaration): New routine.
5387         (Mark_And_Set_Ghost_Instantiation): New routine.
5388         (Mark_And_Set_Ghost_Procedure_Call): New routine.
5389         (Mark_Full_View_As_Ghost): Removed.
5390         (Mark_Ghost_Declaration_Or_Body): New routine.
5391         (Mark_Ghost_Pragma): New routine.
5392         (Mark_Ghost_Renaming): New routine.
5393         (Mark_Pragma_As_Ghost): Removed.
5394         (Mark_Renaming_As_Ghost): Removed.
5395         (Propagate_Ignored_Ghost_Code): Update the comment on usage.
5396         (Prune_Node): Freeze nodes no longer need special pruning, they
5397         are processed by the general ignored Ghost code mechanism.
5398         (Restore_Ghost_Mode): New routine.
5399         (Set_Ghost_Mode): Reimplemented.
5400         (Set_Ghost_Mode_From_Entity): Removed.
5401         * ghost.ads Add with and use clauses for Ghost.
5402         (Check_Ghost_Completion): Update the parameter profile
5403         along with the comment on usage.
5404         (Install_Ghost_Mode): New routine.
5405         (Is_Ghost_Assignment): New routine.
5406         (Is_Ghost_Declaration): New routine.
5407         (Is_Ghost_Pragma): New routine.
5408         (Is_Ghost_Procedure_Call): New routine.
5409         (Mark_And_Set_Ghost_Assignment): New routine.
5410         (Mark_And_Set_Ghost_Body): New routine.
5411         (Mark_And_Set_Ghost_Completion): New routine.
5412         (Mark_And_Set_Ghost_Declaration): New routine.
5413         (Mark_And_Set_Ghost_Instantiation): New routine.
5414         (Mark_And_Set_Ghost_Procedure_Call): New routine.
5415         (Mark_Full_View_As_Ghost): Removed.
5416         (Mark_Ghost_Pragma): New routine.
5417         (Mark_Ghost_Renaming): New routine.
5418         (Mark_Pragma_As_Ghost): Removed.
5419         (Mark_Renaming_As_Ghost): Removed.
5420         (Restore_Ghost_Mode): New routine.
5421         (Set_Ghost_Mode): Redefined.
5422         (Set_Ghost_Mode_From_Entity): Removed.
5423         * sem.adb (Analyze): Install and revert the Ghost region of the
5424         node being analyzed.
5425         (Do_Analyze): Change the way a clean Ghost
5426         region is installed and reverted.
5427         * sem_ch3.adb (Analyze_Full_Type_Declaration): Remove
5428         all Ghost-related code.
5429         (Analyze_Incomplete_Type_Decl): Remove all Ghost-related code.
5430         (Analyze_Number_Declaration): Remove all Ghost-related code.
5431         (Analyze_Object_Declaration): Install and revert the Ghost region of
5432         a deferred object declaration's completion.
5433         (Array_Type_Declaration): Remove all Ghost-related code.
5434         (Build_Derived_Type): Update the comment on
5435         the propagation of Ghost attributes from a parent to a derived type.
5436         (Derive_Subprogram): Remove all Ghost-related code.
5437         (Make_Class_Wide_Type): Remove all Ghost-related code.
5438         (Make_Implicit_Base): Remove all Ghost-related code.
5439         (Process_Full_View): Install and revert the Ghost region of
5440         the partial view.  There is no longer need to check the Ghost
5441         completion here.
5442         * sem_ch5.adb (Analyze_Assignment): Install and revert the Ghost
5443         region of the left hand side.
5444         * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Remove
5445         all Ghost-related code.
5446         (Analyze_Expression_Function): Remove all Ghost-related code.
5447         (Analyze_Generic_Subprogram_Body): Remove all Ghost-related code.
5448         (Analyze_Procedure_Call): Install and revert the Ghost region of
5449         the procedure being called.
5450         (Analyze_Subprogram_Body_Helper): Install and revert the Ghost
5451         region of the spec or body.
5452         (Analyze_Subprogram_Declaration): Remove all Ghost-related code.
5453         (Build_Subprogram_Declaration): Remove all Ghost-related code.
5454         (Find_Corresponding_Spec): Remove all Ghost-related code.
5455         (Process_Formals): Remove all Ghost-related code.
5456         * sem_ch7.adb (Analyze_Package_Body_Helper): Install and revert
5457         the Ghost region of the spec.
5458         (Analyze_Package_Declaration): Remove all Ghost-related code.
5459         * sem_ch8.adb (Analyze_Exception_Renaming): Mark a renaming as
5460         Ghost when it aliases a Ghost entity.
5461         (Analyze_Generic_Renaming): Mark a renaming as Ghost when it aliases
5462         a Ghost entity.
5463         (Analyze_Object_Renaming): Mark a renaming as Ghost when
5464         it aliases a Ghost entity.
5465         (Analyze_Package_Renaming): Mark a renaming as Ghost when it aliases
5466         a Ghost entity.
5467         (Analyze_Subprogram_Renaming): Mark a renaming as Ghost when it
5468         aliases a Ghost entity.
5469         * sem_ch11.adb Remove with and use clauses for Ghost.
5470         (Analyze_Exception_Declaration): Remove all Ghost-related code.
5471         * sem_ch12.adb (Analyze_Generic_Package_Declaration): Remove all
5472         Ghost-related code.
5473         (Analyze_Generic_Subprogram_Declaration): Remove all Ghost-related
5474         code.
5475         (Analyze_Package_Instantiation): Install and revert the Ghost region
5476         of the package instantiation.
5477         (Analyze_Subprogram_Instantiation): Install
5478         and revert the Ghost region of the subprogram instantiation.
5479         (Instantiate_Package_Body): Code clean up. Install and revert the
5480         Ghost region of the package body.
5481         (Instantiate_Subprogram_Body): Code clean up. Install and revert the
5482         Ghost region of the subprogram body.
5483         * sem_ch13.adb (Build_Predicate_Functions): Install
5484         and revert the Ghost region of the related type.
5485         (Build_Predicate_Function_Declaration): Code clean up. Install
5486         and rever the Ghost region of the related type.
5487         * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
5488         Install and revert the Ghost region of the pragma.
5489         (Analyze_Initial_Condition_In_Decl_Part): Install and revert the
5490         Ghost region of the pragma.
5491         (Analyze_Pragma): Install and revert the Ghost region of various
5492         pragmas.  Mark a pragma as Ghost when it is related to a Ghost entity
5493         or encloses a Ghost entity.
5494         (Analyze_Pre_Post_Condition): Install and revert the Ghost
5495         region of the pragma.
5496         (Analyze_Pre_Post_Condition_In_Decl_Part): Install and revert the
5497         Ghost region of the pragma.
5498         * sem_res.adb (Resolve): Remove all Ghost-related code.
5499         * sem_util.adb (Is_Declaration): Reimplemented.
5500         (Is_Declaration_Other_Than_Renaming): New routine.
5501         * sem_util.ads (Is_Declaration_Other_Than_Renaming): New routine.
5502         * sinfo.adb (Is_Checked_Ghost_Pragma): New routine.
5503         (Is_Ghost_Pragma): Removed.
5504         (Is_Ignored_Ghost_Pragma): New routine.
5505         (Set_Is_Checked_Ghost_Pragma): New routine.
5506         (Set_Is_Ghost_Pragma): Removed.
5507         (Set_Is_Ignored_Ghost_Pragma): New routine.
5508         * sinfo.ads: Update the documentation on Ghost mode and
5509         Ghost regions.  New attributes Is_Checked_Ghost_Pragma
5510         and Is_Ignored_Ghost_Pragma along with usages in nodes.
5511         Remove attribute Is_Ghost_Pragma along with usages in nodes.
5512         (Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
5513         (Is_Ghost_Pragma): Removed along with pragma Inline.
5514         (Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
5515         (Set_Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
5516         (Set_Is_Ghost_Pragma): Removed along with pragma Inline.
5517         (Set_Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
5519 2017-01-12  Tristan Gingold  <gingold@adacore.com>
5521         * s-mmap.ads, s-mmap.adb, s-mmosin-unix.ads, s-mmosin-unix.adb,
5522         s-mmauni-long.ads, s-mmosin-mingw.ads, s-mmosin-mingw.adb: New files.
5524 2017-01-12  Yannick Moy  <moy@adacore.com>
5526         * errout.adb, errout.ads (Initialize): Factor common treatment
5527         in Reset_Warnings.
5528         (Reset_Warnings): New procedure to reset counts related to warnings.
5529         (Record_Compilation_Errors): New variable to store the presence of an
5530         error, used in gnat2why to allow changing the Warning_Mode.
5531         (Compilation_Errors): Use new variable Record_Compilation_Errors to
5532         store the presence of an error.
5534 2017-01-12  Javier Miranda  <miranda@adacore.com>
5536         * sem_ch13.adb (Analyze_Aspect_Specifications):
5537         For Interrupt_Handler and Attach_ Handler aspects, decorate the
5538         internally built reference to the protected procedure as coming
5539         from sources and force its analysis.
5541 2017-01-12  Ed Schonberg  <schonberg@adacore.com>
5543         * sem_ch3.adb (Build_Derived_Type): For a scalar derived type,
5544         inherit predicates if any from the first_subtype of the parent,
5545         not from the anonymous parent type.
5546         * sem_eval.adb (Is_Static_Subtype): A type that inherits a dynamic
5547         predicate is not a static subtype.
5549 2017-01-12  Gary Dismukes  <dismukes@adacore.com>
5551         * freeze.adb (Check_Suspicious_Convention): New procedure
5552         performing a warning check on discriminated record types with
5553         convention C or C++. Factored out of procedure Freeze_Record_Type,
5554         and changed to only apply to base types (to avoid spurious
5555         warnings on subtypes). Minor improvement of warning messages
5556         to refer to discriminated rather than variant record types.
5557         (Freeze_Record_Type): Remove code for performing a suspicious
5558         convention check.
5559         (Freeze_Entity): Only call Freeze_Record_Type
5560         on types that aren't declared within any enclosing generic units
5561         (rather than just excluding the type when the innermost scope
5562         is generic). Call Check_Suspicious_Convention whether or not
5563         the type is declared within a generic unit.
5564         * sem_ch8.adb (In_Generic_Scope): Move this function to Sem_Util.
5565         * sem_util.ads, sem_util.adb (In_Generic_Scope): New function (moved
5566         from Sem_Ch8).
5568 2017-01-12  Tristan Gingold  <gingold@adacore.com>
5570         * sysdep.c, adaint.c, rtinit.c, ming32.h:
5571         (__gnat_current_codepage): Renamed from CurrentCodePage
5572         (__gnat_current_ccs_encoding): Renamed from CurrentCCSEncoding
5574 2017-01-12  Ed Schonberg  <schonberg@adacore.com>
5576         * sem_ch6.adb (Fully_Conformant_Expressions): Handle properly
5577         quantified expressions, following AI12-050: the loop parameters
5578         of two quantified expressions are conformant if they have the
5579         same identifier.
5581 2017-01-12  Arnaud Charlet  <charlet@adacore.com>
5583         * gcc-interface/Makefile.in: Clean up VxWorks targets.
5585 2017-01-12  Ed Schonberg  <schonberg@adacore.com>
5587         * sem_attr.adb (Analyze_Attribute_Reference, case Loop_Entry):
5588         Hnadle properly the attribute reference when it appears as part
5589         of an expression in another loop aspect.
5591 2017-01-12  Ed Schonberg  <schonberg@adacore.com>
5593         * exp_ch3.adb (Check_Predicated_Discriminant): New procedure,
5594         subsidiary of Build_Initialization_Call, to complete generation
5595         of predicate checks on discriminants whose (sub)types have
5596         predicates, and to add checks on variants that do not have an
5597         others clause.
5598         * sem_util.adb (Gather_Components): A missing Others alternative is
5599         not an error when the type of the discriminant is a static predicate
5600         (and coverage has been checked when analyzing the case statement). A
5601         runtime check is generated to verify that a given discriminant
5602         satisfies the predicate (RM 3.8.1. (21.1/2)).
5604 2017-01-12  Yannick Moy  <moy@adacore.com>
5606         * gnat1drv.adb (Adjust_Global_Switches): Only
5607         perform checking of exception mechanism when generating code.
5609 2017-01-12  Justin Squirek  <squirek@adacore.com>
5611         * exp_ch7.adb (Add_Type_Invariants, Process_Array_Component):
5612         Remove handling of access component with invariant.
5613         (Build_Invariant_Procedure_Declaration): Remove return on class
5614         wide type.
5615         * freeze.adb (Freeze_Array_Type, Freeze_Record_Type): Remove
5616         conditional exception for component or array so Has_Own_Invariants
5617         flag is not falsly set.
5618         * sem_ch3.adb (Make_Class_Wide_Type): Initialize copy of class
5619         wide type to have no invariant flags.
5621 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
5623         * exp_ch9.adb, sem_prag.adb, s-tassta.adb, sem_util.adb, s-tarest.adb,
5624         sem_ch13.adb: Minor reformatting.
5626 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
5628         * exp_aggr.adb (Build_Record_Aggr_Code): Guard against a missing
5629         adjustment primitive when the ancestor type was not properly frozen.
5630         (Gen_Assign): Guard against a missing initialization
5631         primitive when the component type was not properly frozen.
5632         (Initialize_Array_Component): Guard against a missing adjustment
5633         primitive when the component type was not properly frozen.
5634         (Initialize_Record_Component): Guard against a missing adjustment
5635         primitive when the component type was not properly frozen.
5636         (Process_Transient_Component_Completion): The transient object may
5637         not be finalized when its associated type was not properly frozen.
5638         * exp_ch3.adb (Build_Assignment): Guard against a missing
5639         adjustment primitive when the component type was not properly frozen.
5640         (Build_Initialization_Call): Guard against a missing
5641         initialization primitive when the associated type was not properly
5642         frozen.
5643         (Expand_N_Object_Declaration): Guard against a missing
5644         adjustment primitive when the base type was not properly frozen.
5645         (Predefined_Primitive_Bodies): Create an empty Deep_Adjust
5646         body when there is no adjustment primitive available. Create an
5647         empty Deep_Finalize body when there is no finalization primitive
5648         available.
5649         * exp_ch4.adb (Apply_Accessibility_Check): Guard against a
5650         missing finalization primitive when the designated type was
5651         not properly frozen.
5652         (Expand_N_Allocator): Guard against a missing initialization primitive
5653         when the designated type was not properly frozen.
5654         * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add the adjustment call
5655         only when the corresponding adjustment primitive is available.
5656         * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Generate the
5657         adjustment/finalization statements only when there is an available
5658         primitive to carry out the action.
5659         (Build_Initialize_Statements): Generate the initialization/finalization
5660         statements only when there is an available primitive to carry out the
5661         action.
5662         (Make_Adjust_Call): Do not generate a call when the underlying
5663         type is not present due to a possible missing full view.
5664         (Make_Final_Call): Do not generate a call when the underlying
5665         type is not present due to a possible missing full view.
5666         (Make_Finalize_Address_Stmts): Generate an empty body when the
5667         designated type lacks a finalization primitive.
5668         (Make_Init_Call): Do not generate a call when the underlying type is
5669         not present due to a possible missing full view.
5670         (Process_Component_For_Adjust): Add the adjustment call only when the
5671         corresponding adjustment primitive is available.
5672         (Process_Component_For_Finalize): Add the finalization call only when
5673         the corresponding finalization primitive is available.
5674         (Process_Object_Declaration): Use a null statement to emulate a
5675         missing call to the finalization primitive of the object type.
5676         * exp_ch7.ads (Make_Adjust_Call): Update the comment on usage.
5677         (Make_Final_Call): Update the comment on usage.
5678         (Make_Init_Call): Update the comment on usage.
5679         * exp_util.adb (Build_Transient_Object_Statements): Code reformatting.
5681 2017-01-12  Arnaud Charlet  <charlet@adacore.com>
5683         * einfo.ads: Update documentation of Address_Taken.
5684         * sem_attr.adb (Analyze_Access_Attribute, Resolve_Attribute
5685         [Access_Attribute]): Only consider 'Access/'Unchecked_Access
5686         for subprograms when setting Address_Taken flag.
5688 2017-01-12  Patrick Bernardi  <bernardi@adacore.com>
5690         * sem_ch10.adb (Analyze_With_Clause): Removed code that turned
5691         Configurable_Run_Time_Mode off when analysing with'ed predefined
5692         libraries.
5694 2017-01-12  Gary Dismukes  <dismukes@adacore.com>
5696         * sem_prag.adb: Minor reformatting.
5697         * sem_util.adb (Unique_Entity): fix result for
5698         bodies of entry families.
5700 2017-01-12  Justin Squirek  <squirek@adacore.com>
5702         * sem_prag.adb (Analyze_Pragma): Add appropriate calls to
5703         Resolve_Suppressible in the pragma Assertion_Policy case.
5704         (Resolve_Suppressible): Created this function to factor out
5705         common code used to resolve Suppress to either Ignore or Check
5706         * snames.ads-tmpl: Add name for Suppressible.
5708 2017-01-12  Gary Dismukes  <dismukes@adacore.com>
5710         * exp_ch9.adb, s-secsta.adb, snames.ads-tmpl, exp_ch3.adb: Minor
5711         reformatting.
5712         * debug.adb: Minor comment fixes.
5714 2017-01-12  Arnaud Charlet  <charlet@adacore.com>
5716         * sem_util.adb (Unique_Entity): For concurrent
5717         bodies that are defined with stubs and complete a declaration
5718         of a single concurrent object return the entity of an implicit
5719         concurrent type, not the entity of the anonymous concurrent
5720         object.
5721         * debug.adb: -gnatd.J is no longer used.
5722         * make.adb (Globalize): Removed, no longer used.
5723         * sem_ch9.adb: minor typo in comment for entry index
5725 2017-01-12  Patrick Bernardi  <bernardi@adacore.com>
5727         * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
5728         * exp_ch3.adb (Build_Init_Statements): As part of initialising
5729         the value record of a task, set its _Secondary_Stack_Size field
5730         if present.
5731         * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
5732         a _Secondary_Stack_Size field in the value record of
5733         the task if a Secondary_Stack_Size rep item is present.
5734         (Make_Task_Create_Call): Include secondary stack size
5735         parameter. If No_Secondary_Stack restriction is in place, passes
5736         stack size of 0.
5737         * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
5738         Secondary_Stack_Size.
5739         * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
5740         function to define the overhead of the secondary stack.
5741         * s-tarest.adb (Create_Restricted_Task,
5742         Create_Restricted_Task_Sequential): Functions now include
5743         Secondary_Stack_Size parameter to pass to Initialize_ATCB.
5744         * s-tarest.adb (Create_Restricted_Task,
5745         Create_Restricted_Task_Sequential): Calls to Initialize_ATCB now
5746         include Secondary_Stack_Size parameter.
5747         (Task_Wrapper): Secondary stack now allocated to the size specified by
5748         the Secondary_Stack_Size parameter in the task's ATCB.
5749         * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialize_ATCB): New
5750         Secondary_Stack_Size component.
5751         * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
5752         Create_Restricted_Task_Sequential): Function now include
5753         Secondary_Stack_Size parameter.
5754         (Task_Wrapper): Secondary stack now allocated to the size
5755         specified by the Secondary_Stack_Size parameter in the task's
5756         ATCB.
5757         * s-tproft.adb (Register_Foreign_Thread): Amended Initialize_ATCB call
5758         to include Secondary_Stack_Size parameter.
5759         * sem_ch13.adb (Analyze_Aspect_Specification): Add support for
5760         Secondary_Stack_Size aspect, turning the aspect into its corresponding
5761         internal attribute.
5762         (Analyze_Attribute_Definition): Process Secondary_Stack_Size attribute.
5763         * snames.adb-tmpl, snames.ads-tmpl: Added names
5764         Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
5765         Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
5767 2017-01-12  Yannick Moy  <moy@adacore.com>
5769         * exp_spark.adb (Expand_SPARK_Potential_Renaming): Fix sloc of copied
5770         subtree.
5772 2017-01-12  Justin Squirek  <squirek@adacore.com>
5774         * exp_attr.adb (Expand_N_Attribute_Reference):
5775         Fix Finalization_Size case by properly resolving the type after
5776         rewritting the node.
5778 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
5780         * exp_util.adb (Build_DIC_Procedure_Body): Semi-insert the body into
5781         the tree.
5782         (Build_DIC_Procedure_Declaration): Semi-insert the body into the tree.
5783         * binde.adb, exp_ch5.adb, sem_type.adb, sem.ads, sem_res.adb,
5784         exp_sel.ads: Minor reformatting.
5786 2017-01-12  Justin Squirek  <squirek@adacore.com>
5788         * exp_ch6.adb (Expand_Call): Add guard to prevent
5789         invariant checks from being created for internally generated
5790         subprograms.
5792 2017-01-12  Bob Duff  <duff@adacore.com>
5794         * lib-writ.ads: Remove incorrect comment.
5796 2017-01-12  Javier Miranda  <miranda@adacore.com>
5798         * debug.adb (-gnatd.K): Enable generation of contract-only
5799         procedures in CodePeer mode.
5800         * contracts.adb (Build_And_Analyze_Contract_Only_Subprograms):
5801         New subprogram.
5802         (Analyze_Contracts): Generate contract-only procedures if -gnatdK is
5803         set.
5804         * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): New
5805         subprogram.
5806         (Get_Contract_Only_Missing_Body_Name): New subprogram.
5807         (Get_Contract_Only_Body): New subprogram.
5808         (Set_Contract_Only_Body): New subprogram.
5809         (Is_Contract_Only_Body): New subprogram.
5810         (Set_Is_Contract_Only_Body): New subprogram.
5811         (SCIL_Nodes): Replace table by hash-table.
5813 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
5815         * exp_ch6.adb: Minor reformatting.
5816         * spark_xrefs.ads: minor cleanup of comments for SPARK xrefs
5818 2017-01-12  Bob Duff  <duff@adacore.com>
5820         * binde.adb (Forced): New reason for a dependence.
5821         (Force_Elab_Order): Implementation of the new switch.
5822         * binde.ads: Minor comment fixes.
5823         * bindusg.adb: Add -f switch. Apparently, there was an -f switch
5824         long ago that is no longer supported; removed comment about that.
5825         * opt.ads (Force_Elab_Order_File): Name of file specified for
5826         -f switch.
5827         * switch-b.adb: Parse -f switch.
5829 2017-01-12  Justin Squirek  <squirek@adacore.com>
5831         * exp_ch6.adb (Check_View_Conversion): Created this function
5832         to properly chain calls to check type invariants that may be
5833         present in a subprogram call after the subprogram.
5834         (Expand_Call): Add a conditional to identify when a view conversion
5835         needs to be checked.
5836         * nlists.adb, nlists.ads (Prepend_New): New routine.
5837         (Prepend_New_To): New routine.
5839 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
5841         * sinfo.ads: Minor reformatting.
5843 2017-01-12  Gary Dismukes  <dismukes@adacore.com>
5845         * exp_util.adb, exp_util.ads, einfo.ads: Minor typo fixes and
5846         reformatting.
5848 2017-01-12  Hristian Kirtchev  <kirtchev@adacore.com>
5850         * exp_ch6.adb (Make_Build_In_Place_Call_In_Anonymous_Context): Add new
5851         variable Definite. Create a local object and pass its 'Access to the
5852         BIP function when the result type is either definite or it does not
5853         require any finalization or secondary stack management.
5855 2017-01-12  Bob Duff  <duff@adacore.com>
5857         * contracts.adb, einfo.adb, errout.adb, exp_attr.adb,
5858         exp_ch3.adb, exp_ch7.adb, exp_ch9.adb, exp_prag.adb, freeze.adb,
5859         frontend.adb, ghost.adb, inline.adb, lib-writ.adb, lib-xref.adb,
5860         par.adb, par-ch10.adb, par-ch2.adb, par-prag.adb, par_sco.adb,
5861         sem_attr.adb, sem_aux.adb, sem_ch10.adb, sem_ch12.adb,
5862         sem_ch13.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
5863         sem_prag.adb, sem_res.adb, sem_util.adb, sem_util.ads,
5864         sem_warn.adb, sinfo.adb, sinfo.ads, sprint.adb (Pragma_Name):
5865         Change name to Pragma_Name_Unmapped.
5866         (Pragma_Name_Mapped): Change name to Pragma_Name.
5867         This is because the "mapped" version should be the usual case.
5869 2017-01-09  Hristian Kirtchev  <kirtchev@adacore.com>
5871         * einfo.ads, einfo.adb: Remove uses of flags Has_Default_Init_Cond,
5872         Is_Default_Init_Cond_Procedure, and
5873         Has_Inherited_Default_Init_Cond.  Add uses of flags
5874         Has_Own_DIC, Is_DIC_Procedure, and Has_Inherited_DIC.
5875         (Default_Init_Cond_Procedure): Removed.
5876         (DIC_Procedure): New routine.
5877         (Has_Default_Init_Cond): Removed.
5878         (Has_DIC): New routine.
5879         (Has_Inheritable_Invariants): The attribute applies to the base type.
5880         (Has_Inherited_Default_Init_Cond): Removed.
5881         (Has_Inherited_DIC): New routine.
5882         (Has_Inherited_Invariants): The attribute applies to the base type.
5883         (Has_Own_DIC): New routine.
5884         (Has_Own_Invariants): The attribute applies to the base type.
5885         (Is_Default_Init_Cond_Procedure): Removed.
5886         (Is_DIC_Procedure): New routine.
5887         (Set_Default_Init_Cond_Procedure): Removed.
5888         (Set_DIC_Procedure): New routine.
5889         (Set_Has_Default_Init_Cond): Removed.
5890         (Set_Has_Inheritable_Invariants): The attribute applies
5891         to the base type.
5892         (Set_Has_Inherited_Default_Init_Cond): Removed.
5893         (Set_Has_Inherited_DIC): New routine.
5894         (Set_Has_Inherited_Invariants): The attribute applies to the base type.
5895         (Set_Has_Own_DIC): New routine.
5896         (Set_Has_Own_Invariants): The attribute applies to the base type.
5897         (Set_Is_Default_Init_Cond_Procedure): Removed.
5898         (Set_Is_DIC_Procedure): New routine.
5899         (Write_Entity_Flags): Update the output of all flags related to
5900         default initial condition.
5901         * exp_ch3.adb (Expand_N_Object_Declaration): Update the generation
5902         of the call to the DIC procedure.
5903         (Freeze_Type): Generate the body of the DIC procedure.
5904         * exp_ch7.adb (Build_Invariant_Procedure_Body): Replace
5905         all occurrences of Create_Append with Append_New_To. Do
5906         not generate an invariant procedure for a class-wide type.
5907         The generated body acts as a freeze action of the working type.
5908         (Build_Invariant_Procedure_Declaration): Do not generate an
5909         invariant procedure for a class-wide type.
5910         (Create_Append): Removed.
5911         * exp_util.adb: Add with and use clauses for Sem_Ch3, sem_ch6,
5912         sem_Ch12, Sem_Disp, and GNAT.HTable. Move the handling of
5913         class-wide pre/postcondition description and data structures from
5914         Sem_Prag.
5915         (Build_Class_Wide_Expression): Moved from Sem_Prag.
5916         (Build_DIC_Call): New routine.
5917         (Build_DIC_Procedure_Body): New routine.
5918         (Build_DIC_Procedure_Declaration): New routine.
5919         (Entity_Hash): Moved from Sem_Prag.
5920         (Find_DIC_Type): New routine.
5921         (Update_Primitives_Mapping): Reimplemented.
5922         (Update_Primitives_Mapping_Of_Types): New routine.
5923         * exp_util.ads (Build_Class_Wide_Expression): Moved from Sem_Prag.
5924         (Build_DIC_Call): New routine.
5925         (Build_DIC_Procedure_Body): New routine.
5926         (Build_DIC_Procedure_Declaration): New routine.
5927         (Update_Primitives_Mapping): Moved from Sem_Prag.
5928         (Update_Primitives_Mapping_Of_Types): New routine.
5929         * nlists.adb (Append_New): New routine.
5930         (Append_New_To): New routine.
5931         * nlists.ads (Append_New): New routine.
5932         (Append_New_To): New routine.
5933         * sem_ch3.adb (Analyze_Declarations): Do not generate the bodies
5934         of DIC procedures here. This is now done at the end of the
5935         visible declarations, private declarations, and at the freeze
5936         point of a type.
5937         (Analyze_Private_Extension_Declaration):
5938         A private extension inherits the DIC pragma of a parent type.
5939         (Analyze_Subtype_Declaration): No need to propagate invariant
5940         attributes to a subtype as those apply to the base type.
5941         (Build_Derived_Record_Type): No need to inherit invariants here
5942         as this is now done in Build_Derived_Type.
5943         (Build_Derived_Type): Inherit both the DIC pragma and invariants from
5944         a parent type.
5945         (Process_Full_View): Update the propagation of DIC attributes.
5946         (Propagate_Default_Init_Cond_Attributes): Removed.
5947         * sem_ch7.adb Add with and use clauses for Exp_Util.
5948         (Analyze_Package_Specification): Create the body of the DIC
5949         procedure at the end of the visible and private declarations.
5950         (Preserve_Full_Attributes): Propagate DIC attributes.
5951         * sem_ch9.adb (Analyze_Protected_Type_Declaration): Propagate
5952         DIC attributes.
5953         (Analyze_Task_Type_Declaration): Propagate DIC attributes.
5954         * sem_elab.adb (Check_A_Call): Update the call to
5955         Is_Nontrivial_Default_Init_Cond_Procedure.
5956         * sem_prag.adb Remove the with and use clauses for
5957         GNAT.HTable. Move the handling of class- wide pre/postcondition
5958         description and data structures to Exp_Util.
5959         (Analyze_Pragma): Create the declaration of the DIC procedure. There
5960         is no need to propagate invariant-related attributes at this point
5961         as this is done in Build_Invariant_Procedure_Declaration.
5962         (Build_Class_Wide_Expression): Moved to Exp_Util.
5963         (Entity_Hash): Moved to Exp_Util.
5964         (Update_Primitives_Mapping): Moved to Exp_Util.
5965         * sem_prag.ads (Build_Class_Wide_Expression): Moved to Exp_Util.
5966         (Update_Primitives_Mapping): Moved to Exp_Util.
5967         * sem_util.adb: Remove with and use clauses for Ghost
5968         and Sem_Ch13.
5969         (Build_Default_Init_Cond_Call): Removed.
5970         (Build_Default_Init_Cond_Procedure_Bodies): Removed.
5971         (Build_Default_Init_Cond_Procedure_Declaration): Removed.
5972         (Get_Views): Reimplemented.
5973         (Has_Full_Default_Initialization): Reimplement the section on DIC.
5974         (Inherit_Default_Init_Cond_Procedure): Removed.
5975         (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
5976         (Is_Nontrivial_DIC_Procedure): New routine.
5977         (Is_Verifiable_DIC_Pragma): New routine.
5978         (Propagate_DIC_Attributes): New routine.
5979         * sem_util.ads (Build_Default_Init_Cond_Call): Removed.
5980         (Build_Default_Init_Cond_Procedure_Bodies): Removed.
5981         (Build_Default_Init_Cond_Procedure_Declaration): Removed.
5982         (Inherit_Default_Init_Cond_Procedure): Removed.
5983         (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
5984         (Is_Nontrivial_DIC_Procedure): New routine.
5985         (Is_Verifiable_DIC_Pragma): New routine.
5986         (Propagate_DIC_Attributes): New routine.
5987         * sem_warn.adb (Is_OK_Fully_Initialized): Reimplement the section
5988         on DIC.
5989         * sinfo.ads, sinfo.adb: Add new attribute Expression_Copy along with
5990         usage in nodes.
5991         (Expression_Copy): New routine along with pragma Inline.
5992         (Set_Expression_Copy): New routine along with pragma Inline.
5994 2017-01-06  Bob Duff  <duff@adacore.com>
5996         * bindgen.adb (Gen_Adainit, Gen_Adafinal): Change
5997         "Bind_Main_Program" to "not Bind_For_Library", because otherwise
5998         we won't generate the call to s_stalib_adafinal when the main
5999         is not written in Ada.
6001 2017-01-06  Bob Duff  <duff@adacore.com>
6003         * sem_prag.adb: Minor: remove pragma Warnings.
6005 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6007         * Makefile.rtl: Do not compile s-stchop by default.
6009 2017-01-06  Patrick Bernardi  <bernardi@adacore.com>
6011         * aspects.adb, aspects.ads, exp_ch3.adb, exp_ch9.adb, par-prag.adb,
6012         sem_ch13.adb, sem_prag.adb, sem_prag.ads, snames.adb-tmpl,
6013         snames.ads-tmpl, s-secsta.adb, s-secsta.ads, s-tarest.adb,
6014         s-tarest.ads, s-taskin.adb, s-taskin.ads, s-tassta.adb, s-tassta.ads:
6015         Reverted previous change for now.
6017 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6019         * exp_ch3.adb (Build_Initialization_Call): Apply predicate
6020         check to default discriminant value if checks are enabled.
6021         (Build_Assignment): If type of component has static predicate,
6022         apply check to its default value, if any.
6024 2017-01-06  Patrick Bernardi  <bernardi@adacore.com>
6026         * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
6027         * exp_ch3.adb (Build_Init_Statements): As part of initialising
6028         the value record of a task, set its _Secondary_Stack_Size field
6029         if present.
6030         * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
6031         a _Secondary_Stack_Size field in the value record of
6032         the task if a Secondary_Stack_Size rep item is present.
6033         (Make_Task_Create_Call): Include secondary stack size
6034         parameter. If No_Secondary_Stack restriction is in place, passes
6035         stack size of 0.
6036         * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
6037         Secondary_Stack_Size.
6038         * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
6039         function to define the overhead of the secondary stack.
6040         * s-tarest.adb (Create_Restricted_Task,
6041         Create_Restricted_Task_Sequential): Functions now include
6042         Secondary_Stack_Size parameter to pass to Initialize_ATCB.
6043         * s-tarest.adb (Create_Restricted_Task,
6044         Create_Restricted_Task_Sequential): Calls to Initialize_ATCB
6045         now include Secondary_Stack_Size parameter.
6046         (Task_Wrapper):
6047         Secondary stack now allocated to the size specified by the
6048         Secondary_Stack_Size parameter in the task's ATCB.
6049         * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialise_ATCB): New
6050         Secondary_Stack_Size component.
6051         * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
6052         Create_Restricted_Task_Sequential): Function now include
6053         Secondary_Stack_Size parameter.
6054         (Task_Wrapper): Secondary stack
6055         now allocated to the size specified by the Secondary_Stack_Size
6056         parameter in the task's ATCB.
6057         * sem_ch13.adb (Analyze_Aspect_Specification): Add support
6058         for Secondary_Stack_Size aspect, turning the aspect into its
6059         corresponding internal attribute.
6060         (Analyze_Attribute_Definition):
6061         Process Secondary_Stack_Size attribute.
6062         * snames.adb-tmpl, snames.ads-tmpl: Added names
6063         Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
6064         Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
6066 2017-01-06  Pascal Obry  <obry@adacore.com>
6068         * a-direio.adb, a-direio.ads, a-sequio.adb, a-sequio.ads: Add Flush to
6069         Sequential_IO and Direct_IO.
6071 2017-01-06  Bob Duff  <duff@adacore.com>
6073         * snames.ads-tmpl (Renamed): New name for the pragma argument.
6074         * par-ch2.adb: Allow the new pragma (with analysis deferred
6075         to Sem_Prag).
6076         * sinfo.ads, sinfo.adb (Map_Pragma_Name, Pragma_Name_Mapped):
6077         Keep a mapping from new pragma names to old names.
6078         * sem_prag.adb: Check legality of pragma Rename_Pragma, and
6079         implement it by calling Map_Pragma_Name.
6080         * checks.adb, contracts.adb, einfo.adb, errout.adb,
6081         * exp_attr.adb, exp_ch3.adb, exp_ch6.adb, exp_ch7.adb, exp_ch9.adb,
6082         * exp_prag.adb, exp_util.adb, freeze.adb, frontend.adb, ghost.adb,
6083         * inline.adb, lib-writ.adb, scans.adb, scans.ads, sem_attr.adb,
6084         * sem_aux.adb, sem_ch10.adb, sem_ch13.adb, sem_ch6.adb, sem_ch9.adb,
6085         * sem_elab.adb, sem_res.adb, sem_util.adb, sem_util.ads,
6086         * sem_warn.adb: Call Pragma_Name_Mapped instead of Pragma_Name
6087         as appropriate.
6089 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
6091         * exp_ch9.adb: Minor reformatting.
6093 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6095         * exp_ch9.ads, exp_ch9.adb (Build_Entry_Names): Remove (unused).
6096         * rtsfind.ads (RE_Task_Entry_Names_Array, RO_ST_Set_Entry_Names)
6097         (RE_Protected_Entry_Names_Array, RO_PE_Set_Entry_Names): Remove
6098         (unused).
6099         * s-taskin.ads, s-taskin.adb (Set_Entry_Names,
6100         Task_Entry_Names_Array, Task_Entry_Names_Access): Remove.
6101         * s-tpoben.ads, s-tpoben.adb (Set_Entry_Names,
6102         Protected_Entry_Names_Array, Protected_Entry_Names_Access): Remove.
6104 2017-01-06  Bob Duff  <duff@adacore.com>
6106         * sinfo.ads, sinfo.adb (Map_Pragma_Name): Preparation work,
6107         dummy implementation of Map_Pragma_Name.
6109 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6111         * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Make the
6112         entry_body variable constant.
6113         * s-taprob.ads (Entry_Body_Access): Move to s-tposen.
6114         * s-tpoben.ads (Protected_Entry_Body_Access): Now access
6115         to constant.
6116         * s-tposen.ads (Entry_Body_Access): Moved from s-taprob,
6117         now access to constant.
6119 2017-01-06  Gary Dismukes  <dismukes@adacore.com>
6121         * einfo.ads, sem_res.adb, sem_attr.adb, sem_ch6.adb: Minor
6122         reformatting and typo fixes.
6124 2017-01-06  Bob Duff  <duff@adacore.com>
6126         * snames.ads-tmpl: New names for pragma renaming.
6127         * snames.adb-tmpl (Is_Configuration_Pragma_Name): Minor cleanup.
6128         * par-prag.adb: Add new pragma name to case statement.
6129         * sem_prag.adb (Rename_Pragma): Initial cut at semantic analysis
6130         of the pragma.
6131         * sinfo.ads, sinfo.adb (Pragma_Name_Mapped): Preparation work,
6132         Dummy implementation of Pragma_Name_Mapped.
6134 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6136         * exp_ch6.adb (Expand_Protected_Subprogram_Call): Add guard to
6137         better detect call within an entry_wrapper.
6138         * sem_res.adb (Resolve_Call): A protected call within an
6139         entity_wrapper is analyzed in the context of the protected
6140         object but corresponds to a pre-analysis and is not an access
6141         before elaboration.
6142         * sem_attr.adb: Minor reformatting.
6144 2017-01-06  Justin Squirek  <squirek@adacore.com>
6146         * sem_attr.adb (Analyze_Attribute): Modify semantic checks for
6147         Finalization_Size to allow a prefix of any non-class-wide type.
6148         * sem_attr.ads Modify comment for Finalization_Size to include
6149         definite type use case.
6151 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6153         * einfo.ads, einfo.adb (Is_Entry_Wrapper): New flag, defined
6154         on procedures that are wrappers created for entries that have
6155         preconditions.
6156         * sem_ch6.adb (Analyze_Subrogram_Body_Helper): If the subprogram
6157         body is an entry_wrapper, compile it in the context of the
6158         synchronized type, because a precondition may refer to funtions
6159         of the type.
6160         * exp_ch9.adb (Build_Contract_Wrapper): Set Is_Entry_Wrapper on
6161         body entity.
6162         * exp_ch6.adb (Expand_Protected_Subprogram_Call): if the call is
6163         within an Entry_Wrapper this is an external call whose target
6164         is the synchronized object that is the actual in the call to
6165         the wrapper.
6167 2017-01-06  Yannick Moy  <moy@adacore.com>
6169         * sem_attr.adb (Analyze_Attribute/Attribute_Loop_Entry): Analyze node
6170         in tree, which means not analyzing the previous prefix if the node has
6171         been rewritten into its prefix.
6173 2017-01-06  Gary Dismukes  <dismukes@adacore.com>
6175         * s-tpobop.adb: Minor reformatting.
6177 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6179         * checks.adb (Ensure_Valid): Do not generate a validity check
6180         within a generated predicate function, validity checks will have
6181         been applied earlier when required.
6183 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6185         * s-tpoben.ads (Protection_Entries): Add comment and reorder
6186         components for performances.
6187         * s-tpobop.adb (PO_Do_Or_Queue): Implement Max_Queue_Length runtime
6188         semantic.
6190 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6192         * sem_eval.adb (Check_Expression_Against_Static_Predicate):
6193         If expression is compile-time known and obeys a static predicate
6194         it must be labelled as static, to prevent spurious warnings and
6195         run-time errors, e.g. in case statements. This is relevant when
6196         the expression is the result of constant-folding a type conversion
6197         whose expression is a variable with a known static value.
6199 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
6201         * exp_attr.adb, sem_attr.ads: Minor reformatting.
6203 2017-01-06  Justin Squirek  <squirek@adacore.com>
6205         * exp_attr.adb (Expand_N_Attribute_Reference): Add entry for
6206         expansion of Finalization_Size attribute.
6207         * sem_attr.adb (Analyze_Attribute): Add entry to check the
6208         semantics of Finalization_Size.
6209         (Eval_Attribute): Add null entry for Finalization_Size.
6210         * sem_attr.ads: Add Finalization_Size to the implementation
6211         dependent attribute list.
6212         * snames.ads-tmpl: Add name entry for Finalization_Size attribute.
6214 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6216         * sem_ch5.adb (Analyze_Loop_Statement): If the loop includes an
6217         iterator specification with a serious syntactic error, transform
6218         construct into an infinite loop in order to continue analysis
6219         and prevent a compiler abort.
6221 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6223         * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Do not generate
6224         max_queue_lengths_array if unused.
6226 2017-01-06  Bob Duff  <duff@adacore.com>
6228         * errout.adb (Set_Msg_Text): Protect against out-of-bounds
6229         array access, in case "\" is at the end of Text.
6230         * stylesw.adb (Set_Style_Check_Options): Don't include input
6231         characters in the error message template, because they could
6232         be control characters such as "\", which Errout will try to
6233         interpret.
6235 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6237         * sem_ch4.adb (Find_Indexing_Operations, Inspect_Declarations):
6238         For a private type examine the visible declarations that follow
6239         the partial view, not just the private declarations that follow
6240         the full view.
6242 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
6244         * exp_ch5.adb, sem_ch3.adb, checks.adb: Minor reformatting and
6245         code cleanup.
6247 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6249         * exp_ch5.adb (Get_Default_Iterator): For a derived type, the
6250         alias of the inherited op is the parent iterator, no need to
6251         examine dispatch table positions which might not be established
6252         yet if type is not frozen.
6253         * sem_disp.adb (Check_Controlling_Formals): The formal of a
6254         predicate function may be a subtype of a tagged type.
6255         * sem_ch3.adb (Complete_Private_Subtype): Adjust inheritance
6256         of representation items for the completion of a type extension
6257         where a predicate applies to the partial view.
6258         * checks.ads, checks.adb (Apply_Predicate_Check): Add optional
6259         parameter that designates function whose actual receives a
6260         predicate check, to improve warning message when the check will
6261         lead to infinite recursion.
6262         * sem_res.adb (Resolve_Actuals): Pass additional parameter to
6263         Apply_Predicate_Check.
6265 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6267         * s-rident.ads (Profile_Info): Remove No_Entry_Queue from
6268         Gnat_Extended_Ravenscar.
6269         * exp_ch9.adb, s-tpoben.adb, s-tpoben.ads: Fix spelling.
6271 2017-01-06  Gary Dismukes  <dismukes@adacore.com>
6273         * sem_util.ads: Minor typo fix and reformatting.
6275 2017-01-06  Yannick Moy  <moy@adacore.com>
6277         * ghost.adb Minor fixing of references to SPARK RM.
6278         (Check_Ghost_Context): Check whether reference is to a lvalue
6279         before issuing an error about violation of SPARK RM 6.9(13)
6280         when declaration has Ghost policy Check and reference has Ghost
6281         policy Ignore.
6282         * sem_util.adb Minor indentation.
6283         * sem_ch10.adb (Analyze_Package_Body_Stub, Analyze_Protected_Body_Stub,
6284         Analyze_Task_Body_Stub): Set Ekind of the defining identifier.
6285         * sem_util.ads (Unique_Defining_Entity): Document the result
6286         for package body stubs.
6288 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6290         * raise-gcc.c (abort): Macro to call Abort_Propagation.
6291         * s-tpoben.ads (Protected_Entry_Queue_Max_Access): Make it access
6292         constant.
6293         * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
6294         Do not generate the Entry_Max_Queue_Lengths_Array if all default
6295         values.
6296         * exp_util.adb (Corresponding_Runtime_Package): Consider
6297         Max_Queue_Length pragma.
6299 2017-01-06  Justin Squirek  <squirek@adacore.com>
6301         * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
6302         Remove declaration generation in the case of
6303         System_Tasking_Protected_Objects_Single_Entry being used,
6304         and add a warning message when this is detected to occur.
6305         (Make_Initialize_Protection): Remove reference pass in the case
6306         of System_Tasking_Protected_Objects_Single_Entry.
6307         * rtsfind.ads: Remove RE_Protected_Entry_Queue_Max
6308         * s-tposen.adb (Initialize_Protection_Entry): Remove
6309         Entry_Queue_Max parameter.
6310         * s-tposen.ads: Remove the types use to store the entry queue
6311         maximum.
6312         * sem_prag.adb (Analyze_Pragma): Remove entry families restriction
6314 2017-01-06  Yannick Moy  <moy@adacore.com>
6316         * sem_util.adb, sem_util.ads (Get_Enum_Lit_From_Pos): Strengthen
6317         behavior of function, to also accept out of range positions
6318         and raise Constraint_Error in such case, and to copy sloc from
6319         literal if No_Location passed as location.
6320         * uintp.adb, uintp.ads (UI_To_Int, UI_To_CC): Strengthen behavior
6321         of functions to raise Constraint_Error in case of value not in
6322         appropriate range.
6324 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6326         * sem_util.adb, s-taprop-linux.adb (Finalize_TCB): Remove call to
6327         Invalidate_Stack_Cache.
6329 2017-01-06  Eric Botcazou  <ebotcazou@adacore.com>
6331         * s-os_lib.adb: Minor fix to the signature of Readlink.
6333 2017-01-06  Javier Miranda  <miranda@adacore.com>
6335         * sem_ch6.adb (Conforming_Types): Handle another
6336         confusion between views in a nested instance with an actual
6337         private type whose full view is not in scope.
6339 2017-01-06  Arnaud Charlet  <charlet@adacore.com>
6341         * exp_ch5.adb (Expand_N_If_Statement): Obey existing comment and
6342         mark a rewritten if statement as explicit (Comes_From_Source).
6344 2017-01-06  Gary Dismukes  <dismukes@adacore.com>
6346         * sem_prag.adb, rtsfind.adb, sem_util.adb: Minor typo fixes.
6348 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6350         * ada.ads, a-unccon.ads: Add pragma No_Elaboration_Code_All.
6352 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
6354         * sem_case.adb: Minor reformatting.
6356 2017-01-06  Thomas Quinot  <quinot@adacore.com>
6358         * g-socthi-mingw.adb: Remove now extraneous USE TYPE clause
6360 2017-01-06  Justin Squirek  <squirek@adacore.com>
6362         * aspects.adb: Register aspect in Canonical_Aspect.
6363         * aspects.ads: Associate qualities of Aspect_Max_Queue_Length
6364         into respective tables.
6365         * einfo.ads, einfo.adb: Add a new attribute for
6366         handling the parameters for Pragma_Max_Entry_Queue
6367         (Entry_Max_Queue_Lengths_Array) in E_Protected_Type. Subprograms
6368         for accessing and setting were added as well.
6369         * par-prag.adb (Prag): Register Pramga_Max_Entry_Queue.
6370         * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Emit
6371         declaration for pramga arguments and store them in the protected
6372         type node.
6373         (Make_Initialize_Protection): Pass a reference to
6374         the Entry_Max_Queue_Lengths_Array in the protected type node to
6375         the runtime.
6376         * rtsfind.adb: Minor grammar fix.
6377         * rtsfind.ads: Register new types taken from the
6378         runtime libraries RE_Protected_Entry_Queue_Max and
6379         RE_Protected_Entry_Queue_Max_Array
6380         * s-tposen.adb, s-tpoben.adb
6381         (Initialize_Protection_Entry/Initialize_Protection_Entries):
6382         Add extra parameter and add assignment to local object.
6383         * s-tposen.ads, s-tpoben.ads: Add new types to
6384         store entry queue maximums and a field to the entry object record.
6385         * sem_ch13.adb (Analyze_Aspect_Specifications): Add case statement
6386         for Aspect_Max_Queue_Length.
6387         (Check_Aspect_At_Freeze_Point):
6388         Add aspect to list of aspects that don't require delayed analysis.
6389         * sem_prag.adb (Analyze_Pragma): Add case statement for
6390         Pragma_Max_Queue_Length, check semantics, and register arugments
6391         in the respective entry nodes.
6392         * sem_util.adb, sem_util.ads Add functions Get_Max_Queue_Length
6393         and Has_Max_Queue_Length
6394         * snames.ads-tmpl: Add constant for the new aspect-name
6395         Name_Max_Queue_Length and corrasponding pragma.
6397 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
6399         * exp_util.adb (Is_Controlled_Function_Call):
6400         Reimplemented. Consider any node which has an entity as the
6401         function call may appear in various ways.
6403 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
6405         * exp_attr.adb (Rewrite_Stream_Proc_Call): Use
6406         an unchecked type conversion when performing a view conversion
6407         to/from a private type. In all other cases use a regular type
6408         conversion to ensure that any relevant checks are properly
6409         installed.
6411 2017-01-06  Hristian Kirtchev  <kirtchev@adacore.com>
6413         * sem_prag.adb, sem_ch8.adb: Minor reformatting.
6415 2017-01-06  Ed Schonberg  <schonberg@adacore.com>
6417         * sem_case.adb (Explain_Non_Static_Bound): Suppress cascaded
6418         error on case expression that is an entity, when coverage is
6419         incomplete and entity has a static value obtained by local
6420         propagation.
6421         (Handle_Static_Predicate): New procedure, subsidiary of
6422         Check_Choices, to handle case alternatives that are either
6423         subtype names or subtype indications involving subtypes that
6424         have static predicates.
6426 2017-01-06  Thomas Quinot  <quinot@adacore.com>
6428         * s-oscons-tmplt.c, g-socket.adb, g-socket.ads, g-sothco.ads:
6429         (GNAT.Socket): Add support for Busy_Polling and Generic_Option
6431 2017-01-06  Bob Duff  <duff@adacore.com>
6433         * sem_elab.adb (Activate_Elaborate_All_Desirable): Don't add
6434         Elaborate_All(P) to P itself. That could happen in obscure cases,
6435         and always introduced a cycle (P body must be elaborated before
6436         P body).
6437         * lib-writ.ads: Comment clarification.
6438         * ali-util.ads: Minor comment fix.
6439         * ali.adb: Minor reformatting.
6441 2017-01-06  Tristan Gingold  <gingold@adacore.com>
6443         * a-exexpr-gcc.adb: Improve comment.
6445 2017-01-03  James Cowgill  <James.Cowgill@imgtec.com>
6447         * s-linux-mips.ads: Use correct signal and errno constants.
6448         (sa_handler_pos, sa_mask_pos): Fix offsets for 64-bit MIPS.
6450 2017-01-03  James Cowgill  <James.Cowgill@imgtec.com>
6452         * s-linux-mips.ads: Rename from s-linux-mipsel.ads.
6453         * gcc-interface/Makefile.in (MIPS/Linux): Merge mips and mipsel
6454         sections.
6456 2017-01-01  Eric Botcazou  <ebotcazou@adacore.com>
6458         * gnatvsn.ads: Bump copyright year.
6460 2017-01-01  Jakub Jelinek  <jakub@redhat.com>
6462         * gnat_ugn.texi: Bump @copying's copyright year.
6463         * gnat_rm.texi: Likewise.
6465 Copyright (C) 2017 Free Software Foundation, Inc.
6467 Copying and distribution of this file, with or without modification,
6468 are permitted in any medium without royalty provided the copyright
6469 notice and this notice are preserved.