OSDN Git Service

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