OSDN Git Service

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