OSDN Git Service

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