gcc/fortran/ChangeLog

   1 2012-03-04  Mikael Morin  <mikael@gcc.gnu.org>
   2
   3         PR fortran/50981
   4         * gfortran.h (gfc_is_class_container_ref): New prototype.
   5         * class.c (gfc_is_class_container_ref): New function.
   6         * trans-expr.c (gfc_conv_procedure_call): Add a "_data" component
   7         reference to polymorphic actual arguments.
   8
   9 2012-03-04  Mikael Morin  <mikael@gcc.gnu.org>
  10
  11         PR fortran/50981
  12         * trans-expr.c (gfc_conv_procedure_call): Save se->ss's value.
  13         Handle the case of unallocated arrays passed to elemental procedures.
  14
  15 2012-03-04  Mikael Morin  <mikael@gcc.gnu.org>
  16
  17         * trans.h (struct gfc_ss_info): Move can_be_null_ref component from
  18         the data::scalar subcomponent to the toplevel.
  19         * trans-expr.c (gfc_conv_expr): Update component reference.
  20         * trans-array.c (gfc_add_loop_ss_code): Ditto.
  21         (gfc_walk_elemental_function_args): Ditto.  Move the conditional setting
  22         the field out of the scalar-only block.
  23
  24 2012-03-04  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  25
  26         PR fortran/36160
  27         * error.c (gfc_widechar_display_length, gfc_wide_display_length):
  28         New functions.
  29         (print_wide_char_into_buffer): Return length written.
  30         (show_locus): Fix locus displayed when wide characters are present.
  31
  32 2012-03-04  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  33
  34         * module.c (gfc_use_module): Improve error message some more.
  35
  36 2012-03-03  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  37
  38         PR fortran/52313
  39         * module.c (gfc_use_module): Improve error messages.
  40
  41 2012-03-03  Tobias Burnus  <burnus@net-b.de>
  42
  43         PR fortran/48820
  44         * resolve.c (resolve_actual_arglist): Properly reset
  45         assumed_type_expr_allowed.
  46
  47 2012-03-03  Tobias Burnus  <burnus@net-b.de>
  48
  49         * lang.opt (Wc-binding-type): New flag.
  50         * options.c (gfc_init_options, gfc_handle_option): Handle it.
  51         * invoke.texi (Wc-binding-type): Document it.
  52         * gfortran.h (gfc_option_t): Add warn_c_binding_type.
  53         * decl.c (verify_bind_c_sym): Handle -Wc-binding-type.
  54         * symbol.c (gfc_set_default_type, verify_bind_c_derived_type):
  55         Ditto.
  56
  57 2012-03-03  Tobias Burnus  <burnus@net-b.de>
  58
  59         PR fortran/48820
  60         * decl.c (gfc_match_decl_type_spec): Support type(*).
  61         (gfc_verify_c_interop): Allow type(*).
  62         * dump-parse-tree.c (show_typespec): Handle type(*).
  63         * expr.c (gfc_copy_expr): Ditto.
  64         * interface.c (compare_type_rank, compare_parameter,
  65         compare_actual_formal, gfc_procedure_use): Ditto.
  66         * libgfortran.h (bt): Add BT_ASSUMED.
  67         * misc.c (gfc_basic_typename, gfc_typename): Handle type(*).
  68         * module.c (bt_types): Ditto.
  69         * resolve.c (assumed_type_expr_allowed): New static variable.
  70         (resolve_actual_arglist, resolve_variable, resolve_symbol):
  71         Handle type(*).
  72         * trans-expr.c (gfc_conv_procedure_call): Ditto.
  73         * trans-types.c (gfc_typenode_for_spec, gfc_get_dtype): Ditto.
  74
  75 2012-03-02  Tobias Burnus  <burnus@net-b.de>
  76
  77         PR fortran/52325
  78         * primary.c (gfc_match_varspec): Add missing ;.
  79
  80 2012-03-02  Tobias Burnus  <burnus@net-b.de>
  81
  82         PR fortran/52325
  83         * primary.c (gfc_match_varspec): Add diagnostic for % with
  84         nonderived types.
  85
  86 2012-03-02  Tobias Burnus  <burnus@net-b.de>
  87
  88         PR fortran/52270
  89         * expr.c (gfc_check_vardef_context): Fix check for
  90         intent-in polymorphic pointer .
  91         * interface.c (compare_parameter): Allow passing TYPE to
  92         intent-in polymorphic pointer.
  93
  94 2012-03-02  Tobias Burnus  <burnus@net-b.de>
  95
  96         PR fortran/52452
  97         * resolve.c (resolve_intrinsic): Don't search for a
  98         function if we know that it is a subroutine.
  99
 100 2012-02-29  Paul Thomas  <pault@gcc.gnu.org>
 101
 102         PR fortran/52386
 103         * trans-expr.c (fcncall_realloc_result): Dereference the
 104         descriptor if needed.
 105
 106 2012-02-22  Tobias Burnus  <burnus@net-b.de>
 107
 108         PR fortran/52335
 109         * io.c (gfc_match_open): Remove bogus F2003 DELIM= check.
 110
 111 2012-02-18  Tobias Burnus  <burnus@net-b.de>
 112
 113         PR fortran/52295
 114         * interface.c (check_interface0): Internal procs in
 115         generic interfaces are allowed in Fortran 2008.
 116
 117 2012-02-17  Tobias Burnus  <burnus@net-b.de>
 118             Roland Stigge  <stigge@antcom.de>
 119
 120         PR translation/52273
 121         * interface.c (compare_actual_formal): Fix typo "at at".
 122
 123 2012-02-17  Tobias Burnus  <burnus@net-b.de>
 124
 125         * gfortran.texi (Q exponent-letter): Fix grammar.
 126
 127 2012-02-17  Tobias Burnus  <burnus@net-b.de>
 128
 129         * gfortran.texi (Status): Fix typos.
 130         * invoke.texi (ffixed-form, fstack-arrays): Spell Fortran with
 131         a majuscule.
 132
 133 2012-02-17  Tobias Burnus  <burnus@net-b.de>
 134             Roland Stigge  <stigge@antcom.de>
 135
 136         PR translation/52232
 137         PR translation/52234
 138         PR translation/52245
 139         PR translation/52246
 140         PR translation/52262
 141         PR translation/52273
 142         * io.c (gfc_match_open): Fix typo.
 143         * interface.c (compare_actual_formal): Ditto.
 144         * lang.opt (freal-4-real-8, freal-4-real-16, freal-8-real-16): Ditto.
 145         * match.c (alloc_opt_list, gfc_match_nullify): Ditto.
 146         * check.c (gfc_check_associated, gfc_check_null): Ditto.
 147
 148 2012-02-12  Mikael Morin  <mikael@gcc.gnu.org>
 149
 150         PR fortran/50981
 151         * trans-stmt.c (gfc_get_proc_ifc_for_call): New function.
 152         (gfc_trans_call): Use gfc_get_proc_ifc_for_call.
 153
 154 2012-02-12  Mikael Morin  <mikael@gcc.gnu.org>
 155
 156         * trans-array.c (gfc_walk_elemental_function_args,
 157         gfc_walk_function_expr): Move call to gfc_get_proc_ifc_for_expr out
 158         of gfc_walk_elemental_function_args.
 159         * trans-stmt.c (gfc_trans_call): Ditto.
 160         * trans-array.h (gfc_get_proc_ifc_for_expr): New prototype.
 161         (gfc_walk_elemental_function_args): Update prototype.
 162
 163 2012-02-12  Mikael Morin  <mikael@gcc.gnu.org>
 164
 165         * trans-array.c (gfc_get_proc_ifc_for_expr): New function.
 166         (gfc_walk_elemental_function_args): Move code to
 167         gfc_get_proc_ifc_for_expr and call it.
 168
 169 2012-02-08  Tobias Burnus  <burnus@net-b.de>
 170
 171         PR fortran/52151
 172         * trans-expr.c (fcncall_realloc_result): Set also the stride.
 173
 174 2012-02-07  Tobias Burnus  <burnus@net-b.de>
 175
 176         PR fortran/51514
 177         * trans-expr.c (gfc_conv_procedure_call): Add _data component
 178         for calls of scalar CLASS actuals to TYPE dummies.
 179
 180 2012-02-05  Thomas König  <tkoenig@gcc.gnu.org>
 181
 182         PR fortran/48847
 183         * trans-decl.c:  Warn about unused dummy procedure arguments
 184         if -Wunused-dummy-argument is specified.  Suppress middle-end
 185         warnings about procedure arguments.
 186
 187 2012-02-05  Paul Thomas  <pault@gcc.gnu.org>
 188
 189         * trans-array.c (gfc_array_allocate): Zero memory for all class
 190         array allocations.
 191         * trans-stmt.c (gfc_trans_allocate): Ditto for class scalars.
 192
 193         PR fortran/52102
 194         * trans-stmt.c (gfc_trans_allocate): Before correcting a class
 195         array reference, ensure that 'dataref' points to the _data
 196         component that is followed by the array reference..
 197
 198 2012-02-02  Mikael Morin  <mikael@gcc.gnu.org>
 199
 200         PR fortran/41587
 201         PR fortran/46356
 202         PR fortran/51754
 203         PR fortran/50981
 204         * class.c (insert_component_ref, class_data_ref_missing,
 205         gfc_fix_class_refs): New functions.
 206         * gfortran.h (gfc_fix_class_refs): New prototype.
 207         * trans-expr.c (gfc_conv_expr): Remove special case handling and call
 208         gfc_fix_class_refs instead.
 209
 210 2012-02-02  Paul Thomas  <pault@gcc.gnu.org>
 211
 212         PR fortran/52012
 213         * trans-expr.c (fcncall_realloc_result): If variable shape is
 214         correct, retain the bounds, whatever they are.
 215
 216 2012-02-02  Tobias Burnus  <burnus@net-b.de>
 217
 218         PR fortran/52093
 219         * simplify.c (gfc_simplify_size): Handle INTRINSIC_PARENTHESES.
 220
 221 2012-02-01  Thomas König  <tkoenig@gcc.gnu.org>
 222
 223         PR fortran/51958
 224         * frontend-passes.c (convert_elseif):  New function.
 225         (optimize_namespace):  Call it.
 226
 227 2012-02-01  Tobias Burnus  <burnus@net-b.de>
 228
 229         PR fortran/52024
 230         * module.c (MOD_VERSION): Bump.
 231         (mio_typebound_proc): Read/write is_operator from/to the
 232         .mod file.
 233
 234 2012-02-01  Tobias Burnus  <burnus@net-b.de>
 235
 236         PR fortran/52059
 237         * trans-expr.c (gfc_conv_procedure_call): Add array ref
 238         only to variables.
 239
 240 2012-01-31  Tobias Burnus  <burnus@net-b.de>
 241
 242         PR fortran/52024
 243         * gfortran.h (gfc_tbp_generic): Store whether the
 244         generic is an operator.
 245         * decl.c (gfc_match_generic): Set that flag.
 246         * resolve.c (check_generic_tbp_ambiguity): Use it in the
 247         gfc_compare_interfaces check.
 248
 249 2012-01-31  Tobias Burnus  <burnus@net-b.de>
 250
 251         PR fortran/52029
 252         * class.c (gfc_find_derived_vtab): Mark _copy function as pure.
 253
 254 2012-01-31  Tobias Burnus  <burnus@net-b.de>
 255
 256         PR fortran/52013
 257         * class.c (get_unique_hashed_string): Adapt trim length.
 258         (gfc_build_class_symbol) Encode also corank in the container name.
 259
 260 2012-01-31  Paul Thomas  <pault@gcc.gnu.org>
 261
 262         PR fortran/52012
 263         * trans-expr.c (fcncall_realloc_result): Correct calculation of
 264         result offset.
 265
 266 2012-01-29  Janne Blomqvist  <jb@gcc.gnu.org>
 267
 268         * module.c (pointer_info): Make true_name and module pointers
 269         rather than arrays, order pointers before other fields.
 270         (free_pi_tree): free true_name and module as well.
 271         (mio_read_string): Rename to read_string.
 272         (mio_write_string): Remove.
 273         (load_commons): Use read_string.
 274         (read_module): Use read_string rather than mio_internal_string.
 275         (write_blank_common): Call write_atom directly.
 276         (write_symbol): Likewise.
 277
 278 2012-01-29  Tobias Burnus  <burnus@net-b.de>
 279
 280         PR fortran/41600
 281         * expr.c (gfc_default_initializer): Convert the values if
 282         the type does not match.
 283
 284 2012-01-29  Tobias Burnus  <burnus@net-b.de>
 285
 286         PR fortran/51972
 287         * trans-array.c (structure_alloc_comps): Fix assignment of
 288         polymorphic components (polymorphic deep copying).
 289
 290 2012-01-29  Janne Blomqvist  <jb@gcc.gnu.org>
 291
 292         PR fortran/51808
 293         * decl.c (set_binding_label): Make binding_label argument const.
 294         (curr_binding_label): Constify.
 295         * gfortran.h (gfc_symbol): Constify binding_label.
 296         (gfc_common_head): Likewise.
 297         (get_iso_c_sym): Likewise.
 298         * match.c (gfc_match_name_C): Constify buffer argument.
 299         * match.h (gfc_match_name_C): Likewise.
 300         * resolve.c (set_name_and_label): Constify binding_label argument.
 301         (gfc_iso_c_sub_interface): Constify binding_label variable.
 302         * symbol.c (get_iso_c_sym): Constify binding_label argument.
 303
 304 2012-01-29  Janne Blomqvist  <jb@gcc.gnu.org>
 305
 306         PR fortran/51808
 307         * decl.c (set_binding_label): Move prototype from match.h to here.
 308         (curr_binding_label): Make a pointer rather than static array.
 309         (build_sym): Check sym->binding_label pointer rather than array,
 310         update set_binding_label call, handle curr_binding_label changes.
 311         (set_binding_label): Handle new curr_binding_label, dest_label
 312         double ptr, and sym->binding_label.
 313         (verify_bind_c_sym): Handle sym->binding_label being a pointer.
 314         (set_verify_bind_c_sym): Check sym->binding_label pointer rather
 315         than array, update set_binding_label call.
 316         (gfc_match_bind_c_stmt): Handle curr_binding_label change.
 317         (match_procedure_decl): Update set_binding_label call.
 318         (gfc_match_bind_c): Change binding_label to pointer, update
 319         gfc_match_name_C call.
 320         * gfortran.h (GFC_MAX_BINDING_LABEL_LEN): Remove macro.
 321         (gfc_symbol): Make binding_label a pointer.
 322         (gfc_common_head): Likewise.
 323         * match.c (gfc_match_name_C): Heap allocate bind(C) name.
 324         * match.h (gfc_match_name_C): Change prototype argument.
 325         (set_binding_label): Move prototype to decl.c.
 326         * module.c (struct pointer_info): Make binding_label a pointer.
 327         (free_pi_tree): Free unused binding_label.
 328         (mio_read_string): New function.
 329         (mio_write_string): New function.
 330         (load_commons): Redo reading of binding_label.
 331         (read_module): Likewise.
 332         (write_common_0): Change to write empty string instead of name if
 333         no binding_label.
 334         (write_blank_common): Write empty string for binding label.
 335         (write_symbol): Change to write empty string instead of name if no
 336         binding_label.
 337         * resolve.c (gfc_iso_c_func_interface): Don't set binding_label.
 338         (set_name_and_label): Make binding_label double pointer, use
 339         asprintf.
 340         (gfc_iso_c_sub_interface): Make binding_label a pointer.
 341         (resolve_bind_c_comms): Handle cases if
 342         gfc_common_head->binding_label is NULL.
 343         (gfc_verify_binding_labels): sym->binding_label is a pointer.
 344         * symbol.c (gfc_new_symbol): Rely on XCNEW zero init for
 345         binding_label.
 346         (gen_special_c_interop_ptr): Don't set binding label.
 347         (generate_isocbinding_symbol): Insert binding_label into symbol
 348         table.
 349         (get_iso_c_sym): Use pointer assignment instead of strcpy.
 350         * trans-common.c (gfc_sym_mangled_common_id): Handle
 351         com->binding_label being a pointer.
 352         * trans-decl.c (gfc_sym_mangled_identifier): Handle
 353         sym->binding_label being a pointer.
 354         (gfc_sym_mangled_function_id): Likewise.
 355
 356 2012-01-29  Tobias Burnus  <burnus@net-b.de>
 357
 358         PR fortran/52038
 359         * resolve.c (symbol_as): Remove unused, accidentally
 360         added function.
 361
 362 2012-01-28  Tobias Burnus  <burnus@net-b.de>
 363
 364         PR fortran/51972
 365         * trans-stmt.c (gfc_trans_allocate): Properly check whether
 366         we have a BT_CLASS which needs to be memset.
 367
 368 2012-01-27  Tobias Burnus  <burnus@net-b.de>
 369
 370         PR fortran/52022
 371         * trans-expr.c (gfc_conv_procedure_call): Fix passing
 372         of functions, which return allocatables.
 373
 374 2012-01-27  Tobias Burnus  <burnus@net-b.de>
 375
 376         PR fortran/52016
 377         * resolve.c (resolve_formal_arglist): Fix elemental
 378         constraint checks for polymorphic dummies also for
 379         pointers.
 380
 381 2012-01-27  Tobias Burnus  <burnus@net-b.de>
 382
 383         PR fortran/51970
 384         PR fortran/51977
 385         * primary.c (gfc_match_varspec. gfc_match_rvalue): Set
 386         handle array spec for BT_CLASS.
 387         * expr.c (gfc_get_variable_expr, gfc_lval_expr_from_sym)
 388         * frontend-passes.c (create_var): Ditto.
 389         * resolve.c (resolve_actual_arglist, resolve_assoc_var): Ditto.
 390         * trans-decl.c (gfc_trans_deferred_vars): Use class_pointer
 391         instead of attr.pointer.
 392         (gfc_generate_function_code): Use CLASS_DATA (sym) for BT_CLASS.
 393         * trans-intrinsic.c (conv_intrinsic_move_alloc): Move assert.
 394         * trans-stmt.c (trans_associate_var): Ask for the descriptor.
 395
 396 2012-01-27  Tobias Burnus  <burnus@net-b.de>
 397
 398         PR fortran/51953
 399         * match.c (gfc_match_allocate): Allow more than allocate
 400         object with SOURCE=.
 401
 402 2012-01-27  Tobias Burnus  <burnus@net-b.de>
 403
 404         PR fortran/52016
 405         * resolve.c (resolve_formal_arglist): Fix elemental
 406         constraint checks for polymorphic dummies.
 407
 408 2012-01-27  Paul Thomas  <pault@gcc.gnu.org>
 409             Tobias Burnus <burnus@gcc.gnu.org>
 410
 411         PR fortran/48705
 412         PR fortran/51870
 413         PR fortran/51943
 414         PR fortran/51946
 415         * trans-array.c (gfc_array_init_size): Add two extra arguments
 416         to convey the dynamic element size of a calls object and to
 417         return the number of elements that have been allocated.
 418         (gfc_array_allocate): Add the same arguments and use them to
 419         call gfc_array_init_size.  Before the allocation dereference
 420         the data pointer, if necessary. Set the allocated array to zero
 421         if the class element size or expr3 are non-null.
 422         * trans-expr.c (gfc_conv_class_to_class): Give this function
 423         global scope.
 424         (get_class_array_ref): New function.
 425         (gfc_copy_class_to_class): New function.
 426         * trans-array.h : Update prototype for gfc_array_allocate.
 427         * trans-stmt.c (gfc_trans_allocate): For non-variable class
 428         STATUS expressions extract the class object and the dynamic
 429         element size. Use the latter to call gfc_array_allocate and
 430         the former for setting the vptr and, via
 431         gfc_copy_class_to_clasfc_cs, to copy to the allocated data.
 432         * trans.h : Prototypes for gfc_get_class_array_ref,
 433         gfc_copy_class_to_class and gfc_conv_class_to_class.
 434
 435 2012-01-25  Tobias Burnus  <burnus@net-b.de>
 436
 437         * resolve.c (symbol_as): Check also for attr.class_ok.
 438
 439 2012-01-25  Tobias Burnus  <burnus@net-b.de>
 440
 441         PR fortran/51995
 442         * class.c (gfc_build_class_symbol): Fix invalid freeing
 443         issue with fclass->f2k_derived.
 444
 445 2012-01-25  Tobias Burnus  <burnus@net-b.de>
 446
 447         PR fortran/51995
 448         * class.c (gfc_build_class_symbol): Ensure that
 449         fclass->f2k_derived is set.
 450
 451 2012-01-25  Tobias Burnus  <burnus@net-b.de>
 452
 453         PR fortran/51966
 454         * resolve.c (resolve_structure_cons): Only create an
 455         array constructors for nonscalars.
 456
 457 2012-01-23  Tobias Burnus  <burnus@net-b.de>
 458
 459         PR fortran/51948
 460         * check.c (variable_check): Fix checking for
 461          variables and deeply nested BLOCKs.
 462
 463 2012-01-21  Tobias Burnus  <burnus@net-b.de>
 464             Steven G. Kargl  <kargl@gcc.gnu.org>
 465
 466         PR fortran/50556
 467         * symbol.c (check_conflict): namelist-group-name cannot have the SAVE
 468         attribute.
 469
 470 2012-01-21  Tobias Burnus  <burnus@net-b.de>
 471
 472         PR fortran/51913
 473         * interface.c (compare_parameter): Fix CLASS comparison.
 474
 475 2012-01-20  Tobias Burnus  <burnus@net-b.de>
 476             Janus Weil  <janus@gcc.gnu.org>
 477
 478         PR fortran/51056
 479         * module.c (load_needed, read_module): Don't mark __vtab etc.
 480         as use_only.
 481
 482 2012-01-19  Tobias Burnus  <burnus@net-b.de>
 483
 484         PR fortran/51904
 485         * expr.c (gfc_build_intrinsic_call): Also set the symtree.
 486
 487 2012-01-18  Paul Thomas  <pault@gcc.gnu.org>
 488
 489         PR fortran/51634
 490         * trans-expr.c (gfc_conv_procedure_call): Deallocate allocatable
 491         components of temporary class arguments.
 492
 493 2012-01-17  Tobias Burnus  <burnus@net-b.de>
 494             Janne Blomqvist  <jb@gcc.gnu.org>
 495
 496         PR fortran/51869
 497         * trans-expr.c (alloc_scalar_allocatable_for_assignment): Nullify
 498         LHS after allocation, if it has allocatable components.
 499         * f95-lang.c (gfc_init_builtin_functions): Add BUILT_IN_CALLOC.
 500
 501 2012-01-16  Mikael Morin  <mikael@gcc.gnu.org>
 502             Tobias Burnus  <burnus@net-b.de>
 503
 504         PR fortran/50981
 505         * trans-array.c (gfc_walk_elemental_function_args): Fix
 506         passing of deallocated allocatables/pointers as absent argument.
 507
 508 2012-01-16  Tobias Burnus  <burnus@net-b.de>
 509
 510         PR fortran/51809
 511         * class.c (gfc_find_derived_vtab): Mark __vtab and
 512         __def_init as FL_VARIABLE not as FL_PARAMETER.
 513         * expr.c (gfc_simplify_expr): Remove special
 514         handling of __vtab.
 515         * resolve.c (resolve_values): Ditto.
 516         * trans-decl.c (gfc_get_symbol_decl): Mark __vtab
 517         and __def_init as TREE_READONLY.
 518
 519 2012-01-16  Zydrunas Gimbutas  <gimbutas@cims.nyu.edu>
 520         Andreas Kloeckner  <kloeckner@cims.nyu.edu>
 521         Steven G. Kargl  <kargl@gcc.gnu.org>
 522
 523         PR fortran/48426
 524         * gfortran.h (gfc_option_t): Add members flag_*_kind to store kind.
 525         * lang.opt: Add options -freal-4-real-8, -freal-4-real-10,
 526         -freal-4-real-16, -freal-8-real-4, -freal-8-real-10, -freal-8-real-16
 527         and -finteger-4-integer-8. User-desired type conversion information.
 528         * decl.c (gfc_match_old_kind_spec,kind_expr): Type conversions
 529         in declaration parsing.
 530         * trans-types.c (gfc_init_kinds): User-specified type conversion
 531         checked for current backend.
 532         * primary.c (match_integer_constant,match_real_constant): Implement
 533         type conversion in constant parsing.
 534         * options.c (gfc_init_options,gfc_handle_option): Translate input
 535         options to flags in internal options data structure.
 536         * invoke.texi: Document new options.  Re-order options in Options
 537         summary section.
 538
 539 2012-01-16  Paul Thomas  <pault@gcc.gnu.org>
 540
 541         * trans-array.c (gfc_trans_create_temp_array): In the case of a
 542         class array temporary, detect a null 'eltype' on entry and use
 543         'initial' to provde the class reference and so, through the
 544         vtable, the element size for the dynamic type.
 545         * trans-stmt.c (gfc_conv_elemental_dependencies): For class
 546         expressions, set 'eltype' to null and pass the values via the
 547         'initial' expression.
 548
 549 2012-01-14  Tobias Burnus  <burnus@net-b.de>
 550
 551         PR fortran/51800
 552         * resolve.c (build_default_init_expr): Also initialize
 553         nonconstant-length strings with -finit-character=<n>.
 554
 555 2011-01-14  Tobias Burnus  <burnus@net-b.de>
 556
 557         PR fortran/51816
 558         * module.c (read_module): Don't make nonexisting
 559         intrinsic operators as found.
 560         (rename_list_remove_duplicate): New function.
 561         (gfc_use_modules): Use it.
 562
 563 2012-01-13  Paul Thomas  <pault@gcc.gnu.org>
 564
 565         PR fortran/48351
 566         * trans-array.c (structure_alloc_comps): Suppress interative
 567         call to self, when current component is deallocated using
 568         gfc_trans_dealloc_allocated.
 569         * class.c (gfc_build_class_symbol): Copy the 'alloc_comp'
 570         attribute from the declared type to the class structure.
 571
 572 2012-01-13  Tobias Burnus  <burnus@net-b.de>
 573
 574         PR fortran/51842
 575         * fortran/trans-types.c (gfc_init_kinds): Use PTRDIFF_TYPE
 576         instead of a signed int of size POINTER_SIZE for
 577         gfc_index_integer_kind.
 578
 579 2012-01-12  Tobias Burnus  <burnus@net-b.de>
 580
 581         PR fortran/36755
 582         * intrinsic.texi (CHMOD): Extend a bit and remove statement
 583         that /bin/chmod is called.
 584
 585 2012-01-10  Gerald Pfeifer  <gerald@pfeifer.com>
 586
 587         * gfortran.texi (Fortran 2003 Status): Fix grammar.
 588
 589 2012-01-10  Tobias Burnus  <burnus@net-b.de>
 590
 591         PR fortran/51652
 592         * resolve.c (resolve_allocate_expr): For non-deferred char lengths,
 593         check whether type-spec matches declaration.
 594
 595 2012-01-10  Tobias Burnus  <burnus@net-b.de>
 596
 597         * resolve.c (resolve_ordinary_assign): Improve error wording.
 598
 599 2012-01-09  Paul Thomas  <pault@gcc.gnu.org>
 600
 601         PR fortran/51791
 602         * interface.c (matching_typebound_op): Drill down through
 603         possible parentheses to obtain base expression. Do not test for
 604         'class_ok' but, instead for the class structure components.
 605         * resolve.c (resolve_ordinary_assign): Extend error message for
 606         polymorphic assignment to advise checking for specific
 607         subroutine.
 608
 609         PR fortran/51792
 610         * resolve.c (resolve_typebound_function): Restore 'static' to
 611         declaration.
 612
 613 2012-01-09  Mikael Morin  <mikael@gcc.gnu.org>
 614
 615         PR fortran/51758
 616         * trans-array.c (gfc_walk_elemental_function_args):
 617         Skip over NULL() actual arguments.
 618
 619 2012-01-09  Tobias Burnus  <burnus@net-b.de>
 620
 621         * gfortran.texi: Bump copyright year.
 622         (Fortran 2003 Status): Update polymorphism item, add
 623         item for generic interface with DT name.
 624
 625 2012-01-09  Tobias Burnus  <burnus@net-b.de>
 626
 627         PR fortran/51578
 628         * gfortran.h (gfc_use_list):
 629         * match.h (gfc_use_module): Rename to ...
 630         (gfc_use_modules): ... this.
 631         * module.c (use_locus, specified_nonint, specified_int): Remove
 632         global variable.
 633         (module_name): Change type to const char*, used with gfc_get_string.
 634         (module_list): New global variable.
 635         (free_rename): Free argument not global var.
 636         (gfc_match_use): Save match to module_list.
 637         (load_generic_interfaces, read_module): Don't free symtree.
 638         (write_dt_extensions, gfc_dump_module): Fix module-name I/O due to the
 639         type change of module_name.
 640         (write_symbol0, write_generic): Optimize due to the type change.
 641         (import_iso_c_binding_module, use_iso_fortran_env_module): Use
 642         locus of rename->where.
 643         (gfc_use_module): Take module_list as argument.
 644         (gfc_use_modules): New function.
 645         (gfc_module_init_2, gfc_module_done_2): Init module_list, rename_list.
 646         * parse.c (last_was_use_stmt): New global variable.
 647         (use_modules): New function.
 648         (decode_specification_statement, decode_statement): Move USE match up
 649         and call use_modules.
 650         (next_free, next_fixed): Call use_modules.
 651         (accept_statement): Don't call gfc_module_use.
 652
 653 2012-01-06  Tobias Burnus <burnus@net-b.de>
 654
 655         * trans-openmp.c (gfc_omp_clause_dtor, gfc_trans_omp_array_reduction):
 656         Update call to gfc_trans_dealloc_allocated.
 657         * trans.c (gfc_allocate_using_malloc): Fix spacing.
 658         (gfc_allocate_allocatable): For gfc_allocate_using_lib, jump to
 659         label_finish when an error occurs.
 660         (gfc_deallocate_with_status): Call caf_deregister for -fcoarray=lib.
 661         * trans.h (gfc_allocate_allocatable, gfc_deallocate_with_status):
 662         Update prototype.
 663         (gfor_fndecl_caf_deregister): New tree symbol.
 664         * trans-expr.c (gfc_conv_procedure_call): Update
 665         gfc_deallocate_with_status and gfc_trans_dealloc_allocated calls.
 666         * trans-array.c (gfc_array_allocate, gfc_trans_dealloc_allocated,
 667         structure_alloc_comps, gfc_trans_deferred_array): Ditto.
 668         (gfc_array_deallocate): Handle coarrays with -fcoarray=lib.
 669         * trans-array.h (gfc_array_deallocate, gfc_array_allocate,
 670         gfc_trans_dealloc_allocated): Update prototypes.
 671         * trans-stmt.c (gfc_trans_sync): Fix indentation.
 672         (gfc_trans_allocate): Fix errmsg padding and label handling.
 673         (gfc_trans_deallocate): Ditto and handle -fcoarray=lib.
 674         * expr.c (gfc_is_coarray): Fix algorithm for BT_CLASS.
 675         * libgfortran.h (GFC_STAT_STOPPED_IMAGE): Use large value
 676         to avoid other stats accidentally matching this one.
 677         * trans-decl.c (gfor_fndecl_caf_deregister): New global var.
 678         (gfc_build_builtin_function_decls): Fix prototype decl of caf_register
 679         and add decl for caf_deregister.
 680         (gfc_trans_deferred_vars): Handle CAF vars with -fcoarrays=lib.
 681         * trans-intrinsic.c (conv_intrinsic_move_alloc): Update call to
 682         gfc_deallocate_with_status.
 683
 684 2012-01-05  Paul Thomas  <pault@gcc.gnu.org>
 685
 686         PR fortran/PR48946
 687         * resolve.c (resolve_typebound_static): If the typebound
 688         procedure is 'deferred' try to find the correct specific
 689         procedure in the derived type operator space itself.
 690
 691 2012-01-04  Mikael Morin  <mikael@gcc.gnu.org>
 692
 693         PR fortran/50981
 694         * trans-array.h (gfc_walk_elemental_function_args): New argument.
 695         * trans-intrinsic.c (gfc_walk_intrinsic_function): Update call.
 696         * trans-stmt.c (gfc_trans_call): Ditto.
 697         * trans-array.c (gfc_walk_function_expr): Ditto.
 698         (gfc_walk_elemental_function_args): Get the dummy argument list
 699         if possible.  Check that the dummy and the actual argument are both
 700         optional, and set can_be_null_ref accordingly.
 701
 702 2012-01-04  Mikael Morin  <mikael@gcc.gnu.org>
 703
 704         PR fortran/50981
 705         * trans.h (struct gfc_ss_info): New field data::scalar::can_be_null_ref
 706         * trans-array.c: If the reference can be NULL, save the reference
 707         instead of the value.
 708         * trans-expr.c (gfc_conv_expr): If we have saved a reference,
 709         dereference it.
 710
 711 2012-01-04  Mikael Morin  <mikael@gcc.gnu.org>
 712
 713         * trans-expr.c (gfc_conv_expr): Move address taking...
 714         (gfc_conv_expr_reference): ... here.
 715
 716 2012-01-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
 717
 718         PR fortran/49693
 719         * trans-common.c (create_common): Update copyright years.  Mark
 720         variables as used to avoid warnings about unused variables in
 721         common blocks.
 722
 723 2012-01-03  Hans-Peter Nilsson  <hp@axis.com>
 724
 725         * gfortran.h (struct gfc_expr): Add missing "struct"
 726         qualifier for member base_expr.
 727
 728 2012-01-02  Paul Thomas  <pault@gcc.gnu.org>
 729
 730         PR fortran/51529
 731         * trans-array.c (gfc_array_allocate): Null allocated memory of
 732         newly allocted class arrays.
 733
 734         PR fortran/46262
 735         PR fortran/46328
 736         PR fortran/51052
 737         * interface.c(build_compcall_for_operator): Add a type to the
 738         expression.
 739         * trans-expr.c (conv_base_obj_fcn_val): New function.
 740         (gfc_conv_procedure_call): Use base_expr to detect non-variable
 741         base objects and, ensuring that there is a temporary variable,
 742         build up the typebound call using conv_base_obj_fcn_val.
 743         (gfc_trans_class_assign): Pick out class procedure pointer
 744         assignments and do the assignment with no further prcessing.
 745         (gfc_trans_class_array_init_assign, gfc_trans_class_init_assign
 746         gfc_trans_class_assign): Move to top of file.
 747         * gfortran.h : Add 'base_expr' field to gfc_expr.
 748         * resolve.c (get_declared_from_expr): Add 'types' argument to
 749         switch checking of derived types on or off.
 750         (resolve_typebound_generic_call): Set the new argument.
 751         (resolve_typebound_function, resolve_typebound_subroutine):
 752         Set 'types' argument for get_declared_from_expr appropriately.
 753         Identify base expression, if not a variable, in the argument
 754         list of class valued calls. Assign it to the 'base_expr' field
 755         of the final expression. Strip away all references after the
 756         last class reference.
 757
 758 2012-01-02  Tobias Burnus  <burnus@net-b.de>
 759
 760         PR fortran/51682
 761         * trans-intrinsic.c (trans_this_image, trans_image_index,
 762         trans_num_images, conv_intrinsic_cobound): Fold_convert the
 763         caf_num_images/caf_this_images variables to the correct int kind.
 764
 765 2012-01-01  Jakub Jelinek  <jakub@redhat.com>
 766
 767         * gfortranspec.c (lang_specific_driver): Update copyright notice
 768         dates.
 769 \f
 770 Copyright (C) 2012 Free Software Foundation, Inc.
 771
 772 Copying and distribution of this file, with or without modification,
 773 are permitted in any medium without royalty provided the copyright
 774 notice and this notice are preserved.