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