gcc/fortran/ChangeLog

   1 2006-11-19  Erik Edelmann  <eedelman@gcc.gnu.org>
   2
   3         * resolve.c (resolve_ref): Check for ALLOCATABLEs to the right of
   4           nonzero rank part references too.
   5
   6 2006-11-19  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
   7
   8         * module.c (gfc_use_module): Uncomment the ISO_FORTRAN_ENV code.
   9         Check that intrinsic and non-intrinsic modules don't conflict.
  10         (use_iso_fortran_env_module): New function.
  11         (create_int_parameter): New function.
  12         * trans-types.c (gfc_init_kinds): Choose values for
  13         gfc_numeric_storage_size and gfc_character_storage_size.
  14         (gfc_numeric_storage_size, gfc_character_storage_size): New variables.
  15         * resolve.c (resolve_symbol): Do no check intrinsic modules
  16         against the list of intrinsic symbols.
  17         * iso-fortran-env.def: New file.
  18         * gfortran.h (gfc_numeric_storage_size,
  19         gfc_character_storage_size): Add prototypes.
  20
  21 2006-11-18  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
  22
  23         PR fortran/24285
  24         * io.c (check_format): Allow dollars everywhere in format, and
  25         issue a warning.
  26
  27 2006-11-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
  28
  29         * gfortran.h (gfc_add_intrinsic_modules_path,
  30         gfc_open_intrinsic_module): New prototypes.
  31         (gfc_add_include_path, gfc_open_included_file): Update prototypes.
  32         * lang.opt: Add -fintrinsic-modules-path option.
  33         * module.c (gfc_match_use): Match the Fortran 2003 form of
  34         USE statement.
  35         (gfc_use_module): Also handle intrinsic modules.
  36         * scanner.c (gfc_directorylist): Add use_for_modules for field.
  37         (intrinsic_modules_dirs): New static variable.
  38         (add_path_to_list, gfc_add_intrinsic_modules_path): New functions.
  39         (gfc_add_include_path): Use the new add_path_to_list helper
  40         function.
  41         (gfc_release_include_path): Free memory for intrinsic_modules_dirs.
  42         (open_included_file, gfc_open_intrinsic_module): New functions.
  43         (gfc_open_included_file): Use the new open_included_file
  44         helper function.
  45         * lang-specs.h: Use the new -fintrinsic-modules-path option.
  46         * parse.c (decode_statement): Do not match the required space
  47         after USE here.
  48         * options.c (gfc_handle_option): Handle the new option. Use new
  49         prototype for gfc_add_include_path.
  50         (gfc_post_options): Use new prototype for gfc_add_include_path.
  51
  52 2006-11-16  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
  53
  54         PR fortran/29391
  55         PR fortran/29489
  56         * simplify.c (simplify_bound): Fix the simplification of
  57         LBOUND/UBOUND intrinsics.
  58         * trans-intrinsic.c (simplify_bound): Fix the logic, and
  59         remove an erroneous assert.
  60
  61 2006-11-16  Francois-Xavier Coudert  <fxcoudert@gcc.gnu,org>
  62
  63         * trans-decl.c (gfc_get_symbol_decl): Fix formatting.
  64
  65 2006-11-15  Brooks Moses  <brooks.moses@codesourcery.com>
  66
  67         * data.c: Remove trailing periods from error messages.
  68         * decl.c: Likewise.
  69         * expr.c: Likewise.
  70         * io.c: Likewise.
  71         * match.c: Likewise.
  72         * module.c: Likewise.
  73         * options.c: Likewise.
  74         * resolve.c: Likewise.
  75         * symbol.c: Likewise.
  76         * trans-io.c: Likewise.
  77
  78 2006-11-15  Brooks Moses  <brooks.moses@codesourcery.com>
  79
  80         * lang.opt: Rearrange entries back into ASCII order.
  81
  82 2006-11-15  Tobias Burnus  <burnus@net-b.de>
  83
  84         * parse.c (parse_contained): Fix indention
  85           of one line.
  86
  87 2006-11-15  Tobias Burnus  <burnus@net-b.de>
  88
  89         PR fortran/27546
  90         * decl.c (gfc_match_import,variable_decl):
  91           Add IMPORT support.
  92           (gfc_match_kind_spec): Fix typo in gfc_error.
  93         * gfortran.h (gfc_namespace, gfc_statement):
  94           Add IMPORT support.
  95         * parse.c (decode_statement,gfc_ascii_statement,
  96           verify_st_order): Add IMPORT support.
  97         * match.h: Add gfc_match_import.
  98         * gfortran.texi: Add IMPORT to the supported
  99           Fortran 2003 features.
 100
 101 2006-11-15  Tobias Burnus  <burnus@net-b.de>
 102             Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 103
 104         PR fortran/27588
 105         * trans-expr.c (gfc_conv_substring): Add bounds checking.
 106           (gfc_conv_variable, gfc_conv_substring_expr): Pass more
 107           arguments to gfc_conv_substring.
 108
 109 2006-11-15  Tobias Burnus  <burnus@net-b.de>
 110
 111         PR fortran/29806
 112         * parse.c (parse_contained): Check for empty contains statement.
 113
 114 2006-11-15  Bud Davis <bdavis9659@sbcglobal.net>
 115
 116         PR fortran/28974
 117         * gfortran.h (gfc_expr): Add element which holds a splay-tree
 118         for the exclusive purpose of quick access to a constructor by
 119         offset.
 120         * data.c (find_con_by_offset): Use the splay tree for the search.
 121         (gfc_assign_data_value): Use the splay tree.
 122         (gfc_assign_data_value_range): ditto.
 123         * expr.c (gfc_get_expr): Initialize new element to null.
 124         (gfc_free_expr): Delete splay tree when deleting gfc_expr.
 125
 126 2006-11-14  Brooks Moses  <brooks.moses@codesourcery.com>
 127
 128         PR fortran/29702
 129         * error.c (show_loci): Move column-offset calculation to
 130         show_locus.
 131         (show_locus): Remove blank lines before "Included in"
 132         lines, clean up code, calculate column-offsets, print
 133         column number is error-header lines as appropriate.
 134         (error_integer): (new function) Print integer to error
 135         buffer.
 136         (error_print): Use error_integer, avoid possible buffer
 137         overflows from buggy error formats.
 138
 139 2006-11-14  Brooks Moses  <brooks.moses@codesourcery.com>
 140
 141         * gfortran.h (GFC_MAX_LINE): Remove constant definition.
 142         (gfc_option_t): Clarify comments.
 143         * options.c: Set default line length limits to actual default
 144         values, rather than flag values.
 145         * scanner.c: Eliminate checking and handling of the
 146         fixed/free_line_length flag values.
 147
 148 2006-11-14  Brooks Moses  <brooks.moses@codesourcery.com>
 149
 150         * lang.opt: Remove -fno-backend option.
 151         * gfortran.h (gfc_option_t): Remove flag_no_backend.
 152         * options.c (gfc_init_options): Remove flag_no_backend.
 153         (gfc_handle_option): Remove -fno-backend option handler.
 154         * parse.c (gfc_parse_file): Remove references to
 155         gfc_option.flag_no_backend.
 156
 157 2006-11-14  Tobias Burnus  <burnus@net-b.de>
 158
 159         * match.c (gfc_match_namelist): Add missing space to
 160           error message.
 161
 162 2006-11-14  Tobias Burnus  <burnus@net-b.de>
 163
 164         PR fortran/29657
 165         * symbol.c (check_conflict): Add further conflicts.
 166
 167 2006-11-13  Jakub Jelinek  <jakub@redhat.com>
 168
 169         PR fortran/29759
 170         * fortran/scanner.c (skip_free_comments): Clear openmp_flag
 171         before returning true.
 172
 173 2006-11-12  Andrew Pinski  <andrew_pinski@playstation.sony.com>
 174
 175         PR fortran/26994
 176         * trans-expr.c (gfc_conv_expr_reference): Set TREE_STATIC on the
 177         new CONST_DECL.
 178
 179 2006-11-11  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
 180
 181         * array.c: Add 2006 to copyright years.
 182         * data.c: Same.
 183         * interface.c: Same.
 184         * misc.c: Same.
 185         * trans-io.c: Same.
 186
 187 2006-11-11  Richard Guenther  <rguenther@suse.de>
 188
 189         * trans-intrinsic.c (enum rounding_mode): New enum.
 190         (build_fix_expr, gfc_conv_intrinsic_aint, gfc_conv_intrinsic_mod,
 191         gfc_conv_intrinsic_function): Use it instead of FIX_CEIL_EXPR,
 192         FIX_FLOOR_EXPR, FIX_ROUND_EXPR and FIX_TRUNC_EXPR.
 193
 194 2006-11-10  Brooks Moses  <brooks.moses@codesourcery.com>
 195
 196         * lang.opt (-fmodule-private): Remove option.
 197         * gfortran.h (gfc_option_t): Remove module_access_private flag.
 198         * options.c (gfc_init_options): Remove initialization for it.
 199         (gfc_handle_option): Remove handling for -fmodule-private.
 200         * module.c (gfc_check_access): Add comments, remove check for
 201         gfc_option.flag_module_access_private.
 202
 203 2006-11-10 Paul Thomas <pault@gcc.gnu.org>
 204
 205         PR fortran/29758
 206         * check.c (gfc_check_reshape): Check that there are enough
 207         elements in the source array as to be able to fill an array
 208         defined by shape, when pad is absent.
 209
 210 2006-11-10 Paul Thomas <pault@gcc.gnu.org>
 211
 212         PR fortran/29315
 213         * trans-expr.c (is_aliased_array): Treat correctly the case where the
 214         component is itself and array or array reference.
 215
 216 2006-11-09  Brooks Moses  <brooks.moses@codesourcery.com>
 217
 218         * check.c (same_type_check): Typo fix in comment.
 219
 220 2006-11-09 Paul Thomas <pault@gcc.gnu.org>
 221
 222         PR fortran/29431
 223         * trans-array.c    (get_array_ctor_strlen): If we fall through to
 224         default, use a constant character length if it is available.
 225
 226 2006-11-09 Paul Thomas <pault@gcc.gnu.org>
 227
 228         PR fortran/29744
 229         * trans-types.c (gfc_get_derived_type): Ensure that the
 230         proc_name namespace is not the same as the owner namespace and
 231         that identical derived types in the same namespace share the
 232         same backend_decl.
 233
 234 2006-11-09 Paul Thomas <pault@gcc.gnu.org>
 235
 236         PR fortran/29699
 237         * trans-array.c (structure_alloc_comps): Detect pointers to
 238         arrays and use indirect reference to declaration.
 239         * resolve.c (resolve_fl_variable): Tidy up condition.
 240         (resolve_symbol): The same and only add initialization code if
 241         the symbol is referenced.
 242         * trans-decl.c (gfc_trans_deferred_vars): Call gfc_trans_
 243         deferred_array before gfc_trans_auto_array_allocation.
 244
 245         PR fortran/21370
 246         * symbol.c (check_done): Remove.
 247         (gfc_add_attribute): Remove reference to check_done and remove
 248         the argument attr_intent.
 249         (gfc_add_allocatable, gfc_add_dimension, gfc_add_external,
 250         gfc_add_intrinsic, gfc_add_optional, gfc_add_pointer,
 251         gfc_add_cray_pointer, gfc_add_cray_pointee, gfc_add_result,
 252         gfc_add_target, gfc_add_in_common, gfc_add_elemental,
 253         gfc_add_pure, gfc_add_recursive, gfc_add_procedure,
 254         gfc_add_type): Remove references to check_done.
 255         * decl.c (attr_decl1): Eliminate third argument in call to
 256         gfc_add_attribute.
 257         * gfortran.h : Change prototype for gfc_add_attribute.
 258
 259 2006-11-08  Brooks Moses  <brooks.moses@codesourcery.com>
 260
 261         * invoke.texi: Added documentation for -fmax-errors option.
 262
 263 2006-11-08  Brooks Moses  <brooks.moses@codesourcery.com>
 264
 265         * lang.opt: Add -fmax-errors= option.
 266         * gfortran.h (gfc_option_t): Add max_errors element.
 267         * options.c (gfc_init_options): Set max_errors default value
 268         to 25.
 269         (gfc_handle_options): Assign -fmax_errors value to
 270         gfc_option.max_errors.
 271         * error.c (gfc_increment_error_count): New function, which
 272         also checks whether the error count exceeds max_errors.
 273         (gfc_warning): Use it.
 274         (gfc_warning_now): Use it.
 275         (gfc_notify_std): Use it.
 276         (gfc_error): Use it.
 277         (gfc_error_now): Use it.
 278         (gfc_error_check): Use it.
 279
 280 2006-11-08  Brooks Moses  <brooks.moses@codesourcery.com>
 281
 282         * lang.opt: Remove non-working -qkind= option.
 283         * gfortran.h (gfc_option_t): Remove q_kind member.
 284         * options.c (gfc_init_options): Remove q_kind initialization.
 285         (gfc_handle_option): Remove -qkind= option handling.
 286         * primary.c: (match_real_constant): Remove 'Q' exponent.
 287
 288 2006-11-08  Tobias Burnus  <burnus@net-b.de>
 289
 290         * gfortran.texi: Add volatile and internal-file
 291           namelist to Fortran 2003 status.
 292         * intrinsic.texi: Correct CHMOD entry.
 293
 294 2006-11-07  Paul Thomas  <pault@gcc.gnu.org>
 295
 296         PR fortran/29539
 297         PR fortran/29634
 298         * decl.c (variable_decl): Add test for presence of proc_name.
 299         * error.c (gfc_error_flag_test): New function.
 300         * gfortran.h : Prototype for gfc_error_flag_test.
 301
 302 2006-11-07  Tobias Burnus  <burnus@net-b.de>
 303
 304         PR fortran/29601
 305         * symbol.c (check_conflict, gfc_add_volatile): Add volatile support.
 306         * decl.c (match_attr_spec, gfc_match_volatile): Add volatile support.
 307         * gfortran.h (symbol_attribute): Add volatile_ to struct.
 308         * resolve.c (was_declared): Add volatile support.
 309         * trans-decl.c (gfc_finish_var_decl): Add volatile support.
 310         * match.h: Declare gfc_match_volatile.
 311         * parse.c (decode_statement): Recognize volatile.
 312         * modules.c (ab_attribute, attr_bits, mio_symbol_attribute):
 313           Add volatile support.
 314         * dump-parse-tree.c (gfc_show_attr): Add volatile support.
 315
 316 2006-11-06  Tobias Burnus  <burnus@net-b.de>
 317
 318         * decl.c (match_attr_spec, gfc_match_enum): Unify gfc_notify_std
 319           message for GFC_STD_F2003.
 320         * array.c (gfc_match_array_constructor): Unify gfc_notify_std
 321           message for GFC_STD_F2003.
 322         * io.c (check_io_constraints): Unify gfc_notify_std message for
 323           GFC_STD_F2003.
 324         * resolve.c (resolve_actual_arglist): Unify gfc_notify_std message
 325           for GFC_STD_F2003.
 326
 327 2006-11-06  Brooks Moses  <brooks.moses@codesourcery.com>
 328
 329         * intrinsic.texi: Added documentation for FTELL, GETLOG, and
 330         HOSTNM intrinsics.
 331
 332 2006-11-06  Erik Edelmann  <eedelman@gcc.gnu.org>
 333
 334         PR fortran/29630
 335         PR fortran/29679
 336         * expr.c (find_array_section): Support vector subscripts.  Don't
 337           add sizes for dimen_type == DIMEN_ELEMENT to the shape array.
 338
 339 2006-11-05  Bernhard Fischer  <aldot@gcc.gnu.org>
 340
 341         PR fortran/21061
 342         * error.c (gfc_warning): If warnings_are_errors then treat
 343         warnings as errors with respect to the exit code.
 344         (gfc_notify_std): Ditto.
 345         (gfc_warning_now): Ditto.
 346
 347 2006-11-05  Francois-Xavier Coudert  <fxcoudert@gcc.gnu,org>
 348             Paul Thomas  <pault@gcc.gnu.org>
 349
 350         PR fortran/24518
 351         * trans-intrinsic.c (gfc_conv_intrinsic_mod): Use built_in fmod
 352         for both MOD and MODULO, if it is available.
 353
 354         PR fortran/29565
 355         * trans-expr.c (gfc_conv_aliased_arg): For an INTENT(OUT), save
 356         the declarations from the unused loops by merging the block
 357         scope for each; this ensures that the temporary is declared.
 358
 359 2006-11-04  Brooks Moses  <brooks.moses@codesourcery.com>
 360
 361         * error.c (show_locus): Add trailing colon in error messages.
 362         (error_print): Avoid leading space in error lines.
 363
 364 2006-11-04  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 365
 366         PR fortran/29713
 367         * expr.c (gfc_simplify_expr): Correct memory allocation.
 368
 369 2006-11-02  Brooks Moses  <brooks.moses@codesourcery.com>
 370
 371         * error.c (show_locus): Remove "In file" from error messages.
 372
 373 2006-10-31  Geoffrey Keating  <geoffk@apple.com>
 374
 375         * trans-decl.c (gfc_generate_constructors): Update for removal
 376         of get_file_function_name.
 377
 378 2006-11-01  Bernhard Fischer  <aldot@gcc.gnu.org>
 379
 380         PR fortran/29537
 381         * trans-common.c (gfc_trans_common): If the blank common is
 382         in a procedure or program without a name then proc_name is null, so
 383         use the locus of the common.
 384         (gfc_sym_mangled_common_id): Fix whitespace.
 385         * match.c (gfc_match_common): Emit warning about blank common in
 386         block data.
 387
 388 2006-10-31  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 389
 390         PR fortran/29067
 391         * decl.c (gfc_set_constant_character_len): NULL-terminate the
 392         character constant string.
 393         * data.c (create_character_intializer): Likewise.
 394         * expr.c (gfc_simplify_expr): NULL-terminate the substring
 395         character constant.
 396         * primary.c (match_hollerith_constant): NULL-terminate the
 397         character constant string.
 398
 399 2006-10-31  Paul Thomas  <pault@gcc.gnu.org>
 400
 401         PR fortran/29387
 402         * trans-intrinsic.c (gfc_conv_intrinsic_len): Rearrange to have
 403         a specific case for EXPR_VARIABLE and, in default, build an ss
 404         to call gfc_conv_expr_descriptor for array expressions..
 405
 406         PR fortran/29490
 407         * trans-expr.c (gfc_set_interface_mapping_bounds): In the case
 408         that GFC_TYPE_ARRAY_LBOUND is not available, use descriptor
 409         values for it and GFC_TYPE_ARRAY_UBOUND.
 410
 411         PR fortran/29641
 412         * trans-types.c (gfc_get_derived_type): If the derived type
 413         namespace has neither a parent nor a proc_name, set NULL for
 414         the search namespace.
 415
 416 2006-10-30  Tobias Burnus  <burnus@net-b.de>
 417
 418         PR fortran/29452
 419         * io.c (check_io_constraints): Fix keyword string comparison.
 420
 421 2006-10-30  Andrew Pinski  <pinskia@gmail.com>
 422
 423         PR fortran/29410
 424         * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer):
 425         Change over to create VIEW_CONVERT_EXPR instead of using an
 426         ADDR_EXPR, a cast and then an indirect reference
 427
 428 2006-10-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 429
 430         * trans-intrinsic.c (gfc_conv_intrinsic_loc): Make LOC return a
 431         signed integer node.
 432
 433 2006-10-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 434
 435         PR fortran/17741
 436         * decl.c (get_proc_name): Bump current namespace refs count.
 437
 438 2006-10-29  Jakub Jelinek  <jakub@redhat.com>
 439
 440         PR fortran/29629
 441         * trans-openmp.c (gfc_trans_omp_array_reduction): Set attr.flavor
 442         of init_val_sym and outer_sym to FL_VARIABLE.
 443
 444 2006-10-29  Kazu Hirata  <kazu@codesourcery.com>
 445
 446         * intrinsic.texi: Fix a typo.
 447
 448 2006-10-27  Steven G. Kargl  <kargl@gcc.gnu.org>
 449
 450         * gfortran.h: Remove GFC_MPFR_TOO_OLD.
 451         * arith.c (arctangent2): Remove function
 452         (gfc_check_real_range): Remove subnormal kludge.
 453         * arith.h: Remove arctangent2 prototype.
 454         * simplify.c: (gfc_simplify_atan2): Remove use of arctangent2.
 455         (gfc_simplify_exponent, gfc_simplify_log, gfc_simplify_nearest,
 456         gfc_simplify_rrspacing, gfc_simplify_spacing): Remove mpfr kludges.
 457
 458 2006-10-28  Tobias Burnus  <burnus@net-b.de>
 459
 460         PR fortran/28224
 461         * io.c (check_io_constraints): Allow namelists
 462           for internal files for Fortran 2003.
 463
 464 2006-10-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 465
 466         PR fortran/27954
 467         * decl.c (gfc_free_data_all): New function to free all data structures
 468         after errors in DATA statements and declarations.
 469         (top_var_list): Use new function.(top_val_list): Use new function.
 470         (gfc_match_data_decl): Use new function.
 471         * misc.c (gfc_typename): Fixed incorrect function name in error text.
 472
 473 2006-10-24  Erik Edelmann  <eedelman@gcc.gnu.org>
 474
 475         PR fortran/29393
 476         * expr.c (simplify_parameter_variable): Keep rank of original
 477         expression.
 478
 479 2006-10-23 Rafael Avila de Espindola  <rafael.espindola@gmail.com>
 480
 481         * Make-lang.in (f951$(exeext)): Depend on and link with attribs.o.
 482         * trans.h (builtin_function): Rename to gfc_builtin_function.
 483         Change the signature.
 484         * 95-lang.c (LANG_HOOKS_BUILTIN_FUNCTION): Define as
 485         gfc_builtin_function.
 486         (builtin_function): Rename to gfc_builtin_function. Move common
 487         code to builtin_function.
 488         (gfc_define_builtin): Replace calls to builtin_function with
 489         gfc_define_builtin.
 490
 491 2006-10-22  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 492
 493         PR fortran/26025
 494         * lang.opt: Add -fexternal-blas and -fblas-matmul-limit options.
 495         * options.c (gfc_init_options): Initialize new flags.
 496         (gfc_handle_option): Handle new flags.
 497         * gfortran.h (gfc_option): Add flag_external_blas and
 498         blas_matmul_limit flags.
 499         * trans-expr.c (gfc_conv_function_call): Use new argument
 500         append_args, appending it at the end of the argument list
 501         built for a function call.
 502         * trans-stmt.c (gfc_trans_call): Use NULL_TREE for the new
 503         append_args argument to gfc_trans_call.
 504         * trans.h (gfc_conv_function_call): Update prototype.
 505         * trans-decl.c (gfc_build_intrinsic_function_decls): Add
 506         prototypes for BLAS ?gemm routines.
 507         * trans-intrinsic.c (gfc_conv_intrinsic_funcall): Generate the
 508         extra arguments given to the library matmul function, and give
 509         them to gfc_conv_function_call.
 510         * invoke.texi: Add documentation for -fexternal-blas and
 511         -fblas-matmul-limit.
 512
 513 2006-10-21  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
 514
 515         * Make-lang.in (F95_LIBS): Delete.
 516         * f951$(exeext): Use $(LIBS) instead of $(F95_LIBS).
 517         * config-lang.in (need_gmp): Delete.
 518
 519 2006-10-19  Brooks Moses  <bmoses@stanford.edu>
 520
 521         * invoke.texi: Fixed "denormal" typo.
 522
 523 2006-10-19  Paul Thomas <pault@gcc.gnu.org>
 524
 525         PR fortran/29216
 526         PR fortran/29314
 527         * gfortran.h : Add EXEC_INIT_ASSIGN.
 528         * dump-parse-tree.c (gfc_show_code_node): The same.
 529         * trans-openmp.c (gfc_trans_omp_array_reduction): Set new
 530         argument for gfc_trans_assignment to false.
 531         * trans-stmt.c (gfc_trans_forall_1): The same.
 532         * trans-expr.c (gfc_conv_function_call, gfc_trans_assign,
 533         gfc_trans_arrayfunc_assign, gfc_trans_assignment): The
 534         same. In the latter function, use the new flag to stop
 535         the checking of the lhs for deallocation.
 536         (gfc_trans_init_assign): New function.
 537         * trans-stmt.h : Add prototype for gfc_trans_init_assign.
 538         * trans.c (gfc_trans_code): Implement EXEC_INIT_ASSIGN.
 539         * trans.h : Add new boolean argument to the prototype of
 540         gfc_trans_assignment.
 541         * resolve.c (resolve_allocate_exp): Replace EXEC_ASSIGN by
 542         EXEC_INIT_ASSIGN.
 543         (resolve_code): EXEC_INIT_ASSIGN does not need resolution.
 544         (apply_default_init): New function.
 545         (resolve_symbol): Call it for derived types that become
 546         defined but which do not already have an initialization
 547         expression..
 548         * st.c (gfc_free_statement): Include EXEC_INIT_ASSIGN.
 549
 550 2006-10-16  Tobias Burnus  <burnus@net-b.de>
 551
 552         * primary.c: Revert 'significand'-to-'significant' comment change.
 553         * invoke.texi (Warning Options): Minor cleanup for
 554           -Wimplicit-interface.
 555
 556 2006-10-17  Paul Thomas <pault@gcc.gnu.org>
 557
 558         PR fortran/29451
 559         * trans-array.c (gfc_trans_array_bounds): Test for and set
 560         negative stride of a non-constant bound array to zero.
 561
 562         PR fortran/29392
 563         * data.c (create_character_intializer): Copy and simplify
 564         the expressions for the start and end of a sub-string
 565         reference.
 566
 567 2006-10-16  Kaz Kojima  <kkojima@rr.iij4u.or.jp>
 568
 569         * io.c (gfc_match_close): Ensure that status is terminated by
 570         a NULL element.
 571
 572 2006-10-16  Tobias Burnus  <burnus@net-b.de>
 573
 574         * trans-stmt.c: Fix a typo
 575         * invoke.texi: Fix typos
 576         * resolve.c: Fix a comment typo
 577         * trans-decl.c: Fix a comment typo
 578         * primary.c: Fix a comment typo
 579
 580 2006-10-15  Steven G. Kargl  <kargl@gcc.gnu.org>
 581
 582         PR fortran/29403
 583         * io.c (match_io):  Check for a default-char-expr for PRINT format.
 584
 585 2006-10-15  Bernhard Fischer  <aldot@gcc.gnu.org>
 586
 587         PR fortran/24767
 588         * lang.opt (Wunused-labels): Remove.
 589         * options.c: Remove references to gfc_option.warn_unused_labels.
 590         * gfortran.h: Remove variable warn_unused_labels.
 591         * resolve.c (warn_unused_fortran_label) : Use warn_unused_label
 592         instead of gfc_option.warn_unused_labels.
 593         * invoke.texi: Remove documentation of -Wunused-labels.
 594
 595 2006-10-14  Tobias Burnus  <burnus@net-b.de>
 596
 597         * gfortran.texi: Add link to GFortran apps
 598         * intrinsic.texi: Updated documentation of ACCESS and CHMOD
 599
 600 2006-10-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 601
 602         PR fortran/19261
 603         * scanner.c (load_line): Add checks for illegal use of '&' and issue
 604         warnings.  Issue errors with -pedantic.
 605
 606 2006-10-14 Paul Thomas <pault@gcc.gnu.org>
 607
 608         PR fortran/29371
 609         * trans-expr.c (gfc_trans_pointer_assignment): Add the expression
 610         for the assignment of null to the data field to se->pre, rather
 611         than block.
 612
 613 2006-10-14  Kazu Hirata  <kazu@codesourcery.com>
 614
 615         * intrinsic.texi: Fix typos.
 616         * trans-array.c: Fix a comment typo.
 617
 618 2006-10-13  Brooks Moses  <bmoses@stanford.edu>
 619
 620         * intrinsic.texi (STAT): Reverted a format in example code to
 621         octal; noted this in accompanying string.
 622
 623 2006-10-13 Paul Thomas <pault@gcc.gnu.org>
 624
 625         PR fortran/29373
 626         * decl.c (get_proc_name, gfc_match_function_decl): Add
 627         attr.implicit_type to conditions that throw error for
 628         existing explicit interface and that allow new type-
 629         spec to be applied.
 630
 631         PR fortran/29407
 632         * resolve.c (resolve_fl_namelist): Do not check for
 633         namelist/procedure conflict, if the symbol corresponds
 634         to a good local variable declaration.
 635
 636         PR fortran/27701
 637         * decl.c (get_proc_name): Replace the detection of a declared
 638         procedure by the presence of a formal argument list by the
 639         attributes of the symbol and the presence of an explicit
 640         interface.
 641
 642         PR fortran/29232
 643         * resolve.c (resolve_fl_variable): See if the host association
 644         of a derived type is blocked by the presence of another type I
 645         object in the current namespace.
 646
 647         PR fortran/29364
 648         * resolve.c (resolve_fl_derived): Check for the presence of
 649         the derived type for a derived type component.
 650
 651         PR fortran/24398
 652         * module.c (gfc_use_module): Check that the first words in a
 653         module file are 'GFORTRAN module'.
 654
 655         PR fortran/29422
 656         * resolve.c (resolve_transfer): Test functions for suitability
 657         for IO, as well as variables.
 658
 659         PR fortran/29428
 660         * trans-expr.c (gfc_trans_scalar_assign): Remove nullify of
 661         rhs expression.
 662
 663 2006-10-13  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 664
 665         PR fortran/29391
 666         * trans-intrinsic.c (gfc_conv_intrinsic_bound): Generate correct
 667         code for LBOUND and UBOUND intrinsics.
 668
 669 2006-10-13  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 670
 671         PR fortran/21435
 672         * io.c (compare_to_allowed_values): New function.
 673         (gfc_match_open): Add checks for constant values of specifiers.
 674         (gfc_match_close): Add checks for constant values of the STATUS
 675         specifier.
 676
 677 2006-10-12  Brooks Moses  <bmoses@stanford.edu>
 678
 679         * intrinsic.texi (STAT): Fixed a format typo in sample code.
 680
 681 2006-10-12  Brooks Moses  <bmoses@stanford.edu>
 682
 683         * intrinsic.texi (STAT): Shortened lines in sample code.
 684
 685 2006-10-11  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 686
 687         * gfortran.h (gfc_show_actual_arglist, gfc_show_array_ref,
 688         gfc_show_array_spec, gfc_show_attr, gfc_show_code,
 689         gfc_show_components, gfc_show_constructor, gfc_show_equiv,
 690         gfc_show_expr, gfc_show_namelist, gfc_show_ref, gfc_show_symbol,
 691         gfc_show_typespec): Add prototypes.
 692         * dump-parse-tree.c (gfc_show_actual_arglist, gfc_show_array_ref,
 693         gfc_show_array_spec, gfc_show_attr, gfc_show_code,
 694         gfc_show_components, gfc_show_constructor, gfc_show_equiv,
 695         gfc_show_expr, gfc_show_namelist, gfc_show_ref, gfc_show_symbol,
 696         gfc_show_typespec): Remove 'static' from declaration.
 697
 698 2006-10-10  Brooks Moses  <bmoses@stanford.edu>
 699
 700         * invoke.texi, gfortran.texi: Corrected erronous dashes.
 701
 702 2006-10-10  Brooks Moses  <bmoses@stanford.edu>
 703
 704         * Make-lang.in: Added "fortran.pdf", "gfortran.pdf" target
 705         support.
 706
 707 2006-10-10  Daniel Franke  <franke.daniel@gmail.com>
 708
 709         * intrinsic.texi: added documentation for FSTAT, GETARG,GET_COMMAND,
 710         GET_COMMAND_ARGUMENT, GETENV, GET_ENVIRONMENT_VARIABLE, IAND, IARGC,
 711         LSTAT and STAT, removed the reference to PR19292 from ACCESS, CHMOD,
 712         GMTIME, LSHIFT, LTIME, RSHIFT.
 713
 714 2006-10-10  Brooks Moses  <bmoses@stanford.edu>
 715
 716         * gfortran.texi (Standards): Update to current status.
 717
 718 2006-10-09  Brooks Moses  <bmoses@stanford.edu>
 719
 720         * Make-lang.in: Added intrinsic.texi to GFORTRAN_TEXI
 721         dependences.
 722
 723 2006-10-09  Brooks Moses  <bmoses@stanford.edu>
 724
 725         * intrinsic.texi (MOVE_ALLOC): changed "Options" to "Standards".
 726
 727 2006-10-09  Steven G. Kargl  <kargl@gcc.gnu.org>
 728
 729         * gfortran.h: Define GFC_MPFR_TOO_OLD via mpfr version info.
 730         * arith.c (arctangent, gfc_check_real_range): Use it.
 731         * simplify.c (gfc_simplify_atan2, gfc_simplify_exponent,
 732         gfc_simplify_log, gfc_simplify_nearest): Use it.
 733
 734         PR fortran/15441
 735         PR fortran/29312
 736         * iresolve.c (gfc_resolve_rrspacing): Give rrspacing library
 737         routine hidden precision argument.
 738         (gfc_resolve_spacing): Give spacing library routine hidden
 739         precision, emin - 1, and tiny(x) arguments.
 740         * simplify.c (gfc_simplify_nearest): Remove explicit subnormalization.
 741         (gfc_simplify_rrspacing): Implement formula from Fortran 95 standard.
 742         (gfc_simplify_spacing): Implement formula from Fortran 2003 standard.
 743         * trans-intrinsic.c (gfc_intrinsic_map_t) Declare rrspacing and
 744         spacing via LIBF_FUNCTION
 745         (prepare_arg_info, call_builtin_clz, gfc_conv_intrinsic_spacing,
 746         gfc_conv_intrinsic_rrspacing): Remove functions.
 747         (gfc_conv_intrinsic_function): Remove calls to
 748         gfc_conv_intrinsic_spacing and gfc_conv_intrinsic_rrspacing.
 749         * f95-lang.c (gfc_init_builtin_functions): Remove __builtin_clz,
 750         __builtin_clzl and __builtin_clzll
 751
 752 2006-10-09  Richard Henderson  <rth@redhat.com>
 753
 754         Revert emutls patch.
 755
 756 2006-10-09  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 757
 758         * intrinsic.c (add_sym_0s, add_sym_1s, add_sym_2s, add_sym_3s,
 759         add_sym_4s, add_sym_5s, add_functions): Use macro ACTUAL_NO,
 760         ACTUAL_YES, NOT_ELEMENTAL and ELEMENTAL instead of constants
 761         0 and 1 as second and third arguments to add_sym* functions.
 762
 763 2006-10-08  Erik Edelmann <edelmann@gcc.gnu.org>
 764             Paul Thomas <pault@gcc.gnu.org>
 765
 766         PR fortran/20541
 767         * interface.c (gfc_compare_derived_types): Add comparison of
 768         the allocatable field.
 769         * intrinsic.c (add_subroutines): Add MOVE_ALLOC.
 770         * trans-expr.c (gfc_conv_aliased_arg, gfc_trans_subarray_assign,
 771         gfc_trans_subcomponent_assign, gfc_conv_string_parameter,
 772         gfc_trans_scalar_assign): Add extra arguments l_is_temp
 773         and r_is_var to references to latter function.
 774         (gfc_conv_function_call): Add enum for types of argument and
 775         an associated variable parm_kind. Deallocate components of
 776         INTENT(OUT) and non-variable arrays.
 777         (gfc_trans_subcomponent_assign): Add block to assign arrays
 778         to allocatable components.
 779         (gfc_trans_scalar_assign): Add block to handle assignments of
 780         derived types with allocatable components, using the above new
 781         arguments to control allocation/deallocation of memory and the
 782         copying of allocated arrays.
 783         * trans-array.c (gfc_array_allocate): Remove old identification
 784         of pointer and replace with that of an allocatable array. Add
 785         nullify of structures with allocatable components.
 786         (gfc_conv_array_initializer): Treat EXPR_NULL.
 787         (gfc_conv_array_parameter): Deallocate allocatable components
 788         of non-variable structures.
 789         (gfc_trans_dealloc_allocated): Use second argument of library
 790         deallocate to inhibit, without error, freeing NULL pointers.
 791         (get_full_array_size): New function to return the size of a
 792         full array.
 793         (gfc_duplicate_allocatable): New function to allocate and copy
 794         allocated data.
 795         (structure_alloc_comps): New recursive function to deallocate,
 796         nullify or copy allocatable components.
 797         (gfc_nullify_alloc_comp, gfc_deallocate_alloc_comp,
 798         gfc_copy_alloc_comp): New interface functions to call previous.
 799         (gfc_trans_deferred_array): Add the code to nullify allocatable
 800         components, when entering scope, and to deallocate them on
 801         leaving. Do not call gfc_trans_static_array_pointer and return
 802         for structures with allocatable components and default
 803         initializers.
 804         * symbol.c (gfc_set_component_attr): Set allocatable field.
 805         (gfc_get_component_attr): Set the allocatable attribute.
 806         * intrinsic.h : Prototype for gfc_check_move_alloc.
 807         * decl.c (build_struct): Apply TR15581 constraints for
 808         allocatable components.
 809         (variable_decl): Default initializer is always NULL for
 810         allocatable components.
 811         (match_attr_spec): Allow, or not, allocatable components,
 812         according to the standard in force.
 813         * trans-array.h : Prototypes for gfc_nullify_alloc_comp,
 814         gfc_deallocate_alloc_comp, gfc_copy_alloc_comp and
 815         gfc_duplicate_allocatable.
 816         * gfortran.texi : Add mention of TR15581 extensions.
 817         * gfortran.h : Add attribute alloc_comp, add
 818         gfc_components field allocatable and add the prototype
 819         for gfc_expr_to_initialize.
 820         * trans-stmt.c (generate_loop_for_temp_to_lhs,
 821         generate_loop_for_rhs_to_temp, gfc_trans_where_assign,
 822         gfc_trans_where_3): Add extra arguments to calls to
 823         gfc_trans_scalar_assign and set appropriately.
 824         (gfc_trans_allocate): Nullify allocatable components.
 825         (gfc_trans_deallocate): Deallocate to ultimate allocatable
 826         components but stop at ultimate pointer components.
 827         * module.c (mio_symbol_attribute, mio_symbol_attribute,
 828         mio_component): Add module support for allocatable
 829         components.
 830         * trans-types.c (gfc_get_derived_type): Treat allocatable
 831         components.
 832         * trans.h : Add two boolean arguments to
 833         gfc_trans_scalar_assign.
 834         * resolve.c (resolve_structure_cons): Check conformance of
 835         constructor element and the component.
 836         (resolve_allocate_expr): Add expression to nullify the
 837         constructor expression for allocatable components.
 838         (resolve_transfer): Inhibit I/O of derived types with
 839         allocatable components.
 840         (resolve_fl_derived): Skip check of bounds of allocatable
 841         components.
 842         * trans-decl.c (gfc_get_symbol_decl): Add derived types
 843         with allocatable components to deferred variable.
 844         (gfc_trans_deferred_vars): Make calls for derived types
 845         with allocatable components to gfc_trans_deferred_array.
 846         (gfc_generate_function_code): Nullify allocatable
 847         component function result on entry.
 848         * parse.c (parse_derived): Set symbol attr.allocatable if
 849         allocatable components are present.
 850         * check.c (gfc_check_allocated): Enforce attr.allocatable
 851         for intrinsic arguments.
 852         (gfc_check_move_alloc): Check arguments of move_alloc.
 853         * primary.c (gfc_variable_attr): Set allocatable attribute.
 854         * intrinsic.texi : Add index entry and section for
 855         for move_alloc.
 856
 857 2006-10-08  Paul Thomas <pault@gcc.gnu.org>
 858
 859         PR fortran/29115
 860         * resolve.c (resolve_structure_cons): It is an error if the
 861         pointer component elements of a derived type constructor are
 862         not pointer or target.
 863
 864
 865         PR fortran/29211
 866         * trans-stmt.c (generate_loop_for_temp_to_lhs,
 867         generate_loop_for_rhs_to_temp): Provide a string length for
 868         the temporary by copying that of the other side of the scalar
 869         assignment.
 870
 871 2006-10-08  Tobias Burnus  <burnus@net-b.de>
 872
 873         PR fortran/28585
 874         * intrinsic.c (add_functions): Add new_line Fortran 2003 intrinsic.
 875         * intrinsic.h: Add gfc_simplify_new_line and gfc_check_new_line
 876         prototypes.
 877         * check.c (gfc_check_new_line): New function.
 878         * simplify.c (gfc_simplify_new_line): New function.
 879         * intrinsic.texi: Document new_line intrinsic.
 880
 881 2006-10-07  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 882
 883         PR fortran/16580
 884         PR fortran/29288
 885         * gcc/fortran/intrinsic.c (add_sym): Define the actual_ok when a
 886         gfc_intrinsic_sym structure is filled.
 887         (gfc_intrinsic_actual_ok): New function.
 888         (add_sym_0s, add_sym_1s, add_sym_2s, add_sym_3s, add_sym_4s,
 889         add_sym_5s): Intrinsic subroutines are not allowed as actual
 890         arguments, so we remove argument actual_ok.
 891         (add_functions): Correct the values for actual_ok of all intrinsics.
 892         Add comments for gfc_check_access_func and gfc_resolve_index_func.
 893         (add_subroutines): Remove the actual_ok argument, which was never used.
 894         * gcc/fortran/intrinsic.h (gfc_intrinsic_actual_ok): New prototype.
 895         * gcc/fortran/gfortran.h (gfc_resolve_index_func): New prototype.
 896         * gcc/fortran/resolve.c (resolve_actual_arglist): Check whether
 897         an intrinsic used as an argument list is allowed there.
 898         * gcc/fortran/iresolve.c (gfc_resolve_index_func): New function.
 899         (gfc_resolve_len): Change intrinsic function name to agree with
 900         libgfortran.
 901         * gcc/fortran/trans-decl.c (gfc_get_extern_function_decl): Add
 902         new case, because some specific intrinsics take 3 arguments.
 903         * gcc/fortran/intrinsic.texi: DIMAG is a GNU extension.
 904
 905 2006-10-06  Jakub Jelinek  <jakub@redhat.com>
 906
 907         PR fortran/28415
 908         * trans-decl.c (gfc_finish_var_decl): With -fno-automatic, don't
 909         make artificial variables or pointer to variable automatic array
 910         TREE_STATIC.
 911
 912         * scanner.c (skip_free_comments): Return bool instead of void.
 913         (gfc_next_char_literal): Don't return ' ' if & is missing after
 914         !$omp or !$.  Use skip_{free,fixed}_comments directly instead
 915         of gfc_skip_comments.
 916
 917 2006-10-04  Brooks Moses  <bmoses@stanford.edu>
 918
 919         * gfortran.texi: (Current Status): update and rewrite to reflect
 920         actual status more accurately.
 921
 922 2006-10-04  Brooks Moses  <bmoses@stanford.edu>
 923
 924         * gfortran.texi: Consistently refer to the compiler as "GNU
 925         Fortran".
 926         * intrinsic.texi: Ditto.
 927         * invoke.texi: Ditto.
 928
 929 2006-10-04  Richard Henderson  <rth@redhat.com>
 930             Jakub Jelinek  <jakub@redhat.com>
 931
 932         * f95-lang.c (gfc_init_builtin_functions): Add __emutls_get_address
 933         and __emutls_register_common.
 934         * openmp.c (gfc_match_omp_threadprivate): Don't error if !have_tls.
 935         * trans-common.c (build_common_decl): Don't check have_tls.
 936         * trans-decl.c (gfc_finish_var_decl): Likewise.
 937         * types.def (BT_WORD, BT_FN_PTR_PTR): New.
 938         (BT_FN_VOID_PTR_WORD_WORD_PTR): New.
 939
 940 2006-10-04  Paul Thomas <pault@gcc.gnu.org>
 941
 942         PR fortran/29343
 943         * resolve.c (resolve_allocate_expr): Exclude derived types from
 944         search for dependences between allocated variables and the
 945         specification expressions for other allocations in the same
 946         statement.
 947
 948 2006-10-04  Paul Thomas  <pault@gcc.gnu.org>
 949
 950         PR fortran/29098
 951         * resolve.c (resolve_structure_cons): Do not return FAILURE if
 952         component expression is NULL.
 953
 954 2006-10-03  Paul Thomas  <pault@gcc.gnu.org>
 955
 956         PR fortran/20779
 957         PR fortran/20891
 958         * resolve.c (find_sym_in_expr): New function that returns true
 959         if a symbol is found in an expression.
 960         (resolve_allocate_expr): Check whether the STAT variable is
 961         itself allocated in the same statement.  Use the call above to
 962         check whether any of the allocated arrays are used in array
 963         specifications in the same statement.
 964
 965 2006-10-03  Steven G. Kargl  <kargl@gcc.gnu.org>
 966
 967         * arith.c (gfc_check_real_range):  Use correct exponent range for
 968         subnormal numbers.
 969
 970 2006-10-03  Paul Thomas  <pault@gcc.gnu.org>
 971
 972         PR fortran/29284
 973         PR fortran/29321
 974         PR fortran/29322
 975         * trans-expr.c (gfc_conv_function_call): Check the expression
 976         and the formal symbol are present when testing the actual
 977         argument.
 978
 979         PR fortran/25091
 980         PR fortran/25092
 981         * resolve.c (resolve_entries): It is an error if the entries
 982         of an array-valued function do not have the same shape.
 983
 984 2006-10-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 985
 986         PR middle-end/27478
 987         * trans-decl.c (gfc_get_fake_result_decl): Mark var as
 988         TREE_ADDRESSABLE.
 989
 990 2006-10-02  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 991
 992         PR fortran/19262
 993         * gfortran.h (gfc_option_t): Add max_continue_fixed and
 994         max_continue_free.
 995         * options.c (gfc_init_options): Initialize fixed form and free form
 996         consecutive continuation line limits.
 997         * scanner.c (gfc_scanner_init_1): Initialize continue_line
 998         and continue_count. (gfc_next_char_literal): Count the number of
 999         continuation lines in the current statement and warn if limit
