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.