gcc/fortran/ChangeLog-2004

   1 2004-12-29  Steven G. Kargl  <kargls@comcast.net>
   2
   3         * gfortran.h (gfc_case): fix typo in comment.
   4
   5 2004-12-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
   6
   7         * trans-intrinsic.c (gfc_conv_intrinsic_ishft): Change to
   8         logical shift.  Call fold.  Remove 0-bit shift shortcut.
   9         (gfc_conv_intrinsic_ishftc): Convert first argument to at least
  10         4 bytes bits.  Convert 2nd and 3rd argument to 4 bytes.  Convert
  11         result if width(arg 1) < 4 bytes.  Call fold.
  12
  13         PR fortran/19032
  14         * trans-intrinsic.c (gfc_conv_intrinsic_mod): Update comment
  15         in front of function to match the standard.  Correct handling
  16         of MODULO.
  17
  18 2004-12-27  Andrew Pinski  <pinskia@physics.uc.edu>
  19
  20         * trans-expr.c (gfc_conv_cst_int_power): Only check for
  21         flag_unsafe_math_optimizations if we have a float type.
  22
  23 2004-12-23  Steven G. Kargl  <kargls@comcast.net>
  24
  25         * gfortran.texi: Fix typo.
  26
  27 2004-12-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
  28
  29         * trans-intrinsic.c (build_fixbound_expr): Clarify comment, fix
  30         comment typo.
  31
  32 2004-12-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
  33
  34         PR fortran/18993
  35         * match.c (gfc_match_if): Don't explicitly skip optional whitespace.
  36         (gfc_match_nullify): Make sure that ')' is in front of the end of
  37         statement.
  38
  39         * scanner.c (skip_fixed_comments): Fix typo in comment preceding
  40         function.
  41
  42 2004-12-14  Richard Henderson  <rth@redhat.com>
  43
  44         * gfortran.h (gfc_expr.function.name): Make const.
  45         (gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
  46         (gfc_get_string): Update prototype.
  47         * iresolve.c: Include tree.h.
  48         (string_node, HASH_SIZE, string_head, hash): Remove.
  49         (gfc_get_string): Use vsnprintf, get_identifier.
  50         (free_strings, gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
  51         * misc.c (gfc_init_1): Don't call gfc_iresolve_init_1.
  52         (gfc_done_1): Don't call gfc_iresolve_done_1.
  53         * module.c (mio_allocated_string): Take and return const char *,
  54         instead of modifying char**.
  55         (mio_expr): Update to match.
  56         * resolve.c (pure_function): Constify name argument.
  57         (resolve_function): Constify name.
  58         * trans-intrinsic.c (gfc_conv_intrinsic_function): Likewise.
  59
  60 2004-12-12  Richard Henderson  <rth@redhat.com>
  61
  62         * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
  63         gfc_resolve_cshift, gfc_resolve_dot_product, gfc_resolve_eoshift,
  64         gfc_resolve_matmul, gfc_resolve_maxloc, gfc_resolve_maxval,
  65         gfc_resolve_minloc, gfc_resolve_minval, gfc_resolve_pack,
  66         gfc_resolve_product, gfc_resolve_reshape, gfc_resolve_shape,
  67         gfc_resolve_spread, gfc_resolve_sum, gfc_resolve_transpose,
  68         gfc_resolve_unpack: Use PREFIX.
  69
  70 2004-12-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
  71
  72         PR fortran/18869
  73         * match.c (gfc_match_common): Skip whitespace.
  74
  75 2004-12-12  Steven G. Kargl  <kargls@comcast.net>
  76
  77         PR fortran/16581
  78         * check.c (gfc_check_iand, gfc_check_ibclr, gfc_check_ibits,
  79         gfc_check_ibset, gfc_check_ieor, gfc_check_ior): Remove default
  80         integer kind check; Issue error for -std=f95 when needed.
  81         * intrinsic.c (add_functions): Change ieor from GFC_STD_GNU to
  82         GFC_STD_F95.
  83         * iresolve.c (gfc_resolve_iand, gfc_resolve_ieor, gfc_resolve_ior):
  84         Promote arguments to same kind.
  85
  86 2004-12-12  Steven G. Kargl  <kargls@comcast.net>
  87         Paul Brook  <paul@codesourcery.com>
  88
  89         PR fortran/16222
  90         * resolve.c (gfc_resolve_iterator_expr): New function.
  91         (gfc_resolve_iterator): Use it.  Add real_ok argument.  Convert
  92         start, end and stride to correct type.
  93         (resolve_code): Pass extra argument.
  94         * array.c (resolve_array_list): Pass extra argument.
  95         * gfortran.h (gfc_resolve): Add prototype.
  96         * trans-stmt.c (gfc_trans_do): Remove redundant type conversions.
  97         Handle real type iterators.
  98
  99 2004-12-11  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 100
 101         PR fortran/17175
 102         * iresolve.c (gfc_resolve_scale): Convert 'I' argument if not of
 103         same kind as C's 'int'.
 104         (gfc_resolve_set_exponent): Convert 'I' argument if not of kind 4.
 105
 106 2004-12-08  Richard Henderson  <rth@redhat.com>
 107
 108         * intrinsic.c (gfc_convert_type_warn): Propagate the input shape
 109         to the output expression.
 110         * iresolve.c (gfc_resolve_cshift, gfc_resolve_eoshift): Suppress
 111         warning conversion.
 112         (gfc_resolve_reshape): Force convert SHAPE and ORDER parameters
 113         to index kind.
 114
 115 2004-12-08  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 116
 117         PR fortran/18826
 118         * resolve.c (resolve_code): Impose correct restrictions on
 119         assigned variable.
 120
 121         * decl.c (gfc_match_end): Use locus of END when eos is an error.
 122
 123 2004-12-02  Steven G. Kargl  <kargls@comcast.net>
 124         Paul Brook  <paul@codesourcery.com>
 125
 126         * check.c (gfc_check_flush, gfc_check_fnum): New functions.
 127         (gfc_check_fstat, gfc_check_fstat_sub): New functions.
 128         (gfc_check_stat, gfc_check_stat_sub): New functions.
 129         * gfortran.h (GFC_ISYM_FNUM,GFC_ISYM_FSTAT,GFC_ISYM_STAT): New symbols
 130         * intrinsic.c (add_functions,add_subroutines): Add flush, fnum,
 131         fstat, and stat to intrinsics symbol tables.
 132         * intrinsic.h (gfc_check_flush, gfc_resolve_stat_sub): Add prototypes.
 133         (gfc_resolve_fstat_sub, gfc_resolve_stat): Ditto.
 134         * iresolve.c (gfc_resolve_fnum, gfc_resolve_fstat): New functions.
 135         (gfc_resolve_stat, gfc_resolve_flush): New functions.
 136         (gfc_resolve_stat_sub,gfc_resolve_fstat_sub): New functions
 137         * trans-intrinsic.c (gfc_conv_intrinsic_function): Add new intrinsics.
 138
 139 2004-12-02  Steven G. Kargl  <kargls@comcast.net>
 140
 141         * intrinsic.c: Fix and add comments, fix function declarations
 142         (OPTIONAL,REQUIRED): New symbols
 143         (add_functions,add_subroutines): Use symbols
 144         (gmp.h): Remove unused include
 145
 146 2004-11-25  Joseph S. Myers  <joseph@codesourcery.com>
 147
 148         * f95-lang.c, gfortranspec.c, trans-decl.c: Avoid ` as left quote
 149         in diagnostics.
 150
 151 2004-11-24  Steven Bosscher  <stevenb@suse.de>
 152
 153         * options.c (gfc_post_options): Don't clear flag_inline_functions.
 154
 155 2004-11-20  Steven G. Kargl  <kargls@comcast.net>
 156
 157         * check.c (gfc_check_getcwd_sub): Fix seg fault.
 158
 159         * check.c (gfc_check_exit,gfc_check_umask,gfc_check_umask_sub,
 160         gfc_check_unlink,gfc_check_unlink_sub): New functions
 161         * gfortran.h (GFC_ISYM_UMASK,GFC_ISYM_UNLINK): New symbols
 162         * intrinsic.c (add_functions,add_subroutines): Add umask, unlink,
 163         exit to intrinsics symbol tables.
 164         * intrinsic.h (gfc_check_umask,gfc_check_unlink,gfc_check_exit,
 165         gfc_check_umask_sub,gfc_check_unlink_sub,gfc_resolve_umask,
 166         gfc_resolve_unlink,gfc_resolve_exit,gfc_resolve_umask_sub,
 167         gfc_resolve_unlink_sub): Add and sort prototypes.
 168         * iresolve.c (gfc_resolve_umask,gfc_resolve_unlink,gfc_resolve_exit,
 169         gfc_resolve_umask_sub,gfc_resolve_unlink_sub): New functions
 170         * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbols
 171
 172 2004-11-16  Paul Brook  <paul@codesourcery.com>
 173
 174         PR fortran/13010
 175         * trans-array.c (gfc_trans_allocate_temp_array): Use gfc_get_dtype.
 176         (gfc_array_init_size, gfc_conv_expr_descriptor): Ditto.
 177         * trans-types.c (gfc_get_dtype): Accept array type rather than element
 178         type.
 179         (gfc_get_nodesc_array_type): Don't set GFC_TYPE_ARRAY_DTYPE.
 180         (gfc_get_array_type_bounds): Ditto.
 181         (gfc_get_derived_type): Recurse into derived type pointers.
 182         * trans-types.h (gfc_get_dtype): Add prototype.
 183         * trans.h (GFC_TYPE_ARRAY_DTYPE): Add comment.
 184
 185 2004-11-15  Paul Brook  <paul@codesourcery.com>
 186
 187         * trans-types.c (gfc_get_dtype): Remove obsolete TODO.
 188
 189 2004-11-10  Paul Brook  <paul@codesourcery.com>
 190
 191         PR fortran/18375
 192         * trans-expr.c (gfc_trans_subarray_assign): Free shape before ss.
 193         * trans-io.c (transfer_array_component): Ditto.
 194
 195 2004-11-10  Paul Brook  <paul@codesourcery.com>
 196
 197         * invoke.texi: Fix typo.
 198
 199 2004-11-08  Kazu Hirata  <kazu@cs.umass.edu>
 200
 201         * arith.c, array.c, decl.c, expr.c, f95-lang.c, gfortran.h,
 202         gfortranspec.c, interface.c, intrinsic.c, iresolve.c, match.c,
 203         module.c, parse.c, parse.h, primary.c, resolve.c, scanner.c,
 204         trans-array.c, trans-array.h, trans-expr.c, trans-intrinsic.c,
 205         trans-io.c, trans-stmt.c, trans.h: Fix comment formatting.
 206
 207 2004-11-06  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 208
 209         PR fortran/18023
 210         * io.c (resolve_tag): Tighten up exception for assigned FORMAT.
 211
 212 2004-11-06  Kazu Hirata  <kazu@cs.umass.edu>
 213
 214         * gfortranspec.c: Replace GNU CC with GCC.
 215
 216 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 217
 218         * gfortranspec.c (lang_specific_driver): Change year to 2004.
 219
 220 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 221
 222         PR fortran/18111
 223         *  trans-decl.c (create_function_arglist): Set DECL_ARTIFICIAL for
 224         hidden parameters.
 225
 226 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 227
 228         PR fortran/15164
 229         * trans-decl.c (gfc_finish_var_decl): Don't declare arguments to
 230         module procedures as if they were module variables.
 231
 232 2004-11-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 233
 234         PR fortran/17535
 235         PR fortran/17583
 236         PR fortran/17713
 237         * module.c (write_symbol1): Set module_name for dummy arguments.
 238
 239 2004-11-02  Paul Brook  <paul@codesourcery.com>
 240
 241         * intrinsic.c (check_intrinsic_standard): Include error locus.
 242         Remove VLA.
 243         (gfc_intrinsic_func_interface, gfc_intrinsic_sub_interface): Pass
 244         locus to check_intrinsic_standard.
 245
 246 2004-10-31  Janne Blomqvist  <jblomqvi@cc.hut.fi>
 247
 248         PR fortran/17590
 249         * gfortran.h: Change GFC_STD_* flags to more appropriate
 250         ones. (struct gfc_intrinsic_isym): Add field for standard. (struct
 251         gfc_option_t): Add field for warning about use of nonstandard
 252         intrinsics.
 253         * intrinsic.c (add_sym): Add parameter for standard version, check
 254         this against current standard.
 255         (add_sym_0): Pass standard parameter to add_sym.
 256         (add_sym_1, add_sym_0s, add_sym_1s, add_sym_1m, add_sym_2): Ditto.
 257         (add_sym_2s, add_sym_3, add_sym_3ml, add_sym_3red, add_sym_3s): Ditto.
 258         (add_sym_4, add_sym_4s, add_sym_5, add_sym_5s): Ditto.
 259         (make_generic): Add parameter for standard, check this
 260         against currently selected standard.
 261         (add_functions, add_subroutines): Add parameter to tell which
 262         standard an intrinsic belongs to.
 263         (check_intrinsic_standard): New function.
 264         (gfc_intrinsic_func_interface): Add call to check_intrinsic_standard.
 265         (gfc_intrinsic_sub_interface): Ditto.
 266         * lang.opt: Add Wnonstd-intrinsics option.
 267         * options.c (gfc_init_options): Change to use new GFC_STD_* flags,
 268         init new warning.
 269         (set_Wall): Add warning about nonstd intrinsics.
 270         (gfc_handle_option): Change to use new GFC_STD_* flags,
 271         handle new warning.
 272         * invoke.texi: Update manual to include -Wnonstd-intrinsics.
 273
 274 2004-10-30  Andrew Pinski  <pinskia@physics.uc.edu>
 275
 276         * f95-lang.c (lang_tree_node): Add chain_next to be the TREE_CHAIN.
 277
 278 2004-10-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 279
 280         * simplify.c (twos_complement): Calculate mask in GMP arithmetic.
 281
 282 2004-10-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 283
 284         * trans.c (gfc_trans_code): Set global locus after recursing. Fix
 285         comment typo.
 286
 287 2004-10-30  Canqun Yang  <canqun@nudt.edu.cn>
 288
 289         * check.c (gfc_check_rand): Allow missing optional argument.
 290         (gfc_check_irand): Ditto.
 291         * intrinsic.c (add_functions): Set arg optional flag for {i,}rand.
 292
 293 2004-10-28  Scott Robert Ladd  <scott.ladd@coyotegulch.com>
 294
 295         PR fortran/13490, PR fortran/17912
 296         * gcc/fortran/gfortran.h: Added pedantic_min_int to gfc_integer_info
 297         * gcc/fortran/gfortran.h: Added ARITH_ASYMMETRIC to arith
 298         * gcc/fortran/arith.c: Added support for an "asymmetric integer"
 299         warning when compiling with pedantic.
 300         * gcc/fortran/arith.c: Set minimum integer values to reflect
 301         realities of two's complement signed integers. Added
 302         pedantic minimum.
 303
 304 2004-10-17  Andrew Pinski  <pinskia@physics.uc.edu>
 305
 306         * Make-lang.in (F95_ADDITIONAL_OBJS): Kill.
 307         (f951): Do not depend on F95_ADDITIONAL_OBJS and don't
 308         link it in.
 309
 310 2004-10-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 311
 312         * trans-decl.c (generate_local_decl): Simplify logic, fix comment
 313         typo.
 314         (gfc_generate_function_code): Fix formatting issue.
 315
 316 2004-10-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 317
 318         * module.c: Fix formatting issues.
 319
 320 2004-10-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 321
 322         * module.c (mio_interface_rest): Set where member of interface
 323         while loading.
 324
 325 2004-10-08  Andrew Pinski  <pinskia@physics.uc.edu>
 326
 327         PR fortran/17901
 328         * options.c (gfc_handle_option): Add break after handing the
 329         J/M option.
 330
 331 2004-10-08  Tobias Schlueter  <tobias.shclueter@physik.uni-muenchen.de>
 332
 333         * arith.c: Fix formatting issues.
 334
 335 2004-10-07  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 336
 337         PR fortran/17676
 338         * resolve.c (resolve_operator): Use correct operator name in message.
 339
 340 2004-10-07  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 341
 342         * primary.c (match_boz_constant): Allow kind parameter suffixes.
 343         Move standard warning further to the front.
 344
 345 2004-10-07  Kazu Hirata  <kazu@cs.umass.edu>
 346
 347         * trans-stmt.c: Fix a comment typo.
 348
 349 2004-10-07  Paul Brook  <paul@codesourcery.com>
 350
 351         PR fortran/17678
 352         * trans-array.c (gfc_trans_deferred_array): Leave use associated
 353         variables alone.
 354
 355 2004-10-06  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 356
 357         PR fortran/17568
 358         * simplify.c (twos_complement): New function.
 359         (gfc_simplify_ishft, gfc_simplify_ishftc): Revise.
 360
 361         * simplify.c (gfc_simplify_abs): Use mpfr_hypot for CABS.
 362
 363 2004-10-06  Paul Brook  <paul@codesourcery.com>
 364
 365         * trans-stmt.c (gfc_trans_simple_do): New function.
 366         (gfc_trans_do): Use it.  Evaluate iteration bounds before entering
 367         loop.  Update comments.
 368
 369 2004-10-04  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 370
 371         PR fortran/17283
 372         * iresolve.c (gfc_resolve_pack): Choose function depending if mask
 373         is scalar.
 374
 375         PR fortran/17631
 376         * intrinsic.c (add_sym_5): Remove.
 377         (add_subroutines): Add resolution function for MVBITS.
 378         * intrinsic.h (gfc_resolve_mvbits): Declare resolution function for
 379         MVBITS
 380         * iresolve.c (gfc_resolve_mvbits): New function.
 381         (gfc_resolve_random_number): Remove empty line at end of function.
 382
 383         * trans-const.c (gfc_build_cstring_const): New function.
 384         (gfc_init_cst): Use new function.
 385         * trans-const.h (gfc_build_cstring_const): Add prototype.
 386         * trans-io.c (set_string, set_error_locus): Use new function.
 387         * trans-stmt.c (gfc_trans_goto): Use new function.
 388
 389         PR fortran/17708
 390         * parse.c (accept_statement): Don't treat END DO like END IF and
 391         END SELECT.
 392         (parse_do_block): Generate possible END DO label inside END DO
 393         block.
 394
 395         PR fortran/17776
 396         * check.c (gfc_check_system_sub): New function.
 397         * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_SYSTEM.
 398         * intrinsic.c (add_functions): Add 'system'.
 399         (add_subroutines): Add 'system'.
 400         * intrinsic.h (gfc_check_etime_sub, gfc_check_getcwd_sub):
 401         Move prototypes to other suborutines.
 402         (gfc_check_system_sub, gfc_resolve_system, gfc_resolve_system_sub):
 403         Add prototype.
 404         (gfc_resolve_system_clock): Fix formatting of prototype.
 405         * iresolve.c (gfc_resolve_system, gfc_resolve_system_sub): New
 406         functions.
 407         * trans-intrinsic.c (gfc_conv_intrinsic_function): Deal with
 408         GFC_ISYM_SYSTEM.
 409
 410 2004-10-04  Erik Schnetter  <schnetter@aei.mpg.de>
 411
 412         * scanner.c (preprocessor_line): Accept preprocessor lines without
 413         file names.  Check file names for closing quotes.  Handle escaped
 414         quotes in file names.
 415
 416 2004-10-04  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 417         Paul Brook  <paul@codesourcery.com>
 418
 419         * trans-array.c (gfc_conv_expr_descriptor): Check for substriungs.
 420         Use gfc_get_expr_charlen.
 421         * trans-expr.c (gfc_get_expr_charlen): New function.
 422         * trans.h (gfc_get_expr_charlen): Add prototype.
 423
 424 2004-10-04  Kazu Hirata  <kazu@cs.umass.edu>
 425
 426         * trans-intrinsic.c: Fix a comment typo.
 427
 428 2004-10-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 429
 430         * simplify.c (range_check): Remove blank line at beginning of function.
 431         (gfc_simplify_dint): Same at end of function.
 432         (gfc_simplify_exponent, gfc_simplify_fraction): Simplify calculations.
 433         (gfc_simplify_bound): Fix indentation.
 434         (gfc_simplify_log10): Simplify calculation.
 435         (gfc_simplify_min, gfc_simplify_max): Remove blank line at beginning
 436         of function.
 437         (gfc_simplify_nearest): Same at end of function.
 438         (gfc_simplify_nint, gfc_simplify_idnint): Same at beginning of
 439         function.
 440         (gfc_simplify_rrspacing, gfc_simplify_set_exponent,
 441         gfc_simplify_spacing): Simplify calulations.
 442
 443 2004-10-03  Feng Wang  <fengwang@nudt.edu.cn>
 444
 445         * trans-intrinsic.c: Fix comments on spacing and rrspacing
 446         (gfc_conv_intrinsic_rrspacing): Add fold on constant trees.
 447
 448 2004-10-01  Jan Hubicka  <jh@suse.cz>
 449
 450         * f95-lang.c (gfc_expand_function): Update call of
 451         tree_rest_of_compilation.
 452         * trans-decl.c (gfc_generate_constructors): Likewise.
 453
 454 2004-09-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 455
 456         * trans-intrinsic.c: Comment fixes.
 457
 458 2004-09-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 459
 460         * decl.c (add_init_expr_to_sym, variable_decl): Comment fixes.
 461
 462 2004-09-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 463
 464         * trans-types.c (gfc_return_by_reference): Remove superfluous
 465         assertion.
 466
 467         * intrinsic.h (gfc_resolve_getcwd): Update prototype.
 468         * iresolve.c (gfc_resolve_getcwd): Add second argument to function.
 469
 470         PR fortran/17615
 471         * trans-expr.c (gfc_trans_arrayfunc_assign): Look at resolved
 472         function to determine return type.
 473
 474 2004-09-20  Jan Hubicka  <jh@suse.cz>
 475
 476         * trans-decl.c (build_entry_thunks): Finalize the function; do not lower
 477         tree.
 478         (gfc_generate_function_code): Likewise.
 479
 480 2004-09-20  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 481
 482         PR fortran/15957
 483         * simplify.c (gfc_simplify_reshape): Set shape of return value
 484         correctly.
 485
 486 2004-09-17  Jeffrey D. Oldham  <oldham@codesourcery.com>
 487             Zack Weinberg  <zack@codesourcery.com>
 488
 489         * f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
 490         enumeration constants.
 491
 492 2004-09-17  Paul Brook  <paul@codesourcery.com>
 493
 494         * gfortran.h (struct gfc_linebuf): Don't use C99 empty arrays.
 495         (gfc_linebuf_header_size): Define.
 496         * scanner.c (load_file): Use it.
 497
 498 2004-09-16  Kazu Hirata  <kazu@cs.umass.edu>
 499
 500         * array.c, data.c, decl.c, dependency.c, error.c, f95-lang.c,
 501         interface.c, intrinsic.c, io.c, misc.c, module.c, parse.h,
 502         resolve.c, scanner.c, trans-array.c, trans-array.h,
 503         trans-common.c, trans-const.h, trans-decl.c, trans-expr.c,
 504         trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.c,
 505         trans.h: Fix comment typos.  Follow spelling conventions.
 506
 507 2004-09-16  Victor Leikehman  <lei@il.ibm.com>
 508
 509         PR/15364
 510         * trans-io.c (transfer_array_component): New function.
 511         (transfer_expr): For array fields, call transfer_array_component.
 512
 513 2004-09-16  Kazu Hirata  <kazu@cs.umass.edu>
 514
 515         * gfortran.texi: Fix a typo.
 516
 517 2004-09-15  Aaron W. LaFramboise  <aaronavay62@aaronwl.com>
 518
 519         * parse.c (eof_buf): Rename eof to eof_buf.
 520         (unexpected_eof): Same.
 521         (gfc_parse_file): Same.
 522
 523 2004-09-15  Steven G. Kargl  <kargls@comcast.net>
 524
 525         * check.c (gfc_check_getcwd_sub): New function.
 526         * gfortran.h (GFC_ISYM_GETCWD): New symbol.
 527         * intrinsic.c (add_functions): Add function definition;
 528         Use symbol.
 529         * intrinsic.c (add_subroutines): Add subroutine definitions.
 530         * intrinsic.h: Add prototypes.
 531         * iresolve.c (gfc_resolve_getcwd, gfc_resolve_getcwd_sub):
 532         New functions.
 533         * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbol.
 534
 535 2004-09-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 536
 537         PR fortran/16485
 538         * module.c (write_symbol): Don't fill in module name here.
 539         (write_symbol0): Fill in here instead.
 540
 541 2004-09-14  Kazu Hirata  <kazu@cs.umass.edu>
 542
 543         * data.c, decl.c, f95-lang.c, gfortran.h, match.c,
 544         trans-array.c, trans-common.c, trans-expr.c,
 545         trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.h: Fix
 546         comment typos.  Follow spelling conventions.
 547
 548 2004-09-09  Paul Brook  <paul@codesourcery.com>
 549
 550         * scanner.c (get_file): Add ATTRIBUTE_UNUSED.
 551
 552 2004-09-08  Paul Brook  <paul@codesourcery.com>
 553
 554         * array.c: Don't include assert.h.
 555         * data.c: Don't include assert.h.  Replace assert and abort with
 556         gcc_assert and gcc_unreachable.
 557         * dependency.c: Ditto.
 558         * f95-lang.c: Ditto.
 559         * iresolve.c: Ditto.
 560         * resolve.c: Ditto.
 561         * simplify.c: Ditto.
 562         * symbol.c: Ditto.
 563         * trans-array.c: Ditto.
 564         * trans-common.c: Ditto.
 565         * trans-const.c: Ditto.
 566         * trans-decl.c: Ditto.
 567         * trans-expr.c: Ditto.
 568         * trans-intrinsic.c: Ditto.
 569         * trans-io.c: Ditto.
 570         * trans-stmt.c: Ditto.
 571         * trans-types.c: Ditto.
 572         * trans.c: Ditto.
 573
 574 2004-09-07  Per Bothner  <per@bothner.com>
 575         Paul Brook  <paul@codesourcery.com>
 576
 577         * error.c (show_locus): Handle mapped locations.
 578         * f95-lang.c (gfc_be_parse_file): Initialize mapped locations.
 579         * gfortran.h: Include input.h.
 580         (struct gfc_linebuf): Use source_location.
 581         * scanner.c (get_file): Initialize linemap.
 582         (preprocessor_line): Pass extra argument to get_file.
 583         (load_file): Ditto.  Setup linemap.
 584         (gfc_new_file): Handle mapped locations.
 585         * trans-common.c (build_field, build_equiv_decl, build_common_decl):
 586         Set decl source locations.
 587         (gfc_trans_common): Set blank common block location.
 588         * trans-decl.c (gfc_set_decl_location): New function.
 589         (gfc_get_label_decl, gfc_get_symbol_decl): Use it.
 590         (trans_function_start): Move call to gfc_set_backend_locus..
 591         (build_function_decl): ... to here.
 592         (build_entry_thunks): Set and restore the backend locus.
 593         (gfc_generate_constructors): Remove excess arguments to
 594         init_function_start.
 595         (gfc_generate_block_data): Add comments.  Set the decl locus.
 596         * trans-io.c (set_error_locus): Handle mapped locations.
 597         * trans.c (gfc_get_backend_locus, gfc_get_backend_locus): Ditto.
 598         (gfc_trans_code): Use SET_EXPR_LOCATION.
 599         (gfc_generate_code): Override the location of the new symbol.
 600         * trans.h (gfc_set_decl_location): Add prototype.
 601
 602 2004-08-31  Paul Brook  <paul@codesourcery.com>
 603
 604         * trans-types.c (gfc_type_for_mode): Return NULL for unknown modes.
 605
 606 2004-09-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 607
 608         PR fortran/15327
 609         * trans-intrinsic.c (gfc_conv_intrinsic_merge): Do the right thing for
 610         strings.
 611
 612 2004-09-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 613
 614         PR fortran/16400
 615         PR fortran/16404
 616         (port from g95)
 617         * resolve.c (resolve_transfer): New function.
 618         (resolve_code): Call resolve_transfer in case of EXEC_TRANSFER.
 619
 620 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 621
 622         PR fortran/16579
 623         * trans-types.c (gfc_init_types): Make gfc_character1_type_node an
 624         unsigned char.
 625
 626 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 627
 628         * CONTRIB, NEWS, README, TODO: Remove obsolete files.
 629
 630 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 631
 632         PR fortran/17244
 633         * trans-types.c (gfc_return_by_reference): Remove TODO error,
 634         add comment pointing out possible issue WRT compatibility with g77.
 635
 636 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 637
 638         * trans-decl.c, trans-expr.c, trans-io.c, trans-types.c: Replace
 639         all occurences of 'gfc_strlen_type_node' by
 640         'gfc_charlen_type_node'.
 641         * trans-types.h: Same. Also update comment accordingly.
 642
 643 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 644
 645         * primary.c: Update copyright boilerplate to say GCC.
 646         * f95-lang.c: Change initial comment to say gfortran.
 647
 648 2004-08-31  Paul Brook  <paul@codesourcery.com>
 649
 650         * trans-types.h: Add comments.
 651         (intmax_type_node, string_type_node, const_string_type_node): Remove.
 652
 653 2004-08-30  Richard Henderson  <rth@redhat.com>
 654
 655         * Make-lang.in (fortran/f95-lang.o): Update dependencies.
 656         (fortran/trans-decl.o, fortran/trans-types.o): Likewise.
 657         * gfortran.h (gfc_integer_info): Add c_char, c_short, c_int,
 658         c_long, c_long_long.
 659         (gfc_logical_info): Add c_bool.
 660         (gfc_real_info): Add mode_precision, c_float, c_double, c_long_double.
 661         * trans-array.c (gfc_array_allocate): Use TYPE_PRECISION
 662         rather than gfc_int[48]_type_node for allocate choice.
 663         * trans-decl.c (gfc_build_intrinsic_function_decls): Cache
 664         local copies of some kind type nodes.
 665         (gfc_build_builtin_function_decls): Likewise.
 666         * trans-expr.c (gfc_conv_power_op): Likewise.
 667         * trans-intrinsic.c (gfc_conv_intrinsic_index,
 668         gfc_conv_intrinsic_scan, gfc_conv_intrinsic_verify,
 669         gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat): Likewise.
 670         * trans-stmt.c (gfc_trans_pause, gfc_trans_stop,
 671         gfc_trans_character_select, gfc_trans_allocate): Likewise.
 672         * trans-io.c (gfc_pint4_type_node): Move into ...
 673         (gfc_build_io_library_fndecls): ... here.  Cache local copies of
 674         some kind type nodes.
 675         * trans-types.c (gfc_type_nodes): Remove.
 676         (gfc_character1_type_node, gfc_strlen_type_node): New.
 677         (gfc_integer_types, gfc_logical_types): New.
 678         (gfc_real_types, gfc_complex_types): New.
 679         (gfc_init_kinds): Fill in real mode_precision.
 680         (gfc_build_int_type, gfc_build_real_type): New.
 681         (gfc_build_complex_type, gfc_build_logical_type): New.
 682         (c_size_t_size): New.
 683         (gfc_init_types): Loop over kinds.
 684         (gfc_get_int_type, gfc_get_real_type): Use gfc_validate_kind.
 685         (gfc_get_complex_type, gfc_get_logical_type): Likewise.
 686         (gfc_get_character_type_len): Likewise.
 687         (gfc_type_for_size): Loop over kinds; use a reduced set of
 688         unsigned type nodes.
 689         (gfc_type_for_mode): Loop over kinds.
 690         (gfc_signed_or_unsigned_type): Use gfc_type_for_size.
 691         (gfc_unsigned_type, gfc_signed_type): Use gfc_signed_or_unsigned_type.
 692         * trans-types.h (F95_INT1_TYPE, F95_INT2_TYPE, F95_INT4_TYPE,
 693         F95_INT8_TYPE, F95_INT16_TYPE, F95_REAL4_TYPE, F95_REAL8_TYPE,
 694         F95_REAl16_TYPE, F95_COMPLEX4_TYPE, F95_COMPLEX8_TYPE,
 695         F95_COMPLEX16_TYPE, F95_LOGICAL1_TYPE, F95_LOGICAL2_TYPE,
 696         F95_LOGICAL4_TYPE, F95_LOGICAL8_TYPE, F95_LOGICAL16_TYPE,
 697         F95_CHARACTER1_TYPE, NUM_F95_TYPES, gfc_type_nodes,
 698         gfc_int1_type_node, gfc_int2_type_node, gfc_int4_type_node,
 699         gfc_int8_type_node, gfc_int16_type_node, gfc_real4_type_node,
 700         gfc_real8_type_node, gfc_real16_type_node, gfc_complex4_type_node,
 701         gfc_complex8_type_node, gfc_complex16_type_node,
 702         gfc_logical1_type_node, gfc_logical2_type_node,
 703         gfc_logical4_type_node, gfc_logical8_type_node,
 704         gfc_logical16_type_node, gfc_strlen_kind): Remove.
 705         (gfc_character1_type_node): Turn in to a variable.
 706         (gfc_strlen_type_node): Likewise.
 707
 708 2004-08-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 709
 710         * gfortran.h (gfc_namespace): Add new field is_block_data.
 711         * parse.c (accept_statement): Remove special handling for BLOCK DATA.
 712         (parse_block_data): Record BLOCK DATA name, set is_block_data field.
 713         * trans.c (gfc_generate_code): Handle BLOCK DATA units.
 714         * trans.h (gfc_generate_block_data): Add prototype.
 715         * trans-decl.c (gfc_generate_block_data): New function.
 716
 717 2004-08-29  Richard Henderson  <rth@redhat.com>
 718
 719         * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_export.
 720         * trans-types.c (gfc_init_kinds): Reject integer kinds larger
 721         than two HOST_WIDE_INT.
 722
 723 2004-08-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 724
 725         PR fortran/13910
 726         * decl.c (free_variable, free_value, gfc_free_data, var_list,
 727         var_element, top_var_list, match_data_constant, top_val_list,
 728         gfc_match_data): Move here from match.c.
 729         (match_old_style_init): New function.
 730         (variable_decl): Match old-style initialization.
 731         * expr.c (gfc_get_variable_expr): New function.
 732         * gfortran.h (gfc_get_variable_expr): Add prototype.
 733         * gfortran.texi: Start documentation for supported extensions.
 734         * match.c: Remove the functions moved to decl.c.
 735         * match.h (gfc_match_data): Move prototype to under decl.c.
 736         * symbol.c (gfc_find_sym_tree, gfc_find_symbol): Add/correct
 737         comments.
 738
 739 2004-08-29  Steven G. Kargl  <kargls@comcast.net>
 740         Paul Brook  <paul@codesourcery.com>
 741
 742         * check.c (gfc_check_besn, gfc_check_g77_math1): New functions.
 743         * f95-lang.c (DO_DEFINE_MATH_BUILTIN): Define.
 744         (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
 745         (build_builtin_fntypes): New function.
 746         (gfc_init_builtin_functions): Use it.
 747         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_{J,Y}{0,1,N}
 748         and GFC_ISYM_ERF{,C}.
 749         (gfc_c_int_kind): Declare.
 750         * intrinsic.c (add_functions): Add [d]bes* and [d]erf*.
 751         * intrinsic.h (gfc_check_besn, gfc_check_g77_math1, gfc_resolve_besn,
 752         gfc_resolve_g77_math1): Add prototypes.
 753         * resolve.c (gfc_resolve_besn, gfc_resolve_g77_math1): New functions.
 754         * mathbuiltins.def: Add comment.  Change third argument.  Use
 755         DEFINE_MATH_BUILTIN_C.  Add bessel and error functions.
 756         * trans-intrinsic.c (BUILT_IN_FUNCTION): Define.
 757         (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
 758         * trans-types.c (gfc_c_int_kind): Declare.
 759         (gfc_init_kinds): Set it.
 760
 761 2004-08-29  Steven G. Kargl  <kargls@comcast.net>
 762         Paul Brook  <paul@codesourcery.com>
 763
 764         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_GET?ID.
 765         (gfc_check_f, gfc_simplify_f): Add f0.
 766         * intrinsic.c (do_check): Call f0.  Flatten.
 767         (add_sym_0): Fix prototype.  Set f0.
 768         (add_functions): Add getgid, getgid and getuid.
 769         (resolve_intrinsic): Remove obsolete comment.
 770         (do_simplify): Call f0.
 771         * intrinsic.h (gfc_resolve_getgid, gfc_resolve_getpid,
 772         gfc_resolve_getuid): Add prototypes.
 773         * iresolve.c (gfc_resolve_getgid, gfc_resolve_getpid,
 774         gfc_resolve_getuid): New functions.
 775         * trans-intrinsic.c (gfc_conv_intrinsic_function): Handle
 776         GFC_ISYM_GET?ID.
 777
 778 2004-08-28  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 779
 780         * error.c (gfc_error_init_1): Remove blank line in front of
 781         function body. Add missing blank.
 782         (gfc_buffer_error, error_char, error_string): Remove blank line in
 783         front of function body.
 784         (show_locus): Add comma in comment.
 785         (gfc_clear_warning, gfc_warning_check, gfc_clear_error,
 786         gfc_push_error, gfc_pop_error): Remove blank line in front of
 787         function body.
 788         (gfc_get_errors): Typo fix in comment in front of function. Remove
 789         blank line in front of function body.
 790
 791 2004-08-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 792
 793         * gfortran.h (gfc_default_*_kind): Remove prototypes, add extern
 794         variable declaration of same name.
 795         * arith.c, check.c, decl.c, dump_parse_tree.c, expr.c,
 796         intrinsic.c, io.c, iresolve.c, match.c, options.c, primary.c,
 797         resolve.c, simplify.c, symbol.c, trans-const.c, trans-io.c:
 798         Replace all calls to gfc_default_*_kind with variable accesses.
 799         * trans-types.c: Same as above.
 800         (gfc_default_*_kind_1): Rename to gfc_default_*_kind, remove
 801         static qualifier. Replace all occurences.
 802         (gfc_default_*_kind): Remove functions.
 803
 804 2004-08-26  Richard Henderson  <rth@redhat.com>
 805
 806         * arith.c: Include system.h, not real system headers.
 807         (MPZ_NULL, MPF_NULL, DEF_GFC_INTEGER_KIND, DEF_GFC_LOGICAL_KIND,
 808         DEF_GFC_REAL_KIND, GFC_SP_KIND, GFC_SP_PREC, GFC_SP_EMIN, GFC_SP_EMAX,
 809         GFC_DP_KIND, GFC_DP_PREC, GFC_DP_EMIN, GFC_DP_EMAX, GFC_QP_KIND,
 810         GFC_QP_PREC, GFC_QP_EMIN, GFC_QP_EMAX): Remove.
 811         (gfc_integer_kinds, gfc_logical_kinds, gfc_real_kinds,
 812         gfc_index_integer_kind, gfc_default_integer_kind,
 813         gfc_default_real_kind,gfc_default_double_kind,
 814         gfc_default_character_kind, gfc_default_logical_kind,
 815         gfc_default_complex_kind, validate_integer, validate_real,
 816         validate_logical, validate_character,
 817         gfc_validate_kind): Move to trans-types.c.
 818         (gfc_set_model_kind): Use gfc_validate_kind.
 819         (gfc_set_model): Just copy the current precision to default.
 820         (gfc_arith_init_1): Use mpfr precision 128 for integer setup.
 821         * f95-lang.c (gfc_init_decl_processing): Invoke gfc_init_kinds.
 822         * gfortran.h: Update file commentary.
 823         * trans-types.c (MAX_INT_KINDS, MAX_REAL_KINDS): New.
 824         (gfc_default_integer_kind_1, gfc_default_real_kind_1,
 825         gfc_default_double_kind_1, gfc_default_character_kind_1,
 826         gfc_default_logical_kind_1, gfc_default_complex_kind_1): New.
 827         (gfc_init_kinds): New.
 828         (gfc_init_types): Don't set gfc_index_integer_kind here.
 829         * trans-types.h (gfc_init_kinds): Declare.
 830         * doc/invoke.texi: Clarify DOUBLE PRECISION behaviour wrt -r8.
 831
 832 2004-08-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 833
 834         * check.c (gfc_check_atan2): New function.
 835         * intrinsic.c (add_functions): Use gfc_check_atan2 for ATAN2
 836         * intrinsic.h (gfc_check_atan2): Add prototype.
 837
 838 2004-08-25  Richard Henderson  <rth@redhat.com>
 839
 840         * arith.c (gfc_validate_kind): Add may_fail argument; abort if
 841         false and we don't validate the kind.
 842         (gfc_check_integer_range, gfc_check_real_range): Update to match.
 843         * check.c (kind_check): Likewise.
 844         * decl.c (gfc_match_old_kind_spec, gfc_match_kind_spec): Likewise.
 845         (match_char_spec, match_logical_spec): Likewise.
 846         * gfortran.h (gfc_validate_kind): Likewise.
 847         * options.c (gfc_handle_option): Likewise.
 848         * primary.c (match_integer_constant, match_real_constant,
 849         match_string_constant, match_logical_constant,
 850         match_const_complex_part): Likewise.
 851         * simplify.c (get_kind, gfc_simplify_bit_size, gfc_simplify_digits,
 852         gfc_simplify_epsilon, gfc_simplify_huge, gfc_simplify_ibclr,
 853         gfc_simplify_ibset, gfc_simplify_ishft, gfc_simplify_ishftc,
 854         gfc_simplify_maxexponent, gfc_simplify_minexponent,
 855         gfc_simplify_nearest, gfc_simplify_not, gfc_simplify_precision,
 856         gfc_simplify_radix, gfc_simplify_range, gfc_simplify_rrspacing,
 857         gfc_simplify_scale, gfc_simplify_spacing, gfc_simplify_tan,
 858         gfc_simplify_tiny): Likewise.
 859         * trans-intrinsic.c (gfc_conv_intrinsic_aint, gfc_conv_intrinsic_mod,
 860         gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_minmaxval,
 861         prepare_arg_info): Likewise.
 862
 863 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 864
 865         * expr.c (gfc_check_assign): Add comment. Add new warning.
 866         * trans-expr.c (gfc_conv_function_call): Correctly dereference
 867         result of pointer valued function when not in pointer assignment.
 868
 869 2004-08-25  Paul Brook  <paul@codesourcery.com>
 870
 871         * config-lang.in: Remove dead commented line.
 872         * module.c: Replace g95 with gfortran in comment.
 873
 874 2004-08-25  Paul Brook  <paul@codesourcery.com>
 875
 876         PR fortran/17190
 877         * arith.c (gfc_mpfr_to_mpz): Workaround mpfr bug.
 878
 879 2004-08-25  Paul Brook  <paul@codesourcery.com>
 880
 881         PR fortran/17144
 882         * trans-array.c (gfc_trans_allocate_temp_array): Remove
 883         string_length argument.
 884         (gfc_trans_array_ctor_element): New function.
 885         (gfc_trans_array_constructor_subarray): Use it.
 886         (gfc_trans_array_constructor_value): Ditto.  Handle constant
 887         character arrays.
 888         (get_array_ctor_var_strlen, get_array_ctor_strlen): New functions.
 889         (gfc_trans_array_constructor): Use them.
 890         (gfc_add_loop_ss_code): Update to new gfc_ss layout.
 891         (gfc_conv_ss_descriptor): Remember section string length.
 892         (gfc_conv_scalarized_array_ref): Ditto.  Remove dead code.
 893         (gfc_conv_resolve_dependencies): Update to new gfc_ss layout.
 894         (gfc_conv_expr_descriptor): Ditto.
 895         (gfc_conv_loop_setup): Ditto.  Spelling fixes.
 896         * trans-array.h (gfc_trans_allocate_temp_array): Update prototype.
 897         * trans-const.c (gfc_conv_constant):  Update to new gfc_ss layout.
 898         * trans-expr.c (gfc_conv_component_ref): Turn error into ICE.
 899         (gfc_conv_variable): Set string_length from section.
 900         (gfc_conv_function_call): Remove extra argument.
 901         (gfc_conv_expr, gfc_conv_expr_reference): Update to new gfc_ss layout.
 902         * trans-types.c (gfc_get_character_type_len): New function.
 903         (gfc_get_character_type): Use it.
 904         (gfc_get_dtype): Return zero for internal types.
 905         * trans-types.h (gfc_get_character_type_len): Add prototype.
 906         * trans.h (struct gfc_ss): Move string_length out of union.
 907
 908 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 909
 910         * trans.h (build2_v, build3_v): New macros.
 911         (build_v): Remove.
 912         * f95-lang.c (gfc_truthvalue_conversion): Use build2 instead of
 913         build.
 914         * trans-array.c (gfc_conv_descriptor_data,
 915         gfc_conv_descriptor_offset, gfc_conv_descriptor_dimension,
 916         gfc_conv_descriptor_stride, gfc_conv_descriptor_lbound,
 917         gfc_conv_descriptor_ubound, gfc_trans_allocate_array_storage,
 918         gfc_trans_allocate_temp_array,
 919         gfc_trans_array_constructor_subarray,
 920         gfc_trans_array_constructor_value, gfc_conv_array_index_ref,
 921         gfc_trans_array_bound_check, gfc_conv_array_index_offset,
 922         gfc_conv_scalarized_array_ref, gfc_conv_array_ref,
 923         gfc_conv_array_ref, gfc_trans_preloop_setup,
 924         gfc_trans_scalarized_loop_end, gfc_conv_ss_startstride,
 925         gfc_conv_loop_setup, gfc_array_init_size,
 926         gfc_conv_array_initializer, gfc_trans_array_bounds,
 927         gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias,
 928         gfc_conv_expr_descriptor, gfc_conv_array_parameter,
 929         gfc_trans_deferred_array): Use buildN and buildN_v macros instead
 930         of build and build_v as appropriate.
 931         * trans-common.c (create_common): Same.
 932         * trans-decl.c (gfc_trans_auto_character_variable,
 933         gfc_trans_entry_master_switch, gfc_generate_function_code): Same.
 934         * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
 935         gfc_conv_component_ref, gfc_conv_unary_op, gfc_conv_powi,
 936         gfc_conv_cst_int_power, gfc_conv_string_tmp, gfc_conv_concat_op,
 937         gfc_conv_expr_op, gfc_conv_function_call,
 938         gfc_trans_structure_assign): Same.
 939         * trans-intrinsic.c (build_fixbound_expr, build_round_expr,
 940         gfc_conv_intrinsic_aint, gfc_conv_intrinsic_bound,
 941         gfc_conv_intrinsic_cmplx, gfc_conv_intrinsic_mod,
 942         gfc_conv_intrinsic_dim, gfc_conv_intrinsic_sign,
 943         gfc_conv_intrinsic_dprod, gfc_conv_intrinsic_minmax,
 944         gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
 945         gfc_conv_intrinsic_arith, gfc_conv_intrinsic_minmaxloc,
 946         gfc_conv_intrinsic_minmaxval, gfc_conv_intrinsic_btest,
 947         gfc_conv_intrinsic_bitop, gfc_conv_intrinsic_singlebitop,
 948         gfc_conv_intrinsic_ibits, gfc_conv_intrinsic_ishft,
 949         gfc_conv_intrinsic_merge, gfc_conv_intrinsic_strcmp,
 950         gfc_conv_allocated, gfc_conv_associated, prepare_arg_info,
 951         gfc_conv_intrinsic_spacing, gfc_conv_intrinsic_rrspacing,
 952         gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat,
 953         gfc_conv_intrinsic_iargc): Same.
 954         * trans-io.c (set_parameter_value, set_parameter_ref, set_string,
 955         set_flag, add_case, io_result, transfer_namelist_element,
 956         transfer_expr): Same.
 957         * trans-stmt.c (gfc_trans_goto, gfc_trans_return, gfc_trans_if_1,
 958         gfc_trans_arithmetic_if, gfc_trans_do, gfc_trans_do_while,
 959         gfc_trans_integer_select, gfc_trans_logical_select,
 960         gfc_trans_character_select, gfc_trans_forall_loop,
 961         gfc_trans_nested_forall_loop, gfc_do_allocate,
 962         generate_loop_for_temp_to_lhs, generate_loop_for_rhs_to_temp,
 963         compute_inner_temp_size, compute_overall_iter_number,
 964         allocate_temp_for_forall_nest, gfc_trans_pointer_assign_need_temp,
 965         gfc_trans_forall_1, gfc_evaluate_where_mask,
 966         gfc_trans_where_assign, gfc_trans_allocate): Same.
 967         * trans-types.c (gfc_get_dtype, gfc_get_array_type_bounds): Same.
 968         * trans.c (gfc_add_modify_expr, gfc_finish_block,
 969         gfc_build_array_ref, gfc_build_function_call,
 970         gfc_trans_runtime_check): Same.
 971
 972 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 973
 974         * trans-const.c (gfc_conv_mpz_to_tree): Change call to
 975         build_int_cst to build_int_cst_wide in accordance to Nathan's
 976         previous patch.
 977
 978 2004-08-25  Nathan Sidwell  <nathan@codesourcery.com>
 979
 980         * trans-array.c (gfc_trans_array_constructor_value): Adjust
 981         build_int_cst calls.
 982         * trans-const.c (gfc_build_string_const, gfc_init_constants,
 983         gfc_conv_mpz_to_tree, gfc_conv_constant_to_tree): Likewise.
 984         * trans-decl.c (gfc_get_symbol_decl, build_entry_thunks,
 985         gfc_trans_entry_master_switch): Likewise.
 986         * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
 987         gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
 988         * trans-io.c (add_case, set_error_locus,
 989         transfer_namelist_element, transfer_expr): Likewise.
 990         * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
 991         gfc_trans_stop, gfc_trans_character_select): Likewise.
 992         * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
 993         * trans.c (gfc_trans_runtime_check): Likewise.
 994
 995 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 996
 997         * trans-decl.c, trans-types.c: Add and remove blank lines as
 998         required.
 999
1000 2004-08-24  Richard Henderson  <rth@redhat.com>
1001
1002         * trans-const.c (gfc_conv_mpz_to_tree): Fix 64-bit shift warning.
1003
1004 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1005
1006         * resolve.c (merge_argument_lists): Revert unintentionally
1007         committed change.
1008
1009 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1010
1011         * trans-decl.c (build_function_decl): Fix spelling in comment.
1012         (build_entry_thunks): Remove code with no function.
1013         (gfc_build_intrinsic_function_decls): Remove empty line.
1014
1015         * resolve.c (resolve_entries): Fix a bunch of comment typos.
1016
1017 2004-08-24  Nathan Sidwell  <nathan@codesourcery.com>
1018
1019         * f95-lang.c (gfc_init_decl_processing): Adjust
1020         build_common_tree_nodes call.
1021
1022 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1023
1024         * trans-types.c: Spelling and formatting fixes.
1025
1026 2004-08-23  Richard Henderson  <rth@redhat.com>
1027
1028         * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_getlimbn instead
1029         of going through an intermediate string.  Fix 32/64 int/long bug.
1030
1031 2004-08-23  Eric Christopher  <echristo@redhat.com>
1032
1033         * trans-types.c (gfc_type_for_mode): Remove VECTOR_TYPE_SUPPORTED_P
1034         usage. Use build_vector_type_for_mode for vector types.
1035
1036 2004-08-22  Richard Henderson  <rth@redhat.com>
1037
1038         PR 13465
1039         * data.c (find_con_by_offset): Search ordered list; handle
1040         elements with repeat counts.
1041         (gfc_assign_data_value_range): New.
1042         * gfortran.h (struct gfc_data_value): Make repeat unsigned.
1043         (gfc_assign_data_value_range): Declare.
1044         * match.c (top_val_list): Extract repeat count into a temporary.
1045         * resolve.c (values): Make left unsigned.
1046         (next_data_value): Don't decrement left.
1047         (check_data_variable): Use gfc_assign_data_value_range.
1048
1049 2004-08-22  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1050
1051         * trans-const.c, trans-decl.c, trans-expr.c: Spelling fixes.
1052
1053 2004-08-22  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1054
1055         * check.c (gfc_check_reduction): Rename to ...
1056         (check_reduction): ... this. Make static. Don't check type of
1057         first argument.
1058         (gfc_check_minval_maxval, gfc_check_prodcut_sum): New functions.
1059         * intrinsic.c (add_functions): Change MAXVAL, MINVAL, PRODUCT and
1060         SUM to use new check functions.
1061         (check_specific): Change logic to call new functions.
1062         * intrinsic.h (gfc_check_minval_maxval, gfc_check_product_sum):
1063         Add prototypes.
1064         (gfc_check_reduction): Remove prototype.
1065
1066 2004-08-20  Paul Brook  <paul@codesourcery.com>
1067         Canqun Yang  <canqun@nudt.edu.cn>
1068
1069         PR fortran/17077
1070         * trans-array.c (gfc_conv_array_parameter): Pass correct pointer
1071         for automatic arrays.
1072         * trans-types.c (gfc_get_nodesc_array_type): Add comment.
1073
1074 2004-08-19  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1075         (Port from g95)
1076
1077         PR fortran/17074
1078         * match.c (match_simple_forall, match_simple_where): Forward-declare.
1079         (gfc_match_if): Order statement list alphabetically, add WHERE and
1080         FORALL, remove double PAUSE.
1081         (gfc_match_simple_where, match_forall_header,
1082         gfc_match_simple_forall): New functions.
1083         (gfc_match_forall): Use match_forall_header.
1084
1085 2004-08-19  Paul Brook  <paul@codesourcery.com>
1086
1087         PR fortran/17091
1088         * gfortran.h (gfc_access): Give ACCESS_UNKNOWN value 0.
1089         * symbol.c (gfc_clear_attr): Use memset.
1090
1091 2004-08-19  Paul Brook  <paul@codesourcery.com>
1092
1093         PR fortran/14976
1094         PR fortran/16228
1095         * data.c (assign_substring_data_value): Remove.
1096         (create_character_intializer): New function.
1097         (gfc_assign_data_value): Track the typespec for the current
1098         subobject.  Use create_character_intializer.
1099
1100 2004-08-19  Erik Schnetter  <schnetter@aei.mpg.de>
1101
1102         PR fortran/16946
1103         * check.c (gfc_check_reduction): New function.
1104         (gfc_check_minval_maxval): Removed.
1105         (gfc_check_product): Removed.
1106         (gfc_check_sum): Removed.
1107         * intrinsic.h: Add/remove declarations for these.
1108         * gfortran.h: Add field f3red to union gfc_check_f.
1109         * intrinsic.c (add_sym_3red): New function.
1110         (add_functions): Register maxval, minval, product, and sum intrinsics
1111         through add_sym_3red.
1112         (check_specific): Handle f3red union field.
1113         * iresolve.c: Whitespace change.
1114
1115 2004-08-18  Paul Brook  <paul@codesourcery.com>
1116
1117         * trans-types.c (gfc_sym_type): Use pointer types for optional args.
1118
1119 2004-08-18  Victor Leikehman  <lei@il.ibm.com>
1120
1121         PR fortran/13278
1122         * trans-io.c (transfer_namelist_element): New. Recursively handle
1123         derived-type variables.  Pass string lengths.
1124         (build_dt): Code moved to build_namelist, with some
1125         changes and additions.
1126         (gfc_build_io_library_fndecls): Declare the fifth
1127         argument in st_set_nml_var_char -- string_length.
1128
1129 2004-08-17  Paul Brook  <paul@codesourcery.com>
1130         Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1131
1132         PR fortran/13082
1133         * decl.c (get_proc_name): Update mystery comment.
1134         (gfc_match_entry): Check for errors earlier.  Add entry point to list.
1135         * dump-parse-tree.c (gfc_show_code_node): Print EXEC_ENTRY nodes.
1136         * gfortran.h (symbol_attribute): Add entry_master.  Document entry.
1137         (struct gfc_entry_list): Define.
1138         (gfc_get_entry_list): Define.
1139         (struct gfc_namespace): Add refs and entries.
1140         (enum gfc_exec_op): Add EXEC_ENTRY.
1141         (struct gfc_code): Add ext.entry.
1142         * module.c (ab_attribute, attr_bits): Remove AB_ENTRY.
1143         (mio_symbol_attribute): Don't save/reture addr->entry.
1144         (mio_namespace_ref): Refcount namespaces.
1145         * parse.c (accept_statement): Handle ST_ENTRY.
1146         (gfc_fixup_sibling_symbols): Mark symbol as referenced.
1147         (parse_contained): Fixup sibling references to entry points
1148         after parsing the procedure body.
1149         * resolve.c (resolve_contained_fntype): New function.
1150         (merge_argument_lists, resolve_entries): New functions.
1151         (resolve_contained_functions): Use them.
1152         (resolve_code): Handle EXEC_ENTRY.
1153         (gfc_resolve): Call resolve_entries.
1154         * st.c (gfc_free_statement): Handle EXEC_ENTRY.
1155         * symbol.c (gfc_get_namespace): Refcount namespaces.
1156         (gfc_free_namespace): Ditto.
1157         * trans-array.c (gfc_trans_dummy_array_bias): Treat all args as
1158         optional when multiple entry points are present.
1159         * trans-decl.c (gfc_get_symbol_decl): Remove incorrect check.
1160         (gfc_get_extern_function_decl): Add assertion.  Fix coment.
1161         (create_function_arglist, trans_function_start, build_entry_thunks):
1162         New functions.
1163         (gfc_build_function_decl): Rename ...
1164         (build_function_decl): ... to this.
1165         (gfc_create_function_decl): New function.
1166         (gfc_generate_contained_functions): Use it.
1167         (gfc_trans_entry_master_switch): New function.
1168         (gfc_generate_function_code): Use new functions.
1169         * trans-stmt.c (gfc_trans_entry): New function.
1170         * trans-stmt.h (gfc_trans_entry): Add prototype.
1171         * trans-types.c (gfc_get_function_type): Add entry point argument.
1172         * trans.c (gfc_trans_code): Handle EXEC_ENTRY.
1173         (gfc_generate_module_code): Call gfc_create_function_decl.
1174         * trans.h (gfc_build_function_decl): Remove.
1175         (gfc_create_function_decl): Add prototype.
1176
1177 2004-08-15  Andrew Pinski  <apinski@apple.com>
1178
1179         PR fortran/17030
1180         * f95-lang.c (gfc_init_builtin_functions): Initialize the builtins
1181         for cabs{,f} and copysign{,f}.
1182         * trans-decl.c (gfor_fndecl_math_cabsf): Delete.
1183         (gfor_fndecl_math_cabs): Delete.
1184         (gfor_fndecl_math_sign4): Delete.
1185         (gfor_fndecl_math_sign8): Delete.
1186         (gfc_build_intrinsic_function_decls): Remove the
1187         initializing of cabs{,f} and copysign{,f} functions.
1188         * trans-intrinsic.c (gfc_conv_intrinsic_abs): Use the builtins
1189         instead of the functions definitions.
1190         (gfc_conv_intrinsic_sign): Likewise.
1191         * trans.h (gfor_fndecl_math_cabsf): Delete.
1192         (gfor_fndecl_math_cabs): Delete.
1193         (gfor_fndecl_math_sign4): Delete.
1194         (gfor_fndecl_math_sign8): Delete.
1195
1196 2004-08-15  Nathan Sidwell  <nathan@codesourcery.com>
1197
1198         * trans-array.c (gfc_trans_array_constructor_value): Use
1199         build_int_cst.
1200         * trans-const.c (gfc_build_string_const,
1201         gfc_init_constants, gfc_conv_mpz_to_tree,
1202         gfc_conv_constant_to_tree): Likewise.
1203         * trans-decl.c (gfc_get_symbol_decl): Likewise.
1204         * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
1205         gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
1206         * trans-io.c (add_case, set_error_locus, build_dt,
1207         transfer_expr): Likewise.
1208         * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
1209         gfc_trans_stop, gfc_trans_character_select): Likewise.
1210         * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
1211         * trans.c (gfc_trans_runtime_check): Likewise.
1212
1213 2004-08-14  Paul Brook  <paul@codesourcery.com>
1214
1215         * trans-decl.c (gfc_build_function_decl): Remove dead code.
1216
1217 2004-08-14  Paul Brook  <paul@codesourcery.com>
1218
1219         * trans-arry.c (gfc_trans_auto_array_allocation): Remove unused var.
1220
1221 2004-08-13  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1222
1223         * gfortran.h: Add comments.
1224         * parse.c (parse_contained): Fix comment typo.
1225         * resolve.c (was_declared): Ditto.
1226         * symbol.c: Ditto.
1227
1228 2004-08-11  Paul Brook  <paul@codeourcery.com>
1229
1230         PR fortran/16917
1231         * intrinsic.c (add_functions): Add dfloat as an alias for dble.
1232
1233 2004-08-10  Richard Henderson  <rth@redhat.com>
1234
1235         * f95-lang.c (gfc_init_builtin_functions): Remove
1236          __builtin_stack_alloc, add __builtin_alloca.
1237         * trans-array.c (gfc_trans_auto_array_allocation): Use DECL_EXPR.
1238         * trans-decl.c (gfc_trans_auto_character_variable): Likewise.
1239
1240 2004-08-10  Paul Brook  <paul@codesourcery.com>
1241
1242         * trans-io.c (transfer_expr): Handle pointters.
1243
1244 2004-08-10  Paul Brook  <paul@codesourcery.com>
1245
1246         PR fortran/16919
1247         * trans-array.c (gfc_add_loop_ss_code): Handle GFC_SS_COMPONENT.
1248         (gfc_conv_array_index_offset): Allow "temporary" with nonzero delta.
1249         (gfc_trans_preloop_setup, gfc_trans_scalarized_loop_boundary):
1250         Handle GFC_SS_COMPONENT.
1251         (gfc_conv_ss_startstride): Ditto.  Set ss->shape.
1252         (gfc_conv_loop_setup): Tweak commends. Remove dead code.
1253         Use ss->shape.
1254         (gfc_conv_array_initializer): Call specific initializer routines.
1255         * trans-expr.c (gfc_trans_structure_assign): New function.
1256         (gfc_trans_subarray_assign): New function.
1257         (gfc_trans_subcomponent_assign): New fucntion
1258         (gfc_conv_structure): Use them.
1259         * trans.h (gfc_ss_type): Add GFC_SS_COMPONENT.
1260         (gfc_ss): Add shape.
1261
1262 2004-08-08  Victor Leikehman  <lei@il.ibm.com>
1263
1264         * simplify.c (gfc_simplify_shape): Bugfix.
1265         * expr.c (gfc_copy_shape_excluding): New function.
1266         * gfortran.h (gfc_get_shape): Bugfix.
1267         (gfc_copy_shape_excluding): Added declaration.
1268         * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
1269         gfc_resolve_cshift, gfc_resolve_eoshift, gfc_resolve_lbound,
1270         gfc_resolve_ubound, gfc_resolve_transpose): Added compile
1271         time resolution of shape.
1272
1273 2004-08-06  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1274
1275         * intrinsic.c (add_subroutines): Add getenv and
1276         get_environment_variable. (add_sym_5s): New function.
1277         * intrinsic.h (gfc_resolve_get_environment_variable): Add
1278         prototype.
1279         * iresolve.c (gfc_resolve_get_environment_variable): New
1280         function.
1281
1282 2004-08-06  Feng Wang  <fengwang@nudt.edu.cn>
1283
1284         * f95-lang.c (gfc_init_builtin_functions): Fix the number of
1285         __builtin_pow[f] arguments.
1286
1287 2004-08-06  Steven G. Kargl  <kargls@comcast.net>
1288
1289         * arith.c: Add #define for model numbers.  Remove global GMP variables.
1290         (natural_logarithm,common_logarithm,exponential,sine,
1291         cosine,arctangent,hypercos,hypersine ): Remove.
1292         (gfc_mpfr_to_mpz,gfc_set_model_kind,gfc_set_model): New functions.
1293         (arctangent2,gfc_arith_init_1,gfc_arith_done_1
1294         gfc_check_real_range, gfc_constant_result, gfc_range_check,
1295         gfc_arith_uminus,gfc_arith_plus, gfc_arith_minus, gfc_arith_times,
1296         gfc_arith_divide,complex_reciprocal,complex_pow_ui,
1297         gfc_arith_power,gfc_compare_expr,compare_complex,gfc_convert_real,
1298         gfc_convert_complex,gfc_int2real,gfc_int2complex,
1299         gfc_real2int,gfc_real2real,gfc_real2complex,
1300         gfc_complex2int,gfc_complex2real,gfc_complex2complex): Convert GMP
1301         to MPFR, use new functions.
1302         * arith.h: Remove extern global variables.
1303         (natural_logarithm,common_logarithm,exponential, sine, cosine,
1304         arctangent,hypercos,hypersine): Remove prototypes.
1305         (arctangent2): Update prototype from GMP to MPFR.
1306         (gfc_mpfr_to_mpz, gfc_set_model_kind,gfc_set_model): Add prototypes.
1307         * dump-parse-tree.c (gfc_show_expr): Convert GMP to MPFR.
1308         * expr.c (free_expr0,gfc_copy_expr): Convert GMP to MPFR.
1309         * gfortran.h (GFC_REAL_BITS): Remove.
1310         (arith): Add ARITH_NAN.
1311         Include mpfr.h.  Define GFC_RND_MODE.
1312         Rename GCC_GFORTRAN_H GFC_GFC_H.
1313         (gfc_expr): Convert GMP to MPFR.
1314         * module.c: Add arith.h, correct type in comment.
1315         (mio_gmp_real): Convert GMP to MPFR.
1316         (mio_expr):  Use gfc_set_model_kind().
1317         * primary.c:  Update copyright date with 2004.
1318         (match_real_constant,match_const_complex_part): Convert GMP to MPFR.
1319         * simplify.c: Remove global GMP variables
1320         (gfc_simplify_abs,gfc_simplify_acos,gfc_simplify_aimag,
1321         gfc_simplify_aint,gfc_simplify_dint,gfc_simplify_anint,
1322         gfc_simplify_dnint,gfc_simplify_asin,gfc_simplify_atan,
1323         gfc_simplify_atan2,gfc_simplify_ceiling,simplify_cmplx,
1324         gfc_simplify_conjg,gfc_simplify_cos,gfc_simplify_cosh,
1325         gfc_simplify_dim,gfc_simplify_dprod,gfc_simplify_epsilon,
1326         gfc_simplify_exp,gfc_simplify_exponent,gfc_simplify_floor,
1327         gfc_simplify_fraction,gfc_simplify_huge,gfc_simplify_int,
1328         gfc_simplify_ifix,gfc_simplify_idint,gfc_simplify_log,
1329         gfc_simplify_log10,simplify_min_max,gfc_simplify_mod,
1330         gfc_simplify_modulo,gfc_simplify_nearest,simplify_nint,
1331         gfc_simplify_rrspacing,gfc_simplify_scale,
1332         gfc_simplify_set_exponent,gfc_simplify_sign,gfc_simplify_sin,
1333         gfc_simplify_sinh,gfc_simplify_spacing,gfc_simplify_sqrt,
1334         gfc_simplify_tan,gfc_simplify_tanh,gfc_simplify_tiny,
1335         gfc_simplify_init_1,gfc_simplify_done_1):  Convert GMP to MPFR.
1336         Use new functions.
1337         * trans-const.c (gfc_conv_mpfr_to_tree): Rename from
1338         gfc_conv_mpf_to_tree.  Convert it to use MPFR
1339         (gfc_conv_constant_to_tree): Use it.
1340         * trans-const.h: Update prototype for gfc_conv_mpfr_to_tree().
1341         * trans-intrinsic.c: Add arith.h, remove gmp.h
1342         (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod): Convert GMP to MPFR.
1343
1344 2004-08-06  Victor Leikehman  <lei@il.ibm.com>
1345         Paul Brook  <paul@codesourcery.com>
1346
1347         * trans-array.c (gfc_trans_allocate_array_storage,
1348         gfc_trans_allocate_temp_array, gfc_add_loop_ss_code,
1349         gfc_conv_loop_setup): For functions, if the shape of the result
1350         is not known in compile-time, generate an empty array descriptor for
1351         the result and let the callee to allocate the memory.
1352         (gfc_trans_dummy_array_bias): Do nothing for pointers.
1353         (gfc_conv_expr_descriptor): Use function return values directly.
1354         * trans-expr.c (gfc_conv_function_call): Always add byref call
1355         insn to pre chain.
1356         (gfc_trans_pointer_assignment): Add comments.
1357         (gfc_trans_arrayfunc_assign): Don't chain on expression.
1358
1359 2004-08-01  Roger Sayle  <roger@eyesopen.com>
1360
1361         * options.c (gfc_init_options): Don't warn about the use GNU
1362         extensions by default.
1363         (gfc_post_options): Warn about GNU extensions with -pedantic.
1364         (gfc_handle_option): Don't warn about GNU extensions with -std=gnu.
1365
1366 2004-07-30  Richard Henderson  <rth@redhat.com>
1367
1368         * trans-expr.c (gfc_conv_expr_reference): Create a CONST_DECL
1369         for TREE_CONSTANTs.
1370
1371 2004-07-25  Richard Henderson  <rth@redhat.com>
1372
1373         * trans-decl.c (gfc_build_function_decl): Set DECL_ARTIFICIAL
1374         and DECL_IGNORED_P on RESULT_DECL.
1375         (gfc_generate_constructors): Likewise.
1376
1377 2004-07-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1378
1379         PR fortran/16465
1380         * lang.opt (ffixed-line-length-none, ffixed-line-length-): New
1381         options.
1382         (ffixed-line-length-80, ffixed-line-length-132): Remove.
1383         * options.c (gfc_handle_options): Deal with changed options.
1384         * scanner.c (load_line): Change second arg to 'char **',
1385         allocate if pointing to NULL. Keep track of buffer's length.
1386         Adapt buffer size to overlong lines. Pad lines to full length
1387         in fixed form.
1388         (load_file): Adapt to new interface of load_line.
1389
1390 2004-07-17  Joseph S. Myers  <jsm@polyomino.org.uk>
1391
1392         * trans.h (builtin_function): Declare.
1393
1394 2004-07-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1395
1396         PR fortran/16404
1397         (parts ported from g95)
1398         * parse.h (gfc_state_data): New field do_variable.
1399         (gfc_check_do_variable): Add prototype.
1400         * parse.c (push_state): Initialize field 'do_variable'.
1401         (gfc_check_do_variable): New function.
1402         (parse_do_block): Remember do iterator variable.
1403         (parse_file): Initialize field 'do_variable'.
1404         * match.c (gfc_match_assignment, gfc_match_do,
1405         gfc_match_allocate, gfc_match_nullify, gfc_match_deallocate):
1406         Add previously missing checks.
1407         (gfc_match_return): Reformat error message.
1408         * io.c (match_out_tag): New function.
1409         (match_open_element, match_close_element,
1410         match_file_element, match_dt_element): Call match_out_tag
1411         instead of match_vtag where appropriate.
1412         (match_io_iterator, match_io_element): Add missing check.
1413         (match_io): Reformat error message.
1414         (match_inquire_element): Call match_out_tag where appropriate.
1415
1416         * parse.c (gfc_check_do_variable): Fix error locus.
1417
1418 2004-07-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1419
1420         PR fortran/15129
1421         * trans-decl.c (gfc_build_function_decl): Create a new chardecl
1422         for every assumed length character dummy argument.
1423
1424         PR fortran/15140
1425         * trans-decl.c (gfc_trans_deferred_vars): Remove bogus assertion.
1426
1427         PR fortran/13792
1428         * simplify.c (gfc_simplify_bound): Copy the bound expression.
1429
1430 2004-07-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1431
1432         PR fortran/15324
1433         * trans-array.c gfc_trans_g77_array,
1434         gfc_trans_dummy_array_bias): Don't call gfc_trans_string_init
1435         for assumed length characters.
1436         (gfc_conv_expr_descriptor): Set se->string_length if dealing
1437         with a character expression.
1438         (gfc_cvonv_array_parameter): Pass string length when passing
1439         character array according to g77 conventions.
1440
1441 2004-07-12  Paul Brook  <paul@codesourcery.com>
1442
1443         * expr.c (gfc_check_assign_symbol): Handle pointer assignments.
1444         * trans-array.c (gfc_trans_auto_array_allocation): Remove
1445         initialization code.
1446         * trans-common.c (create_common): Use gfc_conv_initializer.
1447         * trans-decl.c (gfc_get_symbol_decl): Use gfc_conv_initializer.
1448         * trans-expr.c (gfc_conv_initializer): New function.
1449         (gfc_conv_structure): Use it.
1450         * trans.h (gfc_conv_initializer): Add prototype.
1451
1452 2004-07-11  Paul Brook  <paul@codesourcery.com>
1453
1454         PR fortran/15986
1455         * parse.c (gfc_fixup_sibling_symbols): Also look for untyped
1456         variables.
1457         (parse_contained): Mark contained symbols as referenced.
1458
1459 2004-07-11  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1460
1461         PR fortran/16455
1462         * module.c (gfc_dump_module, gfc_use_module): Print locus
1463         when opening of module file fails.
1464
1465         PR fortran/16404
1466         * io.c (match_io): Flag 'WRITE(...), ...' as extension.
1467
1468         PR fortran/16404
1469         * match.c (gfc_match_program): A program name is obligatory.
1470         (gfc_match_return): RETURN in main program is an extension.
1471         (gfc_match_block_data): A space is required before a block data
1472         name.
1473
1474         PR fortran/16433
1475         * primary.c (match_boz_constant): Call gfc_notify_std only if
1476         we actually have a non-standard boz-literal-constant.
1477
1478         PR fortran/15754
1479         * expr.c (gfc_check_assign): Print ranks if incompatible. Issue
1480         warning if assigning NULL().
1481
1482 2004-07-11  Joseph S. Myers  <jsm@polyomino.org.uk>
1483
1484         * f95-lang.c (set_block): Remove.
1485         (gfc_clear_binding_stack): New.
1486         (LANG_HOOKS_CLEAR_BINDING_STACK): Define.
1487         (struct binding_level): Remove block_created_by_back_end.
1488         (clear_binding_level): Likewise.
1489         (poplevel): Don't handle block_created_by_back_end.
1490
1491 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1492
1493         * trans-decl.c (gfc_create_module_variable): Nothing to do if
1494         symbol is in common, because we ...
1495         (gfc_generate_module_vars): Call gfc_trans_common.
1496
1497 2004-07-10  Paul Brook  <paul@codesourcery.com>
1498
1499         * trans-array.c (gfc_build_null_descriptor): New function.
1500         (gfc_trans_static_array_pointer): Use it.
1501         * trans-array.h (gfc_build_null_descriptor): Add prototype.
1502         * trans-expr.c (gfc_conv_structure): Handle array pointers.
1503
1504 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1505
1506         PR fortran/16336
1507         * decl.c (gfc_match_save): Use-associated common block
1508         doesn't collide.
1509         * gfortran.h (gfc_common_head): Add new field 'name'.
1510         Fix typo in comment after #endif.
1511         * match.c (gfc_get_common): Add new argument from_common,
1512         mangle name if flag is set, fill in new field in structure
1513         gfc_common_head.
1514         (match_common): Set new arg in call to gfc_get_common,
1515         use-associated common block doesn't collide.
1516         * match.h (gfc_get_common): Adapt prototype.
1517         * module.c (load_commons): Set new arg in call to
1518         gfc_get_common.
1519         * symbol.c (free_common_tree): New function.
1520         (gfc_free_namespace): Call new function.
1521         * trans-common.c (several functions): Remove argument
1522         'name', use name from gfc_common_head instead.
1523
1524 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1525
1526         * expr.c (gfc_check_pointer_assign): Verify that rank of the LHS
1527         and RHS match. Return early if the RHS is NULL().
1528
1529         PR fortran/16336
1530         * match.c (match_common): Fix error reporting for used common.
1531
1532         PR fortran/15969
1533         * trans-expr.c (gfc_conv_structure): Handle initialization
1534         of scalar pointer components.
1535
1536         * parse.c (decode_statement): Fix matching of BLOCK DATA.
1537
1538         * trans-decl.c (generate_local_decl): Remove workaround obsoleted
1539         by fix for PR 15481.
1540
1541 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1542
1543         * trans-common.c: Fix whitespace issues, make variable names
1544         more readable.
1545         (create_common): Additionally, make loop logic more obvious.
1546
1547 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1548         Paul Brook  <paul@codesourcery.com>
1549
1550         PR fortran/13415
1551         * trans-common.c (calculate_length): Remove ...
1552         (get_segment_info): Merge into here.  Save field type.
1553         (build_field): Use saved type.
1554         (create_common, new_condition, new_segment, finish_equivalences):
1555         Use new get_segment_info.
1556         * trans-types.c: Update comment.
1557
1558 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1559
1560         PR fortran/14077
1561         * moduele.c (mio_symbol): Don't I/O initial values unless
1562         symbol is a parameter.
1563
1564 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1565
1566         PR fortran/13201
1567         * resolve.c (resolve_symbol): Verify that the shape of a
1568         parameter array is not only explicit, but also constant.
1569         * array.c (gfc_is_compile_time_shape): New function.
1570         * gfortran.h (gfc_is_compile_time_shape): Add prototype.
1571
1572 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1573
1574         PR fortran/15481
1575         PR fortran/13372
1576         PR fortran/13575
1577         PR fortran/15978
1578         * module.c (write_symbol, write_symtree): Remove workaround.
1579         * primary.c (match_actual_arglist): Enhance comment.
1580         (gfc_match_rvalue): Handle function call with first argument
1581         a keyword argument correctly.
1582         * resolve.c (resolve_symbol): Change call to
1583         gfc_set_default_type to issue error if no implicit type
1584         can be found.
1585         * trans-decl.c (gfc_create_module_variable): Remove workaround.
1586
1587 2004-07-08  Paul Brook  <paul@codesourcery.com>
1588
1589         * intrinsic.c (add_sym_4s): New function.
1590         (add_subroutines): Change gfc_add_sym_? to gfc_add_sym_?s.
1591
1592 2004-07-04  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1593         Paul Brook  <paul@codesourcery.com>
1594
1595         PR fortran/15280
1596         PR fortran/15665
1597         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_IARGC and
1598         GFC_ISYM_COMMAND_ARGUMENT_COUNT.
1599         * intrinsic.c (add_functions):  Identify iargc.  Add
1600         command_argument_count.
1601         (add_subroutines): Resolve getarg.  Add get_command and
1602         get_command_argument.
1603         * intrinsic.h (gfc_resolve_getarg, gfc_resolve_get_command,
1604         gfc_resolve_get_command_argument): Add prototypes.
1605         * iresolve.c (gfc_resolve_getarg, gfc_resolve_get_command,
1606         gfc_resolve_get_command_argument): New functions.
1607         * trans-decl.c (gfor_fndecl_iargc): New variable.
1608         (gfc_build_intrinsic_function_decls): Set it.
1609         * trans-intrinsic.c (gfc_conv_intrinsic_iargc): New function.
1610         (gfc_conv_intrinsic_function): Use it.
1611         * trans.h (gfor_fndecl_iargc): Declare.
1612
1613 2004-07-04  Matthias Klose  <doko@debian.org>
1614
1615         * Make-lang.in: Generate and install gfortran man page.
1616         * invoke.texi: Remove extra '@c man end'.
1617
1618 2004-07-04  Richard Henderson  <rth@redhat.com>
1619
1620         * f95-lang.c (gfc_mark_addressable): Don't put_var_into_stack.
1621
1622 2004-07-04  Paul Brook  <paul@codesourcery.com>
1623
1624         * decl.c (gfc_match_implicit_range): Don't use typespec.
1625         (gfc_match_implicit): Handle character selectors.
1626         * gfortran.h (gfc_set_implicit): Remove prototype.
1627         (gfc_add_new_implicit_range, gfc_merge_new_implicit): Update.
1628         * parse.c (accept_statement): Don't call gfc_set_implicit.
1629         * symbol.c (new_ts): Remove.
1630         (gfc_set_implicit_none): Use same loop bounds as other functions.
1631         (gfc_set_implicit): Remove.
1632         (gfc_clear_new_implicit, gfc_add_new_implicit_range): Only set flags.
1633         (gfc_merge_new_implicit): Combine with gfc_set_implicit.
1634
1635 2004-06-30  Richard Henderson  <rth@redhat.com>
1636
1637         * match.c (var_element): Remove unused variable.
1638
1639         * trans-decl.c (gfc_generate_function_code): Don't set
1640         x_whole_function_mode_p.
1641         (gfc_generate_constructors): Likewise.
1642
1643 2004-06-30  Richard Henderson  <rth@redhat.com>
1644
1645         * trans-decl.c (gfc_generate_function_code): Don't set
1646         immediate_size_expand.
1647         (gfc_generate_constructors): Likewise.
1648
1649 2004-06-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1650
1651         PR fortran/16161
1652         * decl.c (gfc_match_type_spec): Rename second argument to
1653         'implicit_flag', reverse meaning. Don't match_char_spec if
1654         'implicit_flag' is set. Rename to ...
1655         (match_type_spec): ... this.
1656         (gfc_match_implicit_none, match_implicit_range): Move here
1657         from match.c.
1658         (gfc_match_implicit): Move here from match.c, try to
1659         match_char_len if match_implicit_range doesn't succeed for
1660         CHARACTER implicits. Call renamed fucntion match_type_spec.
1661         (gfc_match_data_decl, match_prefix): Call renamed function
1662         match_type_spec.
1663         * match.c (gfc_match_implicit_none, match_implicit_range,
1664         gfc_match_implicit): Move to decl.c.
1665         * match.h (gfc_match_implicit_none, gfc_match_implicit):
1666         Move protoypes to section 'decl.c'.
1667         (gfc_match_type_spec): Remove prototype.
1668
1669 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1670
1671         * decl.c, interface.c, symbol.c, trans-common.c: Add 2004 to
1672         copyright years.
1673
1674 2004-06-29  Steven Bosscher  <stevenb@suse.de>
1675
1676         Make sure types in assignments are compatible.  Mostly mechanical.
1677         * trans-const.h (gfc_index_one_node): New define.
1678         * trans-array.c (gfc_trans_allocate_array_storage,
1679         gfc_trans_allocate_temp_array, gfc_trans_array_constructor_subarray,
1680         gfc_trans_array_constructor_value, gfc_trans_array_constructor,
1681         gfc_conv_array_ubound, gfc_conv_array_ref,
1682         gfc_trans_scalarized_loop_end, gfc_conv_section_startstride,
1683         gfc_conv_ss_startstride, gfc_conv_loop_setup, gfc_array_init_size,
1684         gfc_trans_array_bounds, gfc_trans_dummy_array_bias,
1685         gfc_conv_expr_descriptor, gfc_trans_deferred_array): Use the correct
1686         types in assignments, conversions and conditionals for expressions.
1687         * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
1688         gfc_conv_unary_op, gfc_conv_cst_int_power, gfc_conv_string_tmp,
1689         gfc_conv_function_call, gfc_trans_pointer_assignment,
1690         gfc_trans_scalar_assign): Likewise.
1691         * trans-intrinsic.c (build_fixbound_expr, gfc_conv_intrinsic_bound,
1692         gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
1693         gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_btest,
1694         gfc_conv_intrinsic_singlebitop, gfc_conv_intrinsic_ishft,
1695         gfc_conv_intrinsic_ishftc, gfc_conv_intrinsic_strcmp,
1696         gfc_conv_allocated, gfc_conv_associated,
1697         gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_trim): Likewise.
1698         * trans-io.c (set_string): Likewise.
1699         * trans-stmt.c (gfc_trans_do, gfc_trans_forall_loop,
1700         gfc_do_allocate, generate_loop_for_temp_to_lhs,
1701         generate_loop_for_rhs_to_temp, compute_inner_temp_size,
1702         compute_overall_iter_number, gfc_trans_assign_need_temp,
1703         gfc_trans_pointer_assign_need_temp, gfc_trans_forall_1,
1704         gfc_evaluate_where_mask, gfc_trans_where_assign,
1705         gfc_trans_where_2): Likewise.
1706         * trans-types.c (gfc_get_character_type, gfc_build_array_type,
1707         gfc_get_nodesc_array_type, gfc_get_array_type_bounds): Likewise.
1708
1709         * trans.c (gfc_add_modify_expr): Add sanity check that types
1710         for the lhs and rhs are the same for scalar assignments.
1711
1712 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1713
1714         * dump-parse-tree.c (show_common): New function.
1715         (gfc_show_namespace): Show commons.
1716
1717 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1718         Andrew Vaught  <andyv@firstinter.net>
1719
1720         PR fortran/13249
1721         PR fortran/15481
1722         * decl.c (gfc_match_save): Adapt to new common structures,
1723         don't allow saving USE-associated common.
1724         * dump-parse-tree (gfc_show_attr): (saved_)common are not
1725         symbol attributes any longer.
1726         (gfc_show_symbol): Don't show old-style commons any longer.
1727         (gfc_show_namespace): Adapt call to gfc_traverse_symtree to new
1728         interface.
1729         * gfortran.h (symbol_attribute): Remove common and saved_common
1730         attributes.
1731         (gfc_symbol): Remove common_head element.
1732         (gfc_common_head): New struct.
1733         (gfc_get_common_head): New macro.
1734         (gfc_symtree): Add field 'common' to union.
1735         (gfc_namespace): Add field 'common_root'; change type of field
1736         'blank_common' to blank_common.
1737         (gfc_add_data): New prototype.
1738         (gfc_traverse_symtree): Expect a symtree as first argument
1739         instead of namespace.
1740         * match.c (gfc_get_common): New function.
1741         (match_common_name): Change to take char * as argument, adapt,
1742         fix bug with empty name.
1743         (gfc_match_common): Adapt to new data structures. Disallow
1744         redeclaration of USE-associated COMMON-block. Fix bug with
1745         empty common.
1746         (var_element): Adapt to new common structures.
1747         * match.h (gfc_get_common): Declare.
1748         * module.c: Add 2004 to copyright years, add commons to module
1749         file layout description.
1750         (ab_attribute, attr_bits, mio_symbol_attributes): Remove code
1751         for removed attributes.
1752         (mio_symbol): Adapt to new way of storing common relations.
1753         (load_commons): New function.
1754         (read_module): Skip common list on first pass, load_commons at
1755         second.
1756         (write_commons): New function.
1757         (write_module): Call write_commons().
1758         * symbol.c (gfc_add_saved_comon, gfc_add_common): Remove
1759         functions related to removed attributes.
1760         (gfc_add_data): New function.
1761         (gfc_clear_attr): Don't set removed attributes.
1762         (gfc_copy_attr): Don't copy removed attributes.
1763         (traverse_symtree): Remove.
1764         (gfc_traverse_symtree): Don't traverse symbol
1765         tree of the passed namespace, but require a symtree to be passed
1766         instead. Unify with traverse_symtree.
1767         (gfc_traverse_ns): Call gfc_traverse_symtree according to new
1768         interface.
1769         (save_symbol): Remove setting of removed attribute.
1770         * trans-common.c (gfc_sym_mangled_common_id): Change to
1771         take 'char *' argument instead of 'gfc_symbol'.
1772         (build_common_decl, new_segment, translate_common): Adapt to new
1773         data structures, add new
1774         argument name.
1775         (create_common): Adapt to new data structures, add new
1776         argument name. Fix typo in intialization of derived types.
1777         (finish_equivalences): Add second argument in call to
1778         create_common.
1779         (named_common): take 'gfc_symtree' instead of 'gfc_symbol'.
1780         (gfc_trans_common): Adapt to new data structures.
1781         * trans-decl.c (gfc_create_module_variables): Remove test for
1782         removed attribute.
1783
1784 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1785
1786         * io.c: Add 2004 to copyright years.
1787
1788 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1789         Andrew Vaught  <andyv@firstinter.net>
1790
1791         * gfortran.h (gfc_gsymbol): New typedef.
1792         (gfc_gsym_root): New variable.
1793         (gfc_get_gsymbol, gfc_find_gsym): New prototypes.
1794         * parse.c (global_used): New function.
1795         (parse_block_data): Check for double empty BLOCK DATA,
1796         use global symbol table.
1797         (parse_module): Use global symbol table.
1798         (add_global_procedure, add_global_program): New functions.
1799         (gfc_parse_file): Use global symbol table.
1800         * symbol.c (gfc_gsym_root): New variable.
1801         (gfc_find_gsym, gsym_compare, gfc_get_gsymbol): New
1802         functions.
1803
1804 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1805
1806         * module.c (mio_gmp_real): Correct writing of negative numbers.
1807
1808 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1809
1810         PR fortran/15963
1811         * expr.c (check_intrinsic_op): Allow comparison of characters.
1812         Make logic easier.
1813
1814 2004-06-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1815         Andrew Vaught  <andyv@firstinter.net>
1816
1817         * decl.c (contained_procedure): New function.
1818         (match_end): Verify correctness of END STATEMENT in
1819         all cases.
1820
1821 2004-06-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1822         Andrew Vaught  <andyv@firstinter.net>
1823
1824         PR fortran/15190
1825         * decl.c (gfc_match_type_spec), io.c (match_io), parse.c
1826         (decode_statement): Enforce required space in free-form.
1827
1828 2004-06-22  Richard Kenner  <kenner@vlsi1.ultra.nyu.edu>
1829
1830         * f95-lang.c (LANG_HOOKS_GIMPLE_BEFORE_INLINING): Deleted.
1831         * trans-array.c (gfc_conv_descriptor_data): Add operand
1832         for COMPONENT_REF.
1833         (gfc_conv_descriptor_offset, gfc_conv_descriptor_dtype): Likewise.
1834         (gfc_conv_descriptor_dimension, gfc_conv_descriptor_stride): Likewise.
1835         (gfc_conv_descriptor_lbound, gfc_conv_descriptor_ubound): Likewise.
1836         * trans-common.c (create_common): Likewise.
1837         * trans-expr.c (gfc_conv_component_ref): Likewise.
1838         * trans-io.c (set_parameter_value): Likewise.
1839         (set_parameter_ref, set_string, set_flag, io_result): Likewise.
1840         (transfer_expr): Likewise.
1841         * trans-decl.c (gfc_trans_auto_character_variable):
1842         Set up to get DECL_SIZE and DECL_SIZE_UNIT gimplified.
1843         (gfc_gimplify_function): New function.
1844         (gfc_generate_function-code): Properly handle nested functions.
1845         * trans.c (gfc_build_array_ref): Add two new operands for ARRAY_REF.
1846
1847 2004-06-22  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1848
1849         PR fortran/15750
1850         * io.c (gfc_match_inquire): Bugfix for iolength related stuff.
1851         (gfc_resolve_inquire): Resolve the iolength tag.  Return
1852         SUCCESS at end of function if no failure has occured.
1853         * resolve.c (resolve_code): Resolve if iolength is encountered.
1854         * trans-io.c: (ioparm_iolength, iocall_iolength,
1855         iocall_iolength_done): New variables.
1856         (last_dt): Add IOLENGTH.
1857         (gfc_build_io_library_fndecls ): Set iolength related variables.
1858         (gfc_trans_iolength): Implement.
1859         (gfc_trans_dt_end): Treat iolength as a third form of data transfer.
1860
1861 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de
1862
1863         PR fortran/15511
1864         * scanner.c (load_line): Don't truncate preprocessor lines.
1865         Reformat error message.
1866         (preprocessor_line): Issue warning in case of malformed
1867         preprocessor line.
1868
1869 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1870
1871         * resolve.c (resolve_symbol): Add comment in function body.
1872         (check_data_variable): Change type of mark to ar_type, adapt code
1873         accordingly.
1874
1875 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1876
1877         * array.c (gfc_insert_constructor): Avoid redundant call to
1878         mpz_comp. Add 2004 to copyright years.
1879
1880 2004-06-21  Joseph S. Myers  <jsm@polyomino.org.uk>
1881
1882         * trans.h (stmtblock_t): Change has_scope to unsigned int.
1883
1884 2004-06-20  Steven G. Kargl  <kargls@comcast.net>
1885
1886         * arith.c (gfc_range_check): correct complex underflow.
1887
1888 2004-06-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1889
1890         PR fortran/15962
1891         * match.c (match_case_selector): Call gfc_match_init_expr
1892         instead of gfc_match_expr.
1893         * resolve.c (validate_case_label_expr): No need to check for
1894         constant, since it wouldn't have been matched with the fix to
1895         match.c.
1896
1897 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1898
1899         PR fortran/15211
1900         * trans-intrinsic.c (gfc_conv_intrinsic_len): Deal with arrays
1901         of strings.
1902
1903 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1904
1905         PR fortran/15510
1906         * trans-deecl.c (generate_local_decl): Do not issue warning for
1907         unused variables if they're use associated.
1908
1909 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1910         Andrew Vaught  <andyv@firstinter.net>
1911
1912         PR fortran/14928
1913         * gfortran.h (gfc_check_f): Add new field f3ml.
1914         * check.c (gfc_check_minloc_maxloc): Take argument list instead
1915         of individual arguments, reorder if necessary.
1916         * intrinsic.h (gfc_check_minloc_maxloc): ... adapt prototype.
1917         * intrinsic.c (add_sym_3ml): New function.
1918         (add_functions): Change to add_sym_3ml for MINLOC, MAXLOC.
1919         (check_specific): Catch special case MINLOC, MAXLOC.
1920
1921 2004-06-14  Paul Brook  <paul@codesourcery.com>
1922
1923         * intrinsic.c (add_sym_2s): Use correct function types.
1924
1925 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1926
1927         * Make-lang.in (F95_OBJS, F95_PARSER_OBJS): Alphabetize.  Move data.c
1928         * data.c (gfc_get_section_index):  Remove dependency on trans.h.
1929
1930 2004-06-12  Steven G. Kargl  <kargls@comcast.net>
1931
1932         * check.c (gfc_check_second_sub, gfc_check_irand, gfc_check_rand
1933         gfc_check_srand, gfc_check_etime, gfc_check_etime_sub): New functions.
1934         * gfortran.h (gfc_generic_isym_id): New symbols GFC_ISYM_ETIME,
1935         GFC_ISYM_IRAND, GFC_ISYM_RAND, GFC_ISYM_SECOND.
1936         * trans-intrinsic.c:  Use symbols.
1937         * intrinsic.c (add_sym_2s): New function.
1938         * intrinsic.c: Add etime, dtime, irand, rand, second, srand.
1939         * intrinsic.h: Function prototypes.
1940         * iresolve.c (gfc_resolve_etime_sub, gfc_resolve_second_sub
1941         gfc_resolve_srand):  New functions.
1942
1943 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1944
1945         PR fortran/14957
1946         * decl.c (gfc_match_end): Require END {SUBROUTINE|FUNCTION} for
1947         contained procedure.
1948
1949 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1950
1951         PR fortran/12841
1952         * interface.c (compare_parameter, compare_actual_formal): Don't
1953         check types and array shapes for NULL()
1954         * trans-expr.c (conv_function_call): No double indirection for
1955         NULL()
1956
1957 2004-06-09  Toon Moene  <toon@moene.indiv.nluug.nl>
1958
1959         * trans-expr.c (gfc_conv_cst_int_power): Compute
1960         x**(-n) by converting it to (1/x)**n instead of
1961         1/x**n.
1962
1963 2004-06-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1964
1965         PR fortran/13372
1966         * module.c (write_symbol, write_symtree): Don't write symbols
1967         wrongly added to namespace.
1968         * trans-decl.c (gfc_create_module_variable): Don't create a
1969         backend decl for a symbol incorrectly added to namespace.
1970
1971 2004-06-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1972
1973         PR fortran/13201
1974         * resolve.c (resolve_symbol): Verify that parameter array has an
1975         explicit shape. Fix typos and coding style issues in surrounding
1976         lines.
1977
1978 2004-06-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1979
1980         PR fortran/15478
1981         * gfortran.texi: The documentation doesn't contain infomration on
1982         how to report bugs, and shouldn't, so remove the line which
1983         says it does.
1984
1985 2004-06-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1986
1987         * intrinsic.c (sort_actual): Keep track of type of missing
1988         arguments. (Missing from previous commit.)
1989
1990 2004-06-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1991
1992         * gfortran.h (gfc_actual_arglist): New field missing_arg_type.
1993         * interface.c (compare_actual_formal): Keep type of omitted
1994         optional arguments.
1995         * trans-expr.c (gfc_conv_function_call): Add string length
1996         argument for omitted string argument.
1997
1998 2004-06-03  Paul Brook  <paul@codesourcery.com>
1999
2000         * trans.c (gfc_finish_block, gfc_add_expr_to_block): Build statement
2001         lists instead of compound expr chains.
2002         (gfc_trans_code): Annotate statement lists.
2003
2004 2004-06-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2005
2006         * trans-array.c: Fix spelling in comments.
2007
2008 2004-06-02  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2009
2010         PR fortran/15557
2011         * data.c (assign_substring_data_value): New function.
2012         (gfc_assign_data_value): Call the new function if we're dealing
2013         with a substring LHS.
2014
2015 2004-06-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2016
2017         PR fortran/15477
2018         * gfortran.h (GFC_VERSION): Remove.
2019         * gfortran.texi (version-gfortran): Remove, replace by version-GCC
2020         where used.
2021
2022 2004-05-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2023
2024         * trans-types.c: Fix spelling & layout in comments.
2025
2026 2004-05-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2027
2028         PR fortran/14067
2029         * trans-const.c (gfc_conv_string_init): Allow variable string
2030         length lower than initialization string length.
2031
2032 2004-05-30  Paul Brook  <paul@codesourcery.com>
2033
2034         PR fortran/15620
2035         * trans-decl.c (gfc_shadow_sym, gfc_restore_sym): New functions.
2036         * trans-expr.c (gfc_trans_string_copy): New function.
2037         (gfc_conv_statement_function): Use them.  Create temp vars.  Enforce
2038         character lengths.
2039         (gfc_conv_string_parameter): Use gfc_trans_string_copy.
2040         * trans-stmt.c (gfc_trans_forall_1): Use gfc_{shadow,restore}_sym.
2041         * trans.h (struct gfc_saved_var): Define.
2042         (gfc_shadow_sym, gfc_restore_sym): Add prototypes.
2043
2044 2004-05-30  Steven G. Kargl  <kargls@comcast.net>
2045
2046         * iresolve.c (gfc_resolve_random_number): Clean up conditional.
2047
2048 2004-05-29  Steven G. Kargl  <kargls@comcast.net>
2049
2050         * simplify.c (gfc_simplify_log): Remove useless line of code.
2051
2052 2004-05-29  Paul Brook  <paul@codesourcery.com>
2053
2054         * trans-common.c (find_equivalence): Find multiple rules.
2055
2056 2004-05-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2057
2058         * gfortran.h (gfc_current_locus, gfc_set_locus): Remove.
2059         (gfc_current_locus): Declare new global variable.
2060         * scanner.c (gfc_current_locus, gfc_set_locus): Remove.
2061         (gfc_current_locus1): Rename ...
2062         (gfc_current_locus): ... to this.
2063         (gfc_at_eof, gfc_at_bol, gfc_at_eol, gfc_advance_line, next_char,
2064         skip_fixed_comments, skip_free_comments, gfc_next_char_literal,
2065         gfc_peek_char, gfc_gobble_whitespace, gfc_new_file): Use
2066         gfc_current_locus instead of gfc_current_locus1, gfc_set_locus()
2067         and gfc_current_locus(), respectively.
2068         * array.c (match_subscript, gfc_match_array_ref, match_array_list,
2069         match_array_cons_element, gfc_match_array_constructor):
2070         Read/modify gfc_current_locus instead of calling gfc_set_locus()
2071         and gfc_current_locus().
2072         * decl.c (gfc_match_null, variable_decl, gfc_match_kind_spec,
2073         match_attr_spec, gfc_match_function_decl, gfc_match_end,
2074         attr_decl1, gfc_match_save): Likewise.
2075         * error.c (error_print, gfc_internal_error): Likewise.
2076         * expr.c (gfc_int_expr, gfc_default_logical_kind): Likewise.
2077         * interface.c (gfc_add_interface): Likewise.
2078         * io.c (gfc_match_format, match_dt_format, match_dt_element,
2079         match_io_iterator, match_io): Likewise.
2080         * match.c (gfc_match_space, gfc_match_eos,
2081         gfc_match_small_literal_int, gfc_match_st_label,
2082         gfc_match_strings, gfc_match_name, gfc_match_iterator,
2083         gfc_match_char, gfc_match, gfc_match_assignment,
2084         gfc_match_pointer_assignment, gfc_match_if, gfc_match_do,
2085         gfc_match_nullify, gfc_match_call, match_implicit_range,
2086         gfc_match_implicit, gfc_match_data, match_case_selector,
2087         gfc_match_case, match_forall_iterator): Likewise.
2088         * matchexp.c (gfc_match_defined_op_name, next_operator,
2089         match_level_1, match_mult_operand, match_ext_mult_operand,
2090         match_add_operand, match_ext_add_operand, match_level_2,
2091         match_level_3, match_level_4, match_and_operand, match_or_operand,
2092         match_equiv_operand, match_level_5, gfc_match_expr): Likewise.
2093         * module.c (gfc_match_use, mio_array_ref, mio_expr): Likewise.
2094         * parse.c (match_word, decode_statement, next_free, next_fixed,
2095         add_statement, verify_st_order, parse_if_block, gfc_parse_file):
2096         Likewise.
2097         * primary.c (match_digits, match_integer_constant,
2098         match_boz_constant, match_real_constant, match_substring,
2099         next_string_char, match_charkind_name, match_string_constant,
2100         match_logical_constant, match_const_complex_part,
2101         match_complex_constant, match_actual_arg, match_keyword_arg,
2102         gfc_match_actual_arglist, gfc_match_structure_constructor,
2103         gfc_match_rvalue, gfc_match_variable): Likewise.
2104         * st.c (gfc_get_code): Likewise.
2105         * symbol.c (check_conflict, check_used, check_done,
2106         duplicate_attr, add_flavor, gfc_add_procedure, gfc_add_intent,
2107         gfc_add_access, gfc_add_explicit_interface, gfc_add_type,
2108         gfc_add_component, gfc_reference_st_label, gfc_new_symbol): Likewise.
2109
2110 2004-05-26  Roger Sayle  <roger@eyesopen.com>
2111
2112         * io.c (format_asterisk): Silence compiler warnings by correcting
2113         the number of elements of a "locus" initializer.
2114
2115 2004-05-25  Roger Sayle  <roger@eyesopen.com>
2116
2117         PR fortran/13912
2118         * matchexp.c: Allow unary operators after arithmetic operators
2119         as a GNU extension.
2120         (match_ext_mult_operand, match_ext_add_operand): New functions.
2121         (match_mult_operand): Tweak to call match_ext_mult_operand.
2122         (match_add_operand): Tweak to call match_ext_mult_operand.
2123         (match_level_2): Rearrange to call match_ext_add_operand.
2124
2125 2004-05-25  Paul Brook  <paul@codesourcery.com>
2126
2127         * expr.c (check_inquiry): Remove bogus tests.
2128
2129 2004-05-23  Paul Brook  <paul@codesourcery.com>
2130
2131         PR fortran/13773
2132         * expr.c (restricted_args): Remove redundant checks/argument.
2133         (external_spec_function): Update to match.
2134         (restricted_intrinsic): Rewrite.
2135
2136 2004-05-23  Paul Brook  <paul@codesourcery.com>
2137         Victor Leikehman  <lei@haifasphere.co.il>
2138
2139         * gfortran.h (struct gfc_symbol): Add equiv_built.
2140         * trans-common.c: Change int to HOST_WIDE_INT.  Capitalize error
2141         messages.
2142         (current_length): Remove.
2143         (add_segments): New function.
2144         (build_equiv_decl): Create initialized common blocks.
2145         (build_common_decl): Always add decl to bindings.
2146         (create_common): Create initializers.
2147         (find_segment_info): Reformat to match coding conventions.
2148         (new_condition): Use add_segments.
2149         (add_condition, find_equivalence, add_equivalences): Move iteration
2150         inside functions.  Only process each segment once.
2151         (new_segment, finish_equivalences, translate_common): Simplify.
2152
2153 2004-05-23  Steven G. Kargl  <kargls@comcast.net>
2154
2155         * check.c (gfc_check_random_seed): Issue for too many arguments.
2156
2157 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2158
2159         * intrinsic.c (add_subroutines): Use add_sym_3s for random_seed.
2160
2161 2004-05-22  Paul Brook  <paul@codesourcery.com>
2162
2163         * dump-parse-tree.c (gfc_show_equiv): New function.
2164         (gfc_show_namespace): Use it.
2165
2166 2004-05-22  Victor Leikehman  <lei@haifasphere.co.il>
2167
2168         PR fortran/13249
2169         * symbol.c (gfc_add_common): Disable checks to work around other more
2170         fundamental inadequacies.
2171
2172 2004-05-22  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2173
2174         * trans-decl.c (gfc_get_extern_function_decl): Set DECL_IS_PURE
2175         only for functions.
2176         (gfc_build_function_decl): Likewise.
2177
2178 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2179
2180         * check.c (gfc_check_system_clock): New function.
2181         * intrinsic.c (add_sym_3s): New function.
2182         (add_subroutines): Use it.
2183         * intrinsic.h (gfc_check_system_clock, gfc_resolve_system_clock):
2184         Add prototypes.
2185         * iresolve.c (gfc_resolve_system_clock): New function.
2186
2187 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2188
2189         * invoke.texi: Document -Wunderflow and spell check.
2190         * lang.opt: Add Wunderflow.
2191         * gfortran.h (gfc_option_t): Add warn_underflow option.
2192         * options.c (gfc_init_options, set_Wall): Use it.
2193         * primary.c (match_real_constant): Explicitly handle UNDERFLOW.
2194         * arith.c (gfc_arith_uminus, gfc_arith_plus, gfc_arith_minus,
2195         gfc_arith_times, gfc_arith_divide, gfc_arith_power, gfc_real2real,
2196         gfc_real2complex, gfc_complex2real, gfc_complex2complex): Ditto.
2197         * arith.c (common_logarithm): Fix typo in comment.
2198
2199 2004-05-21  Roger Sayle  <roger@eyesopen.com>
2200
2201         * io.c (check_format): As a GNU extension, allow the comma after a
2202         string literal to be optional in a format.  Use gfc_notify_std to
2203         issue an error/warning as appropriate.
2204
2205 2004-05-21  Roger Sayle  <roger@eyesopen.com>
2206
2207         * io.c (check_format): Use gfc_notify_std to determine whether to
2208         issue an error/warning for omitting the digits from the X format.
2209
2210 2004-05-20  Roger Sayle  <roger@eyesopen.com>
2211
2212         * io.c (check_format): Allow the number before the X format to
2213         be optional when not -pedantic.
2214
2215 2004-05-18  Feng Wang  <fengwang@nudt.edu.cn>
2216         Paul Brook  <paul@codesourcery.com>
2217
2218         * f95-lang.c (gfc_init_builtin_functions): Use vold_list_node.
2219         Create decls for __builtin_pow{,f}.
2220         * gfortran.h (PREFIX_LEN): Define.
2221         * trans-decl.c (gfor_fndecl_math_powi): Add.
2222         (gfor_fndecl_math_powf, gfor_fndecl_math_pow): Remove.
2223         (gfc_build_intrinsic_function_decls): Create decls for powi.
2224         * trans-expr.c (powi_table): Add.
2225         (gfc_conv_integer_power): Remove.
2226         (gfc_conv_powi): New function.
2227         (gfc_conv_cst_int_power): New function.
2228         (gfc_conv_power_op): Use new powi routines.
2229         * trans.h (struct gfc_powdecl_list): Add.
2230         (gfor_fndecl_math_powi): Add.
2231         (gfor_fndecl_math_powf, gfor_fndecl_math_pow): Remove.
2232
2233 2004-05-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2234
2235         * trans.c, trans-decl.c: Fix comment typos.
2236
2237 2004-05-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2238
2239         * trans-const.c (gfc_conv_mpf_to_tree): Fix typo.
2240
2241 2004-05-18  Steve Kargl  <kargls@comcast.net>
2242
2243         * arith.c (gfc_int2complex): Fix incorrect range checking.
2244
2245 2004-05-18  Paul Brook  <paul@codesourcery.com>
2246
2247         PR fortran/13930
2248         * decl.c (add_init_expr_to_sym): Remove incorrect check.
2249         (default_initializer): Move to expr.c.
2250         (variable_decl): Don't assign default initializer to variables.
2251         * expr.c (gfc_default_initializer): Move to here.
2252         * gfortran.h (gfc_default_initializer): Add prototype.
2253         * resolve.c (resolve_symbol): Check for illegal initializers.
2254         Assign default initializer.
2255
2256 2004-05-17  Steve Kargl  <kargls@comcast.net>
2257
2258         * arith.c (gfc_arith_power): Complex number raised to 0 power is 1.
2259
2260 2004-05-17  Steve Kargl  <kargls@comcast.net>
2261
2262         * arith.c (gfc_real2complex): Range checking wrong part of complex
2263         number.
2264
2265 2004-05-16  Paul Brook  <paul@codesourcery.com>
2266
2267         * options.c (gfc_handle_module_path_options): Fix buffer overrun.
2268
2269 2004-05-16  Paul Brook  <paul@codesourcery.com>
2270
2271         * arith.c (gfc_range_check): Fix logic error.
2272
2273 2004-05-16  Steve Kargl  <sgk@troutmask.apl.washington.edu>
2274
2275         * arith.c: Fix comment typos.
2276
2277 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2278
2279         PR fortran/13742
2280         * decl.c (add_init_expr_to_sym): Verify that COMMON variable is
2281         not initialized in a disallowed fashion.
2282         * match.c (gfc_match_common): Likewise.
2283         (var_element): Verify that variable is not in the blank COMMON,
2284         if it is in a common.
2285
2286 2004-05-15  Joseph S. Myers  <jsm@polyomino.org.uk>
2287
2288         * Make-lang.in (f95.generated-manpages): Remove.
2289         (f95.srcextra): New.
2290         (f95.info, fortran/gfortran.info, fortran/gfortran.dvi,
2291         f95.maintainer-clean): Generate info and dvi files in objdir/doc.
2292         (f95.dvi): Remove.
2293         (dvi): New.
2294         (f95.install-info): Remove.
2295         (install-info): New.
2296
2297 2004-05-15  Victor Leikehman  <lei@haifasphere.co.il>
2298
2299         * decl.c (add_init_expr_to_sym): Check for variable size arrays.
2300
2301 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2302
2303         * primary.c (match_boz_constant): Use gfc_notify_std() for
2304         issuing a warning or an error.
2305
2306 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2307
2308         PR fortran/13826
2309         * primary.c (match_structure_constructor): Rename ...
2310         (gfc_match_structure_constructor): ... to this. Make non-static.
2311         (gfc_match_rvalue): Call renamed function.
2312         * match.h (gfc_match_structure_constructor): Declare.
2313         * match.c (gfc_match_data_constant): Handle structure
2314         constructor.
2315
2316 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2317
2318         PR fortran/13702
2319         (Port from g95)
2320         * gfortran.h (gfc_linebuf): New typedef.
2321         (linebuf): Remove.
2322         (gfc_file): Revamped, use new gfc_linebuf.
2323         (locus): Revamped, use new types.
2324         (gfc_current_file): Remove.
2325         (gfc_current_form, gfc_source_file): New global variables.
2326         * match.c (gfc_match_space, gfc_match_strings): Use
2327         gfc_current_form to find source form.
2328         * module.c (gfc_dump_module): Use gfc_source_file when printing
2329         module header.
2330         * error.c (show_locus, show_loci) Use new data structures to print
2331         locus.
2332         * scanner.c (first_file, first_duplicated_file, gfc_current_file):
2333         Remove.
2334         (file_head, current_file, gfc_current_form, line_head, line_tail,
2335         gfc_current_locus1, gfc_source_file): New global variables.
2336         (gfc_scanner_init1): Set new global variables.
2337         (gfc_scanner_done1): Free new data structures.
2338         (gfc_current_locus): Return pointer to gfc_current_locus1.
2339         (gfc_set_locus): Set gfc_current_locus1.
2340         (gfc_at_eof): Set new variables.
2341         (gfc_at_bol, gfc_at_eol, gfc_advance_line, gfc_next_char): Adapt
2342         to new locus structure.
2343         (gfc_check_include): Remove.
2344         (skip_free_comments, skip_fixed_comments): Use gfc_current_locus1.
2345         (gfc_skip_comments): Use gfc_current_form, find locus with
2346         gfc_current_locus1.
2347         (gfc_next_char): Use gfc_current_form.
2348         (gfc_peek_char, gfc_gobble_whitespace): Use gfc_current_locus1.
2349         (load_line): Use gfc_current_form. Recognize ^Z as EOF. Fix
2350         comment formatting.
2351         (get_file): New function.
2352         (preprocessor_line, include_line): New functions.
2353         (load_file): Move down, rewrite to match new data structures.
2354         (gfc_new_file): Rewrite to match new data structures.
2355         * parse.c (next_statement): Remove code which is now useless. Use
2356         gfc_source_form and gfc_source_file where appropriate.
2357         * trans-decl.c (gfc_get_label_decl): adapt to new data structures
2358         when determining locus of frontend code.
2359         * trans-io.c (set_error_locus): Same.
2360         * trans.c (gfc_get_backend_locus, gfc_set_backend_locus): Likewise.
2361         * lang-specs.h (@f77-cpp-input, @f95-cpp-input): Remove '-P' from
2362         preprocessor flags.
2363         (all): Add missing initializers.
2364
2365 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2366
2367         * Make-lang.in (trans-common.o): Remove redundant dependency.
2368         (data.c): Replace object file name ...
2369         (data.o): ... by the correct one.
2370
2371 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2372
2373         * dump-parse-tree.c (gfc_show_array_ref): Print colon only
2374         for ranges when dumping array references.
2375
2376 2004-05-14  Victor Leikehman  <lei@haifasphere.co.il>
2377
2378         * decl.c (variable_decl): Always apply default initializer.
2379
2380 2004-05-08  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2381
2382         PR fortran/15206
2383         * trans-intrinsic.c (gfc_conv_intrinsic_rrspacing): Fixed to
2384         handle zero correctly.
2385
2386 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2387
2388         * match.c (gfc_match): Eliminate dead code.
2389
2390 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2391
2392         * parse.c (gfc_statement_next_fixed): (Change from Andy's tree)
2393         Detect bad continuation line in fixed form sources.
2394
2395 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2396
2397         PR fortran/15205
2398         * iresolve.c (gfc_resolve_nearest): Add new function.
2399         * intrinsic.h: ... declare it here.
2400         * intrinsic.c (add_functions): ... add it as resolving function
2401         for NEAREST.
2402
2403 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2404
2405         PR fortran/14066
2406         * match.c (gfc_match_do): Allow infinite loops with
2407         label-do-stmt. Do not enforce space after comma.
2408
2409 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2410
2411         PR fortran/15051
2412         * parse.c (parse_interface): Allow empty INTERFACE, remove
2413         seen_body.
2414
2415 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2416
2417         * Make-lang.in, arith.c, arith.h, array.c, bbt.c, check.c,
2418         decl.c, dependency.c, dependency.h, dump-parse-tree.c, error.c,
2419         expr.c, f95-lang.c, gfortran.h, interface.c, intrinsic.c,
2420         intrinsic.h, io.c, iresolve.c, lang-specs.h, match.c, match.h,
2421         matchexp.c, misc.c, module.c, options.c, parse.c, parse.h,
2422         primary.c, resolve.c, scanner.c, simplify.c, st.c, symbol.c,
2423         trans-array.c, trans-array.h, trans-common.c, trans-const.c,
2424         trans-const.h, trans-decl.c, trans-expr.c, trans-intrinsic.c,
2425         trans-io.c, trans-stmt.c, trans-stmt.h, trans-types.c,
2426         trans-types.h, trans.c, trans.h: Update copyright years and
2427         boilerplate.
2428         * data.c: Likewise, also removed two whitespace-only lines.
2429         * gfortranspec.c, lang.opt: Update copyright years.
2430
2431 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2432
2433         PR fortran/14568
2434         * trans-decl.c (generate_local_decl): Don't warn for unused
2435         variables which are in common blocks.
2436
2437 2004-05-13  Diego Novillo  <dnovillo@redhat.com>
2438
2439         * Make-lang.in, f95-lang.c, trans-array.c, trans-decl.c,
2440         trans-expr.c, trans-intrinsic.c, trans-io.c, trans-stmt.c,
2441         trans.c: Rename tree-simple.[ch] to tree-gimple.[ch].
2442
2443 2004-05-13  Victor Leikehman  <lei@haifasphere.co.il>
2444
2445         PR fortran/15314
2446         * trans-expr.c (gfc_conv_structure): Use field type, not expr type.
2447
2448 2004-05-13  Joseph S. Myers  <jsm@polyomino.org.uk>
2449
2450         * gfortran.texi: Use @table @emph instead of @itemize @emph.
2451         Remove "set DEVELOPMENT".
2452         (Compiling GFORTRAN): Remove.
2453
2454 2004-05-09  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2455
2456         * array.c (match_subscript, match_array_ref): Add comments
2457         explaining argument 'init'.
2458         * decl.c, f95-lang.c, match.c, resolve.c, trans-array.c,
2459         trans-expr.c, trans.c: Fix some typos in comments.
2460         * dump-parse-tree.c (gfc_show_expr): Remove wrong comment.
2461         * primary.c (match_digits, match_integer_constant): Add comment
2462         explaining signflag.
2463
2464 2004-05-01  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2465
2466         PR fortran/13940
2467         * primary.c: Include system.h and flags.h, needed for pedantic.
2468         (match_boz_constant): Allow "x" for hexadecimal constants, warn if
2469         pedantic is set.
2470
2471 2004-05-01  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2472
2473         PR fortran/13940
2474         * match.c (match_data_constant): Handle case where
2475         gfc_find_symbol sets sym to NULL
2476
2477 2004-04-28  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2478
2479         * Make-lang.in (f95-lang.o, trans-intrinsic.o): Add missing
2480         dependency on mathbuiltins.def
2481
2482 2004-04-24  Victor Leikehman  <lei@il.ibm.com>
2483
2484         * trans-io.c (transfer_expr): Implemented recursive printing
2485         of derived types.
2486
2487 2004-04-24  Andrew Pinski  <pinskia@physics.uc.edu>
2488
2489         * gfortranspec.c: Do not include multilib.h.
2490
2491 2004-04-24  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2492
2493         * trans-intrinsic.c: Fix comment, this is not trans-expr.c. Add
2494         2004 to copyright years.
2495         * trans-expr.c, trans-decl.c: Comment update, we now generate
2496         GENERIC, not SIMPLE. Add 2004 to copyright years.
2497
2498 2004-04-24  Paul Brook  <paul@codesourcery.com>
2499
2500         * Make-lang.in (gfortranspec.o): Add dependency on $(TM_H).
2501
2502 2004-04-24  Feng Wang  <fengwang@nudt.edu.cn>
2503
2504         PR 14817
2505         * arith.c (gfc_arith_divide): Fix complex divide.
2506
2507 2004-04-23  Andrew Pinski  <pinskia@physics.uc.edu>
2508
2509         * gfortranspec.c: Include the target headers.
2510
2511 2004-04-18  Feng Wang  <fengwang@nudt.edu.cn>
2512
2513         PR fortran/14921
2514         PR fortran/14540
2515         * arith.c (arctangent2): New function.
2516         * arith.h (arctangent2): Add function prototype.
2517         * simplify.c (gfc_simplify_atan2): Use it.
2518         (gfc_simplify_log): Use it.
2519
2520 2004-04-12  Diego Novillo  <dnovillo@redhat.com>
2521
2522         * fortran/f95-lang.c (gfc_expand_stmt): Remove.
2523         (LANG_HOOKS_RTL_EXPAND_STMT): Remove.
2524
2525 2004-04-11  Bud Davis  <bdavis9659@comcast.net>
2526
2527         PR fortran/14872
2528         * trans-io.c (build_dt): Change REC to value.
2529
2530 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2531
2532         PR 14394
2533         * trans-const.c (gfc_conv_mpf_to_tree): Loosen the maximum digits of
2534         the real value when converting mpf to string.
2535
2536 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2537
2538         PR 14395
2539         * trans-intrinsic.c (gfc_conv_intrinsic_cmplx): Fix the imag part of
2540         the result.
2541
2542 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2543
2544         PR fortran/14377
2545         * simplify.c (simplify_min_max): Convert the type of the result.
2546
2547 2004-04-11  Paul Brook  <paul@codesourcery.com>
2548
2549         * gfortran.texi: Use full target triplet.
2550
2551 2004-04-11  Paul Brook  <paul@codesourcery.com>
2552
2553         * Make-lang.in (GFORTRAN_TEXI): Set it.
2554         (fortran/dfortran.dvi): Use it.  Add fortran to include paths.
2555         (fortran/gfortran.info): Ditto.
2556         * gfortran.texi: Major update.
2557         * invoke.texi: New file.
2558
2559 2004-04-10  Paul Brook  <paul@codesourcery.com>
2560
2561         * trans-array.c (gfc_trans_allocate_temp_array,
2562         gfc_conv_tmp_array_ref): Don't use GFC_DECL_STRING.
2563         * trans-decl.c (gfc_build_dummy_array_decl,
2564         gfc_get_symbol_decl, gfc_build_function_decl,
2565         gfc_create_module_variable): Ditto.
2566         * trans-expr.c (gfc_conv_variable): Ditto.
2567         * trans-intrinsic.c (gfc_conv_intrinsic_len): Ditto.
2568         * trans.h (GFC_DECL_STRING): Remove.
2569         (GFC_DECL_PACKED_ARRAY, GFC_DECL_PARTIAL_PACKED_ARRAY,
2570         GFC_DECL_ASSIGN): Renumber flags.
2571
2572 2004-04-05  Paul Brook  <paul@codesourcery.com>
2573
2574         PR 13252
2575         PR 14081
2576         * f95-lang.c (gfc_init_builtin_functions): Add stack_alloc, stack_save
2577         and stack_restore.
2578         * gfortran.h (struct gfc_charlen): Add backend_decl.
2579         * trans-array.c (gfc_trans_allocate_temp_array,
2580         gfc_conv_temp_array_ref, gfc_conv_resolve_dependencies,
2581         (gfc_conv_loop_setup, gfc_array_allocate, gfc_conv_array_init_size):
2582         Remove old, broken string handling.
2583         (gfc_trans_auto_array_allocation, gfc_trans_g77_array,
2584         gfc_trans_dummy_array_bias, gfc_conv_expr_descriptor,
2585         gfc_trans_deferred_array): Handle character arrays.
2586         * trans-const.c (gfc_conv_const_charlen): New function.
2587         * trans-const.h (gfc_conv_const_charlen): Add prototype.
2588         * trans-decl.c (gfc_finish_var_decl): Don't mark automatic variables
2589         as static.
2590         (gfc_build_dummy_array_decl): Handle arrays with unknown element size.
2591         (gfc_create_string_length): New function.
2592         (gfc_get_symbol_decl): Create lengths for character variables.
2593         (gfc_get_fake_result_decl): Ditto.
2594         (gfc_build_function_decl): Only set length for assumed length
2595         character arguments.
2596         (gfc_trans_dummy_character): New function.
2597         (gfc_trans_auto_character_variable): Rewrite.
2598         (gfc_trans_deferred_vars): Handle more types of character variable.
2599         (gfc_create_module_variable): String lengths have moved.
2600         (gfc_generate_function_code): Initialize deferred var chain earlier.
2601         * trans-expr.c (gfc_conv_init_string_length): Rename ...
2602         (gfc_trans_init_string_length):  ... to this.
2603         (gfc_conv_component_ref, gfc_conv_variable, gfc_conv_concat_op,
2604         gfc_conv_function_call): Update to new format for character variables.
2605         (gfc_conv_string_length): Remove.
2606         (gfc_conv_string_parameter): Update assertion.
2607         * trans-intrinsic.c (gfc_conv_intrinsic_len): Use new location.
2608         * trans-io.c (set_string): Use new macro names.
2609         * trans-stmt.c (gfc_trans_label_assign. gfc_trans_goto): Ditto.
2610         * trans-types.c (gfc_get_character_type): Use existing length expr.
2611         (gfc_is_nodesc_array): Make public.
2612         (gfc_get_dtype_cst): Rename ...
2613         (gfc_get_dtype): ... to this.  Handle unknown size arrays.
2614         (gfc_get_nodesc_array_type): Use new name.
2615         (gfc_sym_type): New character variable code.
2616         (gfc_get_derived_type): Ditto.
2617         (gfc_get_function_type): Evaluate character variable lengths.
2618         * trans-types.h (gfc_strlen_kind): Define.
2619         (gfc_is_nodesc_array): Add prototype.
2620         * trans.h: Update prototypes.
2621         (struct lang_type): Update comments.
2622         (GFC_DECL_STRING_LEN): New name for GFC_DECL_STRING_LENGTH.
2623         (GFC_KNOWN_SIZE_STRING_TYPE): Remove.
2624
2625 2004-04-04  Paul Brook  <paul@codesourcery.com>
2626
2627         * gfortran.h (struct gfc_option_t): Remove flag_g77_calls.
2628         * options.c (gfc_init.options, gfc_handle_option): Ditto.
2629         * trans-expr.c (gfc_conv_function_call): Ditto.
2630         * trans-types.c (gfc_is_nodesc_array): Ditto
2631         * lang.opt (fg77-calls): Remove.
2632
2633 2004-04-04  Paul Brook  <paul@codesourcery.com>
2634
2635         * trans-array.c (OFFSET_FIELD): Rename from BASE_FIELD.
2636         (gfc_conv_descriptor_base): Rename ...
2637         (gfc_conv_descriptor_offset): ... to this.
2638         (gfc_trans_allocate_array_storage): Set offset to zero.
2639         (gfc_conv_array_base): Rename ...
2640         (gfc_conv_array_offset): ... to this.
2641         (gfc_conv_array_index_ref): Add offset parameter.
2642         (gfc_conv_array_ref): Include offset.
2643         (gfc_trans_preloop_setup): Use existing offset.
2644         (gfc_trans_allocate_temp_array,  gfc_array_allocate,
2645         gfc_trans_auto_array_allocation, gfc_trans_g77_array,
2646         gfc_trans_dummy_array_bias, gfc_conv_expr_descriptor,
2647         gfc_conf_ss_descriptor): Set offset.
2648         * trans-array.h: Rename prototypes.
2649         * trans-const.h (gfc_index_zero_node): Define.
2650         * trans-decl.c (gfc_build_qualified_array): Change base to offset.
2651         * trans-types.c (gfc_get_array_type_bounds): Ditto.
2652         (gfc_get_nodesc_array_type): Calculate offset before upper bound.
2653
2654 2004-03-25  Diego Novillo  <dnovillo@redhat.com>
2655
2656         * convert.c (convert): Don't handle WITH_RECORD_EXPR.
2657
2658 2004-03-24  Bud Davis  <bdavis9659@comcast.net>
2659
2660         PR 14055
2661         * arith.c (gfc_convert_integer,gfc_convert_real):  Removed leading '+'
2662         before conversion by gmp library call.
2663
2664 2004-03-24  Bud Davis  <bdavis9659@comcast.net>
2665
2666         PR 12921
2667         * trans-io.c (gfc_trans_open): Change RECL= to a value parameter.
2668
2669 2004-02-24  Richard Henderson  <rth@redhat.com>
2670
2671         * trans-array.c (gfc_trans_dummy_array_bias): Fix typo.
2672
2673 2004-02-19  Loren J. Rittle  <ljrittle@acm.org>
2674
2675         * Make-lang.in ($(srcdir)/fortran/gfortran.info): Move...
2676         (fortran/gfortran.info): ... to here.
2677         (f95.srcinfo): New.
2678
2679 2004-02-16  Richard Henderson  <rth@redhat.com>
2680
2681         * Make-lang.in (f95-lang.o, trans-decl.o): Depend on cgraph.h.
2682         * f95-lang.c (LANG_HOOKS_EXPAND_DECL): Remove.
2683         (LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION): New.
2684         (gfc_expand_function): Rename from expand_function_body, make static,
2685         don't do anything except invoke tree_rest_of_compilation.
2686         (gfc_be_parse_file): Invoke cgraph.
2687         (gfc_expand_decl): Remove.
2688         (gfc_init_builtin_functions): Add __builtin_init_trampoline and
2689         __builtin_adjust_trampoline.
2690         * trans-decl.c (gfc_get_extern_function_decl): Don't set DECL_CONTEXT.
2691         (gfc_finalize): New.
2692         (gfc_generate_function_code): Use it.  Lower nested functions.
2693         * trans-expr.c (gfc_conv_function_call): Add static chain operand
2694         to call_expr.
2695         * trans.c (gfc_build_function_call): Likewise.
2696         * trans.h (expand_function_body): Remove.
2697
2698 2004-02-15  Victor Leikehman  <lei@il.ibm.com>
2699
2700         PR gfortran/13433
2701         * trans-decl.c (gfc_build_function_decl) For functions
2702         returning CHARACTER pass an extra length argument,
2703         following g77 calling conventions.
2704         * trans-types.c (gfc_get_function_type) Ditto.
2705         * trans-expr.c (gfc_conv_function_call) Ditto.
2706
2707 2004-02-14  Paul Brook  <paul@codesourcery.com>
2708
2709         * f95-lang.c (gfc_init_builtin_functions): Build chain properly.
2710
2711 2004-02-12  Paul Brook  <paul@nowt.org>
2712
2713         * BUGS: Remove.
2714
2715 2004-02-08  Steve Kargl  <sgk@troutmask.apl.washington.edu>
2716
2717         * gfortran.texi: Fix typos.
2718
2719 2004-02-07  Bud Davis  <bdavis9659@comcast.net>
2720
2721         PR gfortran/13909
2722         * intrinsic.c (add_conversions) Use logical conversion instead
2723         of real.
2724         * trans-types.c (gfc_get_logical_type) implemented logical*1
2725         and logical*2.
2726
2727 2004-01-17  Paul Brook  <paul@codesourcery.com>
2728
2729         * lang-specs.h: Remove %<fixed-form.
2730
2731 2004-01-15  Toon Moene  <toon@moene.indiv.nluug.nl>
2732
2733         * lang-specs.h: Enable preprocessing of source files
2734         ending in .F, .fpp, .FPP, .F90 and .F95.
2735
2736 2004-01-13  Toon Moene  <toon@moene.indiv.nluug.nl>
2737
2738         PR fortran/12912
2739         * lang-specs.h: Enable compilation of files ending
2740         in .f, .for and .FOR.
2741
2742 2004-01-11  Paul Brook  <paul@codesourcery.com>
2743
2744         * trans-stmt.c (gfc_trans_if_1): New function.
2745         (gfc_trans_if): Use it.
2746
2747 2004-01-11  Erik Schnetter  <schnetter@uni-tuebingen.de>
2748
2749         * gfortran.h (GFC_MAX_SYMBOL_LEN): Increase.
2750         (gfc_option_t): Add max_identifier_length.
2751         * lang.opt: Add fmax-identifier-length.
2752         * match.c (parse_name): Use limit.
2753         * options.c (gfc_init_options): Set max_identifier_length.
2754         (gfc_handle_option): Ditto.
2755
2756 2004-01-11  Feng Wang  <fengwang@nudt.edu.cn>
2757
2758         * intrinsic.c (add_functions): Add resolve function to dcmplx.
2759         * intrinsic.h (gfc_resolve_dcmplx): Add prototype.
2760         * iresolve.c (gfc_resolve_dcmplx): New function.
2761
2762 2004-01-10  Paul Brook  <paul@codesourcery.com>
2763
2764         * trans-decl.c (gfc_get_symbol_decl): Don't set subroutine attr.
2765         * trans-types.c (gfc_sym_type): Handle external dummy procedures.
2766         (gfc_return_by_reference): Correct condition.
2767         (gfc_get_function_type): Ditto.
2768
2769 2004-01-10  Paul Brook  <paul@codesourcery.com>
2770
2771         * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Convert mismatched
2772         types.
2773
2774 2004-01-10  Huang Chun  <chunhuang73@hotmail.com>
2775
2776         * iresolve.c: Use correct kind.
2777
2778 2004-01-10  Huang Chun  <chunhuang73@hotmail.com>
2779
2780         PR fortran/13467
2781         * trans-decl.c (gfc_create_module_variable):  Output array valued
2782         parameters.
2783
2784 2004-01-10  Paul Brook  <paul@codesourcery.com>
2785
2786         * resolve.c (resolve_branch): Get error message right way round.
2787
2788 2004-01-10  Canqun Yang  <canqun@nudt.edu.cn>
2789
2790         * trans-array (gfc_conv_loop_setup): Adjust comment to track
2791         reality.
2792         (gfc_array_allocate): Don't count size of element twice.
2793
2794 2004-01-04  Paul Brook  <paul@codesourcery.com>
2795
2796         * lang.opt (i8, r8, std=*): Remove RejectNegative.
2797
2798 2004-01-04  Paul Brook  <paul@codesourcery.com>
2799
2800         * error.c (gfc_notify_std): New function.
2801         * gfortran.h (gfc_notify_std): Declare.
2802         (GFC_STD_*): Define.
2803         (gfc_option_t): Add warn_std and allow_std.
2804         * intrinsic.c (gfc_init_expr_extensions): Fix logic.
2805         (gfc_intrinsic_func_interface): Use gfc_notify_std.
2806         * check.c (check_rest): Use gfc_notify_std.
2807         * match.c (gfc_match_pause): Ditto.
2808         (gfc_match_assign): Ditto.
2809         (gfc_match_goto): Ditto.
2810         * resolve.c (resolve_branch): Ditto.
2811         * lang.opt: Add std=<foo> and w.
2812         * options.c (gfc_init_options): Set allow_std and warn_std.
2813         (gfc_handle_option): Handle OPT_std_* and OPT_w.
2814
2815 2004-01-01  Paul Brook  <paul@codesourcery.com>
2816
2817         * array.c (gfc_append_constructor): Take constructor, not expression.
2818         * data.c (struct gfc_expr_stack): Remove.
2819         (expr_stack): Remove.
2820         (find_con_by_offset): Rename from find_expr_in_con.
2821         (find_con_by_component): Rename from find_component_in_con.
2822         (gfc_get_expr_stack): Remove.
2823         (gfc_assign_data_value): Rewrite.
2824         (gfc_expr_push): Remove.
2825         (gfc_expr_pop): Remove.
2826         (gfc_advance_section): Rename from
2827         gfc_modify_index_and_calculate_offset.  Handle unbounded sections.
2828         (gfc_get_section_index): Handle unbounded sections.
2829         * gfortran.h: Update prototypes.
2830         * resolve.c (check_data_variable): Array section maight not be the
2831         last ref.
2832
2833 2004-01-01  Paul Brook  <paul@codesourcery.com>
2834
2835         PR fortran/13432
2836         * resolve.c (resolve_symbol): Allow assumed length function results.
2837
2838 2004-01-01  Steve Kargl  <sgk@troutmask.apl.washington.edu>
2839
2840         * match.c (gfc_match_pause): Fix spelling.
2841
2842 2004-01-01  Steven Bosscher  <stevenb@suse.de>
2843
2844         PR fortran/13251
2845         * trans-expr.c (gfc_conv_variable): Take the type kind of a substring
2846         reference from the expression.