1000         is exceeded.
1001
1002 2006-10-02  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1003
1004         PR fortran/19260
1005         * scanner.c (gfc_next_char_literal): Add check for missing '&'
1006         and warn if in_string, otherwise return ' '.
1007
1008 2006-10-02  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1009
1010         PR fortran/29210
1011         * primary.c (match_sym_complex_part): Named constants as real or
1012         imaginary part of complex a named constant are only allowed in
1013         Fortran 2003.
1014
1015 2006-10-01  Brooks Moses  <bmoses@stanford.edu>
1016
1017         * gfortran.texi: Corrected references to MALLOC intrinsic.
1018         * invoke.texi: Minor cleanup and clarification to the Dialect
1019         Options section.
1020
1021 2006-09-30  Brooks Moses  <bmoses@stanford.edu>
1022
1023         * invoke.texi:  Add mention of BOZ constants and integer
1024         overflow to -fno-range-check.
1025         * gfortran.texi:  Add mention of -fno-range-check to
1026         section on BOZ contants.
1027
1028 2006-09-30  Bernhard Fischer  <aldot@gcc.gnu.org>
1029
1030         * resolve.c: Fix commentary typo.  Fix whitespace.
1031
1032 2006-09-28  Steven G. Kargl  <kargl@gcc.gnu.org>
1033
1034         fortran/29147
1035         * arith.c (gfc_check_integer_range): Disable range checking via
1036         -fno-range-check.
1037
1038 2006-09-28  Steven G. Kargl <kargl@gcc.gnu.org>
1039
1040         * arith.c: Change conditional test for inclusion of arctangent().
1041         (gfc_check_real_range): Change conditional test for use of
1042         mpfr_subnormalize.
1043         * simplify.c (gfc_simplify_atan2): Fix conditional for use of
1044         mpfr_atan2() instead of arctangent().
1045         (gfc_simplify_exponent): Fix conditional for use of mpfr_get_exp().
1046         (gfc_simplify_log): Fix conditional for use of mpfr_atan2() instead
1047          of arctangent().
1048         (gfc_simplify_nearest): Fix conditional for use of mpfr_nextafter().
1049
1050 2006-09-27  Steven G. Kargl  <kargl@gcc.gnu.org>
1051
1052         * arith.c: Conditionally include arctangent2().
1053         (gfc_check_real_range): Use mpfr_subnormalize in preference to local
1054         hack.
1055         * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl): Append
1056         l for long double functions.
1057         * simplify.c: Wrap Copyright to new line.
1058         (gfc_simplify_atan2): Use mpfr_atan2 in preference to arctangent2().
1059         (gfc_simplify_log): Ditto.
1060
1061
1062         PR fortran/28276
1063         * simplify.c (gfc_simplify_exponent): Use mpfr_get_exp in
1064         preference to broken local hack.
1065
1066         PR fortran/27021
1067         * simplify.c (gfc_simplify_nearest): Use mpfr_nexttoward and
1068         mpfr_subnormalize to handle numbers near zero in preference to broken
1069          local hack.
1070
1071 2006-09-26  Jakub Jelinek  <jakub@redhat.com>
1072
1073         PR fortran/29097
1074         * scanner.c (include_line): Handle conditional include.
1075
1076 2006-09-25  Tobias Schluter  <tobias.schlueter@physik.uni-muenchen.de>
1077
1078         PR fortran/21203
1079         * error.c (show_loci): No need to risk an ICE to output a
1080         slightly nicer error message.
1081
1082 2006-09-19 Paul Thomas <pault@gcc.gnu.org>
1083            Steven Bosscher  <steven@gcc.gnu.org>
1084
1085         PR fortran/29101
1086         * trans-stmt.c (gfc_trans_character_select): Store the label
1087         from select_string and then clean up any temporaries from the
1088         conversion of the select expression, before branching to the
1089         selected case.
1090
1091 2006-09-18 Paul Thomas <pault@gcc.gnu.org>
1092
1093         PR fortran/28526
1094         * primary.c (match_variable): If the compiler is in a module
1095         specification block, an interface block or a contains section,
1096         reset host_flag to force the changed symbols mechanism.
1097
1098         PR fortran/29101
1099         * trans-stmt.c (gfc_trans_character_select): Add the post block
1100         for the expression to the main block, after the call to
1101         select_string and the last label.
1102
1103 2006-09-18  Paul Thomas  <pault@gcc.gnu.org>
1104
1105         PR fortran/29060
1106         * iresolve.c (resolve_spread): Build shape for result if the
1107         source shape is available and dim and ncopies are constants.
1108
1109 2006-09-18  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
1110
1111         PR fortran/28817
1112         PR fortran/21918
1113         * trans-decl.c (generate_local_decl): Change from 'warning' to
1114         'gfc_warning' to have line numbers correctly reported.
1115
1116 2006-09-15  Paul Thomas  <pault@gcc.gnu.org>
1117
1118         PR fortran/29051
1119         * decl.c (match_old_style_init): Set the 'where' field of the
1120         gfc_data structure 'newdata'.
1121
1122         * match.c (match_case_eos): Add a comprehensible error message.
1123
1124 2006-09-13  Wolfgang Gellerich  <gellerich@de.ibm.com>
1125
1126         * trans-expr.c (gfc_add_interface_mapping): For characters, dereference
1127         pointer if necessary and then perform the cast.
1128
1129 2006-09-11  Steven G. Kargl  <kargl@gcc.gnu.org>
1130
1131         * intrinsic.c: Update Copyright date.
1132         * intrinsic.h: Ditto.
1133
1134 2006-09-11  Paul Thomas  <pault@gcc.gnu.org>
1135
1136         PR fortran/28890
1137         * trans-expr.c (gfc_conv_function_call): Obtain the string length
1138         of a dummy character(*) function from the symbol if it is not
1139         already translated.  For a call to a character(*) function, use
1140         the passed, hidden string length argument, which is available
1141         from the backend_decl of the formal argument.
1142         * resolve.c (resolve_function): It is an error if a function call
1143         to a character(*) function is other than a dummy procedure or
1144         an intrinsic.
1145
1146 2006-09-10  Paul Thomas  <pault@gcc.gnu.org>
1147
1148         PR fortran/28959
1149         * trans-types.c (gfc_get_derived_type): Use the parent namespace of
1150         the procedure if the type's own namespace does not have a parent.
1151
1152 2006-09-10  Paul Thomas  <pault@gcc.gnu.org>
1153
1154         PR fortran/28923
1155         * expr.c (find_array_section): Only use the array lower and upper
1156         bounds for the start and end of the sections, where the expr is
1157         NULL.
1158
1159 2006-09-10  Paul Thomas <pault@gcc.gnu.org>
1160
1161         PR fortran/28914
1162         * trans-array.c (gfc_trans_array_constructor_value): Create a temporary
1163         loop variable to hold the current loop variable in case it is modified
1164         by the array constructor.
1165
1166 2006-09-07  Steven G. Kargl  <kargls@comcast.net>
1167
1168         * gfortran.h (gfc_integer_info): Eliminate max_int.
1169         * arith.c (gfc_arith_init_1): Remove initialization of max_int.
1170         (gfc_arith_done_1): Remove clearing of max_int.
1171         (gfc_check_integer_range): Fix range chekcing of overflow.
1172         * simplify.c (gfc_simplify_not): Construct mask that was max_int.
1173
1174 2006-09-05  Paul Thomas <pault@gcc.gnu.org>
1175
1176         PR fortran/28908
1177         * gfortran.h : Restore the gfc_dt_list structure and reference
1178         to it in gfc_namespace.
1179         * resolve.c (resolve_fl_derived): Restore the building of the
1180         list of derived types for the current namespace. Modify the
1181         restored code so that a check is made to see if the symbol is
1182         already in the list.
1183         (resolve_fntype): Make sure that the specification block
1184         version of the derived type is used for a module function that
1185         returns that type.
1186         * symbol.c (gfc_free_dt_list): Restore.
1187         (gfc_free_namespace): Restore call to previous.
1188         * trans-types.c (copy_dt_decls_ifequal): Restore.
1189         (gfc_get_derived_type): Restore all the paraphenalia for
1190         association of derived types, including calls to previous.
1191         Modify the restored code such that all derived types are built
1192         if their symbols are found in the parent namespace; not just
1193         non-module types.  Add backend_decls to like derived types in
1194         sibling namespaces, as well as that of the derived type.
1195
1196 2006-08-30  Kazu Hirata  <kazu@codesourcery.com>
1197
1198         * match.c: Fix a comment typo.
1199
1200 2006-08-30  Paul Thomas  <pault@gcc.gnu.org>
1201
1202         PR fortran/28885
1203         * trans-expr.c (gfc_conv_aliased_arg): Ensure that the temp
1204         declaration is retained for INTENT(OUT) arguments.
1205
1206         PR fortran/28873
1207         PR fortran/20067
1208         * resolve.c (resolve_generic_f): Make error message more
1209         comprehensible.
1210         (resolve_generic_s): Restructure search for specific procedures
1211         to be similar to resolve_generic_f and change to similar error
1212         message.  Ensure that symbol reference is refreshed, in case
1213         the search produces a NULL.
1214         (resolve_specific_s): Restructure search, as above and as
1215         resolve_specific_f. Ensure that symbol reference is refreshed,
1216         in case the search produces a NULL.
1217
1218         PR fortran/25077
1219         PR fortran/25102
1220         * interface.c (check_operator_interface): Throw error if the
1221         interface assignment tries to change intrinsic type assigments
1222         or has less than two arguments.  Also, it is an error if an
1223         interface operator contains an alternate return.
1224
1225         PR fortran/24866
1226         * parse.c (gfc_fixup_sibling_symbols): Do not modify the symbol
1227         if it is a dummy in the contained namespace.
1228
1229 2006-08-29  Steven G. Kargl  <kargls@comcast.net>
1230
1231         PR fortran/28866
1232         * match.c: Wrap copyright.
1233         (gfc_match_assignment):  Return MATCH_NO for failed lvalue.  Remove
1234         gotos.  Move error handling of FL_PARAMETER to ...
1235         * gfc_match_if: Deal with MATCH_NO from above.
1236         * primary.c: Wrap copyright.
1237         (match_variable): ... here.  Improve error messages.
1238
1239 2006-08-29  Paul Thomas  <pault@gcc.gnu.org>
1240
1241         PR fortran/28788
1242         * symbol.c (gfc_use_derived): Never eliminate the symbol,
1243         following reassociation of use associated derived types.
1244
1245 2006-08-26  Steven G. Kargl  <kargls@comcast.net>
1246
1247         * arith.h: Update Copyright dates.  Fix whitespace.
1248         * arith.c: Update Copyright dates.  Fix whitespace.  Fix comments.
1249         (gfc_arith_done_1): Clean up pedantic_min_int and subnormal.
1250
1251 2006-08-26  Tobias Burnus  <burnus@net-b.de>
1252
1253         * gfortran.texi: Note variable initialization causes SAVE attribute.
1254         * intrinsic.texi: Clarify support for KIND=16 and KIND=10.
1255         Mention -std=f2003.  Cross reference INQUIRE from ACCESS intrinsic.
1256         Add missing ) in ACOS.
1257
1258 2006-08-26  Daniel Franke  <franke.daniel@gmail.com>
1259
1260         * intrinsic.texi: Update Copyright date.  Added documentation
1261         for ACOSH, AND, ASINH, ATANH, CHDIR, FGET, FGETC, FPUT, FPUTC,
1262         GETCWD, OR and XOR intrinsics, removed inadvertently introduced
1263         doc-stubs for EQV and NEQV, corrected some typographical errors.
1264
1265 2006-08-24  Daniel Franke  <franke.daniel@gmail.com>,
1266             Brooks Moses  <bmoses@stanford.edu>
1267
1268         * intrinsic.texi: Added doc-stubs for undocumented intrinsics,
1269         added a "See Also" section, renamed the "Options" section to
1270         "Standard", improved the index, and made numerous minor
1271         typo corrections and grammatical fixes.
1272
1273 2006-08-24  Paul Thomas  <pault@gcc.gnu.org>
1274
1275         PR fortran/28788
1276         * symbol.c (shift_types): Shift the derived type references in
1277         formal namespaces.
1278         (gfc_use_derived): Return if the derived type symbol is already
1279         in another namspace.  Add searches for the derived type in
1280         sibling namespaces.
1281
1282         PR fortran/28771
1283         * decl.c (add_init_expr_to_sym): Restore the original but
1284         restricted to parameter arrays to fix a regression.
1285
1286 2006-08-23  Steven G. Kargl  <kargls@comcast.net>
1287
1288         * gfortran.texi:  Fix last commit where a "no" was deleted and
1289         a grammatical error was introduced.
1290
1291 2006-08-23  Steven G. Kargl  <kargls@comcast.net>
1292
1293         * gfortran.texi:  Spell check.  Add a few contributors to
1294         Chapter 9.  Expand the description of BOZ constant handling.
1295
1296 2006-08-20  Janne Blomqvist  <jb@gcc.gnu.org>
1297
1298         PR fortran/25828
1299         * gfortran.texi: Mention STREAM I/O among supported F2003
1300         features.
1301
1302 2006-08-20  Paul Thomas  <pault@gcc.gnu.org>
1303
1304         PR fortran/28601
1305         PR fortran/28630
1306         * gfortran.h : Eliminate gfc_dt_list structure and reference
1307         to it in gfc_namespace.
1308         * resolve.c (resolve_fl_derived): Remove the building of the
1309         list of derived types for the current namespace.
1310         * symbol.c (find_renamed_type): New function to find renamed
1311         derived types by symbol name rather than symtree name.
1312         (gfc_use_derived): Search parent namespace for identical
1313         derived type and use it, even if local version is complete,
1314         except in interface bodies. Ensure that renamed derived types
1315         are found by call to find_renamed_type. Recurse for derived
1316         type components.
1317         (gfc_free_dt_list): Remove.
1318         (gfc_free_namespace): Remove call to previous.
1319         * trans-types.c (copy_dt_decls_ifequal): Remove.
1320         (gfc_get_derived_type): Remove all the paraphenalia for
1321         association of derived types, including calls to previous.
1322         * match.c (gfc_match_allocate): Call gfc_use_derived to
1323         associate any derived types that are being allocated.
1324
1325         PR fortran/20886
1326         * resolve.c (resolve_actual_arglist): The passing of
1327         a generic procedure name as an actual argument is an
1328         error.
1329
1330         PR fortran/28735
1331         * resolve.c (resolve_variable): Check for a symtree before
1332         resolving references.
1333
1334         PR fortran/28762
1335         * primary.c (match_variable): Return MATCH_NO if the symbol
1336         is that of the program.
1337
1338         PR fortran/28425
1339         * trans-expr.c (gfc_trans_subcomponent_assign): Translate
1340         derived type component expressions other than another derived
1341         type constructor.
1342
1343         PR fortran/28496
1344         * expr.c (find_array_section): Correct errors in
1345         the handling of a missing start value for the
1346         index triplet in an array reference.
1347
1348         PR fortran/18111
1349         * trans-decl.c (gfc_build_dummy_array_decl): Before resetting
1350         reference to backend_decl, set it DECL_ARTIFICIAL.
1351         (gfc_get_symbol_decl): Likewise for original dummy decl, when
1352         a copy is made of an array.
1353         (create_function_arglist): Likewise for the _entry paramter
1354         in entry_masters.
1355         (build_entry_thunks): Likewise for dummies in entry thunks.
1356
1357         PR fortran/28600
1358         * trans-decl.c (gfc_get_symbol_decl): Ensure that the
1359         DECL_CONTEXT of the length of a character dummy is the
1360         same as that of the symbol declaration.
1361
1362         PR fortran/28771
1363         * decl.c (add_init_expr_to_sym): Remove setting of charlen for
1364         an initializer of an assumed charlen variable.
1365
1366         PR fortran/28660
1367         * trans-decl.c (generate_expr_decls): New function.
1368         (generate_dependency_declarations): New function.
1369         (generate_local_decl): Call previous if not either a dummy or
1370         a declaration in an entry master.
1371
1372 2006-08-19  Erik Edelmann  <eedelman@gcc.gnu.org>
1373
1374         PR fortran/25217
1375         * resolve.c (resolve_fl_variable): Set a default initializer for
1376         derived types with INTENT(OUT) even if 'flag' is true.
1377         * trans-expr.c (gfc_conv_function_call): Insert code to
1378         reinitialize INTENT(OUT) arguments of derived type with default
1379         initializers.
1380
1381 2006-08-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1382
1383         PR fortran/25828
1384         * gfortran.h: Add new pointer for stream position to st_inquire.
1385         Rename gfc_large_io_int_kind to gfc_intio_kind.
1386         * trans-types.c (gfc_init_kinds): use gfc_intio_kind.
1387         * io.c: Add new IO tag for file position going in and another for out.
1388         (match_dt_element): Match new tag_spos.
1389         (gfc_resolve_dt): Resolve new tag_spos.
1390         (gfc_free_inquire): Free inquire->strm_pos.
1391         (match_inquire_element): Match new tag_strm_out.
1392         (gfc_resolve_inquire): Resolve new tag_strm_out.
1393         * trans-io.c: Rename IOPARM_type_large_io_int to IOPARM_type_intio.
1394         (gfc_build_st_parameter): Same.
1395         (gfc_build_io_library_fndecls) Same. and add build pointer type pintio.
1396         (gfc_trans_inquire): Translate strm_pos for inquire.
1397         * ioparm.def: Reorder flags to accomodate addition of new inquire
1398         flag for strm_pos_out and add it in.
1399
1400 2006-08-06  Paul Thomas  <pault@gcc.gnu.org>
1401
1402         PR fortran/28590
1403         * parse.c (parse_derived): Remove the test for sequence type
1404         components of a sequence type.
1405         * resolve.c (resolve_fl_derived): Put the test here so that
1406         pointer components are tested.
1407
1408 2006-08-05  Steven G. Kargl <kargls@comcast.nt>
1409
1410         PR fortran/28548
1411         * resolve.c(resolve_elemental_actual): Add flags.h to use -pedantic
1412         and exclude conversion functions in conditional.  Change gfc_error
1413         to gfc_warning.
1414         (warn_unused_label) Rename to ...
1415         (warn_unused_fortran_label) avoid warn_unused_label in flags.h.
1416
1417 2006-07-30  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1418
1419         * intrinsic.c (add_functions): Add ACCESS, CHMOD, RSHIFT, LSHIFT.
1420         (add_subroutines): Add LTIME, GMTIME and CHMOD.
1421         * intrinsic.h (gfc_check_access_func, gfc_check_chmod,
1422         gfc_check_chmod_sub, gfc_check_ltime_gmtime, gfc_simplify_rshift,
1423         gfc_simplify_lshift, gfc_resolve_access, gfc_resolve_chmod,
1424         gfc_resolve_rshift, gfc_resolve_lshift, gfc_resolve_chmod_sub,
1425         gfc_resolve_gmtime, gfc_resolve_ltime): Add prototypes.
1426         * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_ACCESS,
1427         GFC_ISYM_CHMOD, GFC_ISYM_LSHIFT, GFC_ISYM_RSHIFT.
1428         * iresolve.c (gfc_resolve_access, gfc_resolve_chmod,
1429         gfc_resolve_rshift, gfc_resolve_lshift, gfc_resolve_chmod_sub,
1430         gfc_resolve_gmtime, gfc_resolve_ltime): New functions.
1431         * check.c (gfc_check_access_func, gfc_check_chmod,
1432         gfc_check_chmod_sub, gfc_check_ltime_gmtime): New functions.
1433         * trans-intrinsic.c (gfc_conv_intrinsic_rlshift): New function.
1434         (gfc_conv_intrinsic_function): Add cases for the new GFC_ISYM_*.
1435
1436 2006-07-28  Volker Reichelt  <reichelt@igpm.rwth-aachen.de>
1437
1438         * Make-lang.in: Use $(HEADER_H) instead of header.h in dependencies.
1439
1440 2006-07-26  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1441
1442         * intrinsic.c (add_functions): Add INT2, SHORT, INT8, LONG,
1443         LSTAT, MCLOCK and MCLOCK8 intrinsic functions.
1444         (add_subroutines): Add LSTAT intrinsic subroutine.
1445         * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_INT2,
1446         GFC_ISYM_INT8, GFC_ISYM_LONG, GFC_ISYM_LSTAT, GFC_ISYM_MCLOCK
1447         and GFC_ISYM_MCLOCK8.
1448         * iresolve.c (gfc_resolve_int2, gfc_resolve_int8,
1449         gfc_resolve_long, gfc_resolve_lstat, gfc_resolve_mclock,
1450         gfc_resolve_mclock8, gfc_resolve_lstat_sub): New functions.
1451         * check.c (gfc_check_intconv): New function.
1452         * trans-intrinsic.c (gfc_conv_intrinsic_function): Add cases for
1453         the added GFC_ISYM_*.
1454         * simplify.c (gfc_simplify_intconv, gfc_simplify_int2,
1455         gfc_simplify_int8, gfc_simplify_long): New functions.
1456         * intrinsic.h (gfc_check_intconv, gfc_simplify_int2,
1457         gfc_simplify_int8, gfc_simplify_long, gfc_resolve_int2,
1458         gfc_resolve_int8, gfc_resolve_long, gfc_resolve_lstat,
1459         gfc_resolve_mclock, gfc_resolve_mclock8, gfc_resolve_lstat_sub):
1460         Add prototypes.
1461
1462 2006-07-24  Erik Edelmann  <eedelman@gcc.gnu.org>
1463
1464         PR fortran/28416
1465         * trans-array.c (gfc_conv_array_parameter): Give special treatment for
1466         ALLOCATABLEs if they are themselves dummy variables.
1467
1468 2006-07-23  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1469
1470         PR fortran/25289
1471         * gfortran.h: Declare gfc_large_io_int_kind.
1472         * trans-types.c (gfc_init_kinds): Set gfc_large_io_int_kind
1473         to size 8 or 4.
1474         * trans-io.c (enum iofield_type): Add large_io_int type.
1475         (gfc_build_st_parameter): Same.
1476         (gfc_build_io_library_fndecls): Same.
1477         * ioparm_def: Use large_io_int to define rec.
1478
1479 2006-07-22  Steven Bosscher  <steven@gcc.gnu.org>
1480
1481         PR fortran/28439
1482         * trans-stmt.c (gfc_trans_arithmetic_if): Evaluate the condition once.
1483
1484 2006-07-16  Jakub Jelinek  <jakub@redhat.com>
1485
1486         PR fortran/28390
1487         * trans-openmp.c (gfc_trans_omp_do): Look for LASTPRIVATE in
1488         code->exp.omp_clauses rather than in the 3rd function argument.
1489
1490 2006-07-16  Paul Thomas  <pault@gcc.gnu.org>
1491
1492         PR fortran/28384
1493         * trans-common.c (translate_common): If common_segment is NULL
1494         emit error that common block does not exist.
1495
1496         PR fortran/20844
1497         * io.c (check_io_constraints): It is an error if an ADVANCE
1498         specifier appears without an explicit format.
1499
1500         PR fortran/28201
1501         * resolve.c (resolve_generic_s): For a use_associated function,
1502         do not search for an alternative symbol in the parent name
1503         space.
1504
1505         PR fortran/20893
1506         * resolve.c (resolve_elemental_actual): New function t combine
1507         all the checks of elemental procedure actual arguments. In
1508         addition, check of array valued optional args(this PR) has
1509         been added.
1510         (resolve_function, resolve_call): Remove parts that treated
1511         elemental procedure actual arguments and call the above.
1512
1513 2006-07-14  Steven G. Kargl  <kargls@comcast.net>
1514
1515         * trans-expr.c (gfc_trans_string_copy): Evaluate the string lengths
1516
1517 006-07-13  Paul Thomas  <pault@gcc.gnu.org>
1518
1519         PR fortran/28353
1520         * trans-expr.c (gfc_conv_aliased_arg): Missing formal arg means
1521         that intent is INOUT (fixes regression).
1522
1523         PR fortran/25097
1524         * check.c (check_present): The only permitted reference is a
1525         full array reference.
1526
1527         PR fortran/20903
1528         * decl.c (variable_decl): Add error if a derived type is not
1529         from the current namespace if the namespace is an interface
1530         body.
1531
1532 2006-07-12  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1533
1534         PR fortran/28163
1535         * trans-expr.c (gfc_trans_string_copy): Generate inline code
1536         to perform string copying instead of calling a library function.
1537         * trans-decl.c (gfc_build_intrinsic_function_decls): Don't build
1538         decl for copy_string.
1539         * trans.h (gfor_fndecl_copy_string): Remove prototype.
1540
1541 2006-07-11  Feng Wang  <fengwang@nudt.edu.cn>
1542
1543         PR fortran/28213
1544         * trans-io.c (transfer_expr): Deal with Hollerith constants used in
1545         I/O list.
1546
1547 2006-07-07  Kazu Hirata  <kazu@codesourcery.com>
1548
1549         * intrinsic.texi: Fix typos.
1550
1551 2006-07-07  Paul Thomas  <pault@gcc.gnu.org>
1552
1553         PR fortran/28237
1554         PR fortran/23420
1555         * io.c (resolve_tag): Any integer that is not an assigned
1556         variable is an error.
1557
1558 2006-07-06  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1559
1560         PR fortran/28129
1561         * trans-array.c (gfc_trans_array_bound_check): Add a locus
1562         argument, and use it in the error messages.
1563         (gfc_conv_array_index_offset): Donc perform bounds checking on
1564         the last dimension of assumed-size arrays.
1565
1566 2006-07-06  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1567
1568         PR fortran/27874
1569         * trans-stmt.c (compute_inner_temp_size): Don't perform bounds
1570         checking when calculating the bounds of scalarization.
1571
1572 2006-07-05  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1573
1574         PR fortran/20892
1575         * interface.c (gfc_match_interface): Don't allow dummy procedures
1576         to have a generic interface.
1577
1578 2006-07-04  Paul Thomas  <pault@gcc.gnu.org>
1579
1580         PR fortran/28174
1581         * trans-array.c (gfc_conv_expr_descriptor): When building temp,
1582         ensure that the substring reference uses a new charlen.
1583         * trans-expr.c (gfc_conv_aliased_arg): Add the formal intent to
1584         the argument list, lift the treatment of missing string lengths
1585         from the above and implement the use of the intent.
1586         (gfc_conv_function_call): Add the extra argument to the call to
1587         the above.
1588
1589         PR fortran/28167
1590         * trans-array.c (get_array_ctor_var_strlen): Treat a constant
1591         substring reference.
1592         * array.c (gfc_resolve_character_array_constructor): Remove
1593         static attribute and add the gfc_ prefix, make use of element
1594         charlens for the expression and pick up constant string lengths
1595         for expressions that are not themselves constant.
1596         * gfortran.h : resolve_character_array_constructor prototype
1597         added.
1598         * resolve.c (gfc_resolve_expr): Call resolve_character_array_
1599         constructor again after expanding the constructor, to ensure
1600         that the character length is passed to the expression.
1601
1602 2006-07-04  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1603             Daniel Franke  <franke.daniel@gmail.com>
1604
1605         * intrinsic.c (add_subroutines): Add ITIME and IDATE.
1606         * intrinsic.h (gfc_check_itime_idate,gfc_resolve_idate,
1607         fc_resolve_itime): New protos.
1608         * iresolve.c (gfc_resolve_itime, gfc_resolve_idate): New functions.
1609         * check.c (gfc_check_itime_idate): New function.
1610         * intrinsic.texi: Document the new intrinsics.
1611
1612 2006-07-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1613
1614         * intrinsics/date_and_time.c (itime0,idate0,itime_i4,itime_i8,
1615         idate_i4,idate_i8): New functions.
1616
1617
1618 2006-07-03  Asher Langton  <langton2@llnl.gov>
1619
1620         * decl.c (match_old_style_init): Add data attribute to symbol.
1621
1622 2006-07-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1623
1624         * iresolve.c (gfc_resolve_cpu_time, gfc_resolve_random_number):
1625         Remove ATTRIBUTE_UNUSED for used argument.
1626
1627 2006-07-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1628
1629         * intrinsic.texi: Document new intrinsics.
1630
1631 2006-07-01  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
1632
1633         PR fortran/19259
1634         * parse.c (next_free): Error out on line starting with semicolon.
1635         (next_fixed): Fix formatting.  Error out on line starting with
1636         semicolon.
1637
1638 2006-06-30  Kazu Hirata  <kazu@codesourcery.com>
1639
1640         * check.c: Fix a comment typo.
1641
1642 2006-06-25  Paul Thomas  <pault@gcc.gnu.org>
1643
1644         PR fortran/25056
1645         * interface.c (compare_actual_formal): Signal an error if the formal
1646         argument is a pure procedure and the actual is not pure.
1647
1648         PR fortran/27554
1649         * resolve.c (resolve_actual_arglist): If the type of procedure
1650         passed as an actual argument is not already declared, see if it is
1651         an intrinsic.
1652
1653         PR fortran/25073
1654         * resolve.c (resolve_select): Use bits 1 and 2 of a new int to
1655         keep track of  the appearance of constant logical case expressions.
1656         Signal an error is either value appears more than once.
1657
1658         PR fortran/20874
1659         * resolve.c (resolve_fl_procedure): Signal an error if an elemental
1660         function is not scalar valued.
1661
1662         PR fortran/20867
1663         * match.c (recursive_stmt_fcn): Perform implicit typing of variables.
1664
1665         PR fortran/22038
1666         * match.c (match_forall_iterator): Mark new variables as
1667         FL_UNKNOWN if the match fails.
1668
1669         PR fortran/28119
1670         * match.c (gfc_match_forall): Remove extraneous call to
1671         gfc_match_eos.
1672
1673         PR fortran/25072
1674         * resolve.c (resolve_code, resolve_function): Rework
1675         forall_flag scheme so that it is set and has a value of
1676         2, when the code->expr (ie. the forall mask) is resolved.
1677         This is used to change "block" to "mask" in the non-PURE
1678         error message.
1679
1680 2006-06-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1681
1682         PR fortran/28081
1683         * resolve.c (resolve_substring): Don't issue out-of-bounds
1684         error messages when the range has zero size.
1685
1686 2006-06-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1687
1688         PR fortran/23862
1689         * lang-specs.h (f95-cpp-input): Pass -ffree-form to f951 unless
1690         -ffixed-form is explicitly specified.
1691
1692 2006-06-24  Paul Thomas  <pault@gcc.gnu.org>
1693
1694         PR fortran/28118
1695         * trans-array.c (gfc_conv_expr_descriptor): When building temp,
1696         use the substring reference to calculate the length if the
1697         expression does not have a charlen.
1698
1699 2006-06-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1700
1701         PR fortran/28094
1702         * trans-intrinsic.c (gfc_conv_intrinsic_mod): Support cases where
1703         there is no integer kind equal to the resulting real kind.
1704         * intrinsic.c (add_functions): MODULO is not allowed as an actual
1705         argument.
1706
1707 2006-06-23  Steven G. Kargl  <kargls@comcast.net>
1708
1709         PR fortran/27981
1710         * match.c (gfc_match_if):  Handle errors in assignment in simple if.
1711
1712 2006-06-22  Asher Langton  <langton2@llnl.gov>
1713
1714         PR fortran/24748
1715         * primary.c (gfc_match_rvalue): Don't call match_substring for
1716         implicit non-character types.
1717
1718 2006-06-22  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1719
1720         PR libfortran/26769
1721         * iresolve.c (gfc_resolve_reshape): Call reshape_r4 and
1722         reshape_r8 instead of reshape_4 and reshape_8.
1723         (gfc_resolve_transpose): Likewise for transpose.
1724
1725 2006-06-21  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1726
1727         * trans-expr.c (gfc_conv_missing_dummy, gfc_conv_unary_op,
1728         gfc_conv_cst_int_power, gfc_conv_string_tmp,
1729         gfc_conv_function_call): Replace calls to convert on constant
1730         integer nodes by build_int_cst.
1731         * trans-stmt.c (gfc_trans_do): Likewise.
1732         * trans-io.c (set_internal_unit, transfer_namelist_element):
1733         Likewise.
1734         * trans-decl.c (build_entry_thunks): Likewise.
1735
1736 2006-06-20  Steven G. Kargl  <kargls@comcast.net>
1737
1738         * simplify.c (gfc_simplify_rrspacing): Initialize and clear mpfr_t
1739         variable.
1740
1741 2006-06-20  Paul Thomas  <pault@gcc.gnu.org>
1742
1743         PR fortran/25049
1744         PR fortran/25050
1745         * check.c (non_init_transformational): New function.
1746         (find_substring_ref): New function to signal use of disallowed
1747         transformational intrinsic in an initialization expression.
1748         (gfc_check_all_any): Call previous if initialization expr.
1749         (gfc_check_count): The same.
1750         (gfc_check_cshift): The same.
1751         (gfc_check_dot_product): The same.
1752         (gfc_check_eoshift): The same.
1753         (gfc_check_minloc_maxloc): The same.
1754         (gfc_check_minval_maxval): The same.
1755         (gfc_check_gfc_check_product_sum): The same.
1756         (gfc_check_pack): The same.
1757         (gfc_check_spread): The same.
1758         (gfc_check_transpose): The same.
1759         (gfc_check_unpack): The same.
1760
1761         PR fortran/18769
1762         *intrinsic.c (add_functions): Add gfc_simplify_transfer.
1763         *intrinsic.h : Add prototype for gfc_simplify_transfer.
1764         *simplify.c (gfc_simplify_transfer) : New function to act as
1765         placeholder for eventual implementation.  Emit error for now.
1766
1767         PR fortran/16206
1768         * expr.c (find_array_element): Eliminate condition on length of
1769         offset. Add bounds checking. Rearrange exit. Return try and
1770         put gfc_constructor result as an argument.
1771         (find_array_section): New function.
1772         (find_substring_ref): New function.
1773         (simplify_const_ref): Add calls to previous.
1774         (simplify_parameter_variable): Return on NULL expr.
1775         (gfc_simplify_expr): Only call gfc_expand_constructor for full
1776         arrays.
1777
1778         PR fortran/20876
1779         * match.c (gfc_match_forall): Add missing locus to gfc_code.
1780
1781 2006-06-18  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1782
1783         PR fortran/26801
1784         * trans-intrinsic.c (gfc_conv_associated): Use pre and post blocks
1785         of the scalarization expression.
1786
1787 2006-06-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1788
1789         PR fortran/19310
1790         PR fortran/19904
1791         * arith.c (gfc_range_check): Return ARITH_OK if -fno-range-check. Add
1792         return of ARITH_NAN, ARITH_UNDERFLOW, and ARITH_OVERFLOW.
1793         (gfc_arith_divide): If -fno-range-check allow mpfr to divide by zero.
1794         * gfortran.h (gfc_option_t): Add new flag.
1795         * invoke.texi: Document new flag.
1796         * lang.opt: Add option -frange-check.
1797         * options.c (gfc_init_options): Initialize new flag.
1798         (gfc_handle_options): Set flag if invoked.
1799         * simplify.c (range_check): Add error messages for
1800         overflow, underflow, and other errors.
1801         * trans-const.c (gfc_conv_mpfr_to_tree): Build NaN and Inf from mpfr
1802         result.
1803
1804 2006-06-17  Karl Berry  <karl@gnu.org>
1805
1806         * gfortran.texi (@dircategory): Use "Software development"
1807         instead of "Programming", following the Free Software Directory.
1808
1809 2006-06-16  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1810
1811         PR fortran/27965
1812         * trans-array.c (gfc_conv_ss_startstride): Correct the runtime
1813         conditions for bounds-checking. Check for nonzero stride.
1814         Don't check the last dimension of assumed-size arrays. Fix the
1815         dimension displayed in the error message.
1816
1817 2006-06-15  Thomas Koenig <Thomas.Koenig@online.de>
1818
1819         * trans-array.h (gfc_trans_create_temp_array):  Add bool
1820         argument.
1821         * trans-arrray.c (gfc_trans_create_temp_array): Add extra
1822         argument "function" to show if we are translating a function.
1823         If we are translating a function, perform checks whether
1824         the size along any argument is negative.  In that case,
1825         allocate size 0.
1826         (gfc_trans_allocate_storage):  Add function argument (as
1827         false) to gfc_trans_create_temp_array call.
1828         * trans-expr.c (gfc_conv_function_call):  Add function
1829         argument (as true) to gfc_trans_create_temp_array call.
1830         * trans-stmt.c (gfc_conv_elemental_dependencies): Add
1831         function argument (as false) to gfc_trans_create_temp_array
1832         call.
1833         * trans-intrinsic.c:  Likewise.
1834
1835 2006-06-10  Paul Thomas  <pault@gcc.gnu.org>
1836
1837         PR fortran/24558
1838         PR fortran/20877
1839         PR fortran/25047
1840         * decl.c (get_proc_name): Add new argument to flag that a
1841         module function entry is being treated. If true, correct
1842         error condition, add symtree to module namespace and add
1843         a module procedure.
1844         (gfc_match_function_decl, gfc_match_entry,
1845         gfc_match_subroutine): Use the new argument in calls to
1846         get_proc_name.
1847         * resolve.c (resolve_entries): ENTRY symbol reference to
1848         to master entry namespace if a module function.
1849         * trans-decl.c (gfc_create_module_variable): Return if
1850         the symbol is an entry.
1851         * trans-exp.c (gfc_conv_variable): Check that parent_decl
1852         is not NULL.
1853
1854 2006-06-09  Jakub Jelinek  <jakub@redhat.com>
1855
1856         PR fortran/27916
1857         * trans-openmp.c (gfc_omp_clause_default_ctor): New function.
1858         * trans.h (gfc_omp_clause_default_ctor): New prototype.
1859         * f95-lang.c (LANG_HOOKS_OMP_CLAUSE_DEFAULT_CTOR): Define.
1860
1861 2006-06-08  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1862
1863         PR fortran/27958
1864         * trans-expr.c (gfc_conv_substring): If the substring start is
1865         greater than its end, the length of the substring is zero, and
1866         not negative.
1867         (gfc_trans_string_copy): Don't generate a call to
1868         _gfortran_copy_string when destination length is zero.
1869
1870 2006-06-08  Asher Langton  <langton2@llnl.gov>
1871
1872         PR fortran/27786
1873         * trans-array.c (gfc_conv_array_ref): Eliminate bounds checking
1874         for assumed-size Cray pointees.
1875
1876 2006-06-08  Steven G. Kargl  <kargls@comcat.net>
1877
1878         * intrinsic.c (add_subroutine):  Make make_noreturn() conditional on
1879         the appropriate symbol name.
1880
1881 2006-06-07  Paul Thomas  <pault@gcc.gnu.org>
1882
1883         PR fortran/23091
1884         * resolve.c (resolve_fl_variable): Error if an automatic
1885         object has the SAVE attribute.
1886
1887         PR fortran/24168
1888         * expr.c (simplify_intrinsic_op): Transfer the rank and
1889         the locus to the simplified expression.
1890
1891         PR fortran/25090
1892         PR fortran/25058
1893         * gfortran.h : Add int entry_id to gfc_symbol.
1894         * resolve.c : Add static variables current_entry_id and
1895         specification_expr.
1896         (resolve_variable): During code resolution, check if a
1897         reference to a dummy variable in an executable expression
1898         is preceded by its appearance as a parameter in an entry.
1899         Likewise check its specification expressions.
1900         (resolve_code): Update current_entry_id on EXEC_ENTRY.
1901         (resolve_charlen, resolve_fl_variable): Set and reset
1902         specifiaction_expr.
1903         (is_non_constant_shape_array): Do not return on detection
1904         of a variable but continue to resolve all the expressions.
1905         (resolve_codes): set current_entry_id to an out of range
1906         value.
1907
1908 2006-06-06  Mike Stump  <mrs@apple.com>
1909
1910         * Make-lang.in: Rename to htmldir to build_htmldir to avoid
1911         installing during build.
1912
1913 2006-06-06  Paul Thomas  <pault@gcc.gnu.org>
1914
1915         PR fortran/27897
1916         * match.c (gfc_match_common):  Fix code typo.  Remove
1917         sym->name, since sym is NULL, and replace with name.
1918
1919 2006-06-05  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1920
1921         PR libfortran/27895
1922         * resolve.c (compute_last_value_for_triplet): New function.
1923         (check_dimension): Correctly handle zero-sized array sections.
1924         Add checking on last element of array sections.
1925
1926 2006-06-05  Steven G. Kargl  <kargls@comcast.net>
1927
1928         * data.c (gfc_assign_data_value):  Fix comment typo.  Remove
1929         a spurious return.
1930
1931 2006-06-05  Paul Thomas  <pault@gcc.gnu.org>
1932
1933         PR fortran/14067
1934         * data.c (create_character_intializer): Add warning message
1935         for truncated string.
1936
1937         PR fortran/16943
1938         * symbol.c : Include flags.h.
1939         (gfc_add_type): If a procedure and types are the same do not
1940         throw an error unless standard is less than gnu or pedantic.
1941
1942         PR fortran/20839
1943         * parse.c (parse_do_block): Error if named block do construct
1944         does not have a named enddo.
1945
1946         PR fortran/27655
1947         * check.c (gfc_check_associated): Pick up EXPR_NULL for pointer
1948         as well as target and put error return at end of function.
1949
1950 2006-06-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1951
1952         * trans.c (gfc_msg_bounds, gfc_msg_fault, gfc_msg_wrong_return):
1953         Add strings for common runtime error messages.
1954         (gfc_trans_runtime_check): Add a locus argument, use a string
1955         and not a string tree for the message.
1956         * trans.h (gfc_trans_runtime_check): Change prototype accordingly.
1957         (gfc_msg_bounds, gfc_msg_fault, gfc_msg_wrong_return): Add proto.
1958         * trans-const.c (gfc_strconst_bounds, gfc_strconst_fault,
1959         gfc_strconst_wrong_return, gfc_strconst_current_filename): Remove.
1960         (gfc_init_constants): Likewise.
1961         * trans-const.h: Likewise.
1962         * trans-decl.c (gfc_build_builtin_function_decls): Call to
1963         _gfortran_runtime_error has only one argument, the message string.
1964         * trans-array.h (gfc_conv_array_ref): Add a symbol argument and a
1965         locus.
1966         * trans-array.c (gfc_trans_array_bound_check): Build precise
1967         error messages.
1968         (gfc_conv_array_ref): Use the new symbol argument and the locus
1969         to build more precise error messages.
1970         (gfc_conv_ss_startstride): More precise error messages.
1971         * trans-expr.c (gfc_conv_variable): Give symbol reference and
1972         locus to gfc_conv_array_ref.
1973         (gfc_conv_function_call): Use the new prototype for
1974         gfc_trans_runtime_check.
1975         * trans-stmt.c (gfc_trans_goto): Build more precise error message.
1976         * trans-io.c (set_string): Likewise.
1977         * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use new prototype
1978         for gfc_trans_runtime_check.
1979
1980 2006-06-01  Thomas Koenig  <Thomas.Koenig@online.de>
1981
1982         PR fortran/27715
1983         * arith.c:  Cast the characters from the strings to unsigned
1984         char to avoid values less than 0 for extended ASCII.
1985
1986 2006-06-01  Per Bothner  <bothner@bothner.com>
1987
1988         * data.c (gfc_assign_data_value): Handle USE_MAPPED_LOCATION.
1989         * scanner.c (gfc_gobble_whitespace): Likewise.
1990
1991 2006-06-01  Paul Thomas  <pault@gcc.gnu.org>
1992
1993         PR fortran/25098
1994         PR fortran/25147
1995         * interface.c (compare_parameter): Return 1 if the actual arg
1996         is external and the formal is a procedure.
1997         (compare_actual_formal): If the actual argument is a variable
1998         and the formal a procedure, this an error.  If a gsymbol exists
1999         for a procedure of the same name, this is not yet resolved and
2000         the error is cleared.
2001
2002         * trans-intrinsic.c (gfc_conv_associated): Make provision for
2003         zero array length or zero string length contingent on presence
2004         of target, for consistency with standard.
2005
2006 2006-05-30  Asher Langton  <langton2@llnl.gov>
2007
2008         * symbol.c (check_conflict): Allow external, function, and
2009         subroutine attributes with Cray pointees.
2010         * trans-expr.c (gfc_conv_function_val): Translate Cray pointees
2011         that point to procedures.
2012         * gfortran.texi: Document new feature.
2013
2014 2006-05-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2015
2016         PR fortran/27634
2017         * io.c (check_format): Add error for missing period in format
2018         specifier unless -std=legacy.
2019         * gfortran.texi: Add description of expanded namelist read and
2020         missing period in format extensions.
2021
2022 2006-05-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2023
2024         PR fortran/19777
2025         * trans-array.c (gfc_conv_array_ref): Perform out-of-bounds
2026         checking for assumed-size arrrays for all but the last dimension.
2027
2028 2006-05-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2029
2030         * invoke.texi: Change -fpackderived into -fpack-derived.
2031
2032 2006-05-29  Kazu Hirata  <kazu@codesourcery.com>
2033
2034         * options.c, primary.c, resolve.c, trans-common.c: Fix typos
2035         in error messages.
2036
2037 2006-05-28  Kazu Hirata  <kazu@codesourcery.com>
2038
2039         * check.c, expr.c, resolve.c, trans-common.c,
2040         trans-intrinsic.c, trans-stmt.c, trans-types.c: Fix comment typos.
2041
2042 2006-05-27  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2043
2044         PR fortran/19777
2045         * trans-array.c (gfc_conv_array_ref): Don't perform out-of-bounds
2046         checking for assumed-size arrrays.
2047
2048 2006-05-27  Paul Thomas  <pault@gcc.gnu.org>
2049
2050         * trans-intrinsic.c (gfc_conv_associated): If pointer in first
2051         arguments has zero array length of zero string length, return
2052         false.
2053
2054 2006-05-26  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2055
2056         PR fortran/27524
2057         * trans-array.c (gfc_trans_dummy_array_bias): Don't use stride as
2058         a temporary variable when -fbounds-check is enabled, since its
2059         value will be needed later.
2060
2061 2006-05-26  Thomas Koenig  <Thomas.Koenig@online.de>
2062
2063         PR fortran/23151
2064         * io.c (match_io):  print (1,*) is an error.
2065
2066 2006-05-26  Paul Thomas  <pault@gcc.gnu.org>
2067
2068         PR fortran/27709
2069         * resolve.c (find_array_spec): Add gfc_symbol, derived, and
2070         use to track repeated component references.
2071
2072         PR fortran/27155
2073         PR fortran/27449
2074         * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): Use
2075         se->string_length throughout and use memcpy to populate the
2076         expression returned to the scalarizer.
2077         (gfc_size_in_bytes): New function.
2078
2079 2006-05-21  Paul Thomas  <pault@gcc.gnu.org>
2080
2081         PR fortran/27613
2082         * primary.c (gfc_match_rvalue): Test if symbol represents a
2083         direct recursive function reference.  Error if array valued,
2084         go to function0 otherwise.
2085
2086 2006-05-21  Paul Thomas  <pault@gcc.gnu.org>
2087
2088         PR fortran/25746
2089         * interface.c (gfc_extend_assign): Use new EXEC_ASSIGN_CALL.
2090         * gfortran.h : Put EXEC_ASSIGN_CALL in enum.
2091         * trans-stmt.c (gfc_conv_elemental_dependencies): New function.
2092         (gfc_trans_call): Call it.  Add new boolian argument to flag
2093         need for dependency checking. Assert intent OUT and IN for arg1
2094         and arg2.
2095         (gfc_trans_forall_1): Use new code EXEC_ASSIGN_CALL.
2096         trans-stmt.h : Modify prototype of gfc_trans_call.
2097         trans.c (gfc_trans_code): Add call for EXEC_ASSIGN_CALL.
2098         st.c (gfc_free_statement): Free actual for EXEC_ASSIGN_CALL.
2099         * dependency.c (gfc_check_fncall_dependency): Don't check other
2100         against itself.
2101
2102         PR fortran/25090
2103         * resolve.c : Remove resolving_index_expr.
2104         (entry_parameter): Remove.
2105         (gfc_resolve_expr, resolve_charlen, resolve_fl_variable): Lift
2106         calls to entry_parameter and references to resolving_index_expr.
2107
2108         PR fortran/27584
2109         * check.c (gfc_check_associated): Replace NULL assert with an
2110         error message, since it is possible to generate bad code that
2111         has us fall through to here..
2112
2113         PR fortran/19015
2114         * iresolve.c (maxloc, minloc): If DIM is not present, pass the
2115         rank of ARRAY as the shape of the result.  Otherwise, pass the
2116         shape of ARRAY, less the dimension DIM.
2117         (maxval, minval): The same, when DIM is present, otherwise no
2118         change.
2119
2120 2006-05-19  H.J. Lu  <hongjiu.lu@intel.com>
2121
2122         PR fortran/27662
2123         * trans-array.c (gfc_conv_expr_descriptor): Don't zero the
2124         first stride to indicate a temporary.
2125         * trans-expr.c (gfc_conv_function_call): Likewise.
2126
2127 2006-05-18  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2128             Feng Wang  <fengwang@nudt.edu.cn>
2129
2130         PR fortran/27552
2131         * dump-parse-tree.c (gfc_show_expr): Deal with Hollerith constants.
2132         * data.c (create_character_intializer): Set from_H flag if character is
2133         initialized by Hollerith constant.
2134
2135 2006-05-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2136
2137         PR fortran/26551
2138         * resolve.c (resolve_call, resolve_function): Issue an error
2139         if a function or subroutine call is recursive but the function or
2140         subroutine wasn't declared as such.
2141
2142 2006-05-07  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2143
2144         PR fortran/26551
2145         * gfortran.dg/recursive_check_1.f: New test.
2146
2147
2148 2006-05-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2149
2150         PR fortran/27320
2151         * dump-parse-tree.c (gfc_show_code_node): Try harder to find the
2152         called procedure name.
2153
2154 2006-05-17  Jakub Jelinek  <jakub@redhat.com>
2155
2156         PR middle-end/27415
2157         * trans-openmp.c (gfc_trans_omp_parallel_do,
2158         gfc_trans_omp_parallel_sections, gfc_trans_omp_parallel_workshare): Set
2159         OMP_PARALLEL_COMBINED flag.
2160
2161 2006-05-16  H.J. Lu  <hongjiu.lu@intel.com>
2162
2163         PR driver/26885
2164         * Make-lang.in (GFORTRAN_D_OBJS): Replace gcc.o with
2165         $(GCC_OBJS).
2166
2167 2006-05-15  Paul Thomas  <pault@gcc.gnu.org>
2168
2169         PR fortran/25090
2170         * resolve.c: Static resolving_index_expr initialized.
2171         (entry_parameter): New function to emit errors for variables
2172         that are not entry parameters.
2173         (gfc_resolve_expr): Call entry_parameter, when resolving
2174         variables, if the namespace has entries and resolving_index_expr
2175         is set.
2176         (resolve_charlen): Set resolving_index_expr before the call to
2177         resolve_index_expr and reset it afterwards.
2178         (resolve_fl_variable): The same before and after the call to
2179         is_non_constant_shape_array, which ultimately makes a call to
2180         gfc_resolve_expr.
2181
2182         PR fortran/25082
2183         * resolve.c (resolve_code): Add error condition that the return
2184         expression must be scalar.
2185
2186         PR fortran/27411
2187         * matchexp.c (gfc_get_parentheses): New function.
2188         (match_primary): Remove inline code and call above.
2189         * gfortran.h: Provide prototype for gfc_get_parentheses.
2190         * resolve.c (resolve_array_ref): Call the above, when start is a
2191         derived type variable array reference.
2192
2193 2006-05-15  Jakub Jelinek  <jakub@redhat.com>
2194
2195         PR fortran/27446
2196         * trans-openmp.c (gfc_trans_omp_array_reduction): Ensure
2197         OMP_CLAUSE_REDUCTION_{INIT,MERGE} are set to BIND_EXPR.
2198
2199 2006-05-14  H.J. Lu  <hongjiu.lu@intel.com>
2200
2201         * Make-lang.in (fortran/options.o): Depend on $(TARGET_H).
2202
2203 2006-05-11  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2204
2205         PR fortran/27553
2206         * parse.c (next_free): Return instead of calling decode_statement
2207         upon error.
2208
2209 2005-05-10  Thomas Koenig  <Thomas.Koenig@online.de>
2210
2211         PR fortran/27470
2212         * trans-array.c(gfc_array_allocate):  If ref->next exists
2213         that is if there is a statement like ALLOCATE(foo%bar(2)),
2214         F95 rules require that bar should be a pointer.
2215
2216 2006-05-10  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2217
2218         PR fortran/20460
2219         * resolve.c (gfc_resolve_index): Make REAL array indices a
2220         GFC_STD_LEGACY feature.
2221
2222 2006-05-10  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2223
2224         PR fortran/24549
2225         * parse.c (reject_statement): Clear gfc_new_block.
2226
2227 2006-05-09  Steven G. Kargl  <kargls@comcast.net>
2228
2229         * invoke.texi: Missed file in previous commit.  Update
2230          description of -fall-intrinsics
2231
2232 2006-05-07  Steven Boscher  <steven@gcc.gnu.org>
2233
2234         PR fortran/27378
2235         * parse.c (next_statement): Add check to avoid an ICE when
2236         gfc_current_locus.lb is not set.
2237
2238 2006-05-07  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
2239
2240         PR fortran/27457
2241         * match.c (match_case_eos): Error out on garbage following
2242         CASE(...).
2243
2244 2006-05-07  Paul Thomas  <pault@gcc.gnu.org>
2245
2246         PR fortran/24813
2247         * trans-array.c (get_array_ctor_strlen): Remove static attribute.
2248         * trans.h: Add prototype for get_array_ctor_strlen.
2249         * trans-intrinsic.c (gfc_conv_intrinsic_len): Switch on EXPR_ARRAY
2250         and call get_array_ctor_strlen.
2251
2252 2006-05-05  Steven G. Kargl  <kargls@comcast.net>
2253
2254         * invoke.texi: Update description of -fall-intrinsics
2255         * options.c (gfc_post_options): Disable -Wnonstd-intrinsics if
2256         -fall-intrinsics is used.
2257         (gfc_handle_option): Permit -Wno-nonstd-intrinsics.
2258
2259 2006-05-04  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
2260
2261         * simplify.c (ascii_table): Fix wrong entry.
2262
2263 2006-05-02  Steven G. Kargl  <kargls@comcast.net>
2264
2265         PR fortran/26896
2266         * lang.opt: Fix -Wtab description
2267
2268         PR fortran/20248
2269         * lang.opt: New flag -fall-intrinsics.
2270         * invoke.texi:  Document option.
2271         * gfortran.h (options_t):  New member flag_all_intrinsics.
2272         * options.c (gfc_init_options, gfc_handle_option): Set new option.
2273         sort nearby misplaced options.
2274         * intrinsic.c (add_sym, make_generic, make_alias):  Use it.
2275
2276 2006-05-02 Paul Thomas <pault@gcc.gnu.org>
2277
2278         PR fortran/27269
2279         * module.c: Add static flag in_load_equiv.
2280         (mio_expr_ref): Return if no symtree and in_load_equiv.
2281         (load_equiv): If any of the equivalence members have no symtree, free
2282         the equivalence and the associated expressions.
2283
2284         PR fortran/27324
2285         * trans-common.c (gfc_trans_common): Invert the order of calls to
2286         finish equivalences and gfc_commit_symbols.
2287
2288 2006-04-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2289
2290         PR fortran/25681
2291         * simplify.c (simplify_len): Character variables with constant
2292         length can be simplified.
2293
2294 2006-04-29  H.J. Lu  <hongjiu.lu@intel.com>
2295
2296         PR fortran/27351
2297         * trans-array.c (gfc_conv_array_transpose): Move gcc_assert
2298         before gfc_conv_expr_descriptor.
2299
2300 2006-04-23  Paul Thomas  <pault@gcc.gnu.org>
2301
2302         PR fortran/25099
2303         * resolve.c (resolve_call): Check conformity of elemental
2304         subroutine actual arguments.
2305
2306 2006-04-22  Jakub Jelinek  <jakub@redhat.com>
2307
2308         PR fortran/26769
2309         * iresolve.c (gfc_resolve_reshape): Use reshape_r16 for real(16).
2310         (gfc_resolve_transpose): Use transpose_r16 for real(16).
2311
2312 2006-04-21 Paul Thomas <pault@gcc.gnu.org>
2313
2314         PR fortran/27122
2315         * resolve.c (resolve_function): Remove general restriction on auto
2316         character length function interfaces.
2317         (gfc_resolve_uops): Check restrictions on defined operator
2318         procedures.
2319         (resolve_types): Call the check for defined operators.
2320
2321         PR fortran/27113
2322         * trans-array.c (gfc_trans_array_constructor_subarray): Remove
2323         redundant gfc_todo_error.
2324         (get_array_ctor_var_strlen): Remove typo in enum.
2325
2326 2006-04-18  Bernhard Fischer  <aldot@gcc.gnu.org>
2327
2328         * parse.c (next_free): Use consistent error string between
2329         free-form and fixed-form for illegal statement label of zero.
2330         (next_fixed): Use consistent warning string between free-form
2331         and fixed-form for statement labels for empty statements.
2332
2333 2006-04-18  Steve Ellcey  <sje@cup.hp.com>
2334
2335         * trans-io.c (gfc_build_io_library_fndecls): Align pad.
2336
2337 2006-04-16  Thomas Koenig  <Thomas.Koenig@online.de>
2338
2339         PR fortran/26017
2340         * trans-array.c(gfc_array_init_size):  Introduce or_expr
2341         which is true if the size along any dimension
2342         is negative.  Create a temporary variable with base
2343         name size.  If or_expr is true, set the temporary to 0,
2344         to the normal size otherwise.
2345
2346 2006-04-16  Paul Thomas  <pault@gcc.gnu.org>
2347
2348         PR fortran/26822
2349         * intrinsic.c (add_functions): Mark LOGICAL as elemental.
2350
2351         PR fortran/26787
2352         * expr.c (gfc_check_assign): Extend scope of error to include
2353         assignments to a procedure in the main program or, from a
2354         module or internal procedure that is not that represented by
2355         the lhs symbol. Use VARIABLE rather than l-value in message.
2356
2357         PR fortran/27096
2358         * trans-array.c (gfc_trans_deferred_array): If the backend_decl
2359         is not a descriptor, dereference and then test and use the type.
2360
2361         PR fortran/25597
2362         * trans-decl.c (gfc_trans_deferred_vars): Check if an array
2363         result, is also automatic character length.  If so, process
2364         the character length.
2365
2366         PR fortran/18003
2367         PR fortran/25669
2368         PR fortran/26834
2369         * trans_intrinsic.c (gfc_walk_intrinsic_bound): Set
2370         data.info.dimen for bound intrinsics.
2371         * trans_array.c (gfc_conv_ss_startstride): Pick out LBOUND and
2372         UBOUND intrinsics and supply their shape information to the ss
2373         and the loop.
2374
2375         PR fortran/27124
2376         * trans_expr.c (gfc_trans_function_call):  Add a new block, post,
2377         in to which all the argument post blocks are put.  Add this block
2378         to se->pre after a byref call or to se->post, otherwise.
2379
2380 2006-04-14  Roger Sayle  <roger@eyesopen.com>
2381
2382         * trans-io.c (set_string): Use fold_build2 and build_int_cst instead
2383         of build2 and convert to construct "x < 0" rather than "x <= -1".
2384
2385 2006-04-13  Richard Henderson  <rth@redhat.com>
2386
2387         * trans-openmp.c (gfc_trans_omp_sections): Adjust for changed
2388         number of operands to OMP_SECTIONS.
2389
2390 2006-04-08  Kazu Hirata  <kazu@codesourcery.com>
2391
2392         * gfortran.texi: Fix typos.  Follow spelling conventions.
2393         * resolve.c, trans-expr.c, trans-stmt.c: Fix comment typos.
2394         Follow spelling conventions.
2395
2396 2006-04-05  Roger Sayle  <roger@eyesopen.com>
2397
2398         * dependency.c (get_no_elements): Delete function.
2399         (get_deps): Delete function.
2400         (transform_sections): Delete function.
2401         (gfc_check_section_vs_section): Significant rewrite.
2402
2403 2006-04-04  H.J. Lu  <hongjiu.lu@intel.com>
2404
2405         PR fortran/25619
2406         * trans-array.c (gfc_conv_expr_descriptor): Only dereference
2407         character pointer when copying temporary.
2408
2409         PR fortran/23634
2410         * trans-array.c (gfc_conv_expr_descriptor): Properly copy
2411         temporary character with non constant size.
2412
2413 2006-04-03  Paul Thomas  <pault@gcc.gnu.org>
2414
2415         PR fortran/26891
2416         * trans.h: Prototype for gfc_conv_missing_dummy.
2417         * trans-expr (gfc_conv_missing_dummy): New function
2418         (gfc_conv_function_call): Call it and tidy up some of the code.
2419         * trans-intrinsic (gfc_conv_intrinsic_function_args): The same.
2420
2421         PR fortran/26976
2422         * array.c (gfc_array_dimen_size): If available, return shape[dimen].
2423         * resolve.c (resolve_function): If available, use the argument
2424         shape for the function expression.
2425         * iresolve.c (gfc_resolve_transfer): Set shape[0] = size.
2426
2427 2006-04-02  Erik Edelmann  <eedelman@gcc.gnu.org>
2428
2429         * trans-array.c (gfc_trans_dealloc_allocated): Take a
2430         tree representation of the array to be deallocated as argument
2431         instead of its gfc_symbol.
2432         (gfc_trans_deferred_array): Update call to
2433         gfc_trans_dealloc_allocated.
2434         * trans-array.h (gfc_trans_dealloc_allocated): Update
2435         prototype.
2436         * trans-expr.c (gfc_conv_function_call): Update call to
2437         gfc_trans_dealloc_allocated, get indirect reference to dummy
2438         arguments.
2439
2440 2006-04-01  Roger Sayle  <roger@eyesopen.com>
2441
2442         PR fortran/25270
2443         * trans-array.c (gfc_trans_allocate_array_storage): In array index
2444         calculations use gfc_index_zero_node and gfc_index_one_node instead
2445         of integer_zero_node and integer_one_node respectively.
2446         (gfc_conv_array_transpose): Likewise.
2447         (gfc_conv_ss_startstride): Likewise.
2448         (gfc_trans_dummy_array_bias): Likewise.
2449
2450 2006-04-01  Roger Sayle  <roger@eyesopen.com>
2451
2452         * dependency.c (gfc_is_inside_range): Delete.
2453         (gfc_check_element_vs_section): Significant rewrite.
2454
2455 2006-04-01  Roger Sayle  <roger@eyesopen.com>
2456
2457         * dependency.c (gfc_dep_compare_expr): Strip parentheses and unary
2458         plus operators when comparing expressions.  Handle comparisons of
2459         the form "X+C vs. X", "X vs. X+C", "X-C vs. X" and "X vs. X-C" where
2460         C is an integer constant.  Handle comparisons of the form "P+Q vs.
2461         R+S" and "P-Q vs. R-S".  Handle comparisons of integral extensions
2462         specially (increasing functions) so extend(A) > extend(B), when A>B.
2463         (gfc_check_element_vs_element): Move test later, so that we ignore
2464         the fact that "A < B" or "A > B" when A or B contains a forall index.
2465
2466 2006-03-31  Asher Langton  <langton2@llnl.gov>
2467
2468         PR fortran/25358
2469         * expr.c (gfc_check_assign): Allow cray pointee to be assumes-size.
2470
2471 2006-03-30  Paul Thomas <paulthomas2@wanadoo.fr>
2472             Bud Davis  <bdavis9659@sbcglobal.net>
2473
2474         PR 21130
2475         * module.c (load_needed): Traverse entire tree before returning.
2476
2477 2006-03-30  Roger Sayle  <roger@eyesopen.com>
2478
2479         PR middle-end/22375
2480         * trans.c (gfc_trans_runtime_check): Promote the arguments of
2481         __builtin_expect to the correct types, and the result back to
2482         boolean_type_node.
2483
2484 2006-03-29  Carlos O'Donell  <carlos@codesourcery.com>
2485
2486         * Make-lang.in: Rename docdir to gcc_docdir.
2487
2488 2006-03-28  Steven G. Kargl  <kargls@comcast.net>
2489
2490         * intrinsic.texi: s/floor/float in previous commit.
2491
2492 2006-03-28 Paul Thomas <pault@gcc.gnu.org>
2493
2494         PR fortran/26779
2495         * resolve.c (resolve_fl_procedure): Do not check the access of
2496         derived types for internal procedures.
2497
2498 2006-03-27  Jakub Jelinek  <jakub@redhat.com>
2499
2500         * io.c (check_io_constraints): Don't look at
2501         dt->advance->value.charater.string, unless it is a CHARACTER
2502         constant.
2503
2504         * f95-lang.c (gfc_get_alias_set): New function.
2505         (LANG_HOOKS_GET_ALIAS_SET): Define.
2506
2507 2006-03-25  Steven G. Kargl  <kargls@comcast.net>
2508
2509         PR fortran/26816
2510         * intrinsic.c (add_functions): Allow FLOAT to accept all integer kinds.
2511         * intrinsic.texi: Document FLOAT.
2512
2513 2006-03-25  Thomas Koenig  <Thomas.Koenig@online.de>
2514
2515         PR fortran/26769
2516         * iresolve.c (gfc_resolve_reshape):  Remove doubling of
2517         kind for complex. For real(kind=10), call reshape_r10.
2518         (gfc_resolve_transpose):  For real(kind=10), call
2519         transpose_r10.
2520
2521 2006-03-25  Roger Sayle  <roger@eyesopen.com>
2522
2523         * dependency.c (gfc_check_dependency): Improve handling of pointers;
2524         Two variables of different types can't have a dependency, and two
2525         variables with the same symbol are equal, even if pointers.
2526
2527 2006-03-24  Roger Sayle  <roger@eyesopen.com>
2528
2529         * gfortran.h (gfc_symbol): Add a new "forall_index" bit field.
2530         * match.c (match_forall_iterator): Set forall_index field on
2531         the iteration variable's symbol.
2532         * dependency.c (contains_forall_index_p): New function to
2533         traverse a gfc_expr to check whether it contains a variable
2534         with forall_index set in it's symbol.
2535         (gfc_check_element_vs_element): Return GFC_DEP_EQUAL for scalar
2536         constant expressions that don't variables used as FORALL indices.
2537
2538 2006-03-22  Volker Reichelt  <reichelt@igpm.rwth-aachen.de>
2539
2540         PR driver/22600
2541         * error.c (gfc_fatal_error): Return ICE_EXIT_CODE instead of 4.
2542
2543 2006-03-22  Thomas Koenig  <Thomas.Koenig@online.de>
2544
2545         PR fortran/19303
2546         * gfortran.h (gfc_option_t):  Add record_marker.
2547         * lang.opt:  Add -frecord-marker=4 and -frecord-marker=8.
2548         * trans-decl.c:  Add gfor_fndecl_set_record_marker.
2549         (gfc_build_builtin_function_decls): Set
2550         gfor_fndecl_set_record_marker.
2551         (gfc_generate_function_code):  If we are in the main program
2552         and -frecord-marker was provided, call set_record_marker.
2553         * options.c (gfc_handle_option):  Add handling for
2554         -frecord-marker=4 and -frecord-marker=8.
2555         * invoke.texi:  Document -frecord-marker.
2556
2557 2006-03-22  Paul Thomas  <pault@gcc.gnu.org>
2558
2559         PR fortran/17298
2560         * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): New
2561         function to implement array valued TRANSFER intrinsic.
2562         (gfc_conv_intrinsic_function): Call the new function if TRANSFER
2563         and non-null se->ss.
2564         (gfc_walk_intrinsic_function): Treat TRANSFER as one of the
2565         special cases by calling gfc_walk_intrinsic_libfunc directly.
2566
2567 2006-03-21  Toon Moene  <toon@moene.indiv.nluug.nl>
2568
2569         * options.c (gfc_init_options): Initialize
2570         flag_argument_noalias to 3.
2571
2572 2006-03-20  Thomas Koenig  <Thomas.Koenig@online.de>
2573
2574         PR fortran/20935
2575         * iresolve.c (gfc_resolve_maxloc):   If mask is scalar,
2576         prefix the function name with an "s".  If the mask is scalar
2577         or if its kind is smaller than gfc_default_logical_kind,
2578         coerce it to default kind.
2579         (gfc_resolve_maxval):  Likewise.
2580         (gfc_resolve_minloc):  Likewise.
2581         (gfc_resolve_minval):  Likewise.
2582         (gfc_resolve_product):  Likewise.
2583         (gfc_resolve_sum):  Likewise.
2584
2585 2006-03-19  Paul Thomas  <pault@gcc.gnu.org>
2586
2587         PR fortran/26741
2588         *expr.c (external_spec_function): Permit elemental functions.
2589
2590         PR fortran/26716
2591         *interface.c (compare_actual_formal): Detect call for procedure
2592         usage and require rank checking, in this case, for assumed shape
2593         and deferred shape arrays.
2594         (gfc_procedure_use): Revert to pre-PR25070 call to
2595         compare_actual_formal that does not require rank checking..
2596
2597 2006-03-16  Roger Sayle  <roger@eyesopen.com>
2598
2599         * gfortran.h (gfc_equiv_info): Add length field.
2600         * trans-common.c (copy_equiv_list_to_ns): Set the length field.
2601         * dependency.c (gfc_are_equivalenced_arrays): Use both the offset
2602         and length fields to determine whether the two equivalenced symbols
2603         overlap in memory.
2604
2605 2006-03-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2606
2607         PR fortran/19101
2608         * gfortran.h: Add warn_ampersand.
2609         * invoke.texi: Add documentation for new option.
2610         * lang.opt: Add Wampersand.
2611         * options.c (gfc_init_options): Initialize warn_ampersand.
2612         (gfc_post_options): Set the warn if pedantic.
2613         (set_Wall): Set warn_ampersand.
2614         (gfc_handle_option: Add Wampersand for itself, -std=f95, and -std=f2003.
2615         * scanner.c (gfc_next_char_literal): Add test for missing '&' in
2616         continued character constant and give warning if missing.
2617
2618 2006-03-14  Steven G. Kargl  <kargls@comcast.net>
2619
2620         PR 18537
2621         * gfortran.h: Wrap Copyright line.
2622         (gfc_option_t): add warn_tabs member.
2623         * lang.opt: Update Coyright year.  Add the Wtabs.
2624         * invoke.texi: Document -Wtabs.
2625         * scanner.c (gfc_gobble_whitespace): Use warn_tabs.  Add linenum to
2626         suppress multiple warnings.
2627         (load_line): Use warn_tabs.  Add linenum, current_line, seen_comment
2628         to suppress multiple warnings.
2629         * options.c (gfc_init_options): Initialize warn_tabs.
2630         (set_Wall): set warn_tabs for -Wall.
2631         (gfc_post_options): Adjust flag_tabs depending on -pedantic.
2632         (gfc_handle_option):  Process command-line option -W[no-]tabs
2633
2634 2006-03-13  Paul Thomas  <pault@gcc.gnu.org>
2635
2636         PR fortran/25378
2637         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Set the initial position to zero and
2638         modify the condition for updating it, to implement the F2003 requirement for all(mask)
2639         is false.
2640
2641 2006-03-13  Jakub Jelinek  <jakub@redhat.com>
2642
2643         * trans-openmp.c (gfc_trans_omp_variable): Handle references
2644         to parent result.
2645         * trans-expr.c (gfc_conv_variable): Remove useless setting
2646         of parent_flag, formatting.
2647
2648         * trans-decl.c (gfc_get_fake_result_decl): Re-add setting of
2649         GFC_DECL_RESULT flag.
2650
2651 2003-03-11  Roger Sayle  <roger@eyesopen.com>
2652
2653         * dependency.c (gfc_dep_compare_expr) <EXPR_OP>: Allow unary and
2654         binary operators to compare equal if their operands are equal.
2655         <EXPR_FUNCTION>: Allow "constant" intrinsic conversion functions
2656         to compare equal, if their operands are equal.
2657
2658 2006-03-11  Erik Edelmann  <eedelman@gcc.gnu.org>
2659
2660         * symbol.c (check_conflict): Allow allocatable function results,
2661         except for elemental functions.
2662         * trans-array.c (gfc_trans_allocate_temp_array): Rename to ...
2663         (gfc_trans_create_temp_array): ... this, and add new argument
2664         callee_alloc.
2665         (gfc_trans_array_constructor, gfc_conv_loop_setup): Update call
2666         to gfc_trans_allocate_temp_array.
2667         * trans-array.h (gfc_trans_allocate_temp_array): Update prototype.
2668         * trans-expr.c (gfc_conv_function_call): Use new arg of
2669         gfc_trans_create_temp_array avoid pre-allocation of temporary
2670         result variables of pointer AND allocatable functions.
2671         (gfc_trans_arrayfunc_assign): Return NULL for allocatable
2672         functions.
2673         * resolve.c (resolve_symbol): Copy value of 'allocatable' attribute
2674         from sym->result to sym.
2675
2676 2006-03-09  Erik Edelmann  <eedelman@gcc.gnu.org>
2677
2678         * trans-expr.c (gfc_add_interface_mapping): Copy 'allocatable'
2679         attribute from sym to new_sym.  Call build_fold_indirect_ref()
2680         for allocatable arguments.
2681
2682 2006-03-09 Paul Thomas <pault@gcc.gnu.org>
2683
2684         PR fortran/26257
2685         * trans-array.c (gfc_conv_expr_descriptor): Exclude calculation of
2686         the offset and data when se->data_not_needed is set.
2687         * trans.h: Include the data_not_need bit in gfc_se.
2688         * trans-intrinsic.c (gfc_conv_intrinsic_size): Set it for SIZE.
2689
2690 2006-03-06  Paul Thomas  <pault@gcc.gnu.org>
2691             Erik Edelmann  <eedelman@gcc.gnu.org>
2692
2693         * trans-array.c (gfc_trans_dealloc_allocated): New function.
2694         (gfc_trans_deferred_array): Use it, instead of inline code.
2695         * trans-array.h: Prototype for gfc_trans_dealloc_allocated().
2696         * trans-expr.c (gfc_conv_function_call): Deallocate allocated
2697         ALLOCATABLE, INTENT(OUT) arguments upon procedure entry.
2698
2699 2006-03-06  Paul Thomas  <pault@gcc.gnu.org>
2700
2701         PR fortran/26107
2702         * resolve.c (resolve_function): Add name after test for pureness.
2703
2704         PR fortran/19546
2705         * trans-expr.c (gfc_conv_variable): Detect reference to parent result,
2706         store current_function_decl, replace with parent, whilst calls are
2707         made to gfc_get_fake_result_decl, and restore afterwards. Signal this
2708         to gfc_get_fake_result_decl with a new argument, parent_flag.
2709         * trans-stmt.c (gfc_trans_return): gfc_get_fake_result_decl 2nd arg
2710         is set to zero.
2711         * trans.h: Add parent_flag to gfc_get_fake_result_decl prototype.
2712         * trans-decl.c (gfc_get_fake_result_decl): On parent_flag, being set,
2713         add decl to parent function. Replace refs to current_fake_result_decl
2714         with refs to this_result_decl.
2715         (gfc_generate_function_code): Null parent_fake_result_decl before the
2716         translation of code for contained procedures. Set parent_flag to zero
2717         in call to gfc_get_fake_result_decl.
2718         * trans-intrinsic.c (gfc_conv_intrinsic_len): The same.
2719
2720 2006-03-05  Steven G. Kargl  <kargls@comcast.net>
2721
2722         * simplify.c (gfc_simplify_verify):  Fix return when SET=''.
2723
2724 2006-03-05  Erik Edelmann  <eedelman@gcc.gnu.org>
2725
2726         PR fortran/16136
2727         * symbol.c (conf_std): New macro.
2728         (check_conflict): Use it to allow ALLOCATABLE dummy
2729         arguments for F2003.
2730         * trans-expr.c (gfc_conv_function_call): Pass the
2731         address of the array descriptor when dummy argument is
2732         ALLOCATABLE.
2733         * interface.c (compare_allocatable): New function.
2734         (compare_actual_formal): Use it.
2735         * resolve.c (resolve_deallocate_expr,
2736         resolve_allocate_expr): Check that INTENT(IN) variables
2737         aren't (de)allocated.
2738         * gfortran.texi (Fortran 2003 status): List ALLOCATABLE
2739         dummy arguments as supported.
2740
2741 2006-03-03  Roger Sayle  <roger@eyesopen.com>
2742
2743         * dependency.c (gfc_check_element_vs_element): Revert last change.
2744
2745 2006-03-03  Roger Sayle  <roger@eyesopen.com>
2746
2747         * dependency.c (gfc_check_element_vs_element): Consider two
2748         unordered scalar subscripts as (potentially) equal.
2749
2750 2006-03-03  Roger Sayle  <roger@eyesopen.com>
2751
2752         * dependency.c (gfc_check_dependency): Call gfc_dep_resolver to
2753         check whether two array references have a dependency.
2754         (gfc_check_element_vs_element): Assume lref and rref must be
2755         REF_ARRAYs.  If gfc_dep_compare_expr returns -2, assume these
2756         references could potentially overlap.
2757         (gfc_dep_resolver): Whitespace and comment tweaks.  Assume a
2758         dependency if the references have different depths.  Rewrite
2759         final term to clarrify we only have a dependency for overlaps.
2760
2761 2006-03-03  Thomas Koenig  <Thomas.Koenig@online.de>
2762
2763         PR fortran/25031
2764         * trans-array.h:  Adjust gfc_array_allocate prototype.
2765         * trans-array.c (gfc_array_allocate):  Change type of
2766         gfc_array_allocatate to bool.  Function returns true if
2767         it operates on an array.  Change second argument to gfc_expr.
2768         Find last reference in chain.
2769         If the function operates on an allocatable array, emit call to
2770         allocate_array() or allocate64_array().
2771         * trans-stmt.c (gfc_trans_allocate):  Code to follow to last
2772         reference has been moved to gfc_array_allocate.
2773         * trans.h:  Add declaration for gfor_fndecl_allocate_array and
2774         gfor_fndecl_allocate64_array.
2775         (gfc_build_builtin_function_decls):  Add gfor_fndecl_allocate_array
2776         and gfor_fndecl_allocate64_array.
2777
2778 2006-03-01  Roger Sayle  <roger@eyesopen.com>
2779
2780         * trans-stmt.c (generate_loop_for_temp_to_lhs): Add an additional
2781         INVERT argument to invert the sense of the WHEREMASK argument.
2782         Remove unneeded code to AND together a list of masks.
2783         (generate_loop_for_rhs_to_temp): Likewise.
2784         (gfc_trans_assign_need_temp): Likewise.
2785         (gfc_trans_forall_1): Likewise.
2786         (gfc_evaluate_where_mask): Likewise, add a new INVERT argument
2787         to specify the sense of the MASK argument.
2788         (gfc_trans_where_assign): Likewise.
2789         (gfc_trans_where_2): Likewise.  Restructure code that decides
2790         whether we need to allocate zero, one or two temporary masks.
2791         If this is a top-level WHERE (i.e. the incoming MASK is NULL),
2792         we only need to allocate at most one temporary mask, and can
2793         invert it's sense to provide the complementary pending execution
2794         mask.  Only calculate the size of the required temporary arrays
2795         if we need any.
2796         (gfc_trans_where): Update call to gfc_trans_where_2.
2797
2798 2006-03-01  Paul Thomas  <pault@gcc.gnu.org>
2799
2800         * iresolve.c (gfc_resolve_dot_product):  Remove any difference in
2801         treatment of logical types.
2802         * trans-intrinsic.c (gfc_conv_intrinsic_dot_product):  New function.
2803
2804         PR fortran/26393
2805         * trans-decl.c (gfc_get_symbol_decl): Extend condition that symbols
2806         must be referenced to include unreferenced symbols in an interface
2807         body.
2808
2809         PR fortran/20938
2810         * trans-array.c (gfc_conv_resolve_dependencies): Add call to
2811         gfc_are_equivalenced_arrays.
2812         * symbol.c (gfc_free_equiv_infos, gfc_free_equiv_lists): New
2813         functions. (gfc_free_namespace): Call them.
2814         * trans-common.c (copy_equiv_list_to_ns): New function.
2815         (add_equivalences): Call it.
2816         * gfortran.h: Add equiv_lists to gfc_namespace and define
2817         gfc_equiv_list and gfc_equiv_info.
2818         * dependency.c (gfc_are_equivalenced_arrays): New function.
2819         (gfc_check_dependency): Call it.
2820         * dependency.h: Prototype for gfc_are_equivalenced_arrays.
2821
2822 2006-03-01  Roger Sayle  <roger@eyesopen.com>
2823
2824         * dependency.c (gfc_is_same_range): Compare the stride, lower and
2825         upper bounds when testing array reference ranges for equality.
2826         (gfc_check_dependency): Fix indentation whitespace.
2827         (gfc_check_element_vs_element): Likewise.
2828         (gfc_dep_resolver): Likewise.
2829
2830 2006-02-28  Thomas Koenig  <Thomas.Koenig@online.de>
2831
2832         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc):
2833         If the mask expression exists and has rank 0, enclose the
2834         generated loop in an "if (mask)".  Put the default
2835         initialization into the else branch.
2836
2837 2006-02-25  Thomas Koenig  <Thomas.Koenig@online.de>
2838
2839         PR fortran/23092
2840         * trans-intrinsic.c (gfc_conv_intrinsic_arith):  If the
2841         mask expression exists and has rank 0, enclose the generated
2842         loop in an "if (mask)".
2843         * (gfc_conv_intrinsic_minmaxloc):  Likewise.
2844
2845 2006-02-24  Paul Thomas  <pault@gcc.gnu.org>
2846
2847         PR fortran/26409
2848         * resolve.c (resolve_contained_functions, resolve_types,
2849         gfc_resolve): Revert patch of 2006-02-19.
2850
2851 2006-02-24  Paul Thomas  <pault@gcc.gnu.org>
2852
2853         PR fortran/24519
2854         * dependency.c (gfc_is_same_range): Correct typo.
2855         (gfc_check_section_vs_section): Call gfc_is_same_range.
2856
2857         PR fortran/25395
2858         * trans-common.c (add_equivalences): Add a new flag that is set when
2859         an equivalence is seen that prevents more from being reset until the
2860         start of a new traversal of the list, thus ensuring completion of
2861         all the equivalences.
2862
2863 2006-02-23  Erik Edelmann  <eedelman@gcc.gnu.org>
2864
2865         * module.c (read_module): Remove redundant code lines.
2866
2867 2006-02-20 Rafael \81Ávila de Esp\81índola <rafael.espindola@gmail.com>
2868         * Make-lang.in (FORTRAN): Remove
2869         (.PHONY): Remove F95 and f95. Add fortran
2870
2871 2006-02-20  Roger Sayle  <roger@eyesopen.com>
2872
2873         * trans-stmt.c (gfc_trans_where_2): Avoid updating unused current
2874         execution mask for empty WHERE/ELSEWHERE clauses.  Don't allocate
2875         temporary mask arrays if they won't be used.
2876
2877 2006-02-20  Roger Sayle  <roger@eyesopen.com>
2878
2879         * trans-stmt.c (gfc_trans_where_assign): Remove code to handle
2880         traversing a linked list of MASKs.  The MASK is now always a
2881         single element requiring no ANDing during the assignment.
2882
2883 2006-02-19  Thomas Koenig  <Thomas.Koenig@online.de>
2884
2885         * gfortran.texi:  Document environment variables which
2886         influence runtime behavior.
2887
2888 2006-02-19  H.J. Lu  <hongjiu.lu@intel.com>
2889
2890         * resolve.c (resolve_contained_functions): Call resolve_entries
2891         first.
2892         (resolve_types): Remove calls to resolve_entries and
2893         resolve_contained_functions.
2894         (gfc_resolve): Call resolve_contained_functions.
2895
2896 2006-02-19  Erik Edelmann  <eedelman@gcc.gnu.org>
2897
2898         PR fortran/26201
2899         * intrinsic.c (gfc_convert_type_warn): Call
2900         gfc_intrinsic_symbol() on the newly created symbol.
2901
2902 2006-02-19  Paul Thomas  <pault@gcc.gnu.org>
2903
2904         PR fortran/25054
2905         * resolve.c (is_non_constant_shape_array): New function.
2906         (resolve_fl_variable): Remove code for the new function and call it.
2907         (resolve_fl_namelist): New function.  Add test for namelist array
2908         with non-constant shape, using is_non_constant_shape_array.
2909         (resolve_symbol): Remove code for resolve_fl_namelist and call it.
2910
2911         PR fortran/25089
2912         * match.c (match_namelist): Increment the refs field of an accepted
2913         namelist object symbol.
2914         * resolve.c (resolve_fl_namelist): Test namelist objects for a conflict
2915         with contained or module procedures.
2916
2917 2006-02-18  Roger Sayle  <roger@eyesopen.com>
2918
2919         * trans-stmt.c (struct temporary_list): Delete.
2920         (gfc_trans_where_2): Major reorganization.  Remove no longer needed
2921         TEMP argument.  Allocate and deallocate the control mask and
2922         pending control mask locally.
2923         (gfc_trans_forall_1): Delete TEMP local variable, and update
2924         call to gfc_trans_where_2.  No need to deallocate arrays after.
2925         (gfc_evaluate_where_mask): Major reorganization.  Change return
2926         type to void.  Pass in parent execution mask, MASK, and two
2927         already allocated mask arrays CMASK and PMASK.  On return
2928         CMASK := MASK & COND, PMASK := MASK & !COND.  MASK, CMASK and
2929         CMASK may all be NULL, or refer to the same temporary arrays.
2930         (gfc_trans_where): Update call to gfc_trans_where_2.  We no
2931         longer need a TEMP variable or to deallocate temporary arrays
2932         allocated by gfc_trans_where_2.
2933
2934 2006-02-18   Danny Smith  <dannysmith@users.sourceforeg.net>
2935
2936         * gfortran.h (gfc_add_attribute): Change uint to unsigned int.
2937         * symbol.c (gfc_add_attribute): Likewise for definition.
2938         * resolve.c (resolve_global_procedure): Likewise for variable 'type'.
2939
2940 2006-02-17  Richard Sandiford  <richard@codesourcery.com>
2941
2942         * trans-common.c: Include rtl.h earlier.
2943         * trans-decl.c: Likewise.
2944
2945 2006-02-16  Jakub Jelinek  <jakub@redhat.com>
2946
2947         PR fortran/26224
2948         * parse.c (parse_omp_do, parse_omp_structured_block): Call
2949         gfc_commit_symbols and gfc_warning_check.
2950
2951         * openmp.c (resolve_omp_clauses): Add a dummy case label to workaround
2952         PR middle-end/26316.
2953
2954 2006-02-16  Paul Thomas  <pault@gcc.gnu.org>
2955
2956         PR fortran/24557
2957         * trans-expr.c (gfc_add_interface_mapping): Use the actual argument
2958         for character(*) arrays, rather than casting to the type and kind
2959         parameters of the formal argument.
2960
2961 2006-02-15  Toon Moene  <toon@moene.indiv.nluug.nl>
2962
2963         PR fortran/26054
2964         * options.c: Do not warn for Fortran 2003 features by default.
2965
2966 2006-02-15  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
2967
2968         * check.c: Update copyright years.
2969
2970         * check.c (gfc_check_minloc_maxloc, check_reduction): Don't call
2971         dim_range_check on not-present optional dim argument.
2972
2973 2006-02-15  Jakub Jelinek  <jakub@redhat.com>
2974
2975         PR libgomp/25938
2976         PR libgomp/25984
2977         * Make-lang.in (install-finclude-dir): New goal.
2978         (fortran.install-common): Depend on install-finclude-dir.
2979         * lang-specs.h: If not -nostdinc, add -I finclude.
2980
2981 2006-02-14  Thomas Koenig  <Thomas.Koenig@online.de>
2982
2983         PR fortran/25045
2984         * check.c (dim_check):  Perform all checks if dim is optional.
2985         (gfc_check_minloc_maxloc):  Use dim_check and dim_rank_check
2986         to check dim argument.
2987         (check_reduction):  Likewise.
2988
2989 2006-02-14  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
2990
2991         PR fortran/26277
2992         * io.c (match_ltag): Mark label as referenced.
2993
2994 2006-02-14  Jakub Jelinek  <jakub@redhat.com>
2995             Richard Henderson  <rth@redhat.com>
2996             Diego Novillo  <dnovillo@redhat.com>
2997
2998         * invoke.texi: Document -fopenmp.
2999         * gfortran.texi (Extensions): Document OpenMP.
3000
3001         Backport from gomp-20050608-branch
3002         * trans-openmp.c: Call build_omp_clause instead of
3003         make_node when creating OMP_CLAUSE_* trees.
3004         (gfc_trans_omp_reduction_list): Remove argument 'code'.
3005         Adjust all callers.
3006
3007         * trans.h (build4_v): Define.
3008         * trans-openmp.c: Call build4_v to create OMP_PARALLEL nodes.
3009         Call build3_v to create OMP_SECTIONS nodes.
3010
3011         PR fortran/25162
3012         * openmp.c (gfc_match_omp_variable_list): Call gfc_set_sym_referenced
3013         on all symbols added to the variable list.
3014
3015         * openmp.c (gfc_match_omp_clauses): Fix check for non-INTRINSIC
3016         procedure symbol in REDUCTION.
3017
3018         * trans-openmp.c (gfc_trans_omp_array_reduction): Use gfc_add
3019         for MINUS_EXPR OMP_CLAUSE_REDUCTION_CODE.
3020
3021         * trans-openmp.c (gfc_trans_omp_do): Add PBLOCK argument.  If PBLOCK
3022         is non-NULL, evaluate INIT/COND/INCR and chunk size expressions in
3023         that statement block.
3024         (gfc_trans_omp_parallel_do): Pass non-NULL PBLOCK to gfc_trans_omp_do
3025         for non-ordered non-static combined loops.
3026         (gfc_trans_omp_directive): Pass NULL PBLOCK to gfc_trans_omp_do.
3027
3028         * openmp.c: Include target.h and toplev.h.
3029         (gfc_match_omp_threadprivate): Emit diagnostic if target does
3030         not support TLS.
3031         * Make-lang.in (fortran/openmp.o): Add dependencies on
3032         target.h and toplev.h.
3033
3034         * trans-decl.c (gfc_get_fake_result_decl): Set GFC_DECL_RESULT.
3035         * trans-openmp.c (gfc_omp_privatize_by_reference): Make
3036         DECL_ARTIFICIAL vars predetermined shared except GFC_DECL_RESULT.
3037         (gfc_omp_disregard_value_expr): Handle GFC_DECL_RESULT.
3038         (gfc_trans_omp_variable): New function.
3039         (gfc_trans_omp_variable_list, gfc_trans_omp_reduction_list): Use it.
3040         * trans.h (GFC_DECL_RESULT): Define.
3041
3042         * trans-openmp.c (gfc_omp_firstprivatize_type_sizes): New function.
3043         * f95-lang.c (LANG_HOOKS_OMP_FIRSTPRIVATIZE_TYPE_SIZES): Define.
3044         * trans.h (gfc_omp_firstprivatize_type_sizes): New prototype.
3045
3046         * trans-openmp.c (gfc_omp_privatize_by_reference): Return
3047         true if a pointer has GFC_DECL_SAVED_DESCRIPTOR set.
3048         (gfc_trans_omp_array_reduction, gfc_trans_omp_reduction_list): New
3049         functions.
3050         (gfc_trans_omp_clauses): Add WHERE argument.  Call
3051         gfc_trans_omp_reduction_list rather than gfc_trans_omp_variable_list
3052         for reductions.
3053         (gfc_trans_omp_do, gfc_trans_omp_parallel, gfc_trans_omp_parallel_do,
3054         gfc_trans_omp_parallel_sections, gfc_trans_omp_parallel_workshare,
3055         gfc_trans_omp_sections, gfc_trans_omp_single): Adjust
3056         gfc_trans_omp_clauses callers.
3057
3058         * openmp.c (omp_current_do_code): New var.
3059         (gfc_resolve_omp_do_blocks): New function.
3060         (gfc_resolve_omp_parallel_blocks): Call it.
3061         (gfc_resolve_do_iterator): Add CODE argument.  Don't propagate
3062         predetermination if argument is !$omp do or !$omp parallel do
3063         iteration variable.
3064         * resolve.c (resolve_code): Call gfc_resolve_omp_do_blocks
3065         for EXEC_OMP_DO.  Adjust gfc_resolve_do_iterator caller.
3066         * fortran.h (gfc_resolve_omp_do_blocks): New prototype.
3067         (gfc_resolve_do_iterator): Add CODE argument.
3068
3069         * trans.h (gfc_omp_predetermined_sharing,
3070         gfc_omp_disregard_value_expr, gfc_omp_private_debug_clause): New
3071         prototypes.
3072         (GFC_DECL_COMMON_OR_EQUIV, GFC_DECL_CRAY_POINTEE): Define.
3073         * trans-openmp.c (gfc_omp_predetermined_sharing,
3074         gfc_omp_disregard_value_expr, gfc_omp_private_debug_clause): New
3075         functions.
3076         * trans-common.c (build_equiv_decl, build_common_decl,
3077         create_common): Set GFC_DECL_COMMON_OR_EQUIV flag on the decls.
3078         * trans-decl.c (gfc_finish_cray_pointee): Set GFC_DECL_CRAY_POINTEE
3079         on the decl.
3080         * f95-lang.c (LANG_HOOKS_OMP_PREDETERMINED_SHARING,
3081         LANG_HOOKS_OMP_DISREGARD_VALUE_EXPR,
3082         LANG_HOOKS_OMP_PRIVATE_DEBUG_CLAUSE): Define.
3083
3084         * openmp.c (resolve_omp_clauses): Remove extraneous comma.
3085
3086         * symbol.c (check_conflict): Add conflict between cray_pointee and
3087         threadprivate.
3088         * openmp.c (gfc_match_omp_threadprivate): Fail if
3089         gfc_add_threadprivate returned FAILURE.
3090         (resolve_omp_clauses): Diagnose Cray pointees in SHARED,
3091         {,FIRST,LAST}PRIVATE and REDUCTION clauses and Cray pointers in
3092         {FIRST,LAST}PRIVATE and REDUCTION clauses.
3093
3094         * resolve.c (omp_workshare_flag): New variable.
3095         (resolve_function): Diagnose use of non-ELEMENTAL user defined
3096         function in WORKSHARE construct.
3097         (resolve_code): Cleanup forall_save use.  Make sure omp_workshare_flag
3098         is set to correct value in different contexts.
3099
3100         * openmp.c (resolve_omp_clauses): Replace %s with '%s' when printing
3101         variable name.
3102         (resolve_omp_atomic): Likewise.
3103
3104         PR fortran/24493
3105         * scanner.c (skip_free_comments): Set at_bol at the beginning of the
3106         loop, not before it.
3107         (skip_fixed_comments): Handle ! comments in the middle of line here
3108         as well.
3109         (gfc_skip_comments): Use skip_fixed_comments for FIXED_FORM even if
3110         not at BOL.
3111         (gfc_next_char_literal): Fix expected canonicalized *$omp string.
3112
3113         * trans-openmp.c (gfc_trans_omp_do): Use make_node and explicit
3114         initialization to build OMP_FOR instead of build.
3115
3116         * trans-decl.c (gfc_gimplify_function): Invoke
3117         diagnose_omp_structured_block_errors.
3118
3119         * trans-openmp.c (gfc_trans_omp_master): Use OMP_MASTER.
3120         (gfc_trans_omp_ordered): Use OMP_ORDERED.
3121
3122         * gfortran.h (gfc_resolve_do_iterator, gfc_resolve_blocks,
3123         gfc_resolve_omp_parallel_blocks): New prototypes.
3124         * resolve.c (resolve_blocks): Renamed to...
3125         (gfc_resolve_blocks): ... this.  Remove static.
3126         (gfc_resolve_forall): Adjust caller.
3127         (resolve_code): Only call gfc_resolve_blocks if code->block != 0
3128         and not for EXEC_OMP_PARALLEL* directives.  Call
3129         gfc_resolve_omp_parallel_blocks for EXEC_OMP_PARALLEL* directives.
3130         Call gfc_resolve_do_iterator if resolved successfully EXEC_DO
3131         iterator.
3132         * openmp.c: Include pointer-set.h.
3133         (omp_current_ctx): New variable.
3134         (gfc_resolve_omp_parallel_blocks, gfc_resolve_do_iterator): New
3135         functions.
3136         * Make-lang.in (fortran/openmp.o): Depend on pointer-set.h.
3137
3138         * openmp.c (gfc_match_omp_clauses): For max/min/iand/ior/ieor,
3139         look up symbol if it exists, use its name instead and, if it is not
3140         INTRINSIC, issue diagnostics.
3141
3142         * parse.c (parse_omp_do): Handle implied end do properly.
3143         (parse_executable): If parse_omp_do returned ST_IMPLIED_ENDDO,
3144         return it instead of continuing.
3145
3146         * trans-openmp.c (gfc_trans_omp_critical): Update for changed
3147         operand numbering.
3148         (gfc_trans_omp_do, gfc_trans_omp_parallel, gfc_trans_omp_parallel_do,
3149         gfc_trans_omp_parallel_sections, gfc_trans_omp_parallel_workshare,
3150         gfc_trans_omp_sections, gfc_trans_omp_single): Likewise.
3151
3152         * trans.h (gfc_omp_privatize_by_reference): New prototype.
3153         * f95-lang.c (LANG_HOOKS_OMP_PRIVATIZE_BY_REFERENCE): Redefine
3154         to gfc_omp_privatize_by_reference.
3155         * trans-openmp.c (gfc_omp_privatize_by_reference): New function.
3156
3157         * trans-stmt.h (gfc_trans_omp_directive): Add comment.
3158
3159         * openmp.c (gfc_match_omp_variable_list): Add ALLOW_COMMON argument.
3160         Disallow COMMON matching if it is set.
3161         (gfc_match_omp_clauses, gfc_match_omp_flush): Adjust all callers.
3162         (resolve_omp_clauses): Show locus in error messages.  Check that
3163         variable types in reduction clauses are appropriate for reduction
3164         operators.
3165
3166         * resolve.c (resolve_symbol): Don't error if a threadprivate module
3167         variable isn't SAVEd.
3168
3169         * trans-openmp.c (gfc_trans_omp_do): Put count into BLOCK, not BODY.
3170         Fix typo in condition.  Fix DOVAR initialization.
3171
3172         * openmp.c (gfc_match_omp_clauses): Match min/iand/ior/ieor
3173         rather than .min. etc.
3174
3175         * trans-openmpc.c (omp_not_yet): Remove.
3176         (gfc_trans_omp_parallel_do): Keep listprivate clause on parallel.
3177         Force creation of BIND_EXPR around the workshare construct.
3178         (gfc_trans_omp_parallel_sections): Likewise.
3179         (gfc_trans_omp_parallel_workshare): Likewise.
3180
3181         * types.def (BT_I16, BT_FN_I16_VPTR_I16,
3182         BT_FN_BOOL_VPTR_I16_I16, BT_FN_I16_VPTR_I16_I16): Add.
3183
3184         * trans-openmp.c (gfc_trans_omp_clauses): Create OMP_CLAUSE_DEFAULT.
3185         (gfc_trans_omp_code): New function.
3186         (gfc_trans_omp_do): Use it, remove omp_not_yet uses.
3187         (gfc_trans_omp_parallel, gfc_trans_omp_single): Likewise.
3188         (gfc_trans_omp_sections): Likewise.  Only treat empty last section
3189         specially if lastprivate clause is present.
3190         * f95-lang.c (gfc_init_builtin_functions): Create BUILT_IN_TRAP
3191         builtin.
3192
3193         * trans-openmp.c (gfc_trans_omp_variable_list): Update for
3194         OMP_CLAUSE_DECL name change.
3195         (gfc_trans_omp_do): Likewise.
3196
3197         * trans-openmp.c (gfc_trans_omp_clauses): Create OMP_CLAUSE_REDUCTION
3198         clauses.
3199         (gfc_trans_omp_atomic): Build OMP_ATOMIC instead of expanding
3200         sync builtins directly.
3201         (gfc_trans_omp_single): Build OMP_SINGLE statement.
3202
3203         * trans-openmp.c (gfc_trans_add_clause): New.
3204         (gfc_trans_omp_variable_list): Take a tree code and build the clause
3205         node here.  Link it to the head of a list.
3206         (gfc_trans_omp_clauses): Update to match.
3207         (gfc_trans_omp_do): Use gfc_trans_add_clause.
3208
3209         * trans-openmp.c (gfc_trans_omp_clauses): Change second argument to
3210         gfc_omp_clauses *.  Use gfc_evaluate_now instead of creating
3211         temporaries by hand.
3212         (gfc_trans_omp_atomic, gfc_trans_omp_critical): Use buildN_v macros.
3213         (gfc_trans_omp_do): New function.
3214         (gfc_trans_omp_master): Dont' check for gfc_trans_code returning NULL.
3215         (gfc_trans_omp_parallel): Adjust gfc_trans_omp_clauses caller.
3216         Use buildN_v macros.
3217         (gfc_trans_omp_parallel_do, gfc_trans_omp_parallel_sections,
3218         gfc_trans_omp_parallel_workshare, gfc_trans_omp_sections,
3219         gfc_trans_omp_single, gfc_trans_omp_workshare): New functions.
3220         (gfc_trans_omp_directive): Use them.
3221         * parse.c (parse_omp_do): Allow new_st.op == EXEC_NOP.
3222         * openmp.c (resolve_omp_clauses): Check for list items present
3223         in multiple clauses.
3224         (resolve_omp_do): Check that iteration variable is not THREADPRIVATE
3225         and is not present in any clause variable lists other than PRIVATE
3226         or LASTPRIVATE.
3227
3228         * gfortran.h (symbol_attribute): Add threadprivate bit.
3229         (gfc_common_head): Add threadprivate member, change use_assoc
3230         and saved into char to save space.
3231         (gfc_add_threadprivate): New prototype.
3232         * symbol.c (check_conflict): Handle threadprivate.
3233         (gfc_add_threadprivate): New function.
3234         (gfc_copy_attr): Copy threadprivate.
3235         * trans-openmp.c (gfc_trans_omp_clauses): Avoid creating a temporary
3236         if IF or NUM_THREADS is constant.  Create OMP_CLAUSE_SCHEDULE and
3237         OMP_CLAUSE_ORDERED.
3238         * resolve.c (resolve_symbol): Complain if a THREADPRIVATE symbol
3239         outside a module and not in COMMON has is not SAVEd.
3240         (resolve_equivalence): Ensure THREADPRIVATE objects don't get
3241         EQUIVALENCEd.
3242         * trans-common.c: Include target.h and rtl.h.
3243         (build_common_decl): Set DECL_TLS_MODEL if THREADPRIVATE.
3244         * trans-decl.c: Include rtl.h.
3245         (gfc_finish_var_decl): Set DECL_TLS_MODEL if THREADPRIVATE.
3246         * dump-parse-tree.c (gfc_show_attr): Handle THREADPRIVATE.
3247         * Make-lang.in (fortran/trans-decl.o): Depend on $(RTL_H).
3248         (fortran/trans-common.o): Depend on $(RTL_H) and $(TARGET_H).
3249         * openmp.c (gfc_match_omp_variable_list): Ensure COMMON block
3250         is from current namespace.
3251         (gfc_match_omp_threadprivate): Rewrite.
3252         (resolve_omp_clauses): Check some clause restrictions.
3253         * module.c (ab_attribute): Add AB_THREADPRIVATE.
3254         (attr_bits): Add THREADPRIVATE.
3255         (mio_symbol_attribute, mio_symbol_attribute): Handle threadprivate.
3256         (load_commons, write_common, write_blank_common): Adjust for type
3257         change of saved, store/load threadprivate bit from the integer
3258         as well.
3259
3260         * types.def (BT_FN_UINT_UINT): New.
3261         (BT_FN_VOID_UINT_UINT): Remove.
3262
3263         * trans-openmp.c (gfc_trans_omp_clauses, gfc_trans_omp_barrier,
3264         gfc_trans_omp_critical, gfc_trans_omp_flush, gfc_trans_omp_master,
3265         gfc_trans_omp_ordered, gfc_trans_omp_parallel): New functions.
3266         (gfc_trans_omp_directive): Use them.
3267
3268         * openmp.c (expr_references_sym): Add SE argument, don't look
3269         into SE tree.
3270         (is_conversion): New function.
3271         (resolve_omp_atomic): Adjust expr_references_sym callers.  Handle
3272         promoted expressions.
3273         * trans-openmp.c (gfc_trans_omp_atomic): New function.
3274         (gfc_trans_omp_directive): Call it.
3275
3276         * f95-lang.c (builtin_type_for_size): New function.
3277         (gfc_init_builtin_functions): Initialize synchronization and
3278         OpenMP builtins.
3279         * types.def: New file.
3280         * Make-lang.in (f95-lang.o): Depend on $(BUILTINS_DEF) and
3281         fortran/types.def.
3282
3283         * trans-openmp.c: Rename GOMP_* tree codes into OMP_*.
3284
3285         * dump-parse-tree.c (show_symtree): Don't crash if ns->proc_name
3286         is NULL.
3287
3288         * dump-parse-tree.c (gfc_show_namelist, gfc_show_omp_node): New
3289         functions.
3290         (gfc_show_code_node): Call gfc_show_omp_node for EXEC_OMP_* nodes.
3291
3292         * parse.c (parse_omp_do): Call pop_state before next_statement.
3293         * openmp.c (expr_references_sym, resolve_omp_atomic, resolve_omp_do):
3294         New functions.
3295         (gfc_resolve_omp_directive): Call them.
3296         * match.c (match_exit_cycle): Issue error if EXIT or CYCLE statement
3297         leaves an OpenMP structured block or if EXIT terminates !$omp do
3298         loop.
3299
3300         * Make-lang.in (F95_PARSER_OBJS): Add fortran/openmp.o.
3301         (F95_OBJS): Add fortran/trans-openmp.o.
3302         (fortran/trans-openmp.o): Depend on $(GFORTRAN_TRANS_DEPS).
3303         * lang.opt: Add -fopenmp option.
3304         * options.c (gfc_init_options): Initialize it.
3305         (gfc_handle_option): Handle it.
3306         * gfortran.h (ST_OMP_ATOMIC, ST_OMP_BARRIER, ST_OMP_CRITICAL,
3307         ST_OMP_END_CRITICAL, ST_OMP_END_DO, ST_OMP_END_MASTER,
3308         ST_OMP_END_ORDERED, ST_OMP_END_PARALLEL, ST_OMP_END_PARALLEL_DO,
3309         ST_OMP_END_PARALLEL_SECTIONS, ST_OMP_END_PARALLEL_WORKSHARE,
3310         ST_OMP_END_SECTIONS, ST_OMP_END_SINGLE, ST_OMP_END_WORKSHARE,
3311         ST_OMP_DO, ST_OMP_FLUSH, ST_OMP_MASTER, ST_OMP_ORDERED,
3312         ST_OMP_PARALLEL, ST_OMP_PARALLEL_DO, ST_OMP_PARALLEL_SECTIONS,
3313         ST_OMP_PARALLEL_WORKSHARE, ST_OMP_SECTIONS, ST_OMP_SECTION,
3314         ST_OMP_SINGLE, ST_OMP_THREADPRIVATE, ST_OMP_WORKSHARE): New
3315         statement codes.
3316         (OMP_LIST_PRIVATE, OMP_LIST_FIRSTPRIVATE, OMP_LIST_LASTPRIVATE,
3317         OMP_LIST_COPYPRIVATE, OMP_LIST_SHARED, OMP_LIST_COPYIN,
3318         OMP_LIST_PLUS, OMP_LIST_REDUCTION_FIRST, OMP_LIST_MULT,
3319         OMP_LIST_SUB, OMP_LIST_AND, OMP_LIST_OR, OMP_LIST_EQV,
3320         OMP_LIST_NEQV, OMP_LIST_MAX, OMP_LIST_MIN, OMP_LIST_IAND,
3321         OMP_LIST_IOR, OMP_LIST_IEOR, OMP_LIST_REDUCTION_LAST, OMP_LIST_NUM):
3322         New OpenMP variable list types.
3323         (gfc_omp_clauses): New typedef.
3324         (gfc_get_omp_clauses): Define.
3325         (EXEC_OMP_CRITICAL, EXEC_OMP_DO, EXEC_OMP_FLUSH, EXEC_OMP_MASTER,
3326         EXEC_OMP_ORDERED, EXEC_OMP_PARALLEL, EXEC_OMP_PARALLEL_DO,
3327         EXEC_OMP_PARALLEL_SECTIONS, EXEC_OMP_PARALLEL_WORKSHARE,
3328         EXEC_OMP_SECTIONS, EXEC_OMP_SINGLE, EXEC_OMP_WORKSHARE,
3329         EXEC_OMP_ATOMIC, EXEC_OMP_BARRIER, EXEC_OMP_END_NOWAIT,
3330         EXEC_OMP_END_SINGLE): New OpenMP gfc_exec_op codes.
3331         (struct gfc_code): Add omp_clauses, omp_name, omp_namelist
3332         and omp_bool fields to ext union.
3333         (flag_openmp): Declare.
3334         (gfc_free_omp_clauses, gfc_resolve_omp_directive): New prototypes.
3335         * scanner.c (openmp_flag, openmp_locus): New variables.
3336         (skip_free_comments, skip_fixed_comments, gfc_next_char_literal):
3337         Handle OpenMP directive lines and conditional compilation magic
3338         comments.
3339         * parse.h (COMP_OMP_STRUCTURED_BLOCK): New compile state.
3340         * parse.c (decode_omp_directive, parse_omp_do, parse_omp_atomic,
3341         parse_omp_structured_block): New functions.
3342         (next_free, next_fixed): Parse OpenMP directives.
3343         (case_executable, case_exec_markers, case_decl): Add ST_OMP_*
3344         codes.
3345         (gfc_ascii_statement): Handle ST_OMP_* codes.
3346         (parse_executable): Rearrange the loop slightly, so that
3347         parse_omp_do can return next_statement.
3348         * match.h (gfc_match_omp_eos, gfc_match_omp_atomic,
3349         gfc_match_omp_barrier, gfc_match_omp_critical, gfc_match_omp_do,
3350         gfc_match_omp_flush, gfc_match_omp_master, gfc_match_omp_ordered,
3351         gfc_match_omp_parallel, gfc_match_omp_parallel_do,
3352         gfc_match_omp_parallel_sections, gfc_match_omp_parallel_workshare,
3353         gfc_match_omp_sections, gfc_match_omp_single,
3354         gfc_match_omp_threadprivate, gfc_match_omp_workshare,
3355         gfc_match_omp_end_nowait, gfc_match_omp_end_single): New prototypes.
3356         * resolve.c (resolve_blocks): Ignore EXEC_OMP_* block directives.
3357         (resolve_code): Call gfc_resolve_omp_directive on EXEC_OMP_*
3358         directives.
3359         * trans.c (gfc_trans_code): Call gfc_trans_omp_directive for
3360         EXEC_OMP_* directives.
3361         * st.c (gfc_free_statement): Handle EXEC_OMP_* statement freeing.
3362         * trans-stmt.h (gfc_trans_omp_directive): New prototype.
3363         * openmp.c: New file.
3364         * trans-openmp.c: New file.
3365
3366 2006-02-13  Andrew Pinski  <pinskia@physics.uc.edu>
3367             Jakub Jelinek  <jakub@redhat.com>
3368
3369         PR fortran/26246
3370         * trans-decl.c (gfc_get_symbol_decl, gfc_get_fake_result_decl): Use
3371         gfc_add_decl_to_function rather than gfc_finish_var_decl on length.
3372
3373 2006-02-13  Paul Thomas  <pault@gcc.gnu.org>
3374
3375         PR fortran/26074
3376         PR fortran/25103
3377         * resolve.c (resolve_symbol): Extend the requirement that module
3378         arrays have constant bounds to those in the main program.  At the
3379         same time simplify the array bounds, to avoiding trapping parameter
3380         array references, and exclude automatic character length from main
3381         and modules. Rearrange resolve_symbol and resolve_derived to put as
3382         each flavor together, as much as is possible and move all specific
3383         code for flavors FL_VARIABLE, FL_PROCEDURE and FL_PARAMETER into new
3384         functions.
3385         (resolve_fl_var_and_proc, resolve_fl_variable, resolve_fl_procedure):
3386         New functions to do work of resolve_symbol.
3387         (resolve_index_expr): New function that is called from resolved_symbol
3388         and is extracted from resolve_charlen.
3389         (resolve_charlen): Call this new function.
3390         (resolve_fl_derived): Renamed resolve_derived to be consistent with
3391         the naming of the new functions for the other flavours.  Change the
3392         charlen checking so that the style is consistent with other similar
3393         checks. Add the generation of the gfc_dt_list, removed from resolve_
3394         symbol.
3395
3396         PR fortran/20861
3397         * resolve.c (resolve_actual_arglist): Prevent internal procedures
3398         from being dummy arguments.
3399
3400         PR fortran/20871
3401         * resolve.c (resolve_actual_arglist): Prevent pure but non-intrinsic
3402         procedures from being dummy arguments.
3403
3404         PR fortran/25083
3405         * resolve.c (check_data_variable): Add test that data variable is in
3406         COMMON.
3407
3408         PR fortran/25088
3409         * resolve.c (resolve_call): Add test that the subroutine does not
3410         have a type.
3411
3412 2006-02-12  Erik Edelmann  <eedelman@gcc.gnu.org>
3413
3414         PR fortran/25806
3415         * trans-array.c (gfc_trans_allocate_array_storage): New argument
3416         dealloc; free the temporary only if dealloc is true.
3417         (gfc_trans_allocate_temp_array): New argument bool dealloc, to be
3418         passed onwards to gfc_trans_allocate_array_storage.
3419         (gfc_trans_array_constructor, gfc_conv_loop_setup): Update call to
3420         gfc_trans_allocate_temp_array.
3421         * trans-array.h (gfc_trans_allocate_temp_array): Update function
3422         prototype.
3423         * trans-expr.c (gfc_conv_function_call): Set new argument 'dealloc'
3424         to gfc_trans_allocate_temp_array to false in case of functions
3425         returning pointers.
3426         (gfc_trans_arrayfunc_assign): Return NULL for functions returning
3427         pointers.
3428
3429 2006-02-10  Steven G. Kargl  <kargls@comcast.net>
3430
3431         PR fortran/20858
3432         *decl.c (variable_decl): Improve error message.  Remove initialization
3433         typespec.  Wrap long line.
3434         *expr.c (gfc_check_pointer_assign): Permit checking of type, kind type,
3435         and rank.
3436         *simplify.c (gfc_simplify_null): Ensure type, kind type, and rank
3437         are set.
3438
3439
3440 2006-02-10  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
3441
3442         PR fortran/14771
3443         * arith.c (eval_intrinsic): Accept INTRINSIC_PARENTHESES.
3444         * expr.c (check_intrinsic_op): Likewise.
3445         * module.c (mio_expr): Likewise.
3446
3447 2006-02-09  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
3448
3449         * dump-parse-tree.c: Update copyright years.
3450         * matchexp.c: Likewise.
3451         * module.c: Likewise.
3452
3453         PR fortran/14771
3454         * gfortran.h (gfc_intrinsic_op): Add INTRINSIC_PARENTHESES.
3455         * dump-parse-tree (gfc_show_expr): Handle INTRINSIC_PARENTHESES.
3456         * expr.c (simplify_intrinsic_op): Treat INTRINSIC_PARENTHESES as
3457         if it were INTRINSIC_UPLUS.
3458         * resolve.c (resolve_operator): Handle INTRINSIC_PARENTHESES.
3459         * match.c (intrinsic_operators): Add INTRINSIC_PARENTHESES.
3460         * matchexp.c (match_primary): Record parentheses surrounding
3461         numeric expressions.
3462         * module.c (intrinsics): Add INTRINSIC_PARENTHESES for module
3463         dumping.
3464         * trans-expr.c (gfc_conv_expr_op): Handle INTRINSIC_PARENTHESES.
3465
3466 2006-02-09  Paul Thomas  <pault@gcc.gnu.org>
3467
3468         PR fortran/26038
3469         * trans-stmt.c (gfc_trans_allocate): Provide assumed character length
3470         scalar with missing backend_decl for the hidden dummy charlen.
3471
3472         PR fortran/25059
3473         * interface.c (gfc_extend_assign): Remove detection of non-PURE
3474         subroutine in assignment interface, with gfc_error, and put it in
3475         * resolve.c (resolve_code).
3476
3477         PR fortran/25070
3478         * interface.c (gfc_procedure_use): Flag rank checking for non-
3479         elemental, contained or interface procedures in call to
3480         (compare_actual_formal), where ranks are checked for assumed
3481         shape arrays..
3482
3483 2006-02-08  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
3484
3485         PR libfortran/25425
3486         * trans-decl.c (gfc_generate_function_code): Add new argument,
3487         pedantic, to set_std call.
3488
3489 2006-02-06  Thomas Koenig  <Thomas.Koenig@online.de>
3490
3491         PR libfortran/23815
3492         * gfortran.texi: Document the GFORTRAN_CONVERT_UNIT environment
3493         variable.
3494         * invoke.texi:  Mention the "Runtime" chapter.
3495         Document the -fconvert= option.
3496         * gfortran.h:  Add options_convert.
3497         * lang.opt:  Add fconvert=little-endian, fconvert=big-endian,
3498         fconvert=native and fconvert=swap.
3499         * trans-decl.c (top level):  Add gfor_fndecl_set_convert.
3500         (gfc_build_builtin_function_decls):  Set gfor_fndecl_set_convert.
3501         (gfc_generate_function_code):  If -fconvert was specified,
3502         and this is the main program, add a call to set_convert().
3503         * options.c:  Handle the -fconvert options.
3504
3505 2006-02-06  Roger Sayle  <roger@eyesopen.com>
3506
3507         * trans-stmt.c (gfc_evaluate_where_mask): Allow the NMASK argument
3508         to be NULL to indicate that the not mask isn't required.
3509         (gfc_trans_where_2): Remove PMASK argument.  Avoid calculating the
3510         pending mask for the last clause of a WHERE chain.  Update recursive
3511         call.
3512         (gfc_trans_forall_1): Update call to gfc_trans_where_2.
3513         (gfc_trans_where): Likewise.
3514
3515 2006-02-06  Jakub Jelinek  <jakub@redhat.com>
3516
3517         Backport from gomp-20050608-branch
3518         * trans-decl.c (create_function_arglist): Handle dummy functions.
3519
3520         * trans-decl.c (gfc_get_symbol_decl): Revert explicit setting of
3521         TYPE_SIZE_UNIT.
3522         (gfc_trans_vla_type_sizes): Also "gimplify"
3523         GFC_TYPE_ARRAY_DATAPTR_TYPE for GFC_DESCRIPTOR_TYPE_P types.
3524         * trans-array.c (gfc_trans_deferred_array): Call
3525         gfc_trans_vla_type_sizes.
3526
3527         * trans-decl.c (saved_function_decls, saved_parent_function_decls):
3528         Remove unnecessary initialization.
3529         (create_function_arglist): Make sure __result has complete type.
3530         (gfc_get_fake_result_decl): Change current_fake_result_decl into
3531         a tree chain.  For entry master, create a separate variable
3532         for each result name.  For BT_CHARACTER results, call
3533         gfc_finish_var_decl on length even if it has been already created,
3534         but not pushdecl'ed.
3535         (gfc_trans_vla_type_sizes): For function/entry result, adjust
3536         result value type, not the FUNCTION_TYPE.
3537         (gfc_generate_function_code): Adjust for current_fake_result_decl
3538         changes.
3539         (gfc_trans_deferred_vars): Likewise.  Call gfc_trans_vla_type_sizes
3540         even on result if it is assumed-length character.
3541
3542         * trans-decl.c (gfc_trans_dummy_character): Add SYM argument.
3543         Call gfc_trans_vla_type_sizes.
3544         (gfc_trans_auto_character_variable): Call gfc_trans_vla_type_sizes.
3545         (gfc_trans_vla_one_sizepos, gfc_trans_vla_type_sizes_1,
3546         gfc_trans_vla_type_sizes): New functions.
3547         (gfc_trans_deferred_vars): Adjust gfc_trans_dummy_character
3548         callers.  Call gfc_trans_vla_type_sizes on assumed-length
3549         character parameters.
3550         * trans-array.c (gfc_trans_array_bounds,
3551         gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias): Call
3552         gfc_trans_vla_type_sizes.
3553         * trans.h (gfc_trans_vla_type_sizes): New prototype.
3554
3555         * trans-decl.c (gfc_build_qualified_array): For non-assumed-size
3556         arrays without constant size, create also an index var for
3557         GFC_TYPE_ARRAY_SIZE (type).  If the type is incomplete, complete
3558         it as 0..size-1.
3559         (gfc_create_string_length): Don't call gfc_defer_symbol_init
3560         if just creating DECL_ARGUMENTS.
3561         (gfc_get_symbol_decl): Call gfc_finish_var_decl and
3562         gfc_defer_symbol_init even if ts.cl->backend_decl is already
3563         set to a VAR_DECL that doesn't have DECL_CONTEXT yet.
3564         (create_function_arglist): Rework, so that hidden length
3565         arguments for CHARACTER parameters are created together with
3566         the parameters.  Resolve ts.cl->backend_decl for CHARACTER
3567         parameters.  If the argument is a non-constant length array
3568         or CHARACTER, ensure PARM_DECL has different type than
3569         its DECL_ARG_TYPE.
3570         (generate_local_decl): Call gfc_get_symbol_decl even
3571         for non-referenced non-constant length CHARACTER parameters
3572         after optionally issuing warnings.
3573         * trans-array.c (gfc_trans_array_bounds): Set last stride
3574         to GFC_TYPE_ARRAY_SIZE (type) to initialize it as well.
3575         (gfc_trans_dummy_array_bias): Initialize GFC_TYPE_ARRAY_SIZE (type)
3576         variable as well.
3577
3578         * trans-expr.c (gfc_conv_expr_val): Fix comment typo.
3579
3580         * trans-stmt.c (gfc_trans_simple_do): Fix comment.
3581
3582 2006-02-04  Roger Sayle  <roger@eyesopen.com>
3583
3584         * dependency.c (gfc_check_dependency): Remove unused vars and nvars
3585         arguments.  Replace with an "identical" argument.  A full array
3586         reference to the same symbol is a dependency if identical is true.
3587         * dependency.h (gfc_check_dependency): Update prototype.
3588         * trans-array.h (gfc_check_dependency): Delete duplicate prototype.
3589         * trans-stmt.c: #include dependency.h for gfc_check_dependency.
3590         (gfc_trans_forall_1): Update calls to gfc_check_dependency.
3591         (gfc_trans_where_2): Likewise.  Remove unneeded variables.
3592         (gfc_trans_where_3): New function for simple non-dependent WHEREs.
3593         (gfc_trans_where): Call gfc_trans_where_3 to translate simple
3594         F90-style WHERE statements without internal dependencies.
3595         * Make-lang.in (trans-stmt.o): Depend upon dependency.h.
3596
3597 2006-02-05  H.J. Lu  <hongjiu.lu@intel.com>
3598
3599         PR fortran/26041
3600         PR fortran/26064
3601         * resolve.c (resolve_types): New function.
3602         (resolve_codes): Likewise.
3603         (gfc_resolve): Use them.
3604
3605 2006-02-05  Roger Sayle  <roger@eyesopen.com>
3606
3607         * trans-stmt.c (gfc_evaluate_where_mask): Use LOGICAL*1 for WHERE
3608         masks instead of LOGICAL*4.
3609
3610 2006-02-05  Jakub Jelinek  <jakub@redhat.com>
3611
3612         * resolve.c (resolve_symbol): Initialize constructor_expr to NULL.
3613
3614 2006-02-04  Thomas Koenig  <Thomas.Koenig@online.de>
3615
3616         PR fortran/25075
3617         check.c (identical_dimen_shape):  New function.
3618         (check_dot_product):  Use identical_dimen_shape() to check sizes
3619         for dot_product.
3620         (gfc_check_matmul):  Likewise.
3621         (gfc_check_merge):  Check conformance between tsource and fsource
3622         and between tsource and mask.
3623         (gfc_check_pack):  Check conformance between array and mask.
3624
3625 2006-02-03  Steven G. Kargl  <kargls@comcast>
3626             Paul Thomas  <pault@gcc.gnu.org>
3627
3628         PR fortran/20845
3629         * resolve.c (resolve_symbol): Default initialization of derived type
3630         component reguires the SAVE attribute.
3631
3632 2006-02-02  Steven G. Kargl  <kargls@comcast>
3633
3634         PR fortran/24958
3635         match.c (gfc_match_nullify):  Free the list from head not tail.
3636
3637         PR fortran/25072
3638         * match.c (match_forall_header): Fix internal error caused by bogus
3639         gfc_epxr pointers.
3640
3641
3642 2006-01-31  Thomas Koenig  <Thomas.Koenig@online.de>
3643
3644         PR fortran/26039
3645         expr.c (gfc_check_conformance):  Reorder error message
3646         to avoid plural.
3647         check.c(gfc_check_minloc_maxloc):  Call gfc_check_conformance
3648         for checking arguments array and mask.
3649         (check_reduction):  Likewise.
3650
3651 2006-01-30  Erik Edelmann  <eedelman@gcc.gnu.org>
3652
3653         PR fortran/24266
3654         * trans-io.c (set_internal_unit): Check the rank of the
3655         expression node itself instead of its symbol.
3656
3657 2006-01-29  Paul Thomas  <pault@gcc.gnu.org>
3658
3659         PR fortran/18578
3660         PR fortran/18579
3661         PR fortran/20857
3662         PR fortran/20885
3663         * interface.c (compare_actual_formal): Error for INTENT(OUT or INOUT)
3664         if actual argument is not a variable.
3665
3666 2006-01-28  Paul Thomas  <pault@gcc.gnu.org>
3667
3668         PR fortran/17911
3669         * expr.c (gfc_check_assign, gfc_check_pointer_assign): Emit error if
3670         the lvalue is a use associated procedure.
3671
3672         PR fortran/20895
3673         PR fortran/25030
3674         * expr.c (gfc_check_pointer_assign): Emit error if lvalue and rvalue
3675         character lengths are not the same.  Use gfc_dep_compare_expr for the
3676         comparison.
3677         * gfortran.h: Add prototype for gfc_dep_compare_expr.
3678         * dependency.h: Remove prototype for gfc_dep_compare_expr.
3679
3680 2006-01-27  Paul Thomas  <pault@gcc.gnu.org>
3681
3682         PR fortran/25964
3683         * resolve.c (resolve_function): Add GFC_ISYM_LOC to the list of
3684         generic_ids exempted from assumed size checking.
3685
3686 2006-01-27  Jakub Jelinek  <jakub@redhat.com>
3687
3688         PR fortran/25324
3689         * Make-lang.in (fortran/scanner.o): Depend on toplev.h.
3690         * lang.opt (fpreprocessed): New option.
3691         * scanner.c: Include toplev.h.
3692         (gfc_src_file, gfc_src_preprocessor_lines): New variables.
3693         (preprocessor_line): Unescape filename if there were any
3694         backslashes.
3695         (load_file): If initial and gfc_src_file is not NULL,
3696         use it rather than opening the file.  If gfc_src_preprocessor_lines
3697         has non-NULL elements, pass it to preprocessor_line.
3698         (unescape_filename, gfc_read_orig_filename): New functions.
3699         * gfortran.h (gfc_option_t): Add flag_preprocessed.
3700         (gfc_read_orig_filename): New prototype.
3701         * options.c (gfc_init_options): Clear flag_preprocessed.
3702         (gfc_post_options): If flag_preprocessed, call
3703         gfc_read_orig_filename.
3704         (gfc_handle_option): Handle OPT_fpreprocessed.
3705         * lang-specs.h: Pass -fpreprocessed to f951 if preprocessing
3706         sources.
3707
3708 2006-01-27  Erik Edelmann  <eedelman@gcc.gnu.org>
3709
3710         * symbol.c (free_old_symbol): Fix confusing comment, and add code
3711           to free old_symbol->formal.
3712
3713 2006-01-26  Paul Thomas  <pault@gcc.gnu.org>
3714
3715         PR fortran/25964
3716         * resolve.c (resolve_function): Exclude statement functions from
3717         global reference checking.
3718
3719         PR fortran/25084
3720         PR fortran/20852
3721         PR fortran/25085
3722         PR fortran/25086
3723         * resolve.c (resolve_function): Declare a gfc_symbol to replace the
3724         references through the symtree to the symbol associated with the
3725         function expresion. Give error on reference to an assumed character
3726         length function is defined in an interface or an external function
3727         that is not a dummy argument.
3728         (resolve_symbol): Give error if an assumed character length function
3729         is array-valued, pointer-valued, pure or recursive. Emit warning
3730         that character(*) value functions are obsolescent in F95.
3731
3732         PR fortran/25416
3733         * trans-expr.c (gfc_conv_function_call): The above patch to resolve.c
3734         prevents any assumed character length function call from getting here
3735         except intrinsics such as SPREAD. In this case, ensure that no
3736         segfault occurs from referencing non-existent charlen->length->
3737         expr_type and provide a backend_decl for the charlen from the charlen
3738         of the first actual argument.
3739
3740         Cure temp name confusion.
3741         * trans-expr.c (gfc_get_interface_mapping_array): Change name of
3742         temporary from "parm" to "ifm" to avoid clash with temp coming from
3743         trans-array.c.
3744
3745 2006-01-25  Erik Edelmann  <eedelman@gcc.gnu.org>
3746
3747         PR fortran/25716
3748         * symbol.c (free_old_symbol): New function.
3749         (gfc_commit_symbols): Use it.
3750         (gfc_commit_symbol): New function.
3751         (gfc_use_derived): Use it.
3752         * gfortran.h: Add prototype for gfc_commit_symbol.
3753         * intrinsic.c (gfc_find_function): Search in 'conversion'
3754         if not found in 'functions'.
3755         (gfc_convert_type_warn): Add a symtree to the new
3756         expression node, and commit the new symtree->n.sym.
3757         * resolve.c (gfc_resolve_index): Make sure typespec is
3758         properly initialized.
3759
3760 2006-01-23  Paul Thomas  <pault@gcc.gnu.org>
3761
3762         PR fortran/25901
3763         * decl.c (get_proc_name): Replace subroutine and function attributes
3764         in "already defined" test by the formal arglist pointer being non-NULL.
3765
3766         Fix regression in testing of admissability of attributes.
3767         * symbol.c (gfc_add_attribute): If the current_attr has non-zero
3768         intent, do not do the check for a dummy being used.
3769         * decl.c (attr_decl1): Add current_attr.intent as the third argument
3770         in the call to gfc_add_attribute.
3771         * gfortran.h: Add the third argument to the prototype for
3772         gfc_add_attribute.
3773
3774 2006-01-21  Joseph S. Myers  <joseph@codesourcery.com>
3775
3776         * gfortranspec.c (lang_specific_driver): Update copyright notice
3777         date.
3778
3779 2006-01-21  Paul Thomas  <pault@gcc.gnu.org>
3780
3781         PR fortran/25124
3782         PR fortran/25625
3783         * decl.c (get_proc_name): If there is an existing
3784         symbol in the encompassing namespace, call errors
3785         if it is a procedure of the same name or the kind
3786         field is set, indicating a type declaration.
3787
3788         PR fortran/20881
3789         PR fortran/23308
3790         PR fortran/25538
3791         PR fortran/25710
3792         * decl.c (add_global_entry): New function to check
3793         for existing global symbol with this name and to
3794         create new one if none exists.
3795         (gfc_match_entry): Call add_global_entry before
3796         matching argument lists for subroutine and function
3797         entries.
3798         * gfortran.h: Prototype for existing function,
3799         global_used.
3800         * resolve.c (resolve_global_procedure): New function
3801         to check global symbols for procedures.
3802         (resolve_call, resolve_function): Calls to this
3803         new function for non-contained and non-module
3804         procedures.
3805         * match.c (match_common): Add check for existing
3806         global symbol, creat one if none exists and emit
3807         error if there is a clash.
3808         * parse.c (global_used): Remove static and use the
3809         gsymbol name rather than the new_block name, so that
3810         the function can be called from resolve.c.
3811         (parse_block_data, parse_module, add_global_procedure):
3812         Improve checks for existing gsymbols.  Emit error if
3813         already defined or if references were to another type.
3814         Set defined flag.
3815
3816         PR fortran/PR24276
3817         * trans-expr.c (gfc_conv_aliased_arg): New function called by
3818         gfc_conv_function_call that coverts an expression for an aliased
3819         component reference to a derived type array into a temporary array
3820         of the same type as the component.  The temporary is passed as an
3821         actual argument for the procedure call and is copied back to the
3822         derived type after the call.
3823         (is_aliased_array): New function that detects an array reference
3824         that is followed by a component reference.
3825         (gfc_conv_function_call): Detect an aliased actual argument with
3826         is_aliased_array and convert it to a temporary and back again
3827         using gfc_conv_aliased_arg.
3828
3829 2006-01-19  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
3830
3831         * gfortranspec.c: Update copyright years.
3832         * trans.c: Likewise.
3833         * trans-array.c: Likewise.
3834         * trans-array.h: Likewise.
3835         * trans-decl.c: Likewise.
3836         * trans-stmt.c: Likewise.
3837         * trans-stmt.h: Likewise.
3838         * trans-types.c: Likewise.
3839
3840 2006-01-18  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
3841
3842         PR fortran/18540
3843         PR fortran/18937
3844         * gfortran.h (BBT_HEADER): Move definition up.
3845         (gfc_st_label): Add BBT_HEADER, remove 'prev' and 'next'.
3846         * io.c (format_asterisk): Adapt initializer.
3847         * resolve.c (resolve_branch): Allow FORTRAN 66 cross-block GOTOs
3848         as extension.
3849         (warn_unused_label): Take gfc_st_label label as argument, adapt to
3850         new data structure.
3851         (gfc_resolve): Adapt call to warn_unused_label.
3852         * symbol.c (compare_st_labels): New function.
3853         (gfc_free_st_label, free_st_labels, gfc_get_st_label): Convert to
3854         using balanced binary tree.
3855         * decl.c (match_char_length, gfc_match_old_kind_spec): Do away
3856         with 'cnt'.
3857         (warn_unused_label): Adapt to binary tree.
3858         * match.c (gfc_match_small_literal_int): Only set cnt if non-NULL.
3859         * primary.c (match_kind_param): Do away with cnt.
3860
3861 2006-01-18  Paul Thomas  <pault@gcc.gnu.org>
3862
3863         PR fortran/20869
3864         PR fortran/20875
3865         PR fortran/25024
3866         * symbol.c (check_conflict): Add pointer valued elemental
3867         functions and internal procedures with the external attribute
3868         to the list of conflicts.
3869         (gfc_add_attribute): New catch-all function to perform the
3870         checking of symbol attributes for attribute declaration
3871         statements.
3872         * decl.c (attr_decl1): Call gfc_add_attribute for each of -
3873         (gfc_match_external, gfc_match_intent, gfc_match_intrinsic,
3874         gfc_match_pointer, gfc_match_dimension, gfc_match_target):
3875         Remove spurious calls to checks in symbol.c.  Set the
3876         attribute directly and use the call to attr_decl() for
3877         checking.
3878         * gfortran.h:  Add prototype for gfc_add_attribute.
3879
3880         PR fortran/25785
3881         * resolve.c (resolve_function): Exclude PRESENT from assumed size
3882         argument checking. Replace strcmp's with comparisons with generic
3883         codes.
3884
3885 2006-01-16  Rafael \81Ávila de Esp\81índola  <rafael.espindola@gmail.com>
3886
3887         * gfortranspec.c (lang_specific_spec_functions): Remove.
3888
3889 2006-01-16  Richard Guenther  <rguenther@suse.de>
3890
3891         * trans-stmt.c (gfc_trans_if_1): Use fold_buildN and build_int_cst.
3892         (gfc_trans_arithmetic_if): Likewise.
3893         (gfc_trans_simple_do): Likewise.
3894         (gfc_trans_do): Likewise.
3895         (gfc_trans_do_while): Likewise.
3896         (gfc_trans_logical_select): Likewise.
3897         (gfc_trans_forall_loop): Likewise.
3898         (generate_loop_for_temp_to_lhs): Likewise.
3899         (generate_loop_for_rhs_to_temp): Likewise.
3900         (gfc_trans_allocate): Likewise.
3901         * trans.c (gfc_add_expr_to_block): Do not fold expr again.
3902
3903 2006-01-16  Richard Guenther  <rguenther@suse.de>
3904
3905         * trans-expr.c (gfc_conv_function_call): Use fold_build2.
3906         * trans-stmt.c (gfc_trans_goto): Likewise.  Use build_int_cst.
3907         * trans.c (gfc_trans_runtime_check): Don't fold the condition
3908         again.
3909
3910 2006-01-13  Steven G. Kargl  <kargls@comcast.net>
3911
3912         PR fortran/25756
3913         * symbol.c (gfc_free_st_label): Give variable meaningful name. Remove
3914         unneeded parenthesis. Fix-up the head of the list (2 lines gleaned
3915         from g95).
3916
3917 2006-01-13  Diego Novillo  <dnovillo@redhat.com>
3918
3919         * trans.c (gfc_add_expr_to_block): Do not fold tcc_statement
3920         nodes.
3921
3922 2006-01-11  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
3923
3924         * parse.c (next_fixed): Remove superfluous string concatenation.
3925
3926 2006-01-11  Bernhard Fischer  <rep.nop@aon.at>
3927
3928         PR fortran/25486
3929         * scanner.c (load_line): use maxlen to determine the line-length used
3930         for padding lines in fixed form.
3931
3932 2006-01-11  Paul Thomas  <pault@gcc.gnu.org>
3933
3934         PR fortran/25730
3935         * trans-types.c (copy_dt_decls_ifequal): Copy backend decl for
3936         character lengths.
3937
3938 2006-01-09  Andrew Pinski  <pinskia@physics.uc.edu>
3939
3940         fortran/24936
3941         * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Use fold_convert
3942         to avoid type mismatch.
3943
3944 2006-01-09  Andrew Pinski  <pinskia@physics.uc.edu>
3945
3946         PR fortran/21977
3947         * trans-decl.c (gfc_generate_function_code): Move the NULLing of
3948         current_fake_result_decl down to below generate_local_vars.
3949
3950 2006-01-09  Feng Wang  <fengwang@nudt.edu.cn>
3951
3952         PR fortran/12456
3953         * trans-expr.c (gfc_to_single_character): New function that converts
3954         string to single character if its length is 1.
3955         (gfc_build_compare_string):New function that compare string and handle
3956         single character specially.
3957         (gfc_conv_expr_op): Use gfc_build_compare_string.
3958         (gfc_trans_string_copy): Use gfc_to_single_character.
3959         * trans-intrinsic.c (gfc_conv_intrinsic_strcmp): Use
3960         gfc_build_compare_string.
3961         * trans.h (gfc_build_compare_string): Add prototype.
3962
3963 2006-01-09  Feng Wang  <fengwang@nudt.edu.cn>
3964
3965         * simplify.c (gfc_simplify_char): Use UCHAR_MAX instead of literal
3966         constant.
3967         (gfc_simplify_ichar): Get the result from unsinged char and in the
3968         range 0 to UCHAR_MAX instead of CHAR_MIN to CHAR_MAX.
3969
3970 2006-01-08  Erik Edelmann  <eedelman@gcc.gnu.org>
3971
3972         PR fortran/25093
3973         * resolve.c (resolve_fntype): Check that PUBLIC functions
3974         aren't of PRIVATE type.
3975
3976 2006-01-07  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
3977
3978         * decl.c (gfc_match_function_decl): Correctly error out in case of
3979         omitted function argument list.
3980
3981 2006-01-07  Paul Thomas  <pault@gcc.gnu.org>
3982
3983         PR fortran/22146
3984         * trans-array.c (gfc_reverse_ss): Remove static attribute.
3985         (gfc_walk_elemental_function_args): Replace gfc_expr * argument for
3986         the function call with the corresponding gfc_actual_arglist*.  Change
3987         code accordingly.
3988         (gfc_walk_function_expr): Call to gfc_walk_elemental_function_args
3989         now requires the actual argument list instead of the expression for
3990         the function call.
3991         * trans-array.h: Modify the prototype for gfc_walk_elemental_function_args
3992         and provide a prototype for gfc_reverse_ss.
3993         * trans-stmt.h (gfc_trans_call): Add the scalarization code for the case
3994         where an elemental subroutine has array valued actual arguments.
3995
3996         PR fortran/25029
3997         PR fortran/21256
3998         PR fortran/20868
3999         PR fortran/20870
4000         * resolve.c (check_assumed_size_reference): New function to check for upper
4001         bound in assumed size array references.
4002         (resolve_assumed_size_actual): New function to do a very restricted scan
4003         of actual argument expressions of those procedures for which incomplete
4004         assumed size array references are not allowed.
4005         (resolve_function, resolve_call): Switch off assumed size checking of
4006         actual arguments, except for elemental procedures and intrinsic
4007         inquiry functions, in some circumstances.
4008         (resolve_variable): Call check_assumed_size_reference.
4009
4010 2006-01-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
4011
4012         PR fortran/24268
4013         * io.c (next_char_not_space): New function that returns the next
4014         character that is not white space.
4015         (format_lex): Use the new function to skip whitespace within
4016         a format string.
4017
4018 2006-01-05  Erik Edelmann  <eedelman@gcc.gnu.org>
4019
4020         PR fortran/23675
4021         * expr.c (gfc_expr_set_symbols_referenced): New function.
4022         * gfortran.h: Add a function prototype for it.
4023         * resolve.c (resolve_function): Use it for
4024         use associated character functions lengths.
4025         * expr.c, gfortran.h, resolve.c: Updated copyright years.
4026
4027 2006-01-03  Steven G. Kargl  <kargls@comcast.net>
4028
4029         PR fortran/25101
4030         * resolve.c (resolve_forall_iterators):  Check for scalar variables;
4031         Check stride is nonzero.
4032
4033 2006-01-02  Steven G. Kargl  <kargls@comcast.net>
4034
4035         PR fortran/24640
4036         * parse.c (next_free): Check for whitespace after the label.
4037         * match.c (gfc_match_small_literal_int): Initialize cnt variable.
4038
4039 2006-01-01  Steven G. Kargl  <kargls@comcast.net>
4040
4041         * ChangeLog: Split previous years into ...
4042         * ChangeLog-2002: here.
4043         * ChangeLog-2003: here.
4044         * ChangeLog-2004: here.
4045         * ChangeLog-2005: here.