OSDN Git Service

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