gcc/fortran/ChangeLog

   1 2008-02-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
   2
   3         PR fortran/34907
   4         * iresolve.c (resolve_mask_arg): Add gfc_clear_ts to initialize
   5         structure.
   6         (gfc_resolve_aint): Likewise.
   7         (gfc_resolve_anint): Likewise.
   8         (gfc_resolve_besn): Likewise.
   9         (gfc_resolve_cshift): Likewise.
  10         (gfc_resolve_ctime): Likewise.
  11         (gfc_resolve_eoshift): Likewise.
  12         (gfc_resolve_index_func): Likewise.
  13         (gfc_resolve_isatty): Likewise.
  14         (gfc_resolve_malloc): Likewise.
  15         (gfc_resolve_rrspacing): Likewise.
  16         (gfc_resolve_scale): Likewise.
  17         (gfc_resolve_set_exponent): Likewise.
  18         (gfc_resolve_spacing): Likewise.
  19         (gfc_resolve_spacing): Likewise.
  20         (gfc_resolve_fgetc): Likewise.
  21         (gfc_resolve_fputc): Likewise.
  22         (gfc_resolve_ftell): Likewise.
  23         (gfc_resolve_ttynam): Likewise.
  24         (gfc_resolve_alarm_sub): Likewise.
  25         (gfc_resolve_mvbits): Likewise.
  26         (gfc_resolve_getarg): Likewise.
  27         (gfc_resolve_signal_sub): Likewise.
  28         (gfc_resolve_exit): Likewise.
  29         (gfc_resolve_flush): Likewise.
  30         (gfc_resolve_free): Likewise.
  31         (gfc_resolve_ctime_sub): Likewise.
  32         (gfc_resolve_fgetc_sub): Likewise.
  33         (gfc_resolve_fputc_sub): Likewise.
  34         (gfc_resolve_fseek_sub): Likewise.
  35         (gfc_resolve_ftell_sub): Likewise.
  36         (gfc_resolve_ttynam_sub): Likewise.
  37
  38 2008-02-22  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
  39
  40         * gfc-internals.texi: Fix typos and markup nits.
  41         * gfortran.texi: Likewise.
  42         * intrinsic.texi: Likewise.
  43
  44 2008-02-21  Richard Guenther  <rguenther@suse.de>
  45
  46         * trans-expr.c (gfc_conv_expr_op): Expand INTRINSIC_PARENTHESES
  47         as unary PAREN_EXPR for real and complex typed expressions.
  48         (gfc_conv_unary_op): Fold the built tree.
  49
  50 2008-02-20  Tobias Burnus  <burnus@net-b.de>
  51
  52         PR fortran/34997
  53         * match.c (gfc_match_name): Improve error message for '$'.
  54
  55 2008-02-19  Daniel Franke  <franke.daniel@gmail.com>
  56
  57         PR fortran/35030
  58         * expr.c (gfc_check_pointer_assign): Add type and kind information
  59         to type-mismatch message.
  60         (gfc_check_assign): Unify error messages.
  61
  62 2008-02-16  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  63
  64         PR fortran/34952
  65         * gfortran.texi: Create new section for unimplemented extensions.
  66         Add "STRUCTURE and RECORD" and "ENCODE and DECODE statements".
  67         Remove "smaller projects" list. Fix a few typos.
  68
  69 2008-02-15  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  70
  71         * intrinsic.texi: Rename INDEX node to avoid clashing with
  72         index.html on case-insensitive systems.
  73
  74 2008-02-15  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  75
  76         PR fortran/35150
  77         * trans-expr.c (gfc_conv_function_call): Force evaluation of
  78         se->expr.
  79
  80 2008-02-10  Daniel Franke  <franke.daniel@gmail.com>
  81
  82         PR fortran/35019
  83         * lang.opt: Allow '-J<dir>' next to '-J <dir>',
  84         likewise '-I <dir>' and '-I<dir>'.
  85
  86 2008-02-06  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
  87
  88         PR other/35107
  89         * Make-lang.in (f951): Add $(GMPLIBS).
  90
  91 2008-02-05  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
  92
  93         PR fortran/35037
  94         * trans-common.c (build_field): Mark fields as volatile when needed.
  95
  96 2008-02-05  Tobias Burnus  <burnus@net-b.de>
  97
  98         PR fortran/35093
  99         * data.c (gfc_assign_data_value): Only free "size" if
 100         it has not already been freed.
 101
 102 2008-02-05  Paul Thomas  <pault@gcc.gnu.org>
 103
 104         PR fortran/34945
 105         * array.c (match_array_element_spec): Remove check for negative
 106         array size.
 107         (gfc_resolve_array_spec): Add check for negative size.
 108
 109 2008-02-05  Paul Thomas  <pault@gcc.gnu.org>
 110
 111         PR fortran/32315
 112         * data.c (gfc_assign_data_value): Add bounds check for array
 113         references.
 114
 115 2008-02-04  Daniel Franke  <franke.daniel@gmail.com>
 116
 117         * resolve.c (resolve_where): Fix typo.
 118         (gfc_resolve_where_code_in_forall): Likewise.
 119
 120 2008-02-03  Paul Thomas  <pault@gcc.gnu.org>
 121
 122         PR fortran/32760
 123         * resolve.c (resolve_allocate_deallocate): New function.
 124         (resolve_code): Call it for allocate and deallocate.
 125         * match.c (gfc_match_allocate, gfc_match_deallocate) : Remove
 126         the checking of the STAT tag and put in above new function.
 127         * primary,c (match_variable): Do not fix flavor of host
 128         associated symbols yet if the type is not known.
 129
 130 2008-01-31  Paul Thomas  <pault@gcc.gnu.org>
 131
 132         PR fortran/34910
 133         * expr.c (gfc_check_assign): It is an error to assign
 134         to a sibling procedure.
 135
 136 2008-01-30  Paul Thomas  <pault@gcc.gnu.org>
 137
 138         PR fortran/34975
 139         * symbol.c (gfc_delete_symtree, gfc_undo_symbols): Rename
 140         delete_symtree to gfc_delete_symtree.
 141         * gfortran.h : Add prototype for gfc_delete_symtree.
 142         * module.c (load_generic_interfaces): Transfer symbol to a
 143         unique symtree and delete old symtree, instead of renaming.
 144         (read_module): The rsym and the found symbol are the same, so
 145         the found symtree can be deleted.
 146
 147         PR fortran/34429
 148         * decl.c (match_char_spec): Remove the constraint on deferred
 149         matching of functions and free the length expression.
 150         delete_symtree to gfc_delete_symtree.
 151         (gfc_match_type_spec): Whitespace.
 152         (gfc_match_function_decl): Defer characteristic association for
 153         all types except BT_UNKNOWN.
 154         * parse.c (decode_specification_statement): Only derived type
 155         function matching is delayed to the end of specification.
 156
 157 2008-01-28  Tobias Burnus  <burnus@net-b.de>
 158
 159         PR libfortran/34980
 160         * simplify.c (gfc_simplify_shape): Simplify rank zero arrays.
 161
 162 2008-01-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 163
 164         PR fortran/34990
 165         * array.c (gfc_check_constructor_type): Revert clearing the expression.
 166
 167 2008-01-26  Tobias Burnus  <burnus@net-b.de>
 168
 169         PR fortran/34848
 170         * trans-expr.c (gfc_conv_function_call): Don't call
 171         gfc_add_interface_mapping if the expression is NULL.
 172
 173 2008-01-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 174
 175         PR fortran/31610
 176         * trans-array.c (gfc_trans_create_temp_array): Remove call to
 177         gcc_assert (integer_zerop (loop->from[n])).
 178
 179 2008-01-25  Daniel Franke  <franke.daniel@gmail.com>
 180
 181         PR fortran/34661
 182         * resolve.c (resolve_where): Added check if user-defined assignment
 183         operator is an elemental subroutine.
 184         (gfc_resolve_where_code_in_forall): Likewise.
 185
 186 2008-01-24  Daniel Franke  <franke.daniel@gmail.com>
 187
 188         PR fortran/33375
 189         PR fortran/34858
 190         * gfortran.h: Revert changes from 2008-01-17.
 191         * match.c: Likewise.
 192         * symbol.c: Likewise.
 193         (gfc_undo_symbols): Undo namespace changes related to common blocks.
 194
 195 2008-01-24  Daniel Franke  <franke.daniel@gmail.com>
 196
 197         PR fortran/34202
 198         * data.c (formalize_structure_cons): Skip formalization on
 199         empty structures.
 200
 201 2008-01-24  Daniel Franke  <franke.daniel@gmail.com>
 202
 203         * gfortran.texi (OpenMP): Extended existing documentation.
 204         (contributors): Added major contributors of 2008 that were
 205         not listed yet.
 206         (proposed extensions): Removed implemented items.
 207
 208 2008-01-24  Paul Thomas  <pault@gcc.gnu.org>
 209
 210         PR fortran/34872
 211         * parse.c (next_statement) : If ST_GET_FCN_CHARACTERISTICS  is
 212         seen, check for a statement label and, if present, delete it
 213         and set the locus to the start of the statement.
 214
 215 2008-01-22  Paul Thomas  <pault@gcc.gnu.org>
 216
 217         PR fortran/34875
 218         * trans-io.c (gfc_trans_transfer): If the array reference in a
 219         read has a vector subscript, use gfc_conv_subref_array_arg to
 220         copy back the temporary.
 221
 222 2008-01-22  Tobias Burnus  <burnus@net-b.de>
 223
 224         PR fortran/34848
 225         * interface.c (compare_actual_formal): Fix adding type
 226         to missing_arg_type for absent optional arguments.
 227
 228 2008-01-22  Tobias Burnus  <burnus@net-b.de>
 229
 230         PR fortran/34907
 231         * parse.c (parse_spec): Change = into ==.
 232
 233 2008-01-22  Daniel Franke  <franke.daniel@gmail.com>
 234
 235         PR fortran/34915
 236         * expr.c (check_elemental): Fix check for valid data types.
 237
 238 2008-01-22  Tobias Burnus  <burnus@net-b.de>
 239
 240         PR fortran/34899
 241         * scanner.c (load_line): Support <tab><digit> continuation lines.
 242         * invoke.texi (-Wtabs): Document this.
 243
 244 2008-01-22  Paul Thomas  <pault@gcc.gnu.org>
 245
 246         PR fortran/34896
 247         * module.c (read_module): Set use_rename attribute.
 248
 249 2007-01-21  Tobias Burnus  <burnus@net-b.de>
 250
 251         PR fortran/34901
 252         * interface.c (compare_parameter): Improved error message
 253         for arguments of same type and mismatched kinds.
 254
 255 2008-01-20  Paul Thomas  <pault@gcc.gnu.org>
 256
 257         PR fortran/34861
 258         * resolve.c (resolve_entries): Do not do an array bounds check
 259         if the result symbols are the same.
 260
 261         PR fortran/34854
 262         * module.c (read_module) : Hide the symtree of the previous
 263         version of the symbol if this symbol is renamed.
 264
 265 2008-01-20  Paul Thomas  <pault@gcc.gnu.org>
 266
 267         PR fortran/34784
 268         * array.c (gfc_check_constructor_type): Clear the expression ts
 269         so that the checking starts from the deepest level of array
 270         constructor.
 271         * primary.c (match_varspec): If an unknown type is changed to
 272         default character and the attempt to match a substring fails,
 273         change it back to unknown.
 274
 275         PR fortran/34785
 276         * trans-array.c (gfc_add_loop_ss_code) : If ss->string_length is
 277         NULL for an array constructor, use the cl.length expression to
 278         build it.
 279         (gfc_conv_array_parameter): Change call to gfc_evaluate_now to
 280         a tree assignment.
 281
 282 2008-01-19  Thomas Koenig  <tkoenig@gcc.gnu.org>
 283
 284         PR fortran/34817
 285         PR fortran/34838
 286         * iresolve.c (gfc_resolve_all):  Remove conversion of mask
 287         argument to kind=1 by removing call to resolve_mask_arg().
 288         (gfc_resolve_any):  Likewise.
 289
 290 2008-01-19  Tobias Burnus  <burnus@net-b.de>
 291
 292         PR fortran/34760
 293         * primary.c (match_variable): Handle FL_UNKNOWN without
 294         uneducated guessing.
 295         (match_variable): Improve error message.
 296
 297 2008-01-18  Tobias Burnus  <burnus@net-b.de>
 298
 299         PR fortran/32616
 300         * interface.c (get_expr_storage_size): Return storage size
 301         for array element designators.
 302         (compare_actual_formal): Reject unequal string sizes for
 303         assumed-shape dummy arguments. And fix error message for
 304         array-sections with vector subscripts.
 305
 306 2008-01-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 307
 308         PR fortran/34556
 309         * simplify.c (is_constant_array_expr): New static function that returns
 310         true if the given expression is an array and is constant.
 311         (gfc_simplify_reshape): Use new function.
 312
 313 2008-01-17  H.J. Lu  <hongjiu.lu@intel.com>
 314
 315         PR fortran/33375
 316         * symbol.c (free_common_tree): Renamed to ...
 317         (gfc_free_common_tree): This.  Remove static.
 318         (gfc_free_namespace): Updated.
 319
 320         * gfortran.h (gfc_free_common_tree): New.
 321
 322         * match.c (gfc_match_common): Call gfc_free_common_tree () with
 323         gfc_current_ns->common_root and set gfc_current_ns->common_root
 324         to NULL on syntax error.
 325
 326 2008-01-18  Richard Sandiford  <rsandifo@nildram.co.uk>
 327
 328         PR fortran/34686
 329         * trans-expr.c (gfc_conv_function_call): Use proper
 330         type for returned character pointers.
 331
 332 2008-01-17  Paul Thomas  <pault@gcc.gnu.org>
 333
 334         PR fortran/34429
 335         PR fortran/34431
 336         PR fortran/34471
 337         * decl.c : Remove gfc_function_kind_locus and
 338         gfc_function_type_locus. Add gfc_matching_function.
 339         (match_char_length): If matching a function and the length
 340         does not match, return MATCH_YES and try again later.
 341         (gfc_match_kind_spec): The same.
 342         (match_char_kind): The same.
 343         (gfc_match_type_spec): The same for numeric and derived types.
 344         (match_prefix): Rename as gfc_match_prefix.
 345         (gfc_match_function_decl): Except for function valued character
 346         lengths, defer applying kind, type and charlen info until the
 347         end of specification block.
 348         gfortran.h (gfc_statement): Add ST_GET_FCN_CHARACTERISTICS.
 349         parse.c (decode_specification_statement): New function.
 350         (decode_statement): Call it when a function has kind = -1. Set
 351         and reset gfc_matching function, as function statement is being
 352         matched.
 353         (match_deferred_characteristics): Simplify with a single call
 354         to gfc_match_prefix. Do appropriate error handling. In any
 355         case, make sure that kind = -1 is reset or corrected.
 356         (parse_spec): Call above on seeing ST_GET_FCN_CHARACTERISTICS.
 357         Throw an error if kind = -1 after last specification statement.
 358         parse.h : Prototype for gfc_match_prefix.
 359
 360 2008-01-16  Tobias Burnus  <burnus@net-b.de>
 361
 362         PR fortran/34796
 363         * interface.c (compare_parameter): Allow AS_DEFERRED array
 364         elements and reject attr.pointer array elemenents.
 365         (get_expr_storage_size): Return storage size of elements of
 366         assumed-shape and pointer arrays.
 367
 368 2008-01-15  Sebastian Pop  <sebastian.pop@amd.com>
 369
 370         * f95-lang.c (gfc_init_builtin_functions): Initialize GOMP builtins
 371         for flag_tree_parallelize_loops.
 372
 373 2008-01-15  Thomas Koenig  <tkoenig@gcc.gnu.org>
 374
 375         PR libfortran/34671
 376         * iresolve.c (gfc_resolve_all):  Call resolve_mask_arg.
 377         (gfc_resolve_any):  Likewise.
 378         (gfc_resolve_count):  Likewise.  Don't append kind of
 379         argument to function name.
 380
 381 2008-01-13  Tobias Burnus  <burnus@net-b.de>
 382
 383         PR fortran/34665
 384         * resolve.c (resolve_actual_arglist): For expressions,
 385         also check for assume-sized arrays.
 386         * interface.c (compare_parameter): Move F2003 character checks
 387         here, print error messages here, reject elements of
 388         assumed-shape array as argument to dummy arrays.
 389         (compare_actual_formal): Update for the changes above.
 390
 391 2008-01-13  Tobias Burnus  <burnus@net-b.de>
 392
 393         PR fortran/34763
 394         * decl.c (contained_procedure): Only check directly preceeding state.
 395
 396 2008-01-13  Tobias Burnus  <burnus@net-b.de>
 397
 398         PR fortran/34759
 399         * check.c (gfc_check_shape): Accept array ranges of
 400         assumed-size arrays.
 401
 402 2008-01-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 403
 404         PR fortran/34432
 405         * match.c (gfc_match_name): Don't error if leading character is a '(',
 406         just return MATCH_NO.
 407
 408 2008-01-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 409
 410         PR fortran/34722
 411         * trans-io.c (create_dummy_iostat): Commit the symbol.
 412
 413 2008-01-11  Paul Thomas  <pault@gcc.gnu.org>
 414
 415         PR fortran/34537
 416         * simplify.c (gfc_simplify_transfer): Return NULL if the size
 417         of the element is unavailable and only assign character length
 418         to the result, if 'mold' is constant.
 419
 420 2008-01-10  Paul Thomas  <pault@gcc.gnu.org>
 421
 422         PR fortran/34396
 423         * trans-array.c (gfc_trans_array_ctor_element):  Use gfc_trans_string_copy
 424         to assign strings and perform bounds checks on the string length.
 425         (get_array_ctor_strlen): Remove bounds checking.
 426         (gfc_trans_array_constructor): Initialize string length checking.
 427         * trans-array.h : Add prototype for gfc_trans_string_copy.
 428
 429 2008-01-08  Richard Guenther  <rguenther@suse.de>
 430
 431         PR fortran/34706
 432         PR tree-optimization/34683
 433         * trans-types.c (gfc_get_array_type_bounds): Use an array type
 434         with known size for accesses if that is known.
 435
 436 2008-01-08  Paul Thomas  <pault@gcc.gnu.org>
 437
 438         PR fortran/34476
 439         * expr.c (find_array_element): Check that the array bounds are
 440         constant before using them.  Use lower, as well as upper bound.
 441         (check_restricted): Allow implied index variable.
 442
 443 2008-01-08  Paul Thomas  <pault@gcc.gnu.org>
 444
 445         PR fortran/34681
 446         * trans_array.c (gfc_trans_deferred_array): Do not null the
 447         data pointer on entering scope, nor deallocate it on leaving
 448         scope, if the symbol has the 'save' attribute.
 449
 450         PR fortran/34704
 451         * trans_decl.c (gfc_finish_var_decl): Derived types with
 452         allocatable components and an initializer must be TREE_STATIC.
 453
 454 2008-01-07  Paul Thomas  <pault@gcc.gnu.org>
 455
 456         PR fortran/34672
 457         * module.c (write_generic): Rewrite completely.
 458         (write_module): Change call to write_generic.
 459
 460 2008-01-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 461
 462         PR fortran/34659
 463         * scanner.c (load_line): Do not count ' ' as printable when checking for
 464         continuations.
 465
 466 2008-01-06  Paul Thomas  <pault@gcc.gnu.org>
 467
 468         PR fortran/34545
 469         * module.c (load_needed): If the namespace has no proc_name
 470         give it the module symbol.
 471
 472 2008-01-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 473
 474         PR fortran/34387
 475         * trans-expr.c (gfc_conv_missing_dummy): Use a temporary to type convert
 476         the dummy variable expression, test for NULL, and pass the variable
 477         address to the called function.
 478
 479 2007-01-06  Tobias Burnus  <burnus@net-b.de>
 480
 481         PR fortran/34658
 482         * match.c (gfc_match_common): Remove blank common in
 483         DATA BLOCK warning.
 484         * resolve.c (resolve_common_vars): New function.
 485         (resolve_common_blocks): Move checks to resolve_common_vars
 486         and invoke that function.
 487         (resolve_types): Call resolve_common_vars for blank commons.
 488
 489 2008-01-06  Tobias Burnus  <burnus@net-b.de>
 490
 491         PR fortran/34655
 492         * resolve.c (resolve_equivalence_derived): Reject derived types with
 493         default initialization if equivalenced with COMMON variable.
 494
 495 2008-01-06  Tobias Burnus  <burnus@net-b.de>
 496
 497         PR fortran/34654
 498         * io.c (check_io_constraints): Disallow unformatted I/O for
 499         internal units.
 500
 501 2008-01-06  Tobias Burnus  <burnus@net-b.de>
 502
 503         PR fortran/34660
 504         * resolve.c (resolve_formal_arglist): Reject dummy procedure in
 505         ELEMENTAL functions.
 506
 507 2008-01-06  Tobias Burnus  <burnus@net-b.de>
 508
 509         PR fortran/34662
 510         * interface.c (compare_actual_formal): Reject parameter
 511         actual to intent(out) dummy.
 512
 513 2008-01-04  Tobias Burnus  <burnus@net-b.de>
 514
 515         PR fortran/34557
 516         * primary.c (match_varspec): Gobble whitespace before
 517         checking for '('.