1 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
3 * exp_aggr.adb: (Aggr_Assignment_OK_For_Backend): Add early return for
6 2017-09-08 Bob Duff <duff@adacore.com>
8 * par-prag.adb, sem_prag.adb, snames.ads-tmpl: Implement pragma
9 Ada_2020, along the same lines as the other Ada version pragmas.
11 2017-09-08 Gary Dismukes <dismukes@adacore.com>
13 * sem_ch12.adb: Minor typo fixes and reformatting.
15 2017-09-08 Yannick Moy <moy@adacore.com>
17 * sem_aggr.adb (Resolve_Record_Aggregate):
18 Rewrite bounds of aggregate subexpressions which may depend on
19 discriminants of the enclosing aggregate.
21 2017-09-08 Yannick Moy <moy@adacore.com>
23 * sem_ch5.adb: Prevent assertion failure on illegal code.
25 2017-09-08 Yannick Moy <moy@adacore.com>
27 * lib-xref-spark_specific.adb (Add_SPARK_Xrefs.Is_SPARK_Scope): Avoid
28 calling Renamed_Entity on an entity which cannot be a renaming.
30 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
32 * exp_aggr.adb: Add with & use clause for Urealp.
33 (Aggr_Assignment_OK_For_Backend): Accept (almost all)
34 elementary types instead of just discrete types.
35 * sem_eval.adb (Expr_Value): Deal with N_Null for access types.
36 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>:
37 Be prepared for the FP zero value in the memset case. Add small
40 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
42 * s-htable.adb (Static_HTable.Reset): Use aggregate instead
45 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
47 * exp_aggr.adb (Expand_Array_Aggregate): Use New_Copy_Tree instead
48 of New_Copy because the latter leaves the syntactic structure of
49 the tree inconsistent (a child is accessible through two parents)
50 and prevents proper replication of itypes by subsequent calls
52 * exp_ch4.adb (Expand_Concatenate): Use New_Copy_Tree instead of
53 New_Copy because the latter leaves the syntactic structure of the
54 tree inconsistent (a child is accessible through two parents)
55 and prevents proper replication of itypes by subsequent calls
57 * sem_util.adb (In_Subtree): New routine.
58 (New_Copy_Tree): Reimplemented.
59 * sem_util.ads (In_Subtree): New routine.
60 (New_Copy_Tree): Reimplemented.
62 2017-09-08 Ed Schonberg <schonberg@adacore.com>
64 * sem_ch13.adb (Resolve_Aspect_Expressions): The expression
65 for aspect Default_Value is a static scalar value, but it does
66 not freeze the type. Yhis allows for subsequent representation
69 2017-09-08 Javier Miranda <miranda@adacore.com>
71 * sem_ch8.adb (Find_Direct_Name.Undefined): Do
72 not add entries into the undefined reference table when we are
73 compiling with errors ignored.
75 2017-09-08 Ed Schonberg <schonberg@adacore.com>
77 * sem_ch12.adb (Check_Formal_Packages): Do not apply conformance
78 check if the instance is within an enclosing instance body. The
79 formal package was legal in the enclosing generic, and is
80 legal in the enclosing instantiation. This optimisation may be
81 applicable elsewhere, and it also removes spurious errors that
82 may arise with on-the-fly processing of instantiations that
83 contain Inline_Always subprograms.
85 2017-09-08 Vincent Celier <celier@adacore.com>
87 * gnatcmd.adb: Disregard empty argument of GNAT driver.
89 2017-09-08 Justin Squirek <squirek@adacore.com>
91 * checks.adb (Insert_Valid_Check): Manually decorate
92 the generated temporary for range valdity checks.
94 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
96 * usage.adb (Usage): Document new -gnatw.q/-gnatw.Q switches.
98 2017-09-08 Justin Squirek <squirek@adacore.com>
100 * switch-c.adb (Scan_Front_End_Switches): Add new warning switch
101 case to handle underscore flags.
102 * warnsw.adb, warnsw.ads (Set_Underscore_Warning_Switch): Create
103 new procedure to handle underscores.
105 2017-09-08 Javier Miranda <miranda@adacore.com>
107 * exp_ch4.adb (Expand_N_Op_Divide): Reordering code that handles
108 divisions with fixed point results to avoid generating twice
109 the runtime check on divide by zero.
110 * checks.adb (Apply_Divide_Checks): Ensure that operands are
111 not evaluated twice (once for their runtime checks and once for
112 their regular computation).
114 2017-09-08 Yannick Moy <moy@adacore.com>
116 * sem_prag.adb (Analyze_Part_Of): Add missing
117 return statements after issuing errors. Add detection of
118 out-of-order item and single concurrent type.
120 2017-09-08 Nicolas Roche <roche@adacore.com>
122 * gcc-interface/Makefile.in, a-extiti.ads, s-taprop-linux.adb,
123 s-osinte-solaris.adb, a-intnam.ads, s-osinte-solaris.ads,
124 s-tpobop.adb, s-intman-android.adb, s-tasinf.adb, s-tpobop.ads,
125 s-tasinf.ads, i-vxinco.adb, a-exetim-posix.adb, i-vxinco.ads,
126 a-astaco.adb, a-astaco.ads, s-tporft.adb, s-tpoaal.adb, a-taside.adb,
127 a-taside.ads, s-tpopsp-posix.adb, s-tasdeb.adb, s-tasdeb.ads,
128 s-tpoben.adb, a-dinopr.ads, s-inmaop-vxworks.adb, s-tpoben.ads,
129 s-interr-vxworks.adb, s-interr-dummy.adb, s-tassta.adb,
130 a-intnam-mingw.ads, s-tassta.ads, s-taasde.adb, a-stcoed.ads,
131 s-taasde.ads, s-osinte-darwin.adb, s-proinf.adb, s-taprop-dummy.adb,
132 s-osinte-darwin.ads, s-proinf.ads, s-linux.ads, a-intnam-linux.ads,
133 s-tasren.adb, s-tasren.ads, s-mudido.adb, g-semaph.adb, s-mudido.ads,
134 s-taprop-posix.adb, g-semaph.ads, s-osinte-mingw.ads, s-vxwork-x86.ads,
135 s-tposen.adb, s-linux-sparc.ads, s-taprop-vxworks.adb, s-tasini.adb,
136 s-tposen.ads, s-tasini.ads, a-etgrbu.ads, s-interr-hwint.adb,
137 s-osinte-linux.ads, s-taprop.ads, s-tasque.adb, s-tasque.ads,
138 s-taenca.adb, s-taspri-vxworks.ads, s-taenca.ads, a-dynpri.adb,
139 s-tpopsp-solaris.adb, a-dynpri.ads, s-taprop-hpux-dce.adb,
140 a-interr.adb, a-intnam-freebsd.ads, s-tarest.adb, a-interr.ads,
141 s-intman-susv3.adb, a-synbar.adb, a-intnam-dummy.ads, s-tadeca.adb,
142 s-osinte-vxworks.adb, s-tarest.ads, s-taskin.adb, a-synbar.ads,
143 s-taspri-hpux-dce.ads, s-tadeca.ads, s-osinte-vxworks.ads,
144 s-taskin.ads, s-intman-solaris.adb, a-sytaco.adb, s-vxwext-kernel.adb,
145 s-mudido-affinity.adb, a-sytaco.ads, s-vxwext-kernel.ads, s-taprob.adb,
146 s-intman-mingw.adb, s-taprob.ads, s-osinte-kfreebsd-gnu.ads,
147 s-osinte-dummy.ads, s-osinte-gnu.adb, s-osinte-rtems.adb, s-interr.adb,
148 s-inmaop.ads, s-vxwext-rtp.adb, s-osinte-gnu.ads, s-osinte-rtems.ads,
149 a-synbar-posix.adb, s-interr.ads, s-taspri-posix-noaltstack.ads,
150 s-vxwext-rtp.ads, a-synbar-posix.ads, a-extiin.ads, s-osinte-posix.adb,
151 s-tpinop.adb, s-tasres.ads, s-tpinop.ads, a-disedf.ads, a-diroro.ads,
152 s-linux-alpha.ads, a-tasatt.adb, s-solita.adb, a-intnam-solaris.ads,
153 a-tasatt.ads, s-solita.ads, s-tasinf-solaris.adb, s-tasinf-solaris.ads,
154 s-vxwork-arm.ads, s-tpopsp-posix-foreign.adb, s-intman-dummy.adb,
155 s-intman.ads, s-stusta.adb, s-stusta.ads, s-intman-posix.adb,
156 s-tpopsp-vxworks.adb, s-inmaop-dummy.adb, s-taspri-mingw.ads,
157 a-intnam-darwin.ads, s-osinte-aix.adb, s-osinte-dragonfly.adb,
158 s-osinte-aix.ads, s-tasinf-mingw.adb, s-osinte-dragonfly.ads,
159 s-linux-hppa.ads, s-osinte-x32.adb, s-inmaop-posix.adb,
160 s-tasinf-mingw.ads, s-intman-vxworks.adb, s-linux-mips.ads,
161 s-intman-vxworks.ads, s-osinte-android.adb, s-tasinf-linux.adb,
162 s-osinte-android.ads, s-vxwork-ppc.ads, s-tasinf-linux.ads,
163 a-dispat.adb, a-dispat.ads, s-tadert.adb, g-thread.adb, s-tadert.ads,
164 g-thread.ads, a-intnam-hpux.ads, s-linux-android.ads, s-tataat.adb,
165 a-exetim.ads, s-tataat.ads, a-reatim.adb, a-reatim.ads, thread.c,
166 g-boubuf.adb, s-osinte-freebsd.adb, g-boubuf.ads, s-osinte-freebsd.ads,
167 s-tasuti.adb, s-taspri-dummy.ads, a-exetim-mingw.adb, s-linux-x32.ads,
168 s-tasuti.ads, g-signal.adb, a-exetim-mingw.ads, s-interr-sigaction.adb,
169 g-signal.ads, s-osinte-hpux.ads, a-intnam-vxworks.ads,
170 s-osinte-hpux-dce.adb, s-taspri-posix.ads, s-osinte-hpux-dce.ads,
171 s-tasinf-vxworks.ads, g-tastus.ads, s-tpopsp-tls.adb,
172 s-taprop-solaris.adb, a-retide.adb, a-exetim-darwin.adb, a-retide.ads,
173 s-vxwext.adb, s-vxwext.ads, a-rttiev.adb, a-rttiev.ads, g-boumai.ads,
174 a-exetim-default.ads, s-taprop-mingw.adb, s-taspri-solaris.ads,
175 a-intnam-aix.ads: Move libgnarl sources to libgnarl subdir.
177 2017-09-08 Arnaud Charlet <charlet@adacore.com>
179 * doc/share/conf.py, doc/share/latex_elements.py,
180 doc/share/ada_pygments.py, doc/Makefile: Improve support for Ada
183 2017-09-08 Arnaud Charlet <charlet@adacore.com>
185 * gnat_rm.texi, gnat_ugn.texi,
186 doc/gnat_ugn/the_gnat_compilation_model.rst,
187 doc/gnat_ugn/getting_started_with_gnat.rst,
188 doc/gnat_ugn/inline_assembler.rst,
189 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
190 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
191 doc/gnat_ugn/about_this_guide.rst,
192 doc/gnat_ugn/platform_specific_information.rst,
193 doc/gnat_ugn/example_of_binder_output.rst,
194 doc/gnat_ugn/gnat_and_program_execution.rst,
195 doc/gnat_ugn/gnat_utility_programs.rst,
196 doc/gnat_rm/implementation_of_specific_ada_features.rst,
197 doc/gnat_rm/interfacing_to_other_languages.rst,
198 doc/gnat_rm/implementation_defined_aspects.rst,
199 doc/gnat_rm/intrinsic_subprograms.rst,
200 doc/gnat_rm/implementation_defined_characteristics.rst,
201 doc/gnat_rm/implementation_advice.rst,
202 doc/gnat_rm/implementation_defined_attributes.rst,
203 doc/gnat_rm/compatibility_and_porting_guide.rst,
204 doc/gnat_rm/standard_library_routines.rst,
205 doc/gnat_rm/the_gnat_library.rst,
206 doc/gnat_rm/implementation_defined_pragmas.rst,
207 doc/gnat_rm/representation_clauses_and_pragmas.rst,
208 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
209 doc/gnat_rm/obsolescent_features.rst,
210 doc/gnat_rm/about_this_guide.rst,
211 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
212 doc/gnat_rm/implementation_of_ada_2012_features.rst,
214 doc/gnat_rm.rst: Update documentation.
216 2017-09-08 Arnaud Charlet <charlet@adacore.com>
218 * s-dwalin.ads, s-dwalin.adb, s-trasym-dwarf.adb, s-objrea.ads,
219 s-objrea.adb, s-tsmona-linux.adb, s-tsmona-mingw.adb: New.
220 * gcc-interface/Makefile.in: Enable s-trasym-dwarf.adb on x86*linux.
222 2017-09-08 Bob Duff <duff@adacore.com>
224 * s-ststop.ads, s-ststop.adb, rtsfind.ads (String_Input_Tag):
225 New routine to read the Tag robustly.
226 * exp_attr.adb (Input): Change the expansion of 'Input,
227 in the class-wide case, to call String_Input_Tag instead of
230 2017-09-08 Arnaud Charlet <charlet@adacore.com>
232 * s-rident.ads (Restriction_Id): reorder enum
233 literals, so that Pure_Barriers is no longer in range of the
234 Cunit_Boolean_Restrictions subtype.
236 2017-09-08 Nicolas Roche <roche@adacore.com>
238 * a-taster.ads, a-taster.adb: Move to libgnarl
239 * gcc-interface/Makefile.in: Remove obsolete targets. Code cleanups.
240 Add support for files in libgnarl.
242 2017-09-08 Ed Schonberg <schonberg@adacore.com>
244 * exp_ch4.adb (Expand_N_Type_Conversion): Do not apply
245 accessibility check to an interface conversion, whose purpose
246 is to perform a pointer adjustment in a dispatching call.
247 * exp_ch6.adb (Expand_Call_JHelper): Add accessibility checks
248 when the actual is a construct that involves a dereference of an
249 expression that includes a formal of the enclosing subprogram,
250 In such cases, the accessibility level of the actual is that of
251 the corresponding formal, which is passed in as an additional
252 actual in the outer call.
254 2017-09-08 Bob Duff <duff@adacore.com>
256 * exp_intr.adb (Add_Source_Info): Do not decode
257 file names; they were not encoded in the first place.
259 2017-09-08 Bob Duff <duff@adacore.com>
261 * a-tags.adb (Internal_Tag): Unsuppress checks, so we get
262 exceptions instead of crashes. Check for absurdly long strings
263 and empty strings. Empty strings cause trouble because they can
264 have super-null ranges (e.g. 100..10), which causes Ext_Copy to
265 be empty, which causes an array index out of bounds.
266 * s-ststop.adb (Input): Unsuppress checks, so we get exceptions
269 2017-09-08 Arnaud Charlet <charlet@adacore.com>
271 * sem_util.adb (Is_CCT_Instance): allow use in
272 the context of protected types.
274 2017-09-08 Arnaud Charlet <charlet@adacore.com>
276 * a-tigeli.adb: minor remove extra whitespace.
278 2017-09-08 Gary Dismukes <dismukes@adacore.com>
280 * par-ch4.adb: Reformatting of an error message.
282 2017-09-08 Javier Miranda <miranda@adacore.com>
284 * sem_ch3.adb (Resolve_Name): Under ASIS mode analyze overloaded
285 identifiers to ensure their correct decoration of names on
288 2017-09-08 Yannick Moy <moy@adacore.com>
290 * exp_attr.adb (Expand_Loop_Entry_Attribute): Do
291 not skip a loop coming from source which is rewritten into a loop.
293 2017-09-08 Ed Schonberg <schonberg@adacore.com>
295 * freeze.adb (Wrap_Imported_Subprogram): Indicate that the
296 wrapper has convention Ada, to prevent spurious warnings on
297 unconstrained array parameters.
299 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
301 * sem_prag.adb (Check_Variant): Use First_Non_Pragma/Next_Non_Pragma.
302 (Analyze_Pragma) <Pragma_Unchecked_Union>: Likewise.
304 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
306 * sem_ch6.adb (Freeze_Expr_Types): Rename Spec_Id into Def_Id.
308 2017-09-08 Arnaud Charlet <charlet@adacore.com>
310 * exp_intr.adb (Append_Entity_Name): Move to ...
311 * sem_util.ads, sem_util.adb: ... here to share it.
312 (Subprogram_Name): New subprogram, to compute the name of the enclosing
314 * errutil.adb (Error_Msg): Fill new field Node.
315 * erroutc.ads (Subprogram_Name_Ptr): New.
316 (Error_Msg_Object): New field Node.
317 * erroutc.adb (dmsg, Output_Msg_Text): Take new field Node into account.
318 * errout.adb (Error_Msg): New variant with node id parameter.
319 Fill new parameter Node when emitting messages. Revert previous
320 changes for Include_Subprogram_In_Messages.
321 * sem_ch5.adb (Check_Unreachable_Code): Supply Node parameter when
322 generating warning message.
324 2017-09-08 Ed Schonberg <schonberg@adacore.com>
326 * par-ch4.adb (P_Iterated_Component_Association): Place construct
327 under -gnat2020 flag, given that it is a future feature of
329 * sem_aggr.adb (Resolve_Iterated_Component_Association): Mark
330 defining identifier as referenced to prevent spurious warnings:
331 corresponding loop is expanded into one or more loops whose
332 variable has the same name, and the expression uses those names
333 and not the original one.
335 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
337 * sem_elab.adb (Check_A_Call): Do not consider
338 references to internal variables for SPARK semantics.
340 2017-09-08 Arnaud Charlet <charlet@adacore.com>
342 * inline.adb (In_Package_Spec): refine type of
343 the parameter from Node_Id to Entity_Id.
345 2017-09-08 Justin Squirek <squirek@adacore.com>
347 * exp_ch5.adb (Expand_Formal_Container_Loop):
348 Reset the scope of the loop parameter after it is reanalyzed.
350 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
352 * sem_util.ads (Set_Rep_Info): New inline procedure.
353 * sem_util.adb (Set_Rep_Info): Implement it.
354 * sem_ch3.adb (Process_Subtype): If the case of a constraint present,
355 always copy the representation aspects onto the subtype.
357 2017-09-08 Georges-Alex Jaloyan <jaloyan@adacore.com>
359 * g-dynhta.adb, g-dynhta.ads (Get_First_Key, Get_Next_key):
360 Correction of the return type from access type to option type.
361 (Simple_HTable): Moving the Instance_Data to ads file.
363 2017-09-08 Yannick Moy <moy@adacore.com>
365 * sem_prag.adb: Use System.Case_Util.To_Lower to simplify code.
367 2017-09-08 Arnaud Charlet <charlet@adacore.com>
369 * opt.ads (Include_Subprogram_In_Messages): New variable.
370 * errout.ads (Current_Subprogram_Ptr): New variable.
371 * errout.adb (Error_Msg): Prepend current subprogram info
372 in messages if Include_Subprogram_In_Messages is set.
373 * sem_util.adb (elab code): Initialize Current_Subprogram_Ptr to
375 * gnat1drv.adb (Adjust_Global_Switches): Set
376 Include_Subprogram_In_Messages when -gnatdJ is set.
377 * debug.adb: Document and reserve -gnatdJ.
379 2017-09-08 Georges-Axel Jaloyan <jaloyan@adacore.com>
381 * g-dynhta.adb, g-dynhta.ads (Get_First_Key, Get_Next_Key): New
382 functions to iterate over simple hastables.
383 (Load_Factor_HTable): Remove obsolete and inefficient implementation.
385 2017-09-08 Javier Miranda <miranda@adacore.com>
387 * exp_ch6.adb (Unqual_BIP_Function_Call): Adding
388 missing checks on the presence of Entity() before checking the
391 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
393 * sem_ch6.adb (Analyze_Expression_Function): Reorder some
394 statements, use local variable and remove unnecessary processing.
396 2017-09-08 Javier Miranda <miranda@adacore.com>
398 * exp_ch6.ads (Make_Build_In_Place_Iface_Call_In_Allocator): New
400 (Make_Build_In_Place_Iface_Call_In_Anonymous_Context): New subprogram.
401 (Make_Build_In_Place_Iface_Call_In_Object_Declaration): New
403 (Unqual_BIP_Iface_Function_Call): New subprogram.
404 * exp_ch6.adb (Replace_Renaming_Declaration_Id): New
405 subprogram containing code that was previously inside
406 Make_Build_In_Place_Call_In_Object_Declaration since it is also
407 required for one of the new subprograms.
409 Invoke Make_Build_In_Place_Iface_Call_In_Anonymous_Context
410 (Expand_N_Extended_Return_Statement): Extend the
411 cases covered by an assertion on expected BIP object
413 (Make_Build_In_Place_Call_In_Assignment):
414 Removing unused code; found working on this ticket.
415 (Make_Build_In_Place_Call_In_Object_Declaration): Move the code
416 that replaces the internal name of the renaming declaration
417 into the new subprogram Replace_Renaming_Declaration_Id.
418 (Make_Build_In_Place_Iface_Call_In_Allocator): New subprogram.
419 (Make_Build_In_Place_Iface_Call_In_Anonymous_Context):
421 (Make_Build_In_Place_Iface_Call_In_Object_Declaration): New
423 (Unqual_BIP_Iface_Function_Call): New subprogram.
424 * exp_ch3.adb (Expand_N_Object_Declaration): Invoke the new
425 subprogram Make_Build_In_Place_Iface_Call_In_Object_Declaration.
426 * exp_attr.adb (Expand_N_Attribute_Reference): Invoke the new
427 subprogram Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
428 * exp_ch4.adb (Expand_Allocator_Expression): Invoke the new
429 subprogram Make_Build_In_Place_Iface_Call_In_Allocator.
430 (Expand_N_Indexed_Component): Invoke the new subprogram
431 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
432 (Expand_N_Selected_Component): Invoke the new subprogram
433 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
434 (Expand_N_Slice): Invoke the new subprogram
435 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
436 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration):
437 Invoke the new subprogram
438 Make_Build_In_Place_Iface_Call_In_Anonymous_Context.
440 2017-09-08 Javier Miranda <miranda@adacore.com>
442 * exp_disp.adb (Expand_Interface_Conversion): Fix handling of
443 access to interface types. Remove also the accessibility check.
445 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
447 * sem_ch6.adb (Freeze_Expr_Types): Really freeze
448 all the types that are referenced by the expression.
449 (Analyze_Expression_Function): Call Freeze_Expr_Types for
450 a completion instead of manually freezing the type of the
452 (Analyze_Subprogram_Body_Helper): Do not call Freeze_Expr_Types here.
454 2017-09-08 Ed Schonberg <schonberg@adacore.com>
456 * exp_prag.adb (Replace_Discriminals_Of_Protected_Op):
457 New procedure, auxiliary to Expand_Pragma_Check, to handle
458 references to the discriminants of a protected type within a
459 precondition of a protected operation. This is needed because
460 the original precondition has been analyzed in the context of
461 the protected declaration, but in the body of the operation
462 references to the discriminants have been replaved by references
463 to the discriminants of the target object, and these references
464 are only created when expanding the protected body.
466 2017-09-08 Yannick Moy <moy@adacore.com>
468 * sem_prag.adb (Analyze_Pragma): Issue more precise error messages on
471 2017-09-08 Ed Schonberg <schonberg@adacore.com>
473 * exp_attr.adb (Build_Record_VS_Func): If the record is an
474 unchecked union, do not emit checks for its (non-existent)
475 discriminants, or for variant parts that depend on them.
477 2017-09-08 Justin Squirek <squirek@adacore.com>
479 * sem_ch4.adb (Find_Equality_Types.Try_One_Interp,
480 Find_Comparison_Type.Try_One_Interp): Add check for generic
483 2017-09-08 Arnaud Charlet <charlet@adacore.com>
485 * sem_ch3.adb, layout.adb, layout.ads, exp_attr.adb, debug.adb,
486 exp_pakd.adb, sem_prag.adb, gnat1drv.adb, targparm.adb, targparm.ads,
487 repinfo.adb, exp_ch6.adb, exp_aggr.adb, sem_eval.adb, sem_ch13.adb,
488 exp_ch3.adb: Remove references to Frontend_Layout_On_Target and
489 remaining references to AAMP_On_Target.
491 2017-09-08 Ed Schonberg <schonberg@adacore.com>
493 * style.adb: Fix typo.
495 2017-09-08 Javier Miranda <miranda@adacore.com>
497 * einfo.adb (Underlying_Type): Add missing support for class-wide
498 types that come from the limited view.
499 * exp_attr.adb (Attribute_Address): Check class-wide type
500 interfaces using the underlying type to handle limited-withed
502 (Attribute_Tag): Check class-wide type interfaces using
503 the underlying type to handle limited-withed types.
505 2017-09-08 Ed Schonberg <schonberg@adacore.com>
507 * exp_ch5.adb (Expand_Predicated_Loop): Handle properly a loop
508 over a subtype of a type with a static predicate, taking into
509 account the predicate function of the parent type and the bounds
510 given in the loop specification.
511 * sem_ch3.adb (Inherit_Predicate_Flags): For qn Itype created for
512 a loop specification that is a subtype indication whose type mark
513 is a type with a static predicate, inherit predicate function,
514 used to build case statement for rewritten loop.
516 2017-09-08 Justin Squirek <squirek@adacore.com>
518 * lib-load.adb: Modify printing of error message to exclude file
521 2017-09-08 Arnaud Charlet <charlet@adacore.com>
523 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode):
524 don't inline subprograms declared in both visible and private
526 (In_Package_Spec): previously In_Package_Visible_Spec; now
527 detects subprograms declared both in visible and private parts
530 2017-09-08 Ed Schonberg <schonberg@adacore.com>
532 * exp_util.adb (Build_Invariant_Procedure_Declaration): If
533 the type is an anonymous array in an object declaration, whose
534 component type has an invariant, use the object declaration
535 as the insertion point for the invariant procedure, given that
536 there is no explicit type declaration for an anonymous array type.
538 2017-09-08 Bob Duff <duff@adacore.com>
540 * a-cbprqu.ads, a-cbdlli.adb: Suppress warnings.
542 2017-09-08 Bob Duff <duff@adacore.com>
544 * a-strfix.adb (Trim): Compute Low and High only if needed.
546 2017-09-08 Justin Squirek <squirek@adacore.com>
548 * lib-load.adb (Load_Main_Source): Add error output in the case a
549 source file is missing.
551 2017-09-08 Bob Duff <duff@adacore.com>
554 * a-textio.adb, a-witeio.adb, a-ztexio.adb (Set_WCEM): Use
555 Default_WCEM by default (i.e. if the encoding is not specified
558 2017-09-08 Bob Duff <duff@adacore.com>
560 * s-trasym.ads (Hexa_Traceback): If
561 Suppress_Hex is True, print "..." instead of a hexadecimal
563 * s-trasym.adb: Ignore No_Hex in this version.
566 2017-09-08 Bob Duff <duff@adacore.com>
568 * debug.adb: Minor reformatting.
570 2017-09-08 Bob Duff <duff@adacore.com>
572 * a-cbdlli.adb, a-cohama.adb, a-cohase.adb (Copy): Rewrite the
573 code so it doesn't trigger an "uninit var" warning.
575 2017-09-08 Nicolas Roche <roche@adacore.com>
577 * s-hibaen.ads: Remove obsolete file.
579 2017-09-08 Arnaud Charlet <charlet@adacore.com>
581 * a-locale.ads: Add comment explaining the state of this package.
583 2017-09-08 Arnaud Charlet <charlet@adacore.com>
585 * sem_util.adb (Is_CCT_Instance): Allow calls in the context
587 * sem_prag.ads, sem_prag.adb (Find_Related_Declaration_Or_Body):
588 allow calls in the context of package spec (for pragma
589 Initializes) and bodies (for pragma Refined_State).
591 2017-09-08 Bob Duff <duff@adacore.com>
593 * checks.adb (Insert_Valid_Check): Copy the Do_Range_Check flag to the
596 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
598 * debug.adb (dA): Adjust comment.
599 * gnat1drv.adb (Gnat1drv): Likewise.
600 * opt.ads (List_Representation_Info_Extended): New variable.
601 * repinfo.adb (List_Record_Info): Split implementation into...
602 (Compute_Max_Length): ...this. Recurse on records if requested.
603 (List_Record_Layout): Likewise.
604 * switch-c.adb (Scan_Front_End_Switches) <'R'>: Use case
605 statement, accept '0' and set List_Representation_Info_Extended
607 * usage.adb (Usage): Document new -gnatRe variant.
609 2017-09-08 Ed Schonberg <schonberg@adacore.com>
611 * sem_prag.adb (Analyze_Pragma, case Default_Storage_Pool):
612 Do not save the given entity in the global variable Default_Pool
613 if the pragma appears within a generic unit.
615 2017-09-08 Bob Duff <duff@adacore.com>
617 * errout.adb (Delete_Warning): Do not
618 decrement Warnings_Treated_As_Errors. This is called before
619 Warnings_Treated_As_Errors has been incremented to account for
620 this warning. Decrementing it here can lead to negative values
621 of Warnings_Treated_As_Errors, raising Constraint_Error in
622 checks-on builds, and causing the compiler to return an error
623 code in checks-off builds.
625 2017-09-08 Arnaud Charlet <charlet@adacore.com>
627 * sem_util.ads, sem_util.adb (Is_CCT_Instance): Only expect
628 entities of named concurrent types as Ref_Id and not of anonymous
629 concurrent objects (because callers already know when a conversion
630 is necessary and can easily do it); also, do not expect protected
631 types or protected objects as Context_Id (because no flow-related
632 SPARK pragmas are attached there); reflect these changes in a
633 more precise comment.
635 2017-09-08 Olivier Hainque <hainque@adacore.com>
637 * g-altive.ads: Add documentation.
639 2017-09-08 Bob Duff <duff@adacore.com>
641 * sem_util.ads, debug.adb: Minor comment fix.
642 * erroutc.ads: Comment fix.
644 2017-09-08 Ed Schonberg <schonberg@adacore.com>
646 * sem_ch12.adb (Validate_Array_Type_Instance): Suppress check
647 for compatibility of component types of formal and actual in an
648 instantiation of a child unit, when the component type of the
649 formal is itself a formal of an enclosing generic.
651 2017-09-08 Arnaud Charlet <charlet@adacore.com>
653 * sem_util.ads, sem_util.adb (Is_CCT_Instance): moved from
654 sem_prag.adb to make it available for GNATprove; for concurrent
655 types replace custom scope climbing with Scope_Same_Or_Within; for
656 single concurrent objects add scope climbing (with Scope_Within),
657 which was not there (that's the primary semantic change of this
658 commit); also, when comparing a single concurrent object with
659 its corresponding concurrent type rely on equality of types,
660 not of objects (because that's simpler to code).
661 * sem_prag.adb (Is_CCT_Instance): lifted to sem_util.ads.
662 (Analyze_Global_Item): adjust special-casing of references to the
663 current instance of a concurrent unit in the Global contracts
664 of task types and single tasks objects; similar for references
665 in the protected operations and entries of protected types and
666 single protected objects (in all these cases the current instance
667 behaves as an implicit parameter and must not be mentioned in
668 the Global contract).
670 2017-09-08 Arnaud Charlet <charlet@adacore.com>
672 * exp_ch6.adb (Expand_Call_Helper): Introduce temporary for
673 function calls returning a record within a subprogram call,
676 2017-09-08 Ed Schonberg <schonberg@adacore.com>
678 * sem_ch8.adb (Find_Expanded_Name): Handle properly an expanded
679 name that designates the current instance of a child unit in its
680 own body and appears as the prefix of a reference to an entity
681 local to the child unit.
682 * exp_ch6.adb, freeze.adb, sem_ch3.adb, sem_prag.adb, sem_util.adb:
685 2017-09-08 Yannick Moy <moy@adacore.com>
687 * sem_res.adb (Resolve_Equality_Op): Do not warn on comparisons that
690 2017-09-08 Tristan Gingold <gingold@adacore.com>
692 * sem_warn.adb (Check_Unused_Withs): Remove test that disabled
693 warnings on internal units in configurable run time mode.
695 2017-09-08 Bob Duff <duff@adacore.com>
697 * sem_ch3.adb (Build_Derived_Private_Type): Inherit
698 representation items from interfaces that the derived type
699 implements, not just from the parent type.
700 * sem_util.ads, sem_util.adb (Abstract_Interface_List): Change
701 this to return an empty list when there are no interfaces.
702 * einfo.ads, sem_ch13.adb: Minor comment fixes.
703 * sem_attr.adb: Minor comment fix.
705 2017-09-08 Doug Rupp <rupp@adacore.com>
707 * sigtramp-vxworks.c [i386]: Adjust the kernel context for
710 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
712 * exp_ch4.adb (Expand_N_Allocator): Generate a
713 call to Allocate_Any_Controlled when the allocation does not
714 require any initialization.
716 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
718 * sem_util.adb (Copy_Node_With_Replacement):
719 Update the Renamed_Object field of a replicated object renaming
722 2017-09-08 Patrick Bernardi <bernardi@adacore.com>
724 * exp_ch9.adb (Is_Pure_Barrier): Allow type
725 conversions and components of objects. Simplified the detection
726 of the Count attribute by identifying the corresponding run-time
729 2017-09-08 Yannick Moy <moy@adacore.com>
731 * exp_ch9.adb, exp_disp.adb, repinfo.adb, sem_ch12.adb, sem_dim.adb,
732 sem_type.adb, sinfo.ads: Minor reformatting.
734 2017-09-08 Ed Schonberg <schonberg@adacore.com>
736 * freeze.adb (Has_Incomplete_Compoent): New predicate, subsidiary
737 of Freeze_Profile, used to inhibit the freezing of the profile
738 of an expression function declared within a nested package, when
739 some type in the profile depends on a private type declared in
740 an enclosing package.
742 2017-09-08 Bob Duff <duff@adacore.com>
744 * gnat1drv.adb (Gnat1drv): Do not set the Force_ALI_Tree_File flag in
745 the subunit case. It's still OK to set it in the "missing subunits"
746 case, because that won't cause the obsolete .ali files that cause
749 2017-09-08 Bob Duff <duff@adacore.com>
751 * sinput-l.adb: Remove unused "with Unchecked_Conversion;". It's
752 unclear why this didn't cause a warning.
753 * a-uncdea.ads, a-unccon.ads: Add "Ada." to names in the
754 pragmas. It's unclear why this didn't cause an error.
756 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
758 * exp_spark.adb (Expand_SPARK_N_Object_Renaming_Declaration):
760 (Expand_SPARK_Potential_Renaming): Code clean up.
761 * sem_prag.adb (Analyze_Initialization_Item): Add a guard in case
762 the item does not have a proper entity.
763 (Analyze_Input_Item): Add a guard in case the item does not have a
765 (Collect_States_And_Objects): Include object renamings in the
766 items being collected.
767 (Resolve_State): Update the documentation of this routine.
768 * sem_util.adb (Entity_Of): Add circuitry to handle
769 renamings of function results.
770 (Remove_Entity): New routine.
771 (Remove_Overloaded_Entity): Take advantage of factorization.
772 * sem_util.ads (Entity_Of): Update the documentation
774 (Remove_Entity): New routine.
775 (Remove_Overloaded_Entity): Update the documentation of this
778 2017-09-08 Eric Botcazou <ebotcazou@adacore.com>
780 * repinfo.adb (List_Record_Info): During first loop,
781 do not override the normalized position and first bit
782 if they have already been set. Move fallback code
783 for the packed case to the case where it belongs.
784 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
785 Also adjust the normalized position of components.
786 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): Likewise.
788 2017-09-08 Ed Schonberg <schonberg@adacore.com>
790 * exp_disp.adb (Make_DT, Set_All_DT_Position): Handle properly
791 the placement of a primitive operation O that renames an operation
792 R declared in an inner package, and which is thus not a primitive
793 of the dispatching type of O. In this case O is a new primitive
794 and does not inherit its dispatch table position from R (which
797 2017-09-08 Ed Schonberg <schonberg@adacore.com>
799 * sem_dim.adb (Analyze_Dimension_If_Expression,
800 Analyze_Dimension_Case_Expression): new subprograms to verify
801 the dimensional correctness of Ada2012 conditional expressions,
802 and set properly the dimensions of the construct.
803 * sem_res.adb (Resolve_If_Expression, Resolve_Case_Expression)):
804 call Analyze_Dimension.
806 2017-09-08 Ed Schonberg <schonberg@adacore.com>
808 * sem_type.adb (Expand_Interface_Conversion): Prevent an infinite
809 loop on an interface declared as a private extension of another
810 synchronized interface.
812 2017-09-08 Ed Schonberg <schonberg@adacore.com>
814 * sem_ch12.adb (Check_Generic_Parent): New procedure within
815 Analyze_Associations, to handle actual packages that depend on
816 previous instances. If a package IAP that is an instantiation is
817 used as an actual in a subsequent instantiation SI in the same
818 scope, and IAP has a body, IAP must be frozen before SI. If
819 the generic parent of IAP is itself declared in a previous
820 instantiation in the same scope, that instantiation must also
822 (Install_Body): Prevent double insertion of freeze node for
825 2017-09-08 Hristian Kirtchev <kirtchev@adacore.com>
827 * sem_prag.adb (Resolve_State): Update the
828 comment on documentation. Generate a reference to the state once
829 resolution takes place.
831 2017-09-08 Ed Schonberg <schonberg@adacore.com>
833 * sem_ch13.adb (Analyze_Aspect_Specifications, case
834 Linker_Section): If the aspect applies to an object declaration
835 with explicit initialization, do not delay the freezing of the
836 object, to prevent access-before-elaboration in the generated
839 2017-09-08 Ed Schonberg <schonberg@adacore.com>
841 * a-wtdeio.adb (Put, all versions): Use Long_Long_Integer
842 (Integer_Value (Item)) when the size of the fixed decimal type
843 is larger than Integer.
845 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
848 * gcc-interface/decl.c (copy_and_substitute_in_layout): Put the fields
849 in order of increasing position in more cases.
851 2017-09-07 Yannick Moy <moy@adacore.com>
853 * a-exetim-mingw.ads: Add contract Global=>null
854 on all operations that are modeled as having no read or write
855 of global variables in SPARK.
857 2017-09-07 Raphael Amiard <amiard@adacore.com>
859 * a-chtgop.adb, a-chtgop.ads (Generic_Iteration_With_Position): Added
860 to Hmaps.Generic_Ops.
861 * a-cohama.adb (Ada.Containers.Hmaps.Iterate): Pass proper position in
863 * a-cihama.adb (Ada.Containers.Indefinite_Hmaps.Iterate): Pass pos in
865 * a-cohase.adb (Ada.Containers.Hashed_Sets.Iterate): Pass proper
868 2017-09-07 Javier Miranda <miranda@adacore.com>
870 * sem_elab.adb (Check_Task_Activation): Adding switch -gnatd.y to
871 allow disabling the generation of implicit pragma Elaborate_All
874 2017-09-07 Javier Miranda <miranda@adacore.com>
876 * exp_disp.adb (Make_Tags): Avoid suffix counter
877 in the external name of the elaboration flag. Required to fix
878 the regressions introduced by the initial version of this patch.
880 2017-09-07 Bob Duff <duff@adacore.com>
882 * sem_ch6.adb (Analyze_Function_Return): Do not
883 insert an explicit conversion to force the displacement of the
884 "this" pointer to reference the secondary dispatch table in the
885 case where the return statement is returning a raise expression,
886 as in "return raise ...".
888 2017-09-07 Arnaud Charlet <charlet@adacore.com>
890 * sem_disp.adb (Is_User_Defined_Equality): Removed procedure.
891 * sem_util.ads, sem_util.adb (Is_User_Defined_Equality): Copied
892 procedure from sem_disp.adb.
893 * sem_ch12.ads (Get_Unit_Instantiation_Node): rename Package
895 * sem_ch12.adb (Get_Unit_Instantiation_Node): function extended to
896 return the instantiation node for subprograms. Update references
897 to Get_Unit_Instantiation_Node.
898 * sem_ch7.adb (Install_Parent_Private_Declarations): update
899 reference to Get_Unit_Instantiation_Node.
900 * exp_dist.adb (Build_Package_Stubs): update reference to
901 Get_Unit_Instantiation_Node.
902 * sem_ch9.adb: minor typo in comment.
903 * lib-xref-spark_specific.adb
904 (Traverse_Declaration_Or_Statement): traverse into task type
907 2017-09-07 Ed Schonberg <schonberg@adacore.com>
909 * sem_dim.adb (Analyze_Dimension_Type_Conversion): New procedure
910 to handle properly various cases of type conversions where the
911 target type and/or the expression carry dimension information.
912 (Dimension_System_Root); If a subtype carries dimension
913 information, obtain the source parent type that carries the
916 2017-09-07 Dmitriy Anisimkov <anisimko@adacore.com>
918 * g-socket.adb, g-socket.ads (GNAT.Sockets.To_Ada): New routine.
920 2017-09-07 Ed Schonberg <schonberg@adacore.com>
922 * exp_attr.adb (Expand_N_Attribute_Reference, case 'Constrained):
923 If the prefix is a reference to an object, rewrite it as an
924 explicit dereference, as required by 3.7.2 (2) and as is done
925 with most other attributes whose prefix is an access value.
927 2017-09-07 Bob Duff <duff@adacore.com>
929 * par-ch13.adb: Set the Inside_Depends flag if we are inside a
930 Refined_Depends aspect.
931 * par-ch2.adb: Set the Inside_Depends flag if we are inside a
932 Refined_Depends pragma.
933 * scans.ads: Fix documentation of Inside_Depends flag.
934 * styleg.adb, styleg.ads: Minor reformatting and comment fixes.
936 2017-09-07 Hristian Kirtchev <kirtchev@adacore.com>
938 * exp_ch7.adb (Insert_Actions_In_Scope_Around):
939 Account for the case where the are no lists to insert, but the
940 secondary stack still requires management.
941 * a-chtgop.adb, a-cihama.adb, a-cohama.adb, a-cohase.adb, a-tags.adb,
942 comperr.adb, einfo.adb, exp_aggr.adb, exp_ch3.adb, exp_disp.adb,
943 lib-xref.adb, lib-xref-spark_specific.adb, sem_ch12.adb, sem_ch13.adb,
944 sem_ch6.adb, sem_dim.adb, sem_dim.ads, sem_elab.adb, sem_prag.adb:
947 2017-09-07 Vincent Celier <celier@adacore.com>
949 * clean.adb: Do not get the target parameters before calling
952 2017-09-07 Nicolas Roche <roche@adacore.com>
954 * s-osinte-solaris-posix.ads: Removed.
956 2017-09-07 Arnaud Charlet <charlet@adacore.com>
958 * sem_prag.adb (Collect_States_And_Objects): Detect also instances of
959 single concurrent objects.
961 2017-09-07 Javier Miranda <miranda@adacore.com>
963 * s-regexp.ads: Fix documentation of the globbing grammar.
965 2017-09-07 Gary Dismukes <dismukes@adacore.com>
967 * a-tags.ads, einfo.ads, exp_disp.ads: Minor reformatting.
969 2017-09-07 Arnaud Charlet <charlet@adacore.com>
971 * gnat1drv.adb (Gnat1drv): Enable pragma Ignore_Pragma (Global)
972 in CodePeer mode, to support more legacy code automatically.
974 2017-09-07 Ed Schonberg <schonberg@adacore.com>
976 * exp_disp.adb (Replace_Formals): If thr formal is classwide,
977 and thus not a controlling argument, preserve its type after
978 rewriting because it may appear in an nested call with a classwide
981 2017-09-07 Arnaud Charlet <charlet@adacore.com>
983 * comperr.adb (Delete_SCIL_Files): Handle case of
984 N_Package_Instantiation.
986 2017-09-07 Ed Schonberg <schonberg@adacore.com>
988 * sem_ch10.adb (Remove_Private_With_Clause): If a private with
989 clause for a unit U appears in a context that includes a regular
990 with_clause on U, rewrite the redundant private clause into a null
991 statement, rather than removing it altogether from the context,
992 so that ASIS tools can reconstruct the original source.
994 2017-09-07 Ed Schonberg <schonberg@adacore.com>
996 * sem_ch13.adb (Check_Aspect_At_Freeze_Point): The expression
997 for aspect Small can be of any real type (not only a universal
998 real literal) as long as it is a static constant.
1000 2017-09-07 Thomas Quinot <quinot@adacore.com>
1002 * par_sco.adb: Minor reformatting.
1004 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1006 * s-parame-ae653.ads: Removed.
1008 2017-09-07 Nicolas Roche <roche@adacore.com>
1010 * s-traces-default.adb, s-trafor-default.adb, s-trafor-default.ads,
1011 s-traces.adb, s-traces.ads, s-tratas-default.adb, s-tfsetr-default.adb,
1012 s-tfsetr-vxworks.adb, s-tratas.adb, s-tratas.ads, s-tasuti.adb,
1013 s-parame-hpux.ads, s-tassta.adb, s-taasde.adb, s-tasren.adb,
1014 s-taprob.adb, a-caldel.adb, s-parame.ads, Makefile.rtl, s-tpobop.adb,
1015 s-taenca.adb, s-parame-vxworks.ads: Remove support for System.Traces.
1017 2017-09-07 Yannick Moy <moy@adacore.com>
1019 * a-ngelfu.ads Add preconditions to all functions
1020 listed in Ada RM A.5.1(19-33) as having constraints on inputs.
1022 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1024 * lib-xref.adb (Generate_Reference): ignore
1025 references to entities which are Part_Of single concurrent
1028 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
1030 * sem_ch7.adb (Hide_Public_Entities): Add paragraph to main
1033 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1035 * a-taside.adb (Activation_Is_Complete): Raise Program_Error if
1036 Null_Task_Id is passed.
1038 2017-09-07 Javier Miranda <miranda@adacore.com>
1040 * einfo.ads, einfo.adb (Access_Disp_Table_Elab_Flag): New
1041 attribute. Defined for record types and subtypes.
1042 * exp_ch3.ads (Init_Secondary_Tags): Adding new formal
1043 (Init_Tags_List) to facilitate generating separate code in the
1044 IP routine to initialize the object components and for completing
1045 the elaboration of dispatch tables.
1046 * exp_ch3.adb (Build_Init_Procedure): Improve the code
1047 generated in the IP routines by means of keeping separate
1048 the initialization of the object components from the
1049 initialization of its dispatch tables. (Init_Secondary_Tags):
1050 Adding new formal (Init_Tags_List) and adjusting calls to
1051 Ada.Tags.Set_Dynamic_Offset_To_Top since it has a new formal;
1052 adjusting also calls to Ada.Tags.Register_Interface_Offset
1053 because the type of one of its formals has been changed.
1054 * a-tags.ads, a-tags.adb (Register_Interface_Offset): Profile
1055 modified. Instead of receiving a pointer to an object this
1056 routine receives now a primary tag.
1057 (Set_Dyanic_Offset_To_Top): Profile modified. This routine receives an
1058 additional formal: the tag of the primary dispatch table.
1059 * exp_disp.ads (Elab_Flag_Needed): New subprogram.
1060 * exp_disp.adb (Elab_Flag_Needed): New subprogram.
1061 (Make_Tags): Adding the declaration of the elaboration flag (if needed).
1062 * exp_aggr.adb (Build_Record_Aggr_Code): Adding actual of new
1063 formal in calls to Init_Secondary_Tags.
1065 2017-09-07 Javier Miranda <miranda@adacore.com>
1067 * ghost.adb (Mark_And_Set_Ghost_Instantiation.Check_Ghost_Actuals): New
1069 * sem_prag.adb (Pragma_Ghost): Add missing support for ghost
1070 applied to generic subprograms.
1072 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1074 * sem_util.adb (Check_Part_Of_Reference): rename Conc_Typ to Conc_Obj
1075 (because it refers to the anonymous concurrent object, not its type);
1076 fix condition for emitting error message about task/protected type,
1078 2017-09-07 Bob Duff <duff@adacore.com>
1080 * binde.adb (Debug_Flag_Old): If both -do and -dp
1081 are specified, behave as if just -do was specified, rather than
1084 2017-09-07 Nicolas Roche <roche@adacore.com>
1086 * system-vxworks-sparcv9.ads, s-vxwork-m68k.ads, s-vxwork-mips.ads,
1087 system-vxworks-m68k.ads, system-vxworks-mips.ads: Removed.
1089 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1091 * sem_prag.adb (Find_Role): The Global_Seen flag
1092 is now consulted not only for abstract states and variables,
1093 but for all kinds of items.
1094 (Collect_Subprogram_Inputs_Outputs): Do not process formal
1095 generic parameters, because unlike ordinary formal parameters,
1096 generic formals only act as input/ outputs if they are explicitly
1097 mentioned in a Global contract.
1099 2017-09-07 Yannick Moy <moy@adacore.com>
1101 * ghost.adb (Check_Ghost_Context): Do not err on ghost code inside
1102 predicate procedure. Check predicate pragma/aspect with Ghost entity.
1103 * exp_ch6.adb, par-ch6.adb, sem_ch13.adb, sem_prag.adb; Minor
1106 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1108 * sem_aggr.adb: Move New_Copy_Tree_And_Dimensions to sem_dim
1110 * sem_ch3.adb (Build_Derived_Record_Type):i Call
1111 Copy_Dimensions_Of_Components after creating the copy of the
1113 * sem_dim.ads, sem_dim.adb (Copy_Dimensions_Of_Components): For a
1114 derived recor type, copy the dikensions if any of each component
1115 of the parent record to the corresponding component declarations
1116 of the derived record. These expressions are used among other
1117 things as default values in aggregates with box associations.
1118 * a-dirval-mingw.adb, g-cgi.adb, gnatcmd.adb, lib-xref.adb,
1119 repinfo.adb, sem_attr.adb, sem_ch10.adb, sem_ch6.adb, sem_prag.adb:
1122 2017-09-07 Arnaud Charlet <charlet@adacore.com>
1124 * sem_util.adb: Remove extra space after THEN.
1126 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
1128 * sem_ch7.adb (Has_Referencer): For a subprogram renaming,
1129 also mark the renamed subprogram as referenced.
1131 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1133 * par-ch6.adb (P_Subprogram): Improve error message on null
1134 procedure with misplaced aspect specification, which the parser
1135 first attempts to interpret as a malformed expression function.
1137 2017-09-07 Gary Dismukes <dismukes@adacore.com>
1139 * sem_attr.adb (Analyze_Attribute_Old_Result):
1140 Allow attributes Result and Old in the case of an expression
1143 2017-09-07 Justin Squirek <squirek@adacore.com>
1145 * sem_prag.adb (Process_Atomic_Independent_Shared_Volatile): Propagate
1146 Volatile to subcomponents.
1148 2017-09-07 Bob Duff <duff@adacore.com>
1150 * exp_ch7.adb (Find_Last_Init): Check for the
1151 case where a build-in-place function call has been replaced by a
1152 'Reference attribute reference.
1154 2017-09-07 Eric Botcazou <ebotcazou@adacore.com>
1156 * sem_ch7.adb (Has_Referencer): Recurse on Actions of freeze
1159 2017-09-07 Bob Duff <duff@adacore.com>
1161 * exp_ch6.adb (Make_Build_In_Place_Call_In_Object_Declaration,
1162 Make_Build_In_Place_Call_In_Anonymous_Context): Do not use the
1163 secondary stack for all functions that return limited tagged
1164 types -- just do it for dispatching calls. Misc cleanup.
1165 * sem_util.ads, sem_util.adb (Unqual_Conv): New function to
1166 remove qualifications and type conversions. Fix various bugs
1167 where only a single level of qualification or conversion was
1168 removed, so e.g. "T1'(T2'(X))" would incorrectly return "T2'(X)"
1170 * checks.adb, exp_util.ads, exp_util.adb, sem_res.adb: Misc related
1173 2017-09-07 Ed Schonberg <schonberg@adacore.com>
1175 * sem_ch6.adb (setr_Actual_Subtypes): Within a predicate function
1176 do not create actual subtypes that may generate further predicate
1178 * sem_ch13.adb (Build_Predicate_Functions): Indicate that entity
1179 of body is a predicate function as well.
1180 (Resolve_Aspect_Expressions, Resolve_Name): For a component
1181 association, only the expression needs resolution, not the name.
1182 (Resolve_Aspect_Expressions, case Predicates): Construct and
1183 analyze the predicate function declaration in the scope of the
1184 type, before making the type and its discriminants visible.
1186 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1188 * gcc-interface/decl.c (warn_on_field_placement): Issue the warning
1189 only if the record type itself comes from source.
1191 2017-09-06 Gary Dismukes <dismukes@adacore.com>
1193 * sem_ch5.adb: Minor reformatting and a typo fix
1195 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1197 * sinput-l.ads: minor remove extra period at the end of comment
1199 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1201 * sem_prag.adb (Add_Item_To_Name_Buffer): remove support for
1203 (Find_Role): remove support for E_Discriminant.
1205 2017-09-06 Javier Miranda <miranda@adacore.com>
1207 * exp_ch6.adb (Expand_Simple_Function_Return):
1208 Add missing implicit type conversion to force displacement of the
1211 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1213 * sem_ch3.adb, sem_aux.adb, sem_res.adb: Minor reformatting.
1215 2017-09-06 Yannick Moy <moy@adacore.com>
1217 * sem_ch12.adb (Analyze_Instance_And_Renamings): Refactor to set
1218 global variable Ignore_SPARK_Mode_Pragmas_In_Instance only once.
1220 2017-09-06 Bob Duff <duff@adacore.com>
1222 * sem_ch8.adb: Change Assert to be consistent with
1225 2017-09-06 Bob Duff <duff@adacore.com>
1227 * binde.adb (Find_Elab_Order): Do not run Elab_Old unless
1228 requested. Previously, the -do switch meant "run Elab_New and
1229 Elab_Old and use the order chosen by Elab_Old, possibly with
1230 debugging printouts comparing the two orders." Now it means
1231 "do not run Elab_New." This is of use if there are bugs that
1232 cause Elab_New to crash.
1233 (Elab_Position, Num_Chosen): Change type to Nat, to avoid various
1235 * ali.ads (Elab_Position): Change type to Nat, to avoid various
1238 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1240 * sem_prag.adb (Check_Mode_Restriction_In_Enclosing_Context): Fix
1241 reference to SPARK RM.
1243 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1245 * layout.adb: Use SSU short hand consistently throughout the file.
1247 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1249 * freeze.adb (Freeze_Record_Type)
1250 <Sized_Component_Total_Round_RM_Size>: New local variable to
1251 accumulate the rounded RM_Size of components. Update it for
1252 every component whose RM_Size is statically known. Add missing
1253 guard to check that bit packing is really required before issuing
1254 the error about packing. Swap condition for clarity's sake.
1255 * sem_prag.adb (Usage_Error): Fix reference to SPARK RM in comment.
1257 2017-09-06 Fedor Rybin <frybin@adacore.com>
1259 * makeutl.adb, makeutl.ads, mlib.adb, mlib.ads, mlib-fil.adb,
1260 mlib-fil.ads, mlib-prj.adb, mlib-prj.ads, mlib-tgt.adb, mlib-tgt.ads,
1261 mlib-tgt-specific.adb, mlib-tgt-specific.ads,
1262 mlib-tgt-specific-aix.adb, mlib-tgt-specific-darwin.adb,
1263 mlib-tgt-specific-hpux.adb, mlib-tgt-specific-linux.adb,
1264 mlib-tgt-specific-mingw.adb, mlib-tgt-specific-solaris.adb,
1265 mlib-tgt-specific-vxworks.adb, mlib-tgt-specific-xi.adb, mlib-utl.adb,
1266 mlib-utl.ads, prj.adb, prj.ads, prj-attr.adb, prj-attr.ads,
1267 prj-attr-pm.adb, prj-attr-pm.ads, prj-com.ads, prj-conf.adb,
1268 prj-conf.ads, prj-dect.adb, prj-dect.ads, prj-env.adb, prj-env.ads,
1269 prj-err.adb, prj-err.ads, prj-ext.adb, prj-ext.ads, prj-makr.adb,
1270 prj-makr.ads, prj-nmsc.adb, prj-nmsc.ads, prj-pars.adb, prj-pars.ads,
1271 prj-part.adb, prj-part.ads, prj-pp.adb, prj-pp.ads, prj-proc.adb,
1272 prj-proc.ads, prj-strt.adb, prj-strt.ads, prj-tree.adb, prj-tree.ads,
1273 prj-util.adb, prj-util.ads, sinput-p.adb, sinput-p.ads: Remove obsolete
1274 project manager sources.
1276 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1278 * sem_ch5.adb (Analyze_Assigment): If the left-hand side is an
1279 entity of a mutable type and the right-hand side is a conditional
1280 expression, resolve the alternatives of the conditional using
1281 the base type of the target entity, because the alternatives
1282 may have distinct subtypes. This is particularly relevant if
1283 the alternatives are aggregates.
1285 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1287 * checks.adb (Apply_Predicate_Check): If the expression is an
1288 aggregate that is the RHS of an assignment, apply the check to
1289 the LHS after the assignment, rather than to the aggregate. This
1290 is more efficient than creating a temporary for the aggregate,
1291 and prevents back-end crashes when the aggregate includes a
1292 dynamic "others' association.
1294 2017-09-06 Yannick Moy <moy@adacore.com>
1296 * sem_ch12.adb (Analyze_Instance_And_Renamings):
1297 Set variable to ignore SPARK_Mode in instance before the analysis
1298 of the generated package declaration.
1300 2017-09-06 Yannick Moy <moy@adacore.com>
1302 * sem_res.adb (Resolve_Call): Do not issue a
1303 message for calls inside expression function, unless body was
1304 seen and is candidate for inlining.
1306 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1308 * sem_aux.adb (Is_Generic_Formal): Handle properly formal packages.
1309 * sem_ch3.adb (Analyze_Declarations): In a generic subprogram
1310 body. do not freeze the formals of the generic unit.
1312 2017-09-06 Gary Dismukes <dismukes@adacore.com>
1314 * errout.adb (Error_Msg): Separate the
1315 treatment for warning vs. style messages in inlinings and
1316 instantiations. Prevents blowups on calls to Warn_Insertion for
1317 style messages, which should not be called in that case because
1318 Warning_Msg_Char is not set.
1320 2017-09-06 Justin Squirek <squirek@adacore.com>
1322 * sem_prag.adb (Check_VFA_Conflicts): Created
1323 to group all Volatile_Full_Access checks relating to other
1324 representation pragmas (Mark_Component_Or_Object): Created
1325 to centeralize the flagging of attributes for the record type
1326 component case, a pragma applied individually to a component, and
1328 (Process_Atomic_Independent_Shared_Volatile):
1329 Add propagation of certain pragmas to record components and move
1330 evaluation of VFA checks
1332 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1334 * sem_prag.adb (Check_Postcondition_Use_In_Inlined_Subprogram):
1335 Do not warn on conditions that are not obeyed for Inline_Always
1336 subprograms, when assertions are not enabled.
1338 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1340 * sem_util.adb (Unique_Entity): For abstract states return their
1343 2017-09-06 Bob Duff <duff@adacore.com>
1345 * sem_ch12.adb (Copy_Generic_Node): When we copy a node
1346 that is a proper body corresponding to a stub, we defer the
1347 adjustment of the sloc until after the correct adjustment has
1348 been computed. Otherwise, Adjust_Instantiation_Sloc will ignore
1349 the adjustment, because it will be outside the range in (the old,
1350 incorrect) S_Adjustment.
1351 * inline.adb: Use named notation for readability and uniformity.
1352 * sinput-l.adb: Minor improvements to debugging output printed
1354 * sinput-l.ads (Create_Instantiation_Source): Minor comment
1357 2017-09-06 Vincent Celier <celier@adacore.com>
1359 * make.adb: Do not invoke gprbuild for -bargs -P.
1361 2017-09-06 Sylvain Dailler <dailler@adacore.com>
1363 * sem_eval.adb (Compile_Time_Known_Value_Or_Aggr): Adding a
1364 case when Op is of kind N_Qualified_Expression. In this case,
1365 the function is called recursively on the subexpression like in
1367 * make.adb: Minor reformatting
1369 2017-09-06 Justin Squirek <squirek@adacore.com>
1371 * einfo.adb (Set_Linker_Section_Pragma): Modify
1372 Set_Linker_Section_Pragma to be consistant with the "getter"
1373 Linker_Section_Pragma.
1374 * exp_ch5.adb (Expand_Formal_Container_Loop): Add proper error
1375 checking for container loops so that the index cursor is not
1376 directly changable by the user with the use of E_Loop_Parameter.
1377 * sem_ch5.adb (Analyze_Block_Statement): Revert previous change.
1378 * sem_warn.adb (Check_References): Revert previous change.
1380 2017-09-06 Bob Duff <duff@adacore.com>
1382 * exp_util.adb (Is_Displace_Call): Make sure it works for indirect
1385 2017-09-06 Yannick Moy <moy@adacore.com>
1387 * sem_prag.adb (Analyze_Depends_Global): Reinforce test on object
1388 declarations to only consider valid uses of Global/Depends those on
1389 single concurrent objects.
1391 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1393 * sem_ch13.adb (Check_Record_Representation_Clause): Give an
1394 error as soon as one of the specified components overlaps the
1397 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1399 * sem_prag.ads: minor fix typo in comment.
1401 2017-09-06 Justin Squirek <squirek@adacore.com>
1403 * sem_ch5.adb (Analyze_Block_Statement): Verify a block comes
1404 from source before checking source references.
1405 * sem_warn.adb (Check_References): Add check for internal block
1408 2017-09-06 Vincent Celier <celier@adacore.com>
1410 * make.adb, makeusg.adb, switch-m.adb, switch-m.ads, make_util.adb,
1411 make_util.ads, sinput.adb, sinput.ads, clean.adb, gnatls.adb,
1412 gnatname.adb: Remove the Project Manager from the GNAT tools.
1413 * gcc-interface/Makefile.in: ditto.
1415 2017-09-06 Bob Duff <duff@adacore.com>
1417 * sem_util.ads: Minor comment fix.
1419 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1421 * sem_ch12.adb (Analyze_Associations, case of Formal_Package):
1422 Generate a freeze node for the actual of a formal package, if
1423 the actual is declared in the same unit and has a corresponding
1424 body, to prevent the current instance from being frozen before
1427 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1429 * sem_ch7.adb (Entity_Table_Size): Change to nearest prime number.
1431 2017-09-06 Yannick Moy <moy@adacore.com>
1433 * sem_warn.adb: Minor refactoring.
1435 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1437 * einfo.ads, einfo.adb (Get_Classwwide_Pragma): New utility,
1438 to retrieve the inherited classwide precondition/postcondition
1440 * freeze.adb (Freeze_Entity): Use Get_Classwide_Pragma when
1441 freezing a subprogram, to complete the generation of the
1442 corresponding checking code.
1444 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1446 * exp_util.adb (Is_Controlled_Indexing): New routine.
1447 (Is_Displace_Call): Use routine Strip to remove indirections.
1448 (Is_Displacement_Of_Object_Or_Function_Result): Code clean up. Add a
1449 missing case of controlled generalized indexing.
1450 (Is_Source_Object): Use routine Strip to remove indirections.
1451 (Strip): New routine.
1453 2017-09-06 Bob Duff <duff@adacore.com>
1455 * sysdep.c (__gnat_has_cap_sys_nice): If HAVE_CAPABILITY is defined,
1456 we include the proper header. Otherwise, we just declare the necessary
1457 things from the capabilities library. This is so we can build on
1458 machines without that library, while still enabling that library.
1459 At run time, we're using weak symbols, so __gnat_has_cap_sys_nice will
1460 simply return 0 if the library is not present, or not included
1463 2017-09-06 Pierre-Marie de Rodat <derodat@adacore.com>
1465 * exp_dbug.adb (Debug_Renaming_Declaration): Do not create an encoding
1466 for renamings that involve function calls in prefix form.
1468 2017-09-06 Bob Duff <duff@adacore.com>
1470 * sem_ch3.adb (Analyze_Subtype_Declaration):
1471 Set Has_Delayed_Freeze on a subtype of an incomplete type.
1473 2017-09-06 Pierre-Marie de Rodat <derodat@adacore.com>
1475 * par_sco.adb (Extend_Statement_Sequence): When the accept statement
1476 has no parameter specification and no entry index, use the entry name
1477 as the end of the generated SCO statement.
1479 2017-09-06 Steve Baird <baird@adacore.com>
1481 * exp_util.adb (Side_Effect_Free): For CodePeer (only) treat
1482 uses of 'Image and related attributes as having side effects in
1483 order to avoid replicating such uses.
1484 * pprint.ads (Expression_Image) Add new generic formal flag
1485 Hide_Temp_Derefs. The flag defaults to False; CodePeer will
1486 (eventually) override the default.
1487 * pprint.adb (Expression_Image) If the new flag is set, then
1488 suppress the ".all" suffix when displaying a dereference whose
1489 prefix is a use of a value-capturing compiler temp of the sort
1490 generated by Expr_Util.Remove_Side_Effects .
1491 * exp_attr.adb, g-catiio.adb, inline.adb, sem_attr.adb, sem_ch13.adb,
1492 sem_ch7.adb, sem_dim.adb, sem_util.adb, sem_util.ads, sem_warn.adb:
1494 * inline.adb: Minor wording change.
1496 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1498 * sem_ch7.adb: Update comment.
1500 2017-09-06 Yannick Moy <moy@adacore.com>
1502 * einfo.adb, einfo.ads (Is_Subprogram_Or_Entry): New predicate.
1503 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Use new function.
1504 * sem_util.adb, sem_util.ads (Within_Protected_Type): Renaming
1505 with slight modification from Is_Subp_Or_Entry_Inside_Protected,
1506 so that applies to any entity.
1508 2017-09-06 Yannick Moy <moy@adacore.com>
1510 * sem_ch3.adb (Derived_Type_Declaration): Use
1511 Incomplete_Or_Partial_View rather than local Find_Partial_View.
1513 2017-09-06 Javier Miranda <miranda@adacore.com>
1515 * g-catiio.ads, g-catiio.adb (Value): Extended to parse an UTC time
1518 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1520 * sem_dim.adb (Analyze_Dimension): In an instance, a type
1521 conversion takes its dimensions from the expression, not from
1523 (Dimensions_Of_Operand): Ditto.
1525 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1527 * exp_ch6.adb (Expand_Call_Helper): Do not optimize calls to
1528 null procedures when GNAT coverage is used, so that their (empty)
1529 bodies are properly covered.
1531 2017-09-06 Bob Duff <duff@adacore.com>
1533 * sem_ch13.adb (Resolve_Aspect_Expressions): If
1534 the entity is a type with discriminants, make the discriminants
1535 directly visible in aspect clauses.
1537 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1539 * sem_res.adb (Resolve_Arithmentic_Op): If both operands are
1540 Universal_Real and the context is a floating-point type, resolve
1541 both operands to the target type.
1543 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1545 * a-comlin.adb, exp_aggr.adb, exp_ch6.adb, frontend.adb, gnatbind.adb,
1546 sem_ch3.adb, sem_util.adb: Minor reformatting.
1548 2017-09-06 Yannick Moy <moy@adacore.com>
1550 * freeze.adb (Check_Inherited_Conditions): Rewriting
1551 of inherited preconditions and postconditions should only occur
1552 in GNATprove mode, that is, when GNATprove_Mode is True, not to
1553 be confused with SPARK_Mode being On.
1555 2017-09-06 Yannick Moy <moy@adacore.com>
1557 * sem_warn.adb (Check_References): Take into
1558 account possibility of attribute reference as original node.
1560 2017-09-06 Yannick Moy <moy@adacore.com>
1562 * exp_attr.adb (Expand_N_Attribute_Reference): Protect against invalid
1565 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1567 * inline.adb (Split_Unconstrained_Function): Also set Is_Inlined
1568 on the procedure created to encapsulate the body.
1569 * sem_ch7.adb: Add with clause for GNAT.HTable.
1570 (Entity_Table_Size): New constant.
1571 (Entity_Hash): New function.
1572 (Subprogram_Table): New instantiation of GNAT.Htable.Simple_HTable.
1573 (Is_Subprogram_Ref): Rename into...
1574 (Scan_Subprogram_Ref): ...this. Record references to subprograms in
1575 the table instead of bailing out on them. Scan the value of constants
1576 if it is not known at compile time.
1577 (Contains_Subprograms_Refs): Rename into...
1578 (Scan_Subprogram_Refs): ...this.
1579 (Has_Referencer): Scan the body of all inlined subprograms. Reset the
1580 Is_Public flag on subprograms if they are not actually referenced.
1581 (Hide_Public_Entities): Beef up comment on the algorithm.
1582 Reset the table of subprograms on entry.
1584 2017-09-06 Yannick Moy <moy@adacore.com>
1586 * inline.adb: Add comments to Can_Be_Inlined_In_GNATprove_Mode.
1588 2017-09-06 Javier Miranda <miranda@adacore.com>
1590 * exp_aggr.adb (Component_Not_OK_For_Backend): The C backend
1591 cannot handle a type conversion of an array as an aggregate
1594 2017-09-06 Bob Duff <duff@adacore.com>
1596 * g-comlin.adb (Try_Help): Remove ".exe" so we
1597 get the same results on windows and unix.
1599 2017-09-06 Justin Squirek <squirek@adacore.com>
1601 * exp_imgv.adb (Expand_Image_Attribute),
1602 (Expand_Wide_Image_Attribute), (Expand_Wide_Wide_Image_Attribute):
1603 Added case to handle new-style 'Image expansion
1604 (Rewrite_Object_Image): Moved from exp_attr.adb
1605 * exp_attr.adb (Expand_N_Attribute_Reference): Modified Image
1606 attribute cases so that the relevant subprograms in exp_imgv.adb
1607 handle all expansion.
1608 (Rewrite_Object_Reference_Image): Moved to exp_imgv.adb
1609 * sem_attr.adb (Analyze_Attribute): Modified Image attribute
1610 cases to call common function Analyze_Image_Attribute.
1611 (Analyze_Image_Attribute): Created as a common path for all
1612 image attributes (Check_Object_Reference_Image): Removed
1613 * sem_util.ads, sem_util.adb (Is_Image_Applied_To_Object):
1614 Removed and refactored into Is_Object_Image (Is_Object_Image):
1615 Created as a replacement for Is_Image_Applied_To_Object
1617 2017-09-06 Yannick Moy <moy@adacore.com>
1619 * sem_prag.adb (Analyze_Depends_In_Decl_Part): Add continuation
1620 message for missing input.
1622 2017-09-06 Yannick Moy <moy@adacore.com>
1624 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Prevent inlining
1625 of protected subprograms and entries.
1626 * sem_util.adb, sem_util.ads (Is_Subp_Or_Entry_Inside_Protected):
1627 New function to detect when a subprogram of entry is defined
1628 inside a protected object.
1630 2017-09-06 Bob Duff <duff@adacore.com>
1632 * sysdep.c (__gnat_has_cap_sys_nice): New function to determine
1633 whether the current process has the CAP_SYS_NICE capability.
1634 * s-taprop-linux.adb (Get_Ceiling_Support): Update this to allow
1635 ceiling priorities if the current process has the CAP_SYS_NICE
1638 2017-09-06 Bob Duff <duff@adacore.com>
1640 * a-comlin.ads, a-comlin.adb (Argument): Move the constraint
1641 check back to the body, because SPARK is not yet ready for
1642 "or else raise Constraint_Error".
1644 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1646 * exp_ch6.adb (Expand_Call_Helper): Replace call to null
1647 procedure by a single null statement, after evaluating the
1648 actuals that require it.
1650 2017-09-06 Javier Miranda <miranda@adacore.com>
1652 * exp_aggr.adb (Backend_Processing_Possible.Component_Check):
1653 Generating C code improve the code that checks the use of nested
1654 aggregates to initialize object declarations.
1656 2017-09-06 Yannick Moy <moy@adacore.com>
1658 * sem_ch3.adb (Derived_Type_Declaration): Detect
1659 violations of new rule SPARK RM 3.4(1). Also refactor existing
1660 check to use the new function Find_Partial_View.
1662 2017-09-06 Vincent Celier <celier@adacore.com>
1664 * gnatcmd.adb: gnat ls -V -P... invokes gprls -V -P... The code
1665 from the Prj hierarchy has been removed from the GNAT driver.
1667 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1669 * sem_type.adb (Interface_Present_In_Ancestor): Within an
1670 expression function, or within a spec expression (default value,
1671 etc) a reference to an incomplete type is legal: legality of
1672 the operation will be checked when some related entity (type,
1673 object or subprogram) is frozen.
1675 2017-09-06 Gary Dismukes <dismukes@adacore.com>
1677 * exp_ch5.adb, s-diinio.ads, sem_ch4.adb, s-diflio.ads: Minor spelling
1678 adjustments and a typo fix.
1680 2017-09-06 Yannick Moy <moy@adacore.com>
1682 * sem_res.adb (Resolve_Call): Do not issue info
1683 message about inlining of calls to functions in assertions,
1684 for functions whose body has not been seen yet.
1686 2017-09-06 Bob Duff <duff@adacore.com>
1688 * a-comlin.ads, a-comlin.adb (Argument): Simplify the code, now that
1689 we can use modern Ada in this package.
1690 * s-resfil.ads, s-resfil.adb, a-clrefi.ads, a-clrefi.adb:
1691 Move Ada.Command_Line.Response_File to System.Response_File,
1692 and make Ada.Command_Line.Response_File into a rename of
1693 System.Response_File. This is to avoid having gnatbind depend
1694 Ada.Command_Line, which would damage the bootstrap process now
1695 that Ada.Command_Line contains modern Ada (the raise expression).
1696 * gnatbind.adb: Avoid dependence on
1697 Ada.Command_Line. Depend on System.Response_File instead
1698 of Ada.Command_Line.Response_File. Change one call to
1699 Ada.Command_Line.Command_Name to use Fill_Arg. Change one call
1700 to Ada.Command_Line.Argument_Count to use Arg_Count.
1701 * gcc-interface/Make-lang.in, Makefile.rtl: Take note of the new files.
1703 2017-09-06 Bob Duff <duff@adacore.com>
1705 * frontend.adb (Frontend): Skip -gnatec=gnat.adc
1706 switch, because we've already read gnat.adc by default.
1708 2017-09-06 Bob Duff <duff@adacore.com>
1710 * exp_ch5.adb (Get_Default_Iterator): Replace
1711 "Assert(False)" with "return Iter", because if an iterable
1712 type is derived from a noniterable one, then we won't find an
1713 overriding or inherited default iterator.
1715 2017-09-06 Yannick Moy <moy@adacore.com>
1717 * sem_warn.adb (Warn_On_Suspicious_Index): Improve warning when the
1718 literal index used to access a string is null or negative.
1720 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1722 * einfo.adb (Status_Flag_Or_Transient_Decl): The attribute is now
1723 allowed on loop parameters.
1724 (Set_Status_Flag_Or_Transient_Decl): The attribute is now allowed
1726 (Write_Field15_Name): Update the output for
1727 Status_Flag_Or_Transient_Decl.
1728 * einfo.ads: Attribute Status_Flag_Or_Transient_Decl now applies
1729 to loop parameters. Update the documentation of the attribute
1730 and the E_Loop_Parameter entity.
1731 * exp_ch7.adb (Process_Declarations): Remove the bogus guard
1732 which assumes that cursors can never be controlled.
1733 * exp_util.adb (Requires_Cleanup_Actions): Remove the bogus
1734 guard which assumes that cursors can never be controlled.
1736 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1738 * exp_attr.adb, sem_util.adb, sem_attr.adb, sem_ch6.adb, sem_ch8.adb,
1739 sem_warn.adb: Minor reformatting.
1741 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1743 * sem_warn.adb (Warn_On_Overlapping_Actuals): Refine previous
1744 fix and preserve older GNAT warning on overlapping actuals that
1745 are not elementary types.
1747 2017-09-06 Justin Squirek <squirek@adacore.com>
1749 * sem_attr.adb: Comment correction.
1751 2017-09-06 Gary Dismukes <dismukes@adacore.com>
1753 * sem_util.adb: Minor reformatting.
1755 2017-09-06 Yannick Moy <moy@adacore.com>
1757 * a-comlin.ads (Argument): Add precondition for analysis.
1759 2017-09-06 Yannick Moy <moy@adacore.com>
1761 * sem_res.adb (Resolve): Update message for function call as statement.
1763 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1765 * sem_ch6.adb (Check_Returns): Clean up warnings coming from
1766 generated bodies for renamings that are completions, when renamed
1767 procedure is No_Return.
1768 * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
1769 rule in 6.5.1 (7/2): if a renaming is a completion of a subprogram
1770 with No_Return, the renamed entity must be No_Return as well.
1772 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1774 * exp_ch5.adb, freeze.adb, exp_ch4.adb, exp_ch6.adb, lib-xref.adb:
1777 2017-09-06 Justin Squirek <squirek@adacore.com>
1779 * exp_attr.adb (Expand_N_Attribute_Reference): Modified Image
1780 attribute cases (Rewrite_Object_Reference_Image): Created to
1781 aid the rewriting of new-style 'Image attributes.
1782 * sem_attr.adb (Analyze_Attribute): Modified Image attribute cases
1783 (Check_Object_Reference_Image): Created to handle verification of
1784 'Image with object-references as prefixes.
1785 * sem_util.ads, sem_util.adb (Is_Image_Applied_To_Object):
1786 Create predicate to identify cases where an 'Image attribute's
1787 prefix applies to an object reference.
1789 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1791 * freeze.adb (Freeze_Entity): Do not generate a freeze
1792 node for a generic unit, even if it includes delayed aspect
1793 specifications. Freeze nodes for generic entities must never
1794 appear in the tree that reaches the back-end of the compiler.
1796 2017-09-06 Yannick Moy <moy@adacore.com>
1798 * treepr.adb (Print_Entity_Info): Do not print empty Elist.
1800 2017-09-06 Yannick Moy <moy@adacore.com>
1802 * inline.adb (Can_Be_Inlined_In_GNATprove_Mode): Do not consider calls
1803 to subprograms in other units as possibly inlined.
1805 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1807 * freeze.adb (Freeze_Entity): For a derived type that has no
1808 explicit delayed aspects but may inherit delayed aspects from its
1809 parent type, analyze aspect at freeze point for proper capture
1810 of an inherited aspect.
1812 2017-09-06 Arnaud Charlet <charlet@adacore.com>
1814 * lib-xref.adb (Get_Through_Renamings): Get through subprogram
1815 renamings; also, avoid repeated calls to Renamed_Object when getting
1816 through object renamings.
1818 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1820 * sem_ch3.adb (Array_Type_Declaration): Handle properly an
1821 array type declaration in a private part, when an index is a
1822 subtype indication of a discrete type with a private partial view.
1824 2017-09-06 Javier Miranda <miranda@adacore.com>
1826 * exp_ch4.adb (Expand_Modular_Op): Force generating
1827 temporary to improve the generated code.
1829 2017-09-06 Tristan Gingold <gingold@adacore.com>
1831 * s-fatgen.adb: Minor typo fix in comment.
1833 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1835 * exp_ch5.adb (Make_Field_Assign): If the type
1836 of the right-hand side has stored constraint, use its values
1837 (except for those that are renamings of parent discriminants)
1838 to produce additional assignments for the discriminants of the
1839 left-hand side, which are invisible in the righ-hand side and
1840 not retrievable as selected components.
1842 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1844 * sem_util.adb (Needs_One_Formal): The first formal of such a
1845 function must be a controlling formal, so that Obj.F (X, Y)
1846 can have the interpretation F(Obj)(X, Y).
1847 * sem_util.ads: Clarify documentation.
1849 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1851 * table.ads, table.adb: Restore original implementation.
1852 * namet.h (Names_Ptr): Adjust back.
1853 (Name_Chars_Ptr): Likewise.
1854 * uintp.h (Uints_Ptr): Likewise.
1855 (Udigits_Ptr): Likewise.
1856 * g-table.ads: Remove pragma Compiler_Unit_Warning.
1857 * par_sco.adb: Do not with GNAT.Table and use Table consistently.
1858 * scos.ads: Replace GNAT.Table with Table and adjust instantiations.
1859 * spark_xrefs.ads: Likewise.
1860 * scos.h: Undo latest changes.
1862 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1864 * sem_ch12.adb (Analyze_Subprogram_Instantiation): Propagate
1865 No_Return flag to instance if pragma applies to generic unit. This
1866 must be done explicitly because the pragma does not appear
1867 directly in the generic declaration (unlike the corresponding
1868 aspect specification).
1870 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1872 * sem_ch7.adb (Has_Referencer): Move up and expand comment
1873 explaining the test used to detect inlining. Use same test
1874 in second occurrence.
1875 (Analyze_Package_Body_Helper): Minor formatting fixes.
1877 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1879 * exp_ch4.adb (Handle_Changed_Representation): For an untagged
1880 derived type with a mixture of renamed and constrained parent
1881 discriminants, the constraint for the target must obtain the
1882 discriminant values from both the operand and from the stored
1883 constraint for it, given that the constrained discriminants are
1884 not visible in the object.
1885 * exp_ch5.adb (Make_Field_Assign): The type of the right-hand
1886 side may be derived from that of the left-hand side (as in the
1887 case of an assignment with a change of representation) so the
1888 discriminant to be used in the retrieval of the value of the
1889 component must be the entity in the type of the right-hand side.
1891 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
1893 * sem_ch3.adb, sem_ch7.adb, sem_util.adb, g-debpoo.adb, sem_ch4.adb,
1894 sem_ch6.adb, sem_ch8.adb: Minor reformatting.
1895 * exp_util.adb (Is_Source_Object): Account for
1896 the cases where the source object may appear as a dereference
1897 or within a type conversion.
1898 * exp_ch6.adb: Fix missing space in error message.
1900 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1902 * sem_prag.adb: Update description of Eliminate.
1904 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1906 * sem_attr.adb (Analyze_Attribute, case 'Loop_Entry): Handle
1907 properly an attribute reference 'Loop_Entry that appears in the
1908 list of indices of an indexed expression, to prevent an infinite
1909 loop in the compiler.
1911 2017-09-06 Bob Duff <duff@adacore.com>
1913 * s-fileio.adb (Name): Do not raise Use_Error for temp files.
1915 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1917 * sem_ch4.adb (Analyze_Set_Membership): If an alternative
1918 in a set membership is an overloaded enumeration literal, and
1919 the type of the alternative is resolved from a previous one,
1920 replace the entity of the alternative as well as the type,
1921 to prevent inconsistencies between the entity and the type.
1923 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
1925 * ali.ads (ALIs_Record): Add No_Component_Reordering component.
1926 (No_Component_Reordering_Specified): New switch.
1927 * ali.adb (Initialize_ALI): Set No_Component_Reordering_Specified.
1928 (Scan_ALI): Set No_Component_Reordering and deal with NC marker.
1929 * bcheck.adb (Check_Consistent_No_Component_Reordering):
1931 (Check_Configuration_Consistency): Invoke it.
1932 * debug.adb (d.r): Toggle the effect of the switch.
1933 (d.v): Change to no-op.
1934 * einfo.ads (Has_Complex_Representation):
1935 Restrict to record types.
1936 (No_Reordering): New alias for Flag239.
1937 (OK_To_Reorder_Components): Delete.
1938 (No_Reordering): Declare.
1939 (Set_No_Reordering): Likewise.
1940 (OK_To_Reorder_Components): Delete.
1941 (Set_OK_To_Reorder_Components): Likewise.
1942 * einfo.adb (Has_Complex_Representation): Expect record types.
1943 (No_Reordering): New function.
1944 (OK_To_Reorder_Components): Delete.
1945 (Set_Has_Complex_Representation): Expect base record types.
1946 (Set_No_Reordering): New procedure.
1947 (Set_OK_To_Reorder_Components): Delete.
1948 (Write_Entity_Flags): Adjust to above change.
1949 * fe.h (Debug_Flag_Dot_R): New macro and declaration.
1950 * freeze.adb (Freeze_Record_Type): Remove conditional code setting
1951 OK_To_Reorder_Components on record types with convention Ada.
1952 * lib-writ.adb (Write_ALI): Deal with NC marker.
1953 * opt.ads (No_Component_Reordering): New flag.
1954 (No_Component_Reordering_Config): Likewise.
1955 (Config_Switches_Type): Add No_Component_Reordering component.
1956 * opt.adb (Register_Opt_Config_Switches): Copy
1957 No_Component_Reordering onto No_Component_Reordering_Config.
1958 (Restore_Opt_Config_Switches): Restore No_Component_Reordering.
1959 (Save_Opt_Config_Switches): Save No_Component_Reordering.
1960 (Set_Opt_Config_Switches): Set No_Component_Reordering.
1961 * par-prag.adb (Prag): Deal with Pragma_No_Component_Reordering.
1962 * sem_ch3.adb (Analyze_Private_Extension_Declaration): Also set the
1963 No_Reordering flag from the default.
1964 (Build_Derived_Private_Type): Likewise.
1965 (Build_Derived_Record_Type): Likewise. Then inherit it
1966 for untagged types and clean up handling of similar flags.
1967 (Record_Type_Declaration): Likewise.
1968 * sem_ch13.adb (Same_Representation): Deal with No_Reordering and
1969 remove redundant test on Is_Tagged_Type.
1970 * sem_prag.adb (Analyze_Pragma): Handle No_Component_Reordering.
1971 (Sig_Flags): Likewise.
1972 * snames.ads-tmpl (Name_No_Component_Reordering): New name.
1973 (Pragma_Id): Add Pragma_No_Component_Reordering value.
1974 * warnsw.adb (Set_GNAT_Mode_Warnings): Enable -gnatw.q as well.
1975 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>:
1976 Copy the layout of the parent type only if the No_Reordering
1978 (components_to_record): Reorder record types with
1979 convention Ada by default unless No_Reordering is set or -gnatd.r
1980 is specified and do not warn if No_Reordering is set in GNAT mode.
1982 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1984 * sem_util.ads, sem_util.adb (Check_Previous_Null_Procedure):
1985 new predicate to reject declarations that can be completions,
1986 when there is a visible prior homograph that is a null procedure.
1987 * sem_ch6.adb (Analyze_Null_Procedure): use it.
1988 * sem_ch8.adb (Analyze_Subprogram_Renaming): ditto.
1990 2017-09-06 Thomas Quinot <quinot@adacore.com>
1992 * s-regpat.adb (Compile.Parse_Literal): Fix handling of literal
1993 run of 253 characters or more.
1995 2017-09-06 Ed Schonberg <schonberg@adacore.com>
1997 * einfo.adb (Designated_Type): Use Is_Incomplete_Type to handle
1998 properly incomplete subtypes that may be created by explicit or
1999 implicit declarations.
2000 (Is_Base_Type): Take E_Incomplete_Subtype into account.
2001 (Subtype_Kind): Ditto.
2002 * sem_ch3.adb (Build_Discriminated_Subtype): Set properly the
2003 Ekind of a subtype of a discriminated incomplete type.
2004 (Fixup_Bad_Constraint): Use Subtype_Kind in all cases, including
2005 incomplete types, to preserve error reporting.
2006 (Process_Incomplete_Dependents): Do not create a subtype
2007 declaration for an incomplete subtype that is created internally.
2008 * sem_ch7.adb (Analyze_Package_Specification): Handle properly
2009 incomplete subtypes that do not require a completion, either
2010 because they are limited views, of they are generic actuals.
2012 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
2014 * checks.adb (Insert_Valid_Check): Remove the
2015 suspicious manipulation of the Do_Range_Check flag as ths is
2016 no linger needed. Suppress validity check when analysing the
2017 validation variable.
2019 2017-09-06 Philippe Gil <gil@adacore.com>
2021 * g-debpoo.adb: adapt GNAT.Debug_Pools to allow safe thread
2024 2017-09-06 Bob Duff <duff@adacore.com>
2026 * sem_elim.adb: Minor comment fix.
2028 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2030 * sem_util.adb (Is_Object_Reference): A function call is an
2031 object reference, and thus attribute references for attributes
2032 that are functions (such as Pred and Succ) as well as predefined
2033 operators are legal in contexts that require an object, such as
2034 the prefix of attribute Img and the Ada2020 version of 'Image.
2036 2017-09-06 Hristian Kirtchev <kirtchev@adacore.com>
2038 * exp_util.adb, einfo.adb, sem_attr.adb, exp_ch4.adb, gnatls.adb,
2039 exp_ch3.adb, xoscons.adb: Minor reformatting.
2041 2017-09-06 Raphael Amiard <amiard@adacore.com>
2043 * a-chtgop.ads, a-chtgop.adb: Add versions of First and Next with
2044 Position parameter. If supplied, use it to provide efficient iteration.
2045 * a-cohase.ads, a-cohase.adb, a-cihama.ads, a-cihama.adb,
2046 a-cohama.ads, a-cohama.adb: Add/Use Position to provide efficient
2049 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2051 * exp_util.adb (Build_Allocate_Deallocate_Proc): If the
2052 designated type is class-wide and the expression is an unchecked
2053 conversion, preserve the conversion when checking the tag of the
2054 designated object, to prevent spurious semantic errors when the
2055 expression in the conversion has an untagged type (for example
2056 an address attribute).
2058 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2060 * sem_res.adb (Resolve_Entry_Call): Check whether a protected
2061 operation is subject to a pragma Eliminate.
2063 2017-09-06 Ed Schonberg <schonberg@adacore.com>
2065 * sem_elim.ads, exp_ch4.adb: Minor reformatting.
2067 2017-09-06 Eric Botcazou <ebotcazou@adacore.com>
2069 * fe.h (Eliminate_Error_Msg): Remove.
2071 2017-09-05 Richard Sandiford <richard.sandiford@linaro.org>
2073 * gcc-interface/utils.c (make_packable_type): Update call to
2076 2017-09-05 Richard Sandiford <richard.sandiford@linaro.org>
2078 * gcc-interface/utils2.c (build_load_modify_store):
2079 Use int_mode_for_size.
2081 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2084 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
2085 for Itypes that are E_Record_Subtype with a cloned subtype.
2086 <E_Record_Subtype>: Use the DECL of the cloned type directly, if any.
2088 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2090 * gcc-interface/trans.c (convert_with_check): Use a custom base type
2091 if the base type of the expression has a different machine mode.
2092 Rename a couple of parameters and local variable.
2094 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2096 * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Address>: Do not strip
2097 conversions around prefixes that are not references.
2099 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2101 * gcc-interface/utils.c (unchecked_convert): When the result type is a
2102 non-biased integral type with size 0, set the result to 0 directly.
2104 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2106 * gcc-interface/gigi.h (renaming_from_generic_instantiation_p): Turn to
2107 (renaming_from_instantiation_p): ...this.
2108 * gcc-interface/decl.c (gnat_to_gnu_entity): Use inline predicate
2109 instead of explicit tests on kind of entities. Adjust for renaming.
2110 (gnat_to_gnu_profile_type): Likewise.
2111 (gnat_to_gnu_subprog_type): Likewise.
2112 * gcc-interface/trans.c (Identifier_to_gnu): Likewise.
2113 (Case_Statement_to_gnu): Likewise.
2114 (gnat_to_gnu): Likewise.
2115 (process_freeze_entity): Likewise.
2116 (process_type): Likewise.
2117 (add_stmt_with_node): Adjust for renaming.
2118 * gcc-interface/utils.c (gnat_pushdecl): Adjust for renaming.
2119 (renaming_from_generic_instantiation_p): Rename to...
2120 (renaming_from_instantiation_p): ...this. Use inline predicate.
2121 (pad_type_hasher::keep_cache_entry): Fold.
2123 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2125 * gcc-interface/trans.c (adjust_for_implicit_deref): New function.
2126 (gnat_to_gnu) <N_Explicit_Dereference>: Translate result type first.
2127 (N_Indexed_Component): Invoke adjust_for_implicit_deref on the prefix.
2128 (N_Slice): Likewise.
2129 (N_Selected_Component): Likewise. Do not try again to translate it.
2130 (N_Free_Statement): Invoke adjust_for_implicit_deref on the expression.
2132 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2134 * repinfo.ads: Document new treatment of dynamic values.
2135 (TCode): Bump upper bound to 29.
2136 (Dynamic_Val): New constant set to 29.
2137 * repinfo.adb (Print_Expr) <Dynamic_Val>: New case.
2138 (Rep_Value) <Dynamic_Val>: Likewise.
2139 * repinfo.h (Dynamic_Val): New macro.
2140 * gcc-interface/decl.c (annotate_value): Tidy up and cache result for
2142 <INTEGER_CST>: Set TCODE instead of recursing.
2143 <COMPONENT_REF>: Set TCODE instead of calling Create_Node manually.
2144 <VAR_DECL>: New case.
2145 <MULT_EXPR, PLUS_EXPR>: Fold conversions into inner operations.
2146 <BIT_AND_EXPR>: Adjust.
2147 <CALL_EXPR>: Do not fall through.
2149 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2151 * gcc-interface/trans.c (Call_to_gnu): If this is a function call and
2152 there is no target, do not create a temporary for the return value for
2153 an allocator either.
2155 2017-09-05 Eric Botcazou <ebotcazou@adacore.com>
2157 * gcc-interface/trans.c (pos_to_constructor): Skip conversions to an
2158 unconstrained array type.
2160 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2161 Alan Hayward <alan.hayward@arm.com>
2162 David Sherwood <david.sherwood@arm.com>
2164 * gcc-interface/decl.c (validate_size): Use NARROWEST_INT_MODE
2165 instead of GET_CLASS_NARROWEST_MODE (MODE_INT).
2167 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2168 Alan Hayward <alan.hayward@arm.com>
2169 David Sherwood <david.sherwood@arm.com>
2171 * gcc-interface/decl.c (check_ok_for_atomic_type): Use
2172 is_a <scalar_int_mode>.
2173 * gcc-interface/trans.c (Pragma_to_gnu): Likewise.
2174 * gcc-interface/utils.c (gnat_type_for_mode): Likewise.
2176 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2177 Alan Hayward <alan.hayward@arm.com>
2178 David Sherwood <david.sherwood@arm.com>
2180 * gcc-interface/decl.c (gnat_to_gnu_entity): Use int_mode_for_size
2181 instead of mode_for_size.
2182 (gnat_to_gnu_subprog_type): Likewise.
2183 * gcc-interface/utils.c (make_type_from_size): Likewise.
2185 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2186 Alan Hayward <alan.hayward@arm.com>
2187 David Sherwood <david.sherwood@arm.com>
2189 * gcc-interface/misc.c (fp_prec_to_size): Use opt_scalar_float_mode.
2190 (fp_size_to_prec): Likewise.
2192 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2193 Alan Hayward <alan.hayward@arm.com>
2194 David Sherwood <david.sherwood@arm.com>
2196 * gcc-interface/utils.c (gnat_type_for_mode): Use is_a
2197 <scalar_float_mode> instead of SCALAR_FLOAT_MODE_P.
2199 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2200 Alan Hayward <alan.hayward@arm.com>
2201 David Sherwood <david.sherwood@arm.com>
2203 * gcc-interface/decl.c (validate_size): Update use of
2204 GET_MODE_WIDER_MODE, forcing a wider mode to exist.
2206 2017-08-30 Richard Sandiford <richard.sandiford@linaro.org>
2207 Alan Hayward <alan.hayward@arm.com>
2208 David Sherwood <david.sherwood@arm.com>
2210 * gcc-interface/misc.c (fp_prec_to_size): Use new mode iterators.
2211 (fp_size_to_prec): Likewise.
2213 2017-08-29 Martin Liska <mliska@suse.cz>
2216 * gcc-interface/trans.c (Pragma_to_gnu): Set argument to NULL.
2218 2017-08-08 Martin Liska <mliska@suse.cz>
2220 * gcc-interface/trans.c: Include header files.
2222 2017-07-29 Jakub Jelinek <jakub@redhat.com>
2224 * gcc-interface/utils.c (gnat_write_global_declarations): Pass false
2225 as new argument to the imported_module_or_decl debug hook.
2227 2017-07-25 Javier Miranda <miranda@adacore.com>
2229 * checks.adb (Apply_Divide_Checks): Ensure that operands are not
2232 2017-07-19 Jakub Jelinek <jakub@redhat.com>
2234 * gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE,
2235 TYPE_GCC_MIN_VALUE): Use TYPE_MIN_VALUE_RAW instead of TYPE_MINVAL.
2236 (TYPE_GCC_MAX_VALUE): Use TYPE_MAX_VALUE_RAW instead of TYPE_MAXVAL.
2238 2017-07-18 Mike Frysinger <vapier@chromium.org>
2240 * gcc-interface/Makefile.in (../../gnatmake$(exeext)): Delete $(P).
2241 (../../gnatlink$(exeext)): Likewise.
2243 2017-07-15 John Paul Adrian Glaubitz <glaubitz@physik.fu-berlin.de>
2246 * system-linux-m68k.ads: Add pragma No_Elaboration_Code_All.
2247 (Backend_Overflow_Checks): Set to True.
2249 2017-06-23 Jakub Jelinek <jakub@redhat.com>
2251 * gcc-interface/trans.c (gnat_to_gnu): Initialize sync to false.
2253 2017-06-21 Pierre-Marie de Rodat <derodat@adacore.com>
2255 * gcc-interface/ada-tree.h (DECL_FUNCTION_IS_DEF): Update copyright
2257 * gcc-interface/trans.c (Subprogram_Body_to_gnu): Tag the subprogram
2259 (Compilation_Unit_to_gnu): Tag the elaboration procedure as a
2261 * gcc-interface/decl.c (gnat_to_gnu_entity): Tag declarations of
2262 imported subprograms for the current compilation unit as
2263 definitions. Disable debug info for references to variables.
2264 * gcc-interface/gigi.h (create_subprog_decl): Update declaration.
2265 * gcc-interface/utils.c (gnat_pushdecl): Add external DECLs that are
2266 not built-in functions to their binding scope.
2267 (create_subprog_decl): Add a DEFINITION parameter. If it is true, tag
2268 the function as a definition. Update all callers.
2269 (gnat_write_global_declarations): Emit debug info for imported
2270 functions. Filter out external variables for which debug info
2273 2017-06-15 Nicolas Boulenguez <nicolas.boulenguez@free.fr>
2276 * gcc-interface/Makefile.in (x86 kfreebsd): Adjust system.ads setting.
2277 (i[3456]86-pc-gnu): Likewise.
2278 (x86_64 kfreebsd): Likewise.
2280 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
2283 * exp_ch3.adb (Make_Predefined_Primitive_Specs): Use Positive index.
2285 2017-06-12 Eric Botcazou <ebotcazou@adacore.com>
2288 * s-interr-hwint.adb: Reinstate.
2289 * gcc-interface/Makefile.in (RTEMS): Use it again.
2291 2017-06-08 Olivier Hainque <hainque@adacore.com>
2293 * vx_crtbegin_auto.c: Update year in copyright notice.
2294 * vx_crtbegin.c: Likewise.
2295 * vx_crtbegin.inc: Likewise.
2296 * vx_crtend.c: Likewise.
2298 2017-06-07 Sebastian Huber <sebastian.huber@embedded-brains.de>
2300 * Makefile.in (rtems): Use TLS implementation for s-tpopsp.adb.
2301 * s-tpopsp-rtems.adb: Delete.
2303 2017-06-02 Olivier Hainque <hainque@adacore.com>
2305 * vx_crtbegin_auto.c: New file.
2306 * vx_crtbegin.c: New file.
2307 * vx_crtbegin.inc: New file.
2308 * vx_crtend.c: New file.
2310 2017-05-25 Jonathan Wakely <jwakely@redhat.com>
2312 * gcc-interface/utils2.c (compare_elmt_bitpos): Remove redundant
2313 const qualifiers that cause -Wignored-qualifiers warnings.
2315 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
2317 * gcc-interface/decl.c (gnat_to_gnu_entity): Skip regular processing
2318 for Itypes that are E_Access_Subtype.
2319 <E_Access_Subtype>: Use the DECL of the base type directly.
2321 2017-05-22 Ed Schonberg <schonberg@adacore.com>
2322 Eric Botcazou <ebotcazou@adacore.com>
2324 * sem_ch4.adb (Analyze_Call): In Ada2012 an incomplete type from a
2325 limited view may appear in the profile of a function, and a call to
2326 that function in another unit in which the full view is available must
2327 use this full view to spurious type errors at the point of call.
2328 * inline.adb (Analyze_Inlined_Bodies): Remove restriction on loading
2329 of parent body with a with clause for the main unit.
2330 * gcc-interface/decl.c (defer_limited_with_list): Document new usage.
2331 (gnat_to_gnu_entity) <E_Access_Type>: Handle completed Taft Amendment
2332 types declared in external units like types from limited with clauses.
2333 Adjust final processing of defer_limited_with_list accordingly.
2334 * gcc-interface/trans.c (gnat_to_gnu) < N_Selected_Component>: Try
2335 again to translate the prefix after the field if it is incomplete.
2337 2017-05-22 Eric Botcazou <ebotcazou@adacore.com>
2339 * gcc-interface/decl.c (gnat_to_gnu_field): Do not enforce strict
2340 alignment for simple volatile fields and remove associated errors.
2342 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2344 * gcc-interface/gigi.h (get_elaboration_procedure): Delete.
2345 * gcc-interface/trans.c (get_elaboration_procedure): Make static.
2347 2017-05-15 Pierre-Marie de Rodat <derodat@adacore.com>
2349 * gcc-interface/utils.c (can_materialize_object_renaming_p):
2350 Synchronize with GNAT's Exp_Dbug.Debug_Renaming_Declaration:
2351 process Original_Node instead of expanded names.
2353 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2355 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Only apply the
2356 addressability check in the constrained case.
2358 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2360 * gcc-interface/trans.c (Identifier_to_gnu): Also accept incomplete
2361 types not coming from a limited context.
2363 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2365 * gcc-interface/trans.c (Compilation_Unit_to_gnu): Skip subprograms on
2366 the inlined list that are not public.
2367 * gcc-interface/utils.c (create_subprog_decl): Clear TREE_PUBLIC if
2368 there is a pragma Inline_Always on the subprogram.
2370 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2372 * gcc-interface/trans.c (gnat_to_gnu) <N_Aggregate>: Fix formatting.
2373 <N_Allocator>: Use properly typed constants.
2374 (extract_values): Move around.
2375 (pos_to_constructor): Minor tweaks.
2376 (Sloc_to_locus): Fix formatting.
2377 * gcc-interface/utils.c (process_deferred_decl_context): Minor tweaks.
2378 * gcc-interface/gigi.h (MARK_VISITED): Remove blank line.
2379 (Gigi_Equivalent_Type): Adjust head comment.
2380 * gcc-interface/decl.c (Gigi_Equivalent_Type): Likewise.
2382 2017-05-15 Eric Botcazou <ebotcazou@adacore.com>
2384 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: When there
2385 is a representation clause on an extension, propagate the alignment of
2386 the parent type only if the platform requires strict alignment.
2388 2017-05-12 Eric Botcazou <ebotcazou@adacore.com>
2390 * system-linux-arm.ads (Memory_Size): Use Long_Integer'Size
2391 instead of Word_Size.
2394 2017-03-28 Andreas Schwab <schwab@suse.de>
2397 * system-linux-aarch64-ilp32.ads: New file.
2398 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
2399 from LIBGNAT_TARGET_PAIRS.
2400 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
2401 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
2402 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
2403 or -mabi=ilp32, resp.
2405 2017-05-10 H.J. Lu <hongjiu.lu@intel.com>
2408 * system-linux-x86.ads (Memory_Size): Use Long_Integer'Size
2409 instead of Word_Size.
2411 2017-05-10 Bernd Edlinger <bernd.edlinger@hotmail.de>
2413 * raise-gcc.c (exception_class_eq): Make ec parameter const.
2415 2017-05-02 Richard Biener <rguenther@suse.de>
2417 * gcc-interface/misc.c (gnat_post_options): Do not set
2420 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2422 * gcc-interface/trans.c (assoc_to_constructor): Make sure
2423 Corresponding_Discriminant is only called on discriminants.
2424 Skip the saving of the result only for them.
2425 (gnat_to_gnu) <N_Selected_Component>: Likewise.
2426 <N_Unchecked_Type_Conversion>: Translate the result type first.
2427 (gigi): Set TREE_NOTHROW on Begin_Handler.
2428 (stmt_list_cannot_raise_p): New predicate.
2429 (Exception_Handler_to_gnu_gcc): Emit a simple final call instead of
2430 a cleanup if the statements of the handler cannot raise.
2431 (process_freeze_entity): Use Is_Record_Type.
2432 (process_type): Likewise.
2434 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2436 * einfo.ads (Corresponding_Record_Component): New alias
2437 for Node21 used for E_Component and E_Discriminant.
2438 * einfo.adb (Corresponding_Record_Component): New function.
2439 (Set_Corresponding_Record_Component): New procedure.
2440 (Write_Field21_Name): Handle Corresponding_Record_Component.
2441 * sem_ch3.adb (Inherit_Component): Set
2442 Corresponding_Record_Component for every component in
2443 the untagged case. Clear it afterwards for non-girder
2445 * gcc-interface/decl.c (gnat_to_gnu_entity)
2446 <E_Record_Type>: For a derived untagged type with discriminants
2447 and constraints, apply the constraints to the layout of the
2448 parent type to deduce the layout.
2449 (field_is_aliased): Delete.
2450 (components_to_record): Test DECL_ALIASED_P directly.
2451 (annotate_rep): Check that fields are present except for
2453 (create_field_decl_from): Add DEBUG_INFO_P
2454 parameter and pass it in recursive and other calls. Add guard
2455 for the manual CSE on the size.
2456 (is_stored_discriminant): New predicate.
2457 (copy_and_substitute_in_layout): Consider only
2458 stored discriminants and check that original fields are present
2459 in the old type. Deal with derived types. Adjust call to
2460 create_variant_part_from.
2462 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2464 * exp_ch6.adb (Expand_Call_Helper): When locating the
2465 accessibility entity created for an access parameter, handle
2466 properly a reference to a formal of an enclosing subprogram. if
2467 the reference appears in an inherited class-wide condition, it
2468 is the rewriting of the reference in the ancestor expression,
2469 but the accessibility entity must be that of the current formal.
2471 2017-05-02 Javier Miranda <miranda@adacore.com>
2473 * exp_ch4.adb (Expand_Non_Binary_Modular_Op): New subprogram.
2474 (Expand_N_Op_Add, Expand_N_Op_Divide, Expand_N_Op_Minus,
2475 Expand_N_Op_Multiply, Expand_N_Op_Or, Expand_N_Op_Subtract):
2476 Call Expand_Non_Binary_Modular_Op.
2478 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2480 * sem_ch3.adb (Build_Derived_Private_Type): If the parent type
2481 has discriminants, do not override the Stored_Constraint list of
2482 the full view of the derived type with that of the derived type.
2484 2017-05-02 Bob Duff <duff@adacore.com>
2486 * sem_attr.adb (Attribute_Enum_Rep): Disallow T'Enum_Rep.
2488 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
2490 * s-os_lib.ads: Minor typo fix.
2492 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
2494 * gnatls.adb: Merge and refactor code from Prj.Env and remove
2495 this deprecated dependency.
2497 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2499 * exp_util.ads: minor comment addition.
2501 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2503 * sem_ch3.adb (Build_Derived_Record_Type): Fix a few typos and
2504 pastos in part #3 of the head comment.
2506 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2508 * exp_ch3.adb (Freeze_Type): Do not generate an invariant
2509 procedure body for a local (sub)type declaration within a
2510 predicate function. Invariant checks do not apply to these, and
2511 the expansion of the procedure will happen in the wrong scope,
2512 leading to misplaced freeze nodes.
2514 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2516 * exp_util.adb (Insert_Library_Level_Action): Use proper scope
2517 to analyze generated actions. If the main unit is a body,
2518 the required scope is that of the corresponding unit declaration.
2520 2017-05-02 Arnaud Charlet <charlet@adacore.com>
2522 * einfo.adb (Declaration_Node): flip branches of
2523 an IF statement to avoid repeated negations in its condition;
2524 no change in semantics, only to improve readability.
2526 2017-05-02 Arnaud Charlet <charlet@adacore.com>
2528 * sem_case.adb: Remove extra spaces in parameter declarations.
2530 2017-05-02 Justin Squirek <squirek@adacore.com>
2532 * usage.adb: Replace space with hyphen ("run time" -> "run-time")
2533 in usage line for new -gnatwE switch.
2535 2017-05-02 Claire Dross <dross@adacore.com>
2537 * a-cofuve.ads (Remove): Remove unnecessary
2538 conditions in precondition.
2540 2017-05-02 Vasiliy Fofanov <fofanov@adacore.com>
2542 * a-stream.ads, exp_imgv.adb, sem_ch10.adb,
2543 sem_attr.adb, s-finmas.ads, osint.adb: Minor typo fix.
2545 2017-05-02 Justin Squirek <squirek@adacore.com>
2547 * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
2548 alternative expression.
2549 * sem_res.adb (Resolve_Case_Expression): Ditto.
2551 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2553 * exp_disp.adb (Set_All_DT_Position, In_Predef_Prim_DT):
2554 Refine predicate for the case where the primitive operation
2555 is a renaming of equality. An overriding operation that is
2556 a user-defined renaming of predefined equality inherits its
2557 slot from the overridden operation. Otherwise it is treated
2558 as a predefined op and occupies the same predefined slot as
2559 equality. A call to it is transformed into a call to its alias,
2560 which is the predefined equality. A dispatching call thus uses
2561 the proper slot if operation is further inherited and called
2562 with class-wide arguments.
2564 2017-05-02 Justin Squirek <squirek@adacore.com>
2566 * errout.adb (Set_Msg_Text): Add a case to switch the message
2567 type when the character '[' is detected signifying a warning
2568 about a run-time exception.
2569 * opt.ads Add a new Warning_Mode value for new switch
2570 * switch-b.adb (Scan_Binder_Switches): Add case for the binder
2571 to handle new warning mode
2572 * usage.adb (Usage): Add usage entry for -gnatwE
2573 * warnsw.adb (Set_Warning_Switch): Add case for the new switch
2575 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2577 * sem_prag.adb (Process_Conversion): Reject an intrinsic operator
2578 declaration that operates on some fixed point type.
2580 2017-05-02 Justin Squirek <squirek@adacore.com>
2582 * a-crbtgo.adb, s-taasde.adb: Remove unused use-type clauses.
2584 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
2586 * sem_ch6.adb (Analyze_Null_Procedure): Revert previous change.
2588 2017-05-02 Justin Squirek <squirek@adacore.com>
2590 * sem_ch4.adb (Analyze_Case_Expression): Add check for valid
2591 expression (Analyze_If_Expression): Add check for valid condition
2592 * sem_eval.adb (Eval_Case_Expression): Add check for error posted
2594 * sem_res.adb (Resolve_If_Expression): Add check for valid
2595 condition and then-expression.
2597 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2599 * exp_ch3.adb (Build_Initialization_Call): Generate a null
2600 statement if the initialization call is a null procedure, as
2601 can happen with a controlled type with no explicit Initialize
2602 procedure, or an array of such.
2603 * exp_ch7.adb (Process_Object_Declaration): For a type with
2604 controlled components that has a trivial Initialize procedure,
2605 insert declaration for finalization counter after object
2607 (Make_Deep_Array_Body, Build_Initialize_statements): Do not create
2608 finalization block and attendant declarations if component has
2609 a trivial Initialize procedure.
2610 (Make_Init_Call): Do not generate a call if controlled type has
2611 a trivial Initialize procedure.
2613 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2615 * g-forstr.ads (Data): Move Format component last.
2616 * g-forstr.adb ("+"): Adjust for above change.
2617 * g-rewdat.ads (Buffer): Move Buffer, Current, Pattern and Value last.
2618 * g-sechas.ads (Context): Move Key last.
2619 * g-socket.ads (Service_Entry_Type): Move Aliases last.
2620 * s-fileio.adb (Temp_File_Record): Move Name last.
2621 * s-regexp.adb (Regexp_Value): Move Case_Sensitive last.
2622 * xr_tabls.ads (Project_File): Move Src_Dir and Obj_Dir last.
2624 2017-05-02 Jerome Lambourg <lambourg@adacore.com>
2626 * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: Remove the -nognarl
2627 switch introduced recently. finally not needed.
2629 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
2631 * sem_ch6.adb (Analyze_Null_Procedure): Set the
2632 Corresponding_Body link for a null procedure declaration.
2634 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2636 * atree.h (Flag290): Add missing terminating parenthesis.
2637 * einfo.adb (Is_Class_Wide_Clone): Use Flag290.
2638 (Set_Is_Class_Wide_Clone): Likewise.
2639 * einfo.ads (Is_Class_Wide_Clone): Likewise.
2641 2017-05-02 Gary Dismukes <dismukes@adacore.com>
2643 * checks.ads (Null_Exclusion_Static_Checks): Add Boolean
2644 parameter Array_Comp to indicate the case of an array object
2645 with null-excluding components.
2646 * checks.adb (Null_Exclusion_Static_Checks):
2647 Call Compile_Time_Constraint_Error instead of
2648 Apply_Compile_Time_Constraint_Error in the component case. Also
2649 call that when Array_Comp is True, with an appropriate warning for
2650 the array component case. Only create an explicit initialization
2651 by null in the case of an object of a null-excluding access type
2652 (and no longer do that in the component case).
2653 * sem_ch3.adb (Check_Component): Add a Boolean parameter
2654 Array_Comp defaulted to False. Pass Empty for the Comp
2655 actual when calling Null_Exclusion_Static_Checks in the case
2656 where Comp_Decl matches Object_Decl, because we don't have a
2657 component in that case. In the case of an object or component
2658 of an array type, pass True for Array_Comp on the recursive call
2661 2017-05-02 Bob Duff <duff@adacore.com>
2663 * s-taprop-linux.adb (Prio_To_Linux_Prio): New function to correctly
2664 compute the linux priority from the Ada priority. Call this everywhere
2665 required. In particular, the previous version was not doing this
2666 computation when setting the ceiling priority in various places. It
2667 was just converting to C.int, which results in a ceiling that is off
2670 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2672 * sem_ch3.adb: Comment predicate inheritance.
2674 2017-05-02 Tristan Gingold <gingold@adacore.com>
2676 * s-trasym.ads: Add comment.
2678 2017-05-02 Bob Duff <duff@adacore.com>
2680 * sem_elab.adb, sem_elab.ads: Minor comment fixes.
2681 * sem_ch4.adb: Minor reformatting.
2682 * s-taprop-linux.adb, s-taspri-posix.ads: Code refactoring.
2683 * s-taspri-posix-noaltstack.ads: Minor refactoring.
2684 * sinput.ads: Minor typo fix.
2686 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2688 * exp_ch9.adb (Discriminated_Size): Moved to sem_util.
2689 * sem_util.ads, sem_util.adb (Discriminated_Size): Predicate moved
2690 here from exp_ch9, to recognize objects whose creation requires
2691 dynamic allocation, so that the proper warning can be emitted
2692 when restriction No_Implicit_Heap_Allocation is in effect.
2693 * sem_ch3.adb (Analyze_Object_Declaration): Use Discriminated_Size
2694 to emit proper warning when an object that requires dynamic
2695 allocation is declared.
2697 2017-05-02 Tristan Gingold <gingold@adacore.com>
2699 * s-trasym.ads, s-trasym.adb (Enable_Cache): New.
2701 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2703 * sem_ch4.adb (Find_Equality_Types, Try_One_Interp): The same relaxed
2704 visibility rules for equality operators that apply within an
2705 instantiation apply within an inlined body.
2706 * sem_type.adb (Add_One_Interp): ditto.
2708 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
2710 * sem_prag.adb (Analyze_Pragma): Forbid pragma Contract_Cases on null
2713 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2716 (Name_Assume, Name_Attribute_Definition, Name_Loop_Optimize,
2717 Name_No_Tagged_Streams): Move to regular pragmas. Add
2718 placeholders for Default_Scalar_Storage_Order, Dispatching_Domain,
2719 and Secondary_Stack_Size.
2720 (Pragma_Id): Move Pragma_Assume,
2721 Pragma_Attribute_Definition, Pragma_Loop_Optimize and
2722 Pragma_No_Tagged_Streams to second part.
2724 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
2726 * exp_attr.adb: Minor reformatting.
2728 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2730 * sem_ch4.adb (Analyze_Selected_Component): Improve error
2731 detection for illegal references to private components or
2732 operations of a protected type in the body of the type.
2734 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2736 * opt.ads: Add missing GNAT markers in comments.
2737 * opt.adb (Set_Opt_Config_Switches): Do not override earlier
2738 settings of Optimize_Alignment at the end.
2740 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
2742 * checks.adb (Apply_Constraint_Check): Do not apply
2743 a discriminant check when the associated type is a constrained
2744 subtype created for an unconstrained nominal type.
2745 * exp_attr.adb: Minor reformatting.
2747 2017-05-02 Bob Duff <duff@adacore.com>
2749 * sem_ch3.adb (OK_For_Limited_Init_In_05): Handle correctly
2750 the N_Raise_Expression case.
2751 * sem_ch6.adb (Check_Limited_Return): Minor: clarify comment,
2754 2017-05-02 Yannick Moy <moy@adacore.com>
2756 * exp_ch4.adb (Expand_N_Op_Ne): Do not bump parenthese level and
2757 optimize length comparison in GNATprove mode.
2758 * exp_spark.adb (Expand_SPARK_Op_Ne): New function to rewrite
2759 operator /= into negation of operator = when needed.
2760 (Expand_SPARK): Call new
2761 function to expand operator /=.
2763 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2765 * exp_fixd.adb (Expand_Divide_Fixed_By_Fixed_Giving_Fixed):
2766 Simplify the expression for a fixed-fixed division to remove
2767 divisions by constants whenever possible, as an optimization
2768 for restricted targets.
2770 2017-05-02 Hristian Kirtchev <kirtchev@adacore.com>
2772 * checks.adb, sem_ch3.adb, sem_ch6.adb: Minor reformatting.
2774 2017-05-02 Bob Duff <duff@adacore.com>
2776 * exp_attr.adb (Callable, Identity, Terminated): Use Find_Prim_Op
2777 to find primitive ops, instead of using an Identifier that will
2778 later be looked up. This is necessary because these ops are not
2779 necessarily visible at all places where we need to call them.
2780 * exp_util.ads: Minor comment fix.
2782 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2784 * sem_ch6.adb (Fully_Conformant_Expressions): Two entity
2785 references are fully conformant if they are both expansions
2786 of the discriminant of a protected type, within one of the
2787 protected operations. One occurrence may be expanded into a
2788 constant declaration while the other is an input parameter to
2789 the corresponding generated subprogram.
2791 2017-05-02 Justin Squirek <squirek@adacore.com>
2793 * sem_ch3.adb (Check_For_Null_Excluding_Components): Created for
2794 recursivly searching composite-types for null-excluding access
2795 types and verifying them.
2796 (Analyze_Object_Declaration): Add a
2797 call to Check_Null_Excluding_Components for static verification
2798 of non-initialized objects.
2799 * checks.adb, checks.ads (Null_Exclusion_Static_Checks): Added
2800 a parameter for a composite-type's component and an extra case
2801 for printing component information.
2803 2017-05-02 Yannick Moy <moy@adacore.com>
2805 * sem_ch10.adb (Analyze_Subunit): Take
2806 configuration pragma into account when restoring appropriate
2807 pragma for analysis of subunit.
2809 2017-05-02 Justin Squirek <squirek@adacore.com>
2811 * s-tasren.adb, s-tasini.adb, s-taprop-linux.adb,
2812 s-mudido-affinity.adb,, a-exetim-posix.adb, a-direio.adb,
2813 g-socket.adb, s-taenca.adb, s-fileio.adb: Remove unused use-type
2814 clauses from the runtime.
2816 2017-05-02 Eric Botcazou <ebotcazou@adacore.com>
2818 * freeze.adb (Check_Component_Storage_Order): Do not treat bit-packed
2819 array components specially.
2821 2017-05-02 Ed Schonberg <schonberg@adacore.com>
2823 * sem_ch8.adb (Premature_Usage): If the premature usage of
2824 an entity is as the expression in its own object decaration,
2825 rewrite the reference as Any_Id to prevent cascaded errors or
2826 compiler loops when such an entity is used in an address clause.
2828 2017-05-01 Eric Botcazou <ebotcazou@adacore.com>
2830 * gcc-interface/decl.c (components_to_record): Add missing guard.
2832 2017-05-01 Eric Botcazou <ebotcazou@adacore.com>
2834 * gcc-interface/decl.c (components_to_record): Add more comments.
2835 Put back pending fields onto the regular list if the misalignment
2836 happens to cancel itself.
2838 2017-04-28 Ed Schonberg <schonberg@adacore.com>
2840 * sem_ch4.adb (Complete_Object_Operation): When rewriting the
2841 controlling actual in a prefixed call, preserve the original node
2842 information if the prefix itself has been rewritten, for ASIS use.
2844 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
2846 * exp_ch6.adb (Insert_Post_Call_Actions):
2847 Code clean up. Insert the post-call actions after an enclosing
2848 procedure call when N denotes a function call and appears as an
2849 actual parameter in the procedure call.
2851 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
2853 * freeze.adb (Check_Component_Storage_Order): If there is a clause
2854 for the component, also reject the attribute if the component
2855 doesn't end on a byte boundary and its scalar storage order is
2856 different from that of the enclosing record type.
2858 2017-04-28 Javier Miranda <miranda@adacore.com>
2860 * atree.ads (Info_Messages): Removed.
2861 (Warning_Info_Messages): New counter.
2862 (Report_Info_Messages): New counter.
2863 * err_vars.ads Update documentation.
2864 * errout.adb (Delete_Warning_And_Continuations): Update
2865 Info_Message occurrences.
2866 (Error_Msg_Internal): Update Info_Message occurrences.
2867 (Delete_Warning): Update Info_Message occurrences.
2868 (Write_Error_Summary): Update Info_Message occurrences.
2869 (Output_Messages): Update Info_Message occurrences.
2870 (To_Be_Removed): Update Info_Message occurrences.
2871 (Reset_Warnings): Update Info_Message occurrences.
2872 * errutil.adb (Error_Msg): Update Info_Message occurrences.
2873 (Finalize): Update Info_Message occurrences.
2874 (Initialize): Update Info_Message occurrences.
2875 * erroutc.adb (Delete_Msg): Update Info_Message occurrences.
2876 (Compilation_Errors): Update Info_Message_Occurences.
2878 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
2880 * exp_ch3.adb (Build_Init_Statements): Likewise on Nam.
2881 * freeze.adb (Check_Component_Storage_Order): And on Comp_Byte_Aligned.
2882 * sem_aggr.adb (Resolve_Record_Aggregate): Initialize Box_Node.
2883 * sem_attr.adb (Loop_Entry): Initialize Encl_Loop.
2884 * sem_ch12.adb (Build_Operator_Wrapper): Add pragma Warnings on Expr.
2885 * sem_ch13.adb (Validate_Address_Clauses): Initialize Y_Alignment and
2887 * sem_eval.adb (Why_Not_Static): Initialize Typ.
2888 * sem_prag.adb (Analyze_Pragma): Add pragma Warnings on Str.
2890 2017-04-28 Bob Duff <duff@adacore.com>
2892 * sem_util.ads, sem_util.adb (Might_Raise): New function
2893 that replaces Is_Exception_Safe, but has the opposite
2894 sense. Is_Exception_Safe was missing various cases -- calls inside
2895 a pragma Debug, calls inside an 'if' or assignment statement,
2896 etc. Might_Raise now walks the entire subtree looking for things
2898 * exp_ch9.adb (Is_Exception_Safe): Remove.
2899 (Build_Protected_Subprogram_Body): Replace call to
2900 Is_Exception_Safe with "not Might_Raise". Misc cleanup (use
2901 constants where possible).
2902 * exp_ch7.adb: Rename Is_Protected_Body -->
2903 Is_Protected_Subp_Body. A protected_body is something different
2906 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
2908 * inline.adb (Expand_Inlined_Call): Initialize Targ1 variable.
2909 * par-ch3.adb (P_Component_Items): Initialize Decl_Node variable.
2910 (P_Discrete_Choice_List): Initialize Expr_Node variable.
2911 * par-ch9.adb (P_Task): Initialize Aspect_Sloc variable.
2912 (P_Protected): Likewise.
2913 * sem_case.adb (Check_Duplicates):
2914 Add pragma Warnings on variable.
2915 * sem_ch12.adb (Preanalyze_Actuals): Initialize Vis variable.
2916 * sem_ch4.adb (List_Operand_Interps): Add pragma Warnings on variable.
2917 * sem_ch5.adb (Analyze_Assignment): Initialize Save_Full_Analysis.
2918 (Analyze_Exit_Statement): Initialize Scope_Id variable.
2919 (Analyze_Iterator_Specification): Initialize Bas variable.
2920 * sem_ch9.adb (Allows_Lock_Free_Implementation): Initialize
2921 Error_Count (Satisfies_Lock_Free_Requirements): Likewise.
2922 (Analyze_Accept_Statement): Initialize Task_Nam.
2924 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
2926 * checks.adb (Install_Primitive_Elaboration_Check):
2927 Do not generate an elaboration check if all checks have been
2930 2017-04-28 Ed Schonberg <schonberg@adacore.com>
2932 * sem_ch13.adb (Analyze_Aspect_Specifications, case
2933 Interrupt_Handler and Attach_Handler): Generate reference
2934 to protected operation to prevent spurious warnings about
2935 unreferenced entities. Previous scheme failed with style checks
2938 2017-04-28 Ed Schonberg <schonberg@adacore.com>
2940 * sem_prag.adb (Relocate_Pragmas_To_Body): A pragma Warnings
2941 that follows an expression function must not be relocated to
2942 the generated body, because it applies to the code that follows.
2944 2017-04-28 Gary Dismukes <dismukes@adacore.com>
2946 * sem_util.adb (Is_Dependent_Component_Of_Mutable_Object): Test
2947 Relaxed_RM_Semantics to avoid having CodePeer issue errors on
2948 code that might violate the more stringent checking for 'Access
2949 introduced in Ada 2005.
2951 2017-04-28 Arnaud Charlet <charlet@adacore.com>
2953 * a-cforse.adb: minor style fix in comment.
2955 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
2957 * exp_ch9.adb (Build_Lock_Free_Unprotected_Subprogram_Body): Also
2958 initialize Block_Decls variable.
2959 (Expand_Entry_Barrier): Add pragma Warnings on Func_Body variable.
2960 (Build_Dispatching_Requeue): Add pragma Warnings on Op variable.
2961 * exp_disp.adb (Expand_Interface_Actuals): Initialize
2962 Formal_DDT and Actual_DDT variables.
2963 (Expand_Interface_Thunk): Initialize Iface_Formal.
2964 (Make_DT): Initialize Size_Comp.
2965 (Make_Select_Specific_Data_Table): Initialize Decls.
2966 * exp_dist.adb (Add_RACW_Primitive_Declarations_And_Bodies):
2967 Also initialize more RPC_Receiver_* variables.
2968 (Build_To_Any_Function): Initialize Cstr_Formal.
2969 * exp_prag.adb (Expand_Pragma_Contract_Cases): Initialize Msg_Str.
2971 2017-04-28 Ed Schonberg <schonberg@adacore.com>
2973 * sem_ch6.adb (Freeze_Type_Refs): For an interface conversion
2974 node between access types, freeze the designated type as well,
2975 so that dispatch table pointers are created in the proper scope,
2976 and not in the constructed body of the expression function.
2978 2017-04-28 Bob Duff <duff@adacore.com>
2980 * alloc.ads (Nodes_Initial): Go back to previous value. The large
2981 value makes large compilations faster, but small compilations slower.
2983 2017-04-28 Arnaud Charlet <charlet@adacore.com>
2985 * sem_util.adb: minor typos in Is_Child_Or_Sibling.
2987 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
2989 * erroutc.adb (Compilation_Errors): Do not consider info messages
2990 as suitable warnings when warnings must be treated as errors.
2991 * sem_ch7.adb (Analyze_Package_Specification): Do not consider
2992 internally-generated packages when outputting completion
2994 * errout.adb (Output_Messages): Do not consider info messages as
2995 suitable warnings when warnings must be treated as errors.
2996 * errutil.adb (Finalize): Do not consider info messages as
2997 suitable warnings when warnings must be treated as errors.
2999 2017-04-28 Eric Botcazou <ebotcazou@adacore.com>
3001 * warnsw.ads: Minor fix for incorrect wording in comment.
3003 2017-04-28 Ed Schonberg <schonberg@adacore.com>
3005 * sem_res.adb (In_Instance_Code): New predicate in
3006 Valid_Conversion, to determine whether a type conversion appears
3007 as (or within) an actual for a formal object. Type conversions
3008 in instances are not rechecked in Valid_Conversion because
3009 visibility changes between generic location andi instance may
3010 lead to spurious errors, but conversions within an actual must be
3011 fully checked, and they are not fully resolved when pre-analyzing
3014 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3016 * exp_ch6.adb (Expand_N_Extended_Return_Statement): Use
3017 New_Copy_Tree instead of Relocate_Node as any subsequent copies
3018 of the relocated node will have mangled Parent pointers.
3019 * sem_util.adb (Build_NCT_Hash_Tables): Reset both hash
3020 tables used in conjunction with entity and itype replication.
3021 (Visit_Entity): Rewrite the restriction on which entities
3022 require duplication. The restriction now includes all types.
3024 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3026 * a-cofuse.ads, a-cfdlli.ads, a-cfhase.adb, a-cfhase.ads, a-cfinve.adb,
3027 a-cfinve.ads, a-cforma.adb, a-cforma.ads, a-cofuma.adb, a-cofuma.ads,
3028 a-cfhama.adb, a-cfhama.ads, a-cforse.adb: Minor reformatting and code
3031 2017-04-28 Hristian Kirtchev <kirtchev@adacore.com>
3033 * exp_util.adb, g-dyntab.adb, par-ch4.adb, sem_util.adb, sem_attr.adb,
3034 gnat1drv.adb, exp_disp.adb, namet.adb, alloc.ads: Minor reformatting.
3036 2017-04-28 Gary Dismukes <dismukes@adacore.com>
3038 * exp_util.adb: Minor reformatting.
3040 2017-04-28 Ed Schonberg <schonberg@adacore.com>
3042 * sem_ch4.adb: Fix copy/pasto.
3044 2017-04-27 Tristan Gingold <gingold@adacore.com>
3046 * gcc-interface/Make-lang.in: Define EH_MECHANISM while building
3047 raise-gcc.c. Fix include search path for raise-gcc.c
3049 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
3051 * fe.h (Warn_On_Questionable_Layout): Declare.
3052 * warnsw.ads (Warn_On_Record_Holes): Move down.
3053 (Warn_On_Questionable_Layout): New boolean variable.
3054 (Warning_Record): Add Warn_On_Questionable_Layout field.
3055 * warnsw.adb (All_Warnings): Set Warn_On_Questionable_Layout.
3056 (Restore_Warnings): Likewise.
3057 (Save_Warnings): Likewise.
3058 (Set_Dot_Warning_Switch): Handle 'q' and 'Q' letters.
3059 * gcc-interface/decl.c (gnat_to_gnu_entity): Adjust call to
3060 components_to_record.
3061 (gnu_field_to_gnat): New function.
3062 (warn_on_field_placement): Likewise.
3063 (components_to_record): Add GNAT_RECORD_TYPE and remove REORDER
3064 parameters. Rename local variables and adjust recursive call.
3065 Rework final scan of the field list and implement warnings on the
3066 problematic placement of specific sorts of fields.
3068 2017-04-27 Bob Duff <duff@adacore.com>
3070 * errout.adb, exp_aggr.adb, exp_attr.adb, exp_code.adb, fname.adb,
3071 * fname.ads, freeze.adb, inline.adb, lib.adb, lib.ads, lib-list.adb,
3072 * lib-load.adb, lib-writ.adb, par.adb, restrict.adb, rtsfind.adb,
3073 * sem.adb, sem_cat.adb, sem_ch10.adb, sem_ch12.adb, sem_ch3.adb,
3074 * sem_ch4.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
3075 * sem_intr.adb, sem_res.adb, sem_util.adb, sem_warn.adb, sprint.adb:
3076 For efficiency, cache results of Is_Internal_File_Name and
3077 Is_Predefined_File_Name in the Units table. This avoids a lot
3078 of repeated text processing.
3080 2017-04-27 Emmanuel Briot <briot@adacore.com>
3082 * g-comlin.adb (Sort_Sections): remove useless test.
3084 2017-04-27 Claire Dross <dross@adacore.com>
3086 * a-cfhase.adb, a-cfhase.ads (=): Generic parameter removed to
3087 allow the use of regular equality over elements in contracts.
3088 (Formal_Model): Ghost package containing model functions that are
3089 used in subprogram contracts.
3090 (Current_To_Last): Removed, model functions should be used instead.
3091 (First_To_Previous): Removed, model functions should be used instead.
3092 (Strict_Equal): Removed, model functions should be used instead.
3093 (No_Overlap): Removed, model functions should be used instead.
3094 (Equivalent_Keys): Functions over cursors are removed. They were
3095 awkward with explicit container parameters.
3096 * a-cforse.adb, a-cforse.ads (=): Generic parameter removed to
3097 allow the use of regular equality over elements in contracts.
3098 (Formal_Model): Ghost package containing model functions that
3099 are used in subprogram contracts.
3100 (Current_To_Last): Removed, model functions should be used instead.
3101 (First_To_Previous): Removed, model functions should be used instead.
3102 (Strict_Equal): Removed, model functions should be used instead.
3103 (No_Overlap): Removed, model functions should be used instead.
3105 2017-04-27 Yannick Moy <moy@adacore.com>
3107 * gnat1drv.adb: Code cleanup.
3109 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3111 * exp_util.adb (Replace_Entity): The prefix of a 'Result
3112 attribute reference in a post- condition is the subprogram to
3113 which the condition applies. If the condition is inherited
3114 by a type extension, the prefix becomes a reference to the
3115 inherited operation, but there is no need to create a wrapper
3116 for this operation, because 'Result is expanded independently
3117 when elaborating the postconditions.
3119 2017-04-27 Bob Duff <duff@adacore.com>
3121 * sinput.adb: Minor code cleanup.
3122 * namet.adb (Append): Create faster versions of
3123 Append(String) and Append(Name_Id) by using slice assignment
3125 * sem_util.adb (In_Instance): Speed this up by removing
3126 unnecessary tests; Is_Generic_Instance is defined for all
3128 * sem_util.ads, sem_util.adb (In_Parameter_Specification):
3129 Remove unused function.
3130 * alloc.ads (Nodes_Initial): Use a much larger value, because
3131 the compiler was spending a lot of time copying the nodes table
3132 when it grows. This number was chosen in 1996, so is rather out
3133 of date with current memory sizes. Anyway, it's virtual memory.
3134 Get rid of Orig_Nodes_...; use Node_... instead.
3135 * atree.adb (Lock): Do not release the Nodes tables; it's a
3137 Orig_Nodes_ ==> Nodes_
3138 * nlists.adb: Orig_Nodes_ ==> Nodes_
3139 * g-table.adb: Remove unused "with" clause.
3140 * g-table.ads, table.ads: Remove Big_Table_Type, which should
3141 not be used by clients.
3142 * g-dyntab.adb (Last_Allocated): New function
3143 to encapsulate T.P.Last_Allocated, which I'm thinking of changing.
3145 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3147 * sem_eval.adb (Subtypes_Statically_Compatible): Remove duplicated
3149 (Subtypes_Statically_Match): Remove duplicate check.
3150 * sem_prag.adb (Check_Arg_Is_External_Name): Remove duplicate check.
3152 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3154 * exp_aggr.adb (Replace_Type): Remove the special processing
3155 for selected components.
3156 * exp_attr.adb (Expand_N_Attribute_Reference): Merge the
3157 processing for attributes Fixed_Value and Integer_Value.
3158 * exp_util.adb (Side_Effect_Free): Merge the processing for
3159 qualified expressions, type conversions, and unchecked type
3161 * g-comlin.adb (Is_In_Config): Merge the processing for No_Space
3163 * par-ch3.adb (P_Declarative_Items): Merge the processing for
3164 tokens function, not, overriding, and procedure.
3165 * sem_ch6.adb (Fully_Conformant_Expressions): Merge the processing
3166 for qualified expressions, type conversions, and unchecked
3168 * sem_util.adb (Compile_Time_Constraint_Error): Merge the
3169 processing for Ada 83 and instances.
3170 (Object_Access_Level): Merge the processing for indexed components
3171 and selected components.
3172 * uname.adb (Add_Node_Name): Merge the processing for stubs.
3174 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3176 * checks.adb (Install_Primitive_Elaboration_Check):
3177 Do not generate the check when restriction No_Elaboration_Code
3180 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3182 * exp_disp.adb (Build_Class_Wide_Check): New subsidiary
3183 of Expand_Dispatching_Call. If the denoted subprogram has a
3184 class-wide precondition, this is the only precondition that
3185 applies to the call, rather that the class-wide preconditions
3186 that may apply to the body that is executed. (This is specified
3189 2017-04-27 Yannick Moy <moy@adacore.com>
3191 * gnat1drv.adb (Adjust_Global_Switches): Issue
3192 a warning in GNATprove mode if the runtime library does not
3193 support IEEE-754 floats.
3195 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3197 * sem_prag.adb (Inherit_Class_Wide_Pre): If the parent operation
3198 is itself inherited it does not carry any contract information,
3199 so examine its parent operation which is its Alias.
3201 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3203 * sem_attr.adb (Analyze_Attribute, case 'Image): In Ada2012 the
3204 prefix can be an object reference in which case Obj'Image (X)
3205 can only be interpreted as an indexing of the parameterless
3206 version of the attribute.
3207 * par-ch4.adb (P_Name): An attribute reference can be the prefix of
3208 an indexing or a slice operation if the attribute does not require
3209 parameters. In Ada2012 'Image also belongs in this category,
3210 and A'Image (lo .. hi) is legal and must be parsed as a slice.
3212 2017-04-27 Yannick Moy <moy@adacore.com>
3214 * exp_ch4.adb: Minor reformatting.
3215 * gnat1drv.adb (Adjust_Global_Switches): When in GNATprove mode,
3216 disable the CodePeer and C generation modes. Similar to the
3217 opposite actions done in CodePeer mode.
3219 2017-04-27 Yannick Moy <moy@adacore.com>
3221 * sem_res.adb: Remove duplicate code.
3222 * sem_attr.adb: Delete duplicate code.
3224 2017-04-27 Bob Duff <duff@adacore.com>
3226 * g-dyntab.adb: Reduce the amount of copying in
3227 Release. No need to copy items past Last.
3229 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3231 * checks.adb Add with and use clauses for Sem_Disp.
3232 (Install_Primitive_Elaboration_Check): New routine.
3233 * checks.ads (Install_Primitive_Elaboration_Check): New routine.
3234 * exp_attr.adb (Expand_N_Attribute_Reference): Clean up the
3235 processing of 'Elaborated.
3236 * exp_ch6.adb (Expand_N_Subprogram_Body): Install a primitive
3239 2017-04-27 Bob Duff <duff@adacore.com>
3241 * g-dyntab.ads, g-dyntab.adb, g-table.ads: Remove incorrect assertion.
3242 If the table grows and then shrinks back to empty, we won't necessarily
3243 point back to the empty array. Code cleanups.
3244 * sinput.ads: Add 'Base to Size clause to match the declared
3247 2017-04-27 Claire Dross <dross@adacore.com>
3249 * a-cforma.adb, a-cforma.ads (=): Generic parameter removed to
3250 allow the use of regular equality over elements in contracts.
3251 (Formal_Model): Ghost package containing model functions that
3252 are used in subprogram contracts.
3253 (Current_To_Last): Removed, model functions should be used instead.
3254 (First_To_Previous): Removed, model functions should be used instead.
3255 (Strict_Equal): Removed, model functions should be used instead.
3256 (No_Overlap): Removed, model functions should be used instead.
3257 * a-cofuma.adb, a-cofuma.ads (Enable_Handling_Of_Equivalence)
3258 Boolean generic parameter to disable contracts for equivalence
3260 (Witness): Create a witness of a key that is used for handling of
3261 equivalence between keys.
3262 (Has_Witness): Check whether a witness is contained in a map.
3263 (W_Get): Get the element associated to a witness.
3264 (Lift_Equivalent_Keys): Removed, equivalence between keys is handled
3266 * a-cofuse.adb, a-cofuse.ads (Enable_Handling_Of_Equivalence)
3267 Boolean generic parameter to disable contracts for equivalence
3269 * a-cfhama.adb, a-cfhama.ads (Formal_Model.P) Disable handling
3270 of equivalence on functional maps.
3271 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.P) Disable handling
3272 of equivalence on functional maps.
3274 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3276 * exp_ch9.adb (Expand_Entry_Barrier): Code
3277 cleanup. Do not perform the optimization which removes the
3278 declarations of the discriminant and component renamings when
3279 validity checks on operands and attributes are in effect.
3281 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3283 * exp_spark.adb, exp_util.adb, sem_ch7.adb, g-dyntab.adb, g-dyntab.ads,
3284 freeze.adb, a-cfinve.ads, a-cofuma.adb, a-cofuma.ads, a-cfhama.adb,
3285 a-cfhama.ads, a-cofove.ads: Minor reformatting.
3287 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3289 * g-debpoo.adb (Dump_Gnatmem): Protect against a possible null
3290 pointer dereference.
3291 * g-spipat.adb (Dump): Code clean up. Protect against a possible
3292 null pointer dereference.
3294 2017-04-27 Bob Duff <duff@adacore.com>
3296 * g-dyntab.ads, g-dyntab.adb: Default for Table_Low_Bound.
3297 Rename Empty --> Empty_Table_Ptr, and don't duplicate code for it.
3298 Free renames Init, since they do the same thing.
3299 * g-table.ads: Default for Table_Low_Bound.
3300 * table.ads: Default for Table_Low_Bound, Table_Initial, and
3303 2017-04-27 Bob Duff <duff@adacore.com>
3305 * g-dyntab.ads, g-dyntab.adb: Add assertions to subprograms that
3307 * atree.adb, elists.adb, fname-uf.adb, ghost.adb, inline.adb,
3308 * lib.adb, namet.adb, nlists.adb, sem.adb, sinput.adb, stringt.adb:
3309 Reorder code so that above assertions do not fail.
3310 * table.ads: Remove obsolete comment on Locked.
3312 2017-04-27 Claire Dross <dross@adacore.com>
3314 * a-cfdlli.ads: Code cleanup.
3316 2017-04-27 Yannick Moy <moy@adacore.com>
3318 * exp_spark.adb (Expand_SPARK_Freeze_Type): Build a DIC procedure
3319 when needed for proof. (Expand_SPARK): Call the new procedure.
3320 * exp_util.ads Fix typo.
3322 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3324 * a-cofuma.ads, a-cfhama.ads: Minor reformatting, grammar, and typo
3327 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3329 * sem_elab.adb Add new type Visited_Element
3330 and update the contents of table Elab_Visited. Various code clean up.
3331 (Check_Elab_Call): Determine whether a prior call to
3332 the same subprogram was already examined within the same context.
3333 (Check_Internal_Call_Continue): Register the subprogram being
3334 called as examined within a particular context. Do not suppress
3335 elaboration warnings.
3337 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3339 * xoscons.adb, osint.ads: Minor reformatting.
3341 2017-04-27 Bob Duff <duff@adacore.com>
3343 * g-dyntab.ads, g-dyntab.adb: Misc cleanup. Rename
3344 Table_Count_Type --> Table_Last_Type, because the name
3345 was confusing (a "count" usually starts at zero). Add
3346 functionality supported or needed by other tables packages
3347 (Move, Release_Threshold).
3348 * g-table.ads, g-table.adb: This is now just a thin wrapper
3349 around g-dyntab.ads/g-dyntab.adb. Add functionality supported
3350 or needed by other tables packages (Save, Restore).
3351 * table.ads, table.adb: This is now just a thin wrapper around
3352 * g-table.ads/g-table.adb.
3353 * namet.h, scos.h, uintp.h: These files are reaching into the
3354 private data of some instances of g-table, whose names changed,
3355 so the above change requires some adjustment here. It now uses
3358 2017-04-27 Bob Duff <duff@adacore.com>
3360 * namet.adb, namet.ads: Minor: remove unused procedures.
3362 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
3364 * checks.adb (Apply_Scalar_Range_Check): Initialize Ok variable too.
3365 (Minimize_Eliminate_Overflows): Initialize Llo and Lhi.
3366 Add pragma Warnings on Rtype variable in nested block. *
3367 * exp_ch3.adb (Build_Init_Statements): Initialize VAR_LOC.
3368 * exp_ch4.adb (Expand_Concatenate): Initialize 3 variables.
3369 (Size_In_Storage_Elements): Add pragma Warnings on Res variable.
3370 * exp_ch7.adb (Build_Adjust_Statements): Initialize Bod_Stmts.
3371 (Process_Component_List_For_Finalize): Initialize Counter_Id.
3372 (Build_Finalize_Statements): Initialize Bod_Stmts.
3373 * exp_disp.adb (Expand_Dispatching_Call): Initialize SCIL_Node.
3375 2017-04-27 Claire Dross <dross@adacore.com>
3377 * a-cfhama.adb, a-cfhamai.ads (=): Generic parameter removed to
3378 allow the use of regular equality over elements in contracts.
3379 (Formal_Model): Ghost package containing model functions that are
3380 used in subprogram contracts.
3381 (Current_To_Last): Removed, model
3382 functions should be used instead.
3383 (First_To_Previous): Removed, model functions should be used instead.
3384 (Strict_Equal): Removed, model functions should be used instead.
3385 (No_Overlap): Removed, model functions should be used instead.
3386 (Equivalent_Keys): Functions over cursors are removed. They were
3387 awkward with explicit container parameters.
3388 * a-cofuma.adb, a-cofuma.ads (Lift_Equivalent_Keys): New lemma
3389 (proof only) procedure to help GNATprove when equivalence over
3390 keys is not equality.
3392 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3394 * exp_util.adb, a-cfdlli.adb, a-cfdlli.ads, exp_ch9.adb, g-dyntab.adb,
3395 sem_dim.adb, a-cfinve.adb, a-cfinve.ads, a-cofove.adb, a-cofove.ads:
3396 Minor reformatting and code cleanups.
3398 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3400 * freeze.adb (Build_Inherited_Condition_Pragmas): New procedure,
3401 subsidiary of Check_Inherited_Conditions, to build pragmas for an
3402 operation whose ancestor has classwide pre/postconditions. This
3403 is used both to check the legality of the inheritance in Ada
3404 and in SPARK, and to determine whether a wrapper is needed for
3405 an inherited operation.
3406 * exp_util.adb (Build_Class_Wide_Expression, Replace_Entity):
3407 Improve placement of error message for inherited classwide
3408 conditions that become illegal on type derivation.
3410 2017-04-27 Yannick Moy <moy@adacore.com>
3412 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Set
3413 SPARK_Mode from context on generic package.
3414 * sem_ch7.adb (Analyze_Package_Declaration): Simplify code to remove
3417 2017-04-27 Claire Dross <dross@adacore.com>
3419 * a-cofuve.ads (Range_Shifted): Rewrite precondition to avoid
3420 overflows in computations.
3421 * a-cofove.ads (Capacity_Range): Rewrite last bound to avoid
3422 overflows in computations.
3423 (Insert): Rewrite precondition to avoid overflows in computations.
3424 * a-cfinve.ads (Capacity_Range): Rewrite last bound to avoid
3425 overflows in computations.
3426 (Insert): Rewrite precondition to avoid overflows in computations.
3428 2017-04-27 Steve Baird <baird@adacore.com>
3430 * exp_ch9.adb (Expand_N_Asynchronous_Select): Initialize the Cancel
3431 flag when it is declared in order to avoid confusing CodePeer about
3432 the possibility of an uninitialized variable read.
3434 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3436 * sem_dim.adb (Analyze_Dimension_Object_Declaration): There is
3437 no dimensionality error if the subtype of the expression is
3438 identical to the nominal subtype in the declaration, even though
3439 the expression itself may have been constant-folded and lack a
3441 * sem_dim.ads: Add comments on setting of dimension vectors and
3442 its interaction with node rewritings and side-effect removal.
3444 2017-04-27 Bob Duff <duff@adacore.com>
3446 * debug.adb: Minor comment correction.
3447 * sem_dim.ads: Minor reformatting and typo fixes.
3449 2017-04-27 Bob Duff <duff@adacore.com>
3451 * g-table.adb, g-table.adsa, scos.h: From the C side, access First and
3452 Last of the tables via function calls, rather than relying on layout
3455 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3457 * exp_util.adb: No wrapper in GNATprove mode.
3459 2017-04-27 Yannick Moy <moy@adacore.com>
3461 * sem_res.adb (Resolve_Comparison_Op): Always
3462 evaluate comparisons between values of universal types.
3464 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3466 * sem_elab.adb (Check_Internal_Call_Continue): Do not generate
3467 an elaboration counter nor a check when in GNATprove mode.
3468 * sem_util.adb (Build_Elaboration_Entity): Do not create an
3469 elaboration counter when in GNATprove mode.
3471 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3473 * freeze.adb: copy-paste typo.
3475 2017-04-27 Yannick Moy <moy@adacore.com>
3477 * sem_prag.adb (Analyze_Pre_Post_In_Decl_Part):
3478 Use correct test to detect call in GNATprove mode instead of
3481 2017-04-27 Claire Dross <dross@adacore.com>
3483 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model.M_Elements_In_Union):
3484 New property function expressing that the element of a
3485 sequence are contained in the union of two sequences.
3486 (Formal_Model.M_Elements_Included): New property function
3487 expressing that the element of a sequence are another sequence.
3488 (Generic_Sorting): Use new property functions to state that
3489 elements are preserved by Sort and Merge.
3490 * a-cofove.adb, a-cofove.ads (=): Generic parameter removed to
3491 allow the use of regular equality over elements in contracts.
3492 (Formal_Model): Ghost package containing model functions
3493 that are used in subprogram contracts. (Capacity):
3494 On unbounded containers, return the maximal capacity.
3495 (Current_To_Last): Removed, model functions should be used instead.
3496 (First_To_Previous): Removed, model functions should be used instead.
3497 (Append): Default parameter value replaced
3498 by new wrapper to allow more precise contracts.
3499 (Insert): Subprogram restored, it seems it was useful to users even if
3501 (Delete): Subprogram restored, it seems it was useful to users even if
3503 (Prepend): Subprogram restored, it seems it was useful to users even
3504 if it is inefficient.
3505 (Delete_First): Subprogram restored, it seems it
3506 was useful to users even if it is inefficient. (Delete_Last):
3507 Default parameter value replaced by new wrapper to allow more
3509 (Generic_Sorting.Merge): Subprogram restored.
3510 * a-cfinve.adb, a-cfinve.ads (=): Generic parameter removed to
3511 allow the use of regular equality over elements in contracts.
3512 (Formal_Model): Ghost package containing model functions
3513 that are used in subprogram contracts. (Capacity):
3514 On unbounded containers, return the maximal capacity.
3515 (Current_To_Last): Removed, model functions should be used
3517 (First_To_Previous): Removed, model functions should be used instead.
3518 (Append): Default parameter value replaced
3519 by new wrapper to allow more precise contracts.
3520 (Insert): Subprogram restored, it seems it was useful to users even if
3522 (Delete): Subprogram restored, it seems it was useful to users even if
3524 (Prepend): Subprogram restored, it seems it was useful to users even
3525 if it is inefficient.
3526 (Delete_First): Subprogram restored, it seems it
3527 was useful to users even if it is inefficient. (Delete_Last):
3528 Default parameter value replaced by new wrapper to allow more
3530 (Generic_Sorting.Merge): Subprogram restored.
3531 (Vector): Do not reuse formal vectors, as it is no longer possible
3532 to supply them with an equality function over elements.
3534 2017-04-27 Bob Duff <duff@adacore.com>
3536 * g-dyntab.adb (Release): When allocating the new
3537 table, use the correct slice of the old table to initialize it.
3539 2017-04-27 Eric Botcazou <ebotcazou@adacore.com>
3541 * einfo.ads: Minor fixes in comments.
3543 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3545 * sem_prag.adb: disable clones in SPARK_Mode.
3547 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3549 * sem_util.ads, contracts.adb: Minor reformatting.
3551 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3553 * sem_util.adb, sem_util.ads (Build_Class_Wide_Clone_Body):
3554 Build body of subprogram that has a class-wide condition that
3555 contains calls to other primitives.
3556 (Build_Class_Wide_Clone_Call); Build a call to the common
3557 class-wide clone of a subprogram with classwide conditions. The
3558 body of the subprogram becomes a wrapper for a call to the
3559 clone. The inherited operation becomes a similar wrapper to which
3560 modified conditions apply, and the call to the clone includes
3561 the proper conversion in a call the parent operation.
3562 (Build_Class_Wide_Clone_Decl (Spec_Id : Entity_Id): For a
3563 subprogram that has a classwide condition that contains calls to
3564 other primitives, build an internal subprogram that is invoked
3565 through a type-specific wrapper for all inherited subprograms
3566 that may have a modified condition.
3567 * sem_prag.adb (Check_References): If subprogram has a classwide
3568 condition, create entity for corresponding clone, to be invoked
3569 through wrapper subprograns.
3570 (Analyze_Pre_Post_Condition_In_Decl_Part): Do not emit error
3571 message about placement if pragma isi internally generated.
3572 * sem_ch6.adb (Analyze_Subprogram_Body_Helper): If subprogram has
3573 a classwide clone, build body of clone as copy of original body,
3574 and rewrite original body as a wrapper as a wrapper for a call to
3575 the clone, so that it incorporates the original pre/postconditions
3577 * freeze.adb (Check_Inherited_Conditions): For an inherited
3578 subprogram that inherits a classwide condition, build spec and
3579 body of corresponding wrapper so that call to inherited operation
3580 gets the modified conditions.
3581 * contracts.adb (Analyze_Contracts): If analysis of classwide
3582 condition has created a clone for a primitive operation, analyze
3583 declaration of clone.
3585 2017-04-27 Steve Baird <baird@adacore.com>
3587 * exp_util.adb (Build_Allocate_Deallocate_Proc):
3588 Add "Suppress => All_Checks" to avoid generating unnecessary
3591 2017-04-27 Yannick Moy <moy@adacore.com>
3593 * debug.adb: Reserve debug flag 'm' for no inlining in GNATprove.
3594 * sem_ch6.adb (Anayze_Subprogram_Body_Helper): Skip creation of
3595 inlining body in GNATprove mode when switch -gnatdm used.
3596 * sem_res.adb (Resolve_Call): Skip detection of lack of inlining
3597 in GNATprove mode when switch -gnatdm used.
3599 2017-04-27 Arnaud Charlet <charlet@adacore.com>
3601 * sem_ch13.adb (Analyze_Attribute_Definition_Clause
3602 [Attribute_Address]): Call Set_Address_Taken when ignoring rep
3603 clauses, so that we keep an indication of the address clause
3604 before removing it from the tree.
3606 2017-04-27 Yannick Moy <moy@adacore.com>
3608 * exp_util.ads, exp_util.adb (Evaluate_Name): Force evaluation
3609 of expression being qualified, when not an object name, or else
3610 evaluate the underlying name.
3612 2017-04-27 Jerome Lambourg <lambourg@adacore.com>
3614 * bindusg.adb, bindgen.adb, gnatbind.adb, opt.ads: add -nognarl switch.
3616 2017-04-27 Justin Squirek <squirek@adacore.com>
3618 * exp_ch7.adb (Build_Finalize_Statements): Move Num_Comps to
3619 Process_Component_List_For_Finalization as a local variable.
3620 (Process_Component_For_Finalize): Add an extra parameter to avoid
3622 (Process_Component_List_For_Finalization): Correct calls to
3623 Process_Component_For_Finalize to take Num_Comps as a parameter.
3625 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3627 * sem_ch8.adb (Find_Direct_Name): Account for the case where
3628 a use-visible entity is defined within a nested scope of an
3629 instance when giving priority to entities which were visible in
3630 the original generic.
3631 * sem_util.ads, sem_util.adb (Nearest_Enclosing_Instance): New routine.
3633 2017-04-27 Tristan Gingold <gingold@adacore.com>
3635 * raise-gcc.c: Don't use unwind.h while compiling
3636 for the frontend, but mimic host behavior.
3638 2017-04-27 Javier Miranda <miranda@adacore.com>
3640 * sem_ch3.adb (Build_Discriminated_Subtype):
3641 Propagate Has_Pragma_Unreferenced_Objects to the built subtype.
3643 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3645 * sem_prag.adb (Analyze_Global_Item):
3646 Do not consider discriminants because they are not "entire
3647 objects". Remove the discriminant-related checks because they are
3649 (Analyze_Input_Output): Do not consider discriminants
3650 because they are not "entire objects".
3652 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3654 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Do not
3655 perform check if the current scope does not come from source,
3656 as is the case for a rewritten task body, because check has
3657 been performed already, and may not be doable because of changed
3660 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3662 * a-cofuse.adb, a-cfdlli.adb, a-cofuse.ads, a-cfdlli.ads, a-cofuve.adb,
3663 a-cofuve.ads, a-cofuma.adb, a-cofuma.ads, sem_eval.adb, a-cofuba.adb:
3666 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3668 * sem_ch4.adb (Analyze_Call): If the return type of a function
3669 is incomplete in an context in which the full view is available,
3670 replace the type of the call by the full view, to prevent spurious
3672 * exp_disp.adb (Check_Premature_Freezing): Disable check on an
3673 abstract subprogram so that compiler does not reject a parameter
3674 of a primitive operation of a tagged type being frozen, when
3675 the untagged type of that parameter cannot be frozen.
3677 2017-04-27 Bob Duff <duff@adacore.com>
3679 * sem_attr.adb (Compute_Type_Key): Don't walk
3680 representation items for irrelevant types, which could be in a
3681 different source file.
3683 2017-04-27 Steve Baird <baird@adacore.com>
3685 * exp_attr.adb (Expand_N_Attribute_Reference):
3686 Don't expand Image, Wide_Image, Wide_Wide_Image attributes
3689 2017-04-27 Yannick Moy <moy@adacore.com>
3691 * exp_unst.ads: Fix typos in comments.
3693 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3695 * sem_eval.adb (Choice_Matches): Handle properly a real literal
3696 whose type has a defined static predicate.
3698 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3700 * exp_ch4.adb (Insert_Dereference_Action):
3701 Do not adjust the address of a controlled object when the
3702 associated access type is subject to pragma No_Heap_Finalization.
3705 2017-04-27 Pierre-Marie de Rodat <derodat@adacore.com>
3707 * gcc-interface/utils.c (gnat_type_for_size): Set
3708 TYPE_ARTIFICIAL on created types.
3710 2017-04-27 Claire Dross <dross@adacore.com>
3712 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
3713 modifications in functional containers.
3714 * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
3715 to improve readablity. Subprograms are separated between basic
3716 operations, constructors and properties. Universally quantified
3717 formulas in contracts are factorized in independant functions
3718 with a name and a comment. Names of parameters are improved.
3720 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3722 * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
3724 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3726 * sem_res.adb (Resolve_Type_Conversion): Do not
3727 install a predicate check here since this is already done during
3728 the expansion phase. Verify whether the operand satisfies the
3729 static predicate (if any) of the target type.
3730 * sem_ch3.adb (Analyze_Object_Declaration): Do
3731 not install a predicate check if the object is initialized by
3732 means of a type conversion because the conversion is subjected
3735 2017-04-27 Tristan Gingold <gingold@adacore.com>
3737 * raise.c (__gnat_builtin_longjmp): Remove.
3738 (__gnat_bracktrace):
3739 Add a dummy definition for the compiler (__gnat_eh_personality,
3740 __gnat_rcheck_04, __gnat_rcheck_10) (__gnat_rcheck_19,
3741 __gnat_rcheck_20, __gnat_rcheck_21) (__gnat_rcheck_30,
3742 __gnat_rcheck_31, __gnat_rcheck_32): Likewise.
3743 * a-exexpr.adb: Renamed from a-exexpr-gcc.adb
3744 * a-except.ads, a-except.adb: Renamed from a-except-2005.ads
3745 and a-except-2005.adb.
3746 * raise-gcc.c: Allow build in compiler, compiled as a C++
3748 (__gnat_Unwind_ForcedUnwind): Adjust prototype.
3749 (db): Constify msg_format.
3750 (get_call_site_action_for): Don't use void arithmetic.
3751 * system.ads (Frontend_Exceptions): Set to False.
3752 (ZCX_By_Default): Set to True.
3753 (GCC_ZC_Support): Set to True.
3754 * gcc-interface/Makefile.in: No more variants for a-exexpr.adb and
3756 * gcc-interface/Make-lang.in: Add support for backend zcx exceptions
3757 in gnat1 and gnatbind.
3758 * gnat1, gnatbind: link with raise-gcc.o, a-exctra.o, s-addima.o,
3759 s-excmac.o, s-imgint.o, s-traceb.o, s-trasym.o, s-wchstw.o
3760 * s-excmac.ads, s-excmac.adb: Copy of variants.
3761 * a-except.o: Adjust preequisites.
3762 Add handling of s-excmac-arm.adb and s-excmac-gcc.adb.
3764 2017-04-27 Claire Dross <dross@adacore.com>
3766 * a-cfdlli.adb, a-cfdlli.ads (Formal_Model): Adapt to
3767 modifications in functional containers.
3768 * a-cofuba.ads, a-cofuma.ads, a-cofuse.ads, a-cofuve.ads Reformat
3769 to improve readablity. Subprograms are separated between basic
3770 operations, constructors and properties. Universally quantified
3771 formulas in contracts are factorized in independant functions
3772 with a name and a comment. Names of parameters are improved.
3774 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3776 * exp_spark.adb, sem_elab.adb: Minor reformatting and typo fix.
3778 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3780 * sem_res.adb (Resolve_Type_Conversion): Do not
3781 install a predicate check here since this is already done during
3782 the expansion phase. Verify whether the operand satisfies the
3783 static predicate (if any) of the target type.
3784 * sem_ch3.adb (Analyze_Object_Declaration): Do
3785 not install a predicate check if the object is initialized by
3786 means of a type conversion because the conversion is subjected
3789 2017-04-27 Tristan Gingold <gingold@adacore.com>
3791 * a-except.ads, a-except.adb, a-exexpr.adb: Removed (will be
3792 replaced by their variants).
3794 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3796 * exp_prag.adb, a-cofuse.adb, a-cofuse.ads, einfo.adb, sem_prag.adb,
3797 cstand.adb, par-prag.adb, a-cofuve.adb, a-cofuve.ads, a-cofuma.adb,
3798 a-cofuma.ads, a-cofuba.adb, a-cofuba.ads: Minor reformatting.
3800 2017-04-27 Tristan Gingold <gingold@adacore.com>
3802 * s-excmac-gcc.ads, s-excmac-gcc.adb,
3803 s-excmac-arm.ads, s-excmac-arm.adb (New_Occurrence): Rewrite it in
3806 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3808 * exp_ch7.adb (Establish_Transient_Scope): Rewrite
3809 the loop which detects potential enclosing transient scopes. The
3810 loop now terminates much earlier as transient scopes are bounded
3811 by packages and subprograms.
3813 2017-04-27 Claire Dross <dross@adacore.com>
3815 * a-cfdlli.adb, a-cfdlli.ads (=): Generic parameter removed to
3816 allow the use of regular equality over elements in contracts.
3817 (Cursor): Type is now public so that it can be used in
3819 (Formal_Model): Ghost package containing
3820 model functions that are used in subprogram contracts.
3821 (Current_To_Last): Removed, model functions should be used
3823 (First_To_Previous): Removed, model functions should
3825 (Strict_Equal): Removed, model functions
3826 should be used instead.
3827 (Append): Default parameter value
3828 replaced by new wrapper to allow more precise contracts.
3829 (Insert): Default parameter value replaced by new wrapper to
3830 allow more precise contracts.
3831 (Delete): Default parameter
3832 value replaced by new wrapper to allow more precise contracts.
3833 (Prepend): Default parameter value replaced by new wrapper to
3834 allow more precise contracts.
3835 (Delete_First): Default parameter
3836 value replaced by new wrapper to allow more precise contracts.
3837 (Delete_Last): Default parameter value replaced by new wrapper
3838 to allow more precise contracts.
3840 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3842 * exp_spark.adb (Expand_SPARK): Perform specialized expansion
3843 for object declarations.
3844 (Expand_SPARK_N_Object_Declaration): New routine.
3845 * sem_elab.adb (Check_A_Call): Include calls to the
3846 Default_Initial_Condition procedure of a type under the SPARK
3847 elaboration checks umbrella.
3849 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3851 * sem.adb (Analyze): Diagnose an illegal iterated component
3853 * sem_util.ads, sem_util.adb
3854 (Diagnose_Iterated_Component_Association): New routine.
3856 2017-04-27 Bob Duff <duff@adacore.com>
3858 * adaint.c (__gnat_get_current_dir): Return 0 in length if
3860 * a-direct.adb, g-dirope.adb, osint.adb, s-os_lib.adb: Raise
3861 exception if getcwd failed.
3863 2017-04-27 Yannick Moy <moy@adacore.com>
3865 * exp_dbug.adb, exp_dbug.ads (Get_External_Name): Prefix ghost
3866 entities with special prefix.
3868 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3870 * debug.adb Change the documentation of switch -gnatd.s.
3871 * exp_ch7.adb (Make_Transient_Block): Transient blocks do not need
3872 to manage the secondary stack when an enclosing scope already
3873 performs this functionality (aka relaxed management). Switch
3874 -gnatd.s may be used to force strict management in which case
3875 the block will manage the secondary stack unconditionally. Add
3876 a guard to stop the traversal when encountering a package or a
3879 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3881 * sem_res.adb (Resolve_Call): Refine further the handling of
3882 limited views of return types in function calls. If the function
3883 that returns a limited view appears in the current unit,
3884 we do not replace its type by the non-limited view because
3885 this transformation is performed int the back-end. However,
3886 the type of the call itself must be the non-limited view, to
3887 prevent spurious resolution errors.
3889 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3891 * einfo,ads, einfo.adb (Class_Wide_Preconds, Class_Wide_Postconds):
3892 Removed, proposed implementation using generics for class-wide
3893 preconditions proved impractical.
3894 (Class_Wide_Clone): New attribute of subprogram. Designates
3895 subprogram created for primitive operations with class-wide
3896 pre/postconditions that contain calls to other primitives. The
3897 clone holds the body of the original primitive, but the
3898 pre/postonditions do not apply to it. The original body is
3899 rewritten as a wrapper for a call to the clone.
3900 (Is_Class_Wide_Clone): New flag to identify a Class_Wide_Clone. If
3901 the flag is set, no code for the corresponding pre/postconditions
3902 is inserted into its body.
3904 2017-04-27 Bob Duff <duff@adacore.com>
3906 * exp_prag.adb, par-prag.adb, sem_ch13.adb: Ignore
3907 Scalar_Storage_Order if -gnatI is given.
3908 * sem_prag.adb (Analyze_Pragma): Ignore
3909 Default_Scalar_Storage_Order if -gnatI is given.
3911 2017-04-27 Claire Dross <dross@adacore.com>
3913 * a-cofuba.ads (Add): Take as an additional input parameter
3914 the position where the element should be inserted.
3915 (Remove): New function that removes an element from the container.
3916 * a-cofuma.ads (Add): Adapt to the new API of Base.Add.
3917 * a-cofuse.ads (Add): Adapt to the new API of Base.Add.
3918 (Remove): New function that removes an element from a set.
3919 * a-cofuve.ads (Add): Adapt to the new API of Base.Add.
3920 (Remove): New function that removes an element from a sequence.
3921 (Insert): New function that adds anywhere in a sequence.
3923 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3925 * checks.adb (Generate_Range_Check): Revert previous change.
3927 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3929 * sem_util.adb: Minor reformatting/rewording.
3931 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3933 * lib-xref.adb (Generate_Reference): The use
3934 of attribute 'Result is not considered a violation of pragma
3937 2017-04-27 Justin Squirek <squirek@adacore.com>
3939 * cstand.adb (Create_Standard): Correctly set
3940 Directly_Designated_Type for Any_Access.
3941 * sem_type.adb (Covers): Minor grammar fixes.
3943 2017-04-27 Bob Duff <duff@adacore.com>
3945 * sem_attr.adb: Minor cleanup.
3947 2017-04-27 Claire Dross <dross@adacore.com>
3949 * a-cofuba.ads, a-cofuba.adb (Ada.Containers.Functional_Base): New
3950 private child of Ada.Containers used to implement all functional
3952 * a-cofuma.ads, a-cofuma.adb (Ada.Containers.Functional_Maps): New
3953 child of Ada.Containers. It provides functional indefinite unbounded
3954 maps which can be used as high level models for specification
3956 * a-cofuse.ads, a-cofuse.adb (Ada.Containers.Functional_Sets): New
3957 child of Ada.Containers. It provides functional indefinite unbounded
3958 sets which can be used as high level models for specification
3960 * a-cofuve.ads, a-cofuve.adb (Ada.Containers.Functional_Vectors): New
3961 child of Ada.Containers. It provides functional indefinite unbounded
3962 vectors which can be used as high level models for specification
3964 * Makefile.rtl: Add new packages.
3965 * impunit.adb: Add new packages.
3967 2017-04-27 Gary Dismukes <dismukes@adacore.com>
3969 * sem_ch4.adb: Minor reformatting.
3971 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3973 * sem_ch12.adb (Analyze_Associations): minor reformatting.
3974 (Check_Fixed_Point_Actual): Do not emit a warning on a fixed
3975 point type actual that has user-defined arithmetic primitives,
3976 when there is a previous actual for a formal package that defines
3977 a fixed-point type with the parent user-defined operator.
3979 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
3981 * checks.adb (Generate_Range_Check): Reinstate part of previous change.
3982 * sem_attr.adb (Resolve_Attribute): Generate a range check when
3983 the component type allows range checks.
3985 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3987 * sem_aux.adb (Is_Generic_Formal): Use original node to locate
3988 corresponding declaration, because formal derived types are
3989 rewritten as private extensions.
3991 2017-04-27 Ed Schonberg <schonberg@adacore.com>
3993 * sem_dim.adb (Analyze_Dimension_Binary_Op): Do not check
3994 dimensions of operands if node has been analyzed already, because
3995 previous analysis and dimension checking will have removed the
3996 dimension information from the operands.
3998 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4000 * debug.adb: Document the use of switch -gnatd.s.
4001 * einfo.ads Update the documentation on attribute
4002 Sec_Stack_Needed_For_Return and attribute Uses_Sec_Stack. Remove
4003 the uses of these attributes from certain entities.
4004 * exp_ch7.adb (Make_Transient_Block): Reimplement the circuitry
4005 which determines whether the block should continue to manage
4006 the secondary stack.
4007 (Manages_Sec_Stack): New routine.
4009 2017-04-27 Bob Duff <duff@adacore.com>
4011 * atree.ads: Minor edit.
4013 2017-04-27 Hristian Kirtchev <kirtchev@adacore.com>
4015 * sinfo.ads: Update the section on Ghost mode. Add
4016 a section on SPARK mode. Update the placement of section on
4017 expression functions.
4019 2017-04-27 Bob Duff <duff@adacore.com>
4021 * sinput.adb (Get_Source_File_Index): Don't
4022 assert that S is in the right range in the case where this is
4023 a .dg file under construction.
4025 2017-04-27 Yannick Moy <moy@adacore.com>
4027 * sem_util.adb (Check_Result_And_Post_State):
4028 Handle more precisely each conjunct in expressions formed by
4029 and'ing sub-expressions.
4031 2017-04-27 Gary Dismukes <dismukes@adacore.com>
4033 * exp_ch4.adb, sem_ch4.adb: Minor typo fix and reformatting.
4035 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4037 * gnat_rm.texi, gnat_ugn.texi,
4038 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
4039 doc/gnat_ugn/platform_specific_information.rst,
4040 doc/gnat_ugn/gnat_and_program_execution.rst,
4041 doc/gnat_ugn/gnat_utility_programs.rst,
4042 doc/gnat_ugn/the_gnat_compilation_model.rst,
4043 doc/gnat_rm/implementation_defined_attributes.rst,
4044 doc/gnat_rm/the_gnat_library.rst,
4045 doc/gnat_rm/implementation_defined_pragmas.rst,
4046 doc/gnat_rm/representation_clauses_and_pragmas.rst,
4047 doc/gnat_rm/implementation_of_specific_ada_features.rst,
4048 doc/gnat_rm/implementation_defined_aspects.rst,
4049 doc/gnat_rm/implementation_defined_characteristics.rst: Update
4052 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4054 * exp_ch4.adb (Expand_N_Case_Expression): Emit error message when
4055 generating C code on complex case expressions.
4057 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4059 * sem_prag.adb (Analyze_Pragma): Generate a warning instead
4060 of silently ignoring pragma Ada_xxx in Latest_Ada_Only mode.
4061 * directio.ads, ioexcept.ads, sequenio.ads, text_io.ads: Use
4062 Ada_2012 instead of Ada_2005 to be compatible with the above
4064 * bindgen.adb: Silence new warning on pragma Ada_95.
4066 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4068 * checks.adb (Generate_Range_Check): Revert part of previous change.
4070 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4072 * sem_ch4.adb (Try_Container_Indexing): Handle properly a
4073 container indexing operation that appears as a an actual in a
4074 parameter association in a procedure call.
4076 2017-04-25 Olivier Ramonat <ramonat@adacore.com>
4078 * prj-proc.adb, sem_util.adb, s-stposu.adb, sem_attr.adb, prj-conf.ads:
4079 Fix spelling mistakes.
4081 2017-04-25 Bob Duff <duff@adacore.com>
4083 * types.ads, osint.adb, sinput-c.adb, sinput-d.adb, sinput-l.adb,
4084 * sinput-p.adb: Use regular fat pointers, with bounds checking,
4085 for source buffers. Fix misc obscure bugs.
4086 * sinput.ads, sinput.adb: Use regular fat pointers, with bounds
4087 checking, for source buffers. Modify representation clause for
4088 Source_File_Record as appropriate. Move Source_File_Index_Table
4089 from spec to body, because it is not used outside the body.
4090 Move Set_Source_File_Index_Table into the private part, because
4091 it is used only in the body and in children. Use trickery to
4092 modify the dope in the generic instantiation case. It's ugly,
4093 but not as ugly as the previous method. Fix documentation.
4094 Remove obsolete code.
4095 * fname-sf.adb, targparm.adb: Fix misc out-of-bounds
4096 indexing in source buffers.
4097 * fmap.adb: Avoid conversions from one string type to another.
4098 Remove a use of global name buffer.
4099 * osint.ads, sfn_scan.ads, sfn_scan.adb, sinput-c.ads: Comment
4102 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4104 * exp_util.adb, exp_ch4.adb: Minor reformatting.
4106 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4108 * checks.adb: Code clean up in various routines.
4109 (Generate_Range_Check): Do not generate a range check when the
4110 expander is not active or when index/range checks are suppressed
4112 (Insert_List_After_And_Analyze, Insert_List_Before_And_Analyze):
4113 Remove variants that include a Supress parameter. These routines
4114 are never used, and were introduced before the current scope-based
4115 check suppression method.
4117 2017-04-25 Vasiliy Fofanov <fofanov@adacore.com>
4119 * prj-part.adb, cstreams.c, osint.adb, osint.ads: Remove VMS specific
4120 code and some subprogram calls that are now noop.
4122 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4124 * exp_ch4.adb (Expand_N_Case_Expression): Take
4125 Minimize_Expression_With_Actions into account when possible.
4127 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4129 * exp_util.adb (Known_Non_Null): Moved to Sem_Util.
4130 (Known_Null): Moved to Sem_Util.
4131 * exp_util.ads (Known_Non_Null): Moved to Sem_Util.
4132 (Known_Null): Moved to Sem_Util.
4133 * sem_util.adb Add new enumeration type Null_Status_Kind.
4134 (Known_Non_Null): Moved from Exp_Util. Most of the logic in
4135 this routine is now carried out by Null_Status.
4136 (Known_Null): Moved from Exp_Util. Most of the logic in this routine
4137 is now carried out by Null_Status.
4138 (Null_Status): New routine.
4139 * sem_util.ads (Known_Non_Null): Moved from Exp_Util.
4140 (Known_Null): Moved from Exp_Util.
4142 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4144 * sem_ch6.adb (Analyze_Expression_Function): Do not report an
4145 error on the return type of an expression function that is a
4146 completion, if the type is derived from a generic formal type.
4148 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4150 * sem_dim.adb (Dimensions_Of_Operand): The dimensions of a type
4151 conversion are those of the target type.
4153 2017-04-25 Bob Duff <duff@adacore.com>
4155 * a-clrefi.adb: Minor cleanup.
4157 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4159 * exp_util.adb, exp_util.ads, types.ads: Minor reformatting.
4161 2017-04-25 Bob Duff <duff@adacore.com>
4163 * err_vars.ads, fmap.adb, fmap.ads, comperr.adb, fname-sf.adb,
4164 types.adb, types.ads, types.h, sinput-l.adb, targparm.adb,
4165 errout.adb, sinput.adb, sinput.ads, cstand.adb, scn.adb,
4166 scn.ads, gnatls.adb: Eliminate the vestigial Internal_Source_File and
4167 the Internal_Source buffer. This removes the incorrect call to "="
4168 the customer noticed.
4169 Wrap remaining calls to "=" in Null_Source_Buffer_Ptr. We
4170 eventually need to eliminate them altogether. Or else get rid
4171 of zero-origin addressing.
4173 2017-04-25 Claire Dross <dross@adacore.com>
4175 * exp_util.ads (Expression_Contains_Primitives_Calls_Of): New
4176 function used in GNATprove to know if an expression contains
4177 non-dispatching calls on primitives of a tagged type.
4179 2017-04-25 Bob Duff <duff@adacore.com>
4181 * rtsfind.adb (Initialize): Initialize
4182 First_Implicit_With. Building the compiler with Normalize_Scalars
4183 and validity checking finds this being used as an uninitialized
4186 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4188 * contracts.adb (Analyze_Entry_Or_Subprogram_Body_Contract):
4189 Add a warning about SPARK mode management. The routine now
4190 saves and restores both the mode and associated pragma.
4191 (Analyze_Entry_Or_Subprogram_Contract): Add a warning about
4192 SPARK mode management. The routine now saves and restores both
4193 the mode and associated pragma.
4194 (Analyze_Object_Contract):
4195 Add a warning about SPARK mode management. The routine
4196 now saves and restores both the mode and associated pragma.
4197 (Analyze_Package_Body_Contract): Add a warning about SPARK mode
4198 management. The routine now saves and restores both the mode
4199 and associated pragma. (Analyze_Package_Contract): Add a warning
4200 about SPARK mode management. The routine now saves and restores
4201 both the mode and associated pragma.
4202 (Analyze_Task_Contract):
4203 Add a warning about SPARK mode management. The routine now saves
4204 and restores both the mode and associated pragma.
4205 * expander.adb (Expand): Change the way the Ghost mode is saved
4207 * exp_ch3.adb (Freeze_Type): Change the way the Ghost mode is
4209 * exp_disp.adb (Make_DT): Change the way the Ghost mode is saved
4211 * exp_util.adb (Build_DIC_Procedure_Body):
4212 Change the way the Ghost mode is saved and restored.
4213 (Build_DIC_Procedure_Declaration): Change the way the Ghost
4214 mode is saved and restored.
4215 (Build_Invariant_Procedure_Body):
4216 Change the way the Ghost mode is saved and restored.
4217 (Build_Invariant_Procedure_Declaration): Change the way the Ghost
4218 mode is saved and restored.
4219 (Make_Predicate_Call): Change the
4220 way the Ghost mode is saved and restored.
4221 * freeze.adb (Freeze_Entity): Change the way the Ghost mode is
4223 * ghost.adb (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
4225 (Mark_And_Set_Ghost_Body): Remove parameter
4226 Mode and its assignment.
4227 (Mark_And_Set_Ghost_Completion):
4228 Remove parameter Mode and its assignment.
4229 (Mark_And_Set_Ghost_Declaration): Remove parameter Mode and its
4231 (Mark_And_Set_Ghost_Instantiation): Remove parameter
4232 Mode and its assignment.
4233 (Mark_And_Set_Ghost_Procedure_Call):
4234 Remove parameter Mode and its assignment.
4236 Remove parameter Mode and its assignment.
4237 * ghost.ads (Mark_And_Set_Ghost_Assignment): Remove parameter Mode
4238 and update the comment on usage.
4239 (Mark_And_Set_Ghost_Body):
4240 Remove parameter Mode and update the comment on usage.
4241 (Mark_And_Set_Ghost_Completion): Remove parameter Mode and
4242 update the comment on usage.
4243 (Mark_And_Set_Ghost_Declaration):
4244 Remove parameter Mode and update the comment on usage.
4245 (Mark_And_Set_Ghost_Instantiation): Remove parameter Mode and
4246 update the comment on usage.
4247 (Mark_And_Set_Ghost_Procedure_Call):
4248 Remove parameter Mode and update the comment on usage.
4249 (Set_Ghost_Mode): Remove parameter Mode and update the comment
4251 * lib.ads Remove obsolete fields SPARK_Mode_Pragma from various
4253 * lib-load.adb (Create_Dummy_Package_Unit): Remove the assignment
4254 of obsolete field SPARK_Mode_Pragma.
4255 (Load_Main_Source): Remove
4256 the assignment of obsolete field SPARK_Mode_Pragma.
4257 (Load_Unit): Remove the assignment of obsolete field SPARK_Mode_Pragma.
4258 * lib-writ.adb (Add_Preprocessing_Dependency): Remove
4259 the assignment of obsolete field SPARK_Mode_Pragma.
4260 (Ensure_System_Dependency): Remove the assignment of obsolete
4261 field SPARK_Mode_Pragma.
4262 * rtsfind.adb (Load_RTU): Add a warning about Ghost and SPARK
4263 mode management. Change the way Ghost and SPARK modes are saved
4265 * sem.adb (Analyze): Change the way the Ghost mode is saved
4267 * sem_ch3.adb (Analyze_Object_Declaration): Change the way the
4268 Ghost mode is saved and restored.
4269 (Process_Full_View): Change
4270 the way the Ghost mode is saved and restored.
4271 * sem_ch5.adb (Analyze_Assignment): Change the way the Ghost
4272 mode is saved and restored.
4273 * sem_ch6.adb (Analyze_Procedure_Call): Change the way the Ghost
4274 mode is saved and restored.
4275 (Analyze_Subprogram_Body_Helper):
4276 Change the way the Ghost mode is saved and restored.
4277 * sem_ch7.adb (Analyze_Package_Body_Helper): Change the way the
4278 Ghost mode is saved and restored.
4279 * sem_ch10.adb (Analyze_Subunit): Add a warning about SPARK mode
4280 management. Save the SPARK mode-related data prior to any changes
4281 to the scope stack and contexts. The mode is then reinstalled
4282 before the subunit is analyzed in order to restore the original
4283 view of the subunit.
4284 * sem_ch12.adb (Analyze_Package_Instantiation): Update the
4285 warning on region management. Change the way the Ghost and
4286 SPARK modes are saved and restored.
4287 (Inline_Instance_Body):
4288 Add a warning about SPARK mode management. Code clean up.
4289 (Analyze_Subprogram_Instantiation): Update the warning on region
4290 management. Change the way the Ghost and SPARK modes are saved
4292 (Instantiate_Package_Body): Update the warning
4293 on region management. Change the way the Ghost and SPARK modes
4294 are saved and restored.
4295 (Instantiate_Subprogram_Body): Update
4296 the warning on region management. Change the way the Ghost and
4297 SPARK modes are saved and restored.
4298 (Set_Instance_Env): Add a
4299 warning about SPARK mode management. Change the way SPARK mode
4300 is saved and restored.
4301 * sem_ch13.adb (Build_Predicate_Functions):
4302 Change the way the Ghost mode is saved and restored.
4303 (Build_Predicate_Function_Declaration): Change the way the Ghost
4304 mode is saved and restored.
4305 * sem_elab.adb (Check_Elab_Calls): Add a warning about SPARK
4306 mode management. Change the way SPARK mode is saved and restored.
4307 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
4308 Change the way the Ghost mode is saved and restored.
4309 (Analyze_Initial_Condition_In_Decl_Part): Change the way
4310 the Ghost mode is saved and restored.
4312 Change the way the Ghost mode is saved and restored.
4313 (Analyze_Pre_Post_Condition_In_Decl_Part): Change the way the
4314 Ghost mode is saved and restored.
4315 * sem_util.adb (Install_SPARK_Mode): New routine.
4316 (Restore_SPARK_Mode): New routine.
4317 (Save_SPARK_Mode_And_Set): Removed.
4318 (Set_SPARK_Mode): New routine.
4319 * sem_util.ads (Install_SPARK_Mode): New routine.
4320 (Restore_SPARK_Mode): New routine.
4321 (Save_SPARK_Mode_And_Set): Removed.
4322 (Set_SPARK_Mode): New routine.
4324 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4326 * sem_util.adb, sem_util.ads (From_Nested_Package): New predicate
4327 to determine whether a type is declared in a local package that
4328 has not yet been frozen.
4329 * freeze.adb (Freeze_Before): Use new predicate to determine
4330 whether a local package must be installed on the scope stack
4331 in order to evaluate in the proper scope actions generated by
4332 aspect specifications, such as Predicate
4333 * sem_ch13.adb: Simplify code in Analyze_Aspects_At_Freeze_Point
4334 using new predicate.
4336 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4338 * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not consider
4339 comparisons between non- scalar expressions expressions because
4340 their values cannot be invalidated.
4341 * sem_warn.ads (Warn_On_Constant_Valid_Condition): Update the
4344 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4346 * par_sco.adb: Minor reformatting.
4348 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4350 * sem_ch13.adb (Analyze_Aspects_At_Freeze_Point): If entity
4351 is a type from an unfrozen local package, install package to
4352 complete the analysis of delayed aspects of the type.
4354 2017-04-25 Tristan Gingold <gingold@adacore.com>
4356 * bingen.adb (System_Version_Control_Used): New variable.
4357 (Resolve_Binder_Options): Set the above variable.
4358 (Gen_Output_File_Ada): Conditionally call Gen_Versions.
4359 (Gen_Elab_Order): Emit blank line before.
4361 2017-04-25 Justin Squirek <squirek@adacore.com>
4363 * sem_cat.adb (Validate_RT_RAT_Component): Added
4364 an extra check to ignore incomplete types.
4366 2017-04-25 Thomas Quinot <quinot@adacore.com>
4368 * sem_prag.adb (Analyze_Pragma, case Pragma_Check): Remove
4369 bogus circuitry for the case where Name is Predicate.
4371 2017-04-25 Thomas Quinot <quinot@adacore.com>
4373 * par_sco.adb(Traverse_Declarations_Or_Statements.Traverse_Aspects):
4374 Create SCOs for Predicate aspects in disabled
4375 state initially, to be enabled later on by...
4376 * sem_ch13.adb (Build_Predicate_Functions.Add_Predicates): Mark
4377 SCO for predicate as enabled.
4379 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4381 * comperr.adb (Compiler_Abort): Remove now obsolete pair of
4382 pragmas Warnings Off / On.
4383 * namet.adb (Finalize): Remove now obsolete pair of pragmas
4385 * output.adb: Remove now obsolete pair of pragmas Warnings Off / On.
4386 * sem_warn.adb (Warn_On_Constant_Valid_Condition): Do not
4387 consider comparisons between static expressions because their
4388 values cannot be invalidated.
4389 * urealp.adb (Tree_Read): Remove now obsolete pair of pragmas
4391 (Tree_Write): Remove now obsolete pair of pragmas Warnings Off / On.
4392 * usage.adb Remove now obsolete pair of pragmas Warnings Off / On.
4394 2017-04-25 Bob Duff <duff@adacore.com>
4396 * sem_elab.adb (In_Task_Activation): Trace internal calls in
4399 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4401 * sem_prag.adb, sem_warn.adb, sem_eval.adb: Minor reformatting and
4404 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4406 * comperr.adb (Compiler_Abort): Add a pair of pragma Warnings
4407 On/Off to defend against a spurious warning in conditional
4409 * exp_ch4.adb (Rewrite_Comparison): Reimplemented.
4410 * namet.adb (Finalize): Add a pair of pragma Warnings On/Off to
4411 defend against a spurious warning in conditional compilation.
4412 * output.adb Add a pair of pragma Warnings On/Off to defend
4413 against a spurious warning in conditional compilation.
4414 * sem_eval.adb (Eval_Relational_Op): Major code clean up.
4415 (Fold_General_Op): New routine.
4416 (Fold_Static_Real_Op): New routine.
4417 (Test_Comparison): New routine.
4418 * sem_eval.ads (Test_Comparison): New routine.
4419 * sem_warn.adb (Is_Attribute_Constant_Comparison): New routine.
4420 (Warn_On_Constant_Valid_Condition): New routine.
4421 (Warn_On_Known_Condition): Use Is_Attribute_Constant_Comparison
4422 to detect a specific case.
4423 * sem_warn.adb (Warn_On_Constant_Valid_Condition): New routine.
4424 * urealp.adb (Tree_Read): Add a pair of pragma Warnings On/Off
4425 to defend against a spurious warning in conditional compilation.
4426 (Tree_Write): Add a pair of pragma Warnings On/Off to defend
4427 against a spurious warning in conditional compilation.
4428 * usage.adb Add a pair of pragma Warnings On/Off to defend
4429 against a spurious warning in conditional compilation.
4431 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4433 * sinfo.ads, sem_ch13.adb: Update comment.
4435 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4437 * sem_util.adb (Is_Post_State): A reference to a
4438 generic in out parameter is considered a change in the post-state
4441 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4443 * sem_ch12.adb (Load_Parent_Of_Generic); When retrieving the
4444 declaration of a subprogram instance within its wrapper package,
4445 skip over null statements that may result from the rewriting of
4448 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4450 * exp_attr.adb (Expand_Attribute_Reference, case 'Read):
4451 If the type is an unchecked_union, replace the attribute with
4452 a Raise_Program_Error (rather than inserting such before the
4453 attribute reference) to handle properly the case where we are
4454 processing a component of a larger record, and we need to prevent
4455 further expansion for the unchecked union.
4456 (Expand_Attribute_Reference, case 'Write): If the type is
4457 an unchecked_union, check whether enclosing scope is a Write
4458 subprogram. Replace attribute with a Raise_Program_Error if the
4459 discriminants of the unchecked_union type have not default values
4460 because such a use is erroneous..
4462 2017-04-25 Tristan Gingold <gingold@adacore.com>
4464 * exp_ch9.adb (Expand_N_Task_Type_Declaration):
4465 Add relative_deadline to task record on edf profile.
4466 (Make_Initialize_Protection): Pass deadline_floor value on edf profile.
4467 (Make_Task_Create_Call): Pass relative_deadline value.
4468 * par-prag.adb (Prag): Handle Pragma_Deadline_Floor.
4469 * s-rident.ads (Profile_Name): Add GNAT_Ravenscar_EDF.
4470 (Profile_Info): Add info for GNAT_Ravenscar_EDF.
4471 * sem_prag.adb (Set_Ravenscar_Profile): Handle
4472 GNAT_Ravenscar_EDF (set scheduling policy).
4473 (Analyze_Pragma): Handle GNAT_Ravenscar_EDF profile and Deadline_Floor
4475 (Sig_Flags): Add choice for Pragma_Deadline_Floor.
4476 * snames.ads-tmpl (Name_Deadline_Floor, Name_Gnat_Ravenscar_EDF):
4478 (Pragma_Deadline_Floor): New pragma.
4479 * targparm.adb (Get_Target_Parameters): Recognize
4480 GNAT_Ravenscar_EDF profile.
4482 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
4484 * gnatvsn.ads (Library_Version): Bump to 8. Update comment.
4486 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4488 * sem_aux.adb (Nearest_Ancestor): Use original node of type
4489 declaration to locate nearest ancestor, because derived
4490 type declarations for record types are rewritten as record
4492 * sem_ch13.adb (Add_Call): Use an unchecked conversion to handle
4493 properly derivations that are completions of private types.
4494 (Add_Predicates): If type is private, examine rep. items of full
4495 view, which may include inherited predicates.
4496 (Build_Predicate_Functions): Ditto.
4498 2017-04-25 Javier Miranda <miranda@adacore.com>
4500 * sem_util.adb (New_Copy_Tree.Visit_Entity): Extend previous change
4501 to generate new entities for subtype declarations located in
4502 Expression_With_Action nodes.
4504 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4506 * sem_elab.adb (Check_A_Call): Remove
4507 local variables Is_DIC_Proc and Issue_In_SPARK. Verify the
4508 need for Elaborate_All when SPARK elaboration checks are
4509 required. Update the checks for instances, variables, and calls
4510 to Default_Initial_Condition procedures.
4512 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4514 * aspects.ads, aspects.adb: Make the GNAT-specific pragma No_Inline
4515 into a boolean aspect, in analogy with the Ada aspect No_Return.
4517 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4519 * exp_ch6.adb, sem_ch13.adb, sem_ch6.adb: Minor reformatting.
4521 2017-04-25 Bob Duff <duff@adacore.com>
4523 * sem_res.adb (Resolve_Actuals): Under -gnatd.q, reset
4524 Is_True_Constant for an array variable that is passed to a
4525 foreign function as an 'in' parameter.
4526 * debug.adb: Document -gnatd.q.
4528 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4530 * sem_ch6.adb (Analyze_Expression_Function): If expression function
4531 is completion and return type is an access type do not freeze
4532 designated type: this will be done in the process of freezing
4533 the expression if needed.
4534 (Freeze_Expr_Types): Check whether type is complete before
4535 creating freeze node, to provide a better error message if
4536 reference is premature.
4537 * sem_ch13.adb (Check_Indexing_Functions): Ignore inherited
4538 functions created by type derivations.
4540 2017-04-25 Pascal Obry <obry@adacore.com>
4542 * g-sercom.ads: Add simple usage of GNAT.Serial_Communication.
4544 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4546 * sem_res.adb (Resolve_Type_Conversion):
4547 When resolving against any fixed type, set the type of the
4548 operand as universal real when the operand is a multiplication
4549 or a division where both operands are of any fixed type.
4550 (Unique_Fixed_Point_Type): Add local variable ErrN. Improve the
4551 placement of an error message by pointing to the operand of a
4552 type conversion rather than the conversion itself.
4554 2017-04-25 Thomas Quinot <quinot@adacore.com>
4556 * sem_ch13.adb (Build_Predicate_Function_Declaration): Set
4557 Needs_Debug_Info when producing SCOs.
4559 2017-04-25 Thomas Quinot <quinot@adacore.com>
4561 * exp_ch6.adb (Add_Finalization_Master_Actual_To_Build_In_Place_Call):
4562 Always pass a null finalization master for a library level named access
4563 type to which a pragme No_Heap_Finalization applies.
4565 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
4569 * a-ngcoar.adb, a-ngrear.adb (Inverse): call Unit_Matrix with First_1
4570 set to A'First(2) and vice versa.
4572 2017-04-25 Yannick Moy <moy@adacore.com>
4574 * freeze.adb (Freeze_Record_Type): Remove obsolete
4575 rule on volatile tagged record restriction on SPARK code.
4577 2017-04-25 Yannick Moy <moy@adacore.com>
4579 * sem_prag.adb (minor) Fix SPARK RM reference.
4581 2017-04-25 Yannick Moy <moy@adacore.com>
4583 * sem_util.adb, sem_util.ads (Unique_Defining_Entity): Update
4584 comment to reflect which entity is chosen as unique entity.
4585 (Unique_Entity): Return full view instead of private spec for
4586 protected type or task type. Fix possible incorrect access when
4589 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
4591 * sem_res.adb (Set_Slice_Subtype): Treat specially bit-packed
4592 array types only instead of all packed array types.
4594 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4596 * sem_ch6.adb (Conforming_Types): If type of formal as a specified
4597 dimension system, verify that dimensions of both match.
4598 (Check_Conformance): Add error message in case of dimension
4600 * sem_dim.ads, sem_dim.adb (Dimensions_Match): New utility
4603 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
4605 * gnatxref.adb, gnatfind.adb: Avoid using the term project file,
4608 2017-04-25 Yannick Moy <moy@adacore.com>
4610 * sem_util.adb: Minor refactoring.
4611 * freeze.adb (Freeze_Record_Type): Fix checking of SPARK RM 7.1.3(5).
4613 2017-04-25 Claire Dross <dross@adacore.com>
4615 * sem_prag.adb (Collect_Inherited_Class_Wide_Conditions): Go to
4616 ultimate alias when accessing overridden operation. Indeed, if the
4617 overridden operation is itself inherited, it won't have any explicit
4620 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4622 * sem_warn.adb (Warn_On_Overlapping_Actuals): There can be no
4623 overlap if the two formals have different types, because formally
4624 the corresponding actuals cannot designate the same objects.
4626 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4628 * sem_dim.adb (Dimensions_Of_Operand): minot cleanups: a) If
4629 dimensions are present from context, use them. b) If operand is
4630 a static constant rewritten as a literal, obtain the dimensions
4631 from the original declaration, otherwise use dimensions of type
4632 established from context.
4634 2017-04-25 Yannick Moy <moy@adacore.com>
4636 * sem_util.adb (Is_Effectively_Volatile): Protect against base type
4637 of array that is private.
4639 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4641 * sem_ch3.adb, exp_util.adb, sem_prag.adb, exp_ch4.adb: Minor
4644 2017-04-25 Yannick Moy <moy@adacore.com>
4646 * a-ngelfu.adb, a-ngelfu.ads: Add SPARK_Mode On on spec, Off
4649 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4651 * sem_disp.adb (Check_Dispatching_Context): Add guard to refine
4652 the check that recognizes a call to a private overridding and
4653 replaces the called subprogram with its alias.
4655 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4657 * exp_util.adb: Minor reformatting.
4659 2017-04-25 Justin Squirek <squirek@adacore.com>
4661 * exp_ch3.adb (Freeze_Type): Add condition to always treat
4662 interface types as a partial view of a private type for the
4663 generation of invariant procedure bodies.
4664 * exp_util.adb, exp_util.ads (Add_Inherited_Invariants):
4665 Add a condition to get the Corresponding_Record_Type for
4666 concurrent types, add condition to return in the absence of a
4667 class in the pragma, remove call to Replace_Type_References,
4668 and add call to Replace_References.
4669 (Add_Interface_Invariatns),
4670 (Add_Parent_Invariants): Modify call to Add_Inherited_Invariants
4671 to including the working type T.
4672 (Add_Own_Invariants): Remove
4673 legacy condition for separate units, remove dispatching for ASIS
4674 and save a copy of the expression in the pragma expression.
4675 (Build_Invariant_Procedure_Body): Default initalize vars,
4676 remove return condition on interfaces, always use the
4677 private type for interfaces, and move the processing of types
4678 until after the processing of invariants for the full view.
4679 (Build_Invariant_Procedure_Declaration): Remove condition
4680 to return if an interface type is encountered and add
4681 condition to convert the formal parameter to its class-wide
4682 counterpart if Work_Typ is abstract.
4683 (Replace_Type): Add call to Remove_Controlling_Arguments.
4684 (Replace_Type_Ref): Remove class-wide dispatching for the current
4685 instance of the type.
4686 (Replace_Type_References): Remove parameter "Derived"
4687 (Remove_Controlling_Arguments): Created in order to removing
4688 the controlliong argument from calls to primitives in the case
4689 of the formal parameter being an class-wide abstract type.
4690 * sem_ch3.adb (Build_Assertion_Bodies_For_Type): Almost identical
4691 to the change made to Freeze_Type in exp_ch3. Add a condition
4692 to treat interface types as a partial view.
4693 * sem_prag.adb (Analyze_Pragma): Modify parameters in the call
4694 to Build_Invariant_Procedure_Declaration to properly generate a
4695 "partial" invariant procedure when Typ is an interface.
4697 2017-04-25 Bob Duff <duff@adacore.com>
4699 * a-numeri.ads: Go back to using brackets encoding for the Greek
4702 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4704 * sem_ch3.adb (Derive_Subprogram): Implement rule in RM 6.1.1
4705 (10-15): if derived type T with progenitors is abstract,
4706 and primitive P of this type inherits non-trivial classwide
4707 preconditions from both a parent operation and from an interface
4708 operation, then the inherited operation is abstract if the parent
4709 operation is not null.
4710 * sem_disp.ads, sem_disp.adb: replace function Covers_Some_Interface
4711 with Covered_Interface_Op to yield the actual interface operation
4712 that is implemented by a given inherited operation.
4714 2017-04-25 Javier Miranda <miranda@adacore.com>
4716 * exp_ch4.adb (Expand_N_Op_Expon): Relocate left
4717 and right operands after performing the validity checks. Required
4718 because validity checks may remove side effects from the operands.
4720 2017-04-25 Javier Miranda <miranda@adacore.com>
4722 * exp_attr.adb (Attribute_Unrestricted_Access):
4723 Do not disable implicit type conversion. Required to generate
4724 code that displaces the pointer to reference the secondary
4727 2017-04-25 Pascal Obry <obry@adacore.com>
4729 * prj-attr.adb, snames.ads-tmpl: Add package Install's
4730 Required_Artifacts attribute.
4732 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4734 * sem_util.adb (Same_Value): String literals are compile-time
4735 values, and comparing them must use Expr_Value_S.
4737 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4739 * sem_ch4.adb (Complete_Object_Interpretation): If an explicit
4740 dereference is introduced for the object, and the object is
4741 overloaded, do not check whether it is aliased, because it may
4742 include an implicit dereference.
4743 * sem_type.adb (Disambiguate): If two interpretations are access
4744 attribute types with the same designated type keep either of
4745 them and do not report an ambiguity. A true ambiguity will be
4748 2017-04-25 Bob Duff <duff@adacore.com>
4750 * a-numeri.ads: Change the encoding of Greek letter Pi from
4751 brackets encoding to UTF-8. Use pragma Wide_Character_Encoding
4752 to indicate the encoding. We considered using a byte order mark
4753 (BOM), but that causes various trouble (misc software eats the
4754 BOM, if you have a patch with a BOM, then it's not at the start
4755 of the patch, so it's not a BOM, the BOM affects with-ing files,
4757 * scng.adb, s-wchcnv.adb: Minor.
4759 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4761 * sem_ch3.adb, sem_ch8.adb, sem_disp.adb: Minor reformatting.
4762 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4764 * sem_ch3.adb (Add_Internal_Interface_Entities): Move
4765 Has_Non_Trivial_Precondition to sem_util. for use elsewhere.
4766 Improve error message on operations that inherit non-conforming
4767 classwide preconditions from ancestor and progenitor.
4768 * sem_util.ads, sem_util.adb (Has_Non_Trivial_Precondition):
4769 moved here from sem_ch3.
4770 * sem_ch8.adb (Analyze_Subprogram_Renaming): Implement legality
4771 check given in RM 6.1.1 (17) concerning renamings of overriding
4772 operations that inherits class-wide preconditions from ancestor
4775 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4777 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Code cleanup.
4778 (Build_Adjust_Statements): Code cleanup.
4779 (Build_Finalizer): Update the initialization of
4781 (Build_Finalize_Statements): Code cleanup.
4782 (Build_Initialize_Statements): Code cleanup.
4783 (Make_Deep_Array_Body): Update the initialization of
4785 (Make_Deep_Record_Body): Update the initialization of Exceptions_OK.
4786 (Process_Object_Declaration): Generate a null exception handler only
4787 when exceptions are allowed.
4788 (Process_Transients_In_Scope): Update the initialization of
4790 * exp_util.ads, exp_util.adb (Exceptions_In_Finalization_OK): New
4792 * sem_ch11.adb (Analyze_Exception_Handlers): Do not check any
4793 restrictions when the handler is internally generated and the
4796 2017-04-25 Ed Schonberg <schonberg@adacore.com>
4798 * sem_ch3.adb (Has_Non_Trivial_Precondition): New predicate to
4799 enforce legality rule on classwide preconditions inherited from
4800 both an ancestor and a progenitor (RM 6.1.1 (10-13).
4801 * sem_disp.adb (Check_Dispatching_Context): A call to an abstract
4802 subprogram need not be dispatching if it appears in a precondition
4803 for an abstract or null subprogram.
4805 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4807 * sem_ch10.adb: Minor typo fix.
4809 2017-04-25 Arnaud Charlet <charlet@adacore.com>
4811 * gcc-interface/Makefile.in: Cleanup VxWorks targets.
4813 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
4815 * fname.adb (Is_Internal_File_Name): Arrange for the slices to
4816 have a length which is a power of 2.
4817 (Is_Predefined_File_Name): Likewise. Adjust comment.
4819 2017-04-25 Bob Duff <duff@adacore.com>
4821 * exp_aggr.adb (Component_Count): Protect the
4822 arithmetic from attempting to convert a value >= 2**31 to Int,
4823 which would otherwise raise Constraint_Error.
4825 2017-04-25 Bob Duff <duff@adacore.com>
4827 * opt.ads (Locking_Policy): Fix incorrect documentation. The
4828 first character of the policy name is not unique.
4830 2017-04-25 Bob Duff <duff@adacore.com>
4832 * s-fileio.adb (Name): Raise Use_Error if the file is a temp file.
4833 * s-ficobl.ads (Is_Temporary_File): Remove incorrect comment
4834 about this flag not being used. It was already used, and it is
4837 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4839 * einfo.adb Flag301 is now known as Ignore_SPARK_Mode_Pragmas.
4840 (Ignore_SPARK_Mode_Pragmas): New routine.
4841 (Set_Ignore_SPARK_Mode_Pragmas): New routine.
4842 (Write_Entity_Flags): Add an entry for Ignore_SPARK_Mode_Pragmas.
4843 * einfo.ads Add new attribute Ignore_SPARK_Mode_Pragmas and update
4845 (Ignore_SPARK_Mode_Pragmas): New routine
4846 along with pragma Inline.
4847 (Set_Ignore_SPARK_Mode_Pragmas): New routine along with pragma Inline.
4848 * opt.ads Rename flag Ignore_Pragma_SPARK_Mode to
4849 Ignore_SPARK_Mode_Pragmas_In_Instance.
4850 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
4851 Save and restore the value of global flag
4852 Ignore_SPARK_Mode_Pragmas_In_Instance. Set or reinstate the value
4853 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance when either
4854 the corresponding spec or the body must ignore all SPARK_Mode
4855 pragmas found within.
4856 (Analyze_Subprogram_Declaration): Mark
4857 the spec when it needs to ignore all SPARK_Mode pragmas found
4858 within to allow the body to infer this property in case it is
4859 instantiated or inlined later.
4860 * sem_ch7.adb (Analyze_Package_Body_Helper): Save and restore the
4861 value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
4862 the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
4863 when the corresponding spec also ignored all SPARK_Mode pragmas
4865 (Analyze_Package_Declaration): Mark the spec when
4866 it needs to ignore all SPARK_Mode pragmas found within to allow
4867 the body to infer this property in case it is instantiated or
4869 * sem_ch12.adb (Analyze_Formal_Package_Declaration):
4870 Save and restore the value of flag
4871 Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
4872 formal spec when it needs to ignore all SPARK_Mode
4873 pragmas found within to allow the body to infer this
4874 property in case it is instantiated or inlined later.
4875 (Analyze_Package_Instantiation): Save and restore the value
4876 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark
4877 the instance spec when it needs to ignore all SPARK_Mode
4878 pragmas found within to allow the body to infer this
4879 property in case it is instantiated or inlined later.
4880 (Analyze_Subprogram_Instantiation): Save and restore the value
4881 of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Mark the
4882 instance spec and anonymous package when they need to ignore
4883 all SPARK_Mode pragmas found within to allow the body to infer
4884 this property in case it is instantiated or inlined later.
4885 (Instantiate_Package_Body): Save and restore the value of global
4886 flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set the value of
4887 global flag Ignore_SPARK_Mode_Pragmas_In_Instance when the
4888 corresponding instance spec also ignored all SPARK_Mode pragmas
4890 (Instantiate_Subprogram_Body): Save and restore the
4891 value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance. Set
4892 the value of global flag Ignore_SPARK_Mode_Pragmas_In_Instance
4893 when the corresponding instance spec also ignored all SPARK_Mode
4894 pragmas found within.
4895 * sem_prag.adb (Analyze_Pragma): Update the reference to
4896 Ignore_Pragma_SPARK_Mode.
4897 * sem_util.adb (SPARK_Mode_Is_Off): A construct which ignored
4898 all SPARK_Mode pragmas defined within yields mode "off".
4900 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4902 * bindgen.adb, exp_dbug.adb, errout.adb, fname.adb: Minor reformatting.
4904 2017-04-25 Bob Duff <duff@adacore.com>
4906 * exp_atag.adb (Build_CW_Membership): Add "Suppress =>
4907 All_Checks" to avoid generating unnecessary checks.
4908 * exp_ch4.adb (Expand_N_In, Make_Tag_Check): Add "Suppress =>
4910 * sem.ads: Fix comment.
4911 * expander.ads: Fix comment.
4912 * exp_atag.ads: Fix comment: "Index = 0" should be
4915 2017-04-25 Gary Dismukes <dismukes@adacore.com>
4917 * s-taprop-linux.adb: Minor editorial fixes.
4919 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
4921 * sem_util.adb (New_Copy_Tree): Put back the declarations of the
4922 hash tables at library level. Reinstate the NCT_Hash_Tables_Used
4923 variable and set it to True whenever the main hash table is
4924 populated. Short- circuit the Assoc function if it is false
4925 and add associated guards.
4927 2017-04-25 Olivier Hainque <hainque@adacore.com>
4929 * bindgen.adb (Gen_Elab_Calls): Also update counter of lone
4930 specs without elaboration code that have an elaboration counter
4931 nevertheless, e.g. when compiled with -fpreserve-control-flow.
4932 * sem_ch10.adb (Analyze_Compilation_Unit):
4933 Set_Elaboration_Entity_Required when requested to preserve
4934 control flow, to ensure the unit elaboration is materialized at
4935 bind time, resulting in the inclusion of the unit object file
4936 in the executable closure at link time.
4938 2017-04-25 Pierre-Marie de Rodat <derodat@adacore.com>
4940 * exp_dbug.adb: In Debug_Renaming_Declaration,
4941 when dealing with indexed component, accept to produce a renaming
4942 symbol when the index is an IN parameter or when it is a name
4943 defined in an outer scope.
4945 2017-04-25 Yannick Moy <moy@adacore.com>
4947 * errout.adb (Error_Msg): Adapt continuation
4948 message in instantiations and inlined bodies for info messages.
4950 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
4952 * fname.adb (Has_Internal_Extension): Add pragma Inline.
4953 Use direct 4-character slice comparisons.
4955 pragma Inline. (Has_Suffix): Delete.
4956 (Is_Internal_File_Name):
4957 Test Is_Predefined_File_Name first.
4958 (Is_Predefined_File_Name):
4959 Use direct slice comparisons as much as possible and limit all
4960 comparisons to at most 8 characters.
4962 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4964 * checks.adb (Insert_Valid_Check): Code cleanup.
4965 * exp_ch6.adb (Add_Validation_Call_By_Copy_Code): New routine.
4966 (Expand_Actuals): Generate proper copy-back for a validation
4967 variable when it acts as the argument of a type conversion.
4968 * sem_util.adb (Is_Validation_Variable_Reference): Augment the
4969 predicate to operate on type qualifications.
4971 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
4973 * sem_prag.adb, exp_ch6.adb, binde.adb, sem_disp.adb, s-fileio.adb:
4976 2017-04-25 Bob Duff <duff@adacore.com>
4978 * sem_prag.adb (No_Return): Give an error if the pragma applies
4979 to a body. Specialize the error for the specless body case,
4980 as is done for (e.g.) pragma Convention.
4981 * debug.adb: Add switch -gnatd.J to disable the above legality
4982 checks. This is mainly for use in our test suite, to avoid
4983 rewriting a lot of illegal (but working) code. It might also
4984 be useful to customers. Under this switch, if a pragma No_Return
4985 applies to a body, and the procedure raises an exception (as it
4986 should), the pragma has no effect. If the procedure does return,
4987 execution is erroneous.
4989 2017-04-25 Bob Duff <duff@adacore.com>
4991 * exp_ch6.adb (Expand_Actuals): This is the
4992 root of the problem. It took N as an 'in out' parameter, and in
4993 some cases, rewrote N, but then set N to Original_Node(N). So
4994 the node returned in N had no Parent. The caller continued
4995 processing of this orphaned node. In some cases that caused a
4996 crash (e.g. Remove_Side_Effects climbs up Parents in a loop,
4997 and trips over the Empty Parent). The solution is to make N an
4998 'in' parameter. Instead of rewriting it, return the list of
4999 post-call actions, so the caller can do the rewriting later,
5000 after N has been fully processed.
5001 (Expand_Call_Helper): Move most of Expand_Call here. It has
5002 too many premature 'return' statements, and we want to do the
5003 rewriting on return.
5004 (Insert_Post_Call_Actions): New procedure to insert the post-call
5005 actions in the appropriate place. In the problematic case,
5006 that involves rewriting N as an Expression_With_Actions.
5007 (Expand_Call): Call the new procedures Expand_Call_Helper and
5008 Insert_Post_Call_Actions.
5010 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5012 * sem_prag.adb (Inherits_Class_Wide_Pre): Cleanup code, handle
5013 properly type derived from generic formal types, to handle
5014 properly modified version of ACATS 4.1B B611017.
5016 2017-04-25 Javier Miranda <miranda@adacore.com>
5018 * exp_unst.adb (Subp_Index): Adding missing
5019 support for renamings and functions that return a constrained
5020 array type (i.e. functions for which the frontend built a
5021 procedure with an extra out parameter).
5023 2017-04-25 Pascal Obry <obry@adacore.com>
5025 * s-string.adb: Minor code clean-up.
5027 2017-04-25 Bob Duff <duff@adacore.com>
5029 * s-os_lib.ads, s-os_lib.adb (Non_Blocking_Wait_Process): New
5031 * adaint.h, adaint.c (__gnat_portable_no_block_wait): C support
5032 function for Non_Blocking_Wait_Process.
5034 2017-04-25 Bob Duff <duff@adacore.com>
5036 * prep.adb (Preprocess): Remove incorrect
5037 Assert. Current character can be ASCII.CR.
5039 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5041 * sem_prag.adb (Set_Convention_From_Pragma): Cleanup code for
5042 convention Stdcall, which has a number of exceptions. Convention
5043 is legal on a component declaration whose type is an anonymous
5044 access to subprogram.
5046 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5048 * sem_ch4.adb: sem_ch4.adb Various reformattings.
5049 (Try_One_Prefix_Interpretation): Use the base type when dealing
5050 with a subtype created for purposes of constraining a private
5051 type with discriminants.
5053 2017-04-25 Javier Miranda <miranda@adacore.com>
5055 * einfo.ads, einfo.adb (Has_Private_Extension): new attribute.
5056 * warnsw.ads, warnsw.adb (All_Warnings): Set warning on late
5057 dispatching primitives (Restore_Warnings): Restore warning on
5058 late dispatching primitives (Save_Warnings): Save warning on late
5059 dispatching primitives (Do_Warning_Switch): Use -gnatw.j/-gnatw.J
5060 to enable/disable this warning.
5061 (WA_Warnings): Set warning on late dispatching primitives.
5062 * sem_ch3.adb (Analyze_Private_Extension_Declaration): Remember
5063 that its parent type has a private extension.
5064 * sem_disp.adb (Warn_On_Late_Primitive_After_Private_Extension):
5066 * usage.adb: Document -gnatw.j and -gnatw.J.
5068 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5070 * exp_ch7.adb, checks.adb, sem_prag.adb, eval_fat.adb: Minor
5073 2017-04-25 Bob Duff <duff@adacore.com>
5075 * binde.adb (Validate): Do not pass dynamic strings
5076 to pragma Assert, because older compilers do not support that.
5078 2017-04-25 Bob Duff <duff@adacore.com>
5080 * s-fileio.adb (Close): When a temp file is
5081 closed, delete it and clean up its Temp_File_Record immediately,
5082 rather than waiting until later.
5083 (Temp_File_Record): Add File
5084 component, so Close can know which Temp_File_Record corresponds
5085 to the file being closed.
5086 (Delete): Don't delete temp files,
5087 because they are deleted by Close.
5088 (Open): Set the File component
5089 of Temp_File_Record. This requires moving the creation of the
5090 Temp_File_Record to the end, after the AFCB has been created.
5092 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5094 * checks.adb (Insert_Valid_Check): Do not generate
5095 a validity check when inside a generic.
5097 2017-04-25 Yannick Moy <moy@adacore.com>
5099 * sem_res.adb (Resolve_Type_Conversion): Fix bad logic.
5101 2017-04-25 Arnaud Charlet <charlet@adacore.com>
5103 * snames.ads-tmpl (Snames): More names for detecting predefined
5104 potentially blocking subprograms.
5106 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5108 * sem_prag.adb (Analyze_Pre_Post_Condition): The rules
5109 concerning inheritance of class-wide preconditions do not apply
5112 2017-04-25 Bob Duff <duff@adacore.com>
5114 * s-ficobl.ads: Minor comment fix.
5116 2017-04-25 Yannick Moy <moy@adacore.com>
5118 * checks.adb (Apply_Scalar_Range_Check): Analyze precisely
5119 conversions from float to integer in GNATprove mode.
5120 (Apply_Type_Conversion_Checks): Make sure in GNATprove mode
5121 to call Apply_Type_Conversion_Checks, so that range checks
5122 are properly positioned when needed on conversions, including
5123 when converting from float to integer. (Determine_Range): In
5124 GNATprove mode, take into account the possibility of conversion
5125 from float to integer.
5126 * sem_res.adb (Resolve_Type_Conversion): Only enforce range
5127 check on conversions from fixed-point to integer, not anymore
5128 on conversions from floating-point to integer, when in GNATprove
5131 2017-04-25 Yannick Moy <moy@adacore.com>
5133 * checks.adb (Determine_Range_R): Special case type conversions
5134 from integer to float in order to get bounds in that case too.
5135 * eval_fat.adb (Machine): Avoid issuing warnings in GNATprove
5136 mode, for computations involved in interval checking.
5138 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5140 * checks.adb (Insert_Valid_Check): Partially reimplement validity
5142 * einfo.adb Node36 is now used as Validated_Object.
5143 (Validated_Object): New routine.
5144 (Set_Validated_Object): New routine.
5145 (Write_Field36_Name): Add an entry for Validated_Object.
5146 * einfo.ads Add new attribute Validated_Object along with
5148 (Validated_Object): New routine along with pragma Inline.
5149 (Set_Validated_Object): New routine along with pragma Inline.
5150 * exp_attr.adb (Make_Range_Test): Add processing for validation
5151 variables to avoid extra reads and copies of the prefix.
5152 * exp_ch6.adb (Expand_Actuals): Add copy-back for validation
5153 variables in order to reflect any changes done in the variable
5154 back into the original object.
5155 * sem_util.adb (Is_Validation_Variable_Reference): New routine.
5156 * sem_util.ads (Is_Validation_Variable_Reference): New routine.
5158 2017-04-25 Steve Baird <baird@adacore.com>
5160 * exp_ch7.adb (Build_Array_Deep_Procs,
5161 Build_Record_Deep_Procs, Make_Finalize_Address_Body): Don't
5162 generate Finalize_Address routines for CodePeer.
5164 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5166 * sem_prag.adb (Inherits_Class_Wide_Pre): subsidiary of
5167 Analyze_Pre_Post_Condition, to implement the legality checks
5168 mandated by AI12-0131: Pre'Class shall not be specified for an
5169 overriding primitive subprogram of a tagged type T unless the
5170 Pre'Class aspect is specified for the corresponding primitive
5171 subprogram of some ancestor of T.
5173 2017-04-25 Bob Duff <duff@adacore.com>
5175 * sem_ch8.adb (Use_One_Type): If a use_type_clause
5176 is redundant, set its Used_Operations to empty. This is only
5177 necessary for use clauses that appear in the parent of a generic
5178 child unit, because those use clauses get reanalyzed when we
5179 instantiate the generic, and we don't want the Used_Operations
5180 carried over from the original context (where it was probably
5183 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5185 * exp_ch6.adb: Minor reformatting.
5187 2017-04-25 Bob Duff <duff@adacore.com>
5189 * sem_prag.adb (Process_Restrictions_Or_Restriction_Warnings):
5190 Use Source_Index (Current_Sem_Unit) to find the correct casing.
5191 * exp_prag.adb (Expand_Pragma_Check): Use Source_Index
5192 (Current_Sem_Unit) to find the correct casing.
5193 * par.adb (Par): Null out Current_Source_File, to ensure that
5194 the above bugs won't rear their ugly heads again.
5196 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5198 * sem_ch8.adb (Find_Type): For an attribute reference
5199 'Class, if prefix type is synchronized and previous errors
5200 have suppressed the creation of the corresponding record type,
5201 create a spurious class-wide for the synchonized type itself,
5202 to catch other misuses of the attribute
5204 2017-04-25 Steve Baird <baird@adacore.com>
5206 * exp_ch6.adb (Expand_Simple_Function_Return): if CodePeer_Mode
5207 is True, then don't generate the accessibility check for the
5208 tag of a tagged result.
5209 * exp_intr.adb (Expand_Dispatching_Constructor_Call):
5210 if CodePeer_Mode is True, then don't generate the
5211 tag checks for the result of call to an instance of
5212 Ada.Tags.Generic_Dispatching_Constructor (i.e., both the "is a
5213 descendant of" check and the accessibility check).
5215 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5217 * sem_ch13.adb: Code cleanups.
5218 * a-strbou.ads: minor whitespace fix in Trim for bounded strings.
5219 * sem_ch8.ads: Minor comment fix.
5221 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5223 * exp_ch4.adb (Library_Level_Target): New function.
5224 (Expand_Concatenate): When optimization is enabled, also expand
5225 the operation out-of-line if the concatenation is present within
5226 the expression of the declaration of a library-level object and
5227 not only if it is the expression of the declaration.
5229 2017-04-25 Bob Duff <duff@adacore.com>
5231 * freeze.adb (Freeze_Object_Declaration): Do
5232 not Remove_Side_Effects if there is a pragma Linker_Section,
5233 because in that case we want static initialization in the
5234 appropriate section.
5236 2017-04-25 Gary Dismukes <dismukes@adacore.com>
5238 * exp_dbug.adb: Minor rewording and reformatting.
5240 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5242 * sem_attr.adb (Statically_Denotes_Object): New predicate, to
5243 handle the proposed changes to rules concerning potentially
5244 unevaluated expressions, to include selected components that
5245 do not depend on discriminants, and indexed components with
5247 * sem_util.adb (Is_Potentially_Unevaluated): Add check for
5248 predicate in quantified expression, and fix bugs in the handling
5249 of case expressions and membership test.
5250 (Analyze_Attribute_Old_Result): use new predicate.
5251 (Analyze_Attribute, case Loop_Entry): ditto.
5253 2017-04-25 Bob Duff <duff@adacore.com>
5255 * s-secsta.adb (SS_Info): Add a comment
5256 explaining why we don't need to walk all the chunks in order to
5257 compute the total size.
5259 2017-04-25 Bob Duff <duff@adacore.com>
5261 * namet.ads, namet.adb (Global_Name_Buffer): Increase the length
5262 of the global name buffer to 4*Max_Line_Length.
5264 2017-04-25 Javier Miranda <miranda@adacore.com>
5266 * exp_ch8.adb (Expand_N_Object_Renaming_Declaration): When creating a
5267 renaming entity for debug information, mark the entity as needing debug
5268 info if it comes from sources.
5270 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5272 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Remove the
5273 restriction converning the use of 'Address where the prefix is
5274 of a controlled type.
5276 2017-04-25 Pierre-Marie de Rodat <derodat@adacore.com>
5278 * exp_dbug.adb: In Debug_Renaming_Declaration,
5279 skip slices that are made redundant by an indexed component
5281 * atree.h: New definition for Original_Node.
5283 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5285 * sem_prag.adb, sem_prag.ads: Minor reformatting.
5287 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5289 * sem_ch3.adb (Check_Entry_Contract): Call
5290 Preanalyze_Spec_Expression so that resolution takes place as well.
5291 * sem_util.adb (Check_Internal_Protected_Use): Reject properly
5292 internal calls that appear in preconditions of protected
5293 operations, in default values for same, and in contract guards
5294 for contract cases in SPARK.
5296 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5298 * a-numaux.ads: Fix description of a-numaux-darwin
5300 (Double): Define to Long_Float.
5301 * a-numaux-vxworks.ads (Double): Likewise.
5302 * a-numaux-darwin.ads
5304 * a-numaux-libc-x86.ads (Double): Define to Long_Long_Float.
5305 * a-numaux-x86.ads: Fix package description.
5306 * a-numaux-x86.adb (Is_Nan): Minor tweak.
5307 (Reduce): Adjust and complete description. Call Is_Nan instead of
5308 testing manually. Use an integer temporary to hold rounded value.
5309 * a-numaux-darwin.adb (Reduce): Likewise.
5310 (Is_Nan): New function.
5312 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5314 * sem_ch4.adb (Analyze_Selected_Component): Additional refinement
5315 on analysis of prefix whose type is a current instance of a
5316 synchronized type, but where the prefix itself is an entity that
5319 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5321 * exp_ch5.adb (Replace_Target): When rewriting the RHS, preserve
5322 the identity of callable entities therein, because they have been
5323 properly resolved, and prefixed calls may have been rewritten
5326 2017-04-25 Patrick Bernardi <bernardi@adacore.com>
5328 * exp_ch3.adb (Build_Init_Statements): Convert
5329 the expression of the pragma/aspect Secondary_Stack_Size to
5330 internal type System.Parameters.Size_Type before assigning
5331 it to the Secondary_Stack_Size component of the task type's
5332 corresponding record.
5334 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5336 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal
5337 (etc) optimizations when the type is modular and the offsets
5340 2017-04-25 Eric Botcazou <ebotcazou@adacore.com>
5342 * s-osinte-freebsd.ads: Minor comment tweaks
5344 2017-04-25 Javier Miranda <miranda@adacore.com>
5346 * urealp.adb (UR_Write): Reverse previous patch
5347 adding documentation on why we generate multiplications instead
5348 of divisions (needed to avoid expressions whose computation with
5349 large numbers may cause division by 0).
5351 2017-04-25 Bob Duff <duff@adacore.com>
5353 * erroutc.adb (Set_Specific_Warning_Off,
5354 Set_Warnings_Mode_Off): Use the correct source file for
5355 Stop. Was using Current_Source_File, which is only valid during
5356 parsing. Current_Source_File will have a leftover value from
5357 whatever file happened to be parsed last, because of a with_clause
5360 2017-04-25 Bob Duff <duff@adacore.com>
5362 * lib.ads, lib.adb (In_Internal_Unit): New functions similar
5363 to In_Predefined_Unit, but including GNAT units.
5364 * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): Replace
5365 with Should_Ignore_Pragma_Par and Should_Ignore_Pragma_Sem,
5366 because Should_Ignore_Pragma was not working reliably outside
5367 the parser, because Current_Source_File is not valid.
5368 * sem_prag.adb, exp_prag.adb: Call Should_Ignore_Pragma_Sem.
5369 * par-prag.adb: Call Should_Ignore_Pragma_Par.
5371 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
5373 * gnat1drv.adb (Gnat1Drv): Disable Generate_Processed_File in
5376 2017-04-25 Javier Miranda <miranda@adacore.com>
5378 * urealp.adb (UR_Write): Fix output of constants with a base other
5381 2017-04-25 Justin Squirek <squirek@adacore.com>
5383 * sem_ch13.adb (Get_Interfacing_Aspects): Moved to sem_util.adb.
5384 * sem_prag.adb (Analyze_Pragma, Process_Import_Or_Interface):
5385 Add extra parameter for Process_Interface_Name.
5386 (Process_Interface_Name): Add parameter for pragma to analyze
5387 corresponding aspect.
5388 * sem_util.ads, sem_util.adb (Get_Interfacing_Aspects): Added
5391 2017-04-25 Gary Dismukes <dismukes@adacore.com>
5393 * exp_ch7.adb, einfo.ads, sem_prag.adb: Minor reformatting and typo
5396 2017-04-25 Yannick Moy <moy@adacore.com>
5398 * sem_res.adb (Resolve_Comparison_Op): Do not
5399 attempt evaluation of relational operations inside assertions.
5401 2017-04-25 Justin Squirek <squirek@adacore.com>
5403 * exp_util.adb (Add_Interface_Invariants):
5404 Restored, code moved back from Build_Invariant_Procedure_Body.
5405 (Add_Parent_Invariants): Restored, code moved back from
5406 Build_Invariant_Procedure_Body.
5407 (Build_Invariant_Procedure_Body):
5408 Remove refactored calls and integrated code from
5409 Add_Parent_Invariants and Add_Interface_Invariants.
5411 2017-04-25 Johannes Kanig <kanig@adacore.com>
5413 * errout.adb (Output_Messages): Adjust computation of total
5415 * erroutc.adb (Error_Msg): In statistics counts, deal
5416 correctly with informational messages that are not warnings.
5417 * errutil.adb (Finalize): adjust computation of total errors.
5419 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
5421 * terminals.c (__gnat_terminate_pid): New.
5422 * g-exptty.ads (Terminate_Process): New. Update comments.
5424 2017-04-25 Arnaud Charlet <charlet@adacore.com>
5426 * a-cfinve.ads, a-cofove.ads (Empty_Vector): add Global contract.
5428 2017-04-25 Justin Squirek <squirek@adacore.com>
5430 * sem_ch3.adb (Analyze_Declarations): Minor
5431 correction to comments, move out large conditional and scope
5432 traversal into a predicate.
5433 (Uses_Unseen_Lib_Unit_Priv): Predicate function made from extracted
5436 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5438 * sem_ch4.adb (Analyze_Selected_Component): Refine analysis
5439 of prefix whose type is a current instance of a synchronized
5440 type. If the prefix is an object this is an external call (or
5441 requeue) that can only access public operations of the object. The
5442 previous predicate was too restrictive, and did not allow public
5443 protected operations, only task entries.
5445 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5447 * sem_ch5.adb, fname.adb: Minor reformatting.
5449 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5451 * einfo.adb (Is_Anonymous_Access_Type): New routine.
5452 * einfo.ads Update the placement of
5453 E_Anonymous_Access_Subprogram_Type along with all subtypes that
5455 (Is_Anonymous_Access_Type): New routine.
5456 * exp_ch7.adb (Allows_Finalization_Master): Do not generate a
5457 master for an access type subject to pragma No_Heap_Finalization.
5458 * exp_util.adb (Build_Allocate_Deallocate_Proc): An object being
5459 allocated or deallocated does not finalization actions if the
5460 associated access type is subject to pragma No_Heap_Finalization.
5461 * opt.ads Add new global variable No_Heap_Finalization_Pragma.
5462 * par-prag.adb Pragma No_Heap_Finalization does not need special
5463 processing from the parser.
5464 * sem_ch6.adb (Check_Return_Subtype_Indication): Remove ancient
5465 ??? comments. Use the new predicate Is_Anonymous_Access_Type.
5466 * sem_prag.adb Add an entry in table Sig_Flags for pragma
5467 No_Heap_Finalization.
5468 (Analyze_Pragma): Add processing for
5469 pragma No_Heap_Finalization. Update various error messages to
5470 use Duplication_Error.
5471 * sem_util.ads, sem_util.adb (No_Heap_Finalization): New routine.
5472 * snames.ads-tmpl: Add new predefined name No_Heap_Finalization
5473 and corresponding pragma id.
5475 2017-04-25 Bob Duff <duff@adacore.com>
5477 * freeze.adb (Freeze_Record_Type): Use the
5478 underlying type of the component type to determine whether it's
5479 elementary. For representation clause purposes, a private type
5480 should behave the same as its full type.
5481 * fname.ads, fname.adb (Is_Predefined_File_Name):
5482 Make sure things like "system.ali" are recognized as predefined.
5484 2017-04-25 Javier Miranda <miranda@adacore.com>
5486 * debug.adb: Update documentation of -gnatd.6.
5488 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5490 * sem_ch5.adb (Preanalyze_Range): Handle properly an Ada2012
5491 element iterator when the name is an overloaded function call,
5492 one of whose interpretations yields an array.
5494 2017-04-25 Bob Duff <duff@adacore.com>
5496 * uname.ads, uname.adb (Is_Predefined_Unit_Name,
5497 Is_Internal_Unit_Name): New functions for operating on unit
5498 names, as opposed to file names. There's some duplicated code
5499 with fname.adb, which is unfortunate, but it seems like we don't
5500 want to add dependencies here.
5501 * fname-uf.adb (Get_File_Name): Change Is_Predefined_File_Name
5502 to Is_Predefined_Unit_Name; the former was wrong, because Uname
5503 is not a file name at all.
5504 * fname.ads, fname.adb: Document the fact that
5505 Is_Predefined_File_Name and Is_Internal_File_Name can be called
5506 for ALI files, and fix the code so it works properly for ALI
5507 files. E.g. these should return True for "system.ali".
5509 2017-04-25 Justin Squirek <squirek@adacore.com>
5511 * exp_util.adb (Add_Invariant): Removed,
5512 code moved to Add_Invariant_Check, Add_Inherited_Invariant,
5513 and Add_Own_Invariant. (Add_Invariant_Check): Used
5514 for adding runtime checks from any kind of invariant.
5515 (Add_Inherited_Invariant): Generates invariant checks for
5516 class-wide invariants (Add_Interface_Invariants): Removed, code
5517 moved to Build_Invariant_Procedure_Body (Add_Own_Invariant):
5518 Create a types own invariant procedure (Add_Parent_Invariants):
5519 Removed, code moved to Build_Invariant_Procedure_Body
5520 (Build_Invariant_Procedure_Body): Add refactored calls
5521 and integrated code from Add_Parent_Invariants and
5522 Add_Interface_Invariants.
5523 (Process_Type): Removed, the
5524 relavant code was inlined into both Add_Own_Invariant and
5525 Add_Inherited_Invariant.
5527 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5529 * make.adb, par-ch2.adb, sem_util.adb, scans.ads, sem_ch8.adb,
5530 scn.adb, osint.adb, fname.adb: Minor reformatting.
5532 2017-04-25 Pascal Obry <obry@adacore.com>
5534 * s-taprop-mingw.adb: Do not check for CloseHandle in
5537 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5539 * sem_util.adb (Check_Part_Of_Reference):
5540 Continue to examine the context if the reference appears within
5541 an expression function.
5543 2017-04-25 Justin Squirek <squirek@adacore.com>
5545 * exp_ch7.adb, exp_ch7.ads Remove Build_Invariant_Procedure_Body
5546 and Build_Invariant_Procedure_Declaration.
5547 * exp_util.ads, exp_util.adb Add Build_Invariant_Procedure_Body
5548 and Build_Invariant_Procedure_Declaration from exp_ch7
5549 and break-out Is_Untagged_Private_Derivation from
5550 Build_Invariant_Procedure_Body.
5551 (Replace_Type_References):
5552 Append an extra parameter to allow for dispatching replacements
5553 and add the corrasponding logic.
5554 (Type_Invariant): Remove
5555 Replace_Typ_Refs and replace its references with calls to
5556 Replace_Type_References.
5557 * sem_ch3.adb, sem_prag.adb: Remove with and use of exp_ch7.
5559 2017-04-25 Bob Duff <duff@adacore.com>
5561 * sem_util.ads, sem_util.adb (Should_Ignore_Pragma): New function
5562 that returns True when appropriate.
5563 * par-prag.adb, exp_prag.adb, sem_prag.adb: Do not ignore pragmas
5564 when compiling predefined files.
5565 * fname.ads, fname.adb (Is_Predefined_File_Name): Fix bug:
5566 "gnat.adc" should not be considered a predefined file name.
5567 That required (or at least encouraged) a lot of cleanup of global
5568 variable usage. We shouldn't be communicating information via
5569 the global name buffer.
5570 * bindgen.adb, errout.adb, fname-uf.adb, lib-load.adb, make.adb,
5571 * restrict.adb, sem_ch10.adb, sem_ch6.adb, sem_ch8.adb: Changes
5572 required by the above-mentioned cleanup.
5574 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5576 * osint.adb (Find_File): Handle properly a request for a
5577 configuration file whose name is a directory.
5579 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5581 * sem_attr.adb, sem_ch5.adb: Minor reformatting.
5583 2017-04-25 Bob Duff <duff@adacore.com>
5585 * types.ads: Minor: Fix '???' comment.
5586 * sem_ch8.adb: Minor comment fix.
5588 2017-04-25 Bob Duff <duff@adacore.com>
5590 * sem_prag.adb: Remove suspicious uses of Name_Buf.
5591 * stringt.ads, stringt.adb, exp_dbug.adb, sem_dim.adb: Remove
5592 Add_String_To_Name_Buffer, to avoid using the global Name_Buf.
5593 Add String_To_Name with no side effects.
5595 2017-04-25 Justin Squirek <squirek@adacore.com>
5597 * sem_ch3.adb (Analyze_Declarations): Add
5598 additional condition for edge case.
5600 2017-04-25 Bob Duff <duff@adacore.com>
5602 * par-ch2.adb, scans.ads, scn.adb: Do not give an error for
5603 reserved words inside pragmas. This is necessary to allow the
5604 pragma name Interface to be used in pragma Ignore_Pragma.
5605 * par.adb: Minor comment fix.
5607 2017-04-25 Javier Miranda <miranda@adacore.com>
5609 * a-tags.ads, a-tags.adb (Type_Is_Abstract): Renamed as Is_Abstract.
5610 * rtsfind.ads (RE_Type_Is_Abstract): Renamed as Is_Abstract.
5611 * exp_disp.adb (Make_DT): Update occurrences of RE_Type_Is_Abstract.
5612 * exp_intr.adb (Expand_Dispatching_Constructor_Call): Update
5613 occurrences of RE_Type_Is_Abstract
5615 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5617 * exp_util.adb (Build_Chain): Account for ancestor
5618 subtypes while traversing the derivation chain.
5620 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5622 * sem_attr.adb: minor reformatting.
5624 2017-04-25 Doug Rupp <rupp@adacore.com>
5626 * sigtramp-vxworks-target.inc [PPC64]: Add a .localentry pseudo-op.
5628 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5630 * sem_ch5.adb (Analyze_Assignment): Reset Full_Analysis flag on
5631 the first pass over an assignment statement with target names,
5632 to prevent the generation of subtypes (such as discriminated
5633 record components)that may carry the target name outside of the
5634 tree for the assignment. The subtypes will be generated when
5635 the assignment is reanalyzed in full.
5636 (Analyze_Target_Name): Handle properly class-wide types.
5638 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5640 * elists.ads, elists.adb (Prepend_Unique_Elmt): New routine.
5641 * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
5642 the purposes of freezing.
5643 * exp_util.adb Update the documentation and structure of the
5644 type map used in class-wide semantics of assertion expressions.
5645 (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
5646 and resolve the triaged expression because all substitutions
5647 refer to the proper entities. Update the replacement of
5649 (Build_DIC_Procedure_Body): Add formal parameter
5650 For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
5651 are now only processed when freezing occurs. Build a body only
5653 (Entity_Hash): Removed.
5654 (Map_Types): New routine.
5655 (Replace_Object_And_Primitive_References): Removed.
5656 (Replace_References): New routine.
5657 (Replace_Type_References): Moved to the library level of Exp_Util.
5658 (Type_Map_Hash): New routine.
5659 (Update_Primitives_Mapping): Update the mapping call.
5660 (Update_Primitives_Mapping_Of_Types): Removed.
5661 * exp_util.ads (Build_DIC_Procedure_Body): Add formal
5662 parameter For_Freeze and update the comment on usage.
5663 (Map_Types): New routine.
5664 (Replace_References): New routine.
5665 (Replace_Type_References): Moved to the library level of Exp_Util.
5666 (Update_Primitives_Mapping_Of_Types): Removed.
5667 * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
5668 properties of the private type to the full view in case the full
5669 view derives from a parent type and inherits a DIC pragma.
5670 * sem_prag.adb (Analyze_Pragma): Guard against a case where a
5671 DIC pragma is placed at the top of a declarative region.
5673 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
5675 * a-tasatt.adb: Complete previous change and use an unsigned
5676 int to avoid overflow checks.
5678 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5680 * sem_attr.adb (Analyze_Attribute, case 'Access): Specialize
5681 the error message when the attribute reference is an actual in
5682 a call to a subprogram inherited from a generic formal type with
5683 unknown discriminants, which makes the subprogram and its formal
5684 parameters intrinsic (see RM 6.3.1 (8) and (13)).
5686 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5688 * sem_aggr.adb, inline.adb, einfo.adb, einfo.ads, scng.adb,
5689 sem_prag.adb: Minor reformatting.
5691 2017-04-25 Bob Duff <duff@adacore.com>
5693 * sem_attr.adb (Type_Key): Add code in the
5694 recursive Compute_Type_Key to protect against fetching the source
5695 code for Standard, in case a component of the type is declared
5696 in Standard. There was already code to do this for the original
5697 type, but not for its components.
5699 2017-04-25 Javier Miranda <miranda@adacore.com>
5701 * exp_ch3.adb (Build_Initialization_Call): Handle
5702 subtypes of private types when searching for the underlying full
5703 view of a private type.
5705 2017-04-25 Javier Miranda <miranda@adacore.com>
5707 * sem_res.adb (Set_Mixed_Mode_Operand): A universal
5708 real conditional expression can appear in a fixed-type context
5709 and must be resolved with that context to facilitate the code
5710 generation to the backend.
5712 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5714 * einfo.adb, einfo.ads (Body_Needed_For_Inlining): New flag,
5715 to indicate whether during inline processing, when some unit U1
5716 appears in the context of a unit U2 compiled for instantiation
5717 or inlining purposes, the body of U1 needs to be compiled as well.
5718 * sem_prag.adb (Process_Inline): Set Body_Needed_For_Inlining if
5719 context is a package declaration.
5720 * sem_ch12.adb (Analyze_Generic_Subprogram_Declaration,
5721 Analyze_Generic_Package_Declaration): ditto.
5722 * inline.adb (Analyze_Inlined_Bodies): Check
5723 Body_Needed_For_Inlining.
5725 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5727 * par.adb (Current_Assign_Node): Global variable use to record
5728 the presence of a target_name in the right hand side of the
5729 assignment being parsed.
5730 * par-ch4.adb (P_Name): If the name is a target_name, mark the
5731 enclosing assignment node accordingly.
5732 * par-ch5.adb (P_Assignment_Statement): Set Current_Assign_Node
5734 * sem_ch5.adb (Analyze_Assignment): Disable expansion before
5735 analyzing RHS if the statement has target_names.
5736 * sem_aggr.adb (Resolve_Iterated_Component_Association): Handle
5737 properly choices that are subtype marks.
5738 * exp_ch5.adb: Code cleanup.
5740 2017-04-25 Bob Duff <duff@adacore.com>
5742 * s-memory.adb: Add a comment regarding efficiency.
5743 * atree.adb: Fix the assertion, and combine 2 assertions into one,
5744 "the source has an extension if and only if the destination does."
5745 * sem_ch3.adb, sem_ch13.adb: Address ??? comments.
5747 2017-04-25 Arnaud Charlet <charlet@adacore.com trojanek>
5749 * a-tasatt.adb (Set_Value): Fix handling of 32bits -> 64bits
5752 2017-04-25 Doug Rupp <rupp@adacore.com>
5754 * init.c (__gnat_error_handler) [vxworks]: Turn on sigtramp
5755 handling for ppc64-vx7.
5756 * sigtramp-vxworks-target.inc
5757 [SIGTRAMP_BODY]: Add section for ppc64-vx7.
5759 2017-04-25 Arnaud Charlet <charlet@adacore.com>
5761 * ada_get_targ.adb: New file.
5763 2017-04-25 Bob Duff <duff@adacore.com>
5765 * uintp.adb (Most_Sig_2_Digits): In case Direct (Right), fetch
5766 Direct_Val (Right), instead of the incorrect Direct_Val (Left).
5767 (UI_GCD): Remove ??? comment involving possible efficiency
5768 improvements. This just isn't important after all these years.
5770 * uintp.ads: Minor cleanup.
5772 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5774 * exp_util.adb, exp_util.ads, sem_ch7.adb, sem_prag.adb, exp_ch3.adb:
5775 Revert previous changes.
5776 * scng.adb: Minor reformatting.
5777 * s-stratt.ads: Fix unbalanced parens in comment.
5779 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5781 * sem_ch3.adb, exp_util.adb, sem_prag.adb, freeze.adb, sem_util.adb:
5784 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5786 * scng.adb (Scan): Handle '@' appropriately.
5787 * sem_ch5.adb: Code cleanup.
5789 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5791 * freeze.adb (Check_Expression_Function): Do not check for the
5792 use of deferred constants if the freezing of the expression
5793 function is triggered by its generated body, rather than a
5796 2017-04-25 Javier Miranda <miranda@adacore.com>
5798 * exp_attr.adb (Rewrite_Stream_Proc_Call): Handle
5799 subtypes of private types when performing the view conversion.
5801 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5803 * exp_ch3.adb (Freeze_Type): Signal the DIC body is created for
5804 the purposes of freezing.
5805 * exp_util.adb Update the documentation and structure of the
5806 type map used in class-wide semantics of assertion expressions.
5807 (Add_Inherited_Tagged_DIC): There is really no need to preanalyze
5808 and resolve the triaged expression because all substitutions
5809 refer to the proper entities. Update the replacement of
5811 (Build_DIC_Procedure_Body): Add formal parameter
5812 For_Freeze. Add local variable Build_Body. Inherited DIC pragmas
5813 are now only processed when freezing occurs. Build a body only
5815 (Entity_Hash): Removed.
5816 (Map_Types): New routine.
5817 (Replace_Object_And_Primitive_References): Removed.
5818 (Replace_References): New routine.
5819 (Replace_Type_References): Moved to the library level of Exp_Util.
5820 (Type_Map_Hash): New routine.
5821 (Update_Primitives_Mapping): Update the mapping call.
5822 (Update_Primitives_Mapping_Of_Types): Removed.
5823 * exp_util.ads (Build_DIC_Procedure_Body): Add formal
5824 parameter For_Freeze and update the comment on usage.
5825 (Map_Types): New routine.
5826 (Replace_References): New routine.
5827 (Replace_Type_References): Moved to the library level of Exp_Util.
5828 (Update_Primitives_Mapping_Of_Types): Removed.
5829 * sem_ch7.adb (Preserve_Full_Attributes): Propagate the DIC
5830 properties of the private type to the full view in case the full
5831 view derives from a parent type and inherits a DIC pragma.
5832 * sem_prag.adb (Analyze_Pragma): Guard against a case where a
5833 DIC pragma is placed at the top of a declarative region.
5835 2017-04-25 Tristan Gingold <gingold@adacore.com>
5837 * s-mmap.ads (Data): Add pragma Inline.
5839 2017-04-25 Hristian Kirtchev <kirtchev@adacore.com>
5841 * checks.adb (Insert_Valid_Check): Do not use
5842 a renaming to alias a volatile name because this will lead to
5843 multiple evaluations of the volatile name. Use a constant to
5844 capture the value instead.
5846 2017-04-25 Doug Rupp <rupp@adacore.com>
5848 * init.c [VxWorks Section]: Disable sigtramp for ppc64-vx7.
5850 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5852 * exp_util.adb, exp_util.ads (Build_Class_Wide_Expression):
5853 Add out parameter to indicate to caller that a wrapper must
5854 be constructed for an inherited primitive whose inherited
5855 pre/postcondition has called to overridden primitives.
5856 * freeze.adb (Check_Inherited_Conditions): Build wrapper body
5857 for inherited primitive that requires it.
5858 * sem_disp.adb (Check_Dispatching_Operation): Such wrappers are
5859 legal primitive operations and belong to the list of bodies
5860 generated after the freeze point of a type.
5861 * sem_prag.adb (Build_Pragma_Check_Equivalent): Use new signature
5862 of Build_Class_Wide_Expression.
5863 * sem_util.adb, sem_util.ads (Build_Overriding_Spec): New procedure
5864 to construct the specification of the wrapper subprogram created
5865 for an inherited operation.
5867 2017-04-25 Bob Duff <duff@adacore.com>
5869 * s-osinte-linux.ads (pthread_mutexattr_setprotocol,
5870 pthread_mutexattr_setprioceiling): Add new interfaces for these
5872 * s-taprop-linux.adb (Initialize_Lock, Initialize_TCB): Set
5873 protocols as appropriate for Locking_Policy 'C' and 'I'.
5874 * s-taprop-posix.adb: Minor reformatting to make it more similar
5875 to s-taprop-linux.adb.
5877 2017-04-25 Ed Schonberg <schonberg@adacore.com>
5879 * sem_ch3.adb (Get_Discriminant_Value, Search_Derivation_Levels):
5880 Handle properly a multi- level derivation involving both renamed
5881 and constrained parent discriminants, when the type to be
5882 constrained has fewer discriminants that the ultimate ancestor.
5884 2017-04-25 Bob Duff <duff@adacore.com>
5886 * sem_util.adb (Is_Object_Reference): In the
5887 case of N_Explicit_Dereference, return False if it came from a
5888 conditional expression.
5890 2017-04-25 Bob Duff <duff@adacore.com>
5892 * par-ch4.adb (P_Case_Expression): If a semicolon
5893 is followed by "when", assume that ";" was meant to be ",".
5895 2017-04-25 Gary Dismukes <dismukes@adacore.com>
5897 * sem_ch9.adb, sem_ch10.adb, sem_util.adb: Minor reformatting and typo
5900 2017-04-25 Arnaud Charlet <charlet@adacore.com>
5902 * rtsfind.ads (SPARK_Implicit_Load): New procedure for forced
5903 loading of an entity.
5904 * rtsfind.adb (SPARK_Implicit_Load): Body with a pattern
5905 previously repeated in the analysis.
5906 * sem_ch9.adb (Analyze_Protected_Type_Declaration): use new
5907 procedure SPARK_Implicit_Load. (Analyze_Task_Type_Declaration):
5908 use new procedure SPARK_Implicit_Load.
5909 * sem_ch10.adb (Analyze_Compilation_Unit): Use new procedure
5910 SPARK_Implicit_Load.
5912 2017-04-25 Javier Miranda <miranda@adacore.com>
5914 * sem_util.adb (New_Copy_Tree): By default
5915 copying of defining identifiers is prohibited because
5916 this would introduce an entirely new entity into the
5917 tree. This patch introduces an exception to this general
5918 rule: the declaration of constants and variables located in
5919 Expression_With_Action nodes.
5920 (Copy_Itype_With_Replacement): Renamed as Copy_Entity_With_Replacement.
5921 (In_Map): New subprogram.
5922 (Visit_Entity): New subprogram.
5923 (Visit_Node): Handle EWA_Level,
5924 EWA_Inner_Scope_Level, and take care of defining entities defined
5925 in Expression_With_Action nodes.
5927 2017-04-25 Thomas Quinot <quinot@adacore.com>
5929 * exp_ch6.adb: minor comment edit.
5930 * sinfo.ads, sinfo.adb: New Null_Statement attribute for null
5931 procedure specifications that come from source.
5932 * par-ch6.adb (P_Subprogram, case of a null procedure): Set new
5933 Null_Statement attribute.
5934 * par_sco.adb (Traverse_Declarations_Or_Statements): For a null
5935 procedure, generate statement SCO for the generated NULL statement.
5936 * sem_ch6.adb (Analyze_Null_Procedure): Use null statement from
5937 parser, if available.
5939 2017-04-04 Andreas Krebbel <krebbel@linux.vnet.ibm.com>
5941 * system-linux-s390.ads: Use Long_Integer'Size to define
5944 2017-04-04 Eric Botcazou <ebotcazou@adacore.com>
5946 * sem_ch3.adb (Build_Derived_Record_Type): Fix long line.
5948 2017-04-03 Jonathan Wakely <jwakely@redhat.com>
5950 * doc/gnat_ugn/gnat_and_program_execution.rst: Fix typo.
5951 * g-socket.adb (To_Host_Entry): Fix typo in comment.
5952 * gnat_ugn.texi: Fix typo.
5953 * raise.c (_gnat_builtin_longjmp): Fix capitalization in comment.
5954 * s-stposu.adb (Allocate_Any_Controlled): Fix typo in comment.
5955 * sem_ch3.adb (Build_Derived_Record_Type): Likewise.
5956 * sem_util.adb (Mark_Coextensions): Likewise.
5957 * sem_util.ads (Available_Full_View_Of_Component): Likewise.
5959 2017-03-28 Andreas Schwab <schwab@suse.de>
5962 * system-linux-aarch64-ilp32.ads: New file.
5963 * gcc-interface/Makefile.in (LIBGNAT_TARGET_PAIRS_COMMON): Rename
5964 from LIBGNAT_TARGET_PAIRS.
5965 (LIBGNAT_TARGET_PAIRS_32, LIBGNAT_TARGET_PAIRS_64): Define.
5966 (LIBGNAT_TARGET_PAIRS): Use LIBGNAT_TARGET_PAIRS_COMMON, and
5967 LIBGNAT_TARGET_PAIRS_64 or LIBGNAT_TARGET_PAIRS_32 for -mabi=lp64
5968 or -mabi=ilp32, resp.
5970 2017-03-14 James Cowgill <James.Cowgill@imgtec.com>
5972 * s-osinte-linux.ads (struct_sigaction): Use correct type for sa_flags.
5974 2017-03-08 Thanassis Tsiodras <ttsiodras@gmail.com>
5977 * socket.c (__gnat_gethostbyaddr): Add missing test for __rtems__.
5979 2017-03-08 Eric Botcazou <ebotcazou@adacore.com>
5982 * system-linux-ppc.ads (Default_Bit_Order): Use Standard's setting.
5984 * system-linux-arm.ads (Default_Bit_Order): Likewise.
5985 * system-linux-mips.ads (Default_Bit_Order): Likewise.
5986 * system-linux-armeb.ads: Delete.
5987 * system-linux-mipsel.ads: Likewise.
5988 * gcc-interface/Makefile.in (MIPS/Linux): Adjust.
5989 (ARM/Linux): Likewise.
5991 2017-02-24 Jakub Jelinek <jakub@redhat.com>
5994 * gcc-interface/misc.c (gnat_handle_option): Pass true to
5995 handle_generated_option GENERATED_P.
5997 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
5999 * gcc-interface/decl.c (gnat_to_gnu_field): Do not remove the wrapper
6000 around a justified modular type if it doesn't have the same scalar
6001 storage order as the enclosing record type.
6003 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6005 * gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
6006 of boolean rvalues to function calls.
6008 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6010 * gcc-interface/utils.c (fold_bit_position): New function.
6011 (rest_of_record_type_compilation): Call it instead of bit_position to
6012 compute the field position and remove the call to remove_conversions.
6013 (compute_related_constant): Factor out the multiplication in both
6014 operands, if any, and streamline the final test.
6016 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6018 * gcc-interface/trans.c (return_value_ok_for_nrv_p): Add sanity check.
6020 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6022 * gcc-interface/decl.c: Include demangle.h.
6023 (is_cplusplus_method): Return again true for a primitive operation
6024 only if it is dispatching. For a subprogram with an interface name,
6025 call the demangler to get the number of C++ parameters and compare it
6026 with the number of Ada parameters.
6028 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6030 * gcc-interface/trans.c (Handled_Sequence_Of_Statements_to_gnu): If
6031 there is no end label, put the location of the At_End procedure on
6032 the call to the procedure.
6034 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6036 * gcc-interface/misc.c (gnat_type_max_size): Try to return a meaningful
6037 value for array types with TYPE_INDEX_TYPE set on their domain type.
6038 * gcc-interface/utils.c (max_size): For operations and expressions, do
6039 not build a new node if the operands have not changed or are missing.
6041 2017-02-24 Eric Botcazou <ebotcazou@adacore.com>
6043 * gcc-interface/utils.c (max_size) <tcc_expression>: Flip the second
6044 argument when recursing on TRUTH_NOT_EXPR.
6046 2017-02-12 John Marino <gnugcc@marino.st>
6048 * system-freebsd-x86.ads: Rename into...
6049 * system-freebsd.ads: ...this.
6050 (Default_Bit_Order): Define using Standard'Default_Bit_Order.
6051 * gcc-interface/Makefile.in: Support aarch64-freebsd.
6052 (x86-64/FreeBSD): Adjust to above renaming.
6053 (i386/FreeBSD): Likewise.
6055 2017-02-09 Gerald Pfeifer <gerald@pfeifer.com>
6057 * comperr.adb: Update FSF bug reporting URL.
6059 2017-02-01 Eric Botcazou <ebotcazou@adacore.com>
6060 Jakub Jelinek <jakub@redhat.com>
6063 * adaint.c (__gnat_killprocesstree): Fix broken string handling.
6065 2017-01-25 Maxim Ostapenko <m.ostapenko@samsung.com>
6068 * gcc-interface/utils.c (get_global_context): Pass main_input_filename
6069 to build_translation_unit_decl.
6071 2017-01-23 Javier Miranda <miranda@adacore.com>
6073 * sem_util.adb (New_Copy_Tree): Code cleanup:
6074 removal of the internal map (ie. variable Actual_Map, its
6075 associated local variables, and all the code handling it).
6076 * sem_ch9.adb (Analyze_Task_Type_Declaration): in GNATprove mode
6077 force loading of the System package when processing a task type.
6078 (Analyze_Protected_Type_Declaration): in GNATprove mode force
6079 loading of the System package when processing a protected type.
6080 * sem_ch10.adb (Analyze_Compilation_Unit): in GNATprove mode
6081 force loading of the System package when processing compilation
6082 unit with a main-like subprogram.
6083 * frontend.adb (Frontend): remove forced loading of the System
6086 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6088 * sem_prag.adb (Default_Initial_Condition): If the desired type
6089 declaration is a derived type declaration with discriminants,
6090 it is rewritten as a private type declaration.
6091 * sem_ch13.adb (Replace_Type_References_Generic,
6092 Visible_Component): A discriminated private type with descriminnts
6093 has components that must be rewritten as selected components
6094 if they appear as identifiers in an aspect expression such as
6095 a Default_Initial_Condition.
6096 * sem_util.adb (Defining_Entity): support N_Iterator_Specification
6099 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6101 * ghost.ads, ghost.adb (Is_Ignored_Ghost_Unit): New routine.
6102 * gnat1drv.adb Generate an empty object file for an ignored
6103 Ghost compilation unit.
6104 * inline.adb, sem_util.adb, sem_ch4.adb: Minor reformatting.
6106 2017-01-23 Yannick Moy <moy@adacore.com>
6108 * sem_ch4.adb (Analyze_Indexed_Component_Form):
6109 Adapt to inlined prefix with string literal subtype.
6110 * inline.adb (Expand_Inlined_Call): Keep unchecked
6111 conversion inside inlined call when formal type is constrained.
6113 2017-01-23 Javier Miranda <miranda@adacore.com>
6115 * sem_util.adb (New_Copy_Tree): Code cleanup:
6116 removal of global variables. All the global variables, global
6117 functions and tables of this subprogram are now declared locally.
6119 2017-01-23 Gary Dismukes <dismukes@adacore.com>
6121 * exp_strm.ads: Minor reformatting and typo fixes.
6123 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6125 * sem_aggr.adb, par_sco.adb, exp_util.adb, sem.adb, sem_ch4.adb,
6126 exp_aggr.adb: Minor reformatting.
6127 * g-diopit.adb: minor grammar/punctuation fix in comment.
6128 * g-byorma.ads: minor fix of unbalanced parens in comment.
6130 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6132 * par.adb: Update the documentation of component Labl.
6133 * par-ch6.adb (P_Return_Statement): Set the expected label of
6134 an extended return statement to Error.
6136 2017-01-23 Tristan Gingold <gingold@adacore.com>
6138 * s-boustr.ads, s-boustr.adb (Is_Full): New function.
6140 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6142 * expander.adb: Handle N_Delta_Aggregate.
6144 2017-01-23 Javier Miranda <miranda@adacore.com>
6146 * exp_ch6.adb (Expand_Call): Improve the code that
6147 checks if some formal of the called subprogram is a class-wide
6148 interface, to handle subtypes of class-wide interfaces.
6150 2017-01-23 Javier Miranda <miranda@adacore.com>
6152 * checks.adb (Apply_Parameter_Aliasing_Checks):
6153 Remove side effects of the actuals before generating the overlap
6156 2017-01-23 Justin Squirek <squirek@adacore.com>
6158 * exp_strm.ads, exp_strm.ads
6159 (Build_Record_Or_Elementary_Input_Function): Add an extra parameter so
6160 as to avoid getting the underlying type by default.
6161 * exp_attr.adb (Expand_N_Attribute_Reference): Remove use of
6162 underlying type in the Iiput and output attribute cases when
6163 building their respective functions.
6165 2017-01-23 Gary Dismukes <dismukes@adacore.com>
6167 * scng.adb: Minor reformatting of error message.
6169 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6171 * sem_ch6.adb (Analyze_Expression_Function): Do not attempt
6172 to freeze the return type of an expression funxtion that is a
6173 completion, if the type is a limited view and the non-limited
6176 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6178 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): Recognize delta
6179 aggregate construct.
6180 (P_Record_Or_Array_Component_Association): An array aggregate
6181 can start with an Iterated_Component_Association.
6182 * scng.adb: Modify error message on improper use of @ in earlier
6183 versions of the language.
6184 * sinfo.ads: New node kind N_Delta_Aggregate.
6185 * sinfo.adb: An N_Delta_Aggregate has component associations and
6187 * sem_res.adb (Resolve): Call Resolve_Delta_Aggregate.
6188 * sem_aggr.ads, sem_aggr.adb (Resolve_Iterated_Component_Association):
6189 Create a new index for each one of the choices in the association,
6190 to prevent spurious homonyms in the scope.
6191 (Resolve_Delta_Aggregate): New.
6192 * sem.adb: An N_Delta_Aggregate is analyzed like an aggregate.
6193 * exp_util.adb (Insert_Actions): Take into account
6195 * exp_aggr.ads: New procedure Expand_N_Delta_Aggregate.
6196 * exp_aggr.adb: New procedure Expand_N_Delta_Aggregate,
6197 and local procedures Expand_Delta_Array_Aggregate and
6198 expand_Delta_Record_Aggregate.
6199 * sprint.adb: Handle N_Delta_Aggregate.
6201 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6203 * exp_ch11.adb (Expand_N_Exception_Declaration): Generate an
6204 empty name when the exception declaration is subject to pragma
6206 (Null_String): New routine.
6208 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6210 * par-ch9.adb (P_Protected_Definition): Parse
6211 any optional and potentially illegal pragmas which appear in
6212 a protected operation declaration list.
6213 (P_Task_Items): Parse
6214 any optional and potentially illegal pragmas which appear in a
6217 2017-01-23 Pascal Obry <obry@adacore.com>
6219 * s-taprop-mingw.adb (Enter_Task): Initialize the Thread handle which
6220 is needed when a foreign thread call a Win32 API using a thread handle
6221 like GetThreadTimes() for example.
6223 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6225 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
6226 allow an 'Address clause to be specified on a prefix of a
6229 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6231 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
6232 attribute 'Valid is a renaming of the original expression when
6233 the expression denotes a name. For all other kinds of expression,
6234 use a constant to capture the value.
6235 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
6236 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
6238 2017-01-23 Justin Squirek <squirek@adacore.com>
6240 * sem_eval.adb (Eval_Integer_Literal): Add special
6241 case to avoid optimizing out check if the literal appears in
6244 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6246 * sem_ch13.adb (Analyze_Attribute_Definition_Clause): Do not
6247 allow an 'Address clause to be specified on a prefix of a
6250 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6252 * checks.adb (Insert_Valid_Check): Ensure that the prefix of
6253 attribute 'Valid is a renaming of the original expression when
6254 the expression denotes a name. For all other kinds of expression,
6255 use a constant to capture the value.
6256 * exp_util.adb (Is_Name_Reference): Moved to Sem_Util.
6257 * sem_util.ads, sem_util.adb (Is_Name_Reference): Moved from Exp_Util.
6259 2017-01-23 Justin Squirek <squirek@adacore.com>
6261 * sem_eval.adb (Eval_Integer_Literal): Add special
6262 case to avoid optimizing out check if the literal appears in
6265 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6267 * sem_ch4.adb (Try_Primitive_Operations,
6268 Is_Valid_First_Argument_Of): argument is valid if it is a derived
6269 type with unknown discriminants that matches its underlying
6271 * exp_util.adb (Expand_Subtype_From_Expr): Do not expand
6272 expression if its type is derived from a limited type with
6273 unknown discriminants, because the expansion (which is a call)
6274 must be expanded in the enclosing context to add the proper build-
6275 in-place parameters to the call.
6276 * lib.ads, exp_ch9.adb: Minor fixes in comments.
6278 2017-01-23 Yannick Moy <moy@adacore.com>
6280 * frontend.adb (Frontend): Do not load runtime
6281 unit for GNATprove when parsing failed.
6282 * exp_ch9.adb: minor removal of extra whitespace
6283 * exp_ch6.adb: minor typo in comment
6284 * sem_util.adb: Code cleanup.
6285 * exp_ch9.ads, par-ch2.adb: minor style fixes in whitespace and comment
6286 * a-ngcefu.adb: minor style fix in whitespace
6288 2017-01-23 Thomas Quinot <quinot@adacore.com>
6290 * scos.ads: Document usage of 'd' as default SCO kind for
6292 * par_sco.adb (Traverse_Declarations_Or_Statements.
6293 Traverse_Degenerate_Subprogram): New supporting routine for expression
6294 functions and null procedures.
6295 (Traverse_Declarations_Or_Statements.Traverse_One): Add
6296 N_Expression_Function to the subprogram case; add required
6297 support for null procedures and expression functions.
6299 2017-01-23 Bob Duff <duff@adacore.com>
6301 * namet.ads (Bounded_String): Decrease the size of type
6302 Bounded_String to avoid running out of stack space.
6303 * namet.ads (Append): Don't ignore buffer overflow; raise
6304 Program_Error instead.
6306 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6308 * exp_ch5.adb, freeze.adb, par-ch4.adb, scng.adb, sem_ch13.adb,
6309 sem_ch3.adb, sem_ch5.adb, sem_ch5.ads, sem_util.adb, sinfo.ads: Minor
6311 * exp_ch9.adb: minor style fix in comment.
6313 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6315 * sem_ch4.adb (Analyze_Allocator): Handle properly a type derived
6316 for a limited record extension with unknown discriminants whose
6317 full view has no discriminants.
6319 2017-01-23 Yannick Moy <moy@adacore.com>
6321 * exp_spark.adb: Alphabetize with clauses.
6323 2017-01-23 Yannick Moy <moy@adacore.com>
6325 * sem_util.adb (Has_Enabled_Property): Treat
6326 protected objects and variables differently from other variables.
6328 2017-01-23 Thomas Quinot <quinot@adacore.com>
6330 * sem_ch13.adb (Adjust_Record_For_Reverse_Bit_Order):
6331 Split original Ada 95 part off into new subprogram
6332 below. Call that subprogram (instead of proceeding with
6333 AI95-0133 behaviour) if debug switch -gnatd.p is in use.
6334 (Adjust_Record_For_Reverse_Bit_Order_Ada_95): ... new subprogram
6335 * debug.adb Document new switch -gnatd.p
6336 * freeze.adb (Freeze_Entity.Freeze_Record_Type): Do not adjust
6337 record for reverse bit order if an error has already been posted
6338 on the record type. This avoids generating extraneous "info:"
6339 messages for illegal code.
6341 2017-01-23 Justin Squirek <squirek@adacore.com>
6343 * sem_ch3.adb (Analyze_Declarations): Correct comments
6344 * freeze.adb (Find_Constant): Add detection of deferred constants
6345 so they are not incorrectly flagged as premature.
6347 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6349 * scans.ads: New token At_Sign. Remove '@' from list of illegal
6350 characters for future version of the language. '@' is legal name.
6351 * scng.ads, scng.adb (Scan): Handle '@' appropriately.
6352 * scn.adb (Scan_Reserved_Identifier): An occurrence of '@'
6353 denotes a Target_Name.
6354 * par-ch4.adb (P_Name, P_Primary): Handle Target_Name.
6355 * sinfo.ads, sinfo.adb (N_Target_Name): New non-terminal node.
6356 (Has_Target_Names): New flag on N_Assignment_Statement, to
6357 indicate that RHS has occurrences of N_Target_Name.
6358 * sem.adb: Call Analyze_Target_Name.
6359 * sem_ch5.ads, sem_ch5.adb (Analyze_Target_Name): New subpogram.
6360 (urrent_LHS): Global variable that denotes LHS of assignment,
6361 used in the analysis of Target_Name nodes.
6362 * sem_res.adb (Resolve_Target_Name): New procedure.
6363 * exp_ch5.adb (Expand_Assign_With_Target_Names): (AI12-0125):
6364 N is an assignment statement whose RHS contains occurences of @
6365 that designate the value of the LHS of the assignment. If the
6366 LHS is side-effect free the target names can be replaced with
6367 a copy of the LHS; otherwise the semantics of the assignment
6368 is described in terms of a procedure with an in-out parameter,
6369 and expanded as such.
6370 (Expand_N_Assignment_Statement): Call
6371 Expand_Assign_With_Target_Names when needed.
6372 * exp_util.adb (Insert_Actions): Take into account N_Target_Name.
6373 * sprint.adb: Handle N_Target_Name.
6375 2017-01-23 Eric Botcazou <ebotcazou@adacore.com>
6377 * checks.adb: Minor fix in comment.
6379 2017-01-23 Philippe Gil <gil@adacore.com>
6381 * g-debpoo.adb (Do_Report) remove freed chunks from chunks
6382 count in Sort = Memory_Usage or Allocations_Count
6384 2017-01-23 Justin Squirek <squirek@adacore.com>
6386 * sem_ch3.adb: Code cleanup.
6388 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6390 * sem_prag.adb (Analyze_Refined_Depends_In_Decl_Part): Move all global
6391 variables to the local variable section. Update the profile
6392 of various nested routine that previously had visibility
6393 of those globals. One the matching phase has completed,
6394 remove certain classes of clauses which are considered noise.
6395 (Check_Dependency_Clause): Properly detect a match between two
6396 'Result attributes. Update the various post-match cases to use
6397 Is_Already_Matched as this routine now automatically recognizes
6398 a previously matched 'Result attribute.
6399 (Is_Already_Matched): New routine.
6400 (Remove_Extra_Clauses): New routine.
6401 (Report_Extra_Clauses): Remove the detection of ... => null
6402 clauses as this is now done in Remove_Extra_Clauses.
6404 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6406 * sem_aggr.adb (Resolve_Array_Aggregate): In ASIS mode do not
6407 report on spurious overlaps between values involving a subtype
6408 with a static predicate, because the expansion of such a subtype
6409 into individual ranges in inhibited in ASIS mode.
6411 2017-01-23 Justin Squirek <squirek@adacore.com>
6413 * sem_ch3.adb (Analyze_Declarations): Add detection
6414 of an edge case and delay freezing if it is present.
6416 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6418 * sem_ch3.adb, exp_spark.adb, exp_attr.adb, sem_ch9.adb, sem_prag.adb,
6419 sem_util.adb, sem_warn.adb, exp_ch3.adb: Minor reformatting.
6421 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6423 * freeze.adb (Freeze_Subprogram): Ensure that all anonymous
6424 access-to-subprogram types inherit the convention of the
6425 associated subprogram. (Set_Profile_Convention): New routine.
6426 * sem_ch6.adb (Check_Conformance): Do not compare the conventions
6427 of the two entities directly, use Conventions_Match to account
6428 for anonymous access-to-subprogram and subprogram types.
6429 (Conventions_Match): New routine.
6431 2017-01-23 Claire Dross <dross@adacore.com>
6433 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For attributes
6434 which return Universal_Integer, force the overflow check flag for
6435 Length and Range_Length for types as big as Long_Long_Integer.
6437 2017-01-23 Claire Dross <dross@adacore.com>
6439 * exp_spark.adb (Expand_SPARK_Attribute_Reference): For
6440 attributes which return Universal_Integer, introduce a conversion
6441 to the expected type with the appropriate check flags set.
6442 * sem_res.adb (Resolve_Range): The higher bound can be in Typ's
6443 base type if the range is null. It may still be invalid if it
6444 is higher than the lower bound. This is checked later in the
6445 context in which the range appears.
6447 2017-01-23 Pierre-Marie de Rodat <derodat@adacore.com>
6449 * scos.ads: Introduce a constant to represent ignored
6450 dependencies in SCO_Unit_Table_Entry.
6452 2017-01-23 Hristian Kirtchev <kirtchev@adacore.com>
6454 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Remove extra
6455 spaces from error messages.
6457 2017-01-23 Ed Schonberg <schonberg@adacore.com>
6459 * exp_ch3.adb (Check_Large_Modular_Array): New procedure,
6460 subsidiary to Expand_N_Object_ Declaration, to compute a guard on
6461 an object declaration for an array type with a modular index type
6462 with the size of Long_Long_Integer. Special processing is needed
6463 in this case to compute reliably the size of the object, and
6464 eventually to raise Storage_Error, when wrap-around arithmetic
6465 might compute a meangingless size for the object.
6467 2017-01-23 Justin Squirek <squirek@adacore.com>
6469 * a-wtenau.adb, par-endh.adb, sem_prag.adb,
6470 sem_type.adb: Code cleanups.
6472 2017-01-23 Bob Duff <duff@adacore.com>
6474 * sem_res.adb (Resolve_Call): In the part of the code where
6475 it is deciding whether to turn the call into an indexed
6476 component, avoid doing so if the call is to an instance of
6477 Unchecked_Conversion. Otherwise, the compiler turns it into an
6478 indexed component, and resolution of that turns it back into a
6479 function call, and so on, resulting in infinite recursion.
6480 * sem_util.adb (Needs_One_Actual): If the first formal has a
6481 default, then return False.
6483 2017-01-21 Eric Botcazou <ebotcazou@adacore.com>
6485 * sem_eval.adb (Compile_Time_Compare): Reinstate the expr+literal (etc)
6486 optimizations when the type is modular and the offsets are equal.
6488 2017-01-20 Thomas Quinot <quinot@adacore.com>
6490 * sem_warn.adb (Warn_On_Useless_Assignment): Adjust wording of warning
6493 2017-01-20 Nicolas Roche <roche@adacore.com>
6495 * terminals.c: Ignore failures on setpgid and tcsetpgrp commands.
6497 2017-01-20 Bob Duff <duff@adacore.com>
6499 * sem_eval.adb (Compile_Time_Compare): Disable the expr+literal
6500 (etc) optimizations when the type is modular.
6502 2017-01-20 Yannick Moy <moy@adacore.com>
6504 * sem_ch6.adb (Move_Pragmas): move some pragmas,
6505 but copy the SPARK_Mode pragma instead of moving it.
6506 (Build_Subprogram_Declaration): Ensure that the generated spec
6507 and original body share the same SPARK_Pragma aspect/pragma.
6508 * sem_util.adb, sem_util.ads (Copy_SPARK_Mode_Aspect): New
6509 procedure to copy SPARK_Mode aspect.
6511 2017-01-20 Bob Duff <duff@adacore.com>
6513 * sem_ch3.adb (Analyze_Declarations): Disable Resolve_Aspects
6515 * sem_ch13.adb (Resolve_Name): Enable setting the entity to
6516 Empty even in ASIS mode.
6518 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6520 * exp_ch9.adb: minor style fixes in comments.
6521 * sem_ch9.adb (Analyze_Delay_Relative): in GNATprove mode a delay
6522 relative statement introduces an implicit dependency on
6523 Ada.Real_Time.Clock_Time.
6524 * sem_util.adb: Minor reformatting.
6526 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6528 * sem_ch13.adb (Analyze_Aspect_Specifications): Aspect Alignment
6529 must be treated as delayed aspect even if the expression is
6530 a literal, because the aspect affects the freezing and the
6531 elaboration of the object to which it applies.
6533 2017-01-20 Tristan Gingold <gingold@adacore.com>
6535 * s-osinte-vxworks.ads (Interrup_Range): New subtype.
6537 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6539 * lib-xref.adb (Generate_Reference): Do not warn about the
6540 presence of a pragma Unreferenced if the entity appears as the
6541 actual in a procedure call that does not come from source.
6543 2017-01-20 Pascal Obry <obry@adacore.com>
6545 * expect.c, terminals.c: Fix some warnings about unused variables.
6546 * gsocket.h, adaint.c, adaint.h: Fix some more warnings in the C part
6549 2017-01-20 Bob Duff <duff@adacore.com>
6551 * exp_attr.adb (Constrained): Apply an access check (check that
6552 the prefix is not null) when the prefix denotes an object of an
6553 access type; that is, when there is an implicit dereference.
6555 2017-01-20 Gary Dismukes <dismukes@adacore.com>
6557 * s-rident.ads (constant Profile_Info): Remove
6558 No_Calendar from GNAT_Extended_Ravenscar restrictions.
6560 2017-01-20 Tristan Gingold <gingold@adacore.com>
6562 * s-maccod.ads: Add pragma No_Elaboration_Code_All
6564 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6566 * ghost.adb (Mark_Ghost_Clause): New routine.
6567 (Prune_Node): Do not prune compilation unit nodes.
6568 (Remove_Ignored_Ghost_Code): Prune the compilation unit node directly.
6569 This does not touch the node itself, but does prune all its fields.
6570 * ghost.ads (Mark_Ghost_Clause): New routine.
6571 * sem_ch8.adb (Analyze_Use_Package): Emit an error when a use
6572 package clause mentions Ghost and non-Ghost packages. Mark a
6573 use package clause as Ghost when it mentions a Ghost package.
6574 (Analyze_Use_Type): Emit an error when a use type clause mentions
6575 Ghost and non-Ghost types. Mark a use type clause as Ghost when
6576 it mentions a Ghost type.
6577 * sem_ch10.adb (Analyze_With_Clause): Mark a with clause as
6578 Ghost when it withs a Ghost unit.
6580 2017-01-20 Javier Miranda <miranda@adacore.com>
6582 * sem_res.adb (Resolve_Call): If a function call
6583 returns a limited view of a type and at the point of the call the
6584 function is not declared in the extended main unit then replace
6585 it with the non-limited view, which must be available. If the
6586 called function is in the extended main unit then no action is
6587 needed since the back-end handles this case.
6589 2017-01-20 Eric Botcazou <ebotcazou@adacore.com>
6591 * sem_ch7.adb (Contains_Subp_Or_Const_Refs): Rename into...
6592 (Contains_Subprograms_Refs): ...this. Adjust comment
6593 for constants. (Is_Subp_Or_Const_Ref): Rename into...
6594 (Is_Subprogram_Ref): ...this.
6595 (Has_Referencer): Rename Has_Non_Subp_Const_Referencer variable into
6596 Has_Non_Subprograms_Referencer and adjust comment. Remove
6597 incorrect shortcut for package declarations and bodies.
6599 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6601 * sem_ch3.adb (Complete_Private_Subtype): If the scope of the
6602 base type differs from that of the completion and the private
6603 subtype is an itype (created for a constraint on an access
6604 type e.g.), set Delayed_Freeze on both to prevent out-of-scope
6607 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6609 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
6610 When inheriting the SPARK_Mode of a prior expression function,
6611 look at the properly resolved entity rather than the initial
6612 candidate which may denote a homonym.
6614 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6616 * sem_prag.adb (Rewrite_Assertion_Kind): If the name is
6617 Precondition or Postcondition, and the context is pragma
6618 Check_Policy, indicate that this Pre-Ada2012 usage is deprecated
6619 and suggest the standard names Assertion_Policy /Pre /Post
6622 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6624 * sem_ch10.adb, sem_cat.adb: Minor reformatting.
6626 2017-01-20 Javier Miranda <miranda@adacore.com>
6628 * sem_ch3.adb (Access_Type_Declaration): Protect access to the
6630 * sem_ch10.adb (Install_Siblings): Skip processing malformed trees.
6631 * sem_cat.adb (Validate_Categoriztion_Dependency): Skip processing
6634 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6636 * sem_ch13.adb (Analyze_Aspect_Specification, case
6637 Dynamic_Predicate): If the entity E is a subtype that inherits
6638 a static predicate for its parent P,, the inherited and the
6639 new predicate combine in the generated predicate function,
6640 and E only has a dynamic predicate.
6642 2017-01-20 Tristan Gingold <gingold@adacore.com>
6644 * s-boustr.ads, s-boustr.adb: New package.
6645 * Makefile.rtl: Add s-boustr.
6647 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6649 * inline.adb (Process_Formals): Qualify the
6650 expression of a return statement when it yields a universal type.
6652 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6654 * freeze.adb (Freeze_All): Freeze the default
6655 expressions of all eligible formal parameters that appear in
6656 entries, entry families, and protected subprograms.
6658 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6660 * sem_ch3.adb (Check_Nonoverridable_Aspects); Refine check
6661 for illegal inherited Implicit_Dereference aspects with renamed
6664 2017-01-20 Javier Miranda <miranda@adacore.com>
6666 * debug.adb (switch d.6): do not avoid declaring unreferenced itypes.
6667 * nlists.ads (Lock_Lists, Unlock_Lists): New subprograms.
6668 * nlists.adb (Lock_Lists, Unlock_Lists): New subprograms.
6669 (Set_First, Set_Last, Set_List_Link, Set_Next, Set_Parent,
6670 Set_Prev, Tree_Read): Adding assertion.
6671 * atree.ads (Lock_Nodes, Unlock_Nodes): New subprograms.
6672 * atree.adb (Lock_Nodes, Unlock_Nodes): New subprograms.
6673 (Set_Analyzed, Set_Check_Actuals, Set_Comes_From_Source,
6674 Set_Ekind, Set_Error_Posted, Set_Has_Aspects,
6675 Set_Is_Ignored_Ghost_Node, Set_Original_Node, Set_Paren_Count,
6676 Set_Parent, Set_Sloc, Set_Nkind, Set_FieldNN, Set_NodeNN,
6677 Set_ListNN, Set_ElistNN, Set_NameN, Set_StrN, Set_UintNN,
6678 Set_UrealNN, Set_FlagNNN, Set_NodeN_With_Parent,
6679 Set_ListN_With_Parent): Adding assertion.
6681 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6683 * sem_prag.adb (Process_Convention): Diagnose properly a pragma
6684 import that applies to several homograph subprograms. when one
6685 of them is declared by a subprogram body.
6687 2017-01-20 Justin Squirek <squirek@adacore.com>
6689 * exp_ch6.adb (Expand_Call): Remove optimization
6690 that nulls out calls to null procedures.
6692 2017-01-20 Yannick Moy <moy@adacore.com>
6694 * inline.adb (Expand_Inlined_Call): Keep more
6695 precise type of actual for inlining whenever possible. In
6696 particular, do not switch to the formal type in GNATprove mode in
6697 some case where the GNAT backend might require it for visibility.
6699 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6701 * sem_ch3.adb (Check_Non_Overridable_Aspects): An inherited
6702 aspect Implicit_Dereference can be inherited by a full view if
6703 the partial view has no discriminants, because there is no way
6704 to apply the aspect to the partial view.
6705 (Build_Derived_Record_Type): If derived type renames discriminants
6706 of the parent, the new discriminant inherits the aspect from
6708 * sem_ch4.adb (Analyze_Call): Handle properly a parameterless
6709 call through an access discriminant designating a subprogram.
6710 * sem_ch5.adb (Analyze_Assignment): (Analyze_Call): Handle
6711 properly a parameterless call through an access discriminant on
6712 the left-hand side of an assignment.
6713 * sem_res.adb (resolve): If an interpreation involves a
6714 discriminant with an implicit dereference and the expression is an
6715 entity, resolution takes place later in the appropriate routine.
6716 * sem_ch13.adb (Analyze_Aspect_Implicit_Dereference): Recognize
6717 access discriminants that designate a subprogram type.
6719 2017-01-20 Pascal Obry <obry@adacore.com>
6721 * a-locale.adb, a-locale.ads: Update Ada.Locales for RM 2012 COR:1:2016
6723 2017-01-20 Yannick Moy <moy@adacore.com>
6725 * sem_ch10.adb (Check_No_Elab_Code_All): Do not issue an error
6726 on implicitly with'ed units in GNATprove mode.
6727 * sinfo.ads (Implicit_With): Document use of flag for implicitly
6728 with'ed units in GNATprove mode.
6730 2017-01-20 Ed Schonberg <schonberg@adacore.com>
6732 * sem_cat.adb (Validate_Static_Object_Name): In a preelaborated
6733 unit Do not report an error on a non-static entity that appears
6734 in the context of a spec expression, such as an aspect expression.
6736 2017-01-20 Hristian Kirtchev <kirtchev@adacore.com>
6738 * einfo.adb: Flag298 now denotes Is_Underlying_Full_View.
6739 (Is_Underlying_Full_View): New routine.
6740 (Set_Is_Underlying_Full_View): New routine.
6741 (Write_Entity_Flags): Add an entry for Is_Underlying_Full_View.
6742 * einfo.ads Add new attribute Is_Underlying_Full_View.
6743 (Is_Underlying_Full_View): New routine along with pragma Inline.
6744 (Set_Is_Underlying_Full_View): New routine along with pragma Inline.
6745 * exp_util.adb (Build_DIC_Procedure_Body): Do not consider
6746 class-wide types and underlying full views. The first subtype
6747 is used as the working type for all Itypes, not just array base types.
6748 (Build_DIC_Procedure_Declaration): Do not consider
6749 class-wide types and underlying full views. The first subtype
6750 is used as the working type for all Itypes, not just array
6752 * freeze.adb (Freeze_Entity): Inherit the freeze node of a full
6753 view or an underlying full view without clobbering the attributes
6754 of a previous freeze node.
6755 (Inherit_Freeze_Node): New routine.
6756 * sem_ch3.adb (Build_Derived_Private_Type): Mark an underlying
6758 (Build_Underlying_Full_View): Mark an underlying full view as such.
6759 * sem_ch7.adb (Install_Private_Declarations): Mark an underlying
6762 2017-01-20 Yannick Moy <moy@adacore.com>
6764 * sinfo.ads: Document lack of Do_Division_Check flag
6765 on float exponentiation.
6767 2017-01-19 Javier Miranda <miranda@adacore.com>
6769 * ghost.adb (Propagate_Ignored_Ghost_Code): Protect access to the
6770 identifier attribute of a block-statement node. Required to avoid
6771 assertion failure when building the new containers library.
6773 2017-01-19 Bob Duff <duff@adacore.com>
6775 * exp_ch3.adb: Update comment.
6777 2017-01-19 Vincent Celier <celier@adacore.com>
6779 * gprep.adb (Gnatprep): Parse the definition file without
6780 "replace in comments" even when switch -C is used.
6782 2017-01-19 Justin Squirek <squirek@adacore.com>
6784 * exp_ch9.adb (Is_Pure_Barrier): Create function
6785 Is_Count_Attribute to identify an expansion of the 'Count
6788 2017-01-19 Ed Schonberg <schonberg@adacore.com>
6790 * sem_ch5.adb (Analyze_Loop_Statement): In GNATprove mode the
6791 statements within an element iterator loop are only analyzed
6792 agter the loop is rewritten. Within a generic the analysis must
6793 be performed in any case to complete name capture.
6795 2017-01-19 Bob Duff <duff@adacore.com>
6797 * sem_prag.adb (Analyze_Pragma): Check for ignored pragmas first,
6798 before checking for unrecognized pragmas.
6799 Initialize Pname on its declarations; that's always good style.
6801 2017-01-19 Claire Dross <dross@adacore.com>
6803 * exp_ch7.adb (Build_Invariant_Procedure_Body): Semi-insert the
6804 body into the tree for GNATprove by setting its Parent field. The
6805 components invariants of composite types are not checked by
6806 the composite type's invariant procedure in GNATprove mode.
6807 (Build_Invariant_Procedure_Declaration): Semi-insert the
6808 declaration into the tree for GNATprove by setting its Parent
6810 * freeze.adb (Freeze_Arry_Type):In GNATprove mode, do not add
6811 the component invariants to the array type invariant procedure
6812 so that the procedure can be used to check the array type
6814 (Freeze_Record_Type): In GNATprove mode, do
6815 not add the component invariants to the record type invariant
6816 procedure so that the procedure can be used to check the record
6817 type invariants if any.
6819 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
6821 * lib-xref-spark_specific.adb: Minor reformatting.
6822 * exp_ch7.adb (Add_Parent_Invariants): Do not process array types.
6824 2017-01-19 Javier Miranda <miranda@adacore.com>
6826 * exp_aggr.adb (Pass_Aggregate_To_Back_End): Renamed as
6827 Build_Back_End_Aggregate.
6828 (Generate_Aggregate_For_Derived_Type): Code cleanup.
6829 (Prepend_Stored_Values): Code cleanup.
6831 2017-01-19 Ed Schonberg <schonberg@adacore.com>
6833 * sem_ch6.adb (Analyze_Expression_Function): Check for an
6834 incomplete return type after attempting to freeze it, so that
6835 other freeze actiona are generated in the proper order.
6837 2017-01-19 Ed Schonberg <schonberg@adacore.com>
6839 * sem_aggr.adb (Resolve_Aggregate): If the type is a string
6840 type, ie. a type whose component is a character type, and the
6841 aggregate is positional, do not convert into a string literal
6842 if the index type is not an integer type, because the original
6843 type may be required in an enclosing operation.
6845 2017-01-19 Bob Duff <duff@adacore.com>
6847 * binde.adb, debug.adb: Enable new elaboration order algorithm
6848 by default. -dp switch reverts to the old algorithm.
6850 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
6852 * sem_ch3.adb Add with and use clauses for Exp_Ch7.
6853 (Analyze_Declarations): Create the DIC and Invariant
6854 procedure bodies s after all freezing has taken place.
6855 (Build_Assertion_Bodies): New routine.
6856 * sem_ch7.adb Remove the with and use clauses for Exp_Ch7
6858 (Analyze_Package_Specification): Remove the
6859 generation of the DIC and Invariant procedure bodies. This is
6860 now done by Analyze_Declarations.
6861 * sem_disp.adb (Check_Dispatching_Operation): DIC and Invariant
6862 procedures are never treated as primitives.
6864 2017-01-19 Yannick Moy <moy@adacore.com>
6866 * frontend.adb: Analyze inlined bodies and check elaboration
6867 rules in GNATprove mode too.
6868 * sem_elab.adb (Delay_Element): Add Boolean component to save
6869 indication that call is in SPARK code. (Check_Elab_Calls):
6870 Check elaboration rules in GNATprove mode, and correctly set
6871 the current value of SPARK_Mode.
6872 * lib-xref-spark_specific.adb
6873 (Add_SPARK_Xrefs): Simplify iteration over dereferences.
6875 2017-01-19 Ed Schonberg <schonberg@adacore.com>
6877 * exp_ch4.adb (Expand_Concatenate): Do no enable overflow
6878 checks on the expression for the high bound of concatenation
6879 when checks are disabled, to suppress warnings about potential
6880 constraint errors in restricted runtimes.
6882 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
6884 * exp_ch3.adb (Expand_Freeze_Enumeration_Type): Mark the
6885 representation-to-position function as inlined.
6886 * sem_cat.adb (Set_Categorization_From_Scope): Do not modify
6887 the purity of an internally generated entity if it has been
6888 explicitly marked as pure for optimization purposes.
6889 * exp_aggr.adb: Minor reformatting.
6891 2017-01-19 Javier Miranda <miranda@adacore.com>
6893 * exp_ch6.adb (Expand_Call): Remove side effects on
6894 actuals that are allocators with qualified expression since the
6895 initialization of the object is performed by means of individual
6896 statements (and hence it must be done before the call).
6898 2017-01-19 Ed Schonberg <schonberg@adacore.com>
6900 * sem_ch3.adb (Analyze_Declarations): Minor reformatting.
6901 (Build_Derived_Enumeration_Type): If the derived type inherits a
6902 dynamic predicate from its parent, the bounds of the type must
6903 freeze because an explicit constraint is constructed for the
6904 type and the corresponding range is elaborated now.
6906 2017-01-19 Arnaud Charlet <charlet@adacore.com>
6908 * sem_attr.ads: minor fix of inconsistent casing in comment
6909 * lib-writ.ads: minor align comments in columns
6910 * sem_ch3.adb: Minor reformatting.
6911 * spark_xrefs.ads: minor fix typo in SPARK-related comment
6912 * table.ads: minor style fix in comment
6913 * lib-xref-spark_specific.adb
6914 (Add_SPARK_Xrefs): simplify processing of SPARK cross-references.
6915 * sem_ch12.adb: minor whitespace fix
6916 * freeze.adb: Add comment.
6917 * sem_util.adb (Unique_Name): for instances of
6918 generic subprograms ignore the name of the wrapper package.
6920 2017-01-19 Javier Miranda <miranda@adacore.com>
6922 * exp_aggr.adb (Resolve_Record_Aggregate):
6923 Factorize code needed for aggregates of limited and unlimited
6924 types in a new routine.
6925 (Pass_Aggregate_To_Back_End): New subprogram.
6927 2017-01-19 Yannick Moy <moy@adacore.com>
6929 * sinfo.adb (Pragma_Name): Only access up to Last_Pair of Pragma_Map.
6931 2017-01-19 Ed Schonberg <schonberg@adacore.com>
6933 * sem_ch4.ads, sem_ch4.adb (Try_Object_Operation): Make subprogram
6934 public, for use elsewhere.
6935 * sem_ch6.adb (Analyze_Procedure_Call): In SPARK_Mode and within
6936 an Inlined_body, recognize a call that uses object notation
6937 and has not been rewritten as a regular call because regular
6938 expansion has not taken place.
6940 2017-01-19 Bob Duff <duff@adacore.com>
6942 * checks.adb (Apply_Type_Conversion_Checks): Disable small optimization
6943 in case of generic formal discrete types, because it causes crashes in
6944 the compiler when built with assertions on.
6946 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
6948 * lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads,
6949 sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting.
6951 2017-01-19 Bob Duff <duff@adacore.com>
6953 * bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking):
6954 Increment Warnings_Detected. It was decrementing, which is
6955 wrong since we just issued a warning message.
6956 * binderr.ads (Errors_Detected, Warnings_Detected): Declare
6957 these variables to be of subtype Nat instead of Int, because
6958 they should never be negative.
6960 2017-01-19 Javier Miranda <miranda@adacore.com>
6962 * contracts.adb (Build_Postconditions_Procedure): Replace
6963 Generate_C_Code by Modify_Tree_For_C.
6964 * exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate):
6965 Replace Generate_C_Code by Modify_Tree_For_C.
6966 * exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by
6968 * exp_ch11.adb (Expand_N_Exception_Declaration): Replace
6969 Generate_C_Code by Modify_Tree_For_C.
6970 * exp_ch4.adb (Expand_Allocator_Expression): Replace
6971 Generate_C_Code by Modify_Tree_For_C.
6972 * exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code
6973 by Modify_Tree_For_C.
6974 * exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace
6975 Generate_C_Code by Modify_Tree_For_C.
6976 * sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code
6977 by Modify_Tree_For_C.
6978 * sinfo.ads (Modify_Tree_For_C): Adding documentation.
6980 2017-01-19 Javier Miranda <miranda@adacore.com>
6982 * sem_util.ads, sem_util.adb (Expression_Of_Expression_Function): New
6984 (Is_Inlinable_Expression_Function): New subprogram.
6985 * exp_ch6.ads, exp_ch6.adb (Expression_Of_Expression_Function): Moved
6987 (Is_Inlinable_Expression_Function): Moved to Sem_Util.
6989 2017-01-19 Ed Schonberg <schonberg@adacore.com>
6991 * sem_ch4.adb (Diagnose_Call): Improve error message when a
6992 selected component has a prefix that might be interpreted
6993 as a parameterless function call, but none of the candidate
6994 interpretations is parameterless, and there is a hidden homonym
6995 of the prefix that is a package.
6996 * sem_ch8.adb (Find_Selected_Component): If the prefix might be
6997 interpreted as a parameterless function call and its analysis
6998 fails, do not call Analyze_Selected_Component.
7000 2017-01-19 Steve Baird <baird@adacore.com>
7002 * sem_util.ads: Add new Use_Full_View Boolean parameter to
7004 * sem_util.adb (Get_Index_Bounds): replace calls to Scalar_Range with
7005 calls to a newly-defined Scalar_Range_Of_Right_View function.
7007 2017-01-19 Arnaud Charlet <charlet@adacore.com>
7009 * gnat1drv.adb: minor fix of unbalanced parens in comment
7010 * lib-xref.ads (Traverse_Compilation_Unit): declaration moved
7011 to visible part of the package to allow re-use in GNATprove.
7012 * lib-xref-spark_specific.adb (Traverse_Stub): routine refactored
7013 from repeated code of Traverse_Compilation_Unit.
7014 (Traverse_Declaration_Or_Statement): fixed detection of
7015 generic subprograms and packages; also, iteration over case
7016 statement alternatives rewritten to avoid testing if the first
7017 alternative is present (since it must be present due to Ada
7018 syntax restrictions).
7020 2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
7022 * exp_ch6.adb (Expand_N_Subprogram_Body): Mark the spec as
7023 returning by reference not just for subprogram body stubs,
7024 but for all subprogram cases.
7025 * sem_util.adb: Code reformatting.
7026 (Requires_Transient_Scope): Update the call to Results_Differ.
7027 (Results_Differ): Update the parameter profile and the associated
7030 2017-01-19 Ed Schonberg <schonberg@adacore.com>
7032 * sem_dim.adb (Analyze_Dimension): Analyze object declaration and
7033 identifier nodes that do not come from source, to handle properly
7034 dimensionality check within an inlined body which inclddes both
7035 original operands and rewritten operands. This removes spurious
7036 dimensionality errors in the presence of front-end inlining,
7037 as well as in SPARK mode.
7039 2017-01-16 Jakub Jelinek <jakub@redhat.com>
7042 * gcc-interface/lang.opt (gant, gnatO, gnat): Add Driver flag.
7044 2017-01-13 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
7046 * gcc-interface/Makefile.in (SPARC/Solaris): Fix typo.
7048 2017-01-13 Arnaud Charlet <charlet@adacore.com>
7050 * doc/gnat_ugn/getting_started_with_gnat.rst,
7051 doc/gnat_ugn/inline_assembler.rst,
7052 doc/gnat_ugn/building_executable_programs_with_gnat.rst,
7053 doc/gnat_ugn/elaboration_order_handling_in_gnat.rst,
7054 doc/gnat_ugn/about_this_guide.rst,
7055 doc/gnat_ugn/platform_specific_information.rst,
7056 doc/gnat_ugn/example_of_binder_output.rst,
7057 doc/gnat_ugn/gnat_and_program_execution.rst,
7058 doc/gnat_ugn/gnat_utility_programs.rst,
7059 doc/gnat_ugn/the_gnat_compilation_model.rst,
7060 doc/gnat_rm/implementation_defined_attributes.rst,
7061 doc/gnat_rm/compatibility_and_porting_guide.rst,
7062 doc/gnat_rm/standard_library_routines.rst,
7063 doc/gnat_rm/standard_and_implementation_defined_restrictions.rst,
7064 doc/gnat_rm/implementation_defined_pragmas.rst,
7065 doc/gnat_rm/the_gnat_library.rst,
7066 doc/gnat_rm/obsolescent_features.rst,
7067 doc/gnat_rm/about_this_guide.rst,
7068 doc/gnat_rm/the_implementation_of_standard_i_o.rst,
7069 doc/gnat_rm/implementation_of_ada_2012_features.rst,
7070 doc/gnat_rm/interfacing_to_other_languages.rst,
7071 doc/gnat_rm/implementation_defined_aspects.rst,
7072 doc/gnat_rm.rst: Update documentation.
7073 * gnat_rm.texi, gnat_ugn.texi: Regenerated.
7075 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7077 * einfo.ads: minor grammar fixes in comment of Normalized_Position_Max.
7078 * scil_ll.adb: Minor style fix in comment.
7079 * sem_ch8.adb (Analyze_Expanded_Name): Perform dimension analysis
7080 even if entity is already set, because the node may be renalyzed
7081 after inlining transformations.
7083 2017-01-13 Javier Miranda <miranda@adacore.com>
7085 * sem_res.adb (Resolve_Call): Do not establish a transient scope
7086 for a call to inlinable expression function (since the call will
7087 be replaced by its returned object).
7088 * exp_ch6.ads (Is_Inlinable_Expression_Function): New subprogram.
7089 * exp_ch6.adb (Expression_Of_Expression_Function): New subprogram.
7090 (Expand_Call): For inlinable expression function call replace the
7091 call by its returned object.
7092 (Is_Inlinable_Expression_Function): New subprogram.
7094 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7096 * checks.adb: Minor typo fix and reformatting.
7098 2017-01-13 Javier Miranda <miranda@adacore.com>
7100 * contracts.adb (Contract_Only_Subprograms): Remove formal.
7101 (Copy_Original_Specification): Removed.
7102 (Skip_Contract_Only_Subprogram): Move here checks previously
7103 located in the caller of this routine (to leave the code more clean).
7104 (Build_Contract_Only_Subprogram): Code cleanup.
7105 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): Removed.
7106 (Get_Contract_Only_Missing_Body_Name): Removed.
7108 2017-01-13 Javier Miranda <miranda@adacore.com>
7110 * sem_ch6.adb (Cloned_Expression): New subprogram.
7111 (Freeze_Expr_Types): Complete previous patch since the expression
7112 of an expression-function may have iterators and loops with
7113 defining identifiers which, as part of the preanalysis of the
7114 expression, may be left decorated with itypes that will not be
7115 available in the tree passed to the backend.
7117 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7119 * checks.adb (Apply_Type_Conversion_Checks): Optimize a type
7120 conversion to Integer of an expression that is an attribute
7121 reference 'Pos on an enumeration type.
7123 2017-01-13 Bob Duff <duff@adacore.com>
7125 * atree.ads: Minor comment fix.
7127 2017-01-13 Justin Squirek <squirek@adacore.com>
7129 * sem_ch6.adb (Check_Aggregate_Accessibility): Ignore function
7130 calls in accessibility check on return statement.
7132 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7134 * sem_ch6.adb (Analyze_Subprogram_Body_Helper):
7135 Ensure that the input body is a subprogram body before trying to
7136 determine whether it denoted an expression function. Note that
7137 subprogram body stubs cannot denote expression functions.
7139 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7141 * bindgen.adb, sem_ch6.adb, binde.adb, exp_ch3.adb: Minor reformatting
7144 2017-01-13 Javier Miranda <miranda@adacore.com>
7146 * einfo.ads (Component_Bit_Offset): Fix documentation.
7147 * sem_ch13.adb (Check_Record_Representation_Clause): Skip check
7148 on record holes for components with unknown compile-time offsets.
7150 2017-01-13 Bob Duff <duff@adacore.com>
7152 * ali.ads, ali.adb (Static_Elaboration_Model_Used): Remove unused flag.
7153 * g-locfil.ads: Minor comment fix.
7155 2017-01-13 Bob Duff <duff@adacore.com>
7157 * binde.adb (Elab_New): New elaboration order algorithm
7158 that is expected to cause fewer ABE issues. This is a work in
7159 progress. The new algorithm is currently disabled, and can be
7160 enable by the -dp switch, or by modifying the Do_Old and Do_New
7161 etc. flags and rebuilding. Experimental code is included to
7162 compare the results of the old and new algorithms.
7163 * binde.ads: Use GNAT.Dynamic_Tables instead of Table, so we
7164 can have multiple of these tables, so the old and new algorithms
7166 * bindgen.ads (Gen_Output_File): Pass Elab_Order as an 'in'
7167 parameter of type array. This avoids the global variable, and
7168 allows bounds checking (which is normally defeated by the tables
7169 packages). It also ensures that the Elab_Order is read-only
7171 * bindgen.adb: Pass Elab_Order as an 'in' parameter to all
7172 subprograms that need it, as above.
7173 * debug.adb: Document new -dp switch. Modify doc of old -do
7175 * gnatbind.adb (Gnatbind): Make use of new interfaces to Binde
7176 and Bindgen. Move writing of closure (-R and -Ra switches)
7177 to Binde; that's more convenient.
7179 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7181 * sem_ch6.adb (Analyze_Expression_Function): If the expression
7182 function is a completion, all entities referenced in the
7183 expression are frozen. As a consequence, a reference to an
7184 uncompleted private type from an enclosing scope is illegal.
7186 2017-01-13 Javier Miranda <miranda@adacore.com>
7188 * sem_ch6.adb (Freeze_Expr_Types): New subprogram.
7189 (Analyze_Subprogram_Body_Helper): At the occurrence of an
7190 expression function declaration that is a completion, its
7191 expression causes freezing (AI12-0103).
7193 2017-01-13 Vadim Godunko <godunko@adacore.com>
7195 * a-coinho-shared.adb: Fix memory leaks in Constant_Reference and
7196 Reference functions of Ada.Containers.Indefinite_Holders.
7198 2017-01-13 Bob Duff <duff@adacore.com>
7200 * s-os_lib.ads: Minor comment fixes.
7202 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7204 * exp_ch3.adb (Default_Initialize_Object): Do not default
7205 initialize an object when it is of a task type and restriction
7206 No_Tasking is in effect because the initialization is obsolete.
7207 * exp_ch9.adb (Build_Master_Entity): Do not generate a master when
7208 restriction No_Tasking is in effect.
7209 (Build_Master_Renaming): Do not rename a master when restriction
7210 No_Tasking is in effect.
7212 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7214 * sem_aggr.adb (Resolve_Array_Aggregate): The code that verifies
7215 the legality of An others clause applies as well to a choice in
7216 an Iterated_component_ association.
7217 (Resolve_Iterated_Component_Association): An others choice
7219 * exp_aggr.adb (Aggr_Assignment_OK_For_Backend): An
7220 Iterated_Component_Association is not static.
7222 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7224 * exp_ch3.adb (Freeze_Type): Mark the Ghost mode as set in case
7225 control is passed to the expresion handler before the new mode
7227 * sem_ch12.adb (Analyze_Package_Instantiation,
7228 Analyze_Subprogram_Instantiation): Mark the Ghost mode as set
7229 in case control is passed to the expresion handler before the
7232 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7234 * sem_aggr.adb, sem_ch3.adb, inline.adb, sem_util.adb, exp_ch4.adb,
7235 exp_aggr.adb: Minor reformatting.
7237 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7239 * inline.adb: Minor reformatting and typo fix.
7241 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7243 * sem_util.ads, sem_util.adb (Choice_List): Move function here
7244 from sem_aggr.adb, for use elsewhere.
7245 * sem_ch3.adb (Analyze_Object_Declaration): Use Choice_List.
7246 * sem_aggr.adb (Resolve_Array_Aggregate): Remove
7247 Iterated_Component_Present.
7248 * exp_aggr.adb: Use Choice_List throughout, to handle
7249 Iterated_Component_Associations.
7250 (Gen_Loop): Generate proper loop for an
7251 Iterated_Component_Association: loop variable has the identifier
7252 of the original association. Generate a loop even for a single
7253 component choice, in order to make loop parameter visible in
7255 (Flatten): An Iterated_Component_Association is not static.
7257 2017-01-13 Yannick Moy <moy@adacore.com>
7259 * exp_ch4.adb (Expand_N_Op_Expon): Ensure that the value of
7260 float exponentiation for statically known small negative values
7261 is the reciprocal of the exponentiation for the opposite value
7263 * s-exnllf.adb (Exn_Float, Exn_Long_Float, Exn_Long_Long_Float):
7264 Ensure that the value of float exponentiation for negative values
7265 is the reciprocal of the exponentiation for the opposite value
7267 * inline.adb (Expand_Inlined_Call): Fix the count
7268 for the number of generated gotos.
7270 2017-01-13 Yannick Moy <moy@adacore.com>
7272 * inline.adb: Code cleanup.
7273 * sem_util.adb (Is_OK_Volatile_Context): Add
7274 expression in delay statement as OK for volatile context.
7276 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7278 * sem_aggr.adb (Resolve_Array_Aggregate): In normal compilation
7279 mode a choice that is a subtype with a static predicate is
7280 replaced by the values it covers. This transformation must not
7281 be performed in ASIS mode, to preserve the source for analysis.
7283 2017-01-13 Justin Squirek <squirek@adacore.com>
7285 * nlists.ads: Correct minor typo.
7287 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7289 * sem_ch13.adb: Minor reformatting and typo fix.
7291 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7293 * par-ch4.adb (P_Aggregate_Or_Parent_Expr): An
7294 Iterated_Component_Association is a named association in an
7296 * sem_aggr.adb (Resolve_Iterated_Component_Association): New
7297 procedure, subsidiary of Resolve_Array_Aggregate, to analyze
7298 and resolve the discrete choices and the expression of the
7300 * sinfo.adb, sinfo.ads: In analogy with N_Component_Association,
7301 Loop_Actions and Box_Present are attributes of
7302 N_Iterated_Component_Association nodes. Box_Present is always
7304 * sprint.adb (Sprint_Node): An Iterated_Component_Association
7305 has a Discrete_Choices list, as specified in the RM. A
7306 Component_Association for aggregate uses instead a Choices list.
7307 We have to live with this small inconsistency because the new
7308 construct also has a defining identifier, and there is no way
7309 to merge the two node structures.
7311 2017-01-13 Yannick Moy <moy@adacore.com>
7313 * inline.adb (Remove_Aspects_And_Pragmas): Add Unused to the
7314 list of pragmas to remove. Remove pragmas from the list of
7315 statements in the body to inline.
7316 * namet.adb, namet.ads (Nam_In): New version with 12 parameters.
7318 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7320 * sem_ch3.adb (Resolve_Aspects): New procedure, subsidiary of
7321 Analyze_Declarations, to analyze and resolve the expressions of
7322 aspect specifications in the current declarative list, so that
7323 the expressions have proper entity and type info. This is needed
7324 for ASIS when there is no subsequent expansion to generate this
7325 semantic information.
7326 * sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Use Etype of
7327 original expression, to suppress cascaded errors when expression
7328 has been constant-folded.
7329 (Resolve_Aspect_Expressions, Resolve_Name): Preserve entities in
7330 ASIS mode, because there is no subsequent expansion to decorate
7333 2017-01-13 Yannick Moy <moy@adacore.com>
7335 * inline.adb, inline.ads (Call_Can_Be_Inlined_In_GNATprove_Mode):
7336 New function to detect when a call may be inlined or not in
7338 (Expand_Inlined_Call): Ensure that a temporary
7339 is always created in the cases where a type conversion may be
7340 needed on an input parameter in GNATprove mode, so that GNATprove
7341 sees the check to perform.
7342 * sem_res.adb (Resolve_Call): In GNATprove mode, skip inlining
7343 when not applicable due to actual requiring type conversion
7344 with possible check but no temporary value can be copied for
7345 GNATprove to see the check.
7347 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7349 * sem_aggr.adb, par_sco.adb, s-osprim-mingw.adb, exp_ch5.adb,
7350 exp_prag.adb, sem_ch3.adb, xr_tabls.adb, lib-xref-spark_specific.adb,
7351 layout.adb, sem_dist.adb, exp_spark.adb, exp_ch7.adb, gnatcmd.adb,
7352 exp_util.adb, prj-proc.adb, sem_aux.adb, comperr.adb, g-memdum.adb,
7353 exp_attr.adb, s-intman-solaris.adb, exp_ch9.adb, make.adb, live.adb,
7354 g-sercom-linux.adb, sem_dim.adb, mlib-prj.adb, s-intman-posix.adb,
7355 sem_ch9.adb, sem_ch10.adb, prep.adb, einfo.adb, scng.adb, checks.adb,
7356 prj-strt.adb, sem_prag.adb, eval_fat.adb, sem_ch12.adb, sem.adb,
7357 a-numaux-x86.adb, a-stwifi.adb, i-cobol.adb, prj.adb,
7358 get_spark_xrefs.adb, s-tasini.adb, rtsfind.adb, freeze.adb,
7359 g-arrspl.adb, par-ch4.adb, sem_util.adb, sem_res.adb, expander.adb,
7360 sem_attr.adb, exp_dbug.adb, prj-pp.adb, a-stzfix.adb, s-interr.adb,
7361 s-wchcnv.adb, switch-m.adb, gnat1drv.adb, sinput-l.adb, stylesw.adb,
7362 contracts.adb, s-intman-android.adb, g-expect.adb, exp_ch4.adb,
7363 g-comlin.adb, errout.adb, sinput.adb, s-exctra.adb, repinfo.adb,
7364 g-spipat.adb, g-debpoo.adb, exp_ch6.adb, sem_ch4.adb, exp_ch13.adb,
7365 a-wtedit.adb, validsw.adb, pprint.adb, widechar.adb, makeutl.adb,
7366 ali.adb, set_targ.adb, sem_mech.adb, sem_ch6.adb, gnatdll.adb,
7367 get_scos.adb, g-pehage.adb, s-tratas-default.adb, gnatbind.adb,
7368 prj-dect.adb, g-socthi-mingw.adb, par-prag.adb, prj-nmsc.adb,
7369 exp_disp.adb, par-ch12.adb, binde.adb, sem_ch8.adb,
7370 s-tfsetr-default.adb, s-regexp.adb, gprep.adb, s-tpobop.adb,
7371 a-teioed.adb, sem_warn.adb, sem_eval.adb, g-awk.adb, s-io.adb,
7372 a-ztedit.adb, xoscons.adb, exp_intr.adb, sem_cat.adb, sprint.adb,
7373 g-socket.adb, exp_dist.adb, sem_ch13.adb, s-tfsetr-vxworks.adb,
7374 par-ch3.adb, treepr.adb, g-forstr.adb, g-catiio.adb, par-ch5.adb,
7375 uname.adb, osint.adb, exp_ch3.adb, prj-env.adb, a-strfix.adb,
7376 a-stzsup.adb, prj-tree.adb, s-fileio.adb: Update all eligible case
7377 statements to reflect the new style for case alternatives. Various
7378 code clean up and reformatting.
7380 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7382 * exp_util.adb: Minor reformatting.
7384 2017-01-13 Yannick Moy <moy@adacore.com>
7386 * exp_spark.adb: Code cleanup.
7387 * sem_ch9.adb (Analyze_Delay_Until): Resolve
7388 expression so that calls are identified as such inside delay
7391 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7393 * exp_util.adb (Insert_Actions): Handle Iterated_Component_Association.
7394 * par-ch3.adb (P_Discrete_Choice_List): An
7395 Iterated_Component_Association is an array aggregate component.
7396 * par-ch4.adb (P_Iterated_Component_Association): New procedure.
7397 (Is_Quantified_Expression): New function that performs a lookahead
7398 to distinguish quantified expressions from iterated component
7400 (P_Aggregate_Or_Paren_Expr): Recognize iterated component
7402 (P_Unparen_Cond_Case_Quant_Expression, P_Primary): Ditto.
7403 * sem.adb (Analyze): Handle Iterated_Component_Association.
7404 * sem_aggr.adb (Resolve_Array_Aggregate): Dummy handling of iterated
7405 component associations.
7406 * sinfo.ads, sinfo.adb: Entries for for
7407 N_Iterated_Component_Association and its fields.
7408 * sprint.adb (Sprint_Node_Actual): Handle
7409 N_Iterated_Component_Association.
7411 2017-01-13 Justin Squirek <squirek@adacore.com>
7413 * sem_ch12.adb (Analyze_Package_Instantiation): Move disabiling
7414 of the style check until after preanalysis of acutals.
7416 2017-01-13 Yannick Moy <moy@adacore.com>
7418 * sem_ch13.adb: Minor reformatting.
7419 * par-ch11.adb: minor style fix in whitespace
7420 * gnatbind.adb (Gnatbind): Scope of Std_Lib_File
7421 reduced to Add_Artificial_ALI_File; style fix in declaration of
7422 Text; grammar fix in comment.
7423 * osint-c.adb (Read_Library_Info): strip trailing NUL from result.
7424 * freeze.adb: Cleanup to pass pragma instead of
7426 * exp_spark.adb (Expand_SPARK_Attribute_Reference): New procedure to
7427 replace System'To_Address by equivalent call.
7429 2017-01-13 Arnaud Charlet <charlet@adacore.com>
7431 * bindusg.adb: Improve usage output for -f switch.
7433 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7435 * frontend.adb, freeze.adb, sem_res.adb, sem_attr.adb, sem_ch8.adb:
7438 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7440 * sem_ch13.adb (Is_Predicate_Static): Following the intent of the RM,
7441 treat comparisons on strings as legal in a Static_Predicate.
7442 (Is_Predicate_Static, Is_Type_Ref): Predicate also returns true on
7443 a function call that is the expansion of a string comparison.The
7444 function call is built when compiling the corresponding predicate
7445 function, but the expression has been found legal as a static
7446 predicate during earlier analysis.
7447 * sem_eval.adb (Real_Or_String_Static_Predicate_Matches): Handle
7448 properly a function call that is the expansion of a string
7449 comparison operation, in order to recover the Static_Predicate
7450 expression and apply it to a static argument when needed.
7452 2017-01-13 Tristan Gingold <gingold@adacore.com>
7454 * s-mmap.adb, s-mmap.ads (Open_Read_No_Exception): New function.
7455 (Open_Read): Re-implement using Open_Read_No_Exception.
7456 (Open_Write): Raise exception in case of error.
7457 * s-mmosin-mingw.adb (Open_Common): Do not raise exception.
7458 * s-mmosin-unix.adb (Open_Read, Open_Write): Do not
7460 * s-mmosin-mingw.ads, s-mmosin-unix.ads (Open_Read): Adjust comment.
7462 2017-01-13 Yannick Moy <moy@adacore.com>
7464 * checks.adb: Code cleanup.
7466 2017-01-13 Yannick Moy <moy@adacore.com>
7468 * freeze.adb (Check_Inherited_Conditions): Use analyzed pragma
7469 expression instead of unanalyzed aspect expression for checking
7470 the validity of inheriting an operation. Also copy the expression
7471 being passing it to Build_Class_Wide_Expression, as this call
7472 modifies its argument.
7473 * sem_util.ads Fix comment to reference correct function name
7476 2017-01-13 Javier Miranda <miranda@adacore.com>
7478 * sem_res.adb (Resolve_Generalized_Indexing): Compiling in ASIS mode,
7479 when we propagate information about the indexes back to the original
7480 indexing mode and the prefix of the index is a function call, do not
7481 remove any parameter from such call.
7483 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7485 * exp_ch6.ads (Needs_BIP_Finalization_Master): Update comment.
7486 * exp_ch6.adb (Needs_BIP_Finalization_Master): Return True for
7487 a build-in-place function whose result type is tagged.
7489 2017-01-13 Yannick Moy <moy@adacore.com>
7491 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
7492 Do not generate a wrapper when the only candidate is a class-wide
7494 (Analyze_Subprogram_Renaming): Do not freeze the renaming or renamed
7495 inside a generic context.
7497 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7499 * exp_util.adb (Add_Inherited_Tagged_DIC):
7500 Pass the object parameters of both the parent and the derived
7501 type DIC procedure to the reference replacement circuitry.
7502 (Find_DIC_Type): Modify the circuitry to present the partial
7503 view of a private type in case the private type defines its own
7505 (Replace_Object_And_Primitive_References): Add two
7506 optional formal parameters. Update the comment on usage. Update
7507 the replacement of references to object parameters.
7509 2017-01-13 Gary Dismukes <dismukes@adacore.com>
7511 * einfo.adb, sem_ch6.adb, atree.adb: Minor reformatting and typo fix.
7513 2017-01-13 Ed Schonberg <schonberg@adacore.com>
7515 * sem_res.adb (Resolve_Actuals): Apply Scalar_Range_Check to
7516 an out parameter that is a type conversion, independently of th
7517 range check that may apply to the expression of the conversion,
7518 for use in GNATProve.
7520 2017-01-13 Yannick Moy <moy@adacore.com>
7522 * gnat1drv.adb (Gnat1drv): Move the implicit with for System in
7523 GNATprove_Mode here to Frontend.
7524 * frontend.adb (Frontend): Move the implicit with for System
7525 in GNATprove_Mode here as it ismore correct this way; the old
7526 place only worked by chance, since there were no overloaded names.
7527 * rtsfind.ads (RE_Id, RE_Unit_Table): Add RE_Tasking_State.
7528 * sem_attr.adb (Analyze_Attribute): In GNATprove_Mode, for the
7529 four attributes identified in SRM 9(18), add an implicit with
7530 to Ada.Task_Identification.
7531 * sem_ch8.adb (Analyze_Subprogram_Renaming.Build_Class_Wide_Wrapper):
7532 Deal specially with the wrapper introduced for AI05-0071 in GNATprove
7534 * checks.adb (Apply_Discriminant_Check,
7535 Apply_Selected_Length_Checks, Apply_Selected_Range_Checks):
7536 In GNATprove mode, we do not apply the checks, but we still
7537 analyze the expression to possibly issue errors on SPARK
7538 code when a run-time error can be detected at compile time.
7539 (Selected_Length_Checks, Selected_Range_Checks): Perform analysis
7542 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7544 * expander.adb (Expand): Add a warning about using return
7545 statements in Ghost management code.
7546 * exp_ch3.adb (Freeze_Type): Add a warning about using return
7547 statements in Ghost management code.
7548 * exp_ch7.adb (Build_Invariant_Procedure_Body,
7549 Build_Invariant_Procedure_Declaration): Add a warning about
7550 using return statements in Ghost management code.
7551 * exp_disp.adb (Make_DT): Add a warning about using return
7552 statements in Ghost management code.
7553 * exp_util.adb (Build_DIC_Procedure_Body,
7554 Build_DIC_Procedure_Declaration, Make_Predicated_Call): Add a
7555 warning about using return statements in Ghost management code.
7556 * freeze.adb (Freeze_Entity): Add a warning about using return
7557 statements in Ghost management code.
7558 * sem.adb (Analyze, Do_Analyze): Add a warning about using return
7559 statements in Ghost management code.
7560 * sem_ch3.adb (Analyze_Object_Declaration, Process_Full_View): Add
7561 a warning about using return statements in Ghost management code.
7562 * sem_ch5.adb (Analyze_Assignment): Add a warning about using
7563 return statements in Ghost management code.
7564 * sem_ch6.adb (Analyze_Procedure_Call,
7565 Analyze_Subprogram_Body_Helper): Add a warning about using return
7566 statements in Ghost management code.
7567 * sem_ch7.adb (Analyze_Package_Body_Helper): Add a warning about
7568 using return statements in Ghost management code.
7569 * sem_ch12.adb (Analyze_Package_Instantiation,
7570 Analyze_Subprogram_Instantiation, Instantiate_Package_Body,
7571 Instantiate_Subprogram_Body): Add a warning about using return
7572 statements in Ghost management code.
7573 * sem_ch13.adb (Build_Predicate_Functions,
7574 Build_Predicate_Function_Declarations): Add a warning about
7575 using return statements in Ghost management code.
7576 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part,
7577 Analyze_Initial_Condition_In_Decl_Part, Analyze_Pragma,
7578 Analyze_Pre_Post_Condition_In_Decl_Part): Add a warning about
7579 using return statements in Ghost management code.
7581 2017-01-13 Tristan Gingold <gingold@adacore.com>
7583 * s-mmosin-mingw.adb: Fix pragma import.
7585 2017-01-13 Arnaud Charlet <charlet@adacore.com>
7587 * gnat1drv.adb (Adjust_Global_Switches): Ignore -gnateE in
7590 2017-01-13 Hristian Kirtchev <kirtchev@adacore.com>
7592 * atree.adb (Allocate_Initialize_Node): A newly created node is
7593 no longer marked as Ghost at this level.
7594 (Mark_New_Ghost_Node): New routine.
7595 (New_Copy): Mark the copy as Ghost.
7596 (New_Entity): Mark the entity as Ghost.
7597 (New_Node): Mark the node as Ghost.
7598 * einfo.adb (Is_Checked_Ghost_Entity): This attribute can now
7599 apply to unanalyzed entities.
7600 (Is_Ignored_Ghost_Entity): This attribute can now apply to unanalyzed
7602 (Set_Is_Checked_Ghost_Entity): This attribute now
7603 applies to all entities as well as unanalyzed entities.
7604 (Set_Is_Ignored_Ghost_Entity): This attribute now applies to
7605 all entities as well as unanalyzed entities.
7606 * expander.adb Add with and use clauses for Ghost.
7607 (Expand): Install and revert the Ghost region associated with the node
7609 * exp_ch3.adb (Expand_Freeze_Array_Type): Remove all Ghost-related code.
7610 (Expand_Freeze_Class_Wide_Type): Remoe all Ghost-related code.
7611 (Expand_Freeze_Enumeration_Type): Remove all Ghost-related code.
7612 (Expand_Freeze_Record_Type): Remove all Ghost-related code.
7613 (Freeze_Type): Install and revert the Ghost region associated
7614 with the type being frozen.
7615 * exp_ch5.adb Remove with and use clauses for Ghost.
7616 (Expand_N_Assignment_Statement): Remove all Ghost-related code.
7617 * exp_ch6.adb Remove with and use clauses for Ghost.
7618 (Expand_N_Procedure_Call_Statement): Remove all Ghost-relatd code.
7619 (Expand_N_Subprogram_Body): Remove all Ghost-related code.
7620 * exp_ch7.adb (Build_Invariant_Procedure_Body): Install and revert the
7621 Ghost region of the working type.
7622 (Build_Invariant_Procedure_Declaration): Install and revert
7623 the Ghost region of the working type.
7624 (Expand_N_Package_Body): Remove all Ghost-related code.
7625 * exp_ch8.adb Remove with and use clauses for Ghost.
7626 (Expand_N_Exception_Renaming_Declaration): Remove all Ghost-related
7628 (Expand_N_Object_Renaming_Declaration): Remove all Ghost-related code.
7629 (Expand_N_Package_Renaming_Declaration): Remove all Ghost-related code.
7630 (Expand_N_Subprogram_Renaming_Declaration): Remove all Ghost-related
7632 * exp_ch13.adb Remove with and use clauses for Ghost.
7633 (Expand_N_Freeze_Entity): Remove all Ghost-related code.
7634 * exp_disp.adb (Make_DT): Install and revert the Ghost region of
7635 the tagged type. Move the generation of various entities within
7636 the Ghost region of the type.
7637 * exp_prag.adb Remove with and use clauses for Ghost.
7638 (Expand_Pragma_Check): Remove all Ghost-related code.
7639 (Expand_Pragma_Contract_Cases): Remove all Ghost-related code.
7640 (Expand_Pragma_Initial_Condition): Remove all Ghost-related code.
7641 (Expand_Pragma_Loop_Variant): Remove all Ghost-related code.
7642 * exp_util.adb (Build_DIC_Procedure_Body): Install
7643 and revert the Ghost region of the working types.
7644 (Build_DIC_Procedure_Declaration): Install and revert the
7645 Ghost region of the working type.
7646 (Make_Invariant_Call): Install and revert the Ghost region of the
7648 (Make_Predicate_Call): Reimplemented. Install and revert the
7649 Ghost region of the associated type.
7650 * freeze.adb (Freeze_Entity): Install and revert the Ghost region
7651 of the entity being frozen.
7652 (New_Freeze_Node): Removed.
7653 * ghost.adb Remove with and use clauses for Opt.
7654 (Check_Ghost_Completion): Update the parameter profile
7655 and all references to formal parameters.
7656 (Ghost_Entity): Update the comment on usage.
7657 (Install_Ghost_Mode): New routines.
7658 (Is_Ghost_Assignment): New routine.
7659 (Is_Ghost_Declaration): New routine.
7660 (Is_Ghost_Pragma): New routine.
7661 (Is_Ghost_Procedure_Call): New routine.
7662 (Is_Ghost_Renaming): Removed.
7663 (Is_OK_Declaration): Reimplemented.
7664 (Is_OK_Pragma): Reimplemented.
7665 (Is_OK_Statement): Reimplemented.
7666 (Is_Subject_To_Ghost): Update the comment on usage.
7667 (Mark_And_Set_Ghost_Assignment): New routine.
7668 (Mark_And_Set_Ghost_Body): New routine.
7669 (Mark_And_Set_Ghost_Completion): New routine.
7670 (Mark_And_Set_Ghost_Declaration): New routine.
7671 (Mark_And_Set_Ghost_Instantiation): New routine.
7672 (Mark_And_Set_Ghost_Procedure_Call): New routine.
7673 (Mark_Full_View_As_Ghost): Removed.
7674 (Mark_Ghost_Declaration_Or_Body): New routine.
7675 (Mark_Ghost_Pragma): New routine.
7676 (Mark_Ghost_Renaming): New routine.
7677 (Mark_Pragma_As_Ghost): Removed.
7678 (Mark_Renaming_As_Ghost): Removed.
7679 (Propagate_Ignored_Ghost_Code): Update the comment on usage.
7680 (Prune_Node): Freeze nodes no longer need special pruning, they
7681 are processed by the general ignored Ghost code mechanism.
7682 (Restore_Ghost_Mode): New routine.
7683 (Set_Ghost_Mode): Reimplemented.
7684 (Set_Ghost_Mode_From_Entity): Removed.
7685 * ghost.ads Add with and use clauses for Ghost.
7686 (Check_Ghost_Completion): Update the parameter profile
7687 along with the comment on usage.
7688 (Install_Ghost_Mode): New routine.
7689 (Is_Ghost_Assignment): New routine.
7690 (Is_Ghost_Declaration): New routine.
7691 (Is_Ghost_Pragma): New routine.
7692 (Is_Ghost_Procedure_Call): New routine.
7693 (Mark_And_Set_Ghost_Assignment): New routine.
7694 (Mark_And_Set_Ghost_Body): New routine.
7695 (Mark_And_Set_Ghost_Completion): New routine.
7696 (Mark_And_Set_Ghost_Declaration): New routine.
7697 (Mark_And_Set_Ghost_Instantiation): New routine.
7698 (Mark_And_Set_Ghost_Procedure_Call): New routine.
7699 (Mark_Full_View_As_Ghost): Removed.
7700 (Mark_Ghost_Pragma): New routine.
7701 (Mark_Ghost_Renaming): New routine.
7702 (Mark_Pragma_As_Ghost): Removed.
7703 (Mark_Renaming_As_Ghost): Removed.
7704 (Restore_Ghost_Mode): New routine.
7705 (Set_Ghost_Mode): Redefined.
7706 (Set_Ghost_Mode_From_Entity): Removed.
7707 * sem.adb (Analyze): Install and revert the Ghost region of the
7708 node being analyzed.
7709 (Do_Analyze): Change the way a clean Ghost
7710 region is installed and reverted.
7711 * sem_ch3.adb (Analyze_Full_Type_Declaration): Remove
7712 all Ghost-related code.
7713 (Analyze_Incomplete_Type_Decl): Remove all Ghost-related code.
7714 (Analyze_Number_Declaration): Remove all Ghost-related code.
7715 (Analyze_Object_Declaration): Install and revert the Ghost region of
7716 a deferred object declaration's completion.
7717 (Array_Type_Declaration): Remove all Ghost-related code.
7718 (Build_Derived_Type): Update the comment on
7719 the propagation of Ghost attributes from a parent to a derived type.
7720 (Derive_Subprogram): Remove all Ghost-related code.
7721 (Make_Class_Wide_Type): Remove all Ghost-related code.
7722 (Make_Implicit_Base): Remove all Ghost-related code.
7723 (Process_Full_View): Install and revert the Ghost region of
7724 the partial view. There is no longer need to check the Ghost
7726 * sem_ch5.adb (Analyze_Assignment): Install and revert the Ghost
7727 region of the left hand side.
7728 * sem_ch6.adb (Analyze_Abstract_Subprogram_Declaration): Remove
7729 all Ghost-related code.
7730 (Analyze_Expression_Function): Remove all Ghost-related code.
7731 (Analyze_Generic_Subprogram_Body): Remove all Ghost-related code.
7732 (Analyze_Procedure_Call): Install and revert the Ghost region of
7733 the procedure being called.
7734 (Analyze_Subprogram_Body_Helper): Install and revert the Ghost
7735 region of the spec or body.
7736 (Analyze_Subprogram_Declaration): Remove all Ghost-related code.
7737 (Build_Subprogram_Declaration): Remove all Ghost-related code.
7738 (Find_Corresponding_Spec): Remove all Ghost-related code.
7739 (Process_Formals): Remove all Ghost-related code.
7740 * sem_ch7.adb (Analyze_Package_Body_Helper): Install and revert
7741 the Ghost region of the spec.
7742 (Analyze_Package_Declaration): Remove all Ghost-related code.
7743 * sem_ch8.adb (Analyze_Exception_Renaming): Mark a renaming as
7744 Ghost when it aliases a Ghost entity.
7745 (Analyze_Generic_Renaming): Mark a renaming as Ghost when it aliases
7747 (Analyze_Object_Renaming): Mark a renaming as Ghost when
7748 it aliases a Ghost entity.
7749 (Analyze_Package_Renaming): Mark a renaming as Ghost when it aliases
7751 (Analyze_Subprogram_Renaming): Mark a renaming as Ghost when it
7752 aliases a Ghost entity.
7753 * sem_ch11.adb Remove with and use clauses for Ghost.
7754 (Analyze_Exception_Declaration): Remove all Ghost-related code.
7755 * sem_ch12.adb (Analyze_Generic_Package_Declaration): Remove all
7757 (Analyze_Generic_Subprogram_Declaration): Remove all Ghost-related
7759 (Analyze_Package_Instantiation): Install and revert the Ghost region
7760 of the package instantiation.
7761 (Analyze_Subprogram_Instantiation): Install
7762 and revert the Ghost region of the subprogram instantiation.
7763 (Instantiate_Package_Body): Code clean up. Install and revert the
7764 Ghost region of the package body.
7765 (Instantiate_Subprogram_Body): Code clean up. Install and revert the
7766 Ghost region of the subprogram body.
7767 * sem_ch13.adb (Build_Predicate_Functions): Install
7768 and revert the Ghost region of the related type.
7769 (Build_Predicate_Function_Declaration): Code clean up. Install
7770 and rever the Ghost region of the related type.
7771 * sem_prag.adb (Analyze_Contract_Cases_In_Decl_Part):
7772 Install and revert the Ghost region of the pragma.
7773 (Analyze_Initial_Condition_In_Decl_Part): Install and revert the
7774 Ghost region of the pragma.
7775 (Analyze_Pragma): Install and revert the Ghost region of various
7776 pragmas. Mark a pragma as Ghost when it is related to a Ghost entity
7777 or encloses a Ghost entity.
7778 (Analyze_Pre_Post_Condition): Install and revert the Ghost
7779 region of the pragma.
7780 (Analyze_Pre_Post_Condition_In_Decl_Part): Install and revert the
7781 Ghost region of the pragma.
7782 * sem_res.adb (Resolve): Remove all Ghost-related code.
7783 * sem_util.adb (Is_Declaration): Reimplemented.
7784 (Is_Declaration_Other_Than_Renaming): New routine.
7785 * sem_util.ads (Is_Declaration_Other_Than_Renaming): New routine.
7786 * sinfo.adb (Is_Checked_Ghost_Pragma): New routine.
7787 (Is_Ghost_Pragma): Removed.
7788 (Is_Ignored_Ghost_Pragma): New routine.
7789 (Set_Is_Checked_Ghost_Pragma): New routine.
7790 (Set_Is_Ghost_Pragma): Removed.
7791 (Set_Is_Ignored_Ghost_Pragma): New routine.
7792 * sinfo.ads: Update the documentation on Ghost mode and
7793 Ghost regions. New attributes Is_Checked_Ghost_Pragma
7794 and Is_Ignored_Ghost_Pragma along with usages in nodes.
7795 Remove attribute Is_Ghost_Pragma along with usages in nodes.
7796 (Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
7797 (Is_Ghost_Pragma): Removed along with pragma Inline.
7798 (Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
7799 (Set_Is_Checked_Ghost_Pragma): New routine along with pragma Inline.
7800 (Set_Is_Ghost_Pragma): Removed along with pragma Inline.
7801 (Set_Is_Ignored_Ghost_Pragma): New routine along with pragma Inline.
7803 2017-01-12 Tristan Gingold <gingold@adacore.com>
7805 * s-mmap.ads, s-mmap.adb, s-mmosin-unix.ads, s-mmosin-unix.adb,
7806 s-mmauni-long.ads, s-mmosin-mingw.ads, s-mmosin-mingw.adb: New files.
7808 2017-01-12 Yannick Moy <moy@adacore.com>
7810 * errout.adb, errout.ads (Initialize): Factor common treatment
7812 (Reset_Warnings): New procedure to reset counts related to warnings.
7813 (Record_Compilation_Errors): New variable to store the presence of an
7814 error, used in gnat2why to allow changing the Warning_Mode.
7815 (Compilation_Errors): Use new variable Record_Compilation_Errors to
7816 store the presence of an error.
7818 2017-01-12 Javier Miranda <miranda@adacore.com>
7820 * sem_ch13.adb (Analyze_Aspect_Specifications):
7821 For Interrupt_Handler and Attach_ Handler aspects, decorate the
7822 internally built reference to the protected procedure as coming
7823 from sources and force its analysis.
7825 2017-01-12 Ed Schonberg <schonberg@adacore.com>
7827 * sem_ch3.adb (Build_Derived_Type): For a scalar derived type,
7828 inherit predicates if any from the first_subtype of the parent,
7829 not from the anonymous parent type.
7830 * sem_eval.adb (Is_Static_Subtype): A type that inherits a dynamic
7831 predicate is not a static subtype.
7833 2017-01-12 Gary Dismukes <dismukes@adacore.com>
7835 * freeze.adb (Check_Suspicious_Convention): New procedure
7836 performing a warning check on discriminated record types with
7837 convention C or C++. Factored out of procedure Freeze_Record_Type,
7838 and changed to only apply to base types (to avoid spurious
7839 warnings on subtypes). Minor improvement of warning messages
7840 to refer to discriminated rather than variant record types.
7841 (Freeze_Record_Type): Remove code for performing a suspicious
7843 (Freeze_Entity): Only call Freeze_Record_Type
7844 on types that aren't declared within any enclosing generic units
7845 (rather than just excluding the type when the innermost scope
7846 is generic). Call Check_Suspicious_Convention whether or not
7847 the type is declared within a generic unit.
7848 * sem_ch8.adb (In_Generic_Scope): Move this function to Sem_Util.
7849 * sem_util.ads, sem_util.adb (In_Generic_Scope): New function (moved
7852 2017-01-12 Tristan Gingold <gingold@adacore.com>
7854 * sysdep.c, adaint.c, rtinit.c, ming32.h:
7855 (__gnat_current_codepage): Renamed from CurrentCodePage
7856 (__gnat_current_ccs_encoding): Renamed from CurrentCCSEncoding
7858 2017-01-12 Ed Schonberg <schonberg@adacore.com>
7860 * sem_ch6.adb (Fully_Conformant_Expressions): Handle properly
7861 quantified expressions, following AI12-050: the loop parameters
7862 of two quantified expressions are conformant if they have the
7865 2017-01-12 Arnaud Charlet <charlet@adacore.com>
7867 * gcc-interface/Makefile.in: Clean up VxWorks targets.
7869 2017-01-12 Ed Schonberg <schonberg@adacore.com>
7871 * sem_attr.adb (Analyze_Attribute_Reference, case Loop_Entry):
7872 Hnadle properly the attribute reference when it appears as part
7873 of an expression in another loop aspect.
7875 2017-01-12 Ed Schonberg <schonberg@adacore.com>
7877 * exp_ch3.adb (Check_Predicated_Discriminant): New procedure,
7878 subsidiary of Build_Initialization_Call, to complete generation
7879 of predicate checks on discriminants whose (sub)types have
7880 predicates, and to add checks on variants that do not have an
7882 * sem_util.adb (Gather_Components): A missing Others alternative is
7883 not an error when the type of the discriminant is a static predicate
7884 (and coverage has been checked when analyzing the case statement). A
7885 runtime check is generated to verify that a given discriminant
7886 satisfies the predicate (RM 3.8.1. (21.1/2)).
7888 2017-01-12 Yannick Moy <moy@adacore.com>
7890 * gnat1drv.adb (Adjust_Global_Switches): Only
7891 perform checking of exception mechanism when generating code.
7893 2017-01-12 Justin Squirek <squirek@adacore.com>
7895 * exp_ch7.adb (Add_Type_Invariants, Process_Array_Component):
7896 Remove handling of access component with invariant.
7897 (Build_Invariant_Procedure_Declaration): Remove return on class
7899 * freeze.adb (Freeze_Array_Type, Freeze_Record_Type): Remove
7900 conditional exception for component or array so Has_Own_Invariants
7901 flag is not falsly set.
7902 * sem_ch3.adb (Make_Class_Wide_Type): Initialize copy of class
7903 wide type to have no invariant flags.
7905 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
7907 * exp_ch9.adb, sem_prag.adb, s-tassta.adb, sem_util.adb, s-tarest.adb,
7908 sem_ch13.adb: Minor reformatting.
7910 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
7912 * exp_aggr.adb (Build_Record_Aggr_Code): Guard against a missing
7913 adjustment primitive when the ancestor type was not properly frozen.
7914 (Gen_Assign): Guard against a missing initialization
7915 primitive when the component type was not properly frozen.
7916 (Initialize_Array_Component): Guard against a missing adjustment
7917 primitive when the component type was not properly frozen.
7918 (Initialize_Record_Component): Guard against a missing adjustment
7919 primitive when the component type was not properly frozen.
7920 (Process_Transient_Component_Completion): The transient object may
7921 not be finalized when its associated type was not properly frozen.
7922 * exp_ch3.adb (Build_Assignment): Guard against a missing
7923 adjustment primitive when the component type was not properly frozen.
7924 (Build_Initialization_Call): Guard against a missing
7925 initialization primitive when the associated type was not properly
7927 (Expand_N_Object_Declaration): Guard against a missing
7928 adjustment primitive when the base type was not properly frozen.
7929 (Predefined_Primitive_Bodies): Create an empty Deep_Adjust
7930 body when there is no adjustment primitive available. Create an
7931 empty Deep_Finalize body when there is no finalization primitive
7933 * exp_ch4.adb (Apply_Accessibility_Check): Guard against a
7934 missing finalization primitive when the designated type was
7935 not properly frozen.
7936 (Expand_N_Allocator): Guard against a missing initialization primitive
7937 when the designated type was not properly frozen.
7938 * exp_ch5.adb (Make_Tag_Ctrl_Assignment): Add the adjustment call
7939 only when the corresponding adjustment primitive is available.
7940 * exp_ch7.adb (Build_Adjust_Or_Finalize_Statements): Generate the
7941 adjustment/finalization statements only when there is an available
7942 primitive to carry out the action.
7943 (Build_Initialize_Statements): Generate the initialization/finalization
7944 statements only when there is an available primitive to carry out the
7946 (Make_Adjust_Call): Do not generate a call when the underlying
7947 type is not present due to a possible missing full view.
7948 (Make_Final_Call): Do not generate a call when the underlying
7949 type is not present due to a possible missing full view.
7950 (Make_Finalize_Address_Stmts): Generate an empty body when the
7951 designated type lacks a finalization primitive.
7952 (Make_Init_Call): Do not generate a call when the underlying type is
7953 not present due to a possible missing full view.
7954 (Process_Component_For_Adjust): Add the adjustment call only when the
7955 corresponding adjustment primitive is available.
7956 (Process_Component_For_Finalize): Add the finalization call only when
7957 the corresponding finalization primitive is available.
7958 (Process_Object_Declaration): Use a null statement to emulate a
7959 missing call to the finalization primitive of the object type.
7960 * exp_ch7.ads (Make_Adjust_Call): Update the comment on usage.
7961 (Make_Final_Call): Update the comment on usage.
7962 (Make_Init_Call): Update the comment on usage.
7963 * exp_util.adb (Build_Transient_Object_Statements): Code reformatting.
7965 2017-01-12 Arnaud Charlet <charlet@adacore.com>
7967 * einfo.ads: Update documentation of Address_Taken.
7968 * sem_attr.adb (Analyze_Access_Attribute, Resolve_Attribute
7969 [Access_Attribute]): Only consider 'Access/'Unchecked_Access
7970 for subprograms when setting Address_Taken flag.
7972 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
7974 * sem_ch10.adb (Analyze_With_Clause): Removed code that turned
7975 Configurable_Run_Time_Mode off when analysing with'ed predefined
7978 2017-01-12 Gary Dismukes <dismukes@adacore.com>
7980 * sem_prag.adb: Minor reformatting.
7981 * sem_util.adb (Unique_Entity): fix result for
7982 bodies of entry families.
7984 2017-01-12 Justin Squirek <squirek@adacore.com>
7986 * sem_prag.adb (Analyze_Pragma): Add appropriate calls to
7987 Resolve_Suppressible in the pragma Assertion_Policy case.
7988 (Resolve_Suppressible): Created this function to factor out
7989 common code used to resolve Suppress to either Ignore or Check
7990 * snames.ads-tmpl: Add name for Suppressible.
7992 2017-01-12 Gary Dismukes <dismukes@adacore.com>
7994 * exp_ch9.adb, s-secsta.adb, snames.ads-tmpl, exp_ch3.adb: Minor
7996 * debug.adb: Minor comment fixes.
7998 2017-01-12 Arnaud Charlet <charlet@adacore.com>
8000 * sem_util.adb (Unique_Entity): For concurrent
8001 bodies that are defined with stubs and complete a declaration
8002 of a single concurrent object return the entity of an implicit
8003 concurrent type, not the entity of the anonymous concurrent
8005 * debug.adb: -gnatd.J is no longer used.
8006 * make.adb (Globalize): Removed, no longer used.
8007 * sem_ch9.adb: minor typo in comment for entry index
8009 2017-01-12 Patrick Bernardi <bernardi@adacore.com>
8011 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
8012 * exp_ch3.adb (Build_Init_Statements): As part of initialising
8013 the value record of a task, set its _Secondary_Stack_Size field
8015 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
8016 a _Secondary_Stack_Size field in the value record of
8017 the task if a Secondary_Stack_Size rep item is present.
8018 (Make_Task_Create_Call): Include secondary stack size
8019 parameter. If No_Secondary_Stack restriction is in place, passes
8021 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
8022 Secondary_Stack_Size.
8023 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
8024 function to define the overhead of the secondary stack.
8025 * s-tarest.adb (Create_Restricted_Task,
8026 Create_Restricted_Task_Sequential): Functions now include
8027 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
8028 * s-tarest.adb (Create_Restricted_Task,
8029 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB now
8030 include Secondary_Stack_Size parameter.
8031 (Task_Wrapper): Secondary stack now allocated to the size specified by
8032 the Secondary_Stack_Size parameter in the task's ATCB.
8033 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialize_ATCB): New
8034 Secondary_Stack_Size component.
8035 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
8036 Create_Restricted_Task_Sequential): Function now include
8037 Secondary_Stack_Size parameter.
8038 (Task_Wrapper): Secondary stack now allocated to the size
8039 specified by the Secondary_Stack_Size parameter in the task's
8041 * s-tproft.adb (Register_Foreign_Thread): Amended Initialize_ATCB call
8042 to include Secondary_Stack_Size parameter.
8043 * sem_ch13.adb (Analyze_Aspect_Specification): Add support for
8044 Secondary_Stack_Size aspect, turning the aspect into its corresponding
8046 (Analyze_Attribute_Definition): Process Secondary_Stack_Size attribute.
8047 * snames.adb-tmpl, snames.ads-tmpl: Added names
8048 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
8049 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
8051 2017-01-12 Yannick Moy <moy@adacore.com>
8053 * exp_spark.adb (Expand_SPARK_Potential_Renaming): Fix sloc of copied
8056 2017-01-12 Justin Squirek <squirek@adacore.com>
8058 * exp_attr.adb (Expand_N_Attribute_Reference):
8059 Fix Finalization_Size case by properly resolving the type after
8060 rewritting the node.
8062 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8064 * exp_util.adb (Build_DIC_Procedure_Body): Semi-insert the body into
8066 (Build_DIC_Procedure_Declaration): Semi-insert the body into the tree.
8067 * binde.adb, exp_ch5.adb, sem_type.adb, sem.ads, sem_res.adb,
8068 exp_sel.ads: Minor reformatting.
8070 2017-01-12 Justin Squirek <squirek@adacore.com>
8072 * exp_ch6.adb (Expand_Call): Add guard to prevent
8073 invariant checks from being created for internally generated
8076 2017-01-12 Bob Duff <duff@adacore.com>
8078 * lib-writ.ads: Remove incorrect comment.
8080 2017-01-12 Javier Miranda <miranda@adacore.com>
8082 * debug.adb (-gnatd.K): Enable generation of contract-only
8083 procedures in CodePeer mode.
8084 * contracts.adb (Build_And_Analyze_Contract_Only_Subprograms):
8086 (Analyze_Contracts): Generate contract-only procedures if -gnatdK is
8088 * scil_ll.ads, scil_ll.adb (Get_Contract_Only_Body_Name): New
8090 (Get_Contract_Only_Missing_Body_Name): New subprogram.
8091 (Get_Contract_Only_Body): New subprogram.
8092 (Set_Contract_Only_Body): New subprogram.
8093 (Is_Contract_Only_Body): New subprogram.
8094 (Set_Is_Contract_Only_Body): New subprogram.
8095 (SCIL_Nodes): Replace table by hash-table.
8097 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8099 * exp_ch6.adb: Minor reformatting.
8100 * spark_xrefs.ads: minor cleanup of comments for SPARK xrefs
8102 2017-01-12 Bob Duff <duff@adacore.com>
8104 * binde.adb (Forced): New reason for a dependence.
8105 (Force_Elab_Order): Implementation of the new switch.
8106 * binde.ads: Minor comment fixes.
8107 * bindusg.adb: Add -f switch. Apparently, there was an -f switch
8108 long ago that is no longer supported; removed comment about that.
8109 * opt.ads (Force_Elab_Order_File): Name of file specified for
8111 * switch-b.adb: Parse -f switch.
8113 2017-01-12 Justin Squirek <squirek@adacore.com>
8115 * exp_ch6.adb (Check_View_Conversion): Created this function
8116 to properly chain calls to check type invariants that may be
8117 present in a subprogram call after the subprogram.
8118 (Expand_Call): Add a conditional to identify when a view conversion
8119 needs to be checked.
8120 * nlists.adb, nlists.ads (Prepend_New): New routine.
8121 (Prepend_New_To): New routine.
8123 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8125 * sinfo.ads: Minor reformatting.
8127 2017-01-12 Gary Dismukes <dismukes@adacore.com>
8129 * exp_util.adb, exp_util.ads, einfo.ads: Minor typo fixes and
8132 2017-01-12 Hristian Kirtchev <kirtchev@adacore.com>
8134 * exp_ch6.adb (Make_Build_In_Place_Call_In_Anonymous_Context): Add new
8135 variable Definite. Create a local object and pass its 'Access to the
8136 BIP function when the result type is either definite or it does not
8137 require any finalization or secondary stack management.
8139 2017-01-12 Bob Duff <duff@adacore.com>
8141 * contracts.adb, einfo.adb, errout.adb, exp_attr.adb,
8142 exp_ch3.adb, exp_ch7.adb, exp_ch9.adb, exp_prag.adb, freeze.adb,
8143 frontend.adb, ghost.adb, inline.adb, lib-writ.adb, lib-xref.adb,
8144 par.adb, par-ch10.adb, par-ch2.adb, par-prag.adb, par_sco.adb,
8145 sem_attr.adb, sem_aux.adb, sem_ch10.adb, sem_ch12.adb,
8146 sem_ch13.adb, sem_ch6.adb, sem_ch8.adb, sem_ch9.adb, sem_elab.adb,
8147 sem_prag.adb, sem_res.adb, sem_util.adb, sem_util.ads,
8148 sem_warn.adb, sinfo.adb, sinfo.ads, sprint.adb (Pragma_Name):
8149 Change name to Pragma_Name_Unmapped.
8150 (Pragma_Name_Mapped): Change name to Pragma_Name.
8151 This is because the "mapped" version should be the usual case.
8153 2017-01-09 Hristian Kirtchev <kirtchev@adacore.com>
8155 * einfo.ads, einfo.adb: Remove uses of flags Has_Default_Init_Cond,
8156 Is_Default_Init_Cond_Procedure, and
8157 Has_Inherited_Default_Init_Cond. Add uses of flags
8158 Has_Own_DIC, Is_DIC_Procedure, and Has_Inherited_DIC.
8159 (Default_Init_Cond_Procedure): Removed.
8160 (DIC_Procedure): New routine.
8161 (Has_Default_Init_Cond): Removed.
8162 (Has_DIC): New routine.
8163 (Has_Inheritable_Invariants): The attribute applies to the base type.
8164 (Has_Inherited_Default_Init_Cond): Removed.
8165 (Has_Inherited_DIC): New routine.
8166 (Has_Inherited_Invariants): The attribute applies to the base type.
8167 (Has_Own_DIC): New routine.
8168 (Has_Own_Invariants): The attribute applies to the base type.
8169 (Is_Default_Init_Cond_Procedure): Removed.
8170 (Is_DIC_Procedure): New routine.
8171 (Set_Default_Init_Cond_Procedure): Removed.
8172 (Set_DIC_Procedure): New routine.
8173 (Set_Has_Default_Init_Cond): Removed.
8174 (Set_Has_Inheritable_Invariants): The attribute applies
8176 (Set_Has_Inherited_Default_Init_Cond): Removed.
8177 (Set_Has_Inherited_DIC): New routine.
8178 (Set_Has_Inherited_Invariants): The attribute applies to the base type.
8179 (Set_Has_Own_DIC): New routine.
8180 (Set_Has_Own_Invariants): The attribute applies to the base type.
8181 (Set_Is_Default_Init_Cond_Procedure): Removed.
8182 (Set_Is_DIC_Procedure): New routine.
8183 (Write_Entity_Flags): Update the output of all flags related to
8184 default initial condition.
8185 * exp_ch3.adb (Expand_N_Object_Declaration): Update the generation
8186 of the call to the DIC procedure.
8187 (Freeze_Type): Generate the body of the DIC procedure.
8188 * exp_ch7.adb (Build_Invariant_Procedure_Body): Replace
8189 all occurrences of Create_Append with Append_New_To. Do
8190 not generate an invariant procedure for a class-wide type.
8191 The generated body acts as a freeze action of the working type.
8192 (Build_Invariant_Procedure_Declaration): Do not generate an
8193 invariant procedure for a class-wide type.
8194 (Create_Append): Removed.
8195 * exp_util.adb: Add with and use clauses for Sem_Ch3, sem_ch6,
8196 sem_Ch12, Sem_Disp, and GNAT.HTable. Move the handling of
8197 class-wide pre/postcondition description and data structures from
8199 (Build_Class_Wide_Expression): Moved from Sem_Prag.
8200 (Build_DIC_Call): New routine.
8201 (Build_DIC_Procedure_Body): New routine.
8202 (Build_DIC_Procedure_Declaration): New routine.
8203 (Entity_Hash): Moved from Sem_Prag.
8204 (Find_DIC_Type): New routine.
8205 (Update_Primitives_Mapping): Reimplemented.
8206 (Update_Primitives_Mapping_Of_Types): New routine.
8207 * exp_util.ads (Build_Class_Wide_Expression): Moved from Sem_Prag.
8208 (Build_DIC_Call): New routine.
8209 (Build_DIC_Procedure_Body): New routine.
8210 (Build_DIC_Procedure_Declaration): New routine.
8211 (Update_Primitives_Mapping): Moved from Sem_Prag.
8212 (Update_Primitives_Mapping_Of_Types): New routine.
8213 * nlists.adb (Append_New): New routine.
8214 (Append_New_To): New routine.
8215 * nlists.ads (Append_New): New routine.
8216 (Append_New_To): New routine.
8217 * sem_ch3.adb (Analyze_Declarations): Do not generate the bodies
8218 of DIC procedures here. This is now done at the end of the
8219 visible declarations, private declarations, and at the freeze
8221 (Analyze_Private_Extension_Declaration):
8222 A private extension inherits the DIC pragma of a parent type.
8223 (Analyze_Subtype_Declaration): No need to propagate invariant
8224 attributes to a subtype as those apply to the base type.
8225 (Build_Derived_Record_Type): No need to inherit invariants here
8226 as this is now done in Build_Derived_Type.
8227 (Build_Derived_Type): Inherit both the DIC pragma and invariants from
8229 (Process_Full_View): Update the propagation of DIC attributes.
8230 (Propagate_Default_Init_Cond_Attributes): Removed.
8231 * sem_ch7.adb Add with and use clauses for Exp_Util.
8232 (Analyze_Package_Specification): Create the body of the DIC
8233 procedure at the end of the visible and private declarations.
8234 (Preserve_Full_Attributes): Propagate DIC attributes.
8235 * sem_ch9.adb (Analyze_Protected_Type_Declaration): Propagate
8237 (Analyze_Task_Type_Declaration): Propagate DIC attributes.
8238 * sem_elab.adb (Check_A_Call): Update the call to
8239 Is_Nontrivial_Default_Init_Cond_Procedure.
8240 * sem_prag.adb Remove the with and use clauses for
8241 GNAT.HTable. Move the handling of class- wide pre/postcondition
8242 description and data structures to Exp_Util.
8243 (Analyze_Pragma): Create the declaration of the DIC procedure. There
8244 is no need to propagate invariant-related attributes at this point
8245 as this is done in Build_Invariant_Procedure_Declaration.
8246 (Build_Class_Wide_Expression): Moved to Exp_Util.
8247 (Entity_Hash): Moved to Exp_Util.
8248 (Update_Primitives_Mapping): Moved to Exp_Util.
8249 * sem_prag.ads (Build_Class_Wide_Expression): Moved to Exp_Util.
8250 (Update_Primitives_Mapping): Moved to Exp_Util.
8251 * sem_util.adb: Remove with and use clauses for Ghost
8253 (Build_Default_Init_Cond_Call): Removed.
8254 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
8255 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
8256 (Get_Views): Reimplemented.
8257 (Has_Full_Default_Initialization): Reimplement the section on DIC.
8258 (Inherit_Default_Init_Cond_Procedure): Removed.
8259 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
8260 (Is_Nontrivial_DIC_Procedure): New routine.
8261 (Is_Verifiable_DIC_Pragma): New routine.
8262 (Propagate_DIC_Attributes): New routine.
8263 * sem_util.ads (Build_Default_Init_Cond_Call): Removed.
8264 (Build_Default_Init_Cond_Procedure_Bodies): Removed.
8265 (Build_Default_Init_Cond_Procedure_Declaration): Removed.
8266 (Inherit_Default_Init_Cond_Procedure): Removed.
8267 (Is_Nontrivial_Default_Init_Cond_Procedure): Removed.
8268 (Is_Nontrivial_DIC_Procedure): New routine.
8269 (Is_Verifiable_DIC_Pragma): New routine.
8270 (Propagate_DIC_Attributes): New routine.
8271 * sem_warn.adb (Is_OK_Fully_Initialized): Reimplement the section
8273 * sinfo.ads, sinfo.adb: Add new attribute Expression_Copy along with
8275 (Expression_Copy): New routine along with pragma Inline.
8276 (Set_Expression_Copy): New routine along with pragma Inline.
8278 2017-01-06 Bob Duff <duff@adacore.com>
8280 * bindgen.adb (Gen_Adainit, Gen_Adafinal): Change
8281 "Bind_Main_Program" to "not Bind_For_Library", because otherwise
8282 we won't generate the call to s_stalib_adafinal when the main
8283 is not written in Ada.
8285 2017-01-06 Bob Duff <duff@adacore.com>
8287 * sem_prag.adb: Minor: remove pragma Warnings.
8289 2017-01-06 Tristan Gingold <gingold@adacore.com>
8291 * Makefile.rtl: Do not compile s-stchop by default.
8293 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
8295 * aspects.adb, aspects.ads, exp_ch3.adb, exp_ch9.adb, par-prag.adb,
8296 sem_ch13.adb, sem_prag.adb, sem_prag.ads, snames.adb-tmpl,
8297 snames.ads-tmpl, s-secsta.adb, s-secsta.ads, s-tarest.adb,
8298 s-tarest.ads, s-taskin.adb, s-taskin.ads, s-tassta.adb, s-tassta.ads:
8299 Reverted previous change for now.
8301 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8303 * exp_ch3.adb (Build_Initialization_Call): Apply predicate
8304 check to default discriminant value if checks are enabled.
8305 (Build_Assignment): If type of component has static predicate,
8306 apply check to its default value, if any.
8308 2017-01-06 Patrick Bernardi <bernardi@adacore.com>
8310 * aspect.adb, aspect.ads: Added new aspect Secondary_Stack_Size.
8311 * exp_ch3.adb (Build_Init_Statements): As part of initialising
8312 the value record of a task, set its _Secondary_Stack_Size field
8314 * exp_ch9.adb (Expand_N_Task_Type_Declaration): Create
8315 a _Secondary_Stack_Size field in the value record of
8316 the task if a Secondary_Stack_Size rep item is present.
8317 (Make_Task_Create_Call): Include secondary stack size
8318 parameter. If No_Secondary_Stack restriction is in place, passes
8320 * par-prag.adb, sem_prag.adb, sem_prag.ads: Added new pragma
8321 Secondary_Stack_Size.
8322 * s-secsta.adb, s-secsta.ads (Minimum_Secondary_Stack_Size): New
8323 function to define the overhead of the secondary stack.
8324 * s-tarest.adb (Create_Restricted_Task,
8325 Create_Restricted_Task_Sequential): Functions now include
8326 Secondary_Stack_Size parameter to pass to Initialize_ATCB.
8327 * s-tarest.adb (Create_Restricted_Task,
8328 Create_Restricted_Task_Sequential): Calls to Initialize_ATCB
8329 now include Secondary_Stack_Size parameter.
8331 Secondary stack now allocated to the size specified by the
8332 Secondary_Stack_Size parameter in the task's ATCB.
8333 * s-taskin.adb, s-taskin.adb (Common_ATCB, Initialise_ATCB): New
8334 Secondary_Stack_Size component.
8335 * s-tassta.adb, s-tassta.ads (Create_Restricted_Task,
8336 Create_Restricted_Task_Sequential): Function now include
8337 Secondary_Stack_Size parameter.
8338 (Task_Wrapper): Secondary stack
8339 now allocated to the size specified by the Secondary_Stack_Size
8340 parameter in the task's ATCB.
8341 * sem_ch13.adb (Analyze_Aspect_Specification): Add support
8342 for Secondary_Stack_Size aspect, turning the aspect into its
8343 corresponding internal attribute.
8344 (Analyze_Attribute_Definition):
8345 Process Secondary_Stack_Size attribute.
8346 * snames.adb-tmpl, snames.ads-tmpl: Added names
8347 Name_Secondary_Stack_Size, Name_uSecondary_Stack_Size,
8348 Attribute_Secondary_Stack_Size and Pragma_Secondary_Stack_Size.
8350 2017-01-06 Pascal Obry <obry@adacore.com>
8352 * a-direio.adb, a-direio.ads, a-sequio.adb, a-sequio.ads: Add Flush to
8353 Sequential_IO and Direct_IO.
8355 2017-01-06 Bob Duff <duff@adacore.com>
8357 * snames.ads-tmpl (Renamed): New name for the pragma argument.
8358 * par-ch2.adb: Allow the new pragma (with analysis deferred
8360 * sinfo.ads, sinfo.adb (Map_Pragma_Name, Pragma_Name_Mapped):
8361 Keep a mapping from new pragma names to old names.
8362 * sem_prag.adb: Check legality of pragma Rename_Pragma, and
8363 implement it by calling Map_Pragma_Name.
8364 * checks.adb, contracts.adb, einfo.adb, errout.adb,
8365 * exp_attr.adb, exp_ch3.adb, exp_ch6.adb, exp_ch7.adb, exp_ch9.adb,
8366 * exp_prag.adb, exp_util.adb, freeze.adb, frontend.adb, ghost.adb,
8367 * inline.adb, lib-writ.adb, scans.adb, scans.ads, sem_attr.adb,
8368 * sem_aux.adb, sem_ch10.adb, sem_ch13.adb, sem_ch6.adb, sem_ch9.adb,
8369 * sem_elab.adb, sem_res.adb, sem_util.adb, sem_util.ads,
8370 * sem_warn.adb: Call Pragma_Name_Mapped instead of Pragma_Name
8373 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8375 * exp_ch9.adb: Minor reformatting.
8377 2017-01-06 Tristan Gingold <gingold@adacore.com>
8379 * exp_ch9.ads, exp_ch9.adb (Build_Entry_Names): Remove (unused).
8380 * rtsfind.ads (RE_Task_Entry_Names_Array, RO_ST_Set_Entry_Names)
8381 (RE_Protected_Entry_Names_Array, RO_PE_Set_Entry_Names): Remove
8383 * s-taskin.ads, s-taskin.adb (Set_Entry_Names,
8384 Task_Entry_Names_Array, Task_Entry_Names_Access): Remove.
8385 * s-tpoben.ads, s-tpoben.adb (Set_Entry_Names,
8386 Protected_Entry_Names_Array, Protected_Entry_Names_Access): Remove.
8388 2017-01-06 Bob Duff <duff@adacore.com>
8390 * sinfo.ads, sinfo.adb (Map_Pragma_Name): Preparation work,
8391 dummy implementation of Map_Pragma_Name.
8393 2017-01-06 Tristan Gingold <gingold@adacore.com>
8395 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Make the
8396 entry_body variable constant.
8397 * s-taprob.ads (Entry_Body_Access): Move to s-tposen.
8398 * s-tpoben.ads (Protected_Entry_Body_Access): Now access
8400 * s-tposen.ads (Entry_Body_Access): Moved from s-taprob,
8401 now access to constant.
8403 2017-01-06 Gary Dismukes <dismukes@adacore.com>
8405 * einfo.ads, sem_res.adb, sem_attr.adb, sem_ch6.adb: Minor
8406 reformatting and typo fixes.
8408 2017-01-06 Bob Duff <duff@adacore.com>
8410 * snames.ads-tmpl: New names for pragma renaming.
8411 * snames.adb-tmpl (Is_Configuration_Pragma_Name): Minor cleanup.
8412 * par-prag.adb: Add new pragma name to case statement.
8413 * sem_prag.adb (Rename_Pragma): Initial cut at semantic analysis
8415 * sinfo.ads, sinfo.adb (Pragma_Name_Mapped): Preparation work,
8416 Dummy implementation of Pragma_Name_Mapped.
8418 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8420 * exp_ch6.adb (Expand_Protected_Subprogram_Call): Add guard to
8421 better detect call within an entry_wrapper.
8422 * sem_res.adb (Resolve_Call): A protected call within an
8423 entity_wrapper is analyzed in the context of the protected
8424 object but corresponds to a pre-analysis and is not an access
8426 * sem_attr.adb: Minor reformatting.
8428 2017-01-06 Justin Squirek <squirek@adacore.com>
8430 * sem_attr.adb (Analyze_Attribute): Modify semantic checks for
8431 Finalization_Size to allow a prefix of any non-class-wide type.
8432 * sem_attr.ads Modify comment for Finalization_Size to include
8433 definite type use case.
8435 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8437 * einfo.ads, einfo.adb (Is_Entry_Wrapper): New flag, defined
8438 on procedures that are wrappers created for entries that have
8440 * sem_ch6.adb (Analyze_Subrogram_Body_Helper): If the subprogram
8441 body is an entry_wrapper, compile it in the context of the
8442 synchronized type, because a precondition may refer to funtions
8444 * exp_ch9.adb (Build_Contract_Wrapper): Set Is_Entry_Wrapper on
8446 * exp_ch6.adb (Expand_Protected_Subprogram_Call): if the call is
8447 within an Entry_Wrapper this is an external call whose target
8448 is the synchronized object that is the actual in the call to
8451 2017-01-06 Yannick Moy <moy@adacore.com>
8453 * sem_attr.adb (Analyze_Attribute/Attribute_Loop_Entry): Analyze node
8454 in tree, which means not analyzing the previous prefix if the node has
8455 been rewritten into its prefix.
8457 2017-01-06 Gary Dismukes <dismukes@adacore.com>
8459 * s-tpobop.adb: Minor reformatting.
8461 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8463 * checks.adb (Ensure_Valid): Do not generate a validity check
8464 within a generated predicate function, validity checks will have
8465 been applied earlier when required.
8467 2017-01-06 Tristan Gingold <gingold@adacore.com>
8469 * s-tpoben.ads (Protection_Entries): Add comment and reorder
8470 components for performances.
8471 * s-tpobop.adb (PO_Do_Or_Queue): Implement Max_Queue_Length runtime
8474 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8476 * sem_eval.adb (Check_Expression_Against_Static_Predicate):
8477 If expression is compile-time known and obeys a static predicate
8478 it must be labelled as static, to prevent spurious warnings and
8479 run-time errors, e.g. in case statements. This is relevant when
8480 the expression is the result of constant-folding a type conversion
8481 whose expression is a variable with a known static value.
8483 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8485 * exp_attr.adb, sem_attr.ads: Minor reformatting.
8487 2017-01-06 Justin Squirek <squirek@adacore.com>
8489 * exp_attr.adb (Expand_N_Attribute_Reference): Add entry for
8490 expansion of Finalization_Size attribute.
8491 * sem_attr.adb (Analyze_Attribute): Add entry to check the
8492 semantics of Finalization_Size.
8493 (Eval_Attribute): Add null entry for Finalization_Size.
8494 * sem_attr.ads: Add Finalization_Size to the implementation
8495 dependent attribute list.
8496 * snames.ads-tmpl: Add name entry for Finalization_Size attribute.
8498 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8500 * sem_ch5.adb (Analyze_Loop_Statement): If the loop includes an
8501 iterator specification with a serious syntactic error, transform
8502 construct into an infinite loop in order to continue analysis
8503 and prevent a compiler abort.
8505 2017-01-06 Tristan Gingold <gingold@adacore.com>
8507 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Do not generate
8508 max_queue_lengths_array if unused.
8510 2017-01-06 Bob Duff <duff@adacore.com>
8512 * errout.adb (Set_Msg_Text): Protect against out-of-bounds
8513 array access, in case "\" is at the end of Text.
8514 * stylesw.adb (Set_Style_Check_Options): Don't include input
8515 characters in the error message template, because they could
8516 be control characters such as "\", which Errout will try to
8519 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8521 * sem_ch4.adb (Find_Indexing_Operations, Inspect_Declarations):
8522 For a private type examine the visible declarations that follow
8523 the partial view, not just the private declarations that follow
8526 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8528 * exp_ch5.adb, sem_ch3.adb, checks.adb: Minor reformatting and
8531 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8533 * exp_ch5.adb (Get_Default_Iterator): For a derived type, the
8534 alias of the inherited op is the parent iterator, no need to
8535 examine dispatch table positions which might not be established
8536 yet if type is not frozen.
8537 * sem_disp.adb (Check_Controlling_Formals): The formal of a
8538 predicate function may be a subtype of a tagged type.
8539 * sem_ch3.adb (Complete_Private_Subtype): Adjust inheritance
8540 of representation items for the completion of a type extension
8541 where a predicate applies to the partial view.
8542 * checks.ads, checks.adb (Apply_Predicate_Check): Add optional
8543 parameter that designates function whose actual receives a
8544 predicate check, to improve warning message when the check will
8545 lead to infinite recursion.
8546 * sem_res.adb (Resolve_Actuals): Pass additional parameter to
8547 Apply_Predicate_Check.
8549 2017-01-06 Tristan Gingold <gingold@adacore.com>
8551 * s-rident.ads (Profile_Info): Remove No_Entry_Queue from
8552 Gnat_Extended_Ravenscar.
8553 * exp_ch9.adb, s-tpoben.adb, s-tpoben.ads: Fix spelling.
8555 2017-01-06 Gary Dismukes <dismukes@adacore.com>
8557 * sem_util.ads: Minor typo fix and reformatting.
8559 2017-01-06 Yannick Moy <moy@adacore.com>
8561 * ghost.adb Minor fixing of references to SPARK RM.
8562 (Check_Ghost_Context): Check whether reference is to a lvalue
8563 before issuing an error about violation of SPARK RM 6.9(13)
8564 when declaration has Ghost policy Check and reference has Ghost
8566 * sem_util.adb Minor indentation.
8567 * sem_ch10.adb (Analyze_Package_Body_Stub, Analyze_Protected_Body_Stub,
8568 Analyze_Task_Body_Stub): Set Ekind of the defining identifier.
8569 * sem_util.ads (Unique_Defining_Entity): Document the result
8570 for package body stubs.
8572 2017-01-06 Tristan Gingold <gingold@adacore.com>
8574 * raise-gcc.c (abort): Macro to call Abort_Propagation.
8575 * s-tpoben.ads (Protected_Entry_Queue_Max_Access): Make it access
8577 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
8578 Do not generate the Entry_Max_Queue_Lengths_Array if all default
8580 * exp_util.adb (Corresponding_Runtime_Package): Consider
8581 Max_Queue_Length pragma.
8583 2017-01-06 Justin Squirek <squirek@adacore.com>
8585 * exp_ch9.adb (Expand_N_Protected_Type_Declaration):
8586 Remove declaration generation in the case of
8587 System_Tasking_Protected_Objects_Single_Entry being used,
8588 and add a warning message when this is detected to occur.
8589 (Make_Initialize_Protection): Remove reference pass in the case
8590 of System_Tasking_Protected_Objects_Single_Entry.
8591 * rtsfind.ads: Remove RE_Protected_Entry_Queue_Max
8592 * s-tposen.adb (Initialize_Protection_Entry): Remove
8593 Entry_Queue_Max parameter.
8594 * s-tposen.ads: Remove the types use to store the entry queue
8596 * sem_prag.adb (Analyze_Pragma): Remove entry families restriction
8598 2017-01-06 Yannick Moy <moy@adacore.com>
8600 * sem_util.adb, sem_util.ads (Get_Enum_Lit_From_Pos): Strengthen
8601 behavior of function, to also accept out of range positions
8602 and raise Constraint_Error in such case, and to copy sloc from
8603 literal if No_Location passed as location.
8604 * uintp.adb, uintp.ads (UI_To_Int, UI_To_CC): Strengthen behavior
8605 of functions to raise Constraint_Error in case of value not in
8608 2017-01-06 Tristan Gingold <gingold@adacore.com>
8610 * sem_util.adb, s-taprop-linux.adb (Finalize_TCB): Remove call to
8611 Invalidate_Stack_Cache.
8613 2017-01-06 Eric Botcazou <ebotcazou@adacore.com>
8615 * s-os_lib.adb: Minor fix to the signature of Readlink.
8617 2017-01-06 Javier Miranda <miranda@adacore.com>
8619 * sem_ch6.adb (Conforming_Types): Handle another
8620 confusion between views in a nested instance with an actual
8621 private type whose full view is not in scope.
8623 2017-01-06 Arnaud Charlet <charlet@adacore.com>
8625 * exp_ch5.adb (Expand_N_If_Statement): Obey existing comment and
8626 mark a rewritten if statement as explicit (Comes_From_Source).
8628 2017-01-06 Gary Dismukes <dismukes@adacore.com>
8630 * sem_prag.adb, rtsfind.adb, sem_util.adb: Minor typo fixes.
8632 2017-01-06 Tristan Gingold <gingold@adacore.com>
8634 * ada.ads, a-unccon.ads: Add pragma No_Elaboration_Code_All.
8636 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8638 * sem_case.adb: Minor reformatting.
8640 2017-01-06 Thomas Quinot <quinot@adacore.com>
8642 * g-socthi-mingw.adb: Remove now extraneous USE TYPE clause
8644 2017-01-06 Justin Squirek <squirek@adacore.com>
8646 * aspects.adb: Register aspect in Canonical_Aspect.
8647 * aspects.ads: Associate qualities of Aspect_Max_Queue_Length
8648 into respective tables.
8649 * einfo.ads, einfo.adb: Add a new attribute for
8650 handling the parameters for Pragma_Max_Entry_Queue
8651 (Entry_Max_Queue_Lengths_Array) in E_Protected_Type. Subprograms
8652 for accessing and setting were added as well.
8653 * par-prag.adb (Prag): Register Pramga_Max_Entry_Queue.
8654 * exp_ch9.adb (Expand_N_Protected_Type_Declaration): Emit
8655 declaration for pramga arguments and store them in the protected
8657 (Make_Initialize_Protection): Pass a reference to
8658 the Entry_Max_Queue_Lengths_Array in the protected type node to
8660 * rtsfind.adb: Minor grammar fix.
8661 * rtsfind.ads: Register new types taken from the
8662 runtime libraries RE_Protected_Entry_Queue_Max and
8663 RE_Protected_Entry_Queue_Max_Array
8664 * s-tposen.adb, s-tpoben.adb
8665 (Initialize_Protection_Entry/Initialize_Protection_Entries):
8666 Add extra parameter and add assignment to local object.
8667 * s-tposen.ads, s-tpoben.ads: Add new types to
8668 store entry queue maximums and a field to the entry object record.
8669 * sem_ch13.adb (Analyze_Aspect_Specifications): Add case statement
8670 for Aspect_Max_Queue_Length.
8671 (Check_Aspect_At_Freeze_Point):
8672 Add aspect to list of aspects that don't require delayed analysis.
8673 * sem_prag.adb (Analyze_Pragma): Add case statement for
8674 Pragma_Max_Queue_Length, check semantics, and register arugments
8675 in the respective entry nodes.
8676 * sem_util.adb, sem_util.ads Add functions Get_Max_Queue_Length
8677 and Has_Max_Queue_Length
8678 * snames.ads-tmpl: Add constant for the new aspect-name
8679 Name_Max_Queue_Length and corrasponding pragma.
8681 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8683 * exp_util.adb (Is_Controlled_Function_Call):
8684 Reimplemented. Consider any node which has an entity as the
8685 function call may appear in various ways.
8687 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8689 * exp_attr.adb (Rewrite_Stream_Proc_Call): Use
8690 an unchecked type conversion when performing a view conversion
8691 to/from a private type. In all other cases use a regular type
8692 conversion to ensure that any relevant checks are properly
8695 2017-01-06 Hristian Kirtchev <kirtchev@adacore.com>
8697 * sem_prag.adb, sem_ch8.adb: Minor reformatting.
8699 2017-01-06 Ed Schonberg <schonberg@adacore.com>
8701 * sem_case.adb (Explain_Non_Static_Bound): Suppress cascaded
8702 error on case expression that is an entity, when coverage is
8703 incomplete and entity has a static value obtained by local
8705 (Handle_Static_Predicate): New procedure, subsidiary of
8706 Check_Choices, to handle case alternatives that are either
8707 subtype names or subtype indications involving subtypes that
8708 have static predicates.
8710 2017-01-06 Thomas Quinot <quinot@adacore.com>
8712 * s-oscons-tmplt.c, g-socket.adb, g-socket.ads, g-sothco.ads:
8713 (GNAT.Socket): Add support for Busy_Polling and Generic_Option
8715 2017-01-06 Bob Duff <duff@adacore.com>
8717 * sem_elab.adb (Activate_Elaborate_All_Desirable): Don't add
8718 Elaborate_All(P) to P itself. That could happen in obscure cases,
8719 and always introduced a cycle (P body must be elaborated before
8721 * lib-writ.ads: Comment clarification.
8722 * ali-util.ads: Minor comment fix.
8723 * ali.adb: Minor reformatting.
8725 2017-01-06 Tristan Gingold <gingold@adacore.com>
8727 * a-exexpr-gcc.adb: Improve comment.
8729 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
8731 * s-linux-mips.ads: Use correct signal and errno constants.
8732 (sa_handler_pos, sa_mask_pos): Fix offsets for 64-bit MIPS.
8734 2017-01-03 James Cowgill <James.Cowgill@imgtec.com>
8736 * s-linux-mips.ads: Rename from s-linux-mipsel.ads.
8737 * gcc-interface/Makefile.in (MIPS/Linux): Merge mips and mipsel
8740 2017-01-01 Eric Botcazou <ebotcazou@adacore.com>
8742 * gnatvsn.ads: Bump copyright year.
8744 2017-01-01 Jakub Jelinek <jakub@redhat.com>
8746 * gnat_ugn.texi: Bump @copying's copyright year.
8747 * gnat_rm.texi: Likewise.
8749 Copyright (C) 2017 Free Software Foundation, Inc.
8751 Copying and distribution of this file, with or without modification,
8752 are permitted in any medium without royalty provided the copyright
8753 notice and this notice are preserved.