gcc/ada/ChangeLog

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