gcc/fortran/ChangeLog

   1 2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
   2
   3         * trans-array.c (gfc_trans_preloop_setup): Use loop's dimension instead
   4         of array's dimention. Check that it is indeed the same.
   5
   6 2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
   7
   8         * trans-array.c (gfc_trans_preloop_setup): Remove redundant assertion.
   9         Special case outermost loop.
  10
  11 2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
  12
  13         * trans-array.c (gfc_trans_preloop_setup): Factor loop index
  14         initialization.
  15
  16 2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
  17
  18         * trans-array.c (gfc_trans_preloop_setup): Move code earlier.
  19
  20 2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
  21
  22         * trans-array.c (gfc_trans_preloop_setup): Move array reference
  23         initialisation earlier. Factor subsequent array references.
  24
  25 2011-11-02  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
  26
  27         * Makef-lang.in (gfortranspec.o): Pass SHLIB instead of SHLIB_LINK.
  28
  29 2011-10-30  Steven G. Kargl  <kargl@gcc.gnu.org>
  30
  31         PR fortran/50573
  32         * check.c (gfc_check_dshift): Update argument checking for BOZ.
  33         Update checking SHIFT against BITSIZE of I or J.
  34         * intrinsic.texi: Update docs for DSHIFTL and DSHIFTR.
  35
  36 2011-10-28  Steven G. Kargl  <kargl@gcc.gnu.org>
  37
  38         * check.c (gfc_check_atan_2): Typo in comment.
  39         (gfc_check_nearest): If 's' is constant, check that it is not 0.
  40         * simplify.c (simplify_dshift, gfc_simplify_ibclr, gfc_simplify_ibits,
  41         gfc_simplify_ibset, simplify_shift, gfc_simplify_ishftc,
  42         gfc_simplify_nearest): Remove dead code.
  43
  44 2011-10-23  Steven G. Kargl  <kargl@gcc.gnu.org>
  45
  46         * simplify.c (simplify_transformation_to_array): Fix memory leak.
  47
  48 2011-10-20  Steven G. Kargl  <kargl@gcc.gnu.org>
  49
  50         PR fortran/50821
  51         * check.c (gfc_check_ishftc): Check args are constant before
  52         extracting the integer.
  53
  54 2011-10-20  Steven G. Kargl  <kargl@gcc.gnu.org>
  55
  56         PR fortran/50514
  57         * check.c (less_than_bitsize1): Check |shift| <= bit_size(i).
  58         (gfc_check_ishftc):  Check |shift| <= bit_size(i) and check
  59         that size is positive.
  60
  61 2011-10-20  Steven G. Kargl  <kargl@gcc.gnu.org>
  62
  63         PR fortran/50524
  64         * resolve.c (resolve_ref): Check return value of resolve_substring().
  65
  66 2011-10-20  Steven G. Kargl  <kargl@gcc.gnu.org>
  67
  68         * io.c (match_dt_format): Match a user-defined operator or a kind
  69         type prefixed string.
  70
  71 2011-10-19  Janus Weil  <janus@gcc.gnu.org>
  72
  73         PR fortran/47023
  74         * check.c (gfc_check_sizeof): Reject procedures as argument of SIZEOF.
  75         * intrinsinc.texi (SIZEOF): Document it.
  76         (STORAGE_SIZE): Fix special characters. Fix line breaks.
  77
  78 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
  79
  80         PR fortran/50420
  81         * trans.c (gfc_build_array_ref): If type is not an array, check that
  82         there is nothing to do, and do nothing.
  83
  84 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
  85
  86         PR fortran/50420
  87         * trans-types.c (gfc_build_array_type): Don't force lower bound to one
  88         in the deferred case.
  89
  90 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
  91
  92         PR fortran/50420
  93         * simplify.c (simplify_cobound): Accept non-last-in-ref-chain coarrays.
  94         Don't set already set array ref.
  95
  96 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
  97
  98         * array.c (gfc_find_array_ref): Remove coarray-specific handling.
  99
 100 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 101
 102         PR fortran/50420
 103         * check.c (dim_corank_check): Use gfc_get_corank to get corank.
 104
 105 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 106
 107         PR fortran/50420
 108         * trans-intrinsic.c (walk_coarray): Change AR_ELEMENT to AR_SECTION.
 109
 110         PR fortran/50420
 111         * trans-intrinsic.c (walk_coarray): Use gfc_walk_array_ref for
 112         the scalarization chain initialization.
 113
 114 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 115
 116         PR fortran/50420
 117         * trans-intrinsic.c (walk_coarray): Allow subreferences after a
 118         coarray object reference.
 119
 120 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 121
 122         PR fortran/50420
 123         * trans-array.c (gfc_walk_array_ref): Allow zero rank arrays
 124         if they are coarrays.
 125
 126 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 127
 128         * trans-array.h (gfc_walk_array_ref): New prototype.
 129         * trans-array.c (gfc_walk_array_ref): New function, containing
 130         all but the beginning of gfc_walk_variable_expr's code.
 131         (gfc_walk_variable_expr): Use gfc_walk_array_ref.
 132
 133 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 134
 135         PR fortran/50420
 136         * trans-array.c (gfc_conv_expr_descriptor): Use loop.dimen instead of
 137         ndim for the descriptor's rank.
 138
 139 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 140
 141         PR fortran/50420
 142         * trans-array.c (gfc_conv_expr_descriptor): Count codimensions starting
 143         from zero, and add then the relevant offset (either ndim or loop.dimen)
 144         depending on context.
 145
 146 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 147
 148         * trans-array.c (gfc_conv_expr_descriptor): Save some horizontal space.
 149
 150 2011-10-18  Mikael Morin  <mikael@gcc.gnu.org>
 151
 152         * trans-array.c (gfc_conv_expr_descriptor): Move ndim initialization
 153         earlier.
 154
 155 2011-10-18  Janus Weil  <janus@gcc.gnu.org>
 156
 157         PR fortran/47023
 158         * decl.c (verify_c_interop_param): Renamed to
 159         'gfc_verify_c_interop_param'. Add error message for polymorphic
 160         arguments.
 161         (verify_c_interop): Renamed to 'gfc_verify_c_interop'. Reject
 162         polymorphic variables.
 163         (verify_bind_c_sym): Renamed 'verify_c_interop'.
 164         * gfortran.h (verify_c_interop,verify_c_interop_param): Renamed.
 165         * check.c (gfc_check_sizeof): Ditto.
 166         * resolve.c (gfc_iso_c_func_interface,resolve_fl_procedure): Ditto.
 167         * symbol.c (verify_bind_c_derived_type): Ditto.
 168
 169 2011-10-15  Tom Tromey  <tromey@redhat.com>
 170             Dodji Seketeli  <dodji@redhat.com>
 171
 172         * cpp.c (print_line, cb_define): Adjust to avoid using internals
 173         of struct line_map.  Use the public API instead.
 174
 175 2011-10-17  Janus Weil  <janus@gcc.gnu.org>
 176
 177         PR fortran/47023
 178         PR fortran/50752
 179         * primary.c (match_kind_param): Avoid segfault.
 180
 181 2011-10-16  Thomas Koenig  <tkoenig@gcc.gnu.org>
 182
 183         * frontend-passes.c (current_ns):  Make static.
 184         (create_var):  Note parent of newly created namespace.
 185         (optimize_namespace):  Don't wak sibling namespaces
 186         if they are EXEC_BLOCK because this is handled...
 187         (gfc_code_walker):  ... here.  Also walk ASSOCIATE lists.
 188
 189 2011-10-16  Janus Weil  <janus@gcc.gnu.org>
 190
 191         PR fortran/47023
 192         * primary.c (match_kind_param): Detect ISO_C_BINDING kinds.
 193         (get_kind): Pass on 'is_iso_c' flag.
 194         (match_integer_constant,match_real_constant,match_logical_constant):
 195         Set 'ts.is_c_interop'.
 196
 197 2011-10-16  Janus Weil  <janus@gcc.gnu.org>
 198
 199         PR fortran/50547
 200         * resolve.c (resolve_formal_arglist): Remove unneeded error message.
 201         Some reshuffling.
 202
 203 2011-10-15  Tobias Burnus  <burnus@net-b.de>
 204
 205         * gfortran.texi (Fortran 2008 status, TS 29113 status,
 206         Further Interoperability of Fortran with C): Update implementation
 207         status, change references from TR 29113 to TS 29113.
 208         * intrinsic.texi (RANK): Change TR 29113 to TS 29113.
 209         * invoke.text (-std=): Ditto, change -std=f2008tr to -std=f2008ts.
 210         * lang.opt (std=): Ditto.
 211         * options.c (gfc_handle_option, set_default_std_flags): Ditto and
 212         change GFC_STD_F2008_TR to GFC_STD_F2008_TS.
 213         * libgfortran.h: Ditto.
 214         * intrinsic.c (add_functions, gfc_check_intrinsic_standard): Ditto.
 215         * decl.c (verify_c_interop_param): Ditto.
 216
 217 2011-10-14  Janus Weil  <janus@gcc.gnu.org>
 218
 219         PR fortran/50570
 220         * expr.c (gfc_check_vardef_context): Don't throw an error on
 221         non-pointer assignments involving an intent(in) pointer dummy.
 222
 223 2011-10-14  Tobias Burnus  <burnus@net-b.de>
 224
 225         PR fortran/50718
 226         * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
 227         for dummy arguments with VALUE attribute.
 228
 229 2011-10-11  Tobias Burnus  <burnus@net-b.de>
 230             Janus Weil  <janus@gcc.gnu.org>
 231
 232         * invoke.texi (-fwhole-file): Update wording since -fwhole-file
 233         is now enabled by default.
 234
 235 2011-10-11  Michael Meissner  <meissner@linux.vnet.ibm.com>
 236
 237         * trans-expr.c (gfc_conv_power_op): Delete old interface with two
 238         parallel arrays to hold standard builtin declarations, and replace
 239         it with a function based interface that can support creating
 240         builtins on the fly in the future.  Change all uses, and poison
 241         the old names.  Make sure 0 is not a legitimate builtin index.
 242         (fill_with_spaces): Ditto.
 243         (gfc_trans_string_copy): Ditto.
 244         (gfc_trans_zero_assign): Ditto.
 245         (gfc_build_memcpy_call): Ditto.
 246         (alloc_scalar_allocatable_for_assignment): Ditto.
 247         * trans-array.c (gfc_trans_array_constructor_value): Ditto.
 248         (duplicate_allocatable): Ditto.
 249         (gfc_alloc_allocatable_for_assignment): Ditto.
 250         * trans-openmp.c (gfc_omp_clause_copy_ctor): Ditto.
 251         (gfc_omp_clause_assign_op): Ditto.
 252         (gfc_trans_omp_atomic): Ditto.
 253         (gfc_trans_omp_do): Ditto.
 254         (gfc_trans_omp_task): Ditto.
 255         * trans-stmt.c (gfc_trans_stop): Ditto.
 256         (gfc_trans_sync): Ditto.
 257         (gfc_trans_allocate): Ditto.
 258         (gfc_trans_deallocate): Ditto.
 259         * trans.c (gfc_call_malloc): Ditto.
 260         (gfc_allocate_using_malloc): Ditto.
 261         (gfc_call_free): Ditto.
 262         (gfc_deallocate_with_status): Ditto.
 263         (gfc_deallocate_scalar_with_status): Ditto.
 264         * f95-lang.c (gfc_define_builtin): Ditto.
 265         (gfc_init_builtin_functions): Ditto.
 266         * trans-decl.c (create_main_function): Ditto.
 267         * trans-intrinsic.c (builtin_decl_for_precision): Ditto.
 268
 269 2011-10-10  Thomas Koenig  <tkoenig@gcc.gnu.org>
 270
 271         PR fortran/50564
 272         * frontend-passes (forall_level):  New variable.
 273         (cfe_register_funcs):  Don't register functions if we
 274         are within a forall loop.
 275         (optimize_namespace):  Set forall_level to 0 before entry.
 276         (gfc_code_walker):  Increase/decrease forall_level.
 277
 278 2011-10-09  Tobias Burnus  <burnus@net-b.de>
 279
 280         PR fortran/50273
 281         * trans-common.c (translate_common): Fix -Walign-commons check.
 282
 283 2011-10-09  Mikael Morin  <mikael.morin@sfr.fr>
 284
 285         * interface.c (check_dummy_characteristics): Count dimensions starting
 286         from one in diagnostic.
 287
 288 2011-10-09  Tobias Burnus  <burnus@net-b.de>
 289
 290         * Make-lang.in (F95_PARSER_OBJS, GFORTRAN_TRANS_DEPS): Add
 291         dependency on iso-c-binding.def and iso-fortran-env.def.
 292         * module.c (import_iso_c_binding_module): Add error when
 293         explicitly importing a nonstandard symbol; extend standard-
 294         depending loading.
 295         * iso-c-binding.def: Add c_float128 and c_float128_complex
 296         integer parameters (for -std=gnu).
 297         * intrinsic.texi (ISO_C_Binding): Document them.
 298         * symbol.c (generate_isocbinding_symbol): Change macros
 299         to ignore GFC_STD_* data.
 300         * trans-types.c (gfc_init_c_interop_kinds): Ditto; make
 301         nonstatic and renamed from "init_c_interop_kinds".
 302         (gfc_init_kinds): Don't call it
 303         * trans-types.h (gfc_init_c_interop_kinds): Add prototype.
 304         * f95-lang.c (gfc_init_decl_processing): Call it.
 305
 306 2011-10-09  Janus Weil  <janus@gcc.gnu.org>
 307
 308         PR fortran/50659
 309         * expr.c (replace_symbol): Only do replacement if the symbol is a dummy.
 310
 311 2011-10-08  Paul Thomas  <pault@gcc.gnu.org>
 312
 313         PR fortran/47844
 314         * trans-array.c (gfc_conv_array_index_offset): Use descriptor
 315         stride for pointer function results.
 316
 317 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 318
 319         * trans-array.c (gfc_conv_expr_descriptor): Remove trailing whitespace.
 320
 321 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 322
 323         * trans-array.c (gfc_conv_ss_startstride): Merge two switch cases.
 324
 325 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 326
 327         * trans-array.c (gfc_conv_section_startstride): Remove coarray argument.
 328         Remove conditions on coarray.
 329         (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.
 330         (gfc_conv_expr_descriptor): Ditto. Add assertions before the call.
 331
 332 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 333
 334         * trans-array.c (gfc_conv_section_startstride): Remove coarray_last
 335         argument. Remove condition on coarray_last.
 336         (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.
 337         (gfc_conv_expr_descriptor): Ditto.
 338
 339 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 340
 341         * trans-array.c (gfc_walk_variable_expr): Remove scalar coarray
 342         handling.  Don't reset array ref's corank and codimensions' types
 343         in the full array ref case.  Update loop upper limit.
 344         Remove DIMEN_THIS_IMAGE case.  Remove unnecessary conditions.
 345
 346 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 347
 348         * trans.h (gfc_ss_info): Remove codimen field.
 349         * trans-array.c (gfc_get_array_ss): Don't set codimen field.
 350         (gfc_trans_create_temp_array): Don't set descriptor's cobounds.
 351         (gfc_trans_constant_array_constructor): Update loop upper limit.
 352         (gfc_conv_ss_startstride): Don't set codimen field.
 353         Don't get descriptor's cobounds.
 354         (gfc_walk_variable_expr): Update dimension index.
 355         * trans-intrinsic.c (trans_this_image, trans_image_index,
 356         conv_intrinsic_cobound): Don't set codimen field
 357
 358 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 359
 360         * trans.h (gfc_loopinfo): Remove codimen field.
 361         * trans-array.c (gfc_set_vector_loop_bounds,
 362         gfc_trans_scalarizing_loops, gfc_conv_loop_setup): Update loop upper
 363         limit.
 364         (gfc_set_loop_bounds_from_array_spec): Ditto. Remove skip on last
 365         codimension.
 366         (gfc_start_scalarized_body): Update loop lower limit.
 367         (gfc_conv_ss_startstride): Don't set loop's codimen field.
 368         (gfc_conv_loop_setup): Remove unnecessary condition.
 369         (gfc_conv_expr_descriptor): Don't use loop's codimen field as corank.
 370
 371 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 372
 373         * trans.h (gfc_ss): Remove data.temp.codimen field.
 374         * trans-array.c (gfc_conv_resolve_dependencies,
 375         gfc_conv_expr_descriptor): Don't set temp's codimen field.
 376
 377 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 378
 379         * resolve.c (resolve_array_ref): Set array_ref's dimen field (and the
 380         associated dimen_type) in the full array ref case.
 381
 382 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 383
 384         * trans-intrinsic.c (walk_coarray): New function.
 385         (convert_element_to_coarray_ref): Move code to walk_coarray. Remove.
 386         (trans-this_image, trans_image_index, conv_intrinsic_cobound):
 387         Use walk_coarray.
 388
 389 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 390
 391         * trans-array.c (gfc_conv_expr_descriptor): Add out-of-the-scalarizer
 392         cobounds evaluation.
 393
 394 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 395
 396         * trans-array.c (gfc_conv_ss_startstride): Support zero rank loop.
 397
 398 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 399
 400         * trans-array.c (gfc_conv_section_startstride): Move code to
 401         evaluate_bound.  Use evaluate_bound.
 402         (evaluate_bound): New function.
 403
 404 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 405
 406         * trans-array.c (gfc_conv_section_startstride): Update assertion to
 407         also accept coarrays.
 408
 409 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 410
 411         * trans-array.c (gfc_conv_section_startstride): Factor common
 412         array ref references.
 413
 414 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 415
 416         * trans-array.c (gfc_conv_expr_descriptor): Use codim instead of
 417         loop.codimen as argument to gfc_get_array_type_bounds.
 418
 419 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 420
 421         * trans-array.h (struct gfc_se): New flag want_coarray.
 422         * trans-intrinsic.c (trans_this_image, trans_image_index,
 423         conv_intrinsic_cobound): Set want_coarray.
 424         * trans_array.c (gfc_conv_expr_descriptor): Evaluate codimension
 425         earlier and without relying on the scalarizer.
 426
 427 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 428
 429         * expr.c (gfc_get_corank): Return 0 if input expression is not a
 430         coarray.
 431
 432 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 433
 434         * trans-array.c (gfc_conv_expr_descriptor): Simplify coarray
 435         descriptor setup code.
 436
 437 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 438
 439         * resolve.c (compare_spec_to_ref): Move coarray ref initialization
 440         code...
 441         (resolve_array_ref): ... here.
 442
 443 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 444
 445         * check.c (is_coarray): Remove.
 446         (coarray_check): Use gfc_is_coarray.
 447
 448 2011-10-07  Janus Weil  <janus@gcc.gnu.org>
 449
 450         PR fortran/50625
 451         * class.c (gfc_build_class_symbol): Fix whitespace.
 452         * module.c (mio_symbol): Set 'class_ok' attribute.
 453         * trans-decl.c (gfc_get_symbol_decl): Make sure the backend_decl has
 454         been built for class symbols.
 455
 456 2011-10-04  Janus Weil  <janus@gcc.gnu.org>
 457
 458         PR fortran/35831
 459         * interface.c (check_dummy_characteristics): Check the array shape.
 460
 461 2011-10-01  Janus Weil  <janus@gcc.gnu.org>
 462
 463         PR fortran/50585
 464         * interface.c (get_expr_storage_size): Check if 'length' component is
 465         associated.
 466
 467 2011-09-29  Janus Weil  <janus@gcc.gnu.org>
 468
 469         PR fortran/50547
 470         * resolve.c (resolve_formal_arglist): Fix pureness check for dummy
 471         functions.
 472
 473         PR fortran/50553
 474         * symbol.c (check_conflict): Forbid TARGET attribute for statement
 475         functions.
 476
 477 2011-09-27  Jakub Jelinek  <jakub@redhat.com>
 478
 479         * trans-types.c (gfc_type_for_size): Return wider type
 480         if no suitable narrower type has been found.
 481         (gfc_type_for_mode): Return NULL_TREE if gfc_type_for_size
 482         returned type doesn't have expected TYPE_MODE.
 483
 484 2011-09-26  Janus Weil  <janus@gcc.gnu.org>
 485
 486         PR fortran/50515
 487         * resolve.c (resolve_common_blocks): Check for EXTERNAL attribute.
 488
 489         PR fortran/50517
 490         * interface.c (gfc_compare_interfaces): Bugfix in check for result type.
 491
 492 2011-09-22  Janus Weil  <janus@gcc.gnu.org>
 493
 494         PR fortran/41733
 495         * expr.c (gfc_check_pointer_assign): Check for nonintrinsic elemental
 496         procedures.
 497         * interface.c (gfc_compare_interfaces): Rename 'intent_flag'. Check
 498         for PURE and ELEMENTAL attributes.
 499         (compare_actual_formal): Remove pureness check here.
 500
 501 2011-09-20  Steven G. Kargl  <kargl@gcc.gnu.org>
 502
 503         * check.c (gfc_check_c_sizeof): Remove redundant word.
 504
 505 2011-09-20  Simon Baldwin  <simonb@google.com>
 506
 507         * module.c (gfc_dump_module): Omit timestamp from output.
 508
 509 2011-09-17  Janus Weil  <janus@gcc.gnu.org>
 510
 511         PR fortran/50403
 512         * symbol.c (gfc_use_derived): Fix coding style.
 513
 514 2011-09-15  Janus Weil  <janus@gcc.gnu.org>
 515
 516         PR fortran/50401
 517         * resolve.c (resolve_transfer): Check if component 'ref' is defined.
 518
 519         PR fortran/50403
 520         * symbol.c (gfc_use_derived): Check if argument 'sym' is defined.
 521
 522 2011-09-14  Tobias Burnus  <burnus@net-b.de>
 523
 524         PR fortran/34547
 525         PR fortran/50375
 526         * check.c (gfc_check_null): Allow allocatables as MOLD to NULL.
 527         * resolve.c (resolve_transfer): Reject NULL without MOLD.
 528         * interface.c (gfc_procedure_use): Reject NULL without MOLD
 529         if no explicit interface is known.
 530         (gfc_search_interface): Reject NULL without MOLD if it would
 531         lead to ambiguity.
 532
 533 2011-09-13  Janus Weil  <janus@gcc.gnu.org>
 534
 535         PR fortran/50379
 536         * symbol.c (check_conflict): Check conflict between GENERIC and RESULT
 537         attributes.
 538
 539 2011-09-11  Thomas Koenig  <tkoenig@gcc.gnu.org>
 540
 541         PR fortran/50327
 542         * frontend-passes.c (dummy_expr_callback):  New function.
 543         (convert_do_while):  New function.
 544         (optimize_namespace):  Call code walker to convert do while loops.
 545
 546 2011-09-11  Janus Weil  <janus@gcc.gnu.org>
 547
 548         PR fortran/35831
 549         PR fortran/47978
 550         * interface.c (check_dummy_characteristics): New function to check the
 551         characteristics of dummy arguments.
 552         (gfc_compare_interfaces,gfc_check_typebound_override): Call it here.
 553
 554 2011-09-08  Mikael Morin  <mikael.morin@sfr.fr>
 555
 556         * trans-array.c (gfc_trans_constant_array_constructor): Remove
 557         superfluous initialisation of DIM field.
 558         (gfc_trans_array_constructor): Assert that DIMEN field is properly set.
 559         (gfc_conv_expr_descriptor): Ditto.
 560         * trans-expr.c (gfc_conv_procedure_call): Ditto.
 561
 562 2011-09-08  Mikael Morin  <mikael.morin@sfr.fr>
 563
 564         * trans-array.h (gfc_get_scalar_ss): New prototype.
 565         * trans-array.c (gfc_get_scalar_ss): New function.
 566         (gfc_walk_variable_expr, gfc_walk_op_expr,
 567         gfc_walk_elemental_function_args): Re-use gfc_get_scalar_ss.
 568         * trans-expr.c (gfc_trans_subarray_assign): Ditto.
 569         (gfc_trans_assignment_1): Ditto.
 570         * trans-stmt.c (compute_inner_temp_size, gfc_trans_where_assign,
 571         gfc_trans_where_3): Ditto.
 572
 573 2011-09-08  Mikael Morin  <mikael.morin@sfr.fr>
 574
 575         * trans-array.h (gfc_get_temp_ss): New prototype.
 576         * trans-array.c (gfc_get_temp_ss): New function.
 577         (gfc_conv_resolve_dependencies): Re-use gfc_get_temp_ss.
 578         (gfc_conv_expr_descriptor): Ditto.
 579         * trans-expr.c (gfc_conv_subref_array_arg): Ditto.
 580
 581 2011-09-08  Mikael Morin  <mikael.morin@sfr.fr>
 582
 583         * trans-array.h (gfc_get_array_ss): New prototype.
 584         * trans-array.c (gfc_get_array_ss): New function.
 585         (gfc_walk_variable_expr, gfc_walk_function_expr,
 586         gfc_walk_array_constructor): Re-use gfc_get_array_ss.
 587         * trans-expr.c (gfc_trans_subarray_assign): Ditto.
 588         * trans-intrinsic.c (gfc_walk_intrinsic_bound,
 589         gfc_walk_intrinsic_libfunc): Ditto.
 590         * trans-io.c (transfer_array_component): Ditto.
 591
 592 2011-09-08  Tobias Burnus  <burnus@net-b.de>
 593
 594         PR fortran/44646
 595         * decl.c (gfc_match_entry, gfc_match_end): Handle COMP_DO_CONCURRENT.
 596         * dump-parse-tree.c (show_code_node): Handle EXEC_DO_CONCURRENT.
 597         * gfortran.h (gfc_exec_op): Add EXEC_DO_CONCURRENT.
 598         * match.c (gfc_match_critical, match_exit_cycle, gfc_match_stopcode,
 599         lock_unlock_statement, sync_statement, gfc_match_allocate,
 600         gfc_match_deallocate, gfc_match_return): Add DO CONCURRENT diagnostic.
 601         (gfc_match_do): Match DO CONCURRENT.
 602         (match_derived_type_spec, match_type_spec, gfc_free_forall_iterator,
 603         match_forall_iterator, match_forall_header, match_simple_forall,
 604         gfc_match_forall): Move up in the file.
 605         * parse.c (check_do_closure, parse_do_block): Handle do concurrent.
 606         * parse.h (gfc_compile_state): Add COMP_DO_CONCURRENT.
 607         * resolve.c (do_concurrent_flag): New global variable.
 608         (resolve_function, pure_subroutine, resolve_branch,
 609         gfc_resolve_blocks, resolve_code, resolve_types): Add do concurrent
 610         diagnostic.
 611         * st.c (gfc_free_statement): Handle EXEC_DO_CONCURRENT.
 612         * trans-stmt.c (gfc_trans_do_concurrent): New function.
 613         (gfc_trans_forall_1): Handle do concurrent.
 614         * trans-stmt.h (gfc_trans_do_concurrent): New function prototype.
 615         * trans.c (trans_code): Call it.
 616         * frontend-passes.c (gfc_code_walker): Handle EXEC_DO_CONCURRENT.
 617
 618 2011-09-07  Janus Weil  <janus@gcc.gnu.org>
 619
 620         PR fortran/48095
 621         * primary.c (gfc_match_structure_constructor): Handle parsing of
 622         procedure pointers components in structure constructors.
 623         * resolve.c (resolve_structure_cons): Check interface of procedure
 624         pointer components. Changed wording of some error messages.
 625
 626 2011-09-04  Janus Weil  <janus@gcc.gnu.org>
 627
 628         PR fortran/50227
 629         * trans-types.c (gfc_sym_type): Check for proc_name.
 630
 631 2011-08-30  Tobias Burnus  <burnus@net-b.de>
 632
 633         PR fortran/45044
 634         * trans-common.c (build_common_decl): Warn if named common
 635         block's size is not everywhere the same.
 636
 637 2011-08-30  Steven G. Kargl  <kargl@gcc.gnu.org>
 638
 639         PR fortran/45170
 640         * trans-stmt.c (gfc_trans_allocate): Evaluate the substring.
 641
 642 2011-08-29  Janus Weil  <janus@gcc.gnu.org>
 643
 644         PR fortran/50225
 645         * trans-decl.c (gfc_generate_function_code): Nullify polymorphic
 646         allocatable function results.
 647
 648 2011-08-29  Tobias Burnus  <burnus@net-b.de>
 649
 650         * trans-decl.c (generate_coarray_sym_init): Use
 651         GFC_CAF_COARRAY_STATIC for static coarrays.
 652
 653 2011-08-28  Dodji Seketeli  <dodji@redhat.com>
 654
 655         * scanner.c (load_file): Don't abuse LC_RENAME reason while
 656         (indirectly) calling linemap_add.
 657
 658 2011-08-26  Jakub Jelinek  <jakub@redhat.com>
 659
 660         * trans-decl.c (get_proc_pointer_decl): Set DECL_TLS_MODEL
 661         if threadprivate.
 662         * symbol.c (check_conflict): Allow threadprivate attribute with
 663         FL_PROCEDURE if proc_pointer.
 664
 665 2011-08-25  Mikael Morin  <mikael@gcc.gnu.org>
 666
 667         PR fortran/50050
 668         * expr.c (gfc_free_shape): Do nothing if shape is NULL.
 669         (free_expr0): Remove redundant NULL shape check.
 670         * resolve.c (check_host_association): Ditto.
 671         * trans-expr.c (gfc_trans_subarray_assign): Assert that shape is
 672         non-NULL.
 673         * trans-io.c (transfer_array_component): Ditto.
 674
 675 2011-08-25  Tobias Burnus  <burnus@net-b.de>
 676
 677         * trans-array.c (gfc_conv_descriptor_token): Add assert.
 678         * trans-decl.c (gfc_build_qualified_array,
 679         create_function_arglist): Handle assumed-shape arrays.
 680         * trans-expr.c (gfc_conv_procedure_call): Ditto.
 681         * trans-types.c (gfc_get_array_descriptor_base): Ditto, don't
 682         add "caf_token" to assumed-shape descriptors, new akind argument.
 683         (gfc_get_array_type_bounds): Pass akind.
 684         * trans.h (lang_decl): New elements caf_offset and token.
 685         (GFC_DECL_TOKEN, GFC_DECL_CAF_OFFSET): New macros.
 686
 687 2011-08-25  Tobias Burnus  <burnus@net-b.de>
 688
 689         * trans-array.c (structure_alloc_comps): Fix for allocatable
 690         scalar coarray components.
 691         * trans-expr.c (gfc_conv_component_ref): Ditto.
 692         * trans-type.c (gfc_get_derived_type): Ditto.
 693
 694 2011-08-24  Tobias Burnus  <burnus@net-b.de>
 695
 696         PR fortran/50163
 697         * expr.c (check_init_expr): Return when an error occured.
 698
 699 2011-08-24  Joseph Myers  <joseph@codesourcery.com>
 700
 701         * Make-lang.in (fortran/cpp.o): Remove explicit compilation rule.
 702
 703 2011-08-23  Tobias Burnus  <burnus@net-b.de>
 704
 705         PR fortran/31600
 706         * symbol.c (gfc_add_type): Better diagnostic if redefining
 707         use-associated symbol.
 708         * module.c (gfc_use_module): Use module name as locus.
 709
 710 2011-08-22  Gabriel Charette  <gchare@google.com>
 711
 712         * cpp.c (gfc_cpp_init): Force BUILTINS_LOCATION for tokens
 713         defined in cpp_define_builtins.
 714
 715 2011-08-22  Mikael Morin  <mikael@gcc.gnu.org>
 716
 717         PR fortran/50050
 718         * gfortran.h (gfc_clear_shape, gfc_free_shape): New prototypes.
 719         * expr.c (gfc_clear_shape, gfc_free_shape): New functions.
 720         (free_expr0): Re-use gfc_free_shape.
 721         * trans-expr.c (gfc_trans_subarray_assign): Ditto.
 722         * trans-io.c (transfer_array_component): Ditto.
 723         * resolve.c (check_host_association): Ditto.
 724         (gfc_expr_to_initialize): Don't force the rank value and free the shape
 725         after updating the expression. Recalculate shape and rank.
 726         (resolve_where_shape): Re-use gfc_clear_shape.
 727         * array.c (gfc_array_ref_shape): Ditto.
 728
 729 2011-08-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
 730
 731         PR fortran/47659
 732         * expr.c (gfc_check_assign): Check for type conversions when the
 733         right-hand side is a constant REAL/COMPLEX contstant the left-hand
 734         side is also REAL/COMPLEX.  Don't warn when a narrowing conversion
 735         for REAL does not change the value of the constant.
 736
 737 2011-08-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
 738
 739         PR fortran/50130
 740         * resolve.c (resolve_array_ref):  Don't calculate upper bound
 741         if the stride is zero.
 742
 743 2011-08-20  Janus Weil  <janus@gcc.gnu.org>
 744
 745         PR fortran/49638
 746         * dependency.c (gfc_dep_compare_expr): Add new result value "-3".
 747         (gfc_check_element_vs_section,gfc_check_element_vs_element): Handle
 748         result value "-3".
 749         * frontend-passes.c (optimize_comparison): Ditto.
 750         * interface.c (gfc_check_typebound_override): Ditto.
 751
 752 2011-08-19  Mikael Morin  <mikael.morin@sfr.fr>
 753
 754         PR fortran/50129
 755         * parse.c (parse_where): Undo changes after emitting an error.
 756
 757 2011-08-19  Jakub Jelinek  <jakub@redhat.com>
 758
 759         PR fortran/49792
 760         * trans-expr.c (gfc_trans_assignment_1): Set OMPWS_SCALARIZER_WS
 761         bit in ompws_flags only if loop.temp_ss is NULL, and clear it if
 762         lhs needs reallocation.
 763         * trans-openmp.c (gfc_trans_omp_workshare): Don't return early if
 764         code is NULL, emit a barrier if workshare emitted no code at all
 765         and NOWAIT clause isn't present.
 766
 767 2011-08-19  Mikael Morin  <mikael.morin@sfr.fr>
 768
 769         PR fortran/50071
 770         * gfortran.h (gfc_exec_op): New constant EXEC_END_NESTED_BLOCK.
 771         * parse.c (check_statement_label): Accept ST_END_BLOCK and
 772         ST_END_ASSOCIATE as valid branch target.
 773         (accept_statement): Change EXEC_END_BLOCK to EXEC_END_NESTED_BLOCK.
 774         Add EXEC_END_BLOCK code in the ST_END_BLOCK and ST_END_ASSOCIATE cases.
 775         * resolve.c (find_reachable_labels): Change EXEC_END_BLOCK to
 776         EXEC_END_NESTED_BLOCK.
 777         (resolve_branch): Ditto.
 778         (resolve_code): Add EXEC_END_NESTED_BLOCK case.
 779         * st.c (gfc_free_statement): Ditto.
 780         * trans.c (trans_code): Ditto.
 781
 782 2011-08-18  Mikael Morin  <mikael.morin@sfr.fr>
 783
 784         PR fortran/50071
 785         * symbol.c (gfc_get_st_label): Use the derived type namespace when
 786         we are parsing a derived type definition.
 787
 788 2011-08-18  Tobias Burnus  <burnus@net-b.de>
 789
 790         PR fortran/18918
 791         * parse.c (parse_derived): Add lock_type
 792         checks, improve coarray_comp handling.
 793         * resolve.c (resolve_allocate_expr,
 794         resolve_lock_unlock, resolve_symbol): Fix lock_type
 795         constraint checks.
 796
 797 2011-08-17  Tobias Burnus  <burnus@net-b.de>
 798
 799         PR fortran/31461
 800         * trans-decl.c (generate_local_decl): Warn about
 801         unused explicitly imported module variables/parameters.
 802
 803 2011-08-17  Janus Weil  <janus@gcc.gnu.org>
 804
 805         PR fortran/50070
 806         * resolve.c (resolve_fl_variable): Reject non-constant character lengths
 807         in COMMON variables.
 808
 809 2011-08-16  Tobias Burnus  <burnus@net-b.de>
 810             Dominique Dhumieres  <dominiq@lps.ens.fr>
 811
 812         PR fortran/50094
 813         * resolve.c (resolve_symbol): Fix stupid typo.
 814
 815 2011-08-15  Tobias Burnus  <burnus@net-b.de>
 816
 817         * resolve.c (resolve_symbol): Fix coarray result-var check.
 818
 819 2011-08-14  Steven G. Kargl  <kargl@gcc.gnu.org>
 820
 821         * module.c (use_iso_fortran_env_module):  Spell 'referrenced' correctly.
 822
 823 2011-08-14  Janus Weil  <janus@gcc.gnu.org>
 824
 825         PR fortran/50073
 826         * decl.c (check_function_name): New function, separated off from
 827         'variable_decl' and slightly extended.
 828         (variable_decl,attr_decl1): Call it.
 829
 830 2011-08-08  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 831
 832         * Make-lang.in (gfortran$(exeext)): Add $(EXTRA_GCC_LIBS).
 833
 834 2011-08-07  Janus Weil  <janus@gcc.gnu.org>
 835             Thomas Koenig  <tkoenig@gcc.gnu.org>
 836
 837         PR fortran/49638
 838         * dependency.c (are_identical_variables): For dummy arguments only
 839         check for equal names, not equal symbols.
 840         * interface.c (gfc_check_typebound_override): Add checking for rank
 841         and character length.
 842
 843 2011-08-07  Janus Weil  <janus@gcc.gnu.org>
 844
 845         PR fortran/49638
 846         * dependency.h (gfc_is_same_range,gfc_are_identical_variables): Remove
 847         two prototypes.
 848         * dependency.c (gfc_are_identical_variables,are_identical_variables):
 849         Renamed the former to the latter and made static.
 850         (gfc_dep_compare_expr): Renamed 'gfc_are_identical_variables', handle
 851         commutativity of multiplication.
 852         (gfc_is_same_range,is_same_range): Renamed the former to the latter,
 853         made static and removed argument 'def'.
 854         (check_section_vs_section): Renamed 'gfc_is_same_range'.
 855         * gfortran.h (gfc_check_typebound_override): New prototype.
 856         * interface.c (gfc_check_typebound_override): Moved here from ...
 857         * resolve.c (check_typebound_override): ... here (and renamed).
 858         (resolve_typebound_procedure): Renamed 'check_typebound_override'.
 859
 860 2011-08-06  Thomas Koenig  <tkoenig@gcc.gnu.org>
 861
 862         PR fortran/50004
 863         * target-memory.c (gfc_target_expr-size): Don't clobber typespec
 864         for derived types.
 865         * simplify.c (gfc_simplify_transfer): Don't calculate source_size
 866         twice.
 867
 868 2011-08-05  Thomas Koenig  <tkoenig@gcc.gnu.org>
 869
 870         PR fortran/37211
 871         * gfortran.h (gfc_calculate_transfer_sizes):  Add prototype.
 872         * target-memory.h (gfc_target_interpret_expr):  Add boolean
 873         argument wether to convert wide characters.
 874         * target-memory.c (gfc_target_expr_size):  Also return length
 875         of characters for non-constant expressions if these can be
 876         determined from the cl.
 877         (interpret_array):  Add argument for gfc_target_interpret_expr.
 878         (gfc_interpret_derived):  Likewise.
 879         (gfc_target_interpret_expr):  Likewise.
 880         * check.c:  Include target-memory.h.
 881         (gfc_calculate_transfer_sizes):  New function.
 882         (gfc_check_transfer):  When -Wsurprising is in force, calculate
 883         sizes and warn if result is larger than size (check moved from
 884         gfc_simplify_transfer).
 885         * simplify.c (gfc_simplify_transfer):  Use
 886         gfc_calculate_transfer_sizes.  Remove warning.
 887
 888 2011-08-04  Richard Guenther  <rguenther@suse.de>
 889
 890         PR fortran/49957
 891         * trans-array.c (add_to_offset): New function.
 892         (gfc_conv_array_ref): Build the array index expression in optimally
 893         associated order.
 894         (gfc_walk_variable_expr): Adjust for the backward walk.
 895
 896 2011-08-02  Daniel Kraft  <d@domob.eu>
 897
 898         PR fortran/49885
 899         * trans-array.c (gfc_trans_auto_array_allocation): Change
 900         gfc_start_block to gfc_init_block to avoid spurious extra-scope.
 901
 902 2011-08-02  Tobias Burnus  <burnus@net-b.de>
 903
 904         * trans-array.c (gfc_array_allocate): Pass token to
 905           gfc_allocate_allocatable for -fcoarray=lib.
 906         * trans-stmt.c (gfc_trans_allocate): Update
 907         gfc_allocate_allocatable call.
 908         * trans.h (gfc_allocate_allocatable): Update prototype.
 909         (gfc_allocate_using_lib): Remove.
 910         * trans.c (gfc_allocate_using_lib): Make static, handle token.
 911         (gfc_allocate_allocatable): Ditto.
 912
 913 2011-08-02  Jakub Jelinek  <jakub@redhat.com>
 914
 915         PR fortran/46752
 916         * cpp.c (cpp_define_builtins): Change _OPENMP to 201107.
 917         * openmp.c (gfc_free_omp_clauses): Free also final_expr.
 918         (OMP_CLAUSE_FINAL, OMP_CLAUSE_MERGEABLE): Define.
 919         (gfc_match_omp_clauses): Handle parsing final and mergeable
 920         clauses.
 921         (OMP_TASK_CLAUSES): Allow final and mergeable clauses.
 922         (gfc_match_omp_taskyield): New function.
 923         (resolve_omp_clauses): Resolve final clause.  Allow POINTERs and
 924         Cray pointers in clauses other than REDUCTION.
 925         (gfc_match_omp_atomic): Match optional
 926         read/write/update/capture keywords after !$omp atomic.
 927         (resolve_omp_atomic): Handle all OpenMP 3.1 atomic forms.
 928         * dump-parse-tree.c (show_omp_node): Handle EXEC_OMP_TASKYIELD,
 929         print final and mergeable clauses.
 930         (show_code_node): Handle EXEC_OMP_TASKYIELD.
 931         * trans-openmp.c (gfc_trans_omp_clauses): Handle final and
 932         mergeable clauses.
 933         (gfc_trans_omp_taskyield): New function.
 934         (gfc_trans_omp_directive): Handle EXEC_OMP_TASKYIELD.
 935         (gfc_trans_omp_atomic): Handle all OpenMP 3.1 atomic forms.
 936         (gfc_omp_clause_copy_ctor): Handle non-allocated allocatable.
 937         (gfc_omp_predetermined_sharing): Adjust comment.
 938         * gfortran.h (gfc_statement): Add ST_OMP_TASKYIELD and
 939         ST_OMP_END_ATOMIC.
 940         (gfc_omp_clauses): Add final_expr and mergeable fields.
 941         (gfc_exec_op): Add EXEC_OMP_TASKYIELD.
 942         (gfc_omp_atomic_op): New enum typedef.
 943         (struct gfc_code): Add ext.omp_atomic.
 944         * trans.c (trans_code): Handle EXEC_OMP_TASKYIELD.
 945         * frontend-passes.c (gfc_code_walker): Also walk final_expr.
 946         * resolve.c (gfc_resolve_blocks, resolve_code): Handle
 947         EXEC_OMP_TASKYIELD.
 948         * st.c (gfc_free_statement): Likewise.
 949         * match.h (gfc_match_omp_taskyield): New prototype.
 950         * parse.c (decode_omp_directive): Handle taskyield directive.
 951         Handle !$omp end atomic.
 952         (case_executable): Add ST_OMP_TASKYIELD case.
 953         (gfc_ascii_statement): Handle ST_OMP_TASKYIELD.
 954         (parse_omp_atomic): Return gfc_statement instead of void.
 955         For !$omp atomic capture parse two assignments instead of
 956         just one and require !$omp end atomic afterwards, for
 957         other !$omp atomic forms just allow !$omp end atomic at the
 958         end.
 959         (parse_omp_structured_block, parse_executable): Adjust
 960         parse_omp_atomic callers.
 961
 962 2011-08-02  Tobias Burnus  <burnus@net-b.de>
 963
 964         * intrinsic.c (OMP_LIB): Updated openmp_version's
 965         value to 201107.
 966         * gfortran.texi (OpenMP): Update ref to OpenMP 3.1.
 967         * intrinsic.texi (OpenMP Modules): Update ref to OpenMP 3.1;
 968         remove deleted omp_integer_kind and omp_logical_kind constants.
 969
 970 2011-07-31  Janus Weil  <janus@gcc.gnu.org>
 971
 972         PR fortran/49112
 973         * resolve.c (resolve_structure_cons): Don't do the full dt resolution,
 974         only call 'resolve_fl_derived0'.
 975         (resolve_typebound_procedures): Resolve typebound procedures of
 976         parent type.
 977         (resolve_fl_derived0): New function, which does a part of the work
 978         for 'resolve_fl_derived'.
 979         (resolve_fl_derived): Call 'resolve_fl_derived0' and do some additional
 980         things.
 981
 982 2011-07-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
 983
 984         PR fortran/48876
 985         * expr.c (gfc_simplify_expr):  If end of a string is less
 986         than zero, set it to zero.
 987
 988 2011-07-28  Jakub Jelinek  <jakub@redhat.com>
 989
 990         PR fortran/31067
 991         * frontend-passes.c (optimize_minmaxloc): New function.
 992         (optimize_expr): Call it.
 993
 994 2011-07-27  Tobias Burnus  <burnus@net-b.de>
 995
 996         PR fortran/45586
 997         * trans-types.c (gfc_get_derived_type): Ensure that pointer
 998         component types are marked as nonrestricted.
 999
1000 2011-07-27  Daniel Carrera  <dcarrera@gmail.com>
1001
1002         PR fortran/49755
1003         * trans.c (gfc_allocate_using_malloc): Change function signature.
1004         Return nothing. New parameter "pointer". Eliminate temorary variables.
1005         (gfc_allocate_using_lib): Ditto.
1006         (gfc_allocate_allocatable): Ditto. Update call to gfc_allocate_using_lib
1007         and gfc_allocate_using_malloc. Do not free and then reallocate a
1008         variable that is already allocated.
1009         (gfc_likely): New function. Basedon gfc_unlikely.
1010         * trans-array.c (gfc_array_init_size): New parameter "descriptor_block".
1011         Instructions to modify the array descriptor are stored in this block
1012         while other instructions continue to be stored in "pblock".
1013         (gfc_array_allocate): Update call to gfc_array_init_size. Move the
1014         descriptor_block so that the array descriptor is only updated if
1015         the array was allocated successfully.
1016         Update calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
1017         * trans.h (gfc_allocate_allocatable): Change function signature.
1018         Function now returns void.
1019         (gfc_allocate_using_lib): Ditto, and new function parameter.
1020         (gfc_allocate_using_malloc): Ditto.
1021         * trans-openmp.c (gfc_omp_clause_default_ctor,
1022         gfc_omp_clause_copy_ctor,gfc_trans_omp_array_reduction): Replace a call
1023         to gfc_allocate_allocatable with gfc_allocate_using_malloc.
1024         * trans-stmt.c (gfc_trans_allocate): Update function calls for
1025         gfc_allocate_allocatable and gfc_allocate_using_malloc.
1026
1027 2011-07-26  Tobias Burnus  <burnus@net-b.de>
1028
1029         * trans-array.c (CAF_TOKEN_FIELD): New macro constant.
1030         (gfc_conv_descriptor_token): New function.
1031         * trans-array.h (gfc_conv_descriptor_token): New prototype.
1032         * trans-types.c (gfc_get_array_descriptor_base): For coarrays
1033         with -fcoarray=lib, append "void *token" to the array descriptor.
1034         (gfc_array_descriptor_base_caf): New static variable.
1035         * trans-expr.c (gfc_conv_procedure_call): Handle token and offset
1036         when passing a descriptor coarray to a nondescriptor dummy.
1037
1038 2011-07-23  Tobias Burnus  <burnus@net-b.de>
1039
1040         * resolve.c (resolve_symbol): Fix coarray var decl check.
1041
1042 2011-07-21  Daniel Carrera  <dcarrera@gmail.com>
1043
1044         * trans.c (gfc_allocate_with_status): Split into two functions
1045         gfc_allocate_using_malloc and gfc_allocate_usig_lib.
1046         (gfc_allocate_using_malloc): The status parameter is now the
1047         actual status rather than a pointer. Code cleanup.
1048         (gfc_allocate_using_lib): Ditto. Add new parametrs errmsg and
1049         errlen. Pass these to the coarray lib.
1050         * trans-openmp.c (gfc_omp_clause_default_ctor): Update calls to
1051         gfc_allocate_allocatable.
1052         (gfc_omp_clause_copy_ctor): Ditto.
1053         (gfc_trans_omp_array_reduction): Ditto.
1054         * trans-stmt.c (gfc_trans_allocate): Ditto. Update call to
1055         gfc_allocate_using_malloc. Pass stat rather than pstat to the allocate
1056         fuctions. If using coarray lib, pass errmsg and errlen to the allocate
1057         functions. Move error checking outside the if (!gfc_array_allocate)
1058         block so that it also affects trees produced by gfc_array_allocate.
1059         * trans-array.c (gfc_array_allocate): Add new parameters errmsg
1060         and errlen. Replace parameter pstat by status. Code cleanup. Update
1061         calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
1062         * trans-array.h (gfc_array_allocate): Update signature of
1063         gfc_array_allocate.
1064
1065 2011-07-21  Steven G. Kargl  <kargl@gcc.gnu.org>
1066
1067         * gfortran.texi: Remove a duplicate word.
1068
1069 2011-07-21  Tobias Burnus  <burnus@net-b.de>
1070
1071         * check.c (gfc_check_present): Allow coarrays.
1072         * trans-array.c (gfc_conv_array_ref): Avoid casting
1073         when a pointer is wanted.
1074         * trans-decl.c (create_function_arglist): For -fcoarray=lib,
1075         handle hidden token and offset arguments for nondescriptor
1076         coarrays.
1077         * trans-expr.c (get_tree_for_caf_expr): New function.
1078         (gfc_conv_procedure_call): For -fcoarray=lib pass the
1079         token and offset for nondescriptor coarray dummies.
1080         * trans.h (lang_type): Add caf_offset tree.
1081         (GFC_TYPE_ARRAY_CAF_OFFSET): New macro.
1082
1083 2011-07-19  Tobias Burnus  <burnus@net-b.de>
1084
1085         * expr.c (gfc_is_coarray): New function.
1086         * gfortran.h (gfc_is_coarray): New prototype.
1087         * interface.c (compare_parameter): Use it.
1088
1089 2011-07-19  Richard Guenther  <rguenther@suse.de>
1090
1091         * trans-expr.c (fill_with_spaces): Use fold_build_pointer_plus.
1092         (gfc_trans_string_copy): Likewise.
1093         * trans-intrinsic.c (gfc_conv_intrinsic_repeat): Likewise.
1094         * trans-types.c (gfc_get_array_descr_info): Likewise.
1095         * trans.c (gfc_build_array_ref): Likewise.
1096
1097 2011-07-19  Janus Weil  <janus@gcc.gnu.org>
1098
1099         PR fortran/49708
1100         * resolve.c (resolve_allocate_expr): Fix diagnostics for pointers.
1101
1102 2011-07-18  Tobias Burnus  <burnus@net-b.de>
1103
1104         * trans-decl.c (gfc_build_qualified_array): Make coarray's
1105         token TYPE_QUAL_RESTRICT.
1106
1107 2011-07-18  Tobias Burnus  <burnus@net-b.de>
1108
1109         * resolve.c (resolve_transfer): Mention defined I/O
1110         in the diagnostic for alloc_comp/pointer_comp.
1111
1112 2011-07-17  Tobias Burnus  <burnus@net-b.de>
1113
1114         PR fortran/34657
1115         * module.c (check_for_ambiguous): Check whether the name is matches
1116         the current program unit.
1117
1118 2011-07-17  Tobias Burnus  <burnus@net-b.de>
1119
1120         PR fortran/49624
1121         * expr.c (gfc_check_pointer_assign): Fix checking for invalid
1122         pointer bounds.
1123
1124 2011-07-16  Tobias Burnus  <burnus@net-b.de>
1125
1126         * expr.c (gfc_ref_this_image): New function.
1127         (gfc_is_coindexed): Use it.
1128         * gfortran.h (gfc_ref_this_image): New prototype.
1129         * resolve.c (resolve_deallocate_expr,
1130         resolve_allocate_expr): Support alloc scalar coarrays.
1131         * trans-array.c (gfc_conv_array_ref, gfc_array_init_size,
1132         gfc_conv_descriptor_cosize, gfc_array_allocate,
1133         gfc_trans_deferred_array): Ditto.
1134         * trans-expr.c (gfc_conv_variable) Ditto.:
1135         * trans-stmt.c (gfc_trans_deallocate): Ditto.
1136         * trans-types.c (gfc_get_element_type, gfc_get_array_type_bounds
1137         gfc_get_array_descr_info): Ditto.
1138         * trans-decl.c (gfc_get_symbol_decl): Ditto.
1139
1140 2011-07-11  Jakub Jelinek  <jakub@redhat.com>
1141
1142         PR fortran/49698
1143         * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Initialize
1144         inner_size to gfc_index_one_node instead of integer_one_node.
1145
1146 2011-07-10  Tobias Burnus  <burnus@net-b.de>
1147
1148         PR fortran/49690
1149         * intrinsic.c (add_functions): Use BT_VOID for 2nd argument of SIGNAL.
1150
1151 2011-07-09  Uros Bizjak  <ubizjak@gmail.com>
1152
1153         PR fortran/48926
1154         * expr.c (gfc_get_corank): Change return value to int.
1155         * gfortran.h (gfc_get_corank): Update function prototype.
1156
1157 2011-07-07  Mikael Morin  <mikael.morin@sfr.fr>
1158
1159         PR fortran/49648
1160         * resolve.c (resolve_symbol): Force resolution of function result's
1161         array specification.
1162
1163 2011-07-07  Tobias Burnus  <burnus@net-b.de>
1164
1165         * trans.c (gfc_allocate_with_status): Call _gfortran_caf_register
1166         with NULL arguments for (new) stat=/errmsg= arguments.
1167
1168 2011-07-06  Daniel Carrera  <dcarrera@gmail.com>
1169
1170         * trans-array.c (gfc_array_allocate): Rename allocatable_array to
1171         allocatable. Rename function gfc_allocate_array_with_status to
1172         gfc_allocate_allocatable_with_status. Update function call for
1173         gfc_allocate_with_status.
1174         * trans-opemp.c (gfc_omp_clause_default_ctor): Rename function
1175         gfc_allocate_array_with_status to gfc_allocate_allocatable_with_status.
1176         * trans-stmt.c (gfc_trans_allocate): Update function call for
1177         gfc_allocate_with_status. Rename function gfc_allocate_array_with_status
1178         to gfc_allocate_allocatable_with_status.
1179         * trans.c (gfc_call_malloc): Add new parameter gfc_allocate_with_status
1180         so it uses the library for memory allocation when -fcoarray=lib.
1181         (gfc_allocate_allocatable_with_status): Renamed from
1182         gfc_allocate_array_with_status.
1183         (gfc_allocate_allocatable_with_status): Update function call for
1184         gfc_allocate_with_status.
1185         * trans.h (gfc_coarray_type): New enum.
1186         (gfc_allocate_with_status): Update prototype.
1187         (gfc_allocate_allocatable_with_status): Renamed from
1188         gfc_allocate_array_with_status.
1189         * trans-decl.c (generate_coarray_sym_init): Use the new constant
1190         GFC_CAF_COARRAY_ALLOC in the call to gfor_fndecl_caf_register.
1191
1192 2011-07-06  Richard Guenther  <rguenther@suse.de>
1193
1194         * f95-lang.c (gfc_init_decl_processing):
1195         Merge calls to build_common_tree_nodes and build_common_tree_nodes_2.
1196
1197 2011-07-04  Jakub Jelinek  <jakub@redhat.com>
1198
1199         PR fortran/49623
1200         * gfortranspec.c (lang_specific_driver): Ignore options with
1201         CL_ERR_MISSING_ARG errors.
1202
1203 2011-07-02  Janus Weil  <janus@gcc.gnu.org>
1204
1205         PR fortran/49562
1206         * expr.c (gfc_check_vardef_context): Handle type-bound procedures.
1207
1208 2011-06-30  Jakub Jelinek  <jakub@redhat.com>
1209
1210         PR fortran/49540
1211         * gfortran.h (gfc_constructor): Add repeat field.
1212         * trans-array.c (gfc_conv_array_initializer): Handle repeat > 1.
1213         * array.c (current_expand): Add repeat field.
1214         (expand_constructor): Copy repeat.
1215         * constructor.c (node_free, node_copy, gfc_constructor_get,
1216         gfc_constructor_lookup): Handle repeat field.
1217         (gfc_constructor_lookup_next, gfc_constructor_remove): New functions.
1218         * data.h (gfc_assign_data_value): Add mpz_t * argument.
1219         (gfc_assign_data_value_range): Removed.
1220         * constructor.h (gfc_constructor_advance): Removed.
1221         (gfc_constructor_lookup_next, gfc_constructor_remove): New prototypes.
1222         * data.c (gfc_assign_data_value): Add REPEAT argument, handle it and
1223         also handle overwriting a range with a single entry.
1224         (gfc_assign_data_value_range): Removed.
1225         * resolve.c (check_data_variable): Adjust gfc_assign_data_value
1226         call.  Use gfc_assign_data_value instead of
1227         gfc_assign_data_value_expr.
1228
1229 2011-06-27  Janus Weil  <janus@gcc.gnu.org>
1230
1231         PR fortran/49466
1232         * trans-array.c (structure_alloc_comps): Make sure sub-components
1233         and extended types are correctly deallocated.
1234
1235 2011-06-21  Andrew MacLeod  <amacleod@redhat.com>
1236
1237         * trans-openmp.c: Add sync_ or SYNC__ to builtin names.
1238         * trans-stmt.c: Add sync_ or SYNC__ to builtin names.
1239         * trans-decl.c: Add sync_ or SYNC__ to builtin names.
1240
1241 2011-06-21  Janus Weil  <janus@gcc.gnu.org>
1242
1243         PR fortran/49112
1244         * class.c (gfc_find_derived_vtab): Make vtab and default initialization
1245         symbols SAVE_IMPLICIT.
1246
1247 2011-06-20  Tobias Burnus  <burnus@net-b.de>
1248
1249         PR fortran/18918
1250         * gfortran.h (gfc_check_vardef_context): Update prototype.
1251         (iso_fortran_env_symbol): Handle derived types.
1252         (symbol_attribute): Add lock_comp.
1253         * expr.c (gfc_check_vardef_context): Add LOCK_TYPE check.
1254         * interface.c (compare_parameter, gfc_procedure_use): Handle
1255         LOCK_TYPE.
1256         (compare_actual_formal): Update
1257         gfc_check_vardef_context call.
1258         * check.c (gfc_check_atomic_def, gfc_check_atomic_ref): Ditto.
1259         * intrinsic.c (check_arglist): Ditto.
1260         * io.c (resolve_tag, gfc_resolve_dt, gfc_resolve_inquire): Ditto.
1261         * iso-fortran-env.def (ISOFORTRAN_LOCK_TYPE): Add.
1262         * intrinsic.texi (ISO_FORTRAN_ENV): Document LOCK_TYPE.
1263         * module.c (mio_symbol_attribute): Handle lock_comp.
1264         (create_derived_type): New function.
1265         (use_iso_fortran_env_module): Call it to handle LOCK_TYPE.
1266         * parse.c (parse_derived): Add constraint check for LOCK_TYPE.
1267         * resolve.c (resolve_symbol, resolve_lock_unlock): Add constraint
1268         checks for LOCK_TYPE.
1269         (gfc_resolve_iterator, resolve_deallocate_expr,
1270         resolve_allocate_expr, resolve_code, resolve_transfer): Update
1271         gfc_check_vardef_context call.
1272         * trans-stmt.h (gfc_trans_lock_unlock): New prototype.
1273         * trans-stmt.c (gfc_trans_lock_unlock): New function.
1274         * trans.c (trans_code): Handle LOCK and UNLOCK.
1275
1276 2011-06-18  Janus Weil  <janus@gcc.gnu.org>
1277
1278         PR fortran/49400
1279         * decl.c (gfc_match_procedure): Allow PROCEDURE declarations inside
1280         BLOCK constructs.
1281
1282 2011-06-17  Janus Weil  <janus@gcc.gnu.org>
1283
1284         PR fortran/48699
1285         * check.c (gfc_check_move_alloc): If 'TO' argument is polymorphic,
1286         make sure the vtab is present.
1287
1288 2011-06-16  Janus Weil  <janus@gcc.gnu.org>
1289
1290         PR fortran/49074
1291         * interface.c (gfc_extend_assign): Propagate the locus from the
1292         assignment to the type-bound procedure call.
1293
1294 2011-06-16  Janus Weil  <janus@gcc.gnu.org>
1295
1296         PR fortran/49417
1297         * module.c (mio_component): Make sure the 'class_ok' attribute is set
1298         for use-associated CLASS components.
1299         * parse.c (parse_derived): Check for 'class_ok' attribute.
1300         * resolve.c (resolve_fl_derived): Ditto.
1301
1302 2011-06-13  Thomas Koenig  <tkoenig@gcc.gnu.org>
1303
1304         * frontend-passes.c (remove_trim):  New function.
1305         (optimize_assignment):  Use it.
1306         (optimize_comparison):  Likewise.  Return correct status
1307         for previous change.
1308
1309 2011-06-12  Tobias Burnus
1310
1311         PR fortran/49324
1312         * trans-expr.c (gfc_trans_assignment_1): Tell
1313         gfc_trans_scalar_assign to also deep-copy RHS nonvariables
1314         with allocatable components.
1315         * trans-array.c (gfc_conv_expr_descriptor): Ditto.
1316
1317 2011-05-11  Thomas Koenig  <tkoenig@gcc.gnu.org>
1318
1319         * frontend-passes.c (optimize_assignment): Follow chains
1320         of concatenation operators to the end for removing trailing
1321         TRIMS for assignments.
1322
1323 2011-06-10  Daniel Carrera  <dcarrera@gmail.com>
1324
1325         * trans-decl.c (gfc_build_builtin_function_decls):
1326         Updated declaration of caf_sync_all and caf_sync_images.
1327         * trans-stmt.c (gfc_trans_sync): Function
1328         can now handle a "stat" variable that has an integer type
1329         different from integer_type_node.
1330
1331 2011-06-09  Richard Guenther  <rguenther@suse.de>
1332
1333         * trans.c (gfc_allocate_array_with_status): Mark error path
1334         as unlikely.
1335
1336 2011-06-08  Tobias Burnus  <burnus@net-b.de>
1337
1338         PR fortran/18918
1339         * gfortran.h (gfc_statement): Add ST_LOCK and ST_UNLOCK.
1340         (gfc_exec_op): Add EXEC_LOCK and EXEC_UNLOCK.
1341         (gfc_code): Add expr4.
1342         * match.h (gfc_match_lock, gfc_match_unlock): New prototypes.
1343         * match.c (gfc_match_lock, gfc_match_unlock,
1344         lock_unlock_statement): New functions.
1345         (sync_statement): Bug fix, avoiding double freeing.
1346         (gfc_match_if): Handle LOCK/UNLOCK statement.
1347         * parse.c (decode_statement, next_statement,
1348         gfc_ascii_statement): Ditto.
1349         * st.c (gfc_free_statement): Handle LOCK and UNLOCK.
1350         * resolve.c (resolve_lock_unlock): New function.
1351         (resolve_code): Call it.
1352         * dump-parse-tree.c (show_code_node): Handle LOCK/UNLOCK.
1353
1354 2011-06-07  Richard Guenther  <rguenther@suse.de>
1355
1356         * f95-lang.c (gfc_init_decl_processing): Do not set
1357         size_type_node or call set_sizetype.
1358
1359 2011-06-05  Tobias Burnus  <burnus@net-b.de>
1360
1361         PR fortran/49255
1362         * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
1363         for F2008.
1364
1365 2011-06-05  Andreas Schmidt  <andreas.schmidt.42@gmx.net>
1366         Thomas Koenig  <tkoenig@gcc.gnu.org>
1367
1368         * dump-parse-tree.c (show_symbol):  Don't dump namespace
1369         for ENTRY to avoid infinite recursion.
1370
1371 2011-06-02  Asher Langton  <langton2@llnl.gov>
1372
1373         PR fortran/49268
1374         * trans-decl.c (gfc_trans_deferred_vars): Treat assumed-size Cray
1375         pointees as AS_EXPLICIT.
1376
1377 2011-06-02  Asher Langton  <langton2@llnl.gov>
1378
1379         PR fortran/37039
1380         * decl.c (variable_decl): Merge current_as before copying to cp_as.
1381
1382 2011-06-02  Steven G. Kargl  <kargl@gcc.gnu.org>
1383
1384         PR fortran/49265
1385         * decl.c (gfc_match_modproc):  Allow for a double colon in a module
1386         procedure statement.
1387         * parse.c ( decode_statement): Deal with whitespace around :: in
1388         gfc_match_modproc.
1389
1390 2011-05-31  Tobias Burnus  <burnus@net-b.de>
1391
1392         PR fortran/18918
1393         * intrinsic.c (klass): Add CLASS_ATOMIC.
1394         (add_subroutines): Add atomic_ref/atomic_define.
1395         * intrinsic.texi (ATOMIC_REF, ATOMIC_DEFINE): Document.
1396         * intrinsic.h (gfc_check_atomic_def, gfc_check_atomic_ref,
1397         gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New prototypes.
1398         * gfortran.h (gfc_isym_id): Add GFC_ISYM_ATOMIC_DEF
1399         and GFC_ISYM_ATOMIC_REF.
1400         (gfc_atomic_int_kind, gfc_atomic_logical_kind): New global vars.
1401         * iresolve.c (gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New
1402         functions.
1403         * check.c (gfc_check_atomic, gfc_check_atomic_def,
1404         gfc_check_atomic_ref): New functions.
1405         * iso-fortran-env.def (ISOFORTRANENV_FILE_ATOMIC_INT_KIND,
1406         ISOFORTRANENV_FILE_ATOMIC_LOGICAL_KIND): Change kind value.
1407         * trans-intrinsic.c (conv_intrinsic_atomic_def,
1408         conv_intrinsic_atomic_ref, gfc_conv_intrinsic_subroutine): New
1409         functions.
1410         (conv_intrinsic_move_alloc) Renamed from
1411         gfc_conv_intrinsic_move_alloc - and made static.
1412         * trans.h (gfc_conv_intrinsic_move_alloc): Remove.
1413         (gfc_conv_intrinsic_subroutine) Add prototype.
1414         * trans.c (trans_code): Call gfc_conv_intrinsic_subroutine.
1415         * trans-types (gfc_atomic_int_kind, gfc_atomic_logical_kind): New
1416         global vars.
1417         (gfc_init_kinds): Set them.
1418
1419 2011-05-31  Tobias Burnus  <burnus@net-b.de>
1420
1421         PR fortran/18918
1422         * trans-array.c (gfc_trans_dummy_array_bias): Handle
1423         cobounds of assumed-shape arrays.
1424
1425 2011-05-31  Tobias Burnus  <burnus@net-b.de>
1426
1427         PR fortran/18918
1428         * resolve.c (resolve_fl_variable): Handle static coarrays
1429         with non-constant cobounds.
1430
1431 2011-05-29  Janus Weil  <janus@gcc.gnu.org>
1432
1433         PR fortran/47601
1434         * module.c (mio_component_ref): Handle components of extended types.
1435         * symbol.c (gfc_find_component): Return is sym is NULL.
1436
1437 2011-05-29  Tobias Burnus  <burnus@net-b.de>
1438
1439         PR fortran/18918
1440         * interface.c (compare_parameter): Add check for passing coarray
1441         to allocatable noncoarray dummy.
1442
1443 2011-05-29  Tobias Burnus  <burnus@net-b.de>
1444             Richard Guenther  <rguenther@suse.de>
1445
1446         PR fortran/18918
1447         * trans-types.c (gfc_get_nodesc_array_type): Don't mess with
1448         the type's TREE_TYPE.
1449         * trans-array.c (gfc_conv_array_ref): Use TYPE_MAIN_VARIANT.
1450         * trans.c (gfc_build_array_ref): Ditto.
1451
1452 2011-05-27  Tobias Burnus  <burnus@net-b.de>
1453
1454         PR fortran/18918
1455         * check.c (gfc_check_associated, gfc_check_null): Add coindexed check.
1456         * match.c (gfc_match_nullify): Ditto.
1457         * resolve.c (resolve_deallocate_expr): Ditto.
1458         * trans-types.c (gfc_get_nodesc_array_type): Don't set restricted
1459         for nonpointers.
1460
1461 2011-05-27  Tobias Burnus  <burnus@net-b.de>
1462
1463         PR fortran/48820
1464         * gfortran.h (gfc_isym_id): Add GFC_ISYM_RANK.
1465         * intrinsic.c (add_functions): Add rank intrinsic.
1466         (gfc_check_intrinsic_standard): Handle GFC_STD_F2008_TR.
1467         * intrinsic.h (gfc_simplify_rank, gfc_check_rank): Add prototypes.
1468         * simplify.c (gfc_simplify_rank): New function.
1469         * intrinsic.texi (RANK): Add description for rank intrinsic.
1470         * check.c (gfc_check_rank): New function.
1471
1472 2011-05-26  Paul Thomas  <pault@gcc.gnu.org>
1473             Thomas Koenig  <tkoenig@gcc.gnu.org>
1474
1475         PR fortran/48955
1476         * trans-expr.c (gfc_trans_assignment_1): GFC_REVERSE_NOT_SET
1477         changed to GFC_ENABLE_REVERSE.
1478         * trans-array.c (gfc_init_loopinfo): GFC_CANNOT_REVERSE changed
1479         to GFC_INHIBIT_REVERSE.
1480         * gfortran.h : Enum gfc_reverse is now GFC_ENABLE_REVERSE,
1481         GFC_FORWARD_SET, GFC_REVERSE_SET and GFC_INHIBIT_REVERSE.
1482         * dependency.c (gfc_dep_resolver): Change names for elements of
1483         gfc_reverse as necessary. Change the logic so that forward
1484         dependences are remembered as well as backward ones. When both
1485         have appeared, force a temporary.
1486
1487 2011-05-26  Tobias Burnus  <burnus@net-b.de>
1488
1489         PR fortran/18918
1490         * trans-array.c (gfc_conv_array_ref): Handle pointer coarrays.
1491         * trans-decl.c (has_coarray_vars, caf_init_block,
1492         gfor_fndecl_caf_register): New file-global variables.
1493         (gfc_finish_var_decl): Make sure that coarrays in main are static.
1494         (gfc_build_qualified_array): Generate coarray token variable.
1495         (gfc_get_symbol_decl): Don't use a static initializer for coarrays.
1496         (gfc_build_builtin_function_decls): Set gfor_fndecl_caf_register.
1497         (gfc_trans_deferred_vars, gfc_emit_parameter_debug_info): Skip for
1498         static coarrays.
1499         (generate_local_decl): Check for local coarrays.
1500         (create_main_function): SYNC ALL before calling MAIN.
1501         (generate_coarray_sym_init): Register static coarray.
1502         (generate_coarray_init): Generate CAF registering constructor
1503         function.
1504         (gfc_generate_function_code): Call it, if needed, do not create
1505         cgraph twice.
1506         (gfc_generate_module_vars, gfc_process_block_locals): Call
1507         generate_coarray_init.
1508         * trans-types.c (gfc_get_nodesc_array_type): Generate pointers for
1509         -fcoarray=lib.
1510         * trans.h (gfor_fndecl_caf_register): New variable.
1511         (lang_type): New element caf_token.
1512         (GFC_TYPE_ARRAY_CAF_TOKEN): New macro.
1513
1514 2011-05-24  Joseph Myers  <joseph@codesourcery.com>
1515
1516         * Make-lang.in (GFORTRAN_D_OBJS): Remove prefix.o.
1517         (gfortran$(exeext)): Use libcommon-target.a.
1518
1519 2011-05-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
1520
1521         * frontend-passes.c (cfe_register_funcs):  Also register
1522         character functions if their charlens are known and constant.
1523         Also register allocatable functions.
1524
1525 2011-05-21  Janus Weil  <janus@gcc.gnu.org>
1526
1527         PR fortran/48699
1528         * match.c (select_type_set_tmp): Make the temporary ALLOCATABLE if the
1529         selector is ALLOCATABLE.
1530
1531 2011-05-20  Janus Weil  <janus@gcc.gnu.org>
1532
1533         PR fortran/48706
1534         * module.c (write_dt_extensions): Do not write extended types which
1535         are local to a subroutine.
1536
1537 2011-05-20  Joseph Myers  <joseph@codesourcery.com>
1538
1539         * Make-lang.in (GFORTRAN_D_OBJS): Remove version.o and intl.o.
1540
1541 2011-05-20  Janne Blomqvist  <jb@gcc.gnu.org>
1542
1543         * gfortran.texi (set_fpe): Update documentation.
1544         * invoke.texi (-ffpe-trap): Likewise.
1545         * libgfortran.h (GFC_FPE_PRECISION): Rename to GFC_FPE_INEXACT.
1546         * options.c (gfc_handle_fpe_trap_option): Handle inexact and make
1547         precision an alias for it.
1548
1549 2011-05-19  Tobias Burnus  <burnus@net-b.de>
1550
1551         PR fortran/18918
1552         * trans-types.c (gfc_get_element_type): Handle scalar coarrays.
1553         (gfc_get_nodesc_array_type): Make a variant-type copy for scalar
1554         coarrays.
1555         * trans.c (gfc_build_array_ref): Return original type not variant
1556         copy for scalar coarrays.
1557         * trans-array.c (gfc_conv_array_ref): Ditto.
1558
1559 2011-05-18  Janus Weil  <janus@gcc.gnu.org>
1560
1561         PR fortran/48700
1562         * trans-intrinsic.c (gfc_conv_intrinsic_move_alloc): Deallocate 'TO'
1563         argument to avoid memory leaks.
1564
1565 2011-05-16  Tobias Burnus  <burnus@net-b.de>
1566
1567         * gfortran.texi (_gfortran_set_options): Add GFC_STD_F2008_TR.
1568         (Fortran 2008 status): Multi-image support for coarrays.
1569         (TR 19113 status): New section.
1570
1571 2011-05-15  Tobias Burnus  <burnus@net-b.de>
1572
1573         PR fortran/18918
1574         actual argument is not an array; rank mismatch is diagnosted later.
1575         * trans-decl.c (gfc_get_symbol_decl, gfc_trans_deferred_vars): Handle
1576         scalar coarrays.
1577         * trans-types.c (gfc_get_array_type_bounds): Ditto.
1578
1579 2011-05-15  Joern Rennecke  <amylaar@spamcop.net>
1580
1581         PR middle-end/46500
1582         * trans-types.c: Include "tm.h".
1583         [0] (c_size_t_size): Remove.
1584
1585 2011-05-15  Janne Blomqvist  <jb@gcc.gnu.org>
1586
1587         PR libfortran/48915
1588         * gfortran.texi (_gfortran_set_options): Even though -fbacktrace
1589         is now the default, the library defaults to backtracing disabled.
1590
1591 2011-05-14  Tobias Burnus  <burnus@net-b.de>
1592
1593         * lang.opt (fdump-core): Re-add as ignored option
1594         for backward compatibility.
1595
1596 2011-05-14  Janne Blomqvist  <jb@gcc.gnu.org>
1597
1598         PR libfortran/48915
1599         * gfortran.texi: Update mixed-language programming section
1600         reflecting the removal of the fdump-core option, and that
1601         -fbacktrace is now enabled by default.
1602
1603 2011-05-14  Thomas Koenig  <tkoenig@gcc.gnu.org>
1604
1605         PR fortran/22572
1606         * frontend-passes.c (cfe_register_funcs):  Also register functions
1607         for potential elimination if the rank is > 0, the shape is unknown
1608         and reallocate on assignment is active.
1609         (create_var):  For rank > 0 functions with unknown shape, create
1610         an allocatable temporary.
1611
1612 2011-05-14  Tobias Burnus  <burnus@net-b.de>
1613
1614         PR fortran/18918
1615         * interface.c (compare_parameter): Skip diagnostic if
1616         actual argument is not an array; rank mismatch is diagnosted later.
1617
1618 2011-05-14  Tobias Burnus  <burnus@net-b.de>
1619
1620         * options.c (gfc_init_options, gfc_post_options): Enable
1621         -fstack-arrays by default if -Ofast is used.
1622         * invoke.texi (-fstack-arrays): Document this.
1623
1624 2011-05-14  Janne Blomqvist  <jb@gcc.gnu.org>
1625
1626         PR libfortran/48915
1627         * gfortran.h (gfc_option_t): Remove flag_dump_core.
1628         * gfortran.texi (GFORTRAN_ERROR_DUMPCORE): Remove section.
1629         (GFORTRAN_ERROR_BACKTRACE): Document that it's enabled by default.
1630         * intrinsic.texi (ABORT): Remove explanation of -fdump-core.
1631         * invoke.texi: Remove -fdump-core, document that -fbacktrace is
1632         enabled by default.
1633         * lang.opt: Remove -fdump-core.
1634         * options.c (gfc_init_options): Make backtrace default to enabled,
1635         remove dump_core.
1636         (gfc_handle_option): Remove OPT_fdump-core.
1637         * trans-decl.c: Pass a 0 to preserve ABI.
1638
1639 2011-05-14  Janne Blomqvist  <jb@gcc.gnu.org>
1640
1641         * gfortran.texi: Remove GFORTRAN_USE_STDERR documentation.
1642
1643 2011-05-13  Tobias Burnus  <burnus@net-b.de>
1644
1645         PR fortran/48972
1646         * io.c (resolve_tag_format, resolve_tag): Make sure
1647         that the string is of default kind.
1648         (gfc_resolve_inquire): Also resolve decimal tag.
1649
1650 2011-05-12  Tobias Burnus  <burnus@net-b.de>
1651
1652         PR fortran/48972
1653         * resolve.c (resolve_intrinsic): Don't resolve module
1654         intrinsics multiple times.
1655
1656 2011-05-11  Tobias Burnus  <burnus@net-b.de>
1657
1658         PR fortran/48889
1659         * expr.c (gfc_is_constant_expr): Use e->value.function.esym
1660         instead of e->symtree->n.sym, if available.
1661
1662 2011-05-07  Eric Botcazou  <ebotcazou@adacore.com>
1663
1664         * f95-lang.c (global_bindings_p): Return bool and simplify.
1665
1666 2011-05-07  Tobias Burnus  <burnus@net-b.de>
1667
1668         PR fortran/18918
1669         PR fortran/48919
1670         * trans.h: Move gfc_init_coarray_decl prototype ...
1671         * gfortran.h: ... to here.
1672         * parse.c (translate_all_program_units): Call gfc_init_coarray_decl.
1673         (gfc_parse_file): Update translate_all_program_units call.
1674         * trans-decl.c (gfc_init_coarray_decl): Fix variable declaration,
1675         new argument whether DECL_EXTERNAL should be used.
1676         (create_main_function): Update gfc_init_coarray_decl call.
1677         * trans-intrinsic.c (trans_this_image, trans_image_index,
1678         conv_intrinsic_cobound): Ditto.
1679
1680 2011-05-06  Tobias Burnus  <burnus@net-b.de>
1681
1682         PR fortran/18918
1683         * trans-array.c (gfc_walk_variable_expr): Continue walking
1684         for scalar coarrays.
1685         * trans-intrinsic.c (convert_element_to_coarray_ref): New function.
1686         (trans_this_image, trans_image_index, conv_intrinsic_cobound): Use it.
1687         (trans_this_image): Fix algorithm.
1688         * trans-types.c (gfc_get_element_type, gfc_get_array_descriptor_base,
1689         gfc_sym_type): Handle scalar coarrays.
1690
1691 2011-05-06  Tobias Burnus  <burnus@net-b.de>
1692
1693         PR fortran/48858
1694         PR fortran/48820
1695         * lang.opt (std=f2008tr): New.
1696         * libgfortran.h (GFC_STD_F2008_TR): New macro constant.
1697         * decl.c (verify_c_interop_param): Allow OPTIONAL in BIND(C)
1698         procedures for -std=f2008tr/gnu/legacy.
1699         (gfc_match_import): Set sym to NULL.
1700         * options.c (set_default_std_flags,gfc_handle_option): Handle
1701         -std=f2008tr.
1702         * invoke.texi (-std=): Document -std=f2008tr.
1703
1704 2011-05-05  Nathan Froyd  <froydnj@codesourcery.com>
1705
1706         * trans-decl.c (gfc_trans_entry_master_switch): Call build_case_label.
1707         * trans-io.c (add_case): Likewise.
1708         * trans-stmt.c (gfc_trans_integer_select): Likewise.
1709         (gfc_trans_character_select): Likewise.
1710
1711 2011-05-05  Eric Botcazou  <ebotcazou@adacore.com>
1712
1713         * trans-decl.c (trans_function_start): Do not set
1714         dont_save_pending_sizes_p.
1715
1716 2011-05-04  Nathan Froyd  <froydnj@codesourcery.com>
1717
1718         * trans.h (gfc_chainon_list): Delete.
1719         * trans.c (gfc_chainon_list): Delete.
1720
1721 2011-05-04  Tobias Burnus  <burnus@net-b.de>
1722
1723         PR fortran/48864
1724         * invoke.texi (fno-protect-parens): Document
1725         that -Ofast implies -fno-protect-parens.
1726         * options.c (gfc_init_options, gfc_post_options):
1727         Make -Ofast imply -fno-protect-parens.
1728
1729 2011-05-04  Nathan Froyd  <froydnj@codesourcery.com>
1730
1731         * trans-decl.c (build_library_function_decl_1): Call
1732         build_function_type_vec.  Adjust argument list building accordingly.
1733         * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl): Likewise.
1734         * trans-types.c (gfc_get_function_type): Likewise.
1735
1736 2011-05-04  Richard Guenther  <rguenther@suse.de>
1737
1738         * trans-array.c (gfc_trans_array_constructor_value): Use
1739         size_int for bounds of range types.
1740         (gfc_trans_array_constructor_value): Use size_type_node
1741         for memcpy argument.
1742         * trans-common.c (build_field): Use gfc_charlen_type_node
1743         for lengths.
1744         * trans-openmp.c (gfc_trans_omp_clauses): Do not pass NULL
1745         as type to build_int_cst.
1746         * trans-const.c (gfc_build_string_const): Use size_int
1747         for bounds of range types.
1748         (gfc_build_wide_string_const): Likewise.
1749         * trans-stmt.c (gfc_trans_label_assign): Use gfc_charlen_type_node
1750         for lengths.
1751         (gfc_trans_character_select): Likewise.
1752         (gfc_trans_character_select): Do not pass NULL
1753         as type to build_int_cst.
1754         (gfc_trans_character_select): Use size_int for bounds of range types.
1755         * trans-io.c (gfc_build_io_library_fndecls): Likewise.
1756         (add_case): Do not pass NULL as type to build_int_cst.
1757         (transfer_expr): Likewise.
1758         (transfer_array_desc): Likewise.
1759         * trans-decl.c (gfc_add_assign_aux_vars): Use gfc_charlen_type_node
1760         for lengths.
1761         (gfc_trans_assign_aux_var): Likewise.
1762         (create_main_function): Use size_int for bounds of range types.
1763         * trans-intrinsic.c (gfc_conv_intrinsic_minmax_char): Do not pass
1764         NULL as type to build_int_cst.
1765         (gfc_conv_intrinsic_spacing): Likewise.
1766         (gfc_conv_intrinsic_rrspacing): Likewise.
1767         (gfc_conv_intrinsic_len): Use gfc_charlen_type_node for lengths.
1768
1769 2011-05-04  Richard Guenther  <rguenther@suse.de>
1770
1771         * trans-types.c (gfc_get_array_type_bounds): Remove zero notrunc
1772         argument to int_const_binop.
1773
1774 2011-05-03  Tobias Burnus  <burnus@net-b.de>
1775
1776         PR fortran/18918
1777         * trans-intrinsic.c (trans_this_image): Implement version with
1778         coarray argument.
1779         (conv_intrinsic_cobound): Simplify code.
1780         (gfc_conv_intrinsic_function): Call trans_this_image for
1781         this_image(coarray) except for -fcoarray=single.
1782
1783 2011-05-02  Steven G. Kargl  <kargl@gcc.gnu.org>
1784
1785         PR fortran/48720
1786         * gfortran.texi: Document the 'Q' exponent-letter extension.
1787         * invoke.texi: Document -Wreal-q-constant.
1788         * lang.opt: Add -Wreal-q-constant option.
1789         * gfortran.h: Add warn_real_q_constant to option struct.
1790         * primary.c (match_real_constant):  Use it.  Accept 'Q' as
1791         exponent-letter for REAL(16) real-literal-constant with a
1792         fallback to REAL(10) or error if REAL(10) is not available.
1793         * options.c (gfc_init_options, set_Wall) Set it.
1794         (gfc_handle_option): Handle new option.
1795
1796 2011-04-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
1797
1798         * dump-prase-tree.c (show_code_node):  Set the current
1799         namespace to the BLOCK before displaying it; restore
1800         afterwards.
1801
1802 2011-04-30  Tobias Burnus  <burnus@net-b.de>
1803
1804         PR fortran/48821
1805         * decl.c (gfc_match_import): Don't try to find the
1806         symbol if already found.
1807
1808 2011-04-30  Paul Thomas  <pault@gcc.gnu.org>
1809
1810         PR fortran/48746
1811         * trans-expr.c (fcncall_realloc_result): Set the bounds and the
1812         offset so that the lbounds are one.
1813         (gfc_trans_arrayfunc_assign): Add rank to arguments of above.
1814
1815 2011-04-29  Paul Thomas  <pault@gcc.gnu.org>
1816
1817         PR fortran/48462
1818         * trans-expr.c (arrayfunc_assign_needs_temporary): Deal with
1819         automatic reallocation when the lhs is a target.
1820
1821         PR fortran/48746
1822         * trans-expr.c (fcncall_realloc_result): Make sure that the
1823         result dtype field is set before the function call.
1824
1825 2011-04-29  Tobias Burnus  <burnus@net-b.de>
1826
1827         PR fortran/48810
1828         * resolve.c (resolve_typebound_generic_call): Don't check access
1829         flags of the specific function.
1830
1831         PR fortran/48800
1832         * resolve.c (resolve_formal_arglist): Don't change AS_DEFERRED
1833         to AS_ASSUMED_SHAPE for function results.
1834         (resolve_fl_var_and_proc): Print also for function results with
1835         AS_DEFERRED an error, if they are not a pointer or allocatable.
1836         (resolve_types): Make sure arguments of procedures in interface
1837         blocks are resolved.
1838
1839 2011-04-29  Michael Matz  <matz@suse.de>
1840
1841         * options.c (options.c): Set warn_maybe_uninitialized.
1842
1843 2011-04-28  Tobias Burnus  <burnus@net-b.de>
1844
1845         PR fortran/48112
1846         * resolve.c (resolve_fl_var_and_proc): Print diagnostic of
1847         function results only once.
1848         (resolve_symbol): Always resolve function results.
1849
1850         PR fortran/48279
1851         * expr.c (gfc_check_vardef_context): Fix handling of generic
1852         EXPR_FUNCTION.
1853         * interface.c (check_interface0): Reject internal functions
1854         in generic interfaces, unless -std=gnu.
1855
1856 2011-04-27  Tobias Burnus  <burnus@net-b.de>
1857
1858         PR fortran/48788
1859         * resolve.c (resolve_global_procedure): Error recovery -
1860         avoid segfault for (non)character-returning functions.
1861
1862 2011-04-26  Thomas Koenig  <tkoenig@gcc.gnu.org>
1863
1864         * decl.c (gfc_match_end):  Check that the block name starts
1865         with "block@".
1866         * parse.c (gfc_build_block_ns):  Make block names unique by
1867         numbering them.
1868
1869 2011-04-26  Thomas Koenig  <tkoenig@gcc.gnu.org>
1870
1871         * frontend-passes.c (inserted_block):  New variable.
1872         (changed_statement):  Likewise.
1873         (create_var):  Encase statement to be operated on in a BLOCK.
1874         Adjust code insertion for BLOCK.
1875         (cfe_code):  Set inserted_block and changed_statement to NULL.
1876
1877 2011-04-23  Tobias Burnus  <burnus@net-b.de>
1878
1879         PR fortran/18918
1880         * module.c (mio_array_spec): Set as->cotype on reading.
1881         * resolve.c (resolve_allocate_expr): Fix allocating coarray
1882         components.
1883
1884 2011-04-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
1885
1886         PR fortran/48405
1887         * frontend_passes (cfe_register_funcs): Remove workaround for DO
1888         loops.
1889         (gfc_code_walker):  Make sure the pointer to the current
1890         statement doen't change when other statements are inserted.
1891
1892 2011-04-21  Tobias Burnus  <burnus@net-b.de>
1893
1894         PR fortran/18918
1895         * array.c (gfc_match_array_spec): Fix maximal rank(+corank) check.
1896
1897 2011-04-20  Jim Meyering  <meyering@redhat.com>
1898
1899         * expr.c (free_expr0): Remove useless if-before-free.
1900         * gfortranspec.c (lang_specific_pre_link): Likewise.
1901         * interface.c (gfc_extend_expr): Likewise.
1902         * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
1903
1904 2011-04-19  Tobias Burnus  <burnus@net-b.de>
1905
1906         PR fortran/48588
1907         PR fortran/48692
1908
1909         * module.c (fix_mio_expr): Commit created symbol.
1910
1911 2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
1912
1913         * scanner.c (load_file): Use XCNEWVAR instead of xcalloc.
1914
1915 2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
1916
1917         * frontend-passes.c (gfc_run_passes): Use XDELETEVEC instead of
1918         free.
1919
1920 2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
1921
1922         * misc.c (gfc_getmem): Remove function.
1923         * gfortran.h: Remove gfc_getmem prototype. Replace gfc_getmem
1924         usage with XCNEW or XCNEWVEC.
1925         * expr.c (gfc_check_assign_symbol): Replace gfc_getmem usage with
1926         XCNEW or XCNEWVEC.
1927         * options.c (gfc_handle_module_path_options)
1928         (gfc_get_option_string): Likewise.
1929         * resolve.c (gfc_resolve_forall): Likewise.
1930         * simplify.c (simplify_transformation_to_array): Likewise.
1931         * target-memory.c (gfc_target_interpret_expr): Likewise.
1932         * trans-common.c (get_segment_info, copy_equiv_list_to_ns)
1933         (get_init_field): Likewise.
1934         * trans-expr.c (gfc_conv_statement_function): Likewise.
1935         * trans-io.c (nml_full_name): Likewise.
1936         * trans-stmt.c (gfc_trans_forall_1): Likewise.
1937         * scanner.c (load_file): Replace gfc_getmem usage with xcalloc.
1938
1939 2011-04-19  Tobias Burnus  <burnus@net-b.de>
1940
1941         PR fortran/48588
1942         * parse.c (resolve_all_program_units): Skip modules.
1943         (translate_all_program_units): Handle modules.
1944         (gfc_parse_file): Defer code generation for modules.
1945
1946 2011-04-19  Martin Jambor  <mjambor@suse.cz>
1947
1948         * trans-decl.c (gfc_generate_function_code): Call cgraph_create_node
1949         instead of cgraph_get_create_node.
1950
1951 2011-04-18  Jim Meyering  <meyering@redhat.com>
1952
1953         remove now-unused definition of gfc_free
1954         * misc.c (gfc_free): Remove function.
1955         * gfortran.h (gfc_free): Remove its prototype.
1956
1957 2011-04-18  Jim Meyering  <meyering@redhat.com>
1958
1959         convert each use of gfc_free (p) to free (p)
1960         Do that by running this command:
1961           perl -pi -e    's/\bgfc_free ?\(/free (/' \
1962             $(git grep -El '\bgfc_free ?\(')
1963         which also corrects the few uses that lacked a space between
1964         the function name and the open parenthesis.
1965         Manually undo the change to the function definition itself
1966         and its prototype.  They'll be removed next.
1967         * array.c (gfc_free_array_spec, gfc_set_array_spec): s/gfc_free/free/
1968         * constructor.c (node_free): Likewise.
1969         * cpp.c (dump_queued_macros): Likewise.
1970         * data.c (gfc_assign_data_value): Likewise.
1971         * decl.c (free_variable, free_value, gfc_free_data): Likewise.
1972         (gfc_free_data_all, match_old_style_init): Likewise.
1973         (gfc_set_constant_character_len, gfc_free_enum_history, NUM_DECL):
1974         Likewise.
1975         (gfc_match_modproc): Likewise.
1976         * dependency.c (check_section_vs_section): Likewise.
1977         * error.c (gfc_pop_error, gfc_free_error): Likewise.
1978         * expr.c (free_expr0, gfc_free_expr, gfc_free_actual_arglist): Likewise.
1979         (gfc_free_ref_list, gfc_replace_expr, gfc_copy_ref): Likewise.
1980         (find_substring_ref, gfc_simplify_expr, gfc_check_assign_symbol):
1981         Likewise.
1982         * frontend-passes.c (gfc_run_passes, cfe_expr_0): Likewise.
1983         (strip_function_call, optimize_comparison): Likewise.
1984         * interface.c (gfc_free_interface, arginfo, check_interface0): Likewise.
1985         (CHECK_OS_COMPARISON, gfc_extend_assign, gfc_free_formal_arglist):
1986         Likewise.
1987         * intrinsic.c (gfc_intrinsic_done_1, gfc_convert_type_warn): Likewise.
1988         (gfc_convert_chartype): Likewise.
1989         * io.c (gfc_free_open, compare_to_allowed_values, gfc_free_close):
1990         Likewise.
1991         (gfc_free_filepos, gfc_free_dt, gfc_free_inquire): Likewise.
1992         * match.c (gfc_free_iterator, gfc_match_associate): Likewise.
1993         (gfc_free_alloc_list, gfc_free_namelist, gfc_free_equiv_until):
1994         Likewise.
1995         (free_case, gfc_free_forall_iterator): Likewise.
1996         * misc.c: Likewise.
1997         * module.c (free_pi_tree, resolve_fixups, free_rename): Likewise.
1998         (free_true_name, peek_atom, mio_allocated_wide_string): Likewise.
1999         (mio_pool_string, mio_internal_string, mio_gmp_integer): Likewise.
2000         (mio_gmp_real, mio_expr, mio_typebound_proc): Likewise.
2001         (mio_full_typebound_tree, skip_list, load_equiv): Likewise.
2002         (free_written_common, gfc_use_module, gfc_free_use_stmts): Likewise.
2003         * openmp.c (gfc_free_omp_clauses): Likewise.
2004         * options.c (gfc_post_options): Likewise.
2005         * parse.c (select_type_pop, parse_omp_structured_block): Likewise.
2006         * primary.c (gfc_free_structure_ctor_component): Likewise.
2007         * resolve.c (resolve_structure_cons, check_host_association): Likewise.
2008         (gfc_resolve_forall, resolve_equivalence): Likewise.
2009         * scanner.c (gfc_scanner_done_1, gfc_release_include_path): Likewise.
2010         (gfc_define_undef_line, preprocessor_line, include_line): Likewise.
2011         (load_file, gfc_read_orig_filename): Likewise.
2012         * simplify.c (simplify_transformation_to_array): Likewise.
2013         (gfc_simplify_ibits, simplify_shift, gfc_simplify_ishftc, STRING):
2014         Likewise.
2015         (gfc_simplify_compiler_options): Likewise.
2016         * st.c (gfc_free_statement, gfc_free_statements): Likewise.
2017         (gfc_free_association_list): Likewise.
2018         * symbol.c (free_components, gfc_free_st_label, free_st_labels):
2019         Likewise.
2020         (gfc_delete_symtree, gfc_free_symbol, gfc_undo_symbols): Likewise.
2021         (free_old_symbol, gfc_commit_symbols, free_tb_tree): Likewise.
2022         (free_common_tree, free_uop_tree, free_sym_tree): Likewise.
2023         (gfc_free_dt_list, gfc_free_equiv_infos, gfc_free_equiv_lists):
2024         Likewise.
2025         (gfc_free_finalizer, gfc_free_charlen, free_entry_list): Likewise.
2026         (gfc_free_namespace): Likewise.
2027         * trans-array.c (gfc_free_ss, gfc_trans_array_bound_check): Likewise.
2028         (gfc_conv_array_ref, gfc_conv_ss_startstride): Likewise.
2029         (gfc_trans_dummy_array_bias, gfc_conv_array_parameter): Likewise.
2030         * trans-common.c (get_init_field, create_common): Likewise.
2031         * trans-const.c (gfc_build_wide_string_const): Likewise.
2032         (gfc_conv_string_init): Likewise.
2033         * trans-decl.c (gfc_generate_function_code): Likewise.
2034         * trans-expr.c (gfc_conv_substring, gfc_free_interface_mapping):
2035         Likewise.
2036         (SCALAR_POINTER, gfc_conv_statement_function): Likewise.
2037         (gfc_trans_subarray_assign): Likewise.
2038         * trans-intrinsic.c (conv_generic_with_optional_char_arg): Likewise.
2039         * trans-io.c (gfc_trans_io_runtime_check, set_string): Likewise.
2040         (transfer_namelist_element, transfer_array_component): Likewise.
2041         * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
2042         * trans-stmt.c (cleanup_forall_symtrees, gfc_trans_forall_1): Likewise.
2043         * trans.c (trans_runtime_error_vararg, gfc_restore_backend_locus):
2044         Likewise.
2045
2046 2011-04-15  Jim Meyering  <meyering@redhat.com>
2047
2048         gfortran: remove cpp definition of free, ...
2049         in preparation for the s/gfc_free/free/ transformation.
2050         * gfortran.h (free): Remove macro definition that would otherwise
2051         prevent direct use of the function.
2052
2053 2011-04-18  Tobias Burnus  <burnus@net-b.de>
2054
2055         PR fortran/18918
2056         * array.c (gfc_match_array_ref): Check for too many codimensions.
2057         * check.c (gfc_check_image_index): Check number of elements
2058         in SUB argument.
2059         * simplify.c (gfc_simplify_image_index): Remove unreachable checks.
2060
2061 2011-04-18  Tobias Burnus  <burnus@net-b.de>
2062
2063         PR fortran/18918
2064         * iresolve.c (gfc_resolve_image_index): Set ts.type.
2065         * simplify.c (gfc_simplify_image_index): Don't abort if the bounds
2066         are not known at compile time and handle -fcoarray=lib.
2067         * trans-intrinsics.c (gfc_conv_intrinsic_function): Handle
2068         IMAGE_INDEX.
2069         (conv_intrinsic_cobound): Fix comment typo.
2070         (trans_this_image): New function.
2071         * trans-array.c (gfc_unlikely): Move to trans.c.
2072         * trans.c (gfc_unlikely): Function moved from trans-array.c.
2073         (gfc_trans_runtime_check): Use it.
2074         * trans-io.c (gfc_trans_io_runtime_check): Ditto.
2075         * trans.h (gfc_unlikely): Add prototype.
2076
2077 2011-04-18  Paul Thomas  <pault@gcc.gnu.org>
2078
2079         PR fortran/48462
2080         * trans-expr.c (fcncall_realloc_result): Renamed version of
2081         realloc_lhs_bounds_for_intrinsic_call that does not touch the
2082         descriptor bounds anymore but makes a temporary descriptor to
2083         hold the result.
2084         (gfc_trans_arrayfunc_assign): Modify the reference to above
2085         renamed function.
2086
2087 2011-05-17  Tobias Burnus  <burnus@net-b.de>
2088
2089         PR fortran/48624
2090         * trans-decl.c (gfc_get_extern_function_decl): Fix decl
2091         for external procedures with proc arguments.
2092
2093 2011-04-15  Michael Matz  <matz@suse.de>
2094
2095         * trans-array.c (toplevel): Include gimple.h.
2096         (gfc_trans_allocate_array_storage): Check flag_stack_arrays,
2097         properly expand variable length arrays.
2098         (gfc_trans_auto_array_allocation): If flag_stack_arrays create
2099         variable length decls and associate them with their scope.
2100         * gfortran.h (gfc_option_t): Add flag_stack_arrays member.
2101         * options.c (gfc_init_options): Handle -fstack_arrays option.
2102         * lang.opt (fstack-arrays): Add option.
2103         * invoke.texi (Code Gen Options): Document it.
2104         * Make-lang.in (trans-array.o): Depend on GIMPLE_H.
2105
2106 2011-04-15  Tobias Burnus  <burnus@net-b.de>
2107
2108         PR fortran/18918
2109         * trans-intrinsic.c (conv_intrinsic_cobound): Remove unused
2110         code which is also causing an ICE.
2111
2112 2011-04-14  Nathan Froyd  <froydnj@codesourcery.com>
2113
2114         * f95-lang.c (poplevel): Use BLOCK_CHAIN and block_chainon.
2115
2116 2011-04-12  Nathan Froyd  <froydnj@codesourcery.com>
2117
2118         * f95-lang.c (union lang_tree_node): Check for TS_COMMON before
2119         calling TREE_CHAIN.
2120
2121 2011-04-12  Paul Thomas  <pault@gcc.gnu.org>
2122
2123         PR fortran/48360
2124         PR fortran/48456
2125         * trans-array.c (get_std_lbound): For derived type variables
2126         return array valued component lbound.
2127
2128 2011-04-12  Martin Jambor  <mjambor@suse.cz>
2129
2130         * trans-decl.c (gfc_generate_function_code): Call
2131         cgraph_get_create_node instead of cgraph_node.
2132
2133 2011-04-11  Tobias Burnus  <burnus@net-b.de>
2134
2135         PR fortran/18918
2136         * simplify.c (simplify_bound_dim): Exit for
2137         ucobound's last dimension unless -fcoarray=single.
2138         * trans-array (gfc_conv_descriptor_size_1): Renamed from
2139         gfc_conv_descriptor_size, made static, has now from_dim and
2140         to_dim arguments.
2141         (gfc_conv_descriptor_size): Call gfc_conv_descriptor_size.
2142         (gfc_conv_descriptor_cosize): New function.
2143         * trans-array.h (gfc_conv_descriptor_cosize): New prototype.
2144         * trans-intrinsic.c (conv_intrinsic_cobound): Add input_location
2145         and handle last codim of ucobound for when -fcoarray is not "single".
2146
2147 2011-04-08  Thomas Koenig  <tkoenig@gcc.gnu.org>
2148
2149         PR fortran/48448
2150         * gfortran.h (gfc_option_t):  Add warn_function_elimination and
2151         flag_frontend_optimize.
2152         * lang.opt (Wfunction-elimination):  Add.
2153         (ffrontend-optimize):  Add.
2154         * invoke.texi:  Add documentation for -Wfunction-elimination
2155         and -ffrontend-optimize.  Add -faggressive-function-elimination
2156         to list of code generation options.
2157         * frontend-passes.c (gfc_run_passes):  Run optimizations if
2158         flag_frontend_optimize is set.
2159         (warn_function_elimination):  New function.
2160         (cfe_expr_0):  Call it if requested to do so.
2161         * options.c (gfc_init_options):  Initiate warn_function_elimination
2162         and flag_frontend_optimize.
2163         (gfc_post_options):  Set flag_frontend_optimize if not specified
2164         by user, depending on the optimization level.
2165         (gfc_handle_option):  Handle -Wfunction-elimination and
2166         -ffrontend-optimize.
2167
2168 2011-04-06  Tobias Burnus  <burnus@net-b.de>
2169
2170         PR fortran/18918
2171         * trans-intrinsic.c (gfc_conv_intrinsic_function): Fix
2172         call for this_image.
2173
2174 2011-04-05  Nathan Froyd  <froydnj@codesourcery.com>
2175
2176         * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Use
2177         build_function_type_list instead of build_function_type.  Correct
2178         argument order for func_frexp and func_scalbn.
2179
2180 2011-04-05  Duncan Sands  <baldrick@free.fr>
2181
2182         * f95-lang.c (build_builtin_fntypes): Swap frexp parameter types.
2183
2184 2011-04-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
2185
2186         * frontend-passes: (optimize_lexical_comparison): New function.
2187         (optimize_expr): Call it.
2188         (optimize_comparison): Also handle lexical comparison functions.
2189         Return false instad of -2 for unequal comparison.
2190
2191 2011-04-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
2192
2193         PR fortran/48412
2194         * frontend-passes (cfe_expr_0):  Reverse the order of going
2195         through the loops.
2196
2197 2011-04-04  Tobias Burnus  <burnus@net-b.de>
2198             Mikael Morin  <mikael.morin@sfr.fr>
2199
2200         PR fortran/18918
2201         * check.c (is_coarray): Update - because of DIMEN_THIS_IMAGE.
2202         * expr.c (gfc_is_coindexed): Ditto.
2203         * gfortran.h (gfc_array_ref_dimen_type): Add DIMEN_THIS_IMAGE.
2204         * interface.c (compare_parameter): Use gfc_expr_attr and
2205         gfc_is_coindexed.
2206         * resolve.c (check_dimension, compare_spec_to_ref,
2207         resolve_allocate_expr, check_data_variable): Update for
2208         DIMEN_THIS_IMAGE.
2209         * simplify.c (gfc_simplify_lcobound, gfc_simplify_this_image,
2210         gfc_simplify_ucobound): Allow non-constant bounds.
2211         * trans-array.c (gfc_set_loop_bounds_from_array_spec,
2212         gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
2213         gfc_set_vector_loop_bounds, gfc_conv_array_index_offset,
2214         gfc_start_scalarized_body, gfc_trans_scalarizing_loops,
2215         gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
2216         gfc_conv_ss_startstride, gfc_conv_loop_setup,
2217         gfc_trans_array_bounds, gfc_conv_expr_descriptor,
2218         gfc_walk_variable_expr): Handle codimen.
2219         * trans-decl.c (gfc_build_qualified_array): Save cobounds.
2220         * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use arg2.
2221         (conv_intrinsic_cobound): New function.
2222         (gfc_conv_intrinsic_function): Call it.
2223         (gfc_walk_intrinsic_function, gfc_add_intrinsic_ss_code): Handle
2224         ucobound, lcobound, this_image.
2225         * fortran/trans-types.c (gfc_build_array_type): Save cobounds.
2226         (gfc_get_dtype): Honour corank.
2227         (gfc_get_nodesc_array_type): Save corank and codimensions.
2228         (gfc_get_array_type_bounds): Save cobound.
2229         * fortran/trans.h (gfc_ss_info,gfc_loopinfo): Add codimen item.
2230         (gfc_array_kind): Add corank item.
2231         (GFC_TYPE_ARRAY_CORANK): New macro.
2232
2233 2011-04-03  Kai Tietz  <ktietz@redhat.com>
2234
2235         PR middle-end/48422
2236         * Make-lang.in (f95-lang.o): Add some missing dependencies.
2237
2238 2011-04-01  Thomas Koenig  <tkoenig@gcc.gnu.org>
2239
2240         PR fortran/48352
2241         * frontend-passes (cfe_register_funcs):  Don't
2242         register functions if they appear as iterators in DO loops.
2243
2244 2011-03-30  Michael Matz  <matz@suse.de>
2245
2246         PR fortran/47516
2247         * trans-expr.c (realloc_lhs_loop_for_fcn_call): Take loop as parameter,
2248         don't use local variable.
2249         (gfc_trans_arrayfunc_assign): Adjust caller.
2250
2251 2011-03-29  Janus Weil  <janus@gcc.gnu.org>
2252
2253         PR fortran/48095
2254         * decl.c (match_procedure_decl,match_ppc_decl): Set flavor of interface.
2255         * module.c (MOD_VERSION): Bump.
2256         (mio_typespec): Read/write 'interface' field.
2257         * primary.c (match_string_constant,match_logical_constant): Remove
2258         unneeded code.
2259         (match_complex_constant): Make sure to clear the typespec.
2260
2261 2011-03-29  Thomas Koenig  <tkoenig@gcc.gnu.org>
2262
2263         * frontend-passes.c (create_var):  Warn about creating an
2264         array temporary if requested.
2265
2266 2011-03-27  Thomas Koenig  <tkoenig@gcc.gnu.org>
2267
2268         PR fortran/47065
2269         * frontend-passes.c (optimize_trim): Also follow references, except
2270         when they are substring references or array references.
2271
2272 2011-03-27  Tobias Burnus  <burnus@net-b.de>
2273
2274         PR fortran/18918
2275         * gfortran.h (gfc_isym_id): Rename GFC_ISYM_NUMIMAGES to
2276         GFC_ISYM_NUM_IMAGES.
2277         (gfc_fcoarray): Add GFC_FCOARRAY_LIB.
2278         * intrinsic.c (add_functions): Update due to GFC_ISYM_NUM_IMAGES
2279         rename.
2280         * invoke.texi (-fcoarray=): Document "lib" argument.
2281         * iresolve.c (gfc_resolve_this_image): Fix THIS IMAGE().
2282         * libgfortran.h (libgfortran_stat_codes): Add comments.
2283         * options.c (gfc_handle_coarray_option): Add -fcoarray=lib.
2284         * simplify.c (gfc_simplify_num_images, gfc_simplify_this_image):
2285         Handle GFC_FCOARRAY_LIB.
2286         * trans.h (gfc_init_coarray_decl): New prototype.
2287         (gfor_fndecl_caf_init, gfor_fndecl_caf_finalize,
2288         gfor_fndecl_caf_critical, gfor_fndecl_caf_end_critical,
2289         gfor_fndecl_caf_sync_all, gfor_fndecl_caf_sync_images,
2290         gfor_fndecl_caf_error_stop, gfor_fndecl_caf_error_stop_str,
2291         gfort_gvar_caf_num_images, gfort_gvar_caf_this_image):
2292         New global variables.
2293         * trans-decl.c: Declare several CAF functions (cf. above).
2294         (gfc_build_builtin_function_decls): Initialize those.
2295         (gfc_init_coarray_decl): New function.
2296         (create_main_function): Call CAF init/finalize functions.
2297         * trans-intrinsic.c (trans_this_image, trans_num_images): New.
2298         (gfc_conv_intrinsic_function): Call those.
2299         * trans-stmt.c (gfc_trans_stop, gfc_trans_sync, gfc_trans_critical):
2300         Add code for GFC_FCOARRAY_LIB.
2301
2302 2011-03-26  Janus Weil  <janus@gcc.gnu.org>
2303
2304         PR fortran/48291
2305         * class.c (get_unique_hashed_string): Adjust maximum allowable length
2306         for unique type string.
2307
2308 2011-03-25  Kai Tietz  <ktietz@redhat.com>
2309
2310         * scanner.c (preprocessor_line): Use filename_cmp
2311         instead of strcmp.
2312
2313 2011-03-25  Tobias Burnus  <burnus@net-b.de>
2314
2315         PR fortran/48174
2316         PR fortran/45304
2317         * trans-types.c (gfc_get_function_type): Don't use varargs if the
2318         procedure is known to have no arguments.
2319
2320 2011-03-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
2321
2322         PR fortran/22572
2323         * gfortran.h (gfc_option_t) : Add
2324         flag_aggressive_function_elimination.
2325         (gfc_dep_compare_functions):  Add prototype.
2326         * lang.opt: Add faggressive-function-elimination.
2327         * invoke.texi: Document -faggressive-function-elimination.
2328         * frontend_passes (expr_array):  New static variable.
2329         (expr_size):  Likewise.
2330         (expr_count):  Likewise.
2331         (current_code):  Likewise.
2332         (current_ns):  Likewise.
2333         (gfc_run_passes):  Allocate and free space for expressions.
2334         (cfe_register_funcs):  New function.
2335         (create_var):  New function.
2336         (cfc_expr_0):  New function.
2337         (cfe_code):  New function.
2338         (optimize_namespace):  Invoke gfc_code_walker with cfe_code
2339         and cfe_expr_0.
2340         * dependency.c (gfc_dep_compare_functions):  New function.
2341         (gfc_dep_compare_expr):  Use it.
2342         * options.c (gfc_init_options):  Handle
2343         flag_aggressive_function_elimination.
2344         (gfc_handle_option):  Likewise.
2345
2346 2011-03-15  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2347
2348         * arith.c (arith_power): Plug memory leak.
2349
2350 2011-03-12  Janus Weil  <janus@gcc.gnu.org>
2351
2352         PR fortran/48059
2353         * trans-expr.c (gfc_apply_interface_mapping_to_expr): Replace base type
2354         for polymorphic arguments.
2355
2356 2011-03-12  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2357
2358         PR fortran/48054
2359         * intrinsic.texi: Clarify doc of logarithm functions.
2360
2361 2011-03-12  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2362
2363         PR fortran/47552
2364         * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Fix type of
2365         the string length variable.
2366
2367 2011-03-11  Janus Weil  <janus@gcc.gnu.org>
2368
2369         PR fortran/47768
2370         * module.c (ab_attribute,attr_bits): Add AB_PROC_POINTER_COMP.
2371         (mio_symbol_attribute): Handle attribute 'proc_pointer_comp'.
2372
2373 2011-03-06  Paul Thomas  <pault@gcc.gnu.org>
2374             Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2375
2376         PR fortran/47850
2377         * expr.c (gfc_is_constant_expr): Only use gfc_constant_ac if
2378         the expression has an iterator.  Otherwise, iterate through the
2379         array, checking for constant expressions for each element.
2380
2381 2011-03-04  Janne Blomqvist  <jb@gcc.gnu.org>
2382
2383         PR libfortran/47802
2384         * intrinsic.texi: Update CTIME and FDATE documentation.
2385
2386 2011-03-03  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
2387
2388         * invoke.texi (Option Summary, Fortran Dialect Options)
2389         (Preprocessing Options, Runtime Options, Code Gen Options):
2390         Fix vertical list spacing by using @itemx for additinoal
2391         items, empty line before @table.  Fix typos.
2392
2393 2011-02-28  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2394
2395         PR fortran/47894
2396         * intrinsic.texi: Fix doc of the VERIFY intrinsic.
2397
2398 2011-02-26  Tobias Burnus  <burnus@net-b.de>
2399
2400         PR fortran/47846
2401         * trans-stmt.c (gfc_trans_allocate): Fix allocation with
2402         type-spec of deferred-length strings.
2403
2404 2011-02-26  Tobias Burnus  <burnus@net-b.de>
2405
2406         PR fortran/47886
2407         * openmp.c (gfc_resolve_omp_directive): Resolve if()
2408         condition of OpenMP's task.
2409
2410 2011-02-26  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2411
2412         PR fortran/47894
2413         * intrinsic.texi: Fix doc of the VERIFY intrinsic.
2414
2415 2011-02-24  Tobias Burnus  <burnus@net-b.de>
2416
2417         PR fortran/47872
2418         * intrinsic.texi (ALLOCATED, ATAN, BESSEL_JN, BESSEL_YN): Add
2419         multitable for linebreak between different syntax variants.
2420
2421 2011-02-24  Richard Guenther  <rguenther@suse.de>
2422
2423         PR fortran/47839
2424         * f95-lang.c (pushdecl): For externs in non-global scope push
2425         a copy of the decl into the BLOCK.
2426
2427 2011-02-23  Mikael Morin  <mikael@gcc.gnu.org>
2428
2429         PR fortran/40850
2430         * trans.c (gfc_prepend_expr_to_block): New function.
2431         * trans.h (gfc_prepend_expr_to_block): Declare.
2432         * trans-array.c (gfc_conv_array_parameter): Replace
2433         gfc_add_expr_to_block with gfc_prepend_expr_to_block.
2434
2435 2011-02-22  Paul Thomas  <pault@gcc.gnu.org>
2436
2437         PR fortran/45743
2438         * trans-decl.c (gfc_get_extern_function_decl): Don't use the
2439         gsymbol backend_decl if the procedure has a formal argument
2440         that is a procedure.
2441
2442 2011-02-22  Tobias Burnus  <burnus@net-b.de>
2443
2444         PR fortran/41359
2445         * trans-stmt.c (gfc_trans_if_1): Use correct line for
2446         expressions in the if condition.
2447
2448 2011-02-20  Tobias Burnus  <burnus@net-b.de>
2449
2450         PR fortran/47797
2451         * trans-decl.c (gfc_trans_deferred_vars): Use gfc_set_backend_locus and
2452         gfc_restore_backend_locus to have better debug locations.
2453         * trans-array.c (gfc_trans_deferred_array): Ditto.
2454
2455 2011-02-20  Paul Thomas  <pault@gcc.gnu.org>
2456
2457         PR fortran/45077
2458         PR fortran/44945
2459         * trans-types.c (gfc_get_derived_type): Remove code that looks
2460         for decls in gsym and add call to gfc_get_module_backend_decl.
2461         * trans.h : Add prototype for gfc_get_module_backend_decl.
2462         * trans-decl.c (gfc_get_module_backend_decl): New function.
2463         (gfc_get_symbol_decl): Call it.
2464
2465 2011-02-19  Paul Thomas  <pault@gcc.gnu.org>
2466
2467         PR fortran/47348
2468         * trans-array.c (get_array_ctor_all_strlen): Move up in file.
2469         (get_array_ctor_var_strlen): Add block dummy and add call to
2470         get_array_ctor_all_strlen instead of giving up on substrings.
2471         Call gcc_unreachable for default case.
2472         (get_array_ctor_strlen): Add extra argument to in call to
2473         get_array_ctor_var_strlen.
2474
2475 2011-02-18  Janus Weil  <janus@gcc.gnu.org>
2476
2477         PR fortran/47789
2478         * primary.c (gfc_match_structure_constructor): Handle empty parent
2479         types.
2480
2481 2011-02-18  Tobias Burnus
2482
2483         PR fortran/47775
2484         * trans-expr.c (arrayfunc_assign_needs_temporary): Use
2485         esym to check whether the specific procedure returns an
2486         allocatable or pointer.
2487
2488 2011-02-18  Michael Matz  <matz@suse.de>
2489
2490         PR fortran/45586
2491         * gfortran.h (struct gfc_component): Add norestrict_decl member.
2492         * trans.h (struct lang_type): Add nonrestricted_type member.
2493         * trans-expr.c (gfc_conv_component_ref): Search fields with correct
2494         parent type.
2495         * trans-types.c (mirror_fields, gfc_nonrestricted_type): New.
2496         (gfc_sym_type): Use it.
2497
2498 2011-02-18  Janus Weil  <janus@gcc.gnu.org>
2499
2500         PR fortran/47768
2501         * resolve.c (resolve_transfer): Reject variables with procedure pointer
2502         components.
2503
2504 2011-02-18  Janus Weil  <janus@gcc.gnu.org>
2505
2506         PR fortran/47767
2507         * gfortran.h (gfc_check_access): Removed prototype.
2508         (gfc_check_symbol_access): Added prototype.
2509         * module.c (gfc_check_access): Renamed to 'check_access', made static.
2510         (gfc_check_symbol_access): New function, basically a shortcut for
2511         'check_access'.
2512         (write_dt_extensions,write_symbol0,write_generic,write_symtree): Use
2513         'gfc_check_symbol_access'.
2514         (write_operator,write_module): Renamed 'gfc_check_access'.
2515         * resolve.c (resolve_fl_procedure,resolve_fl_derived,
2516         resolve_fl_namelist,resolve_symbol,resolve_fntype): Use
2517         'gfc_check_symbol_access'.
2518
2519 2011-02-16  Janus Weil  <janus@gcc.gnu.org>
2520
2521         PR fortran/47745
2522         * class.c (gfc_build_class_symbol): Set 'class_ok' attribute.
2523         * decl.c (build_sym,attr_decl1): Move setting of 'class_ok' into
2524         'gfc_build_class_symbol'.
2525         (gfc_match_decl_type_spec): Reject unlimited polymorphism.
2526         * interface.c (matching_typebound_op): Check for 'class_ok' attribute.
2527         * match.c (select_type_set_tmp): Move setting of 'class_ok' into
2528         'gfc_build_class_symbol'.
2529         * primary.c (gfc_variable_attr): Check for 'class_ok' attribute.
2530
2531 2011-02-15  Steven G. Kargl  <kargl@gcc.gnu.org>
2532
2533         PR fortran/47633
2534         . simplify.c (gfc_simplify_compiler_version): Fix off-by-one issue.
2535
2536 2011-02-14  Janus Weil  <janus@gcc.gnu.org>
2537
2538         PR fortran/47730
2539         * parse.c (gfc_build_block_ns): Commit 'block@' symbol.
2540
2541 2011-02-14  Janus Weil  <janus@gcc.gnu.org>
2542
2543         PR fortran/47728
2544         * class.c (gfc_build_class_symbol): Give a fatal error on polymorphic
2545         arrays.
2546         * primary.c (gfc_match_varspec): Avoid ICE for invalid class
2547         declaration.
2548
2549 2011-02-14  Janus Weil  <janus@gcc.gnu.org>
2550
2551         PR fortran/47349
2552         * interface.c (get_expr_storage_size): Handle derived-type components.
2553
2554 2011-02-13  Tobias Burnus  <burnus@net-b.de>
2555
2556         PR fortran/47569
2557         * interface.c (compare_parameter): Avoid ICE with
2558         character components.
2559
2560 2011-02-12  Janus Weil  <janus@gcc.gnu.org>
2561
2562         * class.c (gfc_build_class_symbol): Reject polymorphic arrays.
2563         * decl.c (build_sym,build_struct,attr_decl1): Use return value of
2564         'gfc_build_class_symbol'.
2565
2566 2011-02-12  Michael Matz  <matz@suse.de>
2567             Janus Weil  <janus@gcc.gnu.org>
2568             Tobias Burnus  <burnus@net-b.de>
2569
2570         PR fortran/45586
2571         * trans-expr.c (conv_parent_component_references): Avoid unintendent
2572         skipping of parent compounds.
2573
2574 2011-02-11  Tobias Burnus  <burnus@net-b.de>
2575
2576         PR fortran/47550
2577         * resolve.c (resolve_formal_arglist): PURE with VALUE
2578         and no INTENT: Add -std= diagnostics.
2579
2580 2011-02-09  Janus Weil  <janus@gcc.gnu.org>
2581
2582         PR fortran/47352
2583         * resolve.c (resolve_procedure_interface): If interface has a result
2584         variable, copy the typespec and set result pointer to self.
2585
2586 2011-02-09  Janus Weil  <janus@gcc.gnu.org>
2587
2588         PR fortran/47463
2589         * resolve.c (resolve_typebound_subroutine): Remove erroneous line.
2590
2591 2011-02-09  Janus Weil  <janus@gcc.gnu.org>
2592
2593         PR fortran/47637
2594         * trans-decl.c (init_intent_out_dt): Handle CLASS arguments.
2595
2596 2011-02-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2597
2598         * io.c (match_io_element): Do not set dt if not inquire.
2599
2600 2011-02-08  Janus Weil  <janus@gcc.gnu.org>
2601
2602         PR fortran/45290
2603         * expr.c (gfc_check_assign_symbol): Reject pointers as pointer
2604         initialization target.
2605
2606 2011-02-07  Janne Blomqvist  <jb@gcc.gnu.org>
2607             Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
2608
2609         * gfortran.texi (Thread-safety): texinfo styling fixes.
2610         * intrinsic.texi: Likewise.
2611
2612 2011-02-06  Janne Blomqvist  <jb@gcc.gnu.org>
2613
2614         * gfortran.texi (Compiler Characteristics): Add reference to
2615         thread-safety section.
2616
2617 2011-02-06  Janne Blomqvist  <jb@gcc.gnu.org>
2618
2619         * gfortran.texi (Thread-safety): New section.
2620         * intrinsic.texi (EXECUTE_COMMAND_LINE): Mention thread-safety.
2621         (GETENV): Likewise.
2622         (GET_ENVIRONMENT_VARIABLE): Likewise.
2623         (SYSTEM): Likewise.
2624
2625 2011-02-06  Paul Thomas  <pault@gcc.gnu.org>
2626
2627         PR fortran/47592
2628         * trans-stmt.c (gfc_trans_allocate): For deferred character
2629         length allocations with SOURCE, store to the values and string
2630         length to avoid calculating twice.  Replace gfc_start_block
2631         with gfc_init_block to avoid unnecessary contexts and to keep
2632         declarations of temporaries where they should be. Tidy up the
2633         code a bit.
2634
2635 2011-02-05  Janne Blomqvist  <jb@gcc.gnu.org>
2636
2637         PR fortran/42434
2638         * intrinsic.texi (SYSTEM_CLOCK): Update documentation.
2639
2640 2011-02-02  Janus Weil  <janus@gcc.gnu.org>
2641             Paul Thomas  <pault@gcc.gnu.org>
2642
2643         PR fortran/47082
2644         * trans-expr.c (gfc_trans_class_init_assign): Add call to
2645         gfc_get_derived_type.
2646         * module.c (read_cleanup): Do not use unique_symtrees for vtabs
2647         or vtypes.
2648
2649 2011-02-02  Janus Weil  <janus@gcc.gnu.org>
2650
2651         PR fortran/47572
2652         * resolve.c (resolve_fl_variable): Handle polymorphic allocatables.
2653
2654 2011-02-01  Janus Weil  <janus@gcc.gnu.org>
2655
2656         PR fortran/47565
2657         * trans-expr.c (gfc_conv_structure): Handle constructors for procedure
2658         pointer components with allocatable result.
2659
2660 2011-01-31  Janus Weil  <janus@gcc.gnu.org>
2661
2662         PR fortran/47455
2663         * trans-expr.c (gfc_conv_procedure_call): Handle procedure pointers
2664         with pointer or allocatable result.
2665
2666 2011-01-31  Paul Thomas  <pault@gcc.gnu.org>
2667
2668         PR fortran/47519
2669         * trans-stmt.c (gfc_trans_allocate): Improve handling of
2670         deferred character lengths with SOURCE.
2671         * iresolve.c (gfc_resolve_repeat): Calculate character
2672         length from source length and ncopies.
2673         * dump-parse-tree.c (show_code_node): Show MOLD and SOURCE
2674         expressions for ALLOCATE.
2675
2676 2011-01-31  Janus Weil  <janus@gcc.gnu.org>
2677
2678         PR fortran/47463
2679         * resolve.c (resolve_typebound_subroutine): Bug fix for the case of
2680         an argument of a typebound assignment being a component.
2681
2682 2011-01-31  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
2683
2684         * gfortranspec.c (add_arg_libgfortran) [HAVE_LD_STATIC_DYNAMIC] Use
2685         LD_STATIC_OPTION, LD_DYNAMIC_OPTION.
2686
2687 2011-01-31  Tobias Burnus  <burnus@net-b.de>
2688
2689         PR fortran/47042
2690         * resolve.c (resolve_fl_procedure): Reject stmt functions
2691         with pointer/allocatable attribute.
2692
2693 2011-01-31  Tobias Burnus  <burnus@net-b.de>
2694
2695         PR fortran/47042
2696         * interface.c (gfc_procedure_use): Add explicit interface check for
2697         pointer/allocatable functions.
2698
2699 2011-01-30  Paul Thomas  <pault@gcc.gnu.org>
2700
2701         PR fortran/47523
2702         * trans-expr.c (gfc_trans_assignment_1): If the rhs is an op
2703         expr and is assigned to a deferred character length scalar,
2704         make sure that the function is called before reallocation,
2705         so that the length is available. Include procedure pointer
2706         and procedure pointer component rhs as well.
2707
2708         PR fortran/45170
2709         PR fortran/35810
2710         PR fortran/47350
2711         * gfortran.dg/allocatable_function_5.f90: New test not added by
2712         mistake on 2011-01-28.
2713
2714 2011-01-29  Tobias Burnus  <burnus@net-b.de>
2715
2716         PR fortran/47531
2717         * check.c (gfc_check_shape): Support kind argument in SHAPE.
2718         * intrinsic.c (add_functions): Ditto.
2719         * resolve.c (gfc_resolve_shape): Ditto.
2720         * simplify.c (gfc_simplify_shape): Ditto.
2721         * intrinsic.h (gfc_check_shape, gfc_resolve_shape,
2722         gfc_simplify_shape): Update prototypes.
2723         * intrinisc.text (SHAPE): Document kind argument.
2724
2725 2011-01-28  Tobias Burnus  <burnus@net-b.de>
2726
2727         PR fortran/47507
2728         * resolve.c (resolve_formal_arglist): Allow arguments with VALUE
2729         attribute also without INTENT.
2730
2731 2011-01-28  Tobias Burnus  <burnus@net-b.de>
2732
2733         * gfortran.texi (Fortran 2003 status): Mention support for
2734         nonconstant namelist variables.
2735
2736 2011-01-28  Paul Thomas  <pault@gcc.gnu.org>
2737             Tobias Burnus  <burnus@gcc.gnu.org>
2738
2739         PR fortran/45170
2740         PR fortran/35810
2741         PR fortran/47350
2742         * interface.c (compare_actual_formal): An allocatable or pointer
2743         deferred length actual is only allowed if the formal argument
2744         is also deferred length. Clean up whitespace.
2745         * trans-expr.c (gfc_conv_procedure_call): Pass string length for
2746         deferred character length formal arguments by reference. Do the
2747         same for function results.
2748         (gfc_trans_pointer_assignment): Do not do runtime check of lhs
2749         and rhs character lengths, if deferred length lhs.  In this case
2750         set the lhs character length to that of the rhs.
2751         (gfc_conv_string_parameter): Remove assert that string length is
2752         an integer type.
2753         (is_scalar_reallocatable_lhs): New function.
2754         (alloc_scalar_allocatable_for_assignment): New function.
2755         (gfc_trans_assignment_1): Call above new function. If the rhs is
2756         a deferred character length itself, makes ure that the function
2757         is called before reallocation, so that the length is available.
2758         (gfc_trans_asssignment): Remove error about assignment to
2759         deferred length character variables.
2760         * gfortran.texi : Update entry about (re)allocation on
2761         assignment.
2762         * trans-stmt.c (gfc_trans_allocate): Add code to handle deferred
2763         length character variables.
2764         * module.c (mio_typespec): Transfer deferred characteristic.
2765         * trans-types.c (gfc_get_function_type): New code to generate
2766         hidden typelist, so that those character lengths that are
2767         passed by reference get the right type.
2768         * resolve.c (resolve_contained_fntype): Supress error for
2769         deferred character length functions.
2770         (resolve_function, resolve_fl_procedure) The same.
2771         (check_symbols): Remove the error that support for
2772         entity with deferred type parameter is not yet implemented.
2773         (resolve_fl_derived): The same.
2774         match.c (alloc_opt_list): Allow MOLD for deferred length object.
2775         * trans-decl.c (gfc_get_symbol_decl): For deferred character
2776         length dummies, generate a local variable for string length.
2777         (create_function_arglist): Hidden length can be a pointer.
2778         (gfc_trans_deferred_vars): For deferred character length
2779         results and dummies, assign the string length to the local
2780         variable from the hidden argument on entry and the other way
2781         round on exit, as appropriate.
2782
2783 2011-01-27  Tobias Burnus  <burnus@net-b.de>
2784
2785         PR fortran/47474
2786         * trans-decl.c (gfc_generate_function_code): Fix init
2787         of allocatable result variable with allocatable components.
2788
2789 2011-01-27  Tobias Burnus  <burnus@net-b.de>
2790
2791         PR fortran/47472
2792         * options.c (gfc_handle_module_path_options): Save
2793         module path without trailing slash as include path.
2794
2795 2011-01-25  Tobias Burnus  <burnus@net-b.de>
2796
2797         PR fortran/47448
2798         * interface.c (gfc_check_operator_interface): Fix
2799         defined-assignment check.
2800
2801 2011-01-23  Tobias Burnus  <burnus@net-b.de>
2802
2803         PR fortran/47421
2804         * trans-decl.c (gfc_trans_deferred_vars): Do not nullify
2805         scalar allocatable dummy arguments.
2806
2807 2011-01-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
2808
2809         PR fortran/38536
2810         * resolve.c (gfc_iso_c_func_interface):  For C_LOC,
2811         check for array sections followed by component references
2812         which are illegal.  Also check for coindexed arguments.
2813
2814 2011-01-22  Tobias Burnus  <burnus@net-b.de>
2815
2816         PR fortran/47399
2817         * primary.c (gfc_match_varspec): Relax gcc_assert to allow for
2818         PARAMETER TBP.
2819
2820 2011-01-21  Tobias Burnus  <burnus@net-b.de>
2821
2822         PR fortran/47394
2823         * error.c (gfc_error_now, gfc_fatal_error, gfc_error_check):
2824         Use defined instead of magic number exit status codes.
2825         * scanner.c (include_line, gfc_new_file): Ditto.
2826
2827 2011-01-21  Tobias Burnus  <burnus@net-b.de>
2828
2829         PR fortran/47377
2830         * expr.c (gfc_check_pointer_assign): Reject expr data-targets
2831         without pointer attribute.
2832
2833 2011-01-18  Janus Weil  <janus@gcc.gnu.org>
2834
2835         PR fortran/47240
2836         * resolve.c (expression_rank): Fix rank of procedure poiner components.
2837         * trans-expr.c (gfc_conv_procedure_call): Take care of procedure
2838         pointer components as actual arguments.
2839
2840 2011-01-17  Jakub Jelinek  <jakub@redhat.com>
2841
2842         PR fortran/47331
2843         * gfortran.h (struct gfc_omp_saved_state): New type.
2844         (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New prototypes.
2845         * resolve.c (resolve_global_procedure): Call it around gfc_resolve
2846         call.
2847         * openmp.c (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New
2848         functions.
2849
2850 2011-01-17  Tobias Burnus  <burnus@net-b.de>
2851
2852         PR fortran/47327
2853         * invoke.texi (Options to request or suppress errors
2854         and warnings): Fix cross link.
2855
2856 2011-01-15  Tobias Burnus  <burnus@net-b.de>
2857
2858         * gfortran.texi: Update Fortran 2003 Status section.
2859
2860         PR fortran/47177
2861         * invoke.texi: Add missing "-E" to the -dM example.
2862
2863 2011-01-13  Tobias Burnus  <burnus@net-b.de>
2864
2865         PR fortran/47268
2866         * intrinsic.texi (get_command_argument, get_environment_variable):
2867         Mark arguments as optional in the Arguments section.
2868
2869 2011-01-13  Kai Tietz  <kai.tietz@onevision.com>
2870             Tobias Burnus  <burnus@net-b.de>
2871
2872         PR fortran/47260
2873         * trans-decl.c (gfc_get_extern_function_decl,
2874         build_function_decl): Set TREE_PUBLIC/TREE_EXTERNAL before
2875         calling decl_attributes.
2876
2877 2011-01-13  Tobias Burnus  <burnus@net-b.de>
2878             Mikael Morin  <mikael@gcc.gnu.org>
2879
2880         PR fortran/45848
2881         PR fortran/47204
2882         * gfortran.h (gfc_code): Move union ext's case_list into
2883         the struct block.
2884         * dump-parse-tree.c (show_code_node): Adapt by prefixing case_list
2885         by "block.".
2886         * frontend-passes.c (gfc_code_walker): Ditto.
2887         * match.c (gfc_match_goto, gfc_match_call, gfc_match_case,
2888         gfc_match_type_is, gfc_match_class_is): Ditto.
2889         * resolve.c (resolve_select, resolve_select_type): Ditto.
2890         * st.c (gfc_free_statement): Ditto.
2891         * trans-stmt.c (gfc_trans_integer_select, gfc_trans_logical_select,
2892         gfc_trans_character_select): Ditto.
2893         * parse.c (resolve_all_program_units): For error recovery, avoid
2894         segfault is proc_name is NULL.
2895
2896 2011-01-11  Paul Thomas  <pault@gcc.gnu.org>
2897
2898         PR fortran/47051
2899         * trans-array.c (gfc_alloc_allocatable_for_assignment): Change
2900         to be standard compliant by testing for shape rather than size
2901         before skipping reallocation. Improve comments.
2902
2903 2011-01-09  Janus Weil  <janus@gcc.gnu.org>
2904
2905         PR fortran/47224
2906         * resolve.c (resolve_actual_arglist): Remove unneeded and buggy piece
2907         of code.
2908
2909 2011-01-09  Thomas Koenig  <tkoenig@gcc.gnu.org>
2910
2911         PR fortran/38536
2912         * resolve.c (is_scalar_expr_ptr):  For a substring reference,
2913         use gfc_dep_compare_expr to compare start and end expession.
2914         Add FIXME for using gfc_deb_compare_expr elsewhere.
2915
2916 2011-01-09  Janus Weil  <janus@gcc.gnu.org>
2917
2918         PR fortran/46313
2919         * class.c (get_unique_type_string): Make type name start with upper
2920         case letter.
2921
2922 2011-01-08  Thomas Koenig  <tkoenig@gcc.gnu.org>
2923
2924         PR fortran/46405
2925         * invoke.texi:  Mention -ffree-line-length-none and
2926         -ffixed-line-length-none for preprocessing.
2927
2928 2011-01-08  Paul Thomas  <pault@gcc.gnu.org>
2929
2930         PR fortran/46896
2931         * trans-expr.c (gfc_conv_procedure_call): With a non-copying
2932         procedure argument (eg TRANSPOSE) use a temporary if there is
2933         any chance of aliasing due to host or use association.
2934         (arrayfunc_assign_needs_temporary): Correct logic for function
2935         results and do not use a temporary for implicitly PURE
2936         variables.  Use a temporary for Cray pointees.
2937         * symbol.c (gfc_add_save): Explicit SAVE not compatible with
2938         implicit pureness of containing procedure.
2939         * decl.c (match_old_style_init, gfc_match_data): Where decl
2940         would fail in PURE procedure, set implicit_pure to zero.
2941         * gfortran.h : Add implicit_pure to structure symbol_attr and
2942         add prototype for function gfc_implicit_pure.
2943         * expr.c (gfc_check_pointer_assign, gfc_check_vardef_context):
2944         Where decl would fail in PURE procedure, reset implicit_pure.
2945         * io.c (match_vtag, gfc_match_open, gfc_match_close,
2946         gfc_match_print, gfc_match_inquire, gfc_match_wait): The same.
2947         * match.c (gfc_match_critical, gfc_match_stopcode,
2948         sync_statement, gfc_match_allocate, gfc_match_deallocate): The
2949         same.
2950         * parse.c (decode_omp_directive): The same.
2951         (parse_contained): If not PURE, set implicit pure attribute.
2952         * resolve.c (resolve_formal_arglist, resolve_structure_cons,
2953         resolve_function, resolve_ordinary_assign) : The same.
2954         (gfc_implicit_pure): New function.
2955         * module.c (mio_symbol_attribute): Introduce AB_IMPLICIT_PURE
2956         to ab_attribute enum and use it in this function.
2957
2958 2011-01-08  Thomas Koenig  <tkoenig@gcc.gnu.org>
2959
2960         PR fortran/45777
2961         * symbol.c (gfc_symbols_could_alias):  Strip gfc_ prefix,
2962         make static and move in front of its only caller, to ...
2963         * trans-array.c (symbols_could_alias): ... here.
2964         Pass information about pointer and target status as
2965         arguments.  Allocatable arrays don't alias anything
2966         unless they have the POINTER attribute.
2967         (gfc_could_be_alias):  Keep track of pointer and target
2968         status when following references.  Also check if typespecs
2969         of components match those of other components or symbols.
2970
2971 2011-01-07  Tobias Burnus  <burnus@net-b.de>
2972
2973         PR fortran/41580
2974         * class.c (gfc_build_class_symbol): Mark __vtab as attr.vtab.
2975         * intrinsic.c (add_functions): Use simplify functions for
2976         EXTENDS_TYPE_OF and SAME_TYPE_AS.
2977         * intrinsic.h (gfc_simplify_extends_type_of,
2978         gfc_simplify_same_type_as): New prototypes.
2979         * simplify.c (is_last_ref_vtab, gfc_simplify_extends_type_of,
2980         gfc_simplify_same_type_as): New functions.
2981
2982 2011-01-07  Janus Weil  <janus@gcc.gnu.org>
2983
2984         PR fortran/47189
2985         PR fortran/47194
2986         * gfortran.h (gfc_lval_expr_from_sym): Moved prototype.
2987         * class.c (gfc_class_null_initializer): Initialize _vptr to declared
2988         type.
2989         * expr.c (gfc_lval_expr_from_sym): Moved here from symbol.c.
2990         * resolve.c (resolve_deallocate_expr): _data component will be added
2991         at translation stage.
2992         * symbol.c (gfc_lval_expr_from_sym): Moved to expr.c.
2993         * trans-stmt.c (gfc_trans_deallocate): Reset _vptr to declared type.
2994
2995 2011-01-06  Daniel Franke  <franke.daniel@gmail.com>
2996
2997         PR fortran/33117
2998         PR fortran/46478
2999         * parse.c (parse_interface): Remove check for procedure types.
3000         * interface.c (check_interface0): Verify that procedures are
3001         either all SUBROUTINEs or all FUNCTIONs.
3002
3003 2011-01-05  Janus Weil  <janus@gcc.gnu.org>
3004
3005         PR fortran/47180
3006         * trans-expr.c (gfc_trans_class_assign): Bugfix for r168524 (make sure
3007         'vtab' is initialized).
3008
3009 2011-01-05  Janus Weil  <janus@gcc.gnu.org>
3010
3011         PR fortran/47180
3012         * trans-expr.c (gfc_trans_class_assign): For a polymorphic NULL pointer
3013         assignment, set the _vptr component to the declared type.
3014
3015 2011-01-05  Thomas Koenig  <tkoenig@gcc.gnu.org>
3016
3017         PR fortran/46017
3018         * resolve.c (resolve_allocate_deallocate): Follow references to
3019         check for duplicate occurence of allocation/deallocation objects.
3020
3021 2011-01-05  Janus Weil  <janus@gcc.gnu.org>
3022
3023         PR fortran/47024
3024         * trans-decl.c (gfc_trans_deferred_vars): Initialize the _vpr component
3025         of polymorphic allocatables according to their declared type.
3026
3027 2011-01-04  Janus Weil  <janus@gcc.gnu.org>
3028
3029         PR fortran/46448
3030         * class.c (gfc_find_derived_vtab): Set the module field for the copying
3031         routine to make sure it receives module name mangling.
3032
3033 2011-01-03  Jakub Jelinek  <jakub@redhat.com>
3034
3035         * gfortranspec.c (lang_specific_driver): Update copyright notice
3036         dates.
3037
3038 2011-01-03  Janus Weil  <janus@gcc.gnu.org>
3039
3040         * intrinsic.texi (LEADZ): Fix example.
3041
3042 2011-01-02  Janus Weil  <janus@gcc.gnu.org>
3043
3044         PR fortran/46408
3045         * class.c (gfc_find_derived_vtab): Use EXEC_INIT_ASSIGN for __copy_
3046         routine.
3047
3048 \f
3049 Copyright (C) 2011 Free Software Foundation, Inc.
3050
3051 Copying and distribution of this file, with or without modification,
3052 are permitted in any medium without royalty provided the copyright
3053 notice and this notice are preserved.