OSDN Git Service

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