1 2010-04-25 Eric Botcazou <ebotcazou@adacore.com>
3 * gcc-interface/trans.c (gnat_to_gnu) <N_Assignment_Statement>: Do not
4 use memmove if the array type is bit-packed.
6 2010-04-18 Eric Botcazou <ebotcazou@adacore.com>
8 * gcc-interface/misc.c (gnat_init): Remove second argument in call to
9 build_common_tree_nodes.
11 2010-04-18 Ozkan Sezer <sezeroz@gmail.com>
13 * gsocket.h: Make sure that winsock2.h is included before windows.h.
15 2010-04-17 Eric Botcazou <ebotcazou@adacore.com>
17 * gcc-interface/utils2.c (build_unary_op) <ATTR_ADDR_EXPR>: Do not
20 2010-04-17 Eric Botcazou <ebotcazou@adacore.com>
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
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
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
39 2010-04-17 Eric Botcazou <ebotcazou@adacore.com>
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
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.
57 2010-04-17 Eric Botcazou <ebotcazou@adacore.com>
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
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
71 (annotate_value) <INTEGER_CST>: Simplify code handling negative values.
72 * gcc-interface/misc.c (gnat_init): Initialize sbitsize_one_node and
74 * gcc-interface/trans.c (Attribute_to_gnu) <Attr_Pool_Address>: Fold
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.
82 2010-04-16 Eric Botcazou <ebotcazou@adacore.com>
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.
102 2010-04-16 Eric Botcazou <ebotcazou@adacore.com>
104 * gcc-interface/trans.c (unchecked_conversion_nop): Handle function
105 calls. Return true for conversion from a record subtype to its type.
107 2010-04-16 Eric Botcazou <ebotcazou@adacore.com>
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
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.
138 2010-04-16 Eric Botcazou <ebotcazou@adacore.com>
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):
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.
154 2010-04-16 Eric Botcazou <ebotcazou@adacore.com>
156 * uintp.adb (UI_From_Dint): Remove useless code.
157 (UI_From_Int): Likewise.
158 * uintp.h: Reorder declarations.
159 (UI_From_gnu): Declare.
161 (Vector_Template): Likewise.
162 (Vector_To_Uint): 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
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
175 2010-04-16 Eric Botcazou <ebotcazou@adacore.com>
177 * gcc-interface/decl.c (make_type_from_size) <INTEGER_TYPE>: Just copy
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.
186 2010-04-15 Eric Botcazou <ebotcazou@adacore.com>
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.
225 2010-04-15 Eric Botcazou <ebotcazou@adacore.com>
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
240 (build_unary_op) <ADDR_EXPR>: Call build_fold_addr_expr.
241 <INDIRECT_REF>: Call build_fold_indirect_ref.
243 2010-04-15 Joel Sherrill <joel.sherrill@oarcorp.com>
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.
250 2010-04-15 Eric Botcazou <ebotcazou@adacore.com>
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
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
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
273 2010-04-15 Eric Botcazou <ebotcazou@adacore.com>
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.
286 2010-04-15 Eric Botcazou <ebotcazou@adacore.com>
288 * gcc-interface/trans.c (call_to_gnu): Do not unnecessarily force
289 side-effects of actual parameters before the call.
291 2010-04-15 Eric Botcazou <ebotcazou@adacore.com>
293 * gcc-interface/decl.c (validate_size): Reorder, remove obsolete test
295 (set_rm_size): Reorder and remove obsolete test.
297 2010-04-14 Eric Botcazou <ebotcazou@adacore.com>
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.
307 * gcc-interface/Make-lang.in (ada/trans.o): Adjust dependencies to
310 2010-04-14 Eric Botcazou <ebotcazou@adacore.com>
312 * gcc-interface/decl.c (gnat_to_gnu_entity) <E_Class_Wide_Type>: Fix
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.
319 2010-04-13 Joel Sherrill <joel.sherrill@oarcorp.com>
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.
325 2010-04-13 Duncan Sands <baldrick@free.fr>
327 * gcc-interface/misc.c (gnat_eh_type_covers): Remove.
328 * gcc-interface/trans.c (Exception_Handler_to_gnu_zcx): Update comment.
330 2010-04-13 Eric Botcazou <ebotcazou@adacore.com>
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.
341 2010-04-13 Eric Botcazou <ebotcazou@adacore.com>
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
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.
374 2010-04-12 Eric Botcazou <ebotcazou@adacore.com>
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.
385 2010-04-11 Eric Botcazou <ebotcazou@adacore.com>
387 * gcc-interface/trans.c (lvalue_required_for_attribute_p): New static
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.
398 2010-04-11 Eric Botcazou <ebotcazou@adacore.com>
400 * gcc-interface/utils2.c (build_cond_expr): Take the address and
401 dereference if the result type is passed by reference.
403 2010-04-11 Eric Botcazou <ebotcazou@adacore.com>
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.
409 2010-04-09 Eric Botcazou <ebotcazou@adacore.com>
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.
449 2010-04-09 Eric Botcazou <ebotcazou@adacore.com>
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
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.
481 2010-04-08 Eric Botcazou <ebotcazou@adacore.com>
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
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.
519 2010-04-07 Eric Botcazou <ebotcazou@adacore.com>
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
531 2010-04-07 Eric Botcazou <ebotcazou@adacore.com>
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.
536 2010-04-07 Eric Botcazou <ebotcazou@adacore.com>
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.
544 2010-03-10 Eric Botcazou <ebotcazou@adacore.com>
546 * gcc-interface/Makefile.in (SPARC/Solaris): Use sparcv8plus.
548 2010-02-27 Eric Botcazou <ebotcazou@adacore.com>
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.
555 2010-01-28 Pascal Obry <obry@adacore.com>
557 * s-win32.ads: Add some missing constants.
559 2010-01-28 Vincent Celier <celier@adacore.com>
561 * prj-attr-pm.adb (Add_Attribute): Do nothing if To_Package is
564 2010-01-28 Robert Dewar <dewar@adacore.com>
566 * gnat_rm.texi: Minor correction
568 2010-01-27 Pascal Obry <obry@adacore.com>
570 * g-awk.adb: ensure that an AWK session is reusable.
572 2010-01-27 Vasiliy Fofanov <fofanov@adacore.com>
574 * g-regist.adb (For_Every_Key): Fix previous change.
577 2010-01-27 Thomas Quinot <quinot@adacore.com>
579 * lib-writ.ads: Current version of spec for new N (note) ALI lines
581 2010-01-27 Yannick Moy <moy@adacore.com>
583 * a-cdlili.adb (Insert): Correct exception message when cursor
584 designates wrong list.
586 2010-01-27 Vincent Celier <celier@adacore.com>
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").
592 2010-01-27 Robert Dewar <dewar@adacore.com>
594 * sem_prag.adb, par-prag.adb, snames.ads-tmpl: pragma Dimension initial
596 * exp_disp.adb: Minor reformatting
598 2010-01-27 Tristan Gingold <gingold@adacore.com>
600 * seh_init.c: Use __ImageBase instead of _ImageBase.
602 2010-01-27 Javier Miranda <miranda@adacore.com>
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).
608 2010-01-27 Sergey Rybin <rybin@adacore.com>
610 * gnat_rm.texi, gnat_ugn.texi: Update gnatcheck doc.
612 2010-01-27 Robert Dewar <dewar@adacore.com>
614 * sinput.ads, sinput.adb (Sloc_Range): Applies to all nodes, formal
615 changed from Expr to N.
617 2010-01-26 Thomas Quinot <quinot@adacore.com>
619 * gnat_ugn.texi: Adjust documentation of -gnatz switches.
620 * usage.adb: Replace line for -gnatz with two lines for -gnatzc and
623 2010-01-26 Vincent Celier <celier@adacore.com>
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
635 2010-01-26 Ed Schonberg <schonberg@adacore.com>
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.
640 2010-01-26 Robert Dewar <dewar@adacore.com>
642 * par_sco.adb (Traverse_Declarations_Or_Statements): Only generate
643 decisions for pragmas Assert, Check, Precondition, Postcondition if
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.
649 2010-01-26 Thomas Quinot <quinot@adacore.com>
651 * switch-c.adb: Fix handling of -gnatz*
653 2010-01-26 Robert Dewar <dewar@adacore.com>
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
659 2010-01-26 Robert Dewar <dewar@adacore.com>
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
669 2010-01-26 Robert Dewar <dewar@adacore.com>
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.
677 2010-01-26 Robert Dewar <dewar@adacore.com>
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.
683 2010-01-26 Robert Dewar <dewar@adacore.com>
685 * par_sco.adb (Traverse_Declarations_Or_Statements): Add processing for
688 2010-01-26 Robert Dewar <dewar@adacore.com>
690 * par_sco.adb (Is_Logical_Operator): Exclude AND/OR/XOR
691 * scos.ads: Clarify handling of logical operators
693 2010-01-26 Arnaud Charlet <charlet@adacore.com>
695 * s-tpoben.adb: Update comments.
697 2010-01-26 Robert Dewar <dewar@adacore.com>
699 * freeze.adb (Set_Small_Size): Don't set size if alignment clause
702 2010-01-26 Robert Dewar <dewar@adacore.com>
704 * scos.ads: Clean up documentation, remove obsolete XOR references
705 2010-01-26 Vincent Celier <celier@adacore.com>
707 * gnat_ugn.texi: Complete documentation on the restrictions for
708 combined options in -gnatxxx switches.
711 2010-01-26 Arnaud Charlet <charlet@adacore.com>
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.
717 2010-01-26 Vincent Celier <celier@adacore.com>
719 * prj-conf.adb (Get_Config_Switches): Check for a default language for
720 a project extending a project with no languages.
722 2010-01-26 Vincent Celier <celier@adacore.com>
724 * switch-c.adb (Scan_Front_End_Switches): Take into account options
726 Allow -gnateG to be followed by other options.
728 2010-01-26 Robert Dewar <dewar@adacore.com>
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
734 2010-01-26 Vasiliy Fofanov <fofanov@adacore.com>
736 * g-regist.adb, g-regist.ads (For_Every_Key): New generic procedure
737 that allows to iterate over all subkeys of a key.
739 2010-01-26 Ed Falis <falis@adacore.com>
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.
745 2010-01-25 Bob Duff <duff@adacore.com>
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.
752 2010-01-25 Robert Dewar <dewar@adacore.com>
754 * g-sercom.ads, gnatcmd.adb, gnatlink.adb, a-ststio.adb, exp_ch6.adb,
755 exp_ch9.adb, g-sechas.ads: Minor reformatting.
757 2010-01-25 Thomas Quinot <quinot@adacore.com>
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.
763 2010-01-25 Ed Falis <falis@adacore.com>
765 * sysdep.c, init.c: Adapt to support full run-time on VxWorks MILS.
767 2010-01-25 Vincent Celier <celier@adacore.com>
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
776 2010-01-25 Ed Schonberg <schonberg@adacore.com>
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.
783 2010-01-25 Bob Duff <duff@adacore.com>
785 * sinfo.ads: Minor comment fixes.
787 2010-01-25 Bob Duff <duff@adacore.com>
789 * exp_ch4.adb, exp_aggr.adb: Minor comment fixes and code clean up.
791 2010-01-25 Arnaud Charlet <charlet@adacore.com>
793 * gnatvsn.ads (Current_Year): Update.
795 2010-01-25 Florian Villoing <villoing@adacore.com>
797 * gnat_ugn.texi: Fix typo.
799 2010-01-25 Thomas Quinot <quinot@adacore.com>
801 * scos.ads: Update specification.
803 2010-01-25 Ed Schonberg <schonberg@adacore.com>
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.
809 2010-01-25 Ed Schonberg <schonberg@adacore.com>
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.
815 2010-01-25 Vincent Celier <celier@adacore.com>
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
823 2010-01-25 Ed Schonberg <schonberg@adacore.com>
825 * sem_prag.adb: More flexible pragma Annotate.
827 2010-01-22 Eric Botcazou <ebotcazou@adacore.com>
829 * system-linux-armel.ads (Stack_Check_Probes): Set to True.
830 * system-linux-armeb.ads (Stack_Check_Probes): Likewise.
832 2010-01-18 Eric Botcazou <ebotcazou@adacore.com>
834 * gcc-interface/utils.c (create_var_decl_1): Fix formatting nits.
836 2010-01-18 Jan Hubicka <jh@suse.cz>
839 * gcc-interface/utils.c (create_var_decl_1): Do not set COMMON flag for
840 unit local variables.
842 2010-01-17 Laurent GUERBY <laurent@guerby.net>
844 * gcc-interface/Makefile.in: Fix typo in arm*-*-linux-gnueabi.
846 2010-01-11 Mikael Pettersson <mikpe@it.uu.se>
848 * gcc-interface/Makefile.in: Add arm*-*-linux-gnueabi.
849 * system-linux-armeb.ads, system-linux-armel.ads: New files.
851 2010-01-09 Simon Wright <simon@pushface.org>
854 * gcc-interface/Makefile.in (gnatlib-shared-darwin): Add missing
859 Copyright (C) 2010 Free Software Foundation, Inc.
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.