OSDN Git Service

* gcc-interface/decl.c (make_aligning_type): Declare the type.
[pf3gnuchains/gcc-fork.git] / gcc / ada / ChangeLog
1 2010-05-08  Eric Botcazou  <ebotcazou@adacore.com>
2
3         * gcc-interface/decl.c (make_aligning_type): Declare the type.
4
5 2010-05-08  Eric Botcazou  <ebotcazou@adacore.com>
6
7         * gcc-interface/decl.c (gnat_to_gnu_entity): Create variables for size
8         expressions of variant part of record types declared at library level.
9
10 2010-05-08  Eric Botcazou  <ebotcazou@adacore.com>
11
12         * gcc-interface/gigi.h (create_field_decl): Move PACKED parameter.
13         * gcc-interface/utils.c (create_field_decl): Move PACKED parameter.
14         (rest_of_record_type_compilation): Adjust call to create_field_decl.
15         (make_descriptor_field): Likewise and pass correctly typed constants.
16         (build_unc_object_type): Likewise.
17         (unchecked_convert): Likewise.
18         * gcc-interface/decl.c (elaborate_expression_2): New static function.
19         (gnat_to_gnu_entity): Use it to make alignment factors explicit.
20         Adjust call to create_field_decl.
21         (make_aligning_type): Likewise.
22         (make_packable_type): Likewise.
23         (maybe_pad_type): Likewise.
24         (gnat_to_gnu_field): Likewise.
25         (components_to_record): Likewise.
26         (create_field_decl_from): Likewise.
27         (create_variant_part_from): Remove superfluous test.
28         * gcc-interface/trans.c (gigi): Adjust call to create_field_decl.
29
30 2010-05-08  Eric Botcazou  <ebotcazou@adacore.com>
31
32         * gcc-interface/gigi.h (build_unc_object_type): Add DEBUG_INFO_P param.
33         (build_unc_object_type_from_ptr): Likewise.
34         * gcc-interface/utils.c (build_unc_object_type): Add DEBUG_INFO_P param
35         and pass it to create_type_decl.  Declare the type.  Simplify.
36         (build_unc_object_type_from_ptr): Add DEBUG_INFO_P parameter and pass
37         it to build_unc_object_type.
38         * gcc-interface/decl.c (gnat_to_gnu_entity): Adjust to above change.
39         * gcc-interface/trans.c (Attribute_to_gnu): Likewise.
40         (gnat_to_gnu): Likewise.
41         * gcc-interface/utils2.c (build_allocator): Likewise.
42
43 2010-05-07 Eric Botcazou  <ebotcazou@adacore.com>
44
45         PR 40989
46         * gcc-interface/misc.c (gnat_handle_option): Fix long line.
47
48 2010-05-06  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
49
50         * gcc-interface/Makefile.in: Removed mips-sgi-irix5* support.
51
52 2010-05-06  Manuel López-Ibáñez  <manu@gcc.gnu.org>
53
54         PR 40989
55         * gcc-interface/misc.c (gnat_handle_option): Add argument kind.
56
57 2010-05-02  Giuseppe Scrivano <gscrivano@gnu.org>
58
59         * gnathtml.pl: Use 755 as mask for new directories.
60
61 2010-04-28  Eric Botcazou  <ebotcazou@adacore.com>
62
63         * gcc-interface/trans.c (gnat_gimplify_expr) <ADDR_EXPR>: Uniquize
64         constant constructors before taking their address.
65
66 2010-04-25  Eric Botcazou  <ebotcazou@adacore.com>
67
68         * exp_dbug.ads: Fix outdated description.  Mention link between XVS
69         and XVZ objects.
70         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Subtype>: Set
71         XVZ variable as unit size of XVS type.
72         (maybe_pad_type): Likewise.
73
74 2010-04-25  Eric Botcazou  <ebotcazou@adacore.com>
75
76         * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>: Do not
77         use memmove if the array type is bit-packed.
78
79 2010-04-18  Eric Botcazou  <ebotcazou@adacore.com>
80
81         * gcc-interface/misc.c (gnat_init): Remove second argument in call to
82         build_common_tree_nodes.
83
84 2010-04-18  Ozkan Sezer  <sezeroz@gmail.com>
85
86         * gsocket.h: Make sure that winsock2.h is included before windows.h.
87
88 2010-04-17  Eric Botcazou  <ebotcazou@adacore.com>
89
90         * gcc-interface/utils2.c (build_unary_op) <ATTR_ADDR_EXPR>: Do not
91         issue warning.
92
93 2010-04-17  Eric Botcazou  <ebotcazou@adacore.com>
94
95         * uintp.h (UI_Lt): Declare.
96         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Type>: Do the size
97         computation in sizetype.
98         <E_Array_Subtype>: Use unified handling for all index types.  Do not
99         generate MAX_EXPR-based expressions, only COND_EXPR-based ones.  Add
100         bypass for PATs.
101         (annotate_value): Change test for negative values.
102         (validate_size): Apply test for negative values on GNAT nodes.
103         (set_rm_size): Likewise.
104         * gcc-interface/misc.c (gnat_init): Set unsigned types for sizetypes.
105         * gcc-interface/utils.c (rest_of_record_type_compilation): Change test
106         for negative values.
107         (max_size) <MINUS_EXPR>: Do not reassociate a COND_EXPR on the LHS.
108         (builtin_type_for_size): Adjust definition of signed_size_type_node.
109         * gcc-interface/utils2.c (compare_arrays): Optimize comparison of
110         lengths against zero.
111
112 2010-04-17  Eric Botcazou  <ebotcazou@adacore.com>
113
114         * back-end.adb (Call_Back_End): Pass Standard_Character to gigi.
115         * gcc-interface/gigi.h (gigi): Add standard_character parameter.
116         (CHAR_TYPE_SIZE, SHORT_TYPE_SIZE, INT_TYPE_SIZE, LONG_TYPE_SIZE, 
117         LONG_LONG_TYPE_SIZE, FLOAT_TYPE_SIZE, DOUBLE_TYPE_SIZE,
118         LONG_DOUBLE_TYPE_SIZE, SIZE_TYPE): Delete.
119         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Subtype>: Call
120         rm_size.
121         * gcc-interface/misc.c (gnat_init): Set signedness of char as per
122         flag_signed_char.  Tag sizetype with "size_type" moniker.
123         * gcc-interface/trans.c (gigi): Add standard_character parameter.
124         Remove useless built-in types.  Equate unsigned_char_type_node to
125         Standard.Character.  Use it instead of char_type_node throughout.
126         (Attribute_to_gnu): Likewise.
127         (gnat_to_gnu): Likewise.
128         * gcc-interface/utils2.c (build_call_raise): Likewise.
129
130 2010-04-17  Eric Botcazou  <ebotcazou@adacore.com>
131
132         * gcc-interface/gigi.h (enum standard_datatypes): Add new values
133         ADT_sbitsize_one_node and ADT_sbitsize_unit_node.
134         (sbitsize_one_node): New macro.
135         (sbitsize_unit_node): Likewise.
136         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Subtype>: Fix
137         latent bug in the computation of subrange_p.  Fold wider_p predicate.
138         (cannot_be_superflat_p): Use an explicitly signed 64-bit type to do
139         the final comparison.
140         (make_aligning_type): Build real negation and use sizetype throughout
141         the offset computation.
142         (maybe_pad_type): Do not issue the warning when the new size expression
143         is too complex.
144         (annotate_value) <INTEGER_CST>: Simplify code handling negative values.
145         * gcc-interface/misc.c (gnat_init): Initialize sbitsize_one_node and
146         sbitsize_unit_node.
147         * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Pool_Address>: Fold
148         double negation.
149         (gnat_to_gnu) <N_Free_Statement>: Likewise.
150         * gcc-interface/utils.c (convert): Use sbitsize_unit_node.
151         * gcc-interface/utils2.c (compare_arrays): Compute real lengths and use
152         constants in sizetype.  Remove dead code and tweak comments.  Generate
153         equality instead of inequality comparisons for zero length tests.
154
155 2010-04-16  Eric Botcazou  <ebotcazou@adacore.com>
156
157         * gcc-interface/gigi.h (gnat_init_decl_processing): Delete.
158         * gcc-interface/decl.c (gnat_to_gnu_entity): Constify a few variables.
159         <object>: Do not create the fake PARM_DECL if no debug info is needed.
160         Do not create the corresponding VAR_DECL of a CONST_DECL for debugging
161         purposes if no debug info is needed.
162         Fix formatting.  Reorder and add comments.
163         * gcc-interface/trans.c (gnat_to_gnu) <N_Attribute_Reference>: Constify
164         variable and remove obsolete comment.
165         * gcc-interface/utils.c (convert_vms_descriptor64): Tweak comment.
166         (convert_vms_descriptor32): Likewise.
167         (convert): Remove dead code.
168         <UNCONSTRAINED_ARRAY_REF>: Pass the field instead of its name to build
169         the reference to the P_ARRAY pointer.
170         <POINTER_TYPE>: Likewise.
171         (maybe_unconstrained_array) <UNCONSTRAINED_ARRAY_TYPE>: Likewise.
172         (gnat_init_decl_processing): Delete, move contents to...
173         * gcc-interface/misc.c (gnat_init): ...here.
174
175 2010-04-16  Eric Botcazou  <ebotcazou@adacore.com>
176
177         * gcc-interface/trans.c (unchecked_conversion_nop): Handle function
178         calls.  Return true for conversion from a record subtype to its type.
179
180 2010-04-16  Eric Botcazou  <ebotcazou@adacore.com>
181
182         * gcc-interface/decl.c (gnat_to_gnu_entity): Use boolean_type_node in
183         lieu of integer_type_node for boolean operations.
184         (choices_to_gnu): Likewise.
185         * gcc-interface/trans.c (Attribute_to_gnu): Likewise.
186         (Loop_Statement_to_gnu): Likewise.
187         (establish_gnat_vms_condition_handler): Likewise.
188         (Exception_Handler_to_gnu_sjlj): Likewise.
189         (gnat_to_gnu): Likewise.
190         (build_unary_op_trapv): Likewise.
191         (build_binary_op_trapv): Likewise.
192         (emit_range_check): Likewise.
193         (emit_index_check): Likewise.
194         (convert_with_check): Likewise.
195         * gcc-interface/utils.c (convert_vms_descriptor64): Likewise.
196         (convert_vms_descriptor32): Likewise.
197         (convert_vms_descriptor): Likewise.
198         * gcc-interface/utils2.c (nonbinary_modular_operation): Likewise.
199         (compare_arrays): Use boolean instead of integer constants.
200         (build_binary_op) <TRUTH_ANDIF_EXPR, TRUTH_ORIF_EXPR, TRUTH_AND_EXPR,
201         TRUTH_OR_EXPR, TRUTH_XOR_EXPR>: New case.  Check that the result type
202         is a boolean type.
203         <GE_EXPR, LE_EXPR, GT_EXPR, LT_EXPR>: Remove obsolete assertion.
204         <EQ_EXPR, NE_EXPR>: Check that the result type is a boolean type.
205         <PREINC/PREDECREMENT_EXPR, POSTINC/POSTDECREMENT_EXPR>: Delete.
206         <TRUTH_NOT_EXPR>: Check that the result type is a boolean type.
207         (build_unary_op): Use boolean_type_node in lieu of integer_type_node
208         for boolean operations.
209         (fill_vms_descriptor): Likewise.  Fix formatting nits.
210
211 2010-04-16  Eric Botcazou  <ebotcazou@adacore.com>
212
213         * gcc-interface/ada-tree.def (LOOP_STMT): Change to 4-operand nodes.
214         * gcc-interface/ada-tree.h (LOOP_STMT_TOP_COND, LOOP_STMT_BOT_COND):
215         Merge into...
216         (LOOP_STMT_COND): ...this.
217         (LOOP_STMT_BOTTOM_COND_P): New flag.
218         (LOOP_STMT_TOP_UPDATE_P): Likewise.
219         * gcc-interface/trans.c (can_equal_min_or_max_val_p): New function.
220         (can_equal_min_val_p): New static inline function.
221         (can_equal_max_val_p): Likewise.
222         (Loop_Statement_to_gnu): Use build4 in lieu of build5 and adjust to
223         new LOOP_STMT semantics.  Use two different strategies depending on
224         whether optimization is enabled to translate the loop.
225         (gnat_gimplify_stmt) <LOOP_STMT>: Adjust to new LOOP_STMT semantics.
226
227 2010-04-16  Eric Botcazou  <ebotcazou@adacore.com>
228
229         * uintp.adb (UI_From_Dint): Remove useless code.
230         (UI_From_Int): Likewise.
231         * uintp.h: Reorder declarations.
232         (UI_From_gnu): Declare.
233         (UI_Base): Likewise.
234         (Vector_Template): Likewise.
235         (Vector_To_Uint): Likewise.
236         (Uint_0): Remove.
237         (Uint_1): Likewise.
238         * gcc-interface/gigi.h: Tweak comments.
239         * gcc-interface/cuintp.c (UI_From_gnu): New global function.
240         * gcc-interface/decl.c (maybe_pad_type): Do not warn if either size
241         overflows.
242         (annotate_value) <INTEGER_CST>: Call UI_From_gnu.
243         * gcc-interface/trans.c (post_error_ne_num): Call post_error_ne.
244         (post_error_ne_tree): Call UI_From_gnu and post_error_ne.
245         * gcc-interface/utils.c (max_size) <tcc_binary>: Do not special-case
246         TYPE_MAX_VALUE.
247
248 2010-04-16  Eric Botcazou  <ebotcazou@adacore.com>
249
250         * gcc-interface/decl.c (make_type_from_size) <INTEGER_TYPE>: Just copy
251         TYPE_NAME.
252         * gcc-interface/trans.c (smaller_packable_type_p): Rename into...
253         (smaller_form_type_p): ...this.  Change parameter and variable names.
254         (call_to_gnu): Use the nominal type of the parameter to create the
255         temporary if it's a smaller form of the actual type.
256         (addressable_p): Return false if the actual type is integral and its
257         size is greater than that of the expected type.
258
259 2010-04-15  Eric Botcazou  <ebotcazou@adacore.com>
260
261         * gcc-interface/cuintp.c (UI_To_gnu): Fix long line.
262         * gcc-interface/gigi.h (MARK_VISITED): Skip objects of constant class.
263         (process_attributes): Delete.
264         (post_error_ne_num): Change parameter name.
265         * gcc-interface/decl.c (gnat_to_gnu_entity): Do not force debug info
266         with -g3.  Remove a couple of obsolete lines.  Minor tweaks.
267         If type annotating mode, operate on trees to compute the adjustment to
268         the sizes of tagged types.  Fix long line.
269         (cannot_be_superflat_p): Tweak head comment.
270         (annotate_value): Fold local constant.
271         (set_rm_size): Fix long line.
272         * gcc-interface/trans.c (Identifier_to_gnu): Rework comments.
273         (Attribute_to_gnu): Fix long line.
274         <Attr_Size>: Remove useless assertion.
275         Reorder statements.  Use size_binop routine.
276         (Loop_Statement_to_gnu): Use build5 in lieu of build_nt.
277         Create local variables for the label and the test.  Tweak comments.
278         (Subprogram_Body_to_gnu): Reset cfun to NULL.
279         (Compilation_Unit_to_gnu): Use the Sloc of the Unit node.
280         (process_inlined_subprograms): Integrate into...
281         (Compilation_Unit_to_gnu): ...this.
282         (gnat_to_gnu): Fix long line.
283         (post_error_ne_num): Change parameter name.
284         * gcc-interface/utils.c (process_attributes): Static-ify.
285         <ATTR_MACHINE_ATTRIBUTE>: Set input_location before proceeding.
286         (create_type_decl): Add comment.
287         (create_var_decl_1): Process the attributes after adding the VAR_DECL
288         to the current binding level.
289         (create_subprog_decl): Likewise for the FUNCTION_DECL.
290         (end_subprog_body): Do not reset cfun to NULL.
291         (build_vms_descriptor32): Fix long line.
292         (build_vms_descriptor): Likewise.
293         (handle_nonnull_attribute): Likewise.
294         (convert_vms_descriptor64): Likewise.
295         * gcc-interface/utils2.c (fill_vms_descriptor): Fix long line.
296         (gnat_protect_expr): Fix thinko.
297
298 2010-04-15  Eric Botcazou  <ebotcazou@adacore.com>
299
300         * gcc-interface/trans.c (gigi): Set DECL_IGNORED_P on EH functions.
301         (gnat_to_gnu) <N_Op_Eq>: Restore the value of input_location
302         before translating the top-level node.
303         (lvalue_required_p) <N_Function_Call>: Return 1 if !constant.
304         <N_Object_Declaration>: Likewise.
305         <N_Assignment_Statement>: Likewise.
306         <N_Unchecked_Type_Conversion>: Likewise.
307         (call_to_gnu): Remove kludge.
308         (gnat_to_gnu) <N_Return_Statement>: When not optimizing, force labels
309         associated with user returns to be preserved.
310         (gnat_to_gnu): Add special code to deal with boolean rvalues.
311         * gcc-interface/utils2.c (compare_arrays): Set input_location on all
312         comparisons.
313         (build_unary_op) <ADDR_EXPR>: Call build_fold_addr_expr.
314         <INDIRECT_REF>: Call build_fold_indirect_ref.
315
316 2010-04-15  Joel Sherrill  <joel.sherrill@oarcorp.com>
317
318         * g-socket.adb: A target can have multiple missing errno's.  This
319         will result in multiple errno's being defined as -1.  Because of this
320         we can not use a case but must use a series of if's to avoid 
321         a duplicate case error in GNAT.Sockets.Resolve_Error.
322
323 2010-04-15  Eric Botcazou  <ebotcazou@adacore.com>
324
325         * gcc-interface/trans.c (call_to_gnu): Open a nesting level if this is
326         a statement.  Otherwise, if at top-level, push the processing of the
327         elaboration routine.  In the misaligned case, issue the error messages
328         again on entry and create the temporary explicitly.  Do not issue them
329         for CONSTRUCTORs.
330         For a function call, emit the range check if necessary.
331         In the copy-in copy-out case, create the temporary for the return
332         value explicitly.
333         Do not unnecessarily convert by-ref parameters to the formal's type.
334         Remove obsolete guards in conditions.
335         (gnat_to_gnu) <N_Assignment_Statement>: For a function call, pass the
336         target to call_to_gnu in all cases.
337         (gnat_gimplify_expr) <ADDR_EXPR>: Remove handling of SAVE_EXPR.
338         (addressable_p) <CONSTRUCTOR>: Return false if not static.
339         <COMPOUND_EXPR>: New case.
340         * gcc-interface/utils2.c (build_unary_op) <ADDR_EXPR>: Fold a compound
341         expression if it has unconstrained array type.
342         (gnat_mark_addressable) <COMPOUND_EXPR>: New case.
343         (gnat_stabilize_reference) <COMPOUND_EXPR>: Stabilize operands on an
344         individual basis.
345
346 2010-04-15  Eric Botcazou  <ebotcazou@adacore.com>
347
348         * gcc-interface/trans.c (gigi): Do not start statement group.
349         (Compilation_Unit_to_gnu): Set current_function_decl to NULL.
350         Start statement group and push binding level here...
351         (gnat_to_gnu) <N_Compilation_Unit>: ...and not here.
352         Do not push fake contexts at top level.  Remove redundant code.
353         (call_to_gnu): Rename a local variable and constify another.
354         * gcc-interface/utils.c (gnat_pushlevel): Fix formatting nits.
355         (set_current_block_context): Set it as the group's block.
356         (gnat_init_decl_processing): Delete unrelated init code.
357         (end_subprog_body): Use NULL_TREE.
358
359 2010-04-15  Eric Botcazou  <ebotcazou@adacore.com>
360
361         * gcc-interface/trans.c (call_to_gnu): Do not unnecessarily force
362         side-effects of actual parameters before the call.
363
364 2010-04-15  Eric Botcazou  <ebotcazou@adacore.com>
365
366         * gcc-interface/decl.c (validate_size): Reorder, remove obsolete test
367         and warning.
368         (set_rm_size): Reorder and remove obsolete test.
369
370 2010-04-14  Eric Botcazou  <ebotcazou@adacore.com>
371
372         * gcc-interface/gigi.h: Reorder declarations and tweak comments.
373         (gigi): Adjust ATTRIBUTE_UNUSED markers.
374         * gcc-interface/gadaint.h: New file.
375         * gcc-interface/trans.c: Include it in lieu of adaint.h.  Reorder.
376         (__gnat_to_canonical_file_spec): Remove declaration.
377         (number_names): Delete.
378         (number_files): Likewise.
379         (gigi): Adjust.
380         * gcc-interface/Make-lang.in (ada/trans.o): Adjust dependencies to
381         above change.
382
383 2010-04-14  Eric Botcazou  <ebotcazou@adacore.com>
384
385         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Class_Wide_Type>: Fix
386         comment.
387         * gcc-interface/trans.c (process_freeze_entity): Use local copy of
388         Ekind.  Return early for class-wide types.  Do not compute initializer
389         unless necessary.  Reuse the tree for an associated class-wide type
390         only if processing its root type.
391
392 2010-04-13  Joel Sherrill  <joel.sherrill@oarcorp.com>
393
394         * gsocket.h: Run-time can no longer be built without network
395         OS headers available.  Changing RTEMS GNAT build procedure to
396         reflect this and letting run-time build use network .h files.
397
398 2010-04-13  Duncan Sands  <baldrick@free.fr>
399
400         * gcc-interface/misc.c (gnat_eh_type_covers): Remove.
401         * gcc-interface/trans.c (Exception_Handler_to_gnu_zcx): Update comment.
402
403 2010-04-13  Eric Botcazou  <ebotcazou@adacore.com>
404
405         * gcc-interface/gigi.h (standard_datatypes): Add ADT_parent_name_id.
406         (parent_name_id): New macro.
407         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: Use it.
408         * gcc-interface/trans.c (gigi): Initialize it.
409         (lvalue_required_p) <N_Type_Conversion>: New case.
410         <N_Qualified_Expression>: Likewise.
411         <N_Allocator>: Likewise.
412         * gcc-interface/utils.c (convert): Try to properly upcast tagged types.
413
414 2010-04-13  Eric Botcazou  <ebotcazou@adacore.com>
415
416         * gcc-interface/ada-tree.h (TYPE_BY_REFERENCE_P): Delete.
417         (DECL_CONST_ADDRESS_P): New macro.
418         (SET_DECL_ORIGINAL_FIELD_TO_FIELD): Likewise.
419         (SAME_FIELD_P): Likewise.
420         * gcc-interface/decl.c (constructor_address_p): New static function.
421         (gnat_to_gnu_entity) <object>: Set DECL_CONST_ADDRESS_P according to
422         the return value of above function.
423         (gnat_to_gnu_entity) <E_Record_Type>: Force BLKmode for all types
424         passed by reference.
425         <E_Record_Subtype>: Likewise.
426         Set TREE_ADDRESSABLE on the type if it passed by reference.
427         (make_packable_type): Use SET_DECL_ORIGINAL_FIELD_TO_FIELD.
428         (create_field_decl_from): Likewise.
429         (substitute_in_type): Likewise.
430         (purpose_member_field): Use SAME_FIELD_P.
431         * gcc-interface/misc.c (must_pass_by_ref): Test TREE_ADDRESSABLE.
432         * gcc-interface/trans.c (lvalue_required_p): Add ADDRESS_OF_CONSTANT
433         parameter and adjust recursive calls.
434         <N_Explicit_Dereference>: New case.
435         <N_Object_Declaration>: Return 1 if the object is of a class-wide type.
436         Adjust calls to lvalue_required_p.  Do not return the initializer of a
437         DECL_CONST_ADDRESS_P constant if an lvalue is required for it.
438         (call_to_gnu): Delay issuing error message for a misaligned actual and
439         avoid the associated back-end assertion.  Test TREE_ADDRESSABLE.
440         (gnat_gimplify_expr) <ADDR_EXPR>: Handle non-static constructors.
441         * gcc-interface/utils.c (make_dummy_type): Set TREE_ADDRESSABLE if the
442         type is passed by reference.
443         (convert) <CONSTRUCTOR>: Convert in-place in more cases.
444         * gcc-interface/utils2.c (build_cond_expr): Drop TYPE_BY_REFERENCE_P.
445         (build_simple_component_ref): Use SAME_FIELD_P.
446
447 2010-04-12  Eric Botcazou  <ebotcazou@adacore.com>
448
449         * gcc-interface/trans.c (Identifier_to_gnu): Use boolean variable.
450         (call_to_gnu): Test gigi's flag TYPE_BY_REFERENCE_P instead of calling
451         front-end's predicate Is_By_Reference_Type.  Use consistent order and
452         remove ??? comment.  Use original conversion in all cases, if any.
453         * gcc-interface/utils.c (make_dummy_type): Minor tweak.
454         (convert): Use local copy in more cases.
455         <INDIRECT_REF>: Remove deactivated code.
456         (unchecked_convert): Use a couple of local copies.
457
458 2010-04-11  Eric Botcazou  <ebotcazou@adacore.com>
459
460         * gcc-interface/trans.c (lvalue_required_for_attribute_p): New static
461         function.
462         (lvalue_required_p) <N_Attribute_Reference>: Call it.
463         (gnat_to_gnu) <N_Selected_Component>: Prevent build_component_ref from
464         folding the result only if lvalue_required_for_attribute_p is true.
465         * gcc-interface/utils.c (maybe_unconstrained_array): Pass correctly
466         typed constant to build_component_ref.
467         (unchecked_convert): Likewise.
468         * gcc-interface/utils2.c (maybe_wrap_malloc): Likewise.
469         (build_allocator): Likewise.
470
471 2010-04-11  Eric Botcazou  <ebotcazou@adacore.com>
472
473         * gcc-interface/utils2.c (build_cond_expr): Take the address and
474         dereference if the result type is passed by reference.
475
476 2010-04-11  Eric Botcazou  <ebotcazou@adacore.com>
477
478         * gcc-interface/trans.c (Case_Statement_to_gnu): Bool-ify variable.
479         (gnat_to_gnu) <N_Null_Statement>: When not optimizing, generate a
480         goto to the next statement.
481
482 2010-04-09  Eric Botcazou  <ebotcazou@adacore.com>
483
484         * gcc-interface/gigi.h (maybe_variable): Delete.
485         (protect_multiple_eval): Likewise.
486         (maybe_stabilize_reference): Likewise.
487         (gnat_save_expr): Declare.
488         (gnat_protect_expr): Likewise.
489         (gnat_stabilize_reference): Likewise.
490         * gcc-interface/decl.c (gnat_to_gnu_entity) <object>: Use
491         gnat_stabilize_reference.
492         (maybe_variable): Delete.
493         (elaborate_expression_1): Use gnat_save_expr.
494         * gcc-interface/trans.c (Attribute_to_gnu): Use gnat_protect_expr.
495         (call_to_gnu): Pass NULL to gnat_stabilize_reference.
496         (gnat_to_gnu) <N_Object_Declaration>: Use gnat_save_expr.
497         <N_Slice>: Use gnat_protect_exp.
498         <N_Selected_Component>: Pass NULL to gnat_stabilize_reference.
499         <N_In>: Use gnat_protect_expr.
500         Pass NULL to gnat_stabilize_reference.
501         (build_unary_op_trapv): Use gnat_protect_expr.
502         (build_binary_op_trapv): Likewise.
503         (emit_range_check): Likewise.
504         (emit_index_check): Likewise.
505         (convert_with_check): Likewise.
506         (protect_multiple_eval): Move to utils2.c file.
507         (maybe_stabilize_reference): Merge into...
508         (gnat_stabilize_reference): ...this.  Move to utils2.c file.
509         (gnat_stabilize_reference_1): Likewise.
510         * gcc-interface/utils.c (convert_to_fat_pointer): Use gnat_protect_expr
511         instead of protect_multiple_eval.
512         * gcc-interface/utils2.c (compare_arrays): Likewise.
513         (nonbinary_modular_operation): Likewise.
514         (maybe_wrap_malloc): Likewise.
515         (build_allocator): Likewise.
516         (gnat_save_expr): New function.
517         (gnat_protect_expr): Rename from protect_multiple_eval.  Early return
518         in common cases.  Propagate TREE_READONLY onto dereferences.
519         (gnat_stabilize_reference_1): Move from trans.c file.
520         (gnat_stabilize_reference): Likewise.
521
522 2010-04-09  Eric Botcazou  <ebotcazou@adacore.com>
523
524         * gcc-interface/gigi.h (gnat_mark_addressable): Rename parameter.
525         * gcc-interface/decl.c (maybe_variable): Do not set TREE_STATIC on _REF
526         node.  Use the type of the operand to set TREE_READONLY.
527         * gcc-interface/trans.c (Identifier_to_gnu): Do not set TREE_STATIC on
528         _REF node.  Do not overwrite TREE_READONLY.
529         (call_to_gnu): Rename local variable and fix various nits.  In the
530         copy-in/copy-out case, build the SAVE_EXPR manually.
531         (convert_with_check): Call protect_multiple_eval in lieu of save_expr
532         and fold the computations.
533         (protect_multiple_eval): Always save entire fat pointers.
534         (maybe_stabilize_reference): Minor tweaks.
535         (gnat_stabilize_reference_1): Likewise.  Do not deal with tcc_constant,
536         tcc_type and tcc_statement.
537         * gcc-interface/utils.c (convert_to_fat_pointer): Call
538         protect_multiple_eval in lieu of save_expr.
539         (convert): Minor tweaks.
540         (maybe_unconstrained_array): Do not set TREE_STATIC on _REF node.
541         (builtin_type_for_size): Call gnat_type_for_size directly.
542         * gcc-interface/utils2.c (contains_save_expr_p): Delete.
543         (contains_null_expr): Likewise
544         (gnat_build_constructor): Do not call it.
545         (compare_arrays): Deal with all side-effects, use protect_multiple_eval
546         instead of gnat_stabilize_reference to protect the operands.
547         (nonbinary_modular_operation): Call protect_multiple_eval in lieu of
548         save_expr.
549         (maybe_wrap_malloc): Likewise.
550         (build_allocator): Likewise.
551         (build_unary_op) <INDIRECT_REF>: Do not set TREE_STATIC on _REF node.
552         (gnat_mark_addressable): Rename parameter.
553
554 2010-04-08  Eric Botcazou  <ebotcazou@adacore.com>
555
556         * gcc-interface/ada-tree.h (TYPE_RETURNS_UNCONSTRAINED_P): Rename into.
557         (TYPE_RETURN_UNCONSTRAINED_P): ...this.
558         (TYPE_RETURNS_BY_REF_P): Rename into.
559         (TYPE_RETURN_BY_DIRECT_REF_P): ...this.
560         (TYPE_RETURNS_BY_TARGET_PTR_P): Delete.
561         * gcc-interface/gigi.h (create_subprog_type): Adjust parameter names.
562         (build_return_expr): Likewise.
563         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>:
564         Rename local variables.  If the return Mechanism is By_Reference, pass
565         return_by_invisible_ref_p to create_subprog_type instead of toggling
566         TREE_ADDRESSABLE.  Test return_by_invisible_ref_p in order to annotate
567         the mechanism.  Use regular return for contrained types with non-static
568         size and return by invisible reference for unconstrained return types
569         with default discriminants.  Update comment.
570         * gcc-interface/trans.c (Subprogram_Body_to_gnu): If the function
571         returns by invisible reference, turn the RESULT_DECL into a pointer.
572         Do not handle DECL_BY_REF_P in the CICO case here.
573         (call_to_gnu): Remove code handling return by target pointer.  For a
574         function call, if the return type has non-constant size, generate the
575         assignment with an INIT_EXPR.
576         (gnat_to_gnu) <N_Return_Statement>: Remove dead code in the CICO case.
577         If the function returns by invisible reference, build the copy return
578         operation manually.
579         (add_decl_expr): Initialize the variable with an INIT_EXPR.
580         * gcc-interface/utils.c (create_subprog_type): Adjust parameter names.
581         Adjust for renaming of macros.  Copy the node only when necessary.
582         (create_subprog_decl): Do not toggle TREE_ADDRESSABLE on the return
583         type, only change DECL_BY_REFERENCE on the RETURN_DECL.
584         (convert_from_reference): Delete.
585         (is_byref_result): Likewise.
586         (gnat_genericize_r): Likewise.
587         (gnat_genericize): Likewise.
588         (end_subprog_body): Do not call gnat_genericize.
589         * gcc-interface/utils2.c (build_binary_op) <INIT_EXPR>: New case.
590         (build_return_expr): Adjust parameter names, logic and comment.
591
592 2010-04-07  Eric Botcazou  <ebotcazou@adacore.com>
593
594         * exp_pakd.adb (Create_Packed_Array_Type): Always use a modular type
595         if the size is small enough.  Propagate the alignment if there is an
596         alignment clause on the original array type.
597         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Modular_Integer_Subtype>
598         Deal with under-aligned packed array types.  Copy the size onto the
599         justified modular type and don't lay it out again.  Likewise for the
600         padding type built for other under-aligned subtypes.
601         * gcc-interface/utils.c (finish_record_type): Do not set a default mode
602         on the type.
603
604 2010-04-07  Eric Botcazou  <ebotcazou@adacore.com>
605
606         * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Procedure>: Set default
607         alignment on the RETURN type built for the Copy-In Copy-Out mechanism.
608
609 2010-04-07  Eric Botcazou  <ebotcazou@adacore.com>
610
611         * gcc-interface/trans.c (call_to_gnu): In the return-by-target-ptr case
612         do not set the result type if there is a specified target and do not
613         convert the result in any cases.
614         (protect_multiple_eval): Make direct SAVE_EXPR for CALL_EXPR.
615         (maybe_stabilize_reference) <COMPOUND_EXPR>: Merge with CALL_EXPR.
616
617 2010-03-10  Eric Botcazou  <ebotcazou@adacore.com>
618
619         * gcc-interface/Makefile.in (SPARC/Solaris): Use sparcv8plus.
620
621 2010-02-27  Eric Botcazou  <ebotcazou@adacore.com>
622
623         PR ada/42253
624         * gcc-interface/utils2.c (build_binary_op) <EQ_EXPR>: Assert that fat
625         pointer base types are variant of each other.  Apply special treatment
626         for null to fat pointer types in all cases.
627
628 2010-01-28  Pascal Obry  <obry@adacore.com>
629
630         * s-win32.ads: Add some missing constants.
631
632 2010-01-28  Vincent Celier  <celier@adacore.com>
633
634         * prj-attr-pm.adb (Add_Attribute): Do nothing if To_Package is
635         Unknown_Package.
636
637 2010-01-28  Robert Dewar  <dewar@adacore.com>
638
639         * gnat_rm.texi: Minor correction
640
641 2010-01-27  Pascal Obry  <obry@adacore.com>
642
643         * g-awk.adb: ensure that an AWK session is reusable.
644
645 2010-01-27  Vasiliy Fofanov  <fofanov@adacore.com>
646
647         * g-regist.adb (For_Every_Key): Fix previous change.
648         Minor reformatting.
649
650 2010-01-27  Thomas Quinot  <quinot@adacore.com>
651
652         * lib-writ.ads: Current version of spec for new N (note) ALI lines
653
654 2010-01-27  Yannick Moy  <moy@adacore.com>
655
656         * a-cdlili.adb (Insert): Correct exception message when cursor
657         designates wrong list.
658
659 2010-01-27  Vincent Celier  <celier@adacore.com>
660
661         * gnatcmd.adb: When there is only one main specified, the package
662         support Switches (<main>) and attribute Switches is specified for the
663         main, use these switches, instead of Default_Switches ("Ada").
664
665 2010-01-27  Robert Dewar  <dewar@adacore.com>
666
667         * sem_prag.adb, par-prag.adb, snames.ads-tmpl: pragma Dimension initial
668         implementation.
669         * exp_disp.adb: Minor reformatting
670
671 2010-01-27  Tristan Gingold  <gingold@adacore.com>
672
673         * seh_init.c: Use __ImageBase instead of _ImageBase.
674
675 2010-01-27  Javier Miranda  <miranda@adacore.com>
676
677         * exp_disp.ads, exp_disp.adb (Expand_Interface_Thunk): Modify the
678         profile of interface thunks. The type of the controlling formal is now
679         the covered interface type (instead of the target tagged type).
680
681 2010-01-27  Sergey Rybin  <rybin@adacore.com>
682
683         * gnat_rm.texi, gnat_ugn.texi: Update gnatcheck doc.
684
685 2010-01-27  Robert Dewar  <dewar@adacore.com>
686
687         * sinput.ads, sinput.adb (Sloc_Range): Applies to all nodes, formal
688         changed from Expr to N.
689
690 2010-01-26  Thomas Quinot  <quinot@adacore.com>
691
692         * gnat_ugn.texi: Adjust documentation of -gnatz switches.
693         * usage.adb: Replace line for -gnatz with two lines for -gnatzc and
694         -gnatzr.
695
696 2010-01-26  Vincent Celier  <celier@adacore.com>
697
698         * prj-attr.adb: Add new attribute Library_Install_Name_Option
699         Replace attribute Run_Path_Origin_Supported with Run_Path_Origin
700         * prj-nmsc.adb (Process_Project_Level_Simple_Attributes): Process
701         attributes Run_Path_Option and Library_Install_Name_Option.
702         * prj.ads (Project_Configuration): Replace component
703         Run_Path_Origin_Supported with component Run_Path_Origin. Add new
704         component Library_Install_Name_Option.
705         * snames.ads-tmpl: Add new standard name Library_Install_Name_Option
706         Replace Run_Path_Origin_Supported with Run_Path_Origin
707
708 2010-01-26  Ed Schonberg  <schonberg@adacore.com>
709
710         * sem_ch8.adb (Use_One_Package): Within an instance, an actual package
711         is not hidden by a homograph declared in another actual package.
712
713 2010-01-26  Robert Dewar  <dewar@adacore.com>
714
715         * par_sco.adb (Traverse_Declarations_Or_Statements): Only generate
716         decisions for pragmas Assert, Check, Precondition, Postcondition if
717         -gnata set.
718         * scos.ads: Update comments.
719         * get_scos.adb, put_scos.adb: Minor fix to code reading statement SCOs.
720         Also remove obsolete code for CT (exit point) SCOs.
721
722 2010-01-26  Thomas Quinot  <quinot@adacore.com>
723
724         * switch-c.adb: Fix handling of -gnatz*
725
726 2010-01-26  Robert Dewar  <dewar@adacore.com>
727
728         * par_sco.adb (Traverse_Declarations_Or_Statements): Separate F/W
729         qualifiers for FOR/WHILE loops
730         * scos.ads: Use separate type letters F/W for for/while loops
731
732 2010-01-26  Robert Dewar  <dewar@adacore.com>
733
734         * get_scos.adb (Get_SCOs): Implement new form of CS entries (multiple
735         entries per line, one for each statement in the sequence).
736         * par_sco.adb (Traverse_Declarations_Or_Statements): Increase array
737         size from 100 to 10_000 for SC_Array to avoid any real possibility of
738         overflow. Output decisions in for loops.
739         Exclude labels from CS lines.
740         * scos.ads: Clarify that label is not included in the entry point
741
742 2010-01-26  Robert Dewar  <dewar@adacore.com>
743
744         * par_sco.adb (Traverse_Declarations_Or_Statments): Implement new
745         format of statement sequence SCO entries (one location/statement).
746         * put_scos.adb (Put_SCOs): Implement new format of CS lines
747         * scos.ads: Update comments.
748         * sem_eval.adb: Minor reformatting.
749
750 2010-01-26  Robert Dewar  <dewar@adacore.com>
751
752         * par_sco.ads, par_sco.adb (Set_Statement_Entry): New handling of exits
753         (Extend_Statement_Sequence): New procedures
754         (Traverse_Declarations_Or_Statements): New handling for exits.
755
756 2010-01-26  Robert Dewar  <dewar@adacore.com>
757
758         * par_sco.adb (Traverse_Declarations_Or_Statements): Add processing for
759         Case.
760
761 2010-01-26  Robert Dewar  <dewar@adacore.com>
762
763         * par_sco.adb (Is_Logical_Operator): Exclude AND/OR/XOR
764         * scos.ads: Clarify handling of logical operators
765
766 2010-01-26  Arnaud Charlet  <charlet@adacore.com>
767
768         * s-tpoben.adb: Update comments.
769
770 2010-01-26  Robert Dewar  <dewar@adacore.com>
771
772         * freeze.adb (Set_Small_Size): Don't set size if alignment clause
773         present.
774
775 2010-01-26  Robert Dewar  <dewar@adacore.com>
776
777         * scos.ads: Clean up documentation, remove obsolete XOR references
778 2010-01-26  Vincent Celier  <celier@adacore.com>
779
780         * gnat_ugn.texi: Complete documentation on the restrictions for
781         combined options in -gnatxxx switches.
782         Fix typo.
783
784 2010-01-26  Arnaud Charlet  <charlet@adacore.com>
785
786         * s-tpoben.adb (Initialize_Protection_Entries): If a PO is created from
787         a controlled operation, abort is already deferred at this point, so we
788         need to use Defer_Abort_Nestable.
789
790 2010-01-26  Vincent Celier  <celier@adacore.com>
791
792         * prj-conf.adb (Get_Config_Switches): Check for a default language for
793         a project extending a project with no languages.
794
795 2010-01-26  Vincent Celier  <celier@adacore.com>
796
797         * switch-c.adb (Scan_Front_End_Switches): Take into account options
798         that follow -gnatef.
799         Allow -gnateG to be followed by other options.
800
801 2010-01-26  Robert Dewar  <dewar@adacore.com>
802
803         * s-commun.ads, s-osprim-mingw.adb, s-stchop-vxworks.adb, sem_aggr.adb,
804         s-vxwext.adb, sem_ch10.adb, sem_eval.adb, sem_prag.adb: Minor
805         reformatting.
806
807 2010-01-26  Vasiliy Fofanov  <fofanov@adacore.com>
808
809         * g-regist.adb, g-regist.ads (For_Every_Key): New generic procedure
810         that allows to iterate over all subkeys of a key.
811
812 2010-01-26  Ed Falis  <falis@adacore.com>
813
814         * sysdep.c: enable NFS for VxWorks MILS
815         * env.c: enable __gnat_environ for VxWorks MILS
816         * gcc-interface/Makefile.in: Add VxWorks MILS target pairs.
817
818 2010-01-25  Bob Duff  <duff@adacore.com>
819
820         * sem_aggr.adb (Resolve_Array_Aggregate): Check for the case where this
821         is an internally-generated positional aggregate, and the bounds are
822         already correctly set. We don't want to overwrite those bounds with
823         bounds determined by context.
824
825 2010-01-25  Robert Dewar  <dewar@adacore.com>
826
827         * g-sercom.ads, gnatcmd.adb, gnatlink.adb, a-ststio.adb, exp_ch6.adb,
828         exp_ch9.adb, g-sechas.ads: Minor reformatting.
829
830 2010-01-25  Thomas Quinot  <quinot@adacore.com>
831
832         * s-commun.adb (Last_Index): Count must be converted to SEO (a signed
833         integer type) before subtracting 1, otherwise the computation may wrap
834         (because size_t is modular) and cause the conversion to fail.
835
836 2010-01-25  Ed Falis  <falis@adacore.com>
837
838         * sysdep.c, init.c: Adapt to support full run-time on VxWorks MILS.
839
840 2010-01-25  Vincent Celier  <celier@adacore.com>
841
842         * prj-attr.adb: New attribute Run_Path_Origin_Required
843         * prj-nmsc.adb (Process_Project_Level_Simple_Attributes): Process new
844         attribute Run_Path_Origin_Required.
845         * prj.ads (Project_Configuration): New component
846         Run_Path_Origin_Supported.
847         * snames.ads-tmpl: New standard name Run_Path_Origin_Required
848
849 2010-01-25  Ed Schonberg  <schonberg@adacore.com>
850
851         * sem_aggr.adb (Resolve_Array_Aggregate): If the bounds in a choice
852         have errors, do not continue resolution of the aggregate.
853         * sem_eval.adb (Eval_Indexed_Component): Do not attempt to evaluate if
854         the array type indicates an error.
855
856 2010-01-25  Bob Duff  <duff@adacore.com>
857
858         * sinfo.ads: Minor comment fixes.
859
860 2010-01-25  Bob Duff  <duff@adacore.com>
861
862         * exp_ch4.adb, exp_aggr.adb: Minor comment fixes and code clean up.
863
864 2010-01-25  Arnaud Charlet  <charlet@adacore.com>
865
866         * gnatvsn.ads (Current_Year): Update.
867
868 2010-01-25  Florian Villoing  <villoing@adacore.com>
869
870         * gnat_ugn.texi: Fix typo.
871
872 2010-01-25  Thomas Quinot  <quinot@adacore.com>
873
874         * scos.ads: Update specification.
875
876 2010-01-25  Ed Schonberg  <schonberg@adacore.com>
877
878         * sem_ch6.adb (Process_PPCs): If a postcondition is present and the
879         enclosing subprogram has no previous spec, attach postcondition
880         procedure to the defining entity for the body.
881
882 2010-01-25  Ed Schonberg  <schonberg@adacore.com>
883
884         * exp_aggr.adb (Build_Record_Aggr_Code); Do not generate call to
885         initialization procedure of the ancestor part of an extension aggregate
886         if it is an interface type.
887
888 2010-01-25  Vincent Celier  <celier@adacore.com>
889
890         * gnatlink.adb (Process_Binder_File): The directory for the shared
891         version of libgcc in the run path options is found in the subdirectory
892         indicated by __gnat_default_libgcc_subdir.
893         * link.c: Declare new const char * __gnat_default_libgcc_subdir for
894         each platform.
895
896 2010-01-25  Ed Schonberg  <schonberg@adacore.com>
897
898         * sem_prag.adb: More flexible pragma Annotate.
899
900 2010-01-22  Eric Botcazou  <ebotcazou@adacore.com>
901
902         * system-linux-armel.ads (Stack_Check_Probes): Set to True.
903         * system-linux-armeb.ads (Stack_Check_Probes): Likewise.
904
905 2010-01-18  Eric Botcazou  <ebotcazou@adacore.com>
906
907         * gcc-interface/utils.c (create_var_decl_1): Fix formatting nits.
908
909 2010-01-18  Jan Hubicka  <jh@suse.cz>
910
911         PR middle-end/42068
912         * gcc-interface/utils.c (create_var_decl_1): Do not set COMMON flag for
913         unit local variables.
914
915 2010-01-17  Laurent GUERBY  <laurent@guerby.net>
916
917         * gcc-interface/Makefile.in: Fix typo in arm*-*-linux-gnueabi.
918
919 2010-01-11  Mikael Pettersson  <mikpe@it.uu.se>
920
921         * gcc-interface/Makefile.in: Add arm*-*-linux-gnueabi.
922         * system-linux-armeb.ads, system-linux-armel.ads: New files.
923
924 2010-01-09  Simon Wright  <simon@pushface.org>
925
926         PR ada/42626
927         * gcc-interface/Makefile.in (gnatlib-shared-darwin): Add missing
928         end-quote.
929
930
931 \f
932 Copyright (C) 2010 Free Software Foundation, Inc.
933
934 Copying and distribution of this file, with or without modification,
935 are permitted in any medium without royalty provided the copyright
936 notice and this notice are preserved.