gcc/fortran/ChangeLog

   1 2005-01-08  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
   2
   3         * trans-const.c: Don't include unused math.h.
   4
   5 2005-01-08  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
   6
   7         * gfortran.h: Remove outdated comment.  Don't include stdio.h
   8         explicitly.
   9
  10 2005-01-06  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
  11
  12         * gfortranspec.c (lang_specific_driver): Change year to 2005 in
  13         output of 'gfortran --version'.
  14
  15 2005-01-03  Steven G. Kargl  <kargls@comcast.net>
  16
  17         * arith.c: Add system.h; remove string.h
  18         * decl.c: Ditto
  19         * matchexp.c: Ditto
  20         * parse.c: Ditto
  21         * resolve.c: Ditto
  22         * st.c: Ditto
  23         * check.c: Remove stdlib.h and stdarg.h
  24         * error.c: Remove stdlib.h, stdarg.h, stdio.h, string.h
  25         * expr.c: Add system.h; remove stdarg.h, stdio.h, and string.h
  26         * f95-lang.c: Add system.h; remove stdio.h
  27         * interface.c: Add system.h; remove stdlib.h and string.h
  28         * intrinsic.c: Remove stdarg.h, stdio.h, and string.h
  29         * io.c: Remove string.h
  30         * simplify.c: Ditto
  31         * match.c: Remove stdarg.h and string.h
  32         * misc.c: Update copyright; add system.h; remove stdlib.h,
  33         string.h, and sys/stat.h
  34         * module.c: Add system.h; remove string.h, stdio.h, errno.h,
  35         unistd.h, and time.h
  36         * option.c: Remove string.h and stdlib.h
  37         * primary.c: Ditto
  38         * scanner.c: Update copyright; add system.h; remove stdlib.h,
  39         stdio.h, string.h, and strings.h
  40         * symbol.c: Add system.h; remove stdlib.h, stdio.h, and string.h
  41         * trans-array.c: Remove stdio.h and gmp.h
  42         * trans-const.c: Ditto
  43         * trans-expr.c: Ditto
  44         * trans-io.c: Ditto
  45         * trans-stmt.c: Ditto
  46         * trans.c: Ditto
  47         * trans-intrinsic.c: Remove stdio.h and string.h
  48
  49 2004-12-29  Steven G. Kargl  <kargls@comcast.net>
  50
  51         * gfortran.h (gfc_case): fix typo in comment.
  52
  53 2004-12-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
  54
  55         * trans-intrinsic.c (gfc_conv_intrinsic_ishft): Change to
  56         logical shift.  Call fold.  Remove 0-bit shift shortcut.
  57         (gfc_conv_intrinsic_ishftc): Convert first argument to at least
  58         4 bytes bits.  Convert 2nd and 3rd argument to 4 bytes.  Convert
  59         result if width(arg 1) < 4 bytes.  Call fold.
  60
  61         PR fortran/19032
  62         * trans-intrinsic.c (gfc_conv_intrinsic_mod): Update comment
  63         in front of function to match the standard.  Correct handling
  64         of MODULO.
  65
  66 2004-12-27  Andrew Pinski  <pinskia@physics.uc.edu>
  67
  68         * trans-expr.c (gfc_conv_cst_int_power): Only check for
  69         flag_unsafe_math_optimizations if we have a float type.
  70
  71 2004-12-23  Steven G. Kargl  <kargls@comcast.net>
  72
  73         * gfortran.texi: Fix typo.
  74
  75 2004-12-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
  76
  77         * trans-intrinsic.c (build_fixbound_expr): Clarify comment, fix
  78         comment typo.
  79
  80 2004-12-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
  81
  82         PR fortran/18993
  83         * match.c (gfc_match_if): Don't explicitly skip optional whitespace.
  84         (gfc_match_nullify): Make sure that ')' is in front of the end of
  85         statement.
  86
  87         * scanner.c (skip_fixed_comments): Fix typo in comment preceding
  88         function.
  89
  90 2004-12-14  Richard Henderson  <rth@redhat.com>
  91
  92         * gfortran.h (gfc_expr.function.name): Make const.
  93         (gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
  94         (gfc_get_string): Update prototype.
  95         * iresolve.c: Include tree.h.
  96         (string_node, HASH_SIZE, string_head, hash): Remove.
  97         (gfc_get_string): Use vsnprintf, get_identifier.
  98         (free_strings, gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
  99         * misc.c (gfc_init_1): Don't call gfc_iresolve_init_1.
 100         (gfc_done_1): Don't call gfc_iresolve_done_1.
 101         * module.c (mio_allocated_string): Take and return const char *,
 102         instead of modifying char**.
 103         (mio_expr): Update to match.
 104         * resolve.c (pure_function): Constify name argument.
 105         (resolve_function): Constify name.
 106         * trans-intrinsic.c (gfc_conv_intrinsic_function): Likewise.
 107
 108 2004-12-12  Richard Henderson  <rth@redhat.com>
 109
 110         * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
 111         gfc_resolve_cshift, gfc_resolve_dot_product, gfc_resolve_eoshift,
 112         gfc_resolve_matmul, gfc_resolve_maxloc, gfc_resolve_maxval,
 113         gfc_resolve_minloc, gfc_resolve_minval, gfc_resolve_pack,
 114         gfc_resolve_product, gfc_resolve_reshape, gfc_resolve_shape,
 115         gfc_resolve_spread, gfc_resolve_sum, gfc_resolve_transpose,
 116         gfc_resolve_unpack: Use PREFIX.
 117
 118 2004-12-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 119
 120         PR fortran/18869
 121         * match.c (gfc_match_common): Skip whitespace.
 122
 123 2004-12-12  Steven G. Kargl  <kargls@comcast.net>
 124
 125         PR fortran/16581
 126         * check.c (gfc_check_iand, gfc_check_ibclr, gfc_check_ibits,
 127         gfc_check_ibset, gfc_check_ieor, gfc_check_ior): Remove default
 128         integer kind check; Issue error for -std=f95 when needed.
 129         * intrinsic.c (add_functions): Change ieor from GFC_STD_GNU to
 130         GFC_STD_F95.
 131         * iresolve.c (gfc_resolve_iand, gfc_resolve_ieor, gfc_resolve_ior):
 132         Promote arguments to same kind.
 133
 134 2004-12-12  Steven G. Kargl  <kargls@comcast.net>
 135         Paul Brook  <paul@codesourcery.com>
 136
 137         PR fortran/16222
 138         * resolve.c (gfc_resolve_iterator_expr): New function.
 139         (gfc_resolve_iterator): Use it.  Add real_ok argument.  Convert
 140         start, end and stride to correct type.
 141         (resolve_code): Pass extra argument.
 142         * array.c (resolve_array_list): Pass extra argument.
 143         * gfortran.h (gfc_resolve): Add prototype.
 144         * trans-stmt.c (gfc_trans_do): Remove redundant type conversions.
 145         Handle real type iterators.
 146
 147 2004-12-11  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 148
 149         PR fortran/17175
 150         * iresolve.c (gfc_resolve_scale): Convert 'I' argument if not of
 151         same kind as C's 'int'.
 152         (gfc_resolve_set_exponent): Convert 'I' argument if not of kind 4.
 153
 154 2004-12-08  Richard Henderson  <rth@redhat.com>
 155
 156         * intrinsic.c (gfc_convert_type_warn): Propagate the input shape
 157         to the output expression.
 158         * iresolve.c (gfc_resolve_cshift, gfc_resolve_eoshift): Suppress
 159         warning conversion.
 160         (gfc_resolve_reshape): Force convert SHAPE and ORDER parameters
 161         to index kind.
 162
 163 2004-12-08  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 164
 165         PR fortran/18826
 166         * resolve.c (resolve_code): Impose correct restrictions on
 167         assigned variable.
 168
 169         * decl.c (gfc_match_end): Use locus of END when eos is an error.
 170
 171 2004-12-02  Steven G. Kargl  <kargls@comcast.net>
 172         Paul Brook  <paul@codesourcery.com>
 173
 174         * check.c (gfc_check_flush, gfc_check_fnum): New functions.
 175         (gfc_check_fstat, gfc_check_fstat_sub): New functions.
 176         (gfc_check_stat, gfc_check_stat_sub): New functions.
 177         * gfortran.h (GFC_ISYM_FNUM,GFC_ISYM_FSTAT,GFC_ISYM_STAT): New symbols
 178         * intrinsic.c (add_functions,add_subroutines): Add flush, fnum,
 179         fstat, and stat to intrinsics symbol tables.
 180         * intrinsic.h (gfc_check_flush, gfc_resolve_stat_sub): Add prototypes.
 181         (gfc_resolve_fstat_sub, gfc_resolve_stat): Ditto.
 182         * iresolve.c (gfc_resolve_fnum, gfc_resolve_fstat): New functions.
 183         (gfc_resolve_stat, gfc_resolve_flush): New functions.
 184         (gfc_resolve_stat_sub,gfc_resolve_fstat_sub): New functions
 185         * trans-intrinsic.c (gfc_conv_intrinsic_function): Add new intrinsics.
 186
 187 2004-12-02  Steven G. Kargl  <kargls@comcast.net>
 188
 189         * intrinsic.c: Fix and add comments, fix function declarations
 190         (OPTIONAL,REQUIRED): New symbols
 191         (add_functions,add_subroutines): Use symbols
 192         (gmp.h): Remove unused include
 193
 194 2004-11-25  Joseph S. Myers  <joseph@codesourcery.com>
 195
 196         * f95-lang.c, gfortranspec.c, trans-decl.c: Avoid ` as left quote
 197         in diagnostics.
 198
 199 2004-11-24  Steven Bosscher  <stevenb@suse.de>
 200
 201         * options.c (gfc_post_options): Don't clear flag_inline_functions.
 202
 203 2004-11-20  Steven G. Kargl  <kargls@comcast.net>
 204
 205         * check.c (gfc_check_getcwd_sub): Fix seg fault.
 206
 207         * check.c (gfc_check_exit,gfc_check_umask,gfc_check_umask_sub,
 208         gfc_check_unlink,gfc_check_unlink_sub): New functions
 209         * gfortran.h (GFC_ISYM_UMASK,GFC_ISYM_UNLINK): New symbols
 210         * intrinsic.c (add_functions,add_subroutines): Add umask, unlink,
 211         exit to intrinsics symbol tables.
 212         * intrinsic.h (gfc_check_umask,gfc_check_unlink,gfc_check_exit,
 213         gfc_check_umask_sub,gfc_check_unlink_sub,gfc_resolve_umask,
 214         gfc_resolve_unlink,gfc_resolve_exit,gfc_resolve_umask_sub,
 215         gfc_resolve_unlink_sub): Add and sort prototypes.
 216         * iresolve.c (gfc_resolve_umask,gfc_resolve_unlink,gfc_resolve_exit,
 217         gfc_resolve_umask_sub,gfc_resolve_unlink_sub): New functions
 218         * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbols
 219
 220 2004-11-16  Paul Brook  <paul@codesourcery.com>
 221
 222         PR fortran/13010
 223         * trans-array.c (gfc_trans_allocate_temp_array): Use gfc_get_dtype.
 224         (gfc_array_init_size, gfc_conv_expr_descriptor): Ditto.
 225         * trans-types.c (gfc_get_dtype): Accept array type rather than element
 226         type.
 227         (gfc_get_nodesc_array_type): Don't set GFC_TYPE_ARRAY_DTYPE.
 228         (gfc_get_array_type_bounds): Ditto.
 229         (gfc_get_derived_type): Recurse into derived type pointers.
 230         * trans-types.h (gfc_get_dtype): Add prototype.
 231         * trans.h (GFC_TYPE_ARRAY_DTYPE): Add comment.
 232
 233 2004-11-15  Paul Brook  <paul@codesourcery.com>
 234
 235         * trans-types.c (gfc_get_dtype): Remove obsolete TODO.
 236
 237 2004-11-10  Paul Brook  <paul@codesourcery.com>
 238
 239         PR fortran/18375
 240         * trans-expr.c (gfc_trans_subarray_assign): Free shape before ss.
 241         * trans-io.c (transfer_array_component): Ditto.
 242
 243 2004-11-10  Paul Brook  <paul@codesourcery.com>
 244
 245         * invoke.texi: Fix typo.
 246
 247 2004-11-08  Kazu Hirata  <kazu@cs.umass.edu>
 248
 249         * arith.c, array.c, decl.c, expr.c, f95-lang.c, gfortran.h,
 250         gfortranspec.c, interface.c, intrinsic.c, iresolve.c, match.c,
 251         module.c, parse.c, parse.h, primary.c, resolve.c, scanner.c,
 252         trans-array.c, trans-array.h, trans-expr.c, trans-intrinsic.c,
 253         trans-io.c, trans-stmt.c, trans.h: Fix comment formatting.
 254
 255 2004-11-06  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 256
 257         PR fortran/18023
 258         * io.c (resolve_tag): Tighten up exception for assigned FORMAT.
 259
 260 2004-11-06  Kazu Hirata  <kazu@cs.umass.edu>
 261
 262         * gfortranspec.c: Replace GNU CC with GCC.
 263
 264 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 265
 266         * gfortranspec.c (lang_specific_driver): Change year to 2004.
 267
 268 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 269
 270         PR fortran/18111
 271         *  trans-decl.c (create_function_arglist): Set DECL_ARTIFICIAL for
 272         hidden parameters.
 273
 274 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 275
 276         PR fortran/15164
 277         * trans-decl.c (gfc_finish_var_decl): Don't declare arguments to
 278         module procedures as if they were module variables.
 279
 280 2004-11-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 281
 282         PR fortran/17535
 283         PR fortran/17583
 284         PR fortran/17713
 285         * module.c (write_symbol1): Set module_name for dummy arguments.
 286
 287 2004-11-02  Paul Brook  <paul@codesourcery.com>
 288
 289         * intrinsic.c (check_intrinsic_standard): Include error locus.
 290         Remove VLA.
 291         (gfc_intrinsic_func_interface, gfc_intrinsic_sub_interface): Pass
 292         locus to check_intrinsic_standard.
 293
 294 2004-10-31  Janne Blomqvist  <jblomqvi@cc.hut.fi>
 295
 296         PR fortran/17590
 297         * gfortran.h: Change GFC_STD_* flags to more appropriate
 298         ones. (struct gfc_intrinsic_isym): Add field for standard. (struct
 299         gfc_option_t): Add field for warning about use of nonstandard
 300         intrinsics.
 301         * intrinsic.c (add_sym): Add parameter for standard version, check
 302         this against current standard.
 303         (add_sym_0): Pass standard parameter to add_sym.
 304         (add_sym_1, add_sym_0s, add_sym_1s, add_sym_1m, add_sym_2): Ditto.
 305         (add_sym_2s, add_sym_3, add_sym_3ml, add_sym_3red, add_sym_3s): Ditto.
 306         (add_sym_4, add_sym_4s, add_sym_5, add_sym_5s): Ditto.
 307         (make_generic): Add parameter for standard, check this
 308         against currently selected standard.
 309         (add_functions, add_subroutines): Add parameter to tell which
 310         standard an intrinsic belongs to.
 311         (check_intrinsic_standard): New function.
 312         (gfc_intrinsic_func_interface): Add call to check_intrinsic_standard.
 313         (gfc_intrinsic_sub_interface): Ditto.
 314         * lang.opt: Add Wnonstd-intrinsics option.
 315         * options.c (gfc_init_options): Change to use new GFC_STD_* flags,
 316         init new warning.
 317         (set_Wall): Add warning about nonstd intrinsics.
 318         (gfc_handle_option): Change to use new GFC_STD_* flags,
 319         handle new warning.
 320         * invoke.texi: Update manual to include -Wnonstd-intrinsics.
 321
 322 2004-10-30  Andrew Pinski  <pinskia@physics.uc.edu>
 323
 324         * f95-lang.c (lang_tree_node): Add chain_next to be the TREE_CHAIN.
 325
 326 2004-10-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 327
 328         * simplify.c (twos_complement): Calculate mask in GMP arithmetic.
 329
 330 2004-10-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 331
 332         * trans.c (gfc_trans_code): Set global locus after recursing. Fix
 333         comment typo.
 334
 335 2004-10-30  Canqun Yang  <canqun@nudt.edu.cn>
 336
 337         * check.c (gfc_check_rand): Allow missing optional argument.
 338         (gfc_check_irand): Ditto.
 339         * intrinsic.c (add_functions): Set arg optional flag for {i,}rand.
 340
 341 2004-10-28  Scott Robert Ladd  <scott.ladd@coyotegulch.com>
 342
 343         PR fortran/13490, PR fortran/17912
 344         * gcc/fortran/gfortran.h: Added pedantic_min_int to gfc_integer_info
 345         * gcc/fortran/gfortran.h: Added ARITH_ASYMMETRIC to arith
 346         * gcc/fortran/arith.c: Added support for an "asymmetric integer"
 347         warning when compiling with pedantic.
 348         * gcc/fortran/arith.c: Set minimum integer values to reflect
 349         realities of two's complement signed integers. Added
 350         pedantic minimum.
 351
 352 2004-10-17  Andrew Pinski  <pinskia@physics.uc.edu>
 353
 354         * Make-lang.in (F95_ADDITIONAL_OBJS): Kill.
 355         (f951): Do not depend on F95_ADDITIONAL_OBJS and don't
 356         link it in.
 357
 358 2004-10-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 359
 360         * trans-decl.c (generate_local_decl): Simplify logic, fix comment
 361         typo.
 362         (gfc_generate_function_code): Fix formatting issue.
 363
 364 2004-10-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 365
 366         * module.c: Fix formatting issues.
 367
 368 2004-10-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 369
 370         * module.c (mio_interface_rest): Set where member of interface
 371         while loading.
 372
 373 2004-10-08  Andrew Pinski  <pinskia@physics.uc.edu>
 374
 375         PR fortran/17901
 376         * options.c (gfc_handle_option): Add break after handing the
 377         J/M option.
 378
 379 2004-10-08  Tobias Schlueter  <tobias.shclueter@physik.uni-muenchen.de>
 380
 381         * arith.c: Fix formatting issues.
 382
 383 2004-10-07  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 384
 385         PR fortran/17676
 386         * resolve.c (resolve_operator): Use correct operator name in message.
 387
 388 2004-10-07  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 389
 390         * primary.c (match_boz_constant): Allow kind parameter suffixes.
 391         Move standard warning further to the front.
 392
 393 2004-10-07  Kazu Hirata  <kazu@cs.umass.edu>
 394
 395         * trans-stmt.c: Fix a comment typo.
 396
 397 2004-10-07  Paul Brook  <paul@codesourcery.com>
 398
 399         PR fortran/17678
 400         * trans-array.c (gfc_trans_deferred_array): Leave use associated
 401         variables alone.
 402
 403 2004-10-06  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 404
 405         PR fortran/17568
 406         * simplify.c (twos_complement): New function.
 407         (gfc_simplify_ishft, gfc_simplify_ishftc): Revise.
 408
 409         * simplify.c (gfc_simplify_abs): Use mpfr_hypot for CABS.
 410
 411 2004-10-06  Paul Brook  <paul@codesourcery.com>
 412
 413         * trans-stmt.c (gfc_trans_simple_do): New function.
 414         (gfc_trans_do): Use it.  Evaluate iteration bounds before entering
 415         loop.  Update comments.
 416
 417 2004-10-04  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 418
 419         PR fortran/17283
 420         * iresolve.c (gfc_resolve_pack): Choose function depending if mask
 421         is scalar.
 422
 423         PR fortran/17631
 424         * intrinsic.c (add_sym_5): Remove.
 425         (add_subroutines): Add resolution function for MVBITS.
 426         * intrinsic.h (gfc_resolve_mvbits): Declare resolution function for
 427         MVBITS
 428         * iresolve.c (gfc_resolve_mvbits): New function.
 429         (gfc_resolve_random_number): Remove empty line at end of function.
 430
 431         * trans-const.c (gfc_build_cstring_const): New function.
 432         (gfc_init_cst): Use new function.
 433         * trans-const.h (gfc_build_cstring_const): Add prototype.
 434         * trans-io.c (set_string, set_error_locus): Use new function.
 435         * trans-stmt.c (gfc_trans_goto): Use new function.
 436
 437         PR fortran/17708
 438         * parse.c (accept_statement): Don't treat END DO like END IF and
 439         END SELECT.
 440         (parse_do_block): Generate possible END DO label inside END DO
 441         block.
 442
 443         PR fortran/17776
 444         * check.c (gfc_check_system_sub): New function.
 445         * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_SYSTEM.
 446         * intrinsic.c (add_functions): Add 'system'.
 447         (add_subroutines): Add 'system'.
 448         * intrinsic.h (gfc_check_etime_sub, gfc_check_getcwd_sub):
 449         Move prototypes to other suborutines.
 450         (gfc_check_system_sub, gfc_resolve_system, gfc_resolve_system_sub):
 451         Add prototype.
 452         (gfc_resolve_system_clock): Fix formatting of prototype.
 453         * iresolve.c (gfc_resolve_system, gfc_resolve_system_sub): New
 454         functions.
 455         * trans-intrinsic.c (gfc_conv_intrinsic_function): Deal with
 456         GFC_ISYM_SYSTEM.
 457
 458 2004-10-04  Erik Schnetter  <schnetter@aei.mpg.de>
 459
 460         * scanner.c (preprocessor_line): Accept preprocessor lines without
 461         file names.  Check file names for closing quotes.  Handle escaped
 462         quotes in file names.
 463
 464 2004-10-04  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 465         Paul Brook  <paul@codesourcery.com>
 466
 467         * trans-array.c (gfc_conv_expr_descriptor): Check for substriungs.
 468         Use gfc_get_expr_charlen.
 469         * trans-expr.c (gfc_get_expr_charlen): New function.
 470         * trans.h (gfc_get_expr_charlen): Add prototype.
 471
 472 2004-10-04  Kazu Hirata  <kazu@cs.umass.edu>
 473
 474         * trans-intrinsic.c: Fix a comment typo.
 475
 476 2004-10-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 477
 478         * simplify.c (range_check): Remove blank line at beginning of function.
 479         (gfc_simplify_dint): Same at end of function.
 480         (gfc_simplify_exponent, gfc_simplify_fraction): Simplify calculations.
 481         (gfc_simplify_bound): Fix indentation.
 482         (gfc_simplify_log10): Simplify calculation.
 483         (gfc_simplify_min, gfc_simplify_max): Remove blank line at beginning
 484         of function.
 485         (gfc_simplify_nearest): Same at end of function.
 486         (gfc_simplify_nint, gfc_simplify_idnint): Same at beginning of
 487         function.
 488         (gfc_simplify_rrspacing, gfc_simplify_set_exponent,
 489         gfc_simplify_spacing): Simplify calulations.
 490
 491 2004-10-03  Feng Wang  <fengwang@nudt.edu.cn>
 492
 493         * trans-intrinsic.c: Fix comments on spacing and rrspacing
 494         (gfc_conv_intrinsic_rrspacing): Add fold on constant trees.
 495
 496 2004-10-01  Jan Hubicka  <jh@suse.cz>
 497
 498         * f95-lang.c (gfc_expand_function): Update call of
 499         tree_rest_of_compilation.
 500         * trans-decl.c (gfc_generate_constructors): Likewise.
 501
 502 2004-09-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 503
 504         * trans-intrinsic.c: Comment fixes.
 505
 506 2004-09-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 507
 508         * decl.c (add_init_expr_to_sym, variable_decl): Comment fixes.
 509
 510 2004-09-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 511
 512         * trans-types.c (gfc_return_by_reference): Remove superfluous
 513         assertion.
 514
 515         * intrinsic.h (gfc_resolve_getcwd): Update prototype.
 516         * iresolve.c (gfc_resolve_getcwd): Add second argument to function.
 517
 518         PR fortran/17615
 519         * trans-expr.c (gfc_trans_arrayfunc_assign): Look at resolved
 520         function to determine return type.
 521
 522 2004-09-20  Jan Hubicka  <jh@suse.cz>
 523
 524         * trans-decl.c (build_entry_thunks): Finalize the function; do not lower
 525         tree.
 526         (gfc_generate_function_code): Likewise.
 527
 528 2004-09-20  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 529
 530         PR fortran/15957
 531         * simplify.c (gfc_simplify_reshape): Set shape of return value
 532         correctly.
 533
 534 2004-09-17  Jeffrey D. Oldham  <oldham@codesourcery.com>
 535             Zack Weinberg  <zack@codesourcery.com>
 536
 537         * f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
 538         enumeration constants.
 539
 540 2004-09-17  Paul Brook  <paul@codesourcery.com>
 541
 542         * gfortran.h (struct gfc_linebuf): Don't use C99 empty arrays.
 543         (gfc_linebuf_header_size): Define.
 544         * scanner.c (load_file): Use it.
 545
 546 2004-09-16  Kazu Hirata  <kazu@cs.umass.edu>
 547
 548         * array.c, data.c, decl.c, dependency.c, error.c, f95-lang.c,
 549         interface.c, intrinsic.c, io.c, misc.c, module.c, parse.h,
 550         resolve.c, scanner.c, trans-array.c, trans-array.h,
 551         trans-common.c, trans-const.h, trans-decl.c, trans-expr.c,
 552         trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.c,
 553         trans.h: Fix comment typos.  Follow spelling conventions.
 554
 555 2004-09-16  Victor Leikehman  <lei@il.ibm.com>
 556
 557         PR/15364
 558         * trans-io.c (transfer_array_component): New function.
 559         (transfer_expr): For array fields, call transfer_array_component.
 560
 561 2004-09-16  Kazu Hirata  <kazu@cs.umass.edu>
 562
 563         * gfortran.texi: Fix a typo.
 564
 565 2004-09-15  Aaron W. LaFramboise <aaronavay62@aaronwl.com>
 566
 567         * parse.c (eof_buf): Rename eof to eof_buf.
 568         (unexpected_eof): Same.
 569         (gfc_parse_file): Same.
 570
 571 2004-09-15  Steven G. Kargl  <kargls@comcast.net>
 572
 573         * check.c (gfc_check_getcwd_sub): New function.
 574         * gfortran.h (GFC_ISYM_GETCWD): New symbol.
 575         * intrinsic.c (add_functions): Add function definition;
 576         Use symbol.
 577         * intrinsic.c (add_subroutines): Add subroutine definitions.
 578         * intrinsic.h: Add prototypes.
 579         * iresolve.c (gfc_resolve_getcwd, gfc_resolve_getcwd_sub):
 580         New functions.
 581         * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbol.
 582
 583 2004-09-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 584
 585         PR fortran/16485
 586         * module.c (write_symbol): Don't fill in module name here.
 587         (write_symbol0): Fill in here instead.
 588
 589 2004-09-14  Kazu Hirata  <kazu@cs.umass.edu>
 590
 591         * data.c, decl.c, f95-lang.c, gfortran.h, match.c,
 592         trans-array.c, trans-common.c, trans-expr.c,
 593         trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.h: Fix
 594         comment typos.  Follow spelling conventions.
 595
 596 2004-09-09  Paul Brook  <paul@codesourcery.com>
 597
 598         * scanner.c (get_file): Add ATTRIBUTE_UNUSED.
 599
 600 2004-09-08  Paul Brook  <paul@codesourcery.com>
 601
 602         * array.c: Don't include assert.h.
 603         * data.c: Don't include assert.h.  Replace assert and abort with
 604         gcc_assert and gcc_unreachable.
 605         * dependency.c: Ditto.
 606         * f95-lang.c: Ditto.
 607         * iresolve.c: Ditto.
 608         * resolve.c: Ditto.
 609         * simplify.c: Ditto.
 610         * symbol.c: Ditto.
 611         * trans-array.c: Ditto.
 612         * trans-common.c: Ditto.
 613         * trans-const.c: Ditto.
 614         * trans-decl.c: Ditto.
 615         * trans-expr.c: Ditto.
 616         * trans-intrinsic.c: Ditto.
 617         * trans-io.c: Ditto.
 618         * trans-stmt.c: Ditto.
 619         * trans-types.c: Ditto.
 620         * trans.c: Ditto.
 621
 622 2004-09-07  Per Bothner  <per@bothner.com>
 623         Paul Brook  <paul@codesourcery.com>
 624
 625         * error.c (show_locus): Handle mapped locations.
 626         * f95-lang.c (gfc_be_parse_file): Initialize mapped locations.
 627         * gfortran.h: Include input.h.
 628         (struct gfc_linebuf): Use source_location.
 629         * scanner.c (get_file): Initialize linemap.
 630         (preprocessor_line): Pass extra argument to get_file.
 631         (load_file): Ditto.  Setup linemap.
 632         (gfc_new_file): Handle mapped locations.
 633         * trans-common.c (build_field, build_equiv_decl, build_common_decl):
 634         Set decl source locations.
 635         (gfc_trans_common): Set blank common block location.
 636         * trans-decl.c (gfc_set_decl_location): New function.
 637         (gfc_get_label_decl, gfc_get_symbol_decl): Use it.
 638         (trans_function_start): Move call to gfc_set_backend_locus..
 639         (build_function_decl): ... to here.
 640         (build_entry_thunks): Set and restore the backend locus.
 641         (gfc_generate_constructors): Remove excess arguments to
 642         init_function_start.
 643         (gfc_generate_block_data): Add comments.  Set the decl locus.
 644         * trans-io.c (set_error_locus): Handle mapped locations.
 645         * trans.c (gfc_get_backend_locus, gfc_get_backend_locus): Ditto.
 646         (gfc_trans_code): Use SET_EXPR_LOCATION.
 647         (gfc_generate_code): Override the location of the new symbol.
 648         * trans.h (gfc_set_decl_location): Add prototype.
 649
 650 2004-08-31  Paul Brook  <paul@codesourcery.com>
 651
 652         * trans-types.c (gfc_type_for_mode): Return NULL for unknown modes.
 653
 654 2004-09-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 655
 656         PR fortran/15327
 657         * trans-intrinsic.c (gfc_conv_intrinsic_merge): Do the right thing for
 658         strings.
 659
 660 2004-09-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 661
 662         PR fortran/16400
 663         PR fortran/16404
 664         (port from g95)
 665         * resolve.c (resolve_transfer): New function.
 666         (resolve_code): Call resolve_transfer in case of EXEC_TRANSFER.
 667
 668 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 669
 670         PR fortran/16579
 671         * trans-types.c (gfc_init_types): Make gfc_character1_type_node an
 672         unsigned char.
 673
 674 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 675
 676         * CONTRIB, NEWS, README, TODO: Remove obsolete files.
 677
 678 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 679
 680         PR fortran/17244
 681         * trans-types.c (gfc_return_by_reference): Remove TODO error,
 682         add comment pointing out possible issue WRT compatibility with g77.
 683
 684 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 685
 686         * trans-decl.c, trans-expr.c, trans-io.c, trans-types.c: Replace
 687         all occurences of 'gfc_strlen_type_node' by
 688         'gfc_charlen_type_node'.
 689         * trans-types.h: Same. Also update comment accordingly.
 690
 691 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 692
 693         * primary.c: Update copyright boilerplate to say GCC.
 694         * f95-lang.c: Change initial comment to say gfortran.
 695
 696 2004-08-31  Paul Brook  <paul@codesourcery.com>
 697
 698         * trans-types.h: Add comments.
 699         (intmax_type_node, string_type_node, const_string_type_node): Remove.
 700
 701 2004-08-30  Richard Henderson  <rth@redhat.com>
 702
 703         * Make-lang.in (fortran/f95-lang.o): Update dependencies.
 704         (fortran/trans-decl.o, fortran/trans-types.o): Likewise.
 705         * gfortran.h (gfc_integer_info): Add c_char, c_short, c_int,
 706         c_long, c_long_long.
 707         (gfc_logical_info): Add c_bool.
 708         (gfc_real_info): Add mode_precision, c_float, c_double, c_long_double.
 709         * trans-array.c (gfc_array_allocate): Use TYPE_PRECISION
 710         rather than gfc_int[48]_type_node for allocate choice.
 711         * trans-decl.c (gfc_build_intrinsic_function_decls): Cache
 712         local copies of some kind type nodes.
 713         (gfc_build_builtin_function_decls): Likewise.
 714         * trans-expr.c (gfc_conv_power_op): Likewise.
 715         * trans-intrinsic.c (gfc_conv_intrinsic_index,
 716         gfc_conv_intrinsic_scan, gfc_conv_intrinsic_verify,
 717         gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat): Likewise.
 718         * trans-stmt.c (gfc_trans_pause, gfc_trans_stop,
 719         gfc_trans_character_select, gfc_trans_allocate): Likewise.
 720         * trans-io.c (gfc_pint4_type_node): Move into ...
 721         (gfc_build_io_library_fndecls): ... here.  Cache local copies of
 722         some kind type nodes.
 723         * trans-types.c (gfc_type_nodes): Remove.
 724         (gfc_character1_type_node, gfc_strlen_type_node): New.
 725         (gfc_integer_types, gfc_logical_types): New.
 726         (gfc_real_types, gfc_complex_types): New.
 727         (gfc_init_kinds): Fill in real mode_precision.
 728         (gfc_build_int_type, gfc_build_real_type): New.
 729         (gfc_build_complex_type, gfc_build_logical_type): New.
 730         (c_size_t_size): New.
 731         (gfc_init_types): Loop over kinds.
 732         (gfc_get_int_type, gfc_get_real_type): Use gfc_validate_kind.
 733         (gfc_get_complex_type, gfc_get_logical_type): Likewise.
 734         (gfc_get_character_type_len): Likewise.
 735         (gfc_type_for_size): Loop over kinds; use a reduced set of
 736         unsigned type nodes.
 737         (gfc_type_for_mode): Loop over kinds.
 738         (gfc_signed_or_unsigned_type): Use gfc_type_for_size.
 739         (gfc_unsigned_type, gfc_signed_type): Use gfc_signed_or_unsigned_type.
 740         * trans-types.h (F95_INT1_TYPE, F95_INT2_TYPE, F95_INT4_TYPE,
 741         F95_INT8_TYPE, F95_INT16_TYPE, F95_REAL4_TYPE, F95_REAL8_TYPE,
 742         F95_REAl16_TYPE, F95_COMPLEX4_TYPE, F95_COMPLEX8_TYPE,
 743         F95_COMPLEX16_TYPE, F95_LOGICAL1_TYPE, F95_LOGICAL2_TYPE,
 744         F95_LOGICAL4_TYPE, F95_LOGICAL8_TYPE, F95_LOGICAL16_TYPE,
 745         F95_CHARACTER1_TYPE, NUM_F95_TYPES, gfc_type_nodes,
 746         gfc_int1_type_node, gfc_int2_type_node, gfc_int4_type_node,
 747         gfc_int8_type_node, gfc_int16_type_node, gfc_real4_type_node,
 748         gfc_real8_type_node, gfc_real16_type_node, gfc_complex4_type_node,
 749         gfc_complex8_type_node, gfc_complex16_type_node,
 750         gfc_logical1_type_node, gfc_logical2_type_node,
 751         gfc_logical4_type_node, gfc_logical8_type_node,
 752         gfc_logical16_type_node, gfc_strlen_kind): Remove.
 753         (gfc_character1_type_node): Turn in to a variable.
 754         (gfc_strlen_type_node): Likewise.
 755
 756 2004-08-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 757
 758         * gfortran.h (gfc_namespace): Add new field is_block_data.
 759         * parse.c (accept_statement): Remove special handling for BLOCK DATA.
 760         (parse_block_data): Record BLOCK DATA name, set is_block_data field.
 761         * trans.c (gfc_generate_code): Handle BLOCK DATA units.
 762         * trans.h (gfc_generate_block_data): Add prototype.
 763         * trans-decl.c (gfc_generate_block_data): New function.
 764
 765 2004-08-29  Richard Henderson  <rth@redhat.com>
 766
 767         * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_export.
 768         * trans-types.c (gfc_init_kinds): Reject integer kinds larger
 769         than two HOST_WIDE_INT.
 770
 771 2004-08-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 772
 773         PR fortran/13910
 774         * decl.c (free_variable, free_value, gfc_free_data, var_list,
 775         var_element, top_var_list, match_data_constant, top_val_list,
 776         gfc_match_data): Move here from match.c.
 777         (match_old_style_init): New function.
 778         (variable_decl): Match old-style initialization.
 779         * expr.c (gfc_get_variable_expr): New function.
 780         * gfortran.h (gfc_get_variable_expr): Add prototype.
 781         * gfortran.texi: Start documentation for supported extensions.
 782         * match.c: Remove the functions moved to decl.c.
 783         * match.h (gfc_match_data): Move prototype to under decl.c.
 784         * symbol.c (gfc_find_sym_tree, gfc_find_symbol): Add/correct
 785         comments.
 786
 787 2004-08-29  Steven G. Kargl  <kargls@comcast.net>
 788         Paul Brook  <paul@codesourcery.com>
 789
 790         * check.c (gfc_check_besn, gfc_check_g77_math1): New functions.
 791         * f95-lang.c (DO_DEFINE_MATH_BUILTIN): Define.
 792         (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
 793         (build_builtin_fntypes): New function.
 794         (gfc_init_builtin_functions): Use it.
 795         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_{J,Y}{0,1,N}
 796         and GFC_ISYM_ERF{,C}.
 797         (gfc_c_int_kind): Declare.
 798         * intrinsic.c (add_functions): Add [d]bes* and [d]erf*.
 799         * intrinsic.h (gfc_check_besn, gfc_check_g77_math1, gfc_resolve_besn,
 800         gfc_resolve_g77_math1): Add prototypes.
 801         * resolve.c (gfc_resolve_besn, gfc_resolve_g77_math1): New functions.
 802         * mathbuiltins.def: Add comment.  Change third argument.  Use
 803         DEFINE_MATH_BUILTIN_C.  Add bessel and error functions.
 804         * trans-intrinsic.c (BUILT_IN_FUNCTION): Define.
 805         (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
 806         * trans-types.c (gfc_c_int_kind): Declare.
 807         (gfc_init_kinds): Set it.
 808
 809 2004-08-29  Steven G. Kargl  <kargls@comcast.net>
 810         Paul Brook  <paul@codesourcery.com>
 811
 812         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_GET?ID.
 813         (gfc_check_f, gfc_simplify_f): Add f0.
 814         * intrinsic.c (do_check): Call f0.  Flatten.
 815         (add_sym_0): Fix prototype.  Set f0.
 816         (add_functions): Add getgid, getgid and getuid.
 817         (resolve_intrinsic): Remove obsolete comment.
 818         (do_simplify): Call f0.
 819         * intrinsic.h (gfc_resolve_getgid, gfc_resolve_getpid,
 820         gfc_resolve_getuid): Add prototypes.
 821         * iresolve.c (gfc_resolve_getgid, gfc_resolve_getpid,
 822         gfc_resolve_getuid): New functions.
 823         * trans-intrinsic.c (gfc_conv_intrinsic_function): Handle
 824         GFC_ISYM_GET?ID.
 825
 826 2004-08-28  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 827
 828         * error.c (gfc_error_init_1): Remove blank line in front of
 829         function body. Add missing blank.
 830         (gfc_buffer_error, error_char, error_string): Remove blank line in
 831         front of function body.
 832         (show_locus): Add comma in comment.
 833         (gfc_clear_warning, gfc_warning_check, gfc_clear_error,
 834         gfc_push_error, gfc_pop_error): Remove blank line in front of
 835         function body.
 836         (gfc_get_errors): Typo fix in comment in front of function. Remove
 837         blank line in front of function body.
 838
 839 2004-08-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 840
 841         * gfortran.h (gfc_default_*_kind): Remove prototypes, add extern
 842         variable declaration of same name.
 843         * arith.c, check.c, decl.c, dump_parse_tree.c, expr.c,
 844         intrinsic.c, io.c, iresolve.c, match.c, options.c, primary.c,
 845         resolve.c, simplify.c, symbol.c, trans-const.c, trans-io.c:
 846         Replace all calls to gfc_default_*_kind with variable accesses.
 847         * trans-types.c: Same as above.
 848         (gfc_default_*_kind_1): Rename to gfc_default_*_kind, remove
 849         static qualifier. Replace all occurences.
 850         (gfc_default_*_kind): Remove functions.
 851
 852 2004-08-26  Richard Henderson  <rth@redhat.com>
 853
 854         * arith.c: Include system.h, not real system headers.
 855         (MPZ_NULL, MPF_NULL, DEF_GFC_INTEGER_KIND, DEF_GFC_LOGICAL_KIND,
 856         DEF_GFC_REAL_KIND, GFC_SP_KIND, GFC_SP_PREC, GFC_SP_EMIN, GFC_SP_EMAX,
 857         GFC_DP_KIND, GFC_DP_PREC, GFC_DP_EMIN, GFC_DP_EMAX, GFC_QP_KIND,
 858         GFC_QP_PREC, GFC_QP_EMIN, GFC_QP_EMAX): Remove.
 859         (gfc_integer_kinds, gfc_logical_kinds, gfc_real_kinds,
 860         gfc_index_integer_kind, gfc_default_integer_kind,
 861         gfc_default_real_kind,gfc_default_double_kind,
 862         gfc_default_character_kind, gfc_default_logical_kind,
 863         gfc_default_complex_kind, validate_integer, validate_real,
 864         validate_logical, validate_character,
 865         gfc_validate_kind): Move to trans-types.c.
 866         (gfc_set_model_kind): Use gfc_validate_kind.
 867         (gfc_set_model): Just copy the current precision to default.
 868         (gfc_arith_init_1): Use mpfr precision 128 for integer setup.
 869         * f95-lang.c (gfc_init_decl_processing): Invoke gfc_init_kinds.
 870         * gfortran.h: Update file commentary.
 871         * trans-types.c (MAX_INT_KINDS, MAX_REAL_KINDS): New.
 872         (gfc_default_integer_kind_1, gfc_default_real_kind_1,
 873         gfc_default_double_kind_1, gfc_default_character_kind_1,
 874         gfc_default_logical_kind_1, gfc_default_complex_kind_1): New.
 875         (gfc_init_kinds): New.
 876         (gfc_init_types): Don't set gfc_index_integer_kind here.
 877         * trans-types.h (gfc_init_kinds): Declare.
 878         * doc/invoke.texi: Clarify DOUBLE PRECISION behaviour wrt -r8.
 879
 880 2004-08-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 881
 882         * check.c (gfc_check_atan2): New function.
 883         * intrinsic.c (add_functions): Use gfc_check_atan2 for ATAN2
 884         * intrinsic.h (gfc_check_atan2): Add prototype.
 885
 886 2004-08-25  Richard Henderson  <rth@redhat.com>
 887
 888         * arith.c (gfc_validate_kind): Add may_fail argument; abort if
 889         false and we don't validate the kind.
 890         (gfc_check_integer_range, gfc_check_real_range): Update to match.
 891         * check.c (kind_check): Likewise.
 892         * decl.c (gfc_match_old_kind_spec, gfc_match_kind_spec): Likewise.
 893         (match_char_spec, match_logical_spec): Likewise.
 894         * gfortran.h (gfc_validate_kind): Likewise.
 895         * options.c (gfc_handle_option): Likewise.
 896         * primary.c (match_integer_constant, match_real_constant,
 897         match_string_constant, match_logical_constant,
 898         match_const_complex_part): Likewise.
 899         * simplify.c (get_kind, gfc_simplify_bit_size, gfc_simplify_digits,
 900         gfc_simplify_epsilon, gfc_simplify_huge, gfc_simplify_ibclr,
 901         gfc_simplify_ibset, gfc_simplify_ishft, gfc_simplify_ishftc,
 902         gfc_simplify_maxexponent, gfc_simplify_minexponent,
 903         gfc_simplify_nearest, gfc_simplify_not, gfc_simplify_precision,
 904         gfc_simplify_radix, gfc_simplify_range, gfc_simplify_rrspacing,
 905         gfc_simplify_scale, gfc_simplify_spacing, gfc_simplify_tan,
 906         gfc_simplify_tiny): Likewise.
 907         * trans-intrinsic.c (gfc_conv_intrinsic_aint, gfc_conv_intrinsic_mod,
 908         gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_minmaxval,
 909         prepare_arg_info): Likewise.
 910
 911 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 912
 913         * expr.c (gfc_check_assign): Add comment. Add new warning.
 914         * trans-expr.c (gfc_conv_function_call): Correctly dereference
 915         result of pointer valued function when not in pointer assignment.
 916
 917 2004-08-25  Paul Brook  <paul@codesourcery.com>
 918
 919         * config-lang.in: Remove dead commented line.
 920         * module.c: Replace g95 with gfortran in comment.
 921
 922 2004-08-25  Paul Brook  <paul@codesourcery.com>
 923
 924         PR fortran/17190
 925         * arith.c (gfc_mpfr_to_mpz): Workaround mpfr bug.
 926
 927 2004-08-25  Paul Brook  <paul@codesourcery.com>
 928
 929         PR fortran/17144
 930         * trans-array.c (gfc_trans_allocate_temp_array): Remove
 931         string_length argument.
 932         (gfc_trans_array_ctor_element): New function.
 933         (gfc_trans_array_constructor_subarray): Use it.
 934         (gfc_trans_array_constructor_value): Ditto.  Handle constant
 935         character arrays.
 936         (get_array_ctor_var_strlen, get_array_ctor_strlen): New functions.
 937         (gfc_trans_array_constructor): Use them.
 938         (gfc_add_loop_ss_code): Update to new gfc_ss layout.
 939         (gfc_conv_ss_descriptor): Remember section string length.
 940         (gfc_conv_scalarized_array_ref): Ditto.  Remove dead code.
 941         (gfc_conv_resolve_dependencies): Update to new gfc_ss layout.
 942         (gfc_conv_expr_descriptor): Ditto.
 943         (gfc_conv_loop_setup): Ditto.  Spelling fixes.
 944         * trans-array.h (gfc_trans_allocate_temp_array): Update prototype.
 945         * trans-const.c (gfc_conv_constant):  Update to new gfc_ss layout.
 946         * trans-expr.c (gfc_conv_component_ref): Turn error into ICE.
 947         (gfc_conv_variable): Set string_length from section.
 948         (gfc_conv_function_call): Remove extra argument.
 949         (gfc_conv_expr, gfc_conv_expr_reference): Update to new gfc_ss layout.
 950         * trans-types.c (gfc_get_character_type_len): New function.
 951         (gfc_get_character_type): Use it.
 952         (gfc_get_dtype): Return zero for internal types.
 953         * trans-types.h (gfc_get_character_type_len): Add prototype.
 954         * trans.h (struct gfc_ss): Move string_length out of union.
 955
 956 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 957
 958         * trans.h (build2_v, build3_v): New macros.
 959         (build_v): Remove.
 960         * f95-lang.c (gfc_truthvalue_conversion): Use build2 instead of
 961         build.
 962         * trans-array.c (gfc_conv_descriptor_data,
 963         gfc_conv_descriptor_offset, gfc_conv_descriptor_dimension,
 964         gfc_conv_descriptor_stride, gfc_conv_descriptor_lbound,
 965         gfc_conv_descriptor_ubound, gfc_trans_allocate_array_storage,
 966         gfc_trans_allocate_temp_array,
 967         gfc_trans_array_constructor_subarray,
 968         gfc_trans_array_constructor_value, gfc_conv_array_index_ref,
 969         gfc_trans_array_bound_check, gfc_conv_array_index_offset,
 970         gfc_conv_scalarized_array_ref, gfc_conv_array_ref,
 971         gfc_conv_array_ref, gfc_trans_preloop_setup,
 972         gfc_trans_scalarized_loop_end, gfc_conv_ss_startstride,
 973         gfc_conv_loop_setup, gfc_array_init_size,
 974         gfc_conv_array_initializer, gfc_trans_array_bounds,
 975         gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias,
 976         gfc_conv_expr_descriptor, gfc_conv_array_parameter,
 977         gfc_trans_deferred_array): Use buildN and buildN_v macros instead
 978         of build and build_v as appropriate.
 979         * trans-common.c (create_common): Same.
 980         * trans-decl.c (gfc_trans_auto_character_variable,
 981         gfc_trans_entry_master_switch, gfc_generate_function_code): Same.
 982         * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
 983         gfc_conv_component_ref, gfc_conv_unary_op, gfc_conv_powi,
 984         gfc_conv_cst_int_power, gfc_conv_string_tmp, gfc_conv_concat_op,
 985         gfc_conv_expr_op, gfc_conv_function_call,
 986         gfc_trans_structure_assign): Same.
 987         * trans-intrinsic.c (build_fixbound_expr, build_round_expr,
 988         gfc_conv_intrinsic_aint, gfc_conv_intrinsic_bound,
 989         gfc_conv_intrinsic_cmplx, gfc_conv_intrinsic_mod,
 990         gfc_conv_intrinsic_dim, gfc_conv_intrinsic_sign,
 991         gfc_conv_intrinsic_dprod, gfc_conv_intrinsic_minmax,
 992         gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
 993         gfc_conv_intrinsic_arith, gfc_conv_intrinsic_minmaxloc,
 994         gfc_conv_intrinsic_minmaxval, gfc_conv_intrinsic_btest,
 995         gfc_conv_intrinsic_bitop, gfc_conv_intrinsic_singlebitop,
 996         gfc_conv_intrinsic_ibits, gfc_conv_intrinsic_ishft,
 997         gfc_conv_intrinsic_merge, gfc_conv_intrinsic_strcmp,
 998         gfc_conv_allocated, gfc_conv_associated, prepare_arg_info,
 999         gfc_conv_intrinsic_spacing, gfc_conv_intrinsic_rrspacing,
1000         gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat,
1001         gfc_conv_intrinsic_iargc): Same.
1002         * trans-io.c (set_parameter_value, set_parameter_ref, set_string,
1003         set_flag, add_case, io_result, transfer_namelist_element,
1004         transfer_expr): Same.
1005         * trans-stmt.c (gfc_trans_goto, gfc_trans_return, gfc_trans_if_1,
1006         gfc_trans_arithmetic_if, gfc_trans_do, gfc_trans_do_while,
1007         gfc_trans_integer_select, gfc_trans_logical_select,
1008         gfc_trans_character_select, gfc_trans_forall_loop,
1009         gfc_trans_nested_forall_loop, gfc_do_allocate,
1010         generate_loop_for_temp_to_lhs, generate_loop_for_rhs_to_temp,
1011         compute_inner_temp_size, compute_overall_iter_number,
1012         allocate_temp_for_forall_nest, gfc_trans_pointer_assign_need_temp,
1013         gfc_trans_forall_1, gfc_evaluate_where_mask,
1014         gfc_trans_where_assign, gfc_trans_allocate): Same.
1015         * trans-types.c (gfc_get_dtype, gfc_get_array_type_bounds): Same.
1016         * trans.c (gfc_add_modify_expr, gfc_finish_block,
1017         gfc_build_array_ref, gfc_build_function_call,
1018         gfc_trans_runtime_check): Same.
1019
1020 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1021
1022         * trans-const.c (gfc_conv_mpz_to_tree): Change call to
1023         build_int_cst to build_int_cst_wide in accordance to Nathan's
1024         previous patch.
1025
1026 2004-08-25  Nathan Sidwell  <nathan@codesourcery.com>
1027
1028         * trans-array.c (gfc_trans_array_constructor_value): Adjust
1029         build_int_cst calls.
1030         * trans-const.c (gfc_build_string_const, gfc_init_constants,
1031         gfc_conv_mpz_to_tree, gfc_conv_constant_to_tree): Likewise.
1032         * trans-decl.c (gfc_get_symbol_decl, build_entry_thunks,
1033         gfc_trans_entry_master_switch): Likewise.
1034         * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
1035         gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
1036         * trans-io.c (add_case, set_error_locus,
1037         transfer_namelist_element, transfer_expr): Likewise.
1038         * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
1039         gfc_trans_stop, gfc_trans_character_select): Likewise.
1040         * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
1041         * trans.c (gfc_trans_runtime_check): Likewise.
1042
1043 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1044
1045         * trans-decl.c, trans-types.c: Add and remove blank lines as
1046         required.
1047
1048 2004-08-24  Richard Henderson  <rth@redhat.com>
1049
1050         * trans-const.c (gfc_conv_mpz_to_tree): Fix 64-bit shift warning.
1051
1052 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1053
1054         * resolve.c (merge_argument_lists): Revert unintentionally
1055         committed change.
1056
1057 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1058
1059         * trans-decl.c (build_function_decl): Fix spelling in comment.
1060         (build_entry_thunks): Remove code with no function.
1061         (gfc_build_intrinsic_function_decls): Remove empty line.
1062
1063         * resolve.c (resolve_entries): Fix a bunch of comment typos.
1064
1065 2004-08-24  Nathan Sidwell  <nathan@codesourcery.com>
1066
1067         * f95-lang.c (gfc_init_decl_processing): Adjust
1068         build_common_tree_nodes call.
1069
1070 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1071
1072         * trans-types.c: Spelling and formatting fixes.
1073
1074 2004-08-23  Richard Henderson  <rth@redhat.com>
1075
1076         * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_getlimbn instead
1077         of going through an intermediate string.  Fix 32/64 int/long bug.
1078
1079 2004-08-23  Eric Christopher  <echristo@redhat.com>
1080
1081         * trans-types.c (gfc_type_for_mode): Remove VECTOR_TYPE_SUPPORTED_P
1082         usage. Use build_vector_type_for_mode for vector types.
1083
1084 2004-08-22  Richard Henderson  <rth@redhat.com>
1085
1086         PR 13465
1087         * data.c (find_con_by_offset): Search ordered list; handle
1088         elements with repeat counts.
1089         (gfc_assign_data_value_range): New.
1090         * gfortran.h (struct gfc_data_value): Make repeat unsigned.
1091         (gfc_assign_data_value_range): Declare.
1092         * match.c (top_val_list): Extract repeat count into a temporary.
1093         * resolve.c (values): Make left unsigned.
1094         (next_data_value): Don't decrement left.
1095         (check_data_variable): Use gfc_assign_data_value_range.
1096
1097 2004-08-22  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1098
1099         * trans-const.c, trans-decl.c, trans-expr.c: Spelling fixes.
1100
1101 2004-08-22  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1102
1103         * check.c (gfc_check_reduction): Rename to ...
1104         (check_reduction): ... this. Make static. Don't check type of
1105         first argument.
1106         (gfc_check_minval_maxval, gfc_check_prodcut_sum): New functions.
1107         * intrinsic.c (add_functions): Change MAXVAL, MINVAL, PRODUCT and
1108         SUM to use new check functions.
1109         (check_specific): Change logic to call new functions.
1110         * intrinsic.h (gfc_check_minval_maxval, gfc_check_product_sum):
1111         Add prototypes.
1112         (gfc_check_reduction): Remove prototype.
1113
1114 2004-08-20  Paul Brook  <paul@codesourcery.com>
1115         Canqun Yang  <canqun@nudt.edu.cn>
1116
1117         PR fortran/17077
1118         * trans-array.c (gfc_conv_array_parameter): Pass correct pointer
1119         for automatic arrays.
1120         * trans-types.c (gfc_get_nodesc_array_type): Add comment.
1121
1122 2004-08-19  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1123         (Port from g95)
1124
1125         PR fortran/17074
1126         * match.c (match_simple_forall, match_simple_where): Forward-declare.
1127         (gfc_match_if): Order statement list alphabetically, add WHERE and
1128         FORALL, remove double PAUSE.
1129         (gfc_match_simple_where, match_forall_header,
1130         gfc_match_simple_forall): New functions.
1131         (gfc_match_forall): Use match_forall_header.
1132
1133 2004-08-19  Paul Brook  <paul@codesourcery.com>
1134
1135         PR fortran/17091
1136         * gfortran.h (gfc_access): Give ACCESS_UNKNOWN value 0.
1137         * symbol.c (gfc_clear_attr): Use memset.
1138
1139 2004-08-19  Paul Brook  <paul@codesourcery.com>
1140
1141         PR fortran/14976
1142         PR fortran/16228
1143         * data.c (assign_substring_data_value): Remove.
1144         (create_character_intializer): New function.
1145         (gfc_assign_data_value): Track the typespec for the current
1146         subobject.  Use create_character_intializer.
1147
1148 2004-08-19  Erik Schnetter  <schnetter@aei.mpg.de>
1149
1150         PR fortran/16946
1151         * check.c (gfc_check_reduction): New function.
1152         (gfc_check_minval_maxval): Removed.
1153         (gfc_check_product): Removed.
1154         (gfc_check_sum): Removed.
1155         * intrinsic.h: Add/remove declarations for these.
1156         * gfortran.h: Add field f3red to union gfc_check_f.
1157         * intrinsic.c (add_sym_3red): New function.
1158         (add_functions): Register maxval, minval, product, and sum intrinsics
1159         through add_sym_3red.
1160         (check_specific): Handle f3red union field.
1161         * iresolve.c: Whitespace change.
1162
1163 2004-08-18  Paul Brook  <paul@codesourcery.com>
1164
1165         * trans-types.c (gfc_sym_type): Use pointer types for optional args.
1166
1167 2004-08-18  Victor Leikehman  <lei@il.ibm.com>
1168
1169         PR fortran/13278
1170         * trans-io.c (transfer_namelist_element): New. Recursively handle
1171         derived-type variables.  Pass string lengths.
1172         (build_dt): Code moved to build_namelist, with some
1173         changes and additions.
1174         (gfc_build_io_library_fndecls): Declare the fifth
1175         argument in st_set_nml_var_char -- string_length.
1176
1177 2004-08-17  Paul Brook  <paul@codesourcery.com>
1178         Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1179
1180         PR fortran/13082
1181         * decl.c (get_proc_name): Update mystery comment.
1182         (gfc_match_entry): Check for errors earlier.  Add entry point to list.
1183         * dump-parse-tree.c (gfc_show_code_node): Print EXEC_ENTRY nodes.
1184         * gfortran.h (symbol_attribute): Add entry_master.  Document entry.
1185         (struct gfc_entry_list): Define.
1186         (gfc_get_entry_list): Define.
1187         (struct gfc_namespace): Add refs and entries.
1188         (enum gfc_exec_op): Add EXEC_ENTRY.
1189         (struct gfc_code): Add ext.entry.
1190         * module.c (ab_attribute, attr_bits): Remove AB_ENTRY.
1191         (mio_symbol_attribute): Don't save/reture addr->entry.
1192         (mio_namespace_ref): Refcount namespaces.
1193         * parse.c (accept_statement): Handle ST_ENTRY.
1194         (gfc_fixup_sibling_symbols): Mark symbol as referenced.
1195         (parse_contained): Fixup sibling references to entry points
1196         after parsing the procedure body.
1197         * resolve.c (resolve_contained_fntype): New function.
1198         (merge_argument_lists, resolve_entries): New functions.
1199         (resolve_contained_functions): Use them.
1200         (resolve_code): Handle EXEC_ENTRY.
1201         (gfc_resolve): Call resolve_entries.
1202         * st.c (gfc_free_statement): Handle EXEC_ENTRY.
1203         * symbol.c (gfc_get_namespace): Refcount namespaces.
1204         (gfc_free_namespace): Ditto.
1205         * trans-array.c (gfc_trans_dummy_array_bias): Treat all args as
1206         optional when multiple entry points are present.
1207         * trans-decl.c (gfc_get_symbol_decl): Remove incorrect check.
1208         (gfc_get_extern_function_decl): Add assertion.  Fix coment.
1209         (create_function_arglist, trans_function_start, build_entry_thunks):
1210         New functions.
1211         (gfc_build_function_decl): Rename ...
1212         (build_function_decl): ... to this.
1213         (gfc_create_function_decl): New function.
1214         (gfc_generate_contained_functions): Use it.
1215         (gfc_trans_entry_master_switch): New function.
1216         (gfc_generate_function_code): Use new functions.
1217         * trans-stmt.c (gfc_trans_entry): New function.
1218         * trans-stmt.h (gfc_trans_entry): Add prototype.
1219         * trans-types.c (gfc_get_function_type): Add entry point argument.
1220         * trans.c (gfc_trans_code): Handle EXEC_ENTRY.
1221         (gfc_generate_module_code): Call gfc_create_function_decl.
1222         * trans.h (gfc_build_function_decl): Remove.
1223         (gfc_create_function_decl): Add prototype.
1224
1225 2004-08-15  Andrew Pinski  <apinski@apple.com>
1226
1227         PR fortran/17030
1228         * f95-lang.c (gfc_init_builtin_functions): Initialize the builtins
1229         for cabs{,f} and copysign{,f}.
1230         * trans-decl.c (gfor_fndecl_math_cabsf): Delete.
1231         (gfor_fndecl_math_cabs): Delete.
1232         (gfor_fndecl_math_sign4): Delete.
1233         (gfor_fndecl_math_sign8): Delete.
1234         (gfc_build_intrinsic_function_decls): Remove the
1235         initializing of cabs{,f} and copysign{,f} functions.
1236         * trans-intrinsic.c (gfc_conv_intrinsic_abs): Use the builtins
1237         instead of the functions definitions.
1238         (gfc_conv_intrinsic_sign): Likewise.
1239         * trans.h (gfor_fndecl_math_cabsf): Delete.
1240         (gfor_fndecl_math_cabs): Delete.
1241         (gfor_fndecl_math_sign4): Delete.
1242         (gfor_fndecl_math_sign8): Delete.
1243
1244 2004-08-15  Nathan Sidwell  <nathan@codesourcery.com>
1245
1246         * trans-array.c (gfc_trans_array_constructor_value): Use
1247         build_int_cst.
1248         * trans-const.c (gfc_build_string_const,
1249         gfc_init_constants, gfc_conv_mpz_to_tree,
1250         gfc_conv_constant_to_tree): Likewise.
1251         * trans-decl.c (gfc_get_symbol_decl): Likewise.
1252         * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
1253         gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
1254         * trans-io.c (add_case, set_error_locus, build_dt,
1255         transfer_expr): Likewise.
1256         * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
1257         gfc_trans_stop, gfc_trans_character_select): Likewise.
1258         * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
1259         * trans.c (gfc_trans_runtime_check): Likewise.
1260
1261 2004-08-14  Paul Brook  <paul@codesourcery.com>
1262
1263         * trans-decl.c (gfc_build_function_decl): Remove dead code.
1264
1265 2004-08-14  Paul Brook  <paul@codesourcery.com>
1266
1267         * trans-arry.c (gfc_trans_auto_array_allocation): Remove unused var.
1268
1269 2004-08-13  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1270
1271         * gfortran.h: Add comments.
1272         * parse.c (parse_contained): Fix comment typo.
1273         * resolve.c (was_declared): Ditto.
1274         * symbol.c: Ditto.
1275
1276 2004-08-11  Paul Brook  <paul@codeourcery.com>
1277
1278         PR fortran/16917
1279         * intrinsic.c (add_functions): Add dfloat as an alias for dble.
1280
1281 2004-08-10  Richard Henderson  <rth@redhat.com>
1282
1283         * f95-lang.c (gfc_init_builtin_functions): Remove
1284          __builtin_stack_alloc, add __builtin_alloca.
1285         * trans-array.c (gfc_trans_auto_array_allocation): Use DECL_EXPR.
1286         * trans-decl.c (gfc_trans_auto_character_variable): Likewise.
1287
1288 2004-08-10  Paul Brook  <paul@codesourcery.com>
1289
1290         * trans-io.c (transfer_expr): Handle pointters.
1291
1292 2004-08-10  Paul Brook  <paul@codesourcery.com>
1293
1294         PR fortran/16919
1295         * trans-array.c (gfc_add_loop_ss_code): Handle GFC_SS_COMPONENT.
1296         (gfc_conv_array_index_offset): Allow "temporary" with nonzero delta.
1297         (gfc_trans_preloop_setup, gfc_trans_scalarized_loop_boundary):
1298         Handle GFC_SS_COMPONENT.
1299         (gfc_conv_ss_startstride): Ditto.  Set ss->shape.
1300         (gfc_conv_loop_setup): Tweak commends. Remove dead code.
1301         Use ss->shape.
1302         (gfc_conv_array_initializer): Call specific initializer routines.
1303         * trans-expr.c (gfc_trans_structure_assign): New function.
1304         (gfc_trans_subarray_assign): New function.
1305         (gfc_trans_subcomponent_assign): New fucntion
1306         (gfc_conv_structure): Use them.
1307         * trans.h (gfc_ss_type): Add GFC_SS_COMPONENT.
1308         (gfc_ss): Add shape.
1309
1310 2004-08-08  Victor Leikehman  <lei@il.ibm.com>
1311
1312         * simplify.c (gfc_simplify_shape): Bugfix.
1313         * expr.c (gfc_copy_shape_excluding): New function.
1314         * gfortran.h (gfc_get_shape): Bugfix.
1315         (gfc_copy_shape_excluding): Added declaration.
1316         * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
1317         gfc_resolve_cshift, gfc_resolve_eoshift, gfc_resolve_lbound,
1318         gfc_resolve_ubound, gfc_resolve_transpose): Added compile
1319         time resolution of shape.
1320
1321 2004-08-06  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1322
1323         * intrinsic.c (add_subroutines): Add getenv and
1324         get_environment_variable. (add_sym_5s): New function.
1325         * intrinsic.h (gfc_resolve_get_environment_variable): Add
1326         prototype.
1327         * iresolve.c (gfc_resolve_get_environment_variable): New
1328         function.
1329
1330 2004-08-06  Feng Wang  <fengwang@nudt.edu.cn>
1331
1332         * f95-lang.c (gfc_init_builtin_functions): Fix the number of
1333         __builtin_pow[f] arguments.
1334
1335 2004-08-06  Steven G. Kargl  <kargls@comcast.net>
1336
1337         * arith.c: Add #define for model numbers.  Remove global GMP variables.
1338         (natural_logarithm,common_logarithm,exponential,sine,
1339         cosine,arctangent,hypercos,hypersine ): Remove.
1340         (gfc_mpfr_to_mpz,gfc_set_model_kind,gfc_set_model): New functions.
1341         (arctangent2,gfc_arith_init_1,gfc_arith_done_1
1342         gfc_check_real_range, gfc_constant_result, gfc_range_check,
1343         gfc_arith_uminus,gfc_arith_plus, gfc_arith_minus, gfc_arith_times,
1344         gfc_arith_divide,complex_reciprocal,complex_pow_ui,
1345         gfc_arith_power,gfc_compare_expr,compare_complex,gfc_convert_real,
1346         gfc_convert_complex,gfc_int2real,gfc_int2complex,
1347         gfc_real2int,gfc_real2real,gfc_real2complex,
1348         gfc_complex2int,gfc_complex2real,gfc_complex2complex): Convert GMP
1349         to MPFR, use new functions.
1350         * arith.h: Remove extern global variables.
1351         (natural_logarithm,common_logarithm,exponential, sine, cosine,
1352         arctangent,hypercos,hypersine): Remove prototypes.
1353         (arctangent2): Update prototype from GMP to MPFR.
1354         (gfc_mpfr_to_mpz, gfc_set_model_kind,gfc_set_model): Add prototypes.
1355         * dump-parse-tree.c (gfc_show_expr): Convert GMP to MPFR.
1356         * expr.c (free_expr0,gfc_copy_expr): Convert GMP to MPFR.
1357         * gfortran.h (GFC_REAL_BITS): Remove.
1358         (arith): Add ARITH_NAN.
1359         Include mpfr.h.  Define GFC_RND_MODE.
1360         Rename GCC_GFORTRAN_H GFC_GFC_H.
1361         (gfc_expr): Convert GMP to MPFR.
1362         * module.c: Add arith.h, correct type in comment.
1363         (mio_gmp_real): Convert GMP to MPFR.
1364         (mio_expr):  Use gfc_set_model_kind().
1365         * primary.c:  Update copyright date with 2004.
1366         (match_real_constant,match_const_complex_part): Convert GMP to MPFR.
1367         * simplify.c: Remove global GMP variables
1368         (gfc_simplify_abs,gfc_simplify_acos,gfc_simplify_aimag,
1369         gfc_simplify_aint,gfc_simplify_dint,gfc_simplify_anint,
1370         gfc_simplify_dnint,gfc_simplify_asin,gfc_simplify_atan,
1371         gfc_simplify_atan2,gfc_simplify_ceiling,simplify_cmplx,
1372         gfc_simplify_conjg,gfc_simplify_cos,gfc_simplify_cosh,
1373         gfc_simplify_dim,gfc_simplify_dprod,gfc_simplify_epsilon,
1374         gfc_simplify_exp,gfc_simplify_exponent,gfc_simplify_floor,
1375         gfc_simplify_fraction,gfc_simplify_huge,gfc_simplify_int,
1376         gfc_simplify_ifix,gfc_simplify_idint,gfc_simplify_log,
1377         gfc_simplify_log10,simplify_min_max,gfc_simplify_mod,
1378         gfc_simplify_modulo,gfc_simplify_nearest,simplify_nint,
1379         gfc_simplify_rrspacing,gfc_simplify_scale,
1380         gfc_simplify_set_exponent,gfc_simplify_sign,gfc_simplify_sin,
1381         gfc_simplify_sinh,gfc_simplify_spacing,gfc_simplify_sqrt,
1382         gfc_simplify_tan,gfc_simplify_tanh,gfc_simplify_tiny,
1383         gfc_simplify_init_1,gfc_simplify_done_1):  Convert GMP to MPFR.
1384         Use new functions.
1385         * trans-const.c (gfc_conv_mpfr_to_tree): Rename from
1386         gfc_conv_mpf_to_tree.  Convert it to use MPFR
1387         (gfc_conv_constant_to_tree): Use it.
1388         * trans-const.h: Update prototype for gfc_conv_mpfr_to_tree().
1389         * trans-intrinsic.c: Add arith.h, remove gmp.h
1390         (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod): Convert GMP to MPFR.
1391
1392 2004-08-06  Victor Leikehman  <lei@il.ibm.com>
1393         Paul Brook  <paul@codesourcery.com>
1394
1395         * trans-array.c (gfc_trans_allocate_array_storage,
1396         gfc_trans_allocate_temp_array, gfc_add_loop_ss_code,
1397         gfc_conv_loop_setup): For functions, if the shape of the result
1398         is not known in compile-time, generate an empty array descriptor for
1399         the result and let the callee to allocate the memory.
1400         (gfc_trans_dummy_array_bias): Do nothing for pointers.
1401         (gfc_conv_expr_descriptor): Use function return values directly.
1402         * trans-expr.c (gfc_conv_function_call): Always add byref call
1403         insn to pre chain.
1404         (gfc_trans_pointer_assignment): Add comments.
1405         (gfc_trans_arrayfunc_assign): Don't chain on expression.
1406
1407 2004-08-01  Roger Sayle  <roger@eyesopen.com>
1408
1409         * options.c (gfc_init_options): Don't warn about the use GNU
1410         extensions by default.
1411         (gfc_post_options): Warn about GNU extensions with -pedantic.
1412         (gfc_handle_option): Don't warn about GNU extensions with -std=gnu.
1413
1414 2004-07-30  Richard Henderson  <rth@redhat.com>
1415
1416         * trans-expr.c (gfc_conv_expr_reference): Create a CONST_DECL
1417         for TREE_CONSTANTs.
1418
1419 2004-07-25  Richard Henderson  <rth@redhat.com>
1420
1421         * trans-decl.c (gfc_build_function_decl): Set DECL_ARTIFICIAL
1422         and DECL_IGNORED_P on RESULT_DECL.
1423         (gfc_generate_constructors): Likewise.
1424
1425 2004-07-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1426
1427         PR fortran/16465
1428         * lang.opt (ffixed-line-length-none, ffixed-line-length-): New
1429         options.
1430         (ffixed-line-length-80, ffixed-line-length-132): Remove.
1431         * options.c (gfc_handle_options): Deal with changed options.
1432         * scanner.c (load_line): Change second arg to 'char **',
1433         allocate if pointing to NULL. Keep track of buffer's length.
1434         Adapt buffer size to overlong lines. Pad lines to full length
1435         in fixed form.
1436         (load_file): Adapt to new interface of load_line.
1437
1438 2004-07-17  Joseph S. Myers  <jsm@polyomino.org.uk>
1439
1440         * trans.h (builtin_function): Declare.
1441
1442 2004-07-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1443
1444         PR fortran/16404
1445         (parts ported from g95)
1446         * parse.h (gfc_state_data): New field do_variable.
1447         (gfc_check_do_variable): Add prototype.
1448         * parse.c (push_state): Initialize field 'do_variable'.
1449         (gfc_check_do_variable): New function.
1450         (parse_do_block): Remember do iterator variable.
1451         (parse_file): Initialize field 'do_variable'.
1452         * match.c (gfc_match_assignment, gfc_match_do,
1453         gfc_match_allocate, gfc_match_nullify, gfc_match_deallocate):
1454         Add previously missing checks.
1455         (gfc_match_return): Reformat error message.
1456         * io.c (match_out_tag): New function.
1457         (match_open_element, match_close_element,
1458         match_file_element, match_dt_element): Call match_out_tag
1459         instead of match_vtag where appropriate.
1460         (match_io_iterator, match_io_element): Add missing check.
1461         (match_io): Reformat error message.
1462         (match_inquire_element): Call match_out_tag where appropriate.
1463
1464         * parse.c (gfc_check_do_variable): Fix error locus.
1465
1466 2004-07-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1467
1468         PR fortran/15129
1469         * trans-decl.c (gfc_build_function_decl): Create a new chardecl
1470         for every assumed length character dummy argument.
1471
1472         PR fortran/15140
1473         * trans-decl.c (gfc_trans_deferred_vars): Remove bogus assertion.
1474
1475         PR fortran/13792
1476         * simplify.c (gfc_simplify_bound): Copy the bound expression.
1477
1478 2004-07-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1479
1480         PR fortran/15324
1481         * trans-array.c gfc_trans_g77_array,
1482         gfc_trans_dummy_array_bias): Don't call gfc_trans_string_init
1483         for assumed length characters.
1484         (gfc_conv_expr_descriptor): Set se->string_length if dealing
1485         with a character expression.
1486         (gfc_cvonv_array_parameter): Pass string length when passing
1487         character array according to g77 conventions.
1488
1489 2004-07-12  Paul Brook  <paul@codesourcery.com>
1490
1491         * expr.c (gfc_check_assign_symbol): Handle pointer assignments.
1492         * trans-array.c (gfc_trans_auto_array_allocation): Remove
1493         initialization code.
1494         * trans-common.c (create_common): Use gfc_conv_initializer.
1495         * trans-decl.c (gfc_get_symbol_decl): Use gfc_conv_initializer.
1496         * trans-expr.c (gfc_conv_initializer): New function.
1497         (gfc_conv_structure): Use it.
1498         * trans.h (gfc_conv_initializer): Add prototype.
1499
1500 2004-07-11  Paul Brook  <paul@codesourcery.com>
1501
1502         PR fortran/15986
1503         * parse.c (gfc_fixup_sibling_symbols): Also look for untyped
1504         variables.
1505         (parse_contained): Mark contained symbols as referenced.
1506
1507 2004-07-11  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1508
1509         PR fortran/16455
1510         * module.c (gfc_dump_module, gfc_use_module): Print locus
1511         when opening of module file fails.
1512
1513         PR fortran/16404
1514         * io.c (match_io): Flag 'WRITE(...), ...' as extension.
1515
1516         PR fortran/16404
1517         * match.c (gfc_match_program): A program name is obligatory.
1518         (gfc_match_return): RETURN in main program is an extension.
1519         (gfc_match_block_data): A space is required before a block data
1520         name.
1521
1522         PR fortran/16433
1523         * primary.c (match_boz_constant): Call gfc_notify_std only if
1524         we actually have a non-standard boz-literal-constant.
1525
1526         PR fortran/15754
1527         * expr.c (gfc_check_assign): Print ranks if incompatible. Issue
1528         warning if assigning NULL().
1529
1530 2004-07-11  Joseph S. Myers  <jsm@polyomino.org.uk>
1531
1532         * f95-lang.c (set_block): Remove.
1533         (gfc_clear_binding_stack): New.
1534         (LANG_HOOKS_CLEAR_BINDING_STACK): Define.
1535         (struct binding_level): Remove block_created_by_back_end.
1536         (clear_binding_level): Likewise.
1537         (poplevel): Don't handle block_created_by_back_end.
1538
1539 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1540
1541         * trans-decl.c (gfc_create_module_variable): Nothing to do if
1542         symbol is in common, because we ...
1543         (gfc_generate_module_vars): Call gfc_trans_common.
1544
1545 2004-07-10  Paul Brook  <paul@codesourcery.com>
1546
1547         * trans-array.c (gfc_build_null_descriptor): New function.
1548         (gfc_trans_static_array_pointer): Use it.
1549         * trans-array.h (gfc_build_null_descriptor): Add prototype.
1550         * trans-expr.c (gfc_conv_structure): Handle array pointers.
1551
1552 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1553
1554         PR fortran/16336
1555         * decl.c (gfc_match_save): Use-associated common block
1556         doesn't collide.
1557         * gfortran.h (gfc_common_head): Add new field 'name'.
1558         Fix typo in comment after #endif.
1559         * match.c (gfc_get_common): Add new argument from_common,
1560         mangle name if flag is set, fill in new field in structure
1561         gfc_common_head.
1562         (match_common): Set new arg in call to gfc_get_common,
1563         use-associated common block doesn't collide.
1564         * match.h (gfc_get_common): Adapt prototype.
1565         * module.c (load_commons): Set new arg in call to
1566         gfc_get_common.
1567         * symbol.c (free_common_tree): New function.
1568         (gfc_free_namespace): Call new function.
1569         * trans-common.c (several functions): Remove argument
1570         'name', use name from gfc_common_head instead.
1571
1572 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1573
1574         * expr.c (gfc_check_pointer_assign): Verify that rank of the LHS
1575         and RHS match. Return early if the RHS is NULL().
1576
1577         PR fortran/16336
1578         * match.c (match_common): Fix error reporting for used common.
1579
1580         PR fortran/15969
1581         * trans-expr.c (gfc_conv_structure): Handle initialization
1582         of scalar pointer components.
1583
1584         * parse.c (decode_statement): Fix matching of BLOCK DATA.
1585
1586         * trans-decl.c (generate_local_decl): Remove workaround obsoleted
1587         by fix for PR 15481.
1588
1589 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1590
1591         * trans-common.c: Fix whitespace issues, make variable names
1592         more readable.
1593         (create_common): Additionally, make loop logic more obvious.
1594
1595 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1596         Paul Brook  <paul@codesourcery.com>
1597
1598         PR fortran/13415
1599         * trans-common.c (calculate_length): Remove ...
1600         (get_segment_info): Merge into here.  Save field type.
1601         (build_field): Use saved type.
1602         (create_common, new_condition, new_segment, finish_equivalences):
1603         Use new get_segment_info.
1604         * trans-types.c: Update comment.
1605
1606 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1607
1608         PR fortran/14077
1609         * moduele.c (mio_symbol): Don't I/O initial values unless
1610         symbol is a parameter.
1611
1612 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1613
1614         PR fortran/13201
1615         * resolve.c (resolve_symbol): Verify that the shape of a
1616         parameter array is not only explicit, but also constant.
1617         * array.c (gfc_is_compile_time_shape): New function.
1618         * gfortran.h (gfc_is_compile_time_shape): Add prototype.
1619
1620 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1621
1622         PR fortran/15481
1623         PR fortran/13372
1624         PR fortran/13575
1625         PR fortran/15978
1626         * module.c (write_symbol, write_symtree): Remove workaround.
1627         * primary.c (match_actual_arglist): Enhance comment.
1628         (gfc_match_rvalue): Handle function call with first argument
1629         a keyword argument correctly.
1630         * resolve.c (resolve_symbol): Change call to
1631         gfc_set_default_type to issue error if no implicit type
1632         can be found.
1633         * trans-decl.c (gfc_create_module_variable): Remove workaround.
1634
1635 2004-07-08  Paul Brook  <paul@codesourcery.com>
1636
1637         * intrinsic.c (add_sym_4s): New function.
1638         (add_subroutines): Change gfc_add_sym_? to gfc_add_sym_?s.
1639
1640 2004-07-04  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1641         Paul Brook  <paul@codesourcery.com>
1642
1643         PR fortran/15280
1644         PR fortran/15665
1645         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_IARGC and
1646         GFC_ISYM_COMMAND_ARGUMENT_COUNT.
1647         * intrinsic.c (add_functions):  Identify iargc.  Add
1648         command_argument_count.
1649         (add_subroutines): Resolve getarg.  Add get_command and
1650         get_command_argument.
1651         * intrinsic.h (gfc_resolve_getarg, gfc_resolve_get_command,
1652         gfc_resolve_get_command_argument): Add prototypes.
1653         * iresolve.c (gfc_resolve_getarg, gfc_resolve_get_command,
1654         gfc_resolve_get_command_argument): New functions.
1655         * trans-decl.c (gfor_fndecl_iargc): New variable.
1656         (gfc_build_intrinsic_function_decls): Set it.
1657         * trans-intrinsic.c (gfc_conv_intrinsic_iargc): New function.
1658         (gfc_conv_intrinsic_function): Use it.
1659         * trans.h (gfor_fndecl_iargc): Declare.
1660
1661 2004-07-04  Matthias Klose  <doko@debian.org>
1662
1663         * Make-lang.in: Generate and install gfortran man page.
1664         * invoke.texi: Remove extra '@c man end'.
1665
1666 2004-07-04  Richard Henderson  <rth@redhat.com>
1667
1668         * f95-lang.c (gfc_mark_addressable): Don't put_var_into_stack.
1669
1670 2004-07-04  Paul Brook  <paul@codesourcery.com>
1671
1672         * decl.c (gfc_match_implicit_range): Don't use typespec.
1673         (gfc_match_implicit): Handle character selectors.
1674         * gfortran.h (gfc_set_implicit): Remove prototype.
1675         (gfc_add_new_implicit_range, gfc_merge_new_implicit): Update.
1676         * parse.c (accept_statement): Don't call gfc_set_implicit.
1677         * symbol.c (new_ts): Remove.
1678         (gfc_set_implicit_none): Use same loop bounds as other functions.
1679         (gfc_set_implicit): Remove.
1680         (gfc_clear_new_implicit, gfc_add_new_implicit_range): Only set flags.
1681         (gfc_merge_new_implicit): Combine with gfc_set_implicit.
1682
1683 2004-06-30  Richard Henderson  <rth@redhat.com>
1684
1685         * match.c (var_element): Remove unused variable.
1686
1687         * trans-decl.c (gfc_generate_function_code): Don't set
1688         x_whole_function_mode_p.
1689         (gfc_generate_constructors): Likewise.
1690
1691 2004-06-30  Richard Henderson  <rth@redhat.com>
1692
1693         * trans-decl.c (gfc_generate_function_code): Don't set
1694         immediate_size_expand.
1695         (gfc_generate_constructors): Likewise.
1696
1697 2004-06-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1698
1699         PR fortran/16161
1700         * decl.c (gfc_match_type_spec): Rename second argument to
1701         'implicit_flag', reverse meaning. Don't match_char_spec if
1702         'implicit_flag' is set. Rename to ...
1703         (match_type_spec): ... this.
1704         (gfc_match_implicit_none, match_implicit_range): Move here
1705         from match.c.
1706         (gfc_match_implicit): Move here from match.c, try to
1707         match_char_len if match_implicit_range doesn't succeed for
1708         CHARACTER implicits. Call renamed fucntion match_type_spec.
1709         (gfc_match_data_decl, match_prefix): Call renamed function
1710         match_type_spec.
1711         * match.c (gfc_match_implicit_none, match_implicit_range,
1712         gfc_match_implicit): Move to decl.c.
1713         * match.h (gfc_match_implicit_none, gfc_match_implicit):
1714         Move protoypes to section 'decl.c'.
1715         (gfc_match_type_spec): Remove prototype.
1716
1717 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1718
1719         * decl.c, interface.c, symbol.c, trans-common.c: Add 2004 to
1720         copyright years.
1721
1722 2004-06-29  Steven Bosscher  <stevenb@suse.de>
1723
1724         Make sure types in assignments are compatible.  Mostly mechanical.
1725         * trans-const.h (gfc_index_one_node): New define.
1726         * trans-array.c (gfc_trans_allocate_array_storage,
1727         gfc_trans_allocate_temp_array, gfc_trans_array_constructor_subarray,
1728         gfc_trans_array_constructor_value, gfc_trans_array_constructor,
1729         gfc_conv_array_ubound, gfc_conv_array_ref,
1730         gfc_trans_scalarized_loop_end, gfc_conv_section_startstride,
1731         gfc_conv_ss_startstride, gfc_conv_loop_setup, gfc_array_init_size,
1732         gfc_trans_array_bounds, gfc_trans_dummy_array_bias,
1733         gfc_conv_expr_descriptor, gfc_trans_deferred_array): Use the correct
1734         types in assignments, conversions and conditionals for expressions.
1735         * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
1736         gfc_conv_unary_op, gfc_conv_cst_int_power, gfc_conv_string_tmp,
1737         gfc_conv_function_call, gfc_trans_pointer_assignment,
1738         gfc_trans_scalar_assign): Likewise.
1739         * trans-intrinsic.c (build_fixbound_expr, gfc_conv_intrinsic_bound,
1740         gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
1741         gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_btest,
1742         gfc_conv_intrinsic_singlebitop, gfc_conv_intrinsic_ishft,
1743         gfc_conv_intrinsic_ishftc, gfc_conv_intrinsic_strcmp,
1744         gfc_conv_allocated, gfc_conv_associated,
1745         gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_trim): Likewise.
1746         * trans-io.c (set_string): Likewise.
1747         * trans-stmt.c (gfc_trans_do, gfc_trans_forall_loop,
1748         gfc_do_allocate, generate_loop_for_temp_to_lhs,
1749         generate_loop_for_rhs_to_temp, compute_inner_temp_size,
1750         compute_overall_iter_number, gfc_trans_assign_need_temp,
1751         gfc_trans_pointer_assign_need_temp, gfc_trans_forall_1,
1752         gfc_evaluate_where_mask, gfc_trans_where_assign,
1753         gfc_trans_where_2): Likewise.
1754         * trans-types.c (gfc_get_character_type, gfc_build_array_type,
1755         gfc_get_nodesc_array_type, gfc_get_array_type_bounds): Likewise.
1756
1757         * trans.c (gfc_add_modify_expr): Add sanity check that types
1758         for the lhs and rhs are the same for scalar assignments.
1759
1760 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1761
1762         * dump-parse-tree.c (show_common): New function.
1763         (gfc_show_namespace): Show commons.
1764
1765 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1766         Andrew Vaught  <andyv@firstinter.net>
1767
1768         PR fortran/13249
1769         PR fortran/15481
1770         * decl.c (gfc_match_save): Adapt to new common structures,
1771         don't allow saving USE-associated common.
1772         * dump-parse-tree (gfc_show_attr): (saved_)common are not
1773         symbol attributes any longer.
1774         (gfc_show_symbol): Don't show old-style commons any longer.
1775         (gfc_show_namespace): Adapt call to gfc_traverse_symtree to new
1776         interface.
1777         * gfortran.h (symbol_attribute): Remove common and saved_common
1778         attributes.
1779         (gfc_symbol): Remove common_head element.
1780         (gfc_common_head): New struct.
1781         (gfc_get_common_head): New macro.
1782         (gfc_symtree): Add field 'common' to union.
1783         (gfc_namespace): Add field 'common_root'; change type of field
1784         'blank_common' to blank_common.
1785         (gfc_add_data): New prototype.
1786         (gfc_traverse_symtree): Expect a symtree as first argument
1787         instead of namespace.
1788         * match.c (gfc_get_common): New function.
1789         (match_common_name): Change to take char * as argument, adapt,
1790         fix bug with empty name.
1791         (gfc_match_common): Adapt to new data structures. Disallow
1792         redeclaration of USE-associated COMMON-block. Fix bug with
1793         empty common.
1794         (var_element): Adapt to new common structures.
1795         * match.h (gfc_get_common): Declare.
1796         * module.c: Add 2004 to copyright years, add commons to module
1797         file layout description.
1798         (ab_attribute, attr_bits, mio_symbol_attributes): Remove code
1799         for removed attributes.
1800         (mio_symbol): Adapt to new way of storing common relations.
1801         (load_commons): New function.
1802         (read_module): Skip common list on first pass, load_commons at
1803         second.
1804         (write_commons): New function.
1805         (write_module): Call write_commons().
1806         * symbol.c (gfc_add_saved_comon, gfc_add_common): Remove
1807         functions related to removed attributes.
1808         (gfc_add_data): New function.
1809         (gfc_clear_attr): Don't set removed attributes.
1810         (gfc_copy_attr): Don't copy removed attributes.
1811         (traverse_symtree): Remove.
1812         (gfc_traverse_symtree): Don't traverse symbol
1813         tree of the passed namespace, but require a symtree to be passed
1814         instead. Unify with traverse_symtree.
1815         (gfc_traverse_ns): Call gfc_traverse_symtree according to new
1816         interface.
1817         (save_symbol): Remove setting of removed attribute.
1818         * trans-common.c (gfc_sym_mangled_common_id): Change to
1819         take 'char *' argument instead of 'gfc_symbol'.
1820         (build_common_decl, new_segment, translate_common): Adapt to new
1821         data structures, add new
1822         argument name.
1823         (create_common): Adapt to new data structures, add new
1824         argument name. Fix typo in intialization of derived types.
1825         (finish_equivalences): Add second argument in call to
1826         create_common.
1827         (named_common): take 'gfc_symtree' instead of 'gfc_symbol'.
1828         (gfc_trans_common): Adapt to new data structures.
1829         * trans-decl.c (gfc_create_module_variables): Remove test for
1830         removed attribute.
1831
1832 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1833
1834         * io.c: Add 2004 to copyright years.
1835
1836 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1837         Andrew Vaught  <andyv@firstinter.net>
1838
1839         * gfortran.h (gfc_gsymbol): New typedef.
1840         (gfc_gsym_root): New variable.
1841         (gfc_get_gsymbol, gfc_find_gsym): New prototypes.
1842         * parse.c (global_used): New function.
1843         (parse_block_data): Check for double empty BLOCK DATA,
1844         use global symbol table.
1845         (parse_module): Use global symbol table.
1846         (add_global_procedure, add_global_program): New functions.
1847         (gfc_parse_file): Use global symbol table.
1848         * symbol.c (gfc_gsym_root): New variable.
1849         (gfc_find_gsym, gsym_compare, gfc_get_gsymbol): New
1850         functions.
1851
1852 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1853
1854         * module.c (mio_gmp_real): Correct writing of negative numbers.
1855
1856 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1857
1858         PR fortran/15963
1859         * expr.c (check_intrinsic_op): Allow comparison of characters.
1860         Make logic easier.
1861
1862 2004-06-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1863         Andrew Vaught  <andyv@firstinter.net>
1864
1865         * decl.c (contained_procedure): New function.
1866         (match_end): Verify correctness of END STATEMENT in
1867         all cases.
1868
1869 2004-06-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1870         Andrew Vaught  <andyv@firstinter.net>
1871
1872         PR fortran/15190
1873         * decl.c (gfc_match_type_spec), io.c (match_io), parse.c
1874         (decode_statement): Enforce required space in free-form.
1875
1876 2004-06-22  Richard Kenner  <kenner@vlsi1.ultra.nyu.edu>
1877
1878         * f95-lang.c (LANG_HOOKS_GIMPLE_BEFORE_INLINING): Deleted.
1879         * trans-array.c (gfc_conv_descriptor_data): Add operand
1880         for COMPONENT_REF.
1881         (gfc_conv_descriptor_offset, gfc_conv_descriptor_dtype): Likewise.
1882         (gfc_conv_descriptor_dimension, gfc_conv_descriptor_stride): Likewise.
1883         (gfc_conv_descriptor_lbound, gfc_conv_descriptor_ubound): Likewise.
1884         * trans-common.c (create_common): Likewise.
1885         * trans-expr.c (gfc_conv_component_ref): Likewise.
1886         * trans-io.c (set_parameter_value): Likewise.
1887         (set_parameter_ref, set_string, set_flag, io_result): Likewise.
1888         (transfer_expr): Likewise.
1889         * trans-decl.c (gfc_trans_auto_character_variable):
1890         Set up to get DECL_SIZE and DECL_SIZE_UNIT gimplified.
1891         (gfc_gimplify_function): New function.
1892         (gfc_generate_function-code): Properly handle nested functions.
1893         * trans.c (gfc_build_array_ref): Add two new operands for ARRAY_REF.
1894
1895 2004-06-22  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1896
1897         PR fortran/15750
1898         * io.c (gfc_match_inquire): Bugfix for iolength related stuff.
1899         (gfc_resolve_inquire): Resolve the iolength tag.  Return
1900         SUCCESS at end of function if no failure has occured.
1901         * resolve.c (resolve_code): Resolve if iolength is encountered.
1902         * trans-io.c: (ioparm_iolength, iocall_iolength,
1903         iocall_iolength_done): New variables.
1904         (last_dt): Add IOLENGTH.
1905         (gfc_build_io_library_fndecls ): Set iolength related variables.
1906         (gfc_trans_iolength): Implement.
1907         (gfc_trans_dt_end): Treat iolength as a third form of data transfer.
1908
1909 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de
1910
1911         PR fortran/15511
1912         * scanner.c (load_line): Don't truncate preprocessor lines.
1913         Reformat error message.
1914         (preprocessor_line): Issue warning in case of malformed
1915         preprocessor line.
1916
1917 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1918
1919         * resolve.c (resolve_symbol): Add comment in function body.
1920         (check_data_variable): Change type of mark to ar_type, adapt code
1921         accordingly.
1922
1923 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1924
1925         * array.c (gfc_insert_constructor): Avoid redundant call to
1926         mpz_comp. Add 2004 to copyright years.
1927
1928 2004-06-21  Joseph S. Myers  <jsm@polyomino.org.uk>
1929
1930         * trans.h (stmtblock_t): Change has_scope to unsigned int.
1931
1932 2004-06-20  Steven G. Kargl  <kargls@comcast.net>
1933
1934         * arith.c (gfc_range_check): correct complex underflow.
1935
1936 2004-06-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1937
1938         PR fortran/15962
1939         * match.c (match_case_selector): Call gfc_match_init_expr
1940         instead of gfc_match_expr.
1941         * resolve.c (validate_case_label_expr): No need to check for
1942         constant, since it wouldn't have been matched with the fix to
1943         match.c.
1944
1945 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1946
1947         PR fortran/15211
1948         * trans-intrinsic.c (gfc_conv_intrinsic_len): Deal with arrays
1949         of strings.
1950
1951 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1952
1953         PR fortran/15510
1954         * trans-deecl.c (generate_local_decl): Do not issue warning for
1955         unused variables if they're use associated.
1956
1957 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1958         Andrew Vaught <andyv@firstinter.net>
1959
1960         PR fortran/14928
1961         * gfortran.h (gfc_check_f): Add new field f3ml.
1962         * check.c (gfc_check_minloc_maxloc): Take argument list instead
1963         of individual arguments, reorder if necessary.
1964         * intrinsic.h (gfc_check_minloc_maxloc): ... adapt prototype.
1965         * intrinsic.c (add_sym_3ml): New function.
1966         (add_functions): Change to add_sym_3ml for MINLOC, MAXLOC.
1967         (check_specific): Catch special case MINLOC, MAXLOC.
1968
1969 2004-06-14  Paul Brook  <paul@codesourcery.com>
1970
1971         * intrinsic.c (add_sym_2s): Use correct function types.
1972
1973 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1974
1975         * Make-lang.in (F95_OBJS, F95_PARSER_OBJS): Alphabetize.  Move data.c
1976         * data.c (gfc_get_section_index):  Remove dependency on trans.h.
1977
1978 2004-06-12  Steven G. Kargl  <kargls@comcast.net>
1979
1980         * check.c (gfc_check_second_sub, gfc_check_irand, gfc_check_rand
1981         gfc_check_srand, gfc_check_etime, gfc_check_etime_sub): New functions.
1982         * gfortran.h (gfc_generic_isym_id): New symbols GFC_ISYM_ETIME,
1983         GFC_ISYM_IRAND, GFC_ISYM_RAND, GFC_ISYM_SECOND.
1984         * trans-intrinsic.c:  Use symbols.
1985         * intrinsic.c (add_sym_2s): New function.
1986         * intrinsic.c: Add etime, dtime, irand, rand, second, srand.
1987         * intrinsic.h: Function prototypes.
1988         * iresolve.c (gfc_resolve_etime_sub, gfc_resolve_second_sub
1989         gfc_resolve_srand):  New functions.
1990
1991 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1992
1993         PR fortran/14957
1994         * decl.c (gfc_match_end): Require END {SUBROUTINE|FUNCTION} for
1995         contained procedure.
1996
1997 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1998
1999         PR fortran/12841
2000         * interface.c (compare_parameter, compare_actual_formal): Don't
2001         check types and array shapes for NULL()
2002         * trans-expr.c (conv_function_call): No double indirection for
2003         NULL()
2004
2005 2004-06-09  Toon Moene  <toon@moene.indiv.nluug.nl>
2006
2007         * trans-expr.c (gfc_conv_cst_int_power): Compute
2008         x**(-n) by converting it to (1/x)**n instead of
2009         1/x**n.
2010
2011 2004-06-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2012
2013         PR fortran/13372
2014         * module.c (write_symbol, write_symtree): Don't write symbols
2015         wrongly added to namespace.
2016         * trans-decl.c (gfc_create_module_variable): Don't create a
2017         backend decl for a symbol incorrectly added to namespace.
2018
2019 2004-06-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2020
2021         PR fortran/13201
2022         * resolve.c (resolve_symbol): Verify that parameter array has an
2023         explicit shape. Fix typos and coding style issues in surrounding
2024         lines.
2025
2026 2004-06-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2027
2028         PR fortran/15478
2029         * gfortran.texi: The documentation doesn't contain infomration on
2030         how to report bugs, and shouldn't, so remove the line which
2031         says it does.
2032
2033 2004-06-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2034
2035         * intrinsic.c (sort_actual): Keep track of type of missing
2036         arguments. (Missing from previous commit.)
2037
2038 2004-06-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2039
2040         * gfortran.h (gfc_actual_arglist): New field missing_arg_type.
2041         * interface.c (compare_actual_formal): Keep type of omitted
2042         optional arguments.
2043         * trans-expr.c (gfc_conv_function_call): Add string length
2044         argument for omitted string argument.
2045
2046 2004-06-03  Paul Brook  <paul@codesourcery.com>
2047
2048         * trans.c (gfc_finish_block, gfc_add_expr_to_block): Build statement
2049         lists instead of compound expr chains.
2050         (gfc_trans_code): Annotate statement lists.
2051
2052 2004-06-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2053
2054         * trans-array.c: Fix spelling in comments.
2055
2056 2004-06-02  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2057
2058         PR fortran/15557
2059         * data.c (assign_substring_data_value): New function.
2060         (gfc_assign_data_value): Call the new function if we're dealing
2061         with a substring LHS.
2062
2063 2004-06-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2064
2065         PR fortran/15477
2066         * gfortran.h (GFC_VERSION): Remove.
2067         * gfortran.texi (version-gfortran): Remove, replace by version-GCC
2068         where used.
2069
2070 2004-05-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2071
2072         * trans-types.c: Fix spelling & layout in comments.
2073
2074 2004-05-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2075
2076         PR fortran/14067
2077         * trans-const.c (gfc_conv_string_init): Allow variable string
2078         length lower than initialization string length.
2079
2080 2004-05-30  Paul Brook  <paul@codesourcery.com>
2081
2082         PR fortran/15620
2083         * trans-decl.c (gfc_shadow_sym, gfc_restore_sym): New functions.
2084         * trans-expr.c (gfc_trans_string_copy): New function.
2085         (gfc_conv_statement_function): Use them.  Create temp vars.  Enforce
2086         character lengths.
2087         (gfc_conv_string_parameter): Use gfc_trans_string_copy.
2088         * trans-stmt.c (gfc_trans_forall_1): Use gfc_{shadow,restore}_sym.
2089         * trans.h (struct gfc_saved_var): Define.
2090         (gfc_shadow_sym, gfc_restore_sym): Add prototypes.
2091
2092 2004-05-30  Steven G. Kargl  <kargls@comcast.net>
2093
2094         * iresolve.c (gfc_resolve_random_number): Clean up conditional.
2095
2096 2004-05-29  Steven G. Kargl  <kargls@comcast.net>
2097
2098         * simplify.c (gfc_simplify_log): Remove useless line of code.
2099
2100 2004-05-29  Paul Brook  <paul@codesourcery.com>
2101
2102         * trans-common.c (find_equivalence): Find multiple rules.
2103
2104 2004-05-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2105
2106         * gfortran.h (gfc_current_locus, gfc_set_locus): Remove.
2107         (gfc_current_locus): Declare new global variable.
2108         * scanner.c (gfc_current_locus, gfc_set_locus): Remove.
2109         (gfc_current_locus1): Rename ...
2110         (gfc_current_locus): ... to this.
2111         (gfc_at_eof, gfc_at_bol, gfc_at_eol, gfc_advance_line, next_char,
2112         skip_fixed_comments, skip_free_comments, gfc_next_char_literal,
2113         gfc_peek_char, gfc_gobble_whitespace, gfc_new_file): Use
2114         gfc_current_locus instead of gfc_current_locus1, gfc_set_locus()
2115         and gfc_current_locus(), respectively.
2116         * array.c (match_subscript, gfc_match_array_ref, match_array_list,
2117         match_array_cons_element, gfc_match_array_constructor):
2118         Read/modify gfc_current_locus instead of calling gfc_set_locus()
2119         and gfc_current_locus().
2120         * decl.c (gfc_match_null, variable_decl, gfc_match_kind_spec,
2121         match_attr_spec, gfc_match_function_decl, gfc_match_end,
2122         attr_decl1, gfc_match_save): Likewise.
2123         * error.c (error_print, gfc_internal_error): Likewise.
2124         * expr.c (gfc_int_expr, gfc_default_logical_kind): Likewise.
2125         * interface.c (gfc_add_interface): Likewise.
2126         * io.c (gfc_match_format, match_dt_format, match_dt_element,
2127         match_io_iterator, match_io): Likewise.
2128         * match.c (gfc_match_space, gfc_match_eos,
2129         gfc_match_small_literal_int, gfc_match_st_label,
2130         gfc_match_strings, gfc_match_name, gfc_match_iterator,
2131         gfc_match_char, gfc_match, gfc_match_assignment,
2132         gfc_match_pointer_assignment, gfc_match_if, gfc_match_do,
2133         gfc_match_nullify, gfc_match_call, match_implicit_range,
2134         gfc_match_implicit, gfc_match_data, match_case_selector,
2135         gfc_match_case, match_forall_iterator): Likewise.
2136         * matchexp.c (gfc_match_defined_op_name, next_operator,
2137         match_level_1, match_mult_operand, match_ext_mult_operand,
2138         match_add_operand, match_ext_add_operand, match_level_2,
2139         match_level_3, match_level_4, match_and_operand, match_or_operand,
2140         match_equiv_operand, match_level_5, gfc_match_expr): Likewise.
2141         * module.c (gfc_match_use, mio_array_ref, mio_expr): Likewise.
2142         * parse.c (match_word, decode_statement, next_free, next_fixed,
2143         add_statement, verify_st_order, parse_if_block, gfc_parse_file):
2144         Likewise.
2145         * primary.c (match_digits, match_integer_constant,
2146         match_boz_constant, match_real_constant, match_substring,
2147         next_string_char, match_charkind_name, match_string_constant,
2148         match_logical_constant, match_const_complex_part,
2149         match_complex_constant, match_actual_arg, match_keyword_arg,
2150         gfc_match_actual_arglist, gfc_match_structure_constructor,
2151         gfc_match_rvalue, gfc_match_variable): Likewise.
2152         * st.c (gfc_get_code): Likewise.
2153         * symbol.c (check_conflict, check_used, check_done,
2154         duplicate_attr, add_flavor, gfc_add_procedure, gfc_add_intent,
2155         gfc_add_access, gfc_add_explicit_interface, gfc_add_type,
2156         gfc_add_component, gfc_reference_st_label, gfc_new_symbol): Likewise.
2157
2158 2004-05-26  Roger Sayle  <roger@eyesopen.com>
2159
2160         * io.c (format_asterisk): Silence compiler warnings by correcting
2161         the number of elements of a "locus" initializer.
2162
2163 2004-05-25  Roger Sayle  <roger@eyesopen.com>
2164
2165         PR fortran/13912
2166         * matchexp.c: Allow unary operators after arithmetic operators
2167         as a GNU extension.
2168         (match_ext_mult_operand, match_ext_add_operand): New functions.
2169         (match_mult_operand): Tweak to call match_ext_mult_operand.
2170         (match_add_operand): Tweak to call match_ext_mult_operand.
2171         (match_level_2): Rearrange to call match_ext_add_operand.
2172
2173 2004-05-25  Paul Brook  <paul@codesourcery.com>
2174
2175         * expr.c (check_inquiry): Remove bogus tests.
2176
2177 2004-05-23  Paul Brook  <paul@codesourcery.com>
2178
2179         PR fortran/13773
2180         * expr.c (restricted_args): Remove redundant checks/argument.
2181         (external_spec_function): Update to match.
2182         (restricted_intrinsic): Rewrite.
2183
2184 2004-05-23  Paul Brook  <paul@codesourcery.com>
2185         Victor Leikehman  <lei@haifasphere.co.il>
2186
2187         * gfortran.h (struct gfc_symbol): Add equiv_built.
2188         * trans-common.c: Change int to HOST_WIDE_INT.  Capitalize error
2189         messages.
2190         (current_length): Remove.
2191         (add_segments): New function.
2192         (build_equiv_decl): Create initialized common blocks.
2193         (build_common_decl): Always add decl to bindings.
2194         (create_common): Create initializers.
2195         (find_segment_info): Reformat to match coding conventions.
2196         (new_condition): Use add_segments.
2197         (add_condition, find_equivalence, add_equivalences): Move iteration
2198         inside functions.  Only process each segment once.
2199         (new_segment, finish_equivalences, translate_common): Simplify.
2200
2201 2004-05-23  Steven G. Kargl  <kargls@comcast.net>
2202
2203         * check.c (gfc_check_random_seed): Issue for too many arguments.
2204
2205 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2206
2207         * intrinsic.c (add_subroutines): Use add_sym_3s for random_seed.
2208
2209 2004-05-22  Paul Brook  <paul@codesourcery.com>
2210
2211         * dump-parse-tree.c (gfc_show_equiv): New function.
2212         (gfc_show_namespace): Use it.
2213
2214 2004-05-22  Victor Leikehman  <lei@haifasphere.co.il>
2215
2216         PR fortran/13249
2217         * symbol.c (gfc_add_common): Disable checks to work around other more
2218         fundamental inadequacies.
2219
2220 2004-05-22  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2221
2222         * trans-decl.c (gfc_get_extern_function_decl): Set DECL_IS_PURE
2223         only for functions.
2224         (gfc_build_function_decl): Likewise.
2225
2226 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2227
2228         * check.c (gfc_check_system_clock): New function.
2229         * intrinsic.c (add_sym_3s): New function.
2230         (add_subroutines): Use it.
2231         * intrinsic.h (gfc_check_system_clock, gfc_resolve_system_clock):
2232         Add prototypes.
2233         * iresolve.c (gfc_resolve_system_clock): New function.
2234
2235 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2236
2237         * invoke.texi: Document -Wunderflow and spell check.
2238         * lang.opt: Add Wunderflow.
2239         * gfortran.h (gfc_option_t): Add warn_underflow option.
2240         * options.c (gfc_init_options, set_Wall): Use it.
2241         * primary.c (match_real_constant): Explicitly handle UNDERFLOW.
2242         * arith.c (gfc_arith_uminus, gfc_arith_plus, gfc_arith_minus,
2243         gfc_arith_times, gfc_arith_divide, gfc_arith_power, gfc_real2real,
2244         gfc_real2complex, gfc_complex2real, gfc_complex2complex): Ditto.
2245         * arith.c (common_logarithm): Fix typo in comment.
2246
2247 2004-05-21  Roger Sayle  <roger@eyesopen.com>
2248
2249         * io.c (check_format): As a GNU extension, allow the comma after a
2250         string literal to be optional in a format.  Use gfc_notify_std to
2251         issue an error/warning as appropriate.
2252
2253 2004-05-21  Roger Sayle  <roger@eyesopen.com>
2254
2255         * io.c (check_format): Use gfc_notify_std to determine whether to
2256         issue an error/warning for omitting the digits from the X format.
2257
2258 2004-05-20  Roger Sayle  <roger@eyesopen.com>
2259
2260         * io.c (check_format): Allow the number before the X format to
2261         be optional when not -pedantic.
2262
2263 2004-05-18  Feng Wang  <fengwang@nudt.edu.cn>
2264         Paul Brook  <paul@codesourcery.com>
2265
2266         * f95-lang.c (gfc_init_builtin_functions): Use vold_list_node.
2267         Create decls for __builtin_pow{,f}.
2268         * gfortran.h (PREFIX_LEN): Define.
2269         * trans-decl.c (gfor_fndecl_math_powi): Add.
2270         (gfor_fndecl_math_powf, gfor_fndecl_math_pow): Remove.
2271         (gfc_build_intrinsic_function_decls): Create decls for powi.
2272         * trans-expr.c (powi_table): Add.
2273         (gfc_conv_integer_power): Remove.
2274         (gfc_conv_powi): New function.
2275         (gfc_conv_cst_int_power): New function.
2276         (gfc_conv_power_op): Use new powi routines.
2277         * trans.h (struct gfc_powdecl_list): Add.
2278         (gfor_fndecl_math_powi): Add.
2279         (gfor_fndecl_math_powf, gfor_fndecl_math_pow): Remove.
2280
2281 2004-05-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2282
2283         * trans.c, trans-decl.c: Fix comment typos.
2284
2285 2004-05-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2286
2287         * trans-const.c (gfc_conv_mpf_to_tree): Fix typo.
2288
2289 2004-05-18  Steve Kargl  <kargls@comcast.net>
2290
2291         * arith.c (gfc_int2complex): Fix incorrect range checking.
2292
2293 2004-05-18  Paul Brook  <paul@codesourcery.com>
2294
2295         PR fortran/13930
2296         * decl.c (add_init_expr_to_sym): Remove incorrect check.
2297         (default_initializer): Move to expr.c.
2298         (variable_decl): Don't assign default initializer to variables.
2299         * expr.c (gfc_default_initializer): Move to here.
2300         * gfortran.h (gfc_default_initializer): Add prototype.
2301         * resolve.c (resolve_symbol): Check for illegal initializers.
2302         Assign default initializer.
2303
2304 2004-05-17  Steve Kargl  <kargls@comcast.net>
2305
2306         * arith.c (gfc_arith_power): Complex number raised to 0 power is 1.
2307
2308 2004-05-17  Steve Kargl  <kargls@comcast.net>
2309
2310         * arith.c (gfc_real2complex): Range checking wrong part of complex
2311         number.
2312
2313 2004-05-16  Paul Brook  <paul@codesourcery.com>
2314
2315         * options.c (gfc_handle_module_path_options): Fix buffer overrun.
2316
2317 2004-05-16  Paul Brook  <paul@codesourcery.com>
2318
2319         * arith.c (gfc_range_check): Fix logic error.
2320
2321 2004-05-16  Steve Kargl  <sgk@troutmask.apl.washington.edu>
2322
2323         * arith.c: Fix comment typos.
2324
2325 2004-05-15  Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2326
2327         PR fortran/13742
2328         * decl.c (add_init_expr_to_sym): Verify that COMMON variable is
2329         not initialized in a disallowed fashion.
2330         * match.c (gfc_match_common): Likewise.
2331         (var_element): Verify that variable is not in the blank COMMON,
2332         if it is in a common.
2333
2334 2004-05-15  Joseph S. Myers  <jsm@polyomino.org.uk>
2335
2336         * Make-lang.in (f95.generated-manpages): Remove.
2337         (f95.srcextra): New.
2338         (f95.info, fortran/gfortran.info, fortran/gfortran.dvi,
2339         f95.maintainer-clean): Generate info and dvi files in objdir/doc.
2340         (f95.dvi): Remove.
2341         (dvi): New.
2342         (f95.install-info): Remove.
2343         (install-info): New.
2344
2345 2004-05-15  Victor Leikehman  <lei@haifasphere.co.il>
2346
2347         * decl.c (add_init_expr_to_sym): Check for variable size arrays.
2348
2349 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2350
2351         * primary.c (match_boz_constant): Use gfc_notify_std() for
2352         issuing a warning or an error.
2353
2354 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2355
2356         PR fortran/13826
2357         * primary.c (match_structure_constructor): Rename ...
2358         (gfc_match_structure_constructor): ... to this. Make non-static.
2359         (gfc_match_rvalue): Call renamed function.
2360         * match.h (gfc_match_structure_constructor): Declare.
2361         * match.c (gfc_match_data_constant): Handle structure
2362         constructor.
2363
2364 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2365
2366         PR fortran/13702
2367         (Port from g95)
2368         * gfortran.h (gfc_linebuf): New typedef.
2369         (linebuf): Remove.
2370         (gfc_file): Revamped, use new gfc_linebuf.
2371         (locus): Revamped, use new types.
2372         (gfc_current_file): Remove.
2373         (gfc_current_form, gfc_source_file): New global variables.
2374         * match.c (gfc_match_space, gfc_match_strings): Use
2375         gfc_current_form to find source form.
2376         * module.c (gfc_dump_module): Use gfc_source_file when printing
2377         module header.
2378         * error.c (show_locus, show_loci) Use new data structures to print
2379         locus.
2380         * scanner.c (first_file, first_duplicated_file, gfc_current_file):
2381         Remove.
2382         (file_head, current_file, gfc_current_form, line_head, line_tail,
2383         gfc_current_locus1, gfc_source_file): New global variables.
2384         (gfc_scanner_init1): Set new global variables.
2385         (gfc_scanner_done1): Free new data structures.
2386         (gfc_current_locus): Return pointer to gfc_current_locus1.
2387         (gfc_set_locus): Set gfc_current_locus1.
2388         (gfc_at_eof): Set new variables.
2389         (gfc_at_bol, gfc_at_eol, gfc_advance_line, gfc_next_char): Adapt
2390         to new locus structure.
2391         (gfc_check_include): Remove.
2392         (skip_free_comments, skip_fixed_comments): Use gfc_current_locus1.
2393         (gfc_skip_comments): Use gfc_current_form, find locus with
2394         gfc_current_locus1.
2395         (gfc_next_char): Use gfc_current_form.
2396         (gfc_peek_char, gfc_gobble_whitespace): Use gfc_current_locus1.
2397         (load_line): Use gfc_current_form. Recognize ^Z as EOF. Fix
2398         comment formatting.
2399         (get_file): New function.
2400         (preprocessor_line, include_line): New functions.
2401         (load_file): Move down, rewrite to match new data structures.
2402         (gfc_new_file): Rewrite to match new data structures.
2403         * parse.c (next_statement): Remove code which is now useless. Use
2404         gfc_source_form and gfc_source_file where appropriate.
2405         * trans-decl.c (gfc_get_label_decl): adapt to new data structures
2406         when determining locus of frontend code.
2407         * trans-io.c (set_error_locus): Same.
2408         * trans.c (gfc_get_backend_locus, gfc_set_backend_locus): Likewise.
2409         * lang-specs.h (@f77-cpp-input, @f95-cpp-input): Remove '-P' from
2410         preprocessor flags.
2411         (all): Add missing initializers.
2412
2413 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2414
2415         * Make-lang.in (trans-common.o): Remove redundant dependency.
2416         (data.c): Replace object file name ...
2417         (data.o): ... by the correct one.
2418
2419 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2420
2421         * dump-parse-tree.c (gfc_show_array_ref): Print colon only
2422         for ranges when dumping array references.
2423
2424 2004-05-14  Victor Leikehman  <lei@haifasphere.co.il>
2425
2426         * decl.c (variable_decl): Always apply default initializer.
2427
2428 2004-05-08  Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2429
2430         PR fortran/15206
2431         * trans-intrinsic.c (gfc_conv_intrinsic_rrspacing): Fixed to
2432         handle zero correctly.
2433
2434 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2435
2436         * match.c (gfc_match): Eliminate dead code.
2437
2438 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2439
2440         * parse.c (gfc_statement_next_fixed): (Change from Andy's tree)
2441         Detect bad continuation line in fixed form sources.
2442
2443 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2444
2445         PR fortran/15205
2446         * iresolve.c (gfc_resolve_nearest): Add new function.
2447         * intrinsic.h: ... declare it here.
2448         * intrinsic.c (add_functions): ... add it as resolving function
2449         for NEAREST.
2450
2451 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2452
2453         PR fortran/14066
2454         * match.c (gfc_match_do): Allow infinite loops with
2455         label-do-stmt. Do not enforce space after comma.
2456
2457 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2458
2459         PR fortran/15051
2460         * parse.c (parse_interface): Allow empty INTERFACE, remove
2461         seen_body.
2462
2463 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2464
2465         * Make-lang.in, arith.c, arith.h, array.c, bbt.c, check.c,
2466         decl.c, dependency.c, dependency.h, dump-parse-tree.c, error.c,
2467         expr.c, f95-lang.c, gfortran.h, interface.c, intrinsic.c,
2468         intrinsic.h, io.c, iresolve.c, lang-specs.h, match.c, match.h,
2469         matchexp.c, misc.c, module.c, options.c, parse.c, parse.h,
2470         primary.c, resolve.c, scanner.c, simplify.c, st.c, symbol.c,
2471         trans-array.c, trans-array.h, trans-common.c, trans-const.c,
2472         trans-const.h, trans-decl.c, trans-expr.c, trans-intrinsic.c,
2473         trans-io.c, trans-stmt.c, trans-stmt.h, trans-types.c,
2474         trans-types.h, trans.c, trans.h: Update copyright years and
2475         boilerplate.
2476         * data.c: Likewise, also removed two whitespace-only lines.
2477         * gfortranspec.c, lang.opt: Update copyright years.
2478
2479 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2480
2481         PR fortran/14568
2482         * trans-decl.c (generate_local_decl): Don't warn for unused
2483         variables which are in common blocks.
2484
2485 2004-05-13  Diego Novillo  <dnovillo@redhat.com>
2486
2487         * Make-lang.in, f95-lang.c, trans-array.c, trans-decl.c,
2488         trans-expr.c, trans-intrinsic.c, trans-io.c, trans-stmt.c,
2489         trans.c: Rename tree-simple.[ch] to tree-gimple.[ch].
2490
2491 2004-05-13  Victor Leikehman  <lei@haifasphere.co.il>
2492
2493         PR fortran/15314
2494         * trans-expr.c (gfc_conv_structure): Use field type, not expr type.
2495
2496 2004-05-13  Joseph S. Myers  <jsm@polyomino.org.uk>
2497
2498         * gfortran.texi: Use @table @emph instead of @itemize @emph.
2499         Remove "set DEVELOPMENT".
2500         (Compiling GFORTRAN): Remove.
2501
2502 2004-05-09  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2503
2504         * array.c (match_subscript, match_array_ref): Add comments
2505         explaining argument 'init'.
2506         * decl.c, f95-lang.c, match.c, resolve.c, trans-array.c,
2507         trans-expr.c, trans.c: Fix some typos in comments.
2508         * dump-parse-tree.c (gfc_show_expr): Remove wrong comment.
2509         * primary.c (match_digits, match_integer_constant): Add comment
2510         explaining signflag.
2511
2512 2004-05-01  Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2513
2514         PR fortran/13940
2515         * primary.c: Include system.h and flags.h, needed for pedantic.
2516         (match_boz_constant): Allow "x" for hexadecimal constants, warn if
2517         pedantic is set.
2518
2519 2004-05-01  Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2520
2521         PR fortran/13940
2522         * match.c (match_data_constant): Handle case where
2523         gfc_find_symbol sets sym to NULL
2524
2525 2004-04-28  Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2526
2527         * Make-lang.in (f95-lang.o, trans-intrinsic.o): Add missing
2528         dependency on mathbuiltins.def
2529
2530 2004-04-24  Victor Leikehman  <lei@il.ibm.com>
2531
2532         * trans-io.c (transfer_expr): Implemented recursive printing
2533         of derived types.
2534
2535 2004-04-24  Andrew Pinski  <pinskia@physics.uc.edu>
2536
2537         * gfortranspec.c: Do not include multilib.h.
2538
2539 2004-04-24  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2540
2541         * trans-intrinsic.c: Fix comment, this is not trans-expr.c. Add
2542         2004 to copyright years.
2543         * trans-expr.c, trans-decl.c: Comment update, we now generate
2544         GENERIC, not SIMPLE. Add 2004 to copyright years.
2545
2546 2004-04-24  Paul Brook  <paul@codesourcery.com>
2547
2548         * Make-lang.in (gfortranspec.o): Add dependency on $(TM_H).
2549
2550 2004-04-24  Feng Wang  <fengwang@nudt.edu.cn>
2551
2552         PR 14817
2553         * arith.c (gfc_arith_divide): Fix complex divide.
2554
2555 2004-04-23  Andrew Pinski  <pinskia@physics.uc.edu>
2556
2557         * gfortranspec.c: Include the target headers.
2558
2559 2004-04-18  Feng Wang  <fengwang@nudt.edu.cn>
2560
2561         PR fortran/14921
2562         PR fortran/14540
2563         * arith.c (arctangent2): New function.
2564         * arith.h (arctangent2): Add function prototype.
2565         * simplify.c (gfc_simplify_atan2): Use it.
2566         (gfc_simplify_log): Use it.
2567
2568 2004-04-12  Diego Novillo  <dnovillo@redhat.com>
2569
2570         * fortran/f95-lang.c (gfc_expand_stmt): Remove.
2571         (LANG_HOOKS_RTL_EXPAND_STMT): Remove.
2572
2573 2004-04-11  Bud Davis  <bdavis9659@comcast.net>
2574
2575         PR fortran/14872
2576         * trans-io.c (build_dt): Change REC to value.
2577
2578 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2579
2580         PR 14394
2581         * trans-const.c (gfc_conv_mpf_to_tree): Loosen the maximum digits of
2582         the real value when converting mpf to string.
2583
2584 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2585
2586         PR 14395
2587         * trans-intrinsic.c (gfc_conv_intrinsic_cmplx): Fix the imag part of
2588         the result.
2589
2590 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2591
2592         PR fortran/14377
2593         * simplify.c (simplify_min_max): Convert the type of the result.
2594
2595 2004-04-11  Paul Brook  <paul@codesourcery.com>
2596
2597         * gfortran.texi: Use full target triplet.
2598
2599 2004-04-11  Paul Brook  <paul@codesourcery.com>
2600
2601         * Make-lang.in (GFORTRAN_TEXI): Set it.
2602         (fortran/dfortran.dvi): Use it.  Add fortran to include paths.
2603         (fortran/gfortran.info): Ditto.
2604         * gfortran.texi: Major update.
2605         * invoke.texi: New file.
2606
2607 2004-04-10  Paul Brook  <paul@codesourcery.com>
2608
2609         * trans-array.c (gfc_trans_allocate_temp_array,
2610         gfc_conv_tmp_array_ref): Don't use GFC_DECL_STRING.
2611         * trans-decl.c (gfc_build_dummy_array_decl,
2612         gfc_get_symbol_decl, gfc_build_function_decl,
2613         gfc_create_module_variable): Ditto.
2614         * trans-expr.c (gfc_conv_variable): Ditto.
2615         * trans-intrinsic.c (gfc_conv_intrinsic_len): Ditto.
2616         * trans.h (GFC_DECL_STRING): Remove.
2617         (GFC_DECL_PACKED_ARRAY, GFC_DECL_PARTIAL_PACKED_ARRAY,
2618         GFC_DECL_ASSIGN): Renumber flags.
2619
2620 2004-04-05  Paul Brook  <paul@codesourcery.com>
2621
2622         PR 13252
2623         PR 14081
2624         * f95-lang.c (gfc_init_builtin_functions): Add stack_alloc, stack_save
2625         and stack_restore.
2626         * gfortran.h (struct gfc_charlen): Add backend_decl.
2627         * trans-array.c (gfc_trans_allocate_temp_array,
2628         gfc_conv_temp_array_ref, gfc_conv_resolve_dependencies,
2629         (gfc_conv_loop_setup, gfc_array_allocate, gfc_conv_array_init_size):
2630         Remove old, broken string handling.
2631         (gfc_trans_auto_array_allocation, gfc_trans_g77_array,
2632         gfc_trans_dummy_array_bias, gfc_conv_expr_descriptor,
2633         gfc_trans_deferred_array): Handle character arrays.
2634         * trans-const.c (gfc_conv_const_charlen): New function.
2635         * trans-const.h (gfc_conv_const_charlen): Add prototype.
2636         * trans-decl.c (gfc_finish_var_decl): Don't mark automatic variables
2637         as static.
2638         (gfc_build_dummy_array_decl): Handle arrays with unknown element size.
2639         (gfc_create_string_length): New function.
2640         (gfc_get_symbol_decl): Create lengths for character variables.
2641         (gfc_get_fake_result_decl): Ditto.
2642         (gfc_build_function_decl): Only set length for assumed length
2643         character arguments.
2644         (gfc_trans_dummy_character): New function.
2645         (gfc_trans_auto_character_variable): Rewrite.
2646         (gfc_trans_deferred_vars): Handle more types of character variable.
2647         (gfc_create_module_variable): String lengths have moved.
2648         (gfc_generate_function_code): Initialize deferred var chain earlier.
2649         * trans-expr.c (gfc_conv_init_string_length): Rename ...
2650         (gfc_trans_init_string_length):  ... to this.
2651         (gfc_conv_component_ref, gfc_conv_variable, gfc_conv_concat_op,
2652         gfc_conv_function_call): Update to new format for character variables.
2653         (gfc_conv_string_length): Remove.
2654         (gfc_conv_string_parameter): Update assertion.
2655         * trans-intrinsic.c (gfc_conv_intrinsic_len): Use new location.
2656         * trans-io.c (set_string): Use new macro names.
2657         * trans-stmt.c (gfc_trans_label_assign. gfc_trans_goto): Ditto.
2658         * trans-types.c (gfc_get_character_type): Use existing length expr.
2659         (gfc_is_nodesc_array): Make public.
2660         (gfc_get_dtype_cst): Rename ...
2661         (gfc_get_dtype): ... to this.  Handle unknown size arrays.
2662         (gfc_get_nodesc_array_type): Use new name.
2663         (gfc_sym_type): New character variable code.
2664         (gfc_get_derived_type): Ditto.
2665         (gfc_get_function_type): Evaluate character variable lengths.
2666         * trans-types.h (gfc_strlen_kind): Define.
2667         (gfc_is_nodesc_array): Add prototype.
2668         * trans.h: Update prototypes.
2669         (struct lang_type): Update comments.
2670         (GFC_DECL_STRING_LEN): New name for GFC_DECL_STRING_LENGTH.
2671         (GFC_KNOWN_SIZE_STRING_TYPE): Remove.
2672
2673 2004-04-04  Paul Brook  <paul@codesourcery.com>
2674
2675         * gfortran.h (struct gfc_option_t): Remove flag_g77_calls.
2676         * options.c (gfc_init.options, gfc_handle_option): Ditto.
2677         * trans-expr.c (gfc_conv_function_call): Ditto.
2678         * trans-types.c (gfc_is_nodesc_array): Ditto
2679         * lang.opt (fg77-calls): Remove.
2680
2681 2004-04-04  Paul Brook  <paul@codesourcery.com>
2682
2683         * trans-array.c (OFFSET_FIELD): Rename from BASE_FIELD.
2684         (gfc_conv_descriptor_base): Rename ...
2685         (gfc_conv_descriptor_offset): ... to this.
2686         (gfc_trans_allocate_array_storage): Set offset to zero.
2687         (gfc_conv_array_base): Rename ...
2688         (gfc_conv_array_offset): ... to this.
2689         (gfc_conv_array_index_ref): Add offset parameter.
2690         (gfc_conv_array_ref): Include offset.
2691         (gfc_trans_preloop_setup): Use existing offset.
2692         (gfc_trans_allocate_temp_array,  gfc_array_allocate,
2693         gfc_trans_auto_array_allocation, gfc_trans_g77_array,
2694         gfc_trans_dummy_array_bias, gfc_conv_expr_descriptor,
2695         gfc_conf_ss_descriptor): Set offset.
2696         * trans-array.h: Rename prototypes.
2697         * trans-const.h (gfc_index_zero_node): Define.
2698         * trans-decl.c (gfc_build_qualified_array): Change base to offset.
2699         * trans-types.c (gfc_get_array_type_bounds): Ditto.
2700         (gfc_get_nodesc_array_type): Calculate offset before upper bound.
2701
2702 2004-03-25  Diego Novillo  <dnovillo@redhat.com>
2703
2704         * convert.c (convert): Don't handle WITH_RECORD_EXPR.
2705
2706 2004-03-24  Bud Davis  <bdavis9659@comcast.net>
2707
2708         PR 14055
2709         * arith.c (gfc_convert_integer,gfc_convert_real):  Removed leading '+'
2710         before conversion by gmp library call.
2711
2712 2004-03-24  Bud Davis  <bdavis9659@comcast.net>
2713
2714         PR 12921
2715         * trans-io.c (gfc_trans_open): Change RECL= to a value parameter.
2716
2717 2004-02-24  Richard Henderson  <rth@redhat.com>
2718
2719         * trans-array.c (gfc_trans_dummy_array_bias): Fix typo.
2720
2721 2004-02-19  Loren J. Rittle  <ljrittle@acm.org>
2722
2723         * Make-lang.in ($(srcdir)/fortran/gfortran.info): Move...
2724         (fortran/gfortran.info): ... to here.
2725         (f95.srcinfo): New.
2726
2727 2004-02-16  Richard Henderson  <rth@redhat.com>
2728
2729         * Make-lang.in (f95-lang.o, trans-decl.o): Depend on cgraph.h.
2730         * f95-lang.c (LANG_HOOKS_EXPAND_DECL): Remove.
2731         (LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION): New.
2732         (gfc_expand_function): Rename from expand_function_body, make static,
2733         don't do anything except invoke tree_rest_of_compilation.
2734         (gfc_be_parse_file): Invoke cgraph.
2735         (gfc_expand_decl): Remove.
2736         (gfc_init_builtin_functions): Add __builtin_init_trampoline and
2737         __builtin_adjust_trampoline.
2738         * trans-decl.c (gfc_get_extern_function_decl): Don't set DECL_CONTEXT.
2739         (gfc_finalize): New.
2740         (gfc_generate_function_code): Use it.  Lower nested functions.
2741         * trans-expr.c (gfc_conv_function_call): Add static chain operand
2742         to call_expr.
2743         * trans.c (gfc_build_function_call): Likewise.
2744         * trans.h (expand_function_body): Remove.
2745
2746 2004-02-15  Victor Leikehman  <lei@il.ibm.com>
2747
2748         PR gfortran/13433
2749         * trans-decl.c (gfc_build_function_decl) For functions
2750         returning CHARACTER pass an extra length argument,
2751         following g77 calling conventions.
2752         * trans-types.c (gfc_get_function_type) Ditto.
2753         * trans-expr.c (gfc_conv_function_call) Ditto.
2754
2755 2004-02-14  Paul Brook  <paul@codesourcery.com>
2756
2757         * f95-lang.c (gfc_init_builtin_functions): Build chain properly.
2758
2759 2004-02-12  Paul Brook  <paul@nowt.org>
2760
2761         * BUGS: Remove.
2762
2763 2004-02-08  Steve Kargl  <sgk@troutmask.apl.washington.edu>
2764
2765         * gfortran.texi: Fix typos.
2766
2767 2004-02-07  Bud Davis  <bdavis9659@comcast.net>
2768
2769         PR gfortran/13909
2770         * intrinsic.c (add_conversions) Use logical conversion instead
2771         of real.
2772         * trans-types.c (gfc_get_logical_type) implemented logical*1
2773         and logical*2.
2774
2775 2004-01-17  Paul Brook  <paul@codesourcery.com>
2776
2777         * lang-specs.h: Remove %<fixed-form.
2778
2779 2004-01-15  Toon Moene  <toon@moene.indiv.nluug.nl>
2780
2781         * lang-specs.h: Enable preprocessing of source files
2782         ending in .F, .fpp, .FPP, .F90 and .F95.
2783
2784 2004-01-13  Toon Moene  <toon@moene.indiv.nluug.nl>
2785
2786         PR fortran/12912
2787         * lang-specs.h: Enable compilation of files ending
2788         in .f, .for and .FOR.
2789
2790 2004-01-11  Paul Brook  <paul@codesourcery.com>
2791
2792         * trans-stmt.c (gfc_trans_if_1): New function.
2793         (gfc_trans_if): Use it.
2794
2795 2004-01-11  Erik Schnetter  <schnetter@uni-tuebingen.de>
2796
2797         * gfortran.h (GFC_MAX_SYMBOL_LEN): Increase.
2798         (gfc_option_t): Add max_identifier_length.
2799         * lang.opt: Add fmax-identifier-length.
2800         * match.c (parse_name): Use limit.
2801         * options.c (gfc_init_options): Set max_identifier_length.
2802         (gfc_handle_option): Ditto.
2803
2804 2004-01-11  Feng Wang  <fengwang@nudt.edu.cn>
2805
2806         * intrinsic.c (add_functions): Add resolve function to dcmplx.
2807         * intrinsic.h (gfc_resolve_dcmplx): Add prototype.
2808         * iresolve.c (gfc_resolve_dcmplx): New function.
2809
2810 2004-01-10  Paul Brook  <paul@codesourcery.com>
2811
2812         * trans-decl.c (gfc_get_symbol_decl): Don't set subroutine attr.
2813         * trans-types.c (gfc_sym_type): Handle external dummy procedures.
2814         (gfc_return_by_reference): Correct condition.
2815         (gfc_get_function_type): Ditto.
2816
2817 2004-01-10  Paul Brook  <paul@codesourcery.com>
2818
2819         * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Convert mismatched
2820         types.
2821
2822 2004-01-10  Huang Chun  <chunhuang73@hotmail.com>
2823
2824         * iresolve.c: Use correct kind.
2825
2826 2004-01-10  Huang Chun  <chunhuang73@hotmail.com>
2827
2828         PR fortran/13467
2829         * trans-decl.c (gfc_create_module_variable):  Output array valued
2830         parameters.
2831
2832 2004-01-10  Paul Brook  <paul@codesourcery.com>
2833
2834         * resolve.c (resolve_branch): Get error message right way round.
2835
2836 2004-01-10  Canqun Yang <canqun@nudt.edu.cn>
2837
2838         * trans-array (gfc_conv_loop_setup): Adjust comment to track
2839         reality.
2840         (gfc_array_allocate): Don't count size of element twice.
2841
2842 2004-01-04  Paul Brook  <paul@codesourcery.com>
2843
2844         * lang.opt (i8, r8, std=*): Remove RejectNegative.
2845
2846 2004-01-04  Paul Brook  <paul@codesourcery.com>
2847
2848         * error.c (gfc_notify_std): New function.
2849         * gfortran.h (gfc_notify_std): Declare.
2850         (GFC_STD_*): Define.
2851         (gfc_option_t): Add warn_std and allow_std.
2852         * intrinsic.c (gfc_init_expr_extensions): Fix logic.
2853         (gfc_intrinsic_func_interface): Use gfc_notify_std.
2854         * check.c (check_rest): Use gfc_notify_std.
2855         * match.c (gfc_match_pause): Ditto.
2856         (gfc_match_assign): Ditto.
2857         (gfc_match_goto): Ditto.
2858         * resolve.c (resolve_branch): Ditto.
2859         * lang.opt: Add std=<foo> and w.
2860         * options.c (gfc_init_options): Set allow_std and warn_std.
2861         (gfc_handle_option): Handle OPT_std_* and OPT_w.
2862
2863 2004-01-01  Paul Brook  <paul@codesourcery.com>
2864
2865         * array.c (gfc_append_constructor): Take constructor, not expression.
2866         * data.c (struct gfc_expr_stack): Remove.
2867         (expr_stack): Remove.
2868         (find_con_by_offset): Rename from find_expr_in_con.
2869         (find_con_by_component): Rename from find_component_in_con.
2870         (gfc_get_expr_stack): Remove.
2871         (gfc_assign_data_value): Rewrite.
2872         (gfc_expr_push): Remove.
2873         (gfc_expr_pop): Remove.
2874         (gfc_advance_section): Rename from
2875         gfc_modify_index_and_calculate_offset.  Handle unbounded sections.
2876         (gfc_get_section_index): Handle unbounded sections.
2877         * gfortran.h: Update prototypes.
2878         * resolve.c (check_data_variable): Array section maight not be the
2879         last ref.
2880
2881 2004-01-01  Paul Brook  <paul@codesourcery.com>
2882
2883         PR fortran/13432
2884         * resolve.c (resolve_symbol): Allow assumed length function results.
2885
2886 2004-01-01  Steve Kargl  <sgk@troutmask.apl.washington.edu>
2887
2888         * match.c (gfc_match_pause): Fix spelling.
2889
2890 2004-01-01  Steven Bosscher  <stevenb@suse.de>
2891
2892         PR fortran/13251
2893         * trans-expr.c (gfc_conv_variable): Take the type kind of a substring
2894         reference from the expression.
2895
2896 2003-12-26  Feng Wang  <fengwang@nudt.edu.cn>
2897
2898         * dump-parse-tree.c (gfc_show_code_node): Add ASSIGN and ASSIGNED GOTO
2899         dumping.
2900         * gfortran.h (gfc_statement): New ST_LABEL_ASSIGNMENT.
2901         (gfc_exec_op): New EXEC_LABEL_ASSIGN.
2902         (symbol_attribute):New variable attribute: assign.
2903         * io.c (resolve_tag):Integer variable is allowed.
2904         (match_dt_format): Add ASSIGN statement. Set assign flag.
2905         * match.c (gfc_match_if): Change ST_NONE to ST_LABEL_ASSIGNMENT.
2906         (gfc_match_assign): Add ASSIGN statement. Set assign flag.
2907         (gfc_match_goto): Add ASSIGNED GOTO statement. Set assign flag.
2908         * parse.c (decode_statement): Add ST_LABEL_ASSIGNMENT.
2909         (next_statement): Add ST_LABEL_ASSIGNMENT.
2910         (gfc_ascii_statement): Add ST_LABEL_ASSIGNMENT.
2911         * resolve.c (resolve_code): Resolve ASSIGN and ASSIGNED GOTO statement.
2912         (resolve_blocks): Resolve ASSIGNED GOTO statement label list.
2913         * st.c (gfc_free_statement): Add EXEC_LABEL_ASSIGN.
2914         * trans-decl.c (gfc_get_symbol_decl): Create the shadow variable for
2915         assign.  Put them into the stuct lang_decl.
2916         * trans-io.c (set_string): Add the assign statement.
2917         * trans-stmt.c (gfc_trans_label_assign): New function.
2918         (gfc_trans_goto): Translate ASSIGNED GOTO statement.
2919         * trans-stmt.h (gfc_trans_label_assign): Added function prototype.
2920         * trans.c (gfc_trans_code): Add EXEC_LABEL_ASSIGN.
2921         * trans.h (lang_decl):Add shadow variable decl tree needed by assign.
2922         (GFC_DECL_ASSIGN_ADDR(node)): New macro to access this.
2923         (GFC_DECL_ASSIGN(node)): New macro to access flag.
2924
2925 2003-12-31  Huang Chun <chunhuang73@hotmail.com>
2926
2927         PR fortran/13434
2928         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxval): Fixed bug in
2929         minval/maxval.
2930
2931 2003-12-22  Toon Moene  <toon@moene.indiv.nluug.nl>
2932
2933         * options.c (gfc_init_options): Set flag_argument_noalias to 2, to indicate
2934         that arguments to subroutines/functions can't alias themselves, nor global
2935         memory.
2936
2937 2003-12-20  Steven Bosscher  <stevenb@suse.de>
2938
2939         * trans-expr.c (gfc_conv_expr_op): Fold the result expression.
2940         * trans.c (gfc_add_modify_expr, gfc_add_expr_to_block): Likewise.
2941
2942 2003-12-12  Huang Chun <chunhuang73@hotmail.com>
2943
2944         * primary.c (match_substring): Fix substring bug for start point
2945         or end point is NULL.
2946         * trans-expr.c (gfc_conv_substring): Ditto
2947         * trans-types.c (gfc_sym_type): Get correct type of scalar
2948         character variables.
2949         * trans-intrinsic.c (gfc_conv_intrinsic_len): Handle character in
2950         derived type.
2951
2952 2003-12-10  Richard Henderson  <rth@redhat.com>
2953
2954         * options.c (gfc_post_options): Don't ever use rtl inlining.
2955
2956 2003-12-05  Canqun Yang  <canqun@nudt.edu.cn>
2957
2958         * trans-common.c: Re-implement COMMON blocks and EQUIVALENCE lists.
2959         * trans-equivalence.c: Remove.
2960         * trans-decl.c (gfc_get_symbol_decl): Update to match.
2961         (gfc_generate_function_code): Ditto.
2962         * trans-array.c (gfc_conv_array_parameter): Ditto.
2963         * Make-lang.in (F95_OBJS): Remove fortran/trans-equivalence.o
2964         (F95_ADDITIONAL_OBJS): Add stor-layout.o
2965         * trans.h (gfc_trans_equivalence): Remove.
2966         * gfortran.h (struct gfc_equiv): Add used field.
2967         (struct gfc_symbol): Remove addr_base, addr_offset, equiv_ring,
2968         equiv_offset fields.
2969
2970 2003-12-05  Richard Henderson  <rth@redhat.com>
2971
2972         * trans.c (gfc_build_addr_expr): New.
2973         (gfc_build_indirect_ref, gfc_build_array_ref): New.
2974         * trans.h: Declare them.
2975         * trans-array.c, trans-expr.c, trans-intrinsic.c, trans-io.c,
2976         trans-stmt.c, trans.c (*): Use them.
2977
2978         * f95-lang.c (gfc_post_options): Remove dead prototype.
2979         * trans-array.c (gfc_trans_deferred_vars): Remove unused variable.
2980         * trans-stmt.c (gfc_evaluate_where_mask): Fix temporary_list
2981         allocation size.
2982
2983 2003-12-01  Feng Wang  <fengwang@nudt.edu.cn>
2984
2985         * io.c (gfc_match_format): Check for missing format label.
2986
2987 2003-11-30 Huang Chun <chunhuang73@hotmail.com>
2988
2989         PR fortran/13155
2990         * trans-decl.c (gfc_sym_mangled_function_id): Don't mangle symbols
2991         from interfaces in modules.
2992
2993 2003-11-30  Paul Brook  <paul@nowt.org>
2994
2995         * trans-array.c (gfc_trans_g77_array): Make non-static.
2996         (gfc_trans_assumed_size): Remove.
2997         (gfc_trans_dummy_array_bias): Explicitly free temporary.
2998         * trans-array.h (gfc_trans_g77_array): Add prototype.
2999         (gfc_trans_assumed_size): Remove.
3000         * trans-decls.c (gfor_fndecl_push_context): Remove.
3001         (gfor_fndecl_pop_context): Remove.
3002         (gfc_build_function)decls): Don't create them.
3003         (gfc_trans_deferred_vars): Update to match. Remove dead code.
3004         * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Free temp.
3005
3006 2003-11-30  Kejia Zhao  <kejia_zh@nudt.edu.cn>
3007
3008         * trans-array.c (gfc_conv_array_parameter): Simplify
3009         array argument passing for array name actual argument.
3010         * trans-expr.c (gfc_conv_function_call): Ditto
3011         * trans-types.c (gfc_is_nodesc_array):Ditto.
3012
3013 2003-11-30  Paul Brook  <paul@nowt.org>
3014
3015         * f95-lang.c (gfc_post_options): Move ...
3016         * options.c (gfc_post_options): .. to here.  Handle inlining options.
3017         * gfortran.h (gfc_post_options): Add prototype.
3018
3019 2003-11-28  Richard Henderson  <rth@redhat.com>
3020
3021         * trans.c (gfc_create_var_np): Use create_tmp_var_raw.
3022
3023 2003-11-28 Huang Chun <chunhuang73@hotmail.com>
3024
3025         * trans.h (has_alternate_specifier): New global variable.
3026         * match.c (gfc_match_call): Handle actual arguments associated with
3027         alternate return indicators.
3028         * trans-expr.c (gfc_conv_function_call): Ditto
3029         * trans-stmt.c (gfc_trans_call): Ditto
3030         (gfc_trans_return): Handle return statement with value.
3031         * trans-decl.c (gfc_generate_function_code): Handle functions with
3032         asterisk dummy.
3033         (gfc_get_fake_result_decl): Ditto
3034         * trans-types.c (gfc_get_function_type): Ditto
3035         * resolve.c (resolve_actual_arglist): Check alternate return indicators.
3036         (resolve_formal_arglist): Check asterisk dummy.
3037
3038 2003-11-27  Paul Brook  <paul@nowt.org>
3039
3040         * trans-array.c (gfc_tran_allocate_array_storage): Use new memory
3041         allocation interface.
3042         (gfc_conv_ array_parameter): Ditto.
3043         (gfc_trans_auto_array_allocation): Ditto. Also free the memory.
3044         * trans-array.c: Update prototype.
3045         * trans-decl.c (gfc_build_builtin_function_decls): Update prototypes.
3046         (gfc_trans_auto_character_variable): Use new memory alloc interface.
3047         * trans-expr.c (gfc_conv_string_tmp): Ditto.
3048         (gfc_conv_function_call): Use gfc_conv_string_tmp.
3049         * trans-stmt.c (gfc_do_allocate):  Use new memory alloc interface.
3050         * trans-intrinsic.c (gfc_conv_intrinsic_trim): Ditto.
3051         * trans.h (gfc_ss_info): Remove unused pdata field.
3052         * trans.c (gfc_create_var_np): Change T to V.
3053
3054 2003-11-26  Richard Henderson  <rth@redhat.com>
3055
3056         * mathbuiltins.def: Move acos, asin, cosh, log10, sinh, tanh from ...
3057         * trans-intrinsic.c (gfc_intrinsic_map): ... here.  Add SCALE,
3058         FRACTION, NEAREST, SET_EXPONENT.
3059         (gfc_intrinsic_map_t): Add libm_name, complex_available, is_constant.
3060         Fix GTY marking.  Remove unnecessary const's.
3061         (LIBM_FUNCTION): Rename from I_LIB.
3062         (LIBF_FUNCTION): New.
3063         (gfc_get_intrinsic_lib_fndecl): Handle libm and libgfortran naming
3064         conventions.  Assume the expr signature is correct.  Mark const.
3065         (gfc_conv_intrinsic_exponent): Use library functions.
3066         (gfc_conv_intrinsic_set_exponent): Remove.
3067         (gfc_conv_intrinsic_scale): Remove.
3068         (gfc_conv_intrinsic_nearest): Remove.
3069         (gfc_conv_intrinsic_fraction): Remove.
3070         (gfc_conv_intrinsic_function): Update.
3071         * trans-decl.c (gfor_fndecl_math_exponent4): New.
3072         (gfor_fndecl_math_exponent8): New.
3073         (gfc_build_intrinsic_function_decls): Set them.
3074         * trans.h: Declare them.
3075
3076 2003-11-25  Canqun Yang  <canqun@nudt.edu.cn>
3077
3078         * trans-common.c (gfc_layout_global_equiv): Locate the error for
3079         underflow COMMON block.
3080         (gfc_trans_one_common): Fix bug for size of COMMON block containing
3081         EQUIVALENCE object. Also fix typo in an error message.
3082
3083 2003-11-25  Diego Novillo  <dnovillo@redhat.com>
3084
3085         * Make-lang.in: Add check-gfortran to lang_checks.
3086         (check-f95): Alias for check-gfortran.
3087
3088 2003-11-25  Jason Merrill  <jason@redhat.com>
3089
3090         * Make-lang.in (f95.tags): Create TAGS.sub files in each
3091         directory and TAGS files that include them for each front end.
3092
3093 2003-11-24  Paul Brook  <paul@nowt.org>
3094
3095         PR fortran/13154
3096         * trans-decl.c (gfc_greate_module_variable): Skip COMMON blocks.
3097
3098 2003-11-24  Paul Brook  <paul@nowt.org>
3099
3100         * expr.c (simplify_const_ref): Return SUCCESS for things we don't
3101         handle.
3102         * resolve.c (gfc_resolve_expr): Resolve contents before rank/shape.
3103
3104 2003-11-24  Paul Brook  <paul@nowt.org>
3105
3106         PR fortran/13105
3107         * array.c (gfc_array_ref_shape): Handle elemental dimensions.
3108         * trans-array.c (gfc_trans_preloop_setup): Use correct dim lookup.
3109
3110 2003-11-20  Richard Henderson  <rth@redhat.com>
3111
3112         * trans-array.c (gfc_trans_allocate_array_storage): Use convert.
3113         (gfc_conv_array_base): Likewise.
3114         * trans-decl.c (gfc_trans_auto_character_variable): Likewise.
3115         * trans-expr.c (gfc_conv_string_tmp): Likewise.
3116         * trans-intrinsic.c (gfc_conv_intrinsic_trim): Likewise.
3117         * trans-stmt.c (gfc_trans_character_select): Likewise.
3118
3119 2003-11-13  Paul Brook  <paul@nowt.org>
3120
3121         * trans-decl.c (gfc_sym_mangled_function_id): Dont mangle externals.
3122
3123 2003-11-13  Canqun Yang  <canqun@nudt.edu.cn>
3124
3125         * resolve.c (gfc_resolve): Also resolve EQUIVALENCE objects.
3126         (resolve_equivalence): New function.
3127         (resolve_equivalence_derived): New function.
3128
3129 2003-11-12  Richard Henderson  <rth@redhat.com>
3130
3131         * trans.c (gfc_trans_code): Use annotate_with_locus instead of
3132         annotate_all_with_locus.
3133
3134 2003-11-11  Canqun Yang  <canqun@nudt.edu.cn>
3135
3136         * options.c (gfc_init_options): Set flag_max_stack_var_size as 32768.
3137         * trans-decl.c (gfc_finish_var_decl): Modified.
3138
3139 2003-11-08  Paul Brook  <paul@nowt.org>
3140
3141         PR fortran/12704
3142         * trans-intrinsic.c (gfc_conv_intrinsics_minmaxloc): Handle zero-size
3143         arrays.
3144
3145 2003-11-06  Paul Brook  <paul@nowt.org>
3146
3147         * trans-intrinsic.c (gfc_conv_intrinsics_minmaxloc): Initialize pos.
3148
3149 2003-11-02  Canqun Yang  <canqun@nudt.edu.cn>
3150
3151         * match.c (gfc_match_stopcode): Assign '0' to stop_code.
3152
3153 2003-10-27  Anthony Green  <green@redhat.com>
3154
3155         * Make-lang.in (f95.stageprofile): Use tabs, not spaces.
3156         (f95.stagefeedback): Ditto.
3157
3158 2003-10-27  Andrew Pinski  <pinskia@physics.uc.edu>
3159
3160         PR fortran/12682
3161         * Make-lang.in (f95.stageprofile): Add.
3162         (f95.stagefeedback): Add.
3163
3164 2003-10-23  Richard Henderson  <rth@redhat.com>
3165
3166         * f96-lang.c (gfc_gimplify_expr): Remove.
3167         (LANG_HOOKS_GIMPLIFY_EXPR): Remove.
3168         (LANG_HOOKS_GIMPLE_BEFORE_INLINING): New.
3169
3170 2003-10-23  Richard Henderson  <rth@redhat.com>
3171
3172         * f95-lang.c (gfc_gimplify_expr): Return gimplify_status.
3173
3174 2003-10-20  Paul Brook  <paul@nowt.org>
3175
3176         * trans-expr.c (gfc_conv_integer_power): Use boolean_type_node.
3177         * trans-stmt.c (gfc_trans_do_while): Ditto.
3178
3179 2003-10-17  Paul Brook  <paul@nowt.org>
3180
3181         * simplify.c (gfc_simplify_shape): Use gfc_array_dimen_size.
3182
3183 2003-10-17  Paul Brook  <paul@nowt.org>
3184
3185         * trans-io.c (gfc_build_io_library_fndecls): Set TREE_PUBLIC.
3186
3187 2003-10-17  Feng Wang  <wf_cs@yahoo.com>
3188
3189         * iresolve.c (gfc_resolve_maxloc): Change the result's kind and type.
3190         (gfc_resolve_minloc): Ditto.
3191         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Use correct types.
3192         Return the value after subtracting the lower bound.
3193
3194 2003-10-16  Richard Henderson  <rth@redhat.com>
3195
3196         * f95-lang.c (expand_function_body): Don't check flag_disable_gimple.
3197
3198 2003-10-16  Steven Bosscher  <steven@gcc.gnu.org>
3199
3200         * lang.c: Remove -M option for now, it's in the way for C.
3201
3202 2003-10-14  Jason Merrill  <jason@redhat.com>
3203
3204         * Make-lang.in (f95.tags): New rule.
3205
3206 2003-10-13  Richard Henderson  <rth@redhat.com>
3207
3208         * trans.c (gfc_trans_code): Use annotate_all_with_locus.
3209
3210 2003-10-13  Paul Brook  <paul@nowt.org>
3211
3212         * trans-decl.c (generate_local_decl): Don't create junk variables.
3213
3214 2003-10-13  Paul Brook  <paul@nowt.org>
3215
3216         * resolve.c (resolve_formal_arglist): Use function result decl in
3217         preference to function decl.
3218
3219 2003-10-12  Richard Henderson  <rth@redhat.com>
3220
3221         * f95-lang.c (gfc_define_builtin): New const_p argument.  Set
3222         TREE_READONLY.  Update all callers.
3223
3224 2003-10-12  Feng Wang  <wf_cs@yahoo.com>
3225
3226         * iresolve.c (gfc_resolve_cshift): Change to match implementation.
3227         * trans-intrinsic.c (gfc_conv_intrinsic_function): Remove CSHIFT.
3228         (gfc_is_intrinsic_libcall): Add CSHIFT.
3229
3230 2003-10-12  Richard Henderson  <rth@redhat.com>
3231
3232         * trans-array.c (gfc_trans_static_array_pointer): Set TREE_INVARIANT.
3233         (gfc_trans_array_constructor_value): Likewise.
3234         (gfc_conv_array_initializer): Likewise.
3235         * trans-stmt.c (gfc_trans_character_select): Likewise.
3236
3237 2003-11-12  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3238
3239         * trans-intrinsic.c (integer_kind_info, real_kind_info): Remove.
3240
3241 2003-10-11  Huang Chun  <jiwang@mail.edu.cn>
3242
3243         * check.c (gfc_check_repeat): Check arguments are scalar.
3244         (gfc_check_trim): New function.
3245         * intrinsic.h (gfc_check_trim): Add prototype.
3246         * intrinsic.c (add_functions): Use it.
3247         * trans.h (gfor_fndecl_string_trim, gfor_fndecl_string_repeat):
3248         Decalare.
3249         * trans-decl.c: Ditto.
3250         (gfc_build_intrinsic_fucntion_decls): Set them.
3251         * trans-intrinsic.c (gfc_conv_intrinsic_len): Handle result vars.
3252         (gfc_conv_intrinsic_trim): New function.
3253         (gfc_conv_intrinsic_repeat): New function.
3254         (gfc_conv_intrinsic_function): Use them.
3255
3256 2003-10-11  Huang Chun  <jiwang@mail.edu.cn>
3257
3258         * trans-types.c (gfc_sym_type): Handle result variables.
3259
3260 2003-10-11  Huang Chun  <jiwang@mail.edu.cn>
3261
3262         * trans-intrinsic.c (gfc_conv_intrinsic_char): Don't use
3263         gfc_get_character_type.
3264
3265 2003-10-11  Feng Wang  <wf_cs@yahoo.com>
3266
3267         * trans-expr.c (gfc_conv_variable): Check sym->ts, not the decl.
3268
3269 2003-10-11  Paul Brook  <paul@nowt.org>
3270
3271         * iresolve.c (gfc_resolve_dint, gfc_resolve_dnint): New functions.
3272         (gfc_resolve_dprod): New function.
3273         (gfc_resolve_aint, gfc_resolve_anint): Only base name on arg type.
3274         * intrinsic.h (gfc_resolve_dint, gfc_resolve_dnint): Declare.
3275         (gfc_resolve_dprod): Declare.
3276         * intrinsic.c (add_functions): Use them.
3277         * trans-decl.c (gfc_get_extern_function_decl): Only pass one arg.
3278
3279 2003-10-06  Richard Henderson  <rth@redhat.com>
3280
3281         * f95-lang.c (gfc_init_builtin_functions): Add clzll.
3282         * trans-intrinsic.c (call_builtin_clz): Use it.
3283
3284 2003-10-05  Paul Brook  <paul@nowt.org>
3285
3286         * f95-lang.c (expand_function_body): Call (push|pop)_function_context.
3287         * trans-decl.c (gfc_generate_function_code): Set
3288         cfun->function_end_locus.
3289
3290 2003-09-24  Jason Merrill  <jason@redhat.com>
3291
3292         * f95-lang.c, trans-decl.c: Use DECL_SOURCE_LOCATION instead of
3293         TREE_LOCUS.
3294
3295 2003-09-21  Lifang Zeng  <zlf605@hotmail.com>
3296         Paul Brook  <paul@nowt.org>
3297
3298         * Make-lang.in (F95_OBJS): Add fortran/data.o.
3299         * array.c (gfc_inser_constructor): New function.
3300         (gfc_get_constructor): New function.
3301         (gfc_free_constructor): Initialize offset and repeat.
3302         (iterator_stack): Remove.
3303         (expand_info): Add offset, component and repeat fields.
3304         (expand_constructor): Set them.
3305         (expand): Set new fields.
3306         (gfc_copy_constructor): Ditto. Avoid recursion.
3307         * gfortran.h: Add prototypes for new functions.
3308         (gfc_constructor): Add offset, component and repeat.
3309         (iteratio_stack): Move to here.
3310         * resolve.c (check_data_variable): Convert data values into variable
3311         initializers.
3312         (traverse_data_list): Build implicit loop chain.
3313         (gfc_resolve): Ditto.
3314         * trans-array.c (gfc_conv_array_intializer): Handle repeat count.
3315         * trans-decl.c (gfc_get_symbol_decl): Use gfc_conv_structure.
3316         * trans-expr.c (gfc_conv_structure): Handle array initializers.
3317         (gfc_conv_expr): Update to match.
3318         * trans.h (gfc_conv_structure): Declare.
3319         * data.c: New file.
3320
3321 2003-09-20  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3322
3323         * trans.h: Add declarations for gfor_fndecl_si_kind and
3324         gfor_fndecl_sr_kind.
3325         * trans-decl.c (g95_build_intrinsic_function_decls): Build them.
3326         * trans-intrinsic.c (g95_conv_intrinsic_si_kind): New function.
3327         (g95_conv_intrinsic_sr_kind): New function.
3328         (g95_conv_intrinsic_function): Add SELECTED_INT_KIND and
3329         SELECTED_REAL_KIND.
3330
3331 2003-09-17  Lars Segerlund  <Lars.Segerlund@comsys.se>
3332
3333         * iresolve.c (gfc_resolve_random_number): Generate _r4 & _r8
3334         instead of _4 and _8 as postfix for libgfortran calls.
3335
3336 2003-09-16  Paul Brook  <paul@nowt.org>
3337
3338         * array.c (compare_bounds): New function.
3339         (gfc_compare_array_spec): Use it.
3340
3341 2003-09-14  Paul Brook  <paul@nowt.org>
3342
3343         * primary.c (gfc_match_rvalue): Make sure sym->result is set.
3344         * trans-expr.c (gfc_conv_string_parameter): Also allow PRAM_DECLs.
3345
3346 2003-09-14  Paul Brook  <paul@nowt.org>
3347
3348         * check.c (dim_rank_check): Allow assumed bounds if requested.
3349         (gfc_check_lbound): Call it.
3350         (gfc_check_ubound): Ditto.
3351         (gfc_check_size): Change to match.
3352         * simplify.c (gfc_simplify_bound): New function.
3353         (gfc_simplify_lbound): New function.
3354         (gfc_simplify_ubound): New function.
3355         * intrinsic.h: Declare them.
3356         * intrinsic.c (add_functions): Use them.
3357
3358 2003-09-14  Paul Brook  <paul@nowt.org>
3359
3360         * io.c (format_lex): Initialize negative_flag.
3361         (check_format): Intialize repeat.
3362         * trans-io.c (gfc_new_nml_name_expr): Declare static.
3363         (gfc_new_var_expr): Ditto.
3364
3365 2003-09-14  Paul Brook  <paul@nowt.org>
3366
3367         * trans-array.c (gfc_conv_array_initializer): Handle derived types.
3368         * trans-decl.c (gfc_get_symbol_decl): Only do local scalar values.
3369
3370 2003-09-12  Paul Brook  <paul@nowt.org>
3371
3372         * trans-intrinsic.c (gfc_conv_intrinsic_sign): Call fold.
3373
3374 2003-09-12  Zdenek Dvorak  <rakdver@atrey.karlin.mff.cuni.cz>
3375
3376         * fortran/trans.c (gfc_finish_block): Call rationalize_compound_expr
3377         for a correct expression.
3378
3379 2003-09-10  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3380
3381         * trans-intrinsic.c (real_compnt_info): New struct.
3382         (prepare_arg_info): New function.
3383         (gfc_conv_intrinsic_set_exponent): New function.
3384         (gfc_conv_intrinsic_scale): New function.
3385         (gfc_conv_intrinsic_nearest): New function.
3386         (gfc_conv_intrinsic_fraction): New function.
3387         (gfc_conv_intrinsic_exponent): New function.
3388         (gfc_conv_intrinsic_spacing): New function.
3389         (gfc_conv_intrinsic_rrspacing): New function.
3390         (gfc_conv_intrinsic_function): Use them.
3391
3392 2003-08-24 XiaoQiang Zhang  (zhangapache@yahoo.com>
3393
3394         * trans-const.c (gfc_conv_mpz_to_tree): Fix bug, parameter for
3395         build_int_2 changed from (high, low) to (low, high).
3396         * trans-io.c (ioparm_namelist_name, ioparm_namelist_name_len,
3397         ioparm_namelist_read_mode, iocall_set_nml_val_int,
3398         iocall_set_nml_val_float, iocall_set_nml_val_char,
3399         iocall_set_nml_val_complex, iocall_set_nml_val_log): New declaration.
3400         (gfc_build_io_library_fndecls): Add variable initialization.
3401         (gfc_new_nml_name_expr, get_new_var_expr): New function.
3402         (build_dt): Add namelist support.
3403         * io.c (value): New variable.
3404         (check_format): Support FMT_H now.
3405
3406 2003-09-07  Paul Brook  <paul@nowt.org>
3407
3408         * io.c (gfc_resolve_dt): Error if format label is not defined.
3409
3410 2003-09-07  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3411
3412         * trans-intrinsic.c (gfc_conv_intrinsic_aint): Fix two bugs. One is
3413         about case_switch's break. The other is about building the condition
3414         statement tree, which judges the argument in the range of the
3415         corresponding integer type.
3416         * trans-intrinsic.c (gfc_conv_intrinsic_mod): MOD and MODULO can work
3417         for the large values.
3418
3419 2003-09-05  Paul Brook  <paul@nowt.org>
3420
3421         * f95-lang.c (expand_function_body): Gimplify the function.
3422
3423 2003-09-04  Jeff Law  <law@redhat.com>
3424
3425         * f95-lang.c (DEFINE_MATH_BUILTIN): C arrays start at
3426         index zero!
3427
3428 2003-09-04  Paul Brook  <paul@nowt.org>
3429
3430         * f95-lang.c (gfc_define_builtin): Also set implicit_built_in_decls.
3431         (gfc_expand_stmt): New function.
3432         (LANG_HOOKS_RTL_EXPAND_STMT): Define.
3433         (expand_function_body): Use tree_rest_of_compilation.
3434         * trans-decl.c (gfc_generate_function_code): Don't free cfun.
3435
3436 2003-09-03  Jeff Law  <law@redhat.com>
3437
3438         * f95-lang.c (gfc_init_builtin_functions): C arrays start at
3439         index zero!
3440
3441 2003-08-30  Paul Brook  <paul@nowt.org>
3442
3443         * f95-lang.c (builtin_function): Remove #if 0 code.
3444         (gfc_define_builtin): New function.
3445         (gfc_init_builtin_functions): Use mathbuiltins.def not ../builtins.def.
3446         * mathbuiltins.def: New file.
3447         * trans-intrinsic.c (gfc_intrinsic_map_t): Add builtin code fields.
3448         (gfc_intrinsic_map): Use mathbuiltins.def.
3449         (gfc_intrinsic_builtin_t): Remove.
3450         (gfc_build_intrinsic_lib_fndecls): Update.
3451         * trans-types.c (gfc_init_types): Remove redundant initilaization of
3452         signed_size_type_node.
3453
3454 2003-08-29  Paul Brook  <paul@nowt.org>
3455
3456         * arith.c (gfc_real_kinds): Use correct minimum exponents.
3457
3458 2003-08-22  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3459
3460         * trans-instinsic.c (gfc_conv_intrinsic_mod): Also do MODULO.
3461         (gfc_conv_intrinsic_function): Add MODULO.
3462
3463 2003-08-22  Jason Merrill  <jason@redhat.com>
3464
3465         * trans-array.c (gfc_conv_expr_descriptor): Update use of predicates.
3466
3467 2003-08-22  Andreas Jaeger  <aj@suse.de>
3468
3469         * Make-lang.in (f95.install-common): Add DESTDIR support.
3470         * (f95.install-info): Likewise.
3471         (f95.uninstall): Likewise.
3472
3473 2003-08-19  Diego Novillo  <dnovillo@redhat.com>
3474
3475         * trans-types.c (gfc_init_types): Initialize
3476         signed_size_type_node with size_type_node.
3477
3478 2003-08-18  Paul Brook  <paul@nowt.org>
3479
3480         * dependency.c (gfc_dependency): New enum.
3481         (check_another_array_ref): Remove.
3482         (gfc_get_array_from_component): Remove.
3483         (get_x): Remove.
3484         (get_range): Remove.
3485         (get_no_of_elements): Use mpz_t, not mpf_t.
3486         (transform_sections): New function.
3487         (gfc_check_range_range): Rename ...
3488         (gfc_check_section_vs_section): ... to this.  Use new function.
3489         (gfc_is_inside_range): Rewrite to match.
3490         (gfc_check_element_vs_section): Ditto.
3491         (gfc_check_element_vs_element): Ditto.
3492         (get_deps): Ditto.
3493         (gfc_dep_resolver): Ditto.  Remove unused parameter.
3494         * Dependency.h (gfc_check_range_range, gfc_check_element_vs_section,
3495         gfc_check_element_vs_element, gfc_is_inside_range,
3496         gfc_get_array_from_component): Remove prototypes for static functions.
3497         (gfc_dep_resolver): Update prototype.
3498         * trans-array.c (gfc_conv_resolve_dependencies): Change to match.
3499
3500 2003-08-15  Paul Brook  <paul@nowt.org>
3501
3502         * trans-decl.c (gfc_build_qualified_array): Don't add symbols for
3503         return values to parent scope.
3504         (gfc_build_dummy_array_decl): Ditto.
3505
3506 2003-08-14  Paul Brook  <paul@nowt.org>
3507
3508         * trans-stmt.c (gfc_trans_allocate): Handle NULL refs. Allocate the
3509         size of the type, not the pointer.
3510         * resolve.c (resolve_symbol): Give more accurate error message.
3511
3512 2003-08-10  Paul Brook  <paul@nowt.org>
3513
3514         * trans-decl.c (gfc_build_function_decl): Only mangle global symbols.
3515
3516 2003-08-10  Paul Brook  <paul@nowt.org>
3517
3518         * trans-stmt.c (gfc_trans_allocate): Correctly handle non-array derived
3519         type components.
3520
3521 2003-08-10  Chun Huang  <compiler@sohu.com>
3522
3523         * resolve.c (resolve_formal_arglist): Resolve STATEMENT function.
3524         (resolve_symbol): Ditto.
3525         * trans-expr.c (gfc_conv_statement_function): New function.
3526         (gfc_conv_function_expr): Use it.
3527
3528 2003-08-10  Paul Brook  <paul@nowt.org>
3529
3530         * trans-array.c (gfc_conv_ss_startstride): Handle functions.
3531         (walk_function_expr): Set section rank.
3532         * trans-intrinsic.c (gfc_walk_intrinsic_libfunc): Ditto.
3533
3534 2003-08-10  Paul Brook  <paul@nowt.org>
3535
3536         * intrinsic.c (add_sym): Prefix names with correct string.
3537         (add_sym_0s): New function.
3538         (add_subroutines): Register abort.
3539
3540 2003-08-10  Erik Schnetter  <schnetter@uni-tuebingen.de>
3541
3542         * gfortran.h: Introduce options to control the mangling.
3543         * lang.opt: Likewise.
3544         * options.c (gfc_init_options): Handle the options.
3545         * trans-common.c (gfc_sym_mangled_common_id): New function.
3546         (gfc_build_common_decl): Call it.
3547         * trans-decl.c (gfc_sym_mangled_function_id): New function.
3548         (gfc_get_extern_function_decl, gfc_build_function_decl): Call it.
3549
3550 2003-08-09  Paul Brook  <paul@nowt.org>
3551
3552         * module.c (mio_symbol): Always ouput a namespace for formal args.
3553         (load_needed): Namespace now belong to their proper symbol.
3554         (gfc_dump_module): Change G95=>GFORTRAN.
3555
3556 2003-08-05  Paul Brook  <paul@nowt.org>
3557
3558         * options.c: Force -fg77-calls.
3559
3560 2003-08-02  Paul Brook  <paul@nowt.org>
3561
3562         * Makelang.in: Rename G95_* to GFORTRAN_*.
3563         * All sources: Rename G95_* to GFC_*.
3564
3565 2003-08-01  Paul Brook  <paul@nowt.org>
3566
3567         * fortran/Make-lang.in: Use GMPLIBS.
3568         * fortran/config-lang.in: Set need_gmp.
3569         * trans-expr.c (gfc_conv_variable): Remove incorrect assertion.
3570
3571 2003-07-27  Andreas Jaeger  <aj@suse.de>
3572
3573         * trans-decl.c (gfc_generate_constructors): Convert prototype to
3574         ISO C90.
3575         * trans-const.c (gfc_init_constants): Likewise.
3576         * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Likewise.
3577
3578         * gfortranspec.c: Convert to ISO C90.
3579         (lang_specific_driver): Correct copyright, remove ALT_LIBM usage.
3580
3581 2003-07-26  Paul Brook  <paul@nowt.org>
3582
3583         * lang.opt: Add -fdump-parse-tree.
3584         * options.c (gfc_handle_option): Ditto.
3585         * resolve.c (resolve_forall_iterators): Convert to proper type.
3586         * trans-stmt.c (gfc_trans_forall_1): Create temp var with correct type.
3587
3588 2003-07-26  Paul Brook  <paul@nowt.org>
3589
3590         * Makefile.in: Add build dependencies on files common with rest of gcc.
3591
3592 2003-07-26  Lifang Zeng  <zlf605@hotmail.com>
3593
3594         * trans.h: Declare g95_trans_pointer_assignment.
3595         * trans-expr.c (g95_trans_pointer_assignment): New function.
3596         (g95_trans_pointer_assign): Use it.
3597         * trans-stmt.c (g95_trans_forall_1): Handle pointer assignment.
3598         (g95_trans_pointer_assign_need_temp): New function.
3599
3600 2003-07-26  Paul Brook  <paul@nowt.org>
3601
3602         * gfortran.texi: Replace references to g95.
3603
3604 2003-07-26  Paul Brook  <paul@nowt.org>
3605
3606         Rename g95_* to gfc_*.
3607
3608 2003-07-25  Paul Brook  <paul@nowt.org>
3609
3610         * gfortran.h: Rename from g95.h.
3611         * trans-types.c (boolean_type_node, booelan_true_node,
3612         boolean_false_node): Remove.
3613         * trans-types.h: Ditto.
3614
3615 2003-07-25  Chun Huang  <compiler@sohu.com>
3616
3617         * parse.c (accept_statement): Implement BLOCK DATA statement.
3618         * trans-expr.c (g95_conv_variable): Fix bug for dereference pointer
3619         variables.
3620
3621 2003-07-24  Lifang Zeng  <zlf605@hotmail.com>
3622
3623         * trans-stmt.c (temporary_list): Define.
3624         (g95_trans_assign_need_temp): New function.
3625         (g95_trans_forall_1): Modified for WHERE.
3626         (g95_trans_where_assign): Modified.
3627         (g95_trans_where_2): Modified.
3628         (g95_evaluate_where_mask): Modified.
3629         (g95_trans_where): Modified.
3630         (g95_get_temp_expr): Removed.
3631         (g95_add_to_where_stmt_list): Removed.
3632         (compute_overall_iter_number): Modified for WHERE.
3633         * trans.h: Remove where_stmt_list.
3634
3635 2003-07-24  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3636
3637         * lang.opt: Correct description of options -J and -M.
3638
3639 2003-07-23  Steven Bosscher   <steven@gcc.gnu.org>
3640
3641         * lang.opt: Move help text to here.
3642         * lang-options.h: Remove.
3643
3644 2003-07-23  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3645         * iresolve.c (g95_resolve_transpose): Proper variable in switch.
3646         * simplify.c (g95_simplify_nearest): Fix typo and use a correct test
3647         on kind.
3648
3649 2003-07-22  Steven Bosscher  <steven@gcc.gnu.org>
3650         Paul Brook  <paul@nowt.org>
3651
3652         * check.c (check_rest): Use global pedantic flag.
3653         * io.c (data_desc): Ditto.
3654         * error.c (g95_warning, g95_warning_now): Use global flag.
3655         * f95-lang.c (LANG_HOOKS_HANDLE_OPTION): Rename from DECODE.
3656         (expand_function_body): Update to new prototypes.
3657         (g95_init): Use new option names.
3658         * g95.h (g95_option_t): Standardize names.
3659         (g95_init_options, g95_handle_option): Update prototypes.
3660         * interface.c: Use new option names.
3661         * match.c: Ditto.
3662         * module.c: Ditto.
3663         * parse.c: Ditto.
3664         * primary.c: Ditto.
3665         * resolve.c: Ditto.
3666         * scanner.c: Ditto.
3667         * simplify.c: Ditto.
3668         * symbol.c: Ditto.
3669         * trans-array.c: Ditto.
3670         * trans-expr.c: Ditto.
3671         * trans-types.c: Ditto.
3672         * trans-decl.c: Ditto.
3673         (g95_build_library_function_decl): Remove obsolete VPARAMS.
3674         * trans.h: Ditto.
3675         * options.c (g95_display_help): Remove.
3676         (g95_init_options): Convert to new scheme.
3677         (set_Wall): Ditto
3678         (g95module_option): Ditto, rename from g95_parse_arg.
3679         (g95_handle_module_path_options): New function.
3680         * trans-equivalence.c: Fix error message.
3681         * lang.opt: Corrections.
3682
3683 2003-07-21  Steven Bosscher  <steven@gcc.gnu.org>
3684
3685         * lang.opt: New file.
3686
3687 2003-07-21  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3688
3689         * decl.c (match_attr_spec): Set colon_seen.
3690
3691 2003-07-14  Paul Brook  <paul@nowt.org>
3692
3693         * trans-array.c: Update comment.
3694         (g95_trans_array_constructor_subarray): Cleanup loopinfo data.
3695         * trans-intrinsic.c (g95_conv_intrinsic_anyall,count,arith,
3696         minmaxloc,minmaxval): Ditto.
3697         * trans-io.c (g95_trans_transfer): Ditto.
3698         * trans-stmt.c: Remove unneeded prototypes.
3699         (generate_loop_for_lhs_to_rhs): Rename vars. Add loop post chain.
3700         (generate_loop_for_rhs_to_temp): Rename vars. Don't share loopinfo.
3701         (compute_inner_temp_size): Remove bits of dead code. Add comments.
3702         Don't share loopinfo.
3703         (compute_overall_iter_number): Declare as static.
3704         (allocate_temp_for_forall_nest): Ditto.
3705         (g95_trans_forall_1): Don't pass shared loopinfo.
3706         * trans.c (g95_start_block): Expand comment.
3707
3708 2003-07-12  Paul Brook  <paul@nowt.org>
3709
3710         * arith.c (g95_index_integer_kind): Remove unused initializer.
3711         * trans-stmt.c (generate_loop_for_temp_to_lhs): Don't multiply array
3712         index by size of element.
3713         (generate_loop_for_rhs_to_temp): Ditto.
3714         (allocate_temp_for_forall_nest): Use element size, not index size.
3715
3716 2003-07-11  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3717
3718         * arith.c (g95_index_integer_kind): Add a TODO.
3719         * simplify.c (g95_simplify_nearest): Add a TODO.
3720
3721 2003-07-09  Chun Huang  <compiler@sohu.com>
3722
3723         * trans.h: Add declarations for gfor_fndecl_string_scan and
3724         gfor_fndecl_string_verify.
3725         * trans-decl.c (g95_build_intrinsic_function_decls): Build them.
3726         * trans-intrinsic.c (g95_conv_intrinsic_scan): New function.
3727         (g95_conv_intrinsic_verify): New function.
3728         (g95_conv_intrinsic_function): Add SCAN and VERIFY.
3729         * simplify.c (g95_simplify_scan, g95_simplify_verify): Fix bug in case
3730         of parameter 'BACK=.TRUE.'
3731
3732 2003-07-05  Lifang Zeng  <zlf605@hotmail.com>
3733
3734         * trans-stmt.c (iter_info, forall_info): Define.
3735         (g95_trans_forall_block): Remove.
3736         (g95_trans_forall_loop): Use forall info blocks.
3737         (g95_trans_nested_forall_loop): New function.
3738         (g95_do_allocate): Handle things other than logical masks.
3739         (generate_loop_for_temp_to_lhs): New function.
3740         (generate_loop_for_rsh_to_temp): New function.
3741         (compute_inner_temp_size): New function.
3742         (compute_overall_iter_number): New function.
3743         (allocate_temp_for_forall_nest): New function.
3744         (g95_trans_forall): Move body ...
3745         (g95_trans_forall_1): ... to here.  Handle loops with temporaries.
3746
3747 2003-07-02  Paul Brook  <paul@nowt.org>
3748
3749         * trans-decl.c (create_index_var, g95_build_qualified_array): Put vars
3750         in correct scope.  Change callers to match.
3751         * trans-types.c (g95_get_dtype_cst): Allow rank 7 arrays.
3752         * iresolve.c (g95_resolve_reshape): Only use constant shapes.
3753
3754 2003-07-02  Paul Brook  <paul@nowt.org>
3755
3756         * trans-array.c (g95_conv_loop_setup): Remove dead var.  Use
3757         expression shape for all expressions.
3758         * trans-decl.c (g95_symbol_init): Allow adding at very end of list.
3759
3760 2003-07-03  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3761
3762         * g95.h (g95_option_t), lang-options.h, options.c (g95_init_options,
3763         g95_parse_arg), intrinsic.c (g95_convert_type): support of
3764         -Wconversion.
3765         * intrinsic.c, g95.h: Add g95_convert_type_warn,
3766         * resolve.c (g95_resolve_index): Call it.
3767
3768 2003-07-02  Paul Brook  <paul@nowt.org>
3769
3770         * iresolve.c (g95_resolve_reshape): Set expression shape.
3771         (g95_resolve_shape): Ditto.
3772         * simplify.c (g95_simplify_shape): Move common code outside condition.
3773         * trans-array.c (g95_conv_array_initializer): Teach it how to count.
3774
3775 2003-07-01  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3776
3777         * array.c (g95_array_dimen_size): Deal with EXPR_ARRAY to improve
3778         conformance checks.
3779
3780 2003-06-29  Paul Brook  <paul@nowt.org>
3781
3782         * array.c (g95_simplify_iterator_var): Don't bother with return value.
3783         * expr.c (find_array_element, find_component_ref): New functions.
3784         (remove_subobject_ref): New function.
3785         (simplify_const_ref): Use them.  Rename from simplify_component_ref.
3786         (simplify_ref_chain): New function.
3787         (g95_simplify_expr): Use it.  Simplify parameter variable subobjects.
3788         (g95_specification_expr): Simplify the expression.
3789         * resolve.c (resolve_operator): Check simplifications return code.
3790         (g95_resolve_expr): Ditto.
3791
3792 2003-06-26  Paul Brook  <paul@nowt.org>
3793
3794         * expr.c (simplify_component_ref): New function.
3795         (g95_simplify_expr): Use it.
3796         * resolve.c (resolve_structure_cons): Handle references.
3797
3798 2003-06-25  Paul Brook  <paul@nowt.org>
3799
3800         * trans-io.c (build_dt): Handle internal units.
3801
3802 2003-06-25  Canqun Yang  <canqun@yahoo.com.cn>
3803
3804         * trans-common.c (g95_build_common_decl): Array index range starts at 0.
3805         (g95_build_common_decl, g95_layout_global_equiv, g95_trans_one_common):
3806         Use g95_array_index_type instead of integer_type_node.
3807         (g95_build_common_decl, g95_set_common_master_type): Use
3808         g95_character1_type_node instead of char_type_node.
3809         * trans-equivalence.c (g95_layout_local_equiv): As above.
3810
3811 2003-06-24  Steven G. Kargl  <kargls@attbi.com>
3812
3813         * g95.h (g95_option_t), options.c (g95_init_options, g95_parse_arg):
3814         remove last remains of -fquiet.
3815
3816 2003-06-22  Paul Brook  <paul@nowt.org>
3817
3818         * resolve.c (resolve_operator): Don't fail if we can't simplify.
3819         (g95_resolve_expr): Ditto.
3820         (resolce_code): Mark as static.
3821         * trans-stmt.c (g95_trans_chaaracter_select): Mark labels because the
3822         gimplifer doesn't (yet).
3823
3824 2003-06-20  Paul Brook  <paul@nowt.org>
3825
3826         * g95.h: Add ST_PAUSE and EXEC_PAUSE.
3827         * match.c (g95_match_if): Add ST_PAUSE.
3828         (g95_match_stopcode): New function.
3829         (g95_match_pause, g95_match_stop): Use it.
3830         * parse.c (g95_ascii_statement): Handle ST_PAUSE.
3831         (decode_stmt, next_statement, parse_executable): Ditto.
3832         * resolve.c (resolve_code): Ditto.
3833         * st.c (g95_free_statement): Ditto.
3834         * trans-stmt.c (g95_trans_pause): New function.
3835         * trans-stmt.h: Declare it.
3836         * trans.c (g95_trans_code): Use it.
3837         * trans-decl.c (gfor_fndecl_pause_numeric, gfor_fndecl_pause_string):
3838         Declare.
3839         (g95_build_builtin_function_decls): Initialize them.
3840         * trans.h: Ditto.
3841         * dump-parse-tree.c (g95_show_code_node): Handle EXEC_PAUSE.
3842
3843 2003-06-18  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3844
3845         * io.c (g95_match_open , g95_match_close, g95_match_inquire,
3846         match_filepos): Fix error handling.
3847
3848 2003-06-18  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3849
3850         * array.c (spec_dimen_size, ref_dimen_size, g95_array_dimen_size):
3851         Add assertions on arguments.
3852         * resolve.c (expression_shape): Remove useless &.
3853         * simplify.c (get_kind, g95_simplify_bit_size, g95_simplify_digits,
3854         g95_simplify_ibclr, g95_simplify_ibits, g95_simplify_ibset,
3855         g95_simplify_ishft,g95_simplify_ishftc, g95_simplify_maxexponent,
3856         g95_simplify_minexponent, g95_simplify_radix, g95_simplify_range
3857         g95_simplify_rrspacing, g95_simplify_scale, g95_simplify_spacing,
3858         g95_simplify_tan, g95_simplify_tiny): Clean predicates and assertions.
3859         (g95_simplify_not, g95_simplify_scale): Add assertions.
3860
3861 2003-06-15  Paul Brook  <paul@nowt.org>
3862
3863         Clean up stuff to work with the ssa optimizers.
3864         * convert.c (convert): Handle BOOLEAN_TYPEs.
3865         * f95-lang.c (g95_truthvalue_conversion): Implement.
3866         * trans-array.c (g95_trans_array_constructor_value): Group multiple
3867         scalar values.
3868         * trans.h (g95_truthvalue_conversion): Declare.
3869         * trans-intrinsic.c (g95_conv_intrinsic_anyall): Use bool constants.
3870         * trans-stmt.c (g95_trans_character_select): Don't create array
3871         assignments.  Mark labels as indirect jump targets.
3872         * trans-types.h (g95_init_types): Use BOOLEAN_TYPE nodes.
3873         (g95_get_dtype_cst): Handle LOGICAL types.
3874
3875 2003-06-14  Paul Brook  <paul@nowt.org>
3876
3877         * f95-lang.c (g95_gimplify_expr): New function.
3878         * trans-array.c (g95_trans_array_constructor_value): Don't create
3879         array assignments.
3880         (g95_conv_expr_descriptor): Rename simple->gimple.
3881         * trans-expr.c (conv_expr_op): Use proper logical operators.
3882         * trans-intrinsic.c (build_fixbound_expr): New function.
3883         (build_fix_expr): Ditto.
3884         (g95_conv_intinsic_aint): Use them. Use builtin functions.
3885         (g95_conv_intrinsic_function): Add FLOOR and CEILING.
3886
3887 2003-06-10  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3888
3889         * array.c (g95_compare_array_spec): Remove unreachable code.
3890         * expr.c (g95_copy_expr): Likewise.
3891         * intrinsic.c (g95_convert_type): Likewise.
3892         * misc.c (g95_code2string): Likewise.
3893         * simplify.c (g95_simplify_ishft, g95_simplify_real,
3894         g95_simplify_reshape, g95_simplify_sign, g95_simplify_sqrt): Likewise.
3895         * trans-stmt.c (g95_trans_select): Likewise.
3896         * primary.c (extend_ref): Add an assertion.
3897         * simplify.c (g95_convert_constant): Add const.
3898         * intrinsic.h: Remove g95_check_x_ni.
3899         * f95-lang.c (g95_finish): Call g95_release_include_path.
3900
3901 2003-06-10  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3902
3903         * resolve.c (resolve_contained_functions): Fix typo introduced on
3904         2003-01-13.
3905
3906 2003-06-09  Paul Brook  <paul@nowt.org>
3907
3908         * g95.h: Include system.h not hwint.h.
3909         * many: use safe-ctype.h not ctype.h.  Change isalpha -> ISALPHA, etc.
3910         * misc.c (g95_getmem): Use xmalloc/memset instead of calloc.
3911
3912 2003-06-09  Paul Brook  <paul@nowt.org>
3913
3914         * g95.h (g95_symbol): Add fields for COMMON and EQUIVALENCE variables.
3915         * Make-lang.in (F95_OBJS): Add files for COMMON and EQUIVALENCE.
3916         * trans-decl.c (g95_add_decl_to_functions): Make non-static.
3917         (g95_get_symbol_decl): Handle COMMON and EQUIVALENCE objects.
3918         (g95_generate_function_code): Translate COMMON and EQUIVALENCE
3919         objects.
3920         * trans.h (g95_trans_equivalence, g95_trans_common,
3921         g95_add_decl_to_function): Declare.
3922         * trans-common.c, trans-equivalence.c: New files.
3923
3924 2003-06-08  Steven Bosscher  <steven@gcc.gnu.org>
3925
3926         * intrinsic.c (g95_intrinsic_extension): Remove.
3927         (add_functions): Substitute g95_check_x for g95_check_x_ni
3928         everywhere.
3929         (g95_init_expr_extensions): New function.
3930         (g95_intrinsic_func_interface): Use it.
3931         * intrinsic.h: Remove extern decl for g95_intrinsic_extension.
3932         * check.c (g95_check_digit, g95_check_huge, g95_check_kind,
3933         g95_check_precision, g95_check_present, g95_check_radix,
3934         g95_check_range, g95_check_selected_real_kind): Do not set
3935         g95_intrinsic_extension.
3936         (g95_check_x_ni): Remove now duplicate of g95_check_x.
3937
3938         * expr.c (check_inquiry): Add FIXME, fixup some code style.
3939
3940 2003-06-06  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3941
3942         * g95.h (ref_type): Name this type explicitly.
3943         * module.c (MIO_NAME): Add specialisations of mio_name.
3944         (mio_symbol_attribute, mio_typespec, mio_array_ref,
3945         mio_array_spec, mio_ref, mio_expr, mio_symbol): Use them.
3946         (ab_attribute): Name this type explicitly.
3947         (mio_symbol_attribute, mio_expr): Add cast to call to find_enum.
3948
3949 2003-06-05  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3950
3951         * trans-intrinsic.c (g95_conv_allocated): New function.
3952         (g95_conv_intrinsic_function): Make G95_ISYM_ALLOCATED work.
3953
3954 2003-06-05  Steven Bosscher  <steven@gcc.gnu.org>
3955
3956         * f95-lang.c: Don't include g95-support.h
3957         (g95_mark_addressable): Add prototype.
3958         (g95_init_decl_processing): Remove C front end hack.
3959         * f95-tree.c: Remove file.
3960         * support.c: Remove file.
3961         * g95-support.h: Remove file.
3962         * trans-types.c (g95_init_types): Set up boolean
3963         type related tree nodes.
3964         * Make-lang.in: Remove rules for dead files and
3965         dependencies on them.
3966
3967 2003-06-05  Steven Bosscher  <steven@gcc.gnu.org>
3968
3969         * Make-lang.in (F95_ADDITIONAL_OBJS): Remove the final
3970         C front end dependency.  Also, convert.c does not depend on
3971         g95-support.h anymore.
3972         * convert.c: Don't include c-common.h and g95-support.h
3973         * f95-lang.c: Don't inlude c-common.h and c-common.def (3x).
3974         (g95_stmt_tree, g95_scope_stmt_stack, anon_aggr_type_p,
3975         stmts_are_full_exprs_p, current_stmt_tree,
3976         current_scope_stmt_stack): Remove.
3977         * g95-support.h (unsigned_conversion_warning): Kill proto.
3978         (boolean_type_node, boolean_true_node, boolean_false_node):
3979         Don't define here.  Instead, make then true tree nodes in
3980         trans-types.
3981         * support.c (c_global_trees): Die, C front end, die!!!
3982         (g95_init_c_decl_hacks): Don't touch intmax_type_node,
3983         uintmax_type_node, string_type_node and const_string_type_node.
3984         (decl_constant_value, overflow_warning): Make static functions.
3985         They are in death row too, though.
3986         (default_conversion, c_expand_asm_operands): Remove.
3987         * trans-array.c, trans-expr.c, trans-intrinsic.c, trans-stmt.c,
3988         trans.c: Don't include c-common.h.
3989         * trans-types.c (boolean_type_node, boolean_true_node,
3990         boolean_false_node): Make them real tree nodes.
3991         * trans-types.h (intmax_type_node, string_type_node,
3992         const_string_type_node): Hack to work around C dependencies
3993         in builtin-types.def.
3994
3995 2003-06-04  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3996
3997         * decl.c (decl_types): Add some iterators-like sentinels.
3998         * decl.c (match_attr_spec): Use them.
3999         Use "decl_types" instead of "int".
4000         Add cast in call to g95_match_strings.
4001         * dump-parse-tree.c (g95_show_namespace):  Use "g95_intrinsic_op"
4002         instead of "int".
4003         * g95.h (g95_intrinsic_op): Add some iterators-like sentinels.
4004         (g95_interface_info): Use "g95_intrinsic_op".
4005         * dump-parse-tree.c (g95_show_namespace): Use them.
4006         * interface.c (g95_check_interfaces): Use them.
4007         * module.c (read_module, write_module): Use them.
4008         * symbol.c (g95_get_namespace, g95_free_namespace): Use them.
4009         Use "g95_intrinsic_op".
4010         * interface.c (check_operator_interface): Use "g95_intrinsic_op".
4011         Add a default case in switch statement.
4012         * intrinsic.h (g95_generic_isym_id): Moved to...
4013         * g95.h (g95_generic_isym_id): here.
4014         (g95_intrinsic_sym): Use "g95_generic_isym_id".
4015         * intrinsic.c (make_generic): Use "g95_generice_isym_id".
4016         * trans-intrinsic.c (g95_intrinsic_map_t,
4017          g95_conv_intrinsic_lib_funtion): Use "g95_generice_isym_id".
4018         * match.c (g95_match_intrinsic_op): Add cast in call to
4019         g95_match_strings.
4020
4021 2003-06-03  Steven Bosscher  <steven@gcc.gnu.org>
4022
4023         * support.c (skip_evaluation, warn_conversion, lvalue_p,
4024         lvalue_or_else, pedantic_lvalue_warning, warn_for_assignment,
4025         constant_fits_type_p, convert_and_check,
4026         unsigned_conversion_warning): Remove these ugly remnants
4027         we inherited from the C front end.
4028         (function_types_compatible): Remove '#if 0'-edcode.
4029         (build_modify_expr): Likewise.
4030         (convert_for_assignment): Don't use the deceased functions.
4031         The parameter fundecl is now unused.
4032         (decl_constant_value): Always just return decl.  In fact
4033         this function is not used at present, but it might be in
4034         the future, when we start using the tree inliner.
4035         (overflow_warning, default_conversion, c_expand_asm_operands):
4036         Abort when these are called, they are part of the C type
4037         checking implementation and therefore poison to Fortran.
4038
4039 2003-06-04  Steven Bosscher  <steven@gcc.gnu.org>
4040
4041         * Make-lang.in (F95_ADDITIONAL_OBJS): Don't depend on
4042         c-pretty-print.o and c-dump.o.  Add a comment on why we
4043         depend on c-semantics.c.
4044         * f95-lang.c (LANG_HOOKS_TREE_DUMP_DUMP_TREE_FN):
4045         Don't use the C front end tree dumper hook to dump the
4046         language specific tree representation -- we don't have
4047         one.  So instead, inherit the default langhook.
4048
4049 2003-06-02  Paul Brook  <paul@nowt.org>
4050
4051         * trans-expr.c (g95_conv_variable): Remove incorrent assertion.
4052
4053 2003-06-02  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4054
4055         * check.c (g95_check_associated): Use proper types.  Remove
4056         extraneous argument in call to g95_error().
4057
4058 2003-06-02  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4059
4060         * resolve.c (resolve_operator): Make logical operands convert to the
4061         type with higher kind.
4062
4063 2003-06-02  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4064
4065         * check.c (g95_check_associated): Make sure both pointer and target has
4066         the same type and rank. Null pointer or array section with vector
4067         subscript as target are not allowed.
4068         * trans.h: Declare gfor_fndecl_associated.
4069         * trans-decl.c: (g95_build_builtin_function_decls): Initialize
4070         gfor_fndecl_associated.
4071         * trans-intrinsic.c (g95_conv_associated): New function.
4072         (g95_conv_intrinsic_function): Make G95_ISYM_ASSOCIATED work.
4073
4074 2003-06-02  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4075
4076         * trans-array.c (g95_conv_expr_descriptor): Set the base of POINTER
4077         according to POINTER itself rather than TARGET.
4078         (g95_conv_expr_descriptor): Make lbound start at 1.
4079         * trans-expr.c (g95_trans_pointer_assign): Fix a bug for Nullify.
4080
4081 2003-06-01  Paul Brook  <paul@nowt.org>
4082
4083         * expr.c (g95_type_convert_binary): Make it match the standard.
4084         * g95.texi: Remove dead link.
4085
4086 2003-06-01  Steven Bosscher  <steven@gcc.gnu.org>
4087
4088         * g95.texi: Cleanup somewhat in preparation for inclusion
4089         in GCC CVS.
4090
4091 2003-05-23  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4092             Canqun Yang  <canqun@yahoo.com.cn>
4093
4094         * resolve.c (compare_bound_int, resolve_where_shape): Proper return
4095         type.
4096         (g95_find_forall_index): Return proper value.
4097         (g95_resolve_assign_in_forall, g95_resolve_forall): Use proper type to
4098         compare the return value from g95_find_forall_index.
4099
4100 2003-05-23  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4101         * g95.h, io.c (g95_st_label): Remove "length".
4102         (g95_symtree): Remove "link".
4103         (g95_case): Remove "code".
4104         * arith.c, arith.h (g95_compare_string, g95_convert_integer,
4105         g95_convert_real): Make an argument pointer to const.
4106         * decl.c (colon_seen): Add a TODO.
4107         * interface.c (g95_compare_types): Fix typo.
4108         * interface.c (compare_interfaces): Preserve value of "p".
4109         * intrinsic.c (sort_actual): Remove "i".
4110         * match.c (g95_match_assign): Proper type in call to g95_match().
4111         * parse.c (next_free): Avoid duplicate call due to macro.
4112         * parse.c (check_statement_label): wrong type in call to g95_error.
4113         * primary.c (match_real_constant): Add a TODO.
4114         * resolve.c (resolve_select):  Remove useless conditional.
4115         * simplify.c (g95_simplify_repeat): Proper assignment to
4116         "value.character.string".
4117         * simplify.c (g95_simplify_reshape): Wrong variable in call to
4118         g95_error.
4119
4120 2003-05-20  Canqun Yang  <canqun@yahoo.com.cn>
4121
4122         * trans-stmt.c: Remove unnecessary include file defaults.h.
4123
4124 2003-05-19  Lifang Zeng  <zlf605@hotmail.com>
4125
4126         * trans-stmt.c (g95_trans_forall_loop): Handle FORALL with negative
4127         stride.
4128         (g95_trans_forall): Allow arbitrary number of FORALL indexes and
4129         actual variables used as FORALL indexes.
4130
4131 2003-05-15  Paul Brook  <paul@nowt.org>
4132
4133         * trans-array.c (g95_trans_static_array_pointer): Use
4134         null_pointer_node.
4135         (g95_trans_deferred_array): Initialize static array pointers.
4136         * trans-expr.c (g95_conv_function_call): Use formal arglist to
4137         correctly pass POINTER and absent CHARACTER arguments.
4138
4139 2003-05-14  Lifang Zeng  <zlf605@hotmail.com>
4140
4141         * resolve.c (g95_resolve_forall): Resolve FORALL construct/statement.
4142         (g95_resolve_forall_body): Resolve FORALL body.
4143         (g95_resolve_where_code_in_forall): Resolve WHERE inside FORALL.
4144         (g95_resolve_assign_in_forall): Resolve assignment inside FORALL.
4145         (g95_find_forall_index): Check whether the FORALL index appears in
4146         the expression or not.
4147         (resolve_code): Modified.
4148
4149 2003-05-14  Paul Brook  <paul@nowt.org>
4150
4151         * iresolve.c (g95_resolve_spread): Convert ncopies to index_type.
4152
4153 2003-05-13  Paul Brook  <paul@nowt.org>
4154
4155         * trans-types.c (g95_max_array_element_size): Now a tree node.
4156         (g95_init_types): Work out max size properly.
4157         (g95_get_dtype_cst): Modify to match.
4158
4159 2003-05-11  Paul Brook  <paul@nowt.org>
4160
4161         * trans-io.c (add_case): Create a label decl for case labels.
4162
4163 2003-05-11  Paul Brook  <paul@nowt.org>
4164
4165         * arith.c (g95_integer_index_kind): New variable.
4166         * f95-lang.c (g95_init): Move frontend initialization here ...
4167         (g95_post_options): ... from here.
4168         * g95.h (g95_index_integer_kind, g95_resolve_index): Declare.
4169         * intrinsic.c (add_functions): Use index kinds.
4170         * iresolve.c: Convert to index_kind where needed.
4171         * resolve.c (g95_resolve_index): Make public, use index_kind.
4172         (resolve_array_ref): Adjust to match.
4173         * trans-array.c: Rename g95_array_index_kind to g95_index_integer_kind.
4174         * trans-stmt.c: Ditto.
4175         * trans-types.c: Ditto.
4176         * trans-types.h (g95_array_index_kind): Remove declaration.
4177         * trans-expr.c (g95_conv_expr_present): Use null_pointer_node.
4178
4179 2003-05-07  Paul Brook  <paul@nowt.org>
4180
4181         * trans-const.c (g95_conv_mpz_to_tree): Typecast constant.
4182         * trans-intrinsic.c (g95_conv_intrinsic_bound): Convert type
4183         of bound indices.
4184
4185 2003-05-07  Paul Brook  <paul@nowt.org>
4186
4187         * trans-array.c (trans_static_array_pointer,
4188         g95_trans_array_constructor_value, g95_conv_array_initializer,
4189         g95_conv_structure): CONSTRUCTOR nodes only have one operand.
4190         (g95_add_loop_ss_code): Convert subscripts to the correct type.
4191         * trans-stmt.c (g95_trans_character_select): Ditto.
4192         * trans-types.c (g95_init_types): Ditto.
4193
4194 2003-05-07  Steven Bosscher  <steven@gcc.gnu.org>
4195
4196         * f95-lang.c (expand_function_body): Use input_line, not lineno.
4197         * trans-decl.c (g95_generate_function_code,
4198         g95_generate_constructors): Likewise.
4199         * trans.c (g95_trans_runtime_check, g95_add_block_to_block,
4200         g95_get_backend_locus, g95_set_backend_locus, g95_trans_code):
4201         Likewise.
4202
4203 2003-05-07  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4204         * trans-types.c (g95_get_derived_type): Fix bug for DERIVED type
4205         with components point to the DERIVED type itself, and two DERIVED
4206         type with components point to each other.
4207         * trans-expr.c (g95_conv_componet_ref): Modified
4208
4209 2003-05-07  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4210         * trans-expr.c (g95_conv_expr): Translate EXPR_NULL into
4211         null_pointer_node.
4212         (g95_trans_pointer_assign): Implement Nullify.
4213
4214 2003-05-01  Paul Brook  <paul@nowt.org>
4215
4216         * trans-array.c (g95_walk_function_expr): Cope with NULL esym.
4217         * trans-decl.c (g95_get_symbol_decl): Don't mangle dummy functions.
4218
4219 2003-05-01  Paul Brook  <paul@nowr.org>
4220
4221         * trans-array.c, trans.c, trans-expr.c, trans-intrinsic.c,
4222         trans-stmt.c: Replace empty_stmt_node with build_empty_stmt () and
4223         IS_EMPTY_STMT.
4224
4225 2003-05-01  Canqun Yang  <canqun@yahoo.com.cn>
4226
4227         * trans-stmt.c (g95_trans_integer_select): Add a parameter to build
4228         CASE_LABEL_EXPR.
4229
4230 2003-04-28  Paul Brook  <paul@nowt.org>
4231
4232         * iresolve.c (g95_resolve_transpose): COMPLEX types are twice as big
4233         as their kind suggests.
4234         (g95_resolve_reshape): Ditto.
4235
4236 2003-04-28  Chun Huang  <compiler@sohu.com>
4237
4238         * trans-expr.c (g95_conv_substring_expr): New function.
4239         (g95_conv_expr): Use it.
4240
4241 2003-04-28  Paul Brook  <paul@nowt.org>
4242
4243         * iresolve.c (g95_resolve_transpose): Make it match the
4244         implementation.
4245         * trans-intrinsic.c (g95_is_intrinsic_libcall): Add TRANSPOSE.
4246
4247 2003-04-18  Steven Bosscher  <steven@gcc.gnu.org>
4248
4249         * trans-types.c (g95_add_field_to_struct): New function to
4250         add a field to a UNION_TYPE or RECORD_TYPE.
4251         * trans-types.h (g95_add_field_to_struct): Prototype.
4252         (g95_get_derived_type): Use g95_add_field_to_struct to add
4253         components.
4254         * trans-io.c (g95_add_field): Remove.
4255         (ADD_FIELD): Use new g95_add_field_to_struct function.
4256         (ADD_STRING): Likewise.
4257         * trans-stmt.c (g95_trans_select): Likewise.
4258         (g95_add_field): Remove duplicated function.
4259
4260 2003-04-18  Canqun Yang  <canqun@yahoo.com.cn>
4261
4262         Port implementation for CHARACTER SELECT from Andy's tree.
4263         * trans-stmt.c (g95_trans_character_select): Implement character
4264         select. (g95_add_field): New function.
4265         * trans-decl.c: Declare 'gfor_gndecl_select_string'.
4266         (g95_build_builtin_function_decls): Add 'gfor_fndecl_select_string'.
4267         * g95.h (struct g95_case): Add field 'int n'.
4268         * trans.h: Declare 'gfor_fndecl_select_string'.
4269
4270 2003-04-18  Steven Bosscher  <steven@gcc.gnu.org>
4271
4272         * bbt.c (duplicate_key, g95_insert_bbt_with_overlap): Remove.
4273         (g95_insert_bbd): Die on duplicates.
4274         * g95.h (g95_insert_bbt_with_overlap): Delete prototype.
4275
4276 2003-04-14  Steven Bosscher  <steven@gcc.gnu.org>
4277
4278         * g95.texi: Require GMP 4.0 -- like we actually
4279         do.  Explain the testsuite and what-goes-where.
4280         Don't use undefined texinfo symbol.  Break very
4281         long line.  Remove finished item from the list
4282         of open projects.
4283
4284 2003-04-11  Canqun Yang  <canqun@yahoo.com.cn>
4285
4286         * trans-stmt.c (g95_evaluate_where_mask): Give mask temporaries
4287         LOGICAL type.
4288
4289 2003-04-10  Canqun Yang  <canqun@yahoo.com.cn>
4290
4291         * trans-stmt.c (g95_trans_forall): Implement WHERE inside FORALL.
4292         (g95_trans_forall_body): New function.
4293
4294 2003-04-10  Canqun Yang  <canqun@yahoo.com.cn>
4295
4296         * resolve.c (resove_where): New function.
4297         (resolve_where_shape): New function.
4298         (resolve_code): Add call to 'resolve_where'
4299         * trans-stmt.c (g95_trans_where): Modified.
4300         (g95_trans_where_2): New function.
4301         (g95_trans_where_assign): New function.
4302         (g95_evaluate_where_mask): New function.
4303         (g95_add_to_stmt_list): New function.
4304         (g95_get_temp_expr): New function.
4305         * trans.h (where_stmt_list): New structure.
4306
4307 2003-04-10  Paul Brook  <paul@nowt.org>
4308
4309         * g95spec.c (DEFAULT_SWITCH_TAKES_ARG): Remove.
4310         (DEFAULT_WORD_SWITCH_TAKES_ARG): Ditto.
4311
4312 2003-04-10  Steven Bosscher  <steven@gcc.gnu.org>
4313
4314         Update after mainline -> tree-ssa-branch merge.
4315         * f95-lang.c (g95_mark_addressable): Update put_var_into_stack
4316         call.
4317         (g95_init): Update for new lang_hooks definition.
4318         (g95_post_options): New langhook.
4319         (LANG_HOOK_POST_OPTIONS): Clear, then define to g95_post_options.
4320         * scanner.c (g95_new_file): Comment update.
4321
4322 2003-04-09  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4323
4324         * g95.h, lang-options.h: Add -Wimplicit-interface.
4325         * options.c (g95_init_options, g95_parse_arg): Set it.
4326         * interface.c (check_intents): Warn about call with implicit
4327         interface.
4328         * resolve.c (resolve_unknown_f, resolve_unknown_s): Call
4329         g95_procedure_use.
4330
4331 2003-04-05  Paul Brook  <paul@nowt.org>
4332
4333         * iresolve.c (g95_resolve_spread): Don't resole based on type.
4334         * trans-intrinsic.c (g95_is_intrinsic_libcall): Add G95_ISYM_SPREAD.
4335
4336 2003-03-29  Paul Brook  <paul@nowt.org>
4337
4338         * iresolve.c (g95_resolve_pack): Don't bother resolving based on type.
4339         (g95_resolve_unpack): Ditto.
4340         * trans-intrinsic.c (g95_conv_intrinsic_merge): New Function.
4341         (g95_conv_intrinsic_function): Use it.  Remove PACK and UNPACK.
4342         (g95_is_intrinsic_libcall): Add PACK and UNPACK.
4343
4344 2003-03-25  Paul Brook  <paul@nowt.org>
4345
4346         * arith.c (g95_unary_user, g95_user): Remove dead functions.
4347         * arith.h: Ditto.
4348         * array.c (g95_free_array_ref): Ditto.
4349         * g95.h: Ditto.
4350         * symbol.c (g95_use_derived_tree): Ditto.
4351         * intrinsic.c (add_functions): Use simplification for SCALE.
4352         * primary.c (g95_match_rvalue): Test sym, not symtree.
4353
4354 2003-03-25  Paul Brook  <paul@nowt.org>
4355
4356         * trans-decl.c (build_function_decl): Add parameter before it gets
4357         turned into a constant.
4358         * iresolve.c (g95_resolve_eoshift): Resolve to a useful name.
4359         * trans-intrinsic.c (g95_is_intrinsic_libcall): Add G95_ISYM_EOSHIFT.
4360         * trans-decl.c (g95_create_module_variable): Don't pushdecl constants.
4361
4362 2003-03-22  Paul Brook  <paul@nowt.org>
4363
4364         * trans-array.c (g95_conv_array_initializer): Allow scalar
4365         expressions.
4366         * trans-decl.c (g95_finish_var_decl): Result variables are not
4367         module variables.
4368         * trans-intrinsic.c (g95_conv_intrinsic_transfer): New function.
4369         (g95_conv_intrinsic_function): Use it.
4370         * trans-types.h (g95_type_spec): Remove dead declaration.
4371
4372 2003-03-21  Paul Brook  <paul@nowt.org>
4373
4374         * trans-decl.c (g95_build_function_decl): Mark string parameters.
4375
4376 2003-03-20  Paul Brook  <paul@nowt.org>
4377
4378         * trans-decl.c (g95_build_function_decl): Put character length
4379         parameters at the end of the function declaration.
4380         * trans-expr.c (g95_conv_function_call): Ditto.
4381         * trans-types.c (g95_get_function_type): Ditto.
4382
4383 2003-03-20  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4384
4385         * resolve.c (resolve_formal_arglist): Don't impose intent for
4386         procedure arguments of pure functions.
4387         (resolve_select): Remove redundant assignment.
4388
4389 2003-03-19  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4390
4391         * arith.c (validate_logical), g95.h, options.c (g95_init_options):
4392         Remove option l1.
4393         * g95.h, intrinsic.c(g95_get_intrinsic_sub_symbol): Add const.
4394         * iresolve.c(g95_resolve_cpu_time, g95_resolve_random_number): Add
4395         const.
4396         * lang-options.h: Remove -finline-repack-arrays. Add -fg77-calls.
4397         Order list.
4398         * symbol.c (g95_add_type): Fix typo in comment.
4399
4400
4401 2003-03-16  Paul Brook  <paul@nowt.org>
4402
4403         * dump-parse-tree.c (g95_show_code_node): Print resolved sym name.
4404         * expr.c (g95_build_call): Remove.
4405         * f95-lang.c (puchdecl_top_level): New function.
4406         * g95.h (g95_code): Store resolved symbol, not just the name.
4407         * intrinsic.c (g95_intrinsic_namespace): New global namespace.
4408         (g95_intirinsic_init_1, g95_intrinsic_done_1): Use it.
4409         (g95_get_intrinsic_sub_symbol): New function.
4410         * iresolve.c (g95_resolve_cpu_time): Use it.
4411         (g95_resolve_random_number): Ditto.
4412         * resolve.c: Set code->resolved_sym instead of code->sub_name.
4413         * trans-decl.c (g95_get_extern_function_decl): Give external decls
4414         the correct DECL_CONTEXT.  Add global symbold to the global scope.
4415         * trans-stmt.c (g95_trans_code): Remove hacks now the fronted is
4416         fixed.
4417
4418 2003-03-16  Paul Brook  <paul@nowt.org>
4419
4420         * g95.h (g95_option_t): Add g77_calls. Remove inline_repack_arrays.
4421         * options.c (g95_parse_arg): Ditto.
4422         * module.c (mio_symbol_attribute): Handle the always_explicit bit.
4423         * resolve.c (resolve_formal_arglist): The always_explicit sould be set
4424         for the procedure, not the parameter.
4425         * trans-array.c (g95_trans_g77_array): New function.
4426         (g95_trans_assumed_size): Use it.
4427         (g95_trans_dummy_array_bias): Ditto.
4428         (g95_conv_array_parameter): Handle g77 arrays. Move existing body ...
4429         (g95_conv_expr_descriptor): ... to here.  Update callers.
4430         * trans-decl.c (g95_build_dummy_array_decl): Handle g77 arrays.
4431         (g95_get_symbol_decl): Avoid processing g77 arrays multiple times.
4432         * trans-expr.c (g95_conv_function_call): Handle g77 arrays.
4433         * trans-intrinsic.c (g95_get_symbol_for_expr): Never use g77 arrays.
4434         * trans-types.c (g95_is_nodesc_array): Handle g77 arrays.
4435         (g95_sym_type): Ditto.
4436
4437 2003-03-15  Paul Brook  <paul@nowt.org>
4438
4439         * trans-array.c (g95_walk_elemental_function_args): Don't amputate the
4440         first chain.
4441         * trans-expr.c (g95_conv_function_call): Use the resolved symbol.
4442
4443 2003-03-14  Paul Brook  <paul@nowt.org>
4444
4445         * trans-array.c (g95_array_is_packed): Remove.
4446         (g95_conv_array_base): Correctly handle all descriptorless cases.
4447         (g95_conv_array_stride): Use descriptorless strides.
4448         (g95_trans_dummy_array_bias): Don't always repack the array.
4449         (g95_build_dummy_array_decl): Automatic dummy arrays are only partial
4450         packed.
4451         * trans-types.c (g95_get_nodesc_array_type): Differentiate between
4452         dummy and non-dummy arrays...
4453         (g95_sym_type, g95_get_derived_type): ... like these.
4454         (g95_get_array_type_bounds): Allow discontiguous arrays.
4455
4456 2003-03-12  Paul Brook  <paul@nowt.org>
4457
4458         * array.c (g95_resolve_array_spec): Fix comment.
4459         * g95.h (symbol_attributes): New flag always_explicit.
4460         * resolve.c (resolve_formal_arglist): Set it always_explicit.
4461         * iresolve.c (g95_resolve_lbound, g95_resolve_ubound): Simplify.
4462         * trans-array.c (g95_conv_descriptor_dimension): Remove dead assert.
4463         (g95_trans_array_bounds): Allow assumed shape arrays.
4464         (g95_trans_repack_array): Remove.
4465         (g95_trans_dummy_array_bias): Rewite to use descriptorless arrays.
4466         * trans-decl.c (g95_build_qualified_array): Only ignore absent
4467         bounds for assumed size arrays.
4468         (g95_build_dummy_array_decl): Use descriptorless arrays.
4469         * trans-expr.c (g95_conv_expr_present): Allow descriptorless arrays.
4470         (g95_trans_pointer_assign): Fix typo.
4471         * trans-intrinsic.c (g95_conv_intrinsic_function_args): Remove dead
4472         code.
4473         (g95_conv_intrinsic_bound): Rewrite to handle descriptorless arrays.
4474         * trans-types.c (g95_get_nodesc_array_type): Allow non-packed arrays.
4475         Also modify callers.
4476         * trans-types.h (g95_get_nodesc_array_type): Modify prototype.
4477
4478 2003-03-08  Paul Brook  <paul@nowt.org>
4479
4480         * trans-array.c (g95_walk_elemental_functions): Don't reverse the SS.
4481         (g95_conv_array_ubound): Provide dummy value for assumed size arrays.
4482         * resolve.c (compare_spec_to_ref): Allow full array sections.
4483
4484 2003-03-08  Paul Brook  <paul@nowt.org>
4485
4486         * expr.c (g95_simplify_expr): Also simplify array index and
4487         substring expressions.
4488         * resolve.c (compare_spec_to_ref): Check for assumed size bounds.
4489         * trans-array.c (g95_trans_array_bounds): New function.
4490         (g95_trans_auto_array_allocation): Use it.
4491         (g95_trans_assumed_size): Rewrite.
4492         * trans-decl.c (gfor_fndecl_in_pack, gfor_fndecl_in_unpack): Declare.
4493         (gfor_fndecl_repack): Remove.
4494         (g95_build_qualified_array): Handle absent upper bounds.
4495         (g95_build_dummy_array_decl): Assumed shape arrays are descriptorless.
4496         (g95_get_symbol_decl): Update.
4497         (g95_build_intrinsic_function_decls): Initialize new decls.
4498         * trans.h (gfor_fndecl_in_pack, gfor_fndecl_in_unpack): Declare.
4499         (gfor_fndecl_repack): Remove.
4500         * trans-io.c (g95_build_io_library_fndecls): Correct prototypes.
4501         * trans-types.c: (g95_build_array_type): Merge duplicated code..
4502         (g95_get_nodesc_array_type): Handle absent bounds.
4503         * trans-types.h (g95_get_nodesc_array_type): Declare.
4504
4505 2003-03-04  Paul Brook  <paul@nowt.org>
4506
4507         * f95-lang.c (DEF_FUNCTION_TYPE_VAR_3): Define before including
4508         builtin-types.def.
4509
4510 2003-03-02  Paul Brook  <paul@nowt.org>
4511
4512         * options.c (g95_init_options): Drfault to 1.
4513         (g95_pasrse_arg): Add -frepack-arrays, use strcmp.
4514         * trans-array.c (g95_conv_array_data, g95_conv_array_base,
4515         g95_conv_array_stride,g95_conv_array_lbound, g95_conv_array_ubound):
4516         Handle non-constant size automatic arrays.
4517         (g95_conv_section_upper_bound, g95_conv_section_startstride): Use
4518         generic bound functions.
4519         (g95_trans_auto_array_allocation): Don't create a descriptor.
4520         (g95_trans_assumed_size): New function (broken).
4521         (g95_trans_dummy_array_bias): Remove unused var.
4522         * trans-array.h (g95_trans_assumed_size): Declare.
4523         * trans-decl.c (create_index_var): New fuction.
4524         (g95_build_qualified_array): New function.
4525         (g95_get_symbol_decl): Use it.
4526         (g95_trans_deferred_vars): Handle assumed shape seperately.
4527         * trans-types.c (get_element_type): Handle heap allocated arrays.
4528         (g95_is_nodesc_array): Include non-const size arrays.
4529         (g95_get_nodesc_array_type): Ditto.
4530
4531 2003-02-23  Paul Brook  <paul@nowt.org>
4532
4533         * trans-array.c (g95_array_init_size): Should use stride, not size of
4534         last dimension.
4535
4536 2003-02-18  Paul Brook  <paul@nowt.org>
4537
4538         * trans-expr.c (g95_trans_arrayfunc_assign): Nove elemental check
4539         after intrinsic function check.
4540
4541 2003-02-18  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4542
4543         * io.c (match_io): Fix missing return value and remove useless
4544         assignment.
4545         * match.c (g95_match): Remove useless assignment.
4546         * module.c (parse_string):  Remove useless post increment.
4547         * simplify.c (g95_simplify_verify): Remove useless assignment.
4548
4549 2003-02-15  Paul Brook  <paul@nowt.org>
4550
4551         * expr.c (restricted_intrinsic): Handle bad values gracefully.
4552         * g95.h (symbol_attribute): Add referenced member.
4553         (g95_symbol): Add dummy_order member.
4554         (g95_set_sym_referenced): Declare.
4555         * match.c (g95_match_assignment, g95_match_call): Use it
4556         * primary.c (match_actual_arg, g95_match_rvalue,
4557         g95_match_variable): Ditto.
4558         * symbol.c (next_dummy_order): New variable.
4559         (g95_set_sym_referenced): New function.
4560         (check_done): New function.
4561         (g95_add_*): Use it.
4562         * trans-decl.c: Make formatting conform to GCC standards.
4563         (g95_defer_symbol_init): Add dummy variables in the right order.
4564         (g95_get_symbol_decl): Only accept referenced variables.
4565         (g95_create_module_variable): Module variables are always required.
4566         (generatr_local_decls): New function.
4567         (generate_local_vars): New function.
4568         (g95_generate_function_code): Use it.
4569
4570 2003-02-13  Paul Brook  <paul@nowt.org>
4571
4572         * trans-decl.c (g95_conv_struct_cons): Remove.
4573         (g95_get_symbol_decl): Use g95_conv_expr for structure initializers.
4574         * trans-expr.c (g95_conv_structure): New function.
4575         (g95_conv_expr): Use it.
4576
4577 2003-02-09  Paul Brook  <paul@nowt.org>
4578
4579         * trans-array.c (g95_array_init_size): Don't evaluate the linit
4580         expressions multiple times.
4581         (g95_trans_auto_arry_allocation): Use pointer not tmp.
4582
4583 2003-02-08  Paul Brook  <paul@nowt.org>
4584
4585         * module.c (mio_symtree_ref): Declare as static.
4586         (mio_expr): Remove dead code.
4587         (read_module): Set the symtree link for fixups.
4588         * trans-intrinsic.c (g95_conv_intrinsic_round): Rename...
4589         (build_round_expr): ... to this.
4590         (g95_conv_intrinsic_aint): New function.
4591         (g95_conv_intrinsic_function): Use it.
4592
4593 2003-02-08  Paul Brook  <paul@nowt.org>
4594
4595         * trans-array.c (g95_trans_array_constructor_value): Use the acutal
4596         offset after modificaton, not the increment expression.
4597         * dependency.c: Kill excess whitespace.
4598
4599 2003-02-07  Sanjiv Gupta  <sanjivg@noida.hcltech.com>
4600
4601         * dependency.h: Remove some function declarations.
4602         * dependency.c (get_no_of_elements): Change this function not to
4603         return int.
4604         * other: Add comments for all modified functions.
4605
4606 2003-02-06  Paul Brook  <paul@nowt.org>
4607
4608         * g95spec.c (lang_specific_functions): Fix initializer warning.
4609         * dump-parse-tree.c (g95_show_expr): Use typespec instead of symtree
4610         for structure type names.
4611         * trans-decl.c (g95_cons_structure_cons): New function.
4612         (g95_get_symbol_decl): Use it.
4613         * trans-expr.c (g95_conv_component_ref): Remove duplicate pointer
4614         referencing code.
4615
4616 2003-02-06  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4617
4618         * resolve.c (compare_cases): Add const to casts.
4619
4620 2003-01-30  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4621
4622         * g95.h (g95_check_f): Change a1 to f1m.
4623         * intrinsic.c (add_sym_1m, check_specific,
4624         g95_intrinsic_func_interface): Use it.
4625
4626         * module.c (init_pi_tree): Remove useless cast.
4627         (fp2): Fix argument type.
4628
4629         * parse.c (parse_select_block): Add comment.
4630
4631 2003-02-05  Toon Moene  <toon@moene.indiv.nluug.nl>
4632
4633         * lang-options.h: Fix warning involving C90 concatenated
4634         strings.
4635
4636 2003-02-06  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4637             Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4638
4639         * io.c (format_asterisk): Complete initializer to kill warning.
4640         * arith.c (DEF_G95_INTEGER_KIND, DEF_G95_LOGICAL_KIND,
4641         DEF_G95_REAL_KIND, MPZ_NULL, MPF_NULL): New #defines.
4642         (g95_integer_kinds, g95_logical_kinds, g95_real_kinds): Use the
4643         new defines to complete initializers.  Kills all warnings.
4644
4645         * Make-lang.in: Comment cleanup.
4646
4647 2003-02-05  Paul Brook  <paul@nowt.org>
4648
4649         * array.c (g95_free_constructor): Handle NULL expressions.
4650         * resolve.c (resolve_structure_cons): Ditto.
4651         * decl.c (g95_match_null): New Function.
4652         (variable_decl): Use it.
4653         * module.c (mio_expr): Don't bother saving symtree for EXPR_STRUCTURE.
4654         * primary.c (g95_match_runtime): Don't use symtree for EXPR_STRUCTURE.
4655         * trans-types.c (g95_set_decl_attributes): Remove empty function.
4656
4657 2003-02-05  Paul Brook  <paul@nowt.org>
4658
4659         * trans.h (build1_v): New macro.
4660         (build_v): Remove pointless and incorrect prototype.
4661         * various: Use build1_v for GOTO_EXPR and LABEL_EXPRs.
4662         * f95-lang.c (g95_init_builtin_decls): DEF_BUILTIN takes 10 args.
4663
4664 2003-02-01  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4665
4666         * Make-lang.in (F95_OBJS): Remove one more dead file.
4667
4668 2003-02-01  Paul Brook  <paul@nowt.org>
4669
4670         * lang-specs.h: Don't pass -ffixed-form to the linker.
4671         * trans-decl.c (g95_generate_function_code): Clear saved decl chain.
4672
4673 2003-02-01  Paul Brook  <paul@nowt.org>
4674
4675         * Make-lang.in (F95_OBJS): Remove dead files.
4676         * trans-array.c (g95_array_init_size): Do the right thing when
4677         ubound=NULL.
4678         * trans-decl.c (g95_generate_function_code): Initialize deffered
4679         symbol list before translating contained subroutines.
4680         * trans-expr.c (g95_conv_expr, g95_conv_expr_reference): Substitute
4681         scalar invariant values here...
4682         (g95_conv_variable, g95_conv_function_call): ... instead of here ...
4683         * trans-intrinsic.c (g95_conv_intrinsic_function_args): .. and here.
4684
4685 2003-01-29  Paul Brook  <paul@nowt.org>
4686
4687         * trans-array.c (g95_add_loop_code): Put pre code in the right block.
4688         (g95_walk_elemental_function_args): Reverse chains before adding.
4689         (g95_reverse_ss): Move about a bit.
4690         * trans-expr.c (g95_conv_function_call): Handle scalar intrinsic
4691         function arguments.
4692
4693 2003-01-28  Paul Brook  <paul@nowt.org>
4694
4695         * intrinsic.c (resolve_intrinsic): Use correct union member.
4696         * trans-array.c (g95_trans_dummy_array_bias): Don't touch absent
4697         parameters.
4698         * trans-decl.c (g95_get_symbol_decl): Don't translate initializers for
4699         use associated variables.
4700         * trans-intrinsic.c (g95_conv_intrinsic_present): Move body ...
4701         * trans-expr.c (g95_conv_expr_present): ... to here.
4702         * trans.h: Declare it.
4703         * trans-types.c (g95_sym_type): Assume subroutine if not specified.
4704
4705 2003-01-28  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4706
4707         * array.c (expand_iterator): Suppress useless assignment.
4708         * decl.c (match_char_spec): Ditto.
4709         * io.c (match_io_iterator): Ditto.
4710         * primary.c (match_real_constant): Ditto.
4711         * interface.c (fold_unary, g95_free_interface, g95_extend_expr):
4712         Ditto.  Also, use g95_intrinsic_op not int for intrinsic operators.
4713         * matchexp.c (match_add_operand, match_level_5): Likewise.
4714         * module.c (parse_atom, find_enum): Likewise.
4715         * resolve.c: move #include <string.h>
4716         (resolve_select): Fix serious typo.
4717
4718 2003-01-28  Steven Bosscher  <s.bosscher@student.tudelft.n>
4719
4720         * Make-lang.in: Don't build with broken tree-ssa-pre.
4721
4722 2003-01-28  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4723
4724         * resolve.c (resolve_index): Add a TODO.
4725         * symbol.c: Remove useless "#include <ctype.h>".
4726
4727 2003-01-27  Paul Brook  <paul@nowt.org>
4728
4729         * check.c (check_rest): Allow different type kinds as an extension.
4730         * g95.h (g95_resolve_f): Add f1m.
4731         * intrinsic.c (add_sym_1m, resolve_intrinsic): Use it.
4732         * intrinsic.h: Chenge prototypes for MIN and MAX.
4733         * iresolve.c (g95_resolve_minmax): New function.
4734         (g95_resolve_min, g95_resolve_max): Use it.
4735         * trans-intrinsic.c (g95_trans_intrinsic_minmax): Only evaluate
4736         arguments once.
4737         (g95_conv_intrinsic_present): Fix logic.
4738
4739 2003-01-27  Steven Bossche  <s.bosscher@student.tudelft.nl>
4740
4741         * g95.h (g95_case): Don't be a tree, be a double linked list.
4742         * match.c (match_case_selector): Remove redundant semantics check.
4743         Clean up a few goto's to make it a tiny little bit faster.
4744         * resolve.c (case_tree): Die.
4745         (compare_cases): Accept and compare unbounded cases too.
4746         (check_case_overlap): Don't build a tree.  Instead, merge-sort the
4747         whole list of g95_cases passed from resolve_select.
4748         (sane_logical_select): Die.
4749         (check_case_expr): Return FAILURE if a CASE label is of the wrong
4750         type kind.
4751         (resolve_select): Fixup case expression for computed GOTOs, put it
4752         in expr, not expr2, for easier handing in the parse tree dumper and
4753         the code generator.  Rewrite the rest of the function: Kill
4754         unreachable case labels and unreachable case blocks.
4755         * dump-parse-tree.c (g95_show_code_node): Always dump expr for
4756         an EXEC_SELECT, not case2 anymore.
4757         * trans-const.c (g95_conv_constant_to_tree): New function.
4758         (g95_conv_constant): Use it.
4759         * trans-const.h: Declare prototype for the new function.
4760         * trans-stmt.c (g95_trans_integer_select, g95_trans_logical_select,
4761         g95_trans_character_select): New static functions.
4762         (g95_trans_select): Rewrite.
4763
4764 2003-01-26  Paul Brook  <paul@nowt.org>
4765
4766         * intrinsic.c (add_fnctions): Properly add dreal.
4767         * trans-intrinsic.c (g95_conv_intrinsic_present): New function.
4768         (g95_conv_intrinsic_function): Use it.
4769         * trans-io.c (build_dt): Abort on internal files (unimplemented).
4770
4771 2003-01-26  Paul Brook  <paul@nowt.org>
4772
4773         Widespread changes to the handling of symbols in expressions.  These
4774         are now linked via g95_symtree nodes.
4775         * parse.c (g95_fixup_sibling symbols): New function.
4776         (parse_contained): Use it.
4777         * g95.h (symbol_attribute): Add contained.  Indicates a symbol is a
4778         contained procedure that has bee correctly fixed up.
4779         (g95_code, g95_expr): Point to a g95_symtree, not a g95_symbol.
4780
4781 2003-01-24  Paul Brook  <paul@nowt.org>
4782
4783         * trans-array.c (g95_walk_expr): Function result attributes are in
4784         sym->result.
4785         * trans-expr.c (g95_conv_function_call,
4786         g95_trans_arrayfunc_assign): Ditto.
4787         * trans-decl.c (g95_get_symbol_for_expr): Set sym->result.
4788
4789 2003-01-23  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4790
4791         * expr.c (check_restricted): Fix error message.
4792         * symbol.c (free_st_labels): Plug memleak.
4793
4794 2003-01-22  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4795
4796         * arith.c (reduce_unary, reduce_binary_ac, reduce_binary_ca,
4797         reduce_binary_aa, reduce_binary, eval_intrinsic,
4798         eval_intrinsic_f2): Use typesafe prototypes for eval functions.
4799         * g95.h (g95_check_f, g95_simplify_f, g95_resolve_f): New unions
4800         for typesafe intrinsics helper functions.
4801         (g95_intrinsic_sym): Use them.
4802         * intrinsic.c (do_check, add_sym, add_sym_0, add_sym_1,
4803         add_sym_1s, add_sym_1m, add_sym_2, add_sym_3, add_sym_4,
4804         add_sym_5, add_conv, resolve_intrinsic, do_simplify,
4805         check_specific, g95_intrinsic_func_interface,
4806         g95_intrinsic_sub_interface): Adjust all calls to intrinsics
4807         helper functions.
4808         * trans-decl.c (g95_get_extern_function_decl): Likewise.
4809         * Make-lang.in: Don't disable warnings for strict prototypes
4810         any longer, everything is typesafe now.
4811
4812 2003-01-22  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4813
4814         * bbt.c (duplicate_node): Make static.
4815         * module.c (module_name): Make static.
4816         * scanner.c (include_dirs): Make static.
4817
4818 2003-01-20  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4819
4820         Hard coded _gfor_'s should not show up anymore.
4821         * g95.h (PREFIX): New macro.
4822         * iresolve.c (g95_resolve_cpu_time): Use PREFIX, not
4823         hard-coded "_gfor".
4824         (g95_resolve_random_number): Likewise.
4825         * trans-decl.c (g95_build_intrinsic_function_decls): Likewise.
4826         * trans-io.c: Remove 'prefix' macro.  Replace all uses with
4827         the new PREFIX macro from g95.h.
4828
4829 2003-01-20  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4830
4831         The troubles of forking... Andy implemented this just now too.
4832         Let's stick to that and keep the trees close.
4833         * g95.h (g95_st_label): 'format' member is now a g95_expr.
4834         * io.c: Revert previous changes.
4835         (g95_match_format): Match the format string as a character
4836         literal expression.
4837         * match.h (g95_statement_label): Declare external.
4838         * parse.c: Revert previous changes.
4839         * symbol.c (g95_free_st_label): Free a g95_expr instead
4840         if a 'char *'.
4841         * trans-io.c: Revert previous changes.
4842         (build_dt): Use set_string to set the format string.
4843
4844 2003-01-20  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4845
4846         * io.c (format_string): Make non-static.
4847         (g95_match_format): Remember the format string.
4848         (terminate_io): Add I/O termination for empty I/O lists.
4849         * match.h: Declare external format_string.
4850         * parse.c (check_statement_label): Attack the format string
4851         to a format label for FORMAT statements.
4852         * trans-io.c (g95_add_field): Define prefix macro.  Replace
4853         all uses of PREFIX define with a use of this macro.
4854         (build_dt): Implement formatted I/O for format labels.
4855
4856 2003-01-20  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4857
4858         * lang-options.h: Kill "-std=F".
4859         * options.c: Remove unimplemented "-std=F".  Modify
4860         web address.
4861         * misc.c (g95_terminal_width): New function.
4862         * error.c (g95_error_init_1): Use g95_terminal_width.
4863         * g95.h: Add prototype for g95_terminal_width, remove
4864         fmode flag.
4865
4866 2003-01-19  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4867
4868         * Make-lang.in: Fix typo.
4869
4870 2003-01-18  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4871
4872         * g95.h (struct g95_case): Remove unused cruft, new member
4873         'where' to keep track of the locus of the default case.
4874         * match.c (g95_match_case): Add locus to the current case.
4875         (match_case_selector): Likewise.
4876         * parse.c (parse_select_block): Move semantics check for
4877         multiple DEFAULT cases out of here to...
4878         * resolve.c (check_case_overlap): ...here.  Return sooner
4879         when possible.
4880         (check_case_expr): Take two g95_cases now, use to sure the
4881         expression kinds are the same.
4882         (resolve_select): Cleanup.
4883
4884 2003-01-18  Paul Brook  <paul@nowt.org>
4885
4886         * trans-io.c: Fix typos in ported IO work (set_fla[tg]).
4887         * trans-decl.c (g95_set_symbol_decl): Handle non-array result
4888         variables.
4889         (g95_get_extern_function_decl): Put decls in the correct context.
4890
4891 2003-01-18  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4892
4893         * trans-io.c: Port changes from Andy to set ERR flag.
4894
4895 2003-01-17  Paul Brook  <paul@nowt.org>
4896
4897         * trans-array.c: Add various comments.
4898         (g95_ss_terminator): Declare as const.
4899         (g95_walk_expr): Remove first parameter and update all callers.
4900         (g95_walk_op_expr): Initialize scalar SS properly.
4901         * trans-array.h (g95_walk_expr): Update prototype.
4902         * trans-expr.c: Update for new g95_walk_expr.
4903         * trans-intrinsic.c: Ditto.
4904         * trans-io.c: Ditto.
4905         * trans.h: Various comments for SS chains.
4906
4907 2003-01-17  Paul Brook  <paul@nowt.org>
4908
4909         * intrinsic.h (g95_generic_isym_id): Add G95_ISYM_S?_KIND, SPACING
4910         and RRSPACING.
4911         * intrinsic.c (add_functions): Use them.
4912         * trans-intrinsic.c (g95_conv_intrinsic_function): Ditto.
4913         * trans-expr.c (g95_conv_expr_lhs): Abort on impossible error.
4914
4915 2003-01-17  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4916
4917         Fallout of a small merge conflict:
4918         * intrinsic.c: Un-revert lost patch (G95_ISYM_SCALE).
4919
4920 2003-01-17  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4921
4922         * initrinsic.c: New add_sym_* functions for strong typing.
4923         (add_conv): Make prototype strict.
4924         * dump-parse-tree.c, dependency.c: Include config.h
4925         * resolve.c, trans-io.c: Fix typos.
4926
4927 2003-01-17  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4928
4929         * dump-parse-tree.c (g95_show_code_node): Show the
4930         condition for a computed GOTO that was transformed
4931         to a SELECT CASE construct.
4932         * resolve.c (check_case_overlap): Revert previous switch
4933         to treaps, it was too slow and didn't catch all trouble.
4934         (resolve_symbol): Be more flexible about module procedures.
4935         * symbol.c (check_conflict): Point to relevant section in
4936         the standard for dubious conflict.  Allow procedure
4937         dummy arguments to be optional again.
4938         * trans-io (add_field): Rename to g95_add_field.  Change
4939         all callers.
4940         * trans-stmt (trans_select): Handle unbounded cases for
4941         integer SELECT CASE constructs.  Fix/add more comment.
4942
4943 2003-01-17  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4944
4945         * g95.h: Uses GCC's function attribute macros.
4946         * error.c, module.c, parse.c, g95.h: More function attributes.
4947
4948 2003-01-16  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4949         Forgot a file...
4950         * trans-decl.c (get_label_decl): Use TREE_LINENO instead
4951         of DECL_SOURCE_LINE, and TREE_FILENAME instead of
4952         DECL_SOURCE_FILE.
4953
4954 2003-01-16  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4955
4956         * f95-lang.c (pushdecl): Use TREE_LINENO instead of
4957         DECL_SOURCE_LINE.
4958         * trans.c (g95_trans_code): Use annotate_all_with_file_line
4959         instead of nowdead wrap_all_with_wfl.
4960
4961 2003-01-14  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4962
4963         * parse.c (g95_parse_file): In verbose mode, dump the parse tree
4964         before generating code, so we can still see it even if the code
4965         generation phase dies.
4966
4967 2003-01-14  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4968
4969         * decl.c (build_sym): Split out initialization expression parts...
4970         (add_init_expr_to_sym): ...to here.
4971         (variable_decl): Add the symbol following an attribute list to the
4972         symbol tree before parsing the optional initialization expression
4973         if the symbol is not of a derived type.
4974         * primary.c (g95_match_rvalue): Don't assume a symbol always has
4975         a value if it is a PARAMETER.
4976
4977 2003-01-14  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4978
4979         * misc.c: Don't #include <mcheck.h>
4980         * module.c: Ditto.  Kill uses of mtrace, muntrace.  If there
4981         ever was a glibc bug, then either this was never reported to
4982         glibc people, or it has been fixed for so long that there's
4983         no information you can find about it, anywhere.
4984
4985 2003-01-14  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4986
4987         Fix warnings:
4988         * module.c (attr_bits, bt_types, array_spec_types):
4989         Switch 'const' and 'static'.
4990         * iresolve.c (g95_resolve_reshape): Make __resolve0 non-'const'.
4991
4992         GNU'ify source code:
4993         * trans-io.c: Numerous fixes, one fixed warning and a few
4994         TODO markers so that we don't forget about them.
4995
4996 2003-01-13  Paul Brook  <paul@nowt.org>
4997
4998         * intrinsic.c (add_functions): Add G95_ISYM_SCALE.
4999         * intrinsic.h (g95_generic_isym_id): Remove bogus G95_ISYM_ANINIT.
5000         Add G95_ISYM_SCALE.
5001         * trans-intrinsic.c (g95_conv_intrinsic_function): Ditto
5002         * match.c (g95_match_stop): Fix dumb == -> != error.
5003
5004 2003-01-13  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5005
5006         * dump-parse-tree.c (show_indent): Add line breaks.  This
5007         whole dumping process needs cleanups.
5008         * f95-lang.c (g95_mark_addressable): Fix prototype to match
5009         the langhook.  Fix 'return's accordingly.
5010         * g95-support.h: Adjust prototype.
5011         * g95.h: Add 'no_backend' member to 'g95_option_t' struct.
5012         * lang-options.h: Add '-fsyntax-only'.
5013         * options.c (g95_init_options): Init 'no_backend'.
5014         (g95_parse_arg): Deal with '-fsyntax-only'.
5015         * parse.c (g95_parse_file): Do not generate code if 'no_backend'
5016         is set.
5017
5018 2003-01-13  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5019         Patch from Arnaud
5020         * resolve.c (resolve_symbol): Assumed shape arrays must be dummy
5021         arguments.  Also make sure that if a symbol is marked INTRINSIC,
5022         an intrinsic with the symbol's name actually exists.
5023         (check_conflict): Make EXTERNAL and DIMENSION attributes conflict.
5024         Do not allow PROCEDURES to have the SAVE, POINTER, TARGET,
5025         ALLOCATABLE, RESULT, IN_NAMESPACE, OPTIONAL or FUNCTION attribute.
5026
5027 2003-01-13  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5028
5029         * resolve.c (resolve_contained_functions): Fix condition, don't
5030         throw internal_error if a child namespace has no name.  Apparently
5031         this can be the case?
5032
5033 2003-01-11  Paul Brook  <paul@nowt.org>
5034
5035         Port changes from Andy's tree:
5036         * g95.h (g95_code): Add stop_code.
5037         * match.c (g95_match_stop): Detter syntax checking.
5038         * resolve.c (resolve_generic_f0): Return match type.
5039         (resolve_generic_f): Remove dead/duplicated code.
5040         (resolve_specific_f): Ditto.
5041         * dump-parse-tree.c (g95_show_code_node): Handle new STOP format.
5042         * trans-decl.c (gfor_fndel_stop_*): New fndecl nodes.
5043         * trans-stmt.c (g95_trans_stop): Handle new STOP format.
5044
5045 2003-01-11  Paul Brook  <paul@nowt.org>
5046
5047         * trans-array.c: Various documentation/comment changes.
5048         * trans-stmt.c: Ditto.
5049
5050
5051 2003-01-10  Paul Brook  <paul@nowt.org>
5052
5053         * options.c/h: Add -fdump-parse-tree as alias of -v.
5054
5055 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5056
5057         * dump-parse-tree.c (g95_show_namespace): Fixed another
5058         typo.  Sorry, it's Friday...
5059
5060 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5061
5062         Spotted by Tobi:
5063         * trans-array.c, trans-array.h, trans.c, trans-const.c,
5064         trans-const.h, trans-decl.c, trans-expr.c, trans.h
5065         trans-intrinsic.c, trans-io.c, trans-stmt.c, trans-stmt.h
5066         trans-types.c: Fix bogus copyright years, add 2003.
5067         * trans-types.h: Give copyright header.
5068
5069 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5070
5071         * dump-parse-tree.c (g95_show_namespace): Fixed typo.
5072         * expr.c, options.c, scanner.c: Add some more 'const' markers.
5073         * intrinsic.c: Some constant strings moved to read-only memory.
5074         * io.c (format_asterisk): Move to...
5075         * g95.h: ...here.
5076
5077 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5078
5079         * dump-parse-tree.c (g95_show_namespace): Dump implicit
5080         types for ranges instead of per-letter.  Indent the
5081         'CONTAINS' just like everything else.
5082         * resolve.c (resolve_contained_functions): Clarify comment.
5083         Explain non-obvious conditional expression.  Improve
5084         diagnostics if tyoe cannot be resolved.
5085         Port semi-fix from Andy's tree:
5086         (was_declared): Move up before first use.
5087         (generic_sym, specific_sym): New functions.  Code moved
5088         out if procedure_kind.
5089         (procedure_kind): Simplify using new functions.
5090         (resolve_generic_f): Make sure the functions we find in
5091         a parent namespace is generic.
5092         (resolve_specific_f): Ditto for specific functions.
5093
5094 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5095
5096         * trans-stmt.c, trans.c: Fix some code style issues. Add
5097         some more comment (but still not enough!).
5098
5099 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5100
5101         * symbol.c (flavors, procedures, intents, acces_types,
5102         access_types, ifsrc_types): Make const.
5103         * misc.c (g95_string2code): Make 'm' param 'const'.
5104         * module.c (find_enum, write_atom, mio_name): Make
5105         'm' param 'const'.
5106         (attr_bits, bt_types, array_spec_types, array_ref_types,
5107         ref_types, expr_types): Make const.
5108         * g95.h: Adjust external decls.
5109
5110 2003-01-09  Paul Brook  <paul@nowt.org>
5111
5112         * Testsuite: Add a load of new cases.
5113
5114 2003-01-08  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5115
5116         * Make-file.in: Add dependency on back end header files;
5117         a parallel build should work now.
5118         * f95-lang-c (lang_identifier): Remove bogus comment.
5119         (g95_be_parse_file): Fix prototype.
5120         (g95_init): Make static.
5121         (g95_finish): Make static.
5122         * error.c (g95_syntax_error): Kill. Make define in...
5123         * g95.h (g95_syntax_error): Define.
5124         (g95.options): Make 'source' member 'const'.
5125         * interface.c (g95_match_interface): Explain
5126         hard-to-read condition.
5127         (g95_match_end_interface): Ditto.
5128         * trans_const.c (g95_build_string_const): Make 's' parameter
5129         'const'.
5130         * trans_const.h: Adjust protoype accordingly.
5131         * trans-decl.c: Include tree-dump.h
5132         (g95_generate_function_code): Build fixes for recent changes
5133         in the tree-ssa branch.
5134
5135 2003-01-08  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5136
5137         * format.c: Kill, move code from here...
5138         * io.c: ...to here.
5139         * Make-lang.in: Adjust.
5140         * MANIFEST: Ditto.
5141         * match.h: Ditto.
5142         * BUGS: Mention where to submit bugs.  Move old content...
5143         * TODO: ...to here.  New file.
5144
5145 2003-01-08  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5146         Fix most warnings, and suppress the ones we can't fix for now.
5147         * Make-lang.in: Suppress warnings about bad proto's in g95.h,
5148         these warnings just clutter the screen and there's not much
5149         we can do about them for now anyway.
5150         * check.c, iresolve.c: Mark unused function parameters.
5151         * dump-parse-tree.c (g95_show_array_spec): Punt on AS_UNKNOWN,
5152         they should be resolved before they get here.
5153         * error.c: Remove unused FILE *status_out.
5154         * f95-lang.c (g95_init): Remove bogus cast.
5155         * Many files: Make things 'const' where required.
5156         * g95.h: Fix prototypes for all modified functions above.
5157         (g95_options): Remove 'object' member.
5158
5159 2003-01-07  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5160
5161         * Make-file.in: Cleanup bogus targets.  Add more comment.
5162         * lang-options.h: New option '-w'.
5163         * g95.h: add no_options field to struct g95_options.
5164         * options.c (g95_init_options): Default no_warnings to off.
5165         (g95_parse_arg): Recognise the '-w' switch and its alias,
5166         '-fno-warnings'.
5167         * error.c (g95_warning, g95_warning_now): Don't emit warning if
5168         no_warning option is set.
5169         * iresolve.c (g95_resolve_shape): Fix warning.
5170
5171 2003-01-07  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5172
5173         * primary.c (g95_next_string_char): Rename next_string_char, and
5174         make static.  Adjust callers accordingly.
5175         * resolve.c (resolve_generic_f0): Return try, not match.  Adjust
5176         callers accordingly.
5177         * g95.h: Split out all g95_match* functions to...
5178         * match.h: ...here. New file.
5179         * array.c, decl.c, expr.c, format.c, interface.c, io.c, match.c,
5180         matchexp.c, module.c, parse.c, primary.c: Inlcude match.h
5181
5182 2003-01-07  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5183
5184         * symbol.c (g95_clear_new_implicit, g95_add_new_implicit_range,
5185         g95_merge_new_implicit): New functions.
5186         (g95_match_implicit_none, g95_match_implicit): Move from here...
5187         * match.c (g95_match_implicit_none, g95_match_implicit): ... to here.
5188         Modify to use the new functions in symbol.c.
5189         * g95.h: Add and move prototypes.
5190
5191 2003-01-06  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5192
5193         * bbt.c (insert): Use a typedef'ed compare_fn prototype for the
5194         node compare function.
5195         (g95_insert_bbt): Likewise.
5196         (g95_insert_bbt_with_overlap): Likewise.
5197         (g95_delete_bbt): Likewise.
5198         (delete_treap): Likewise. Also fix a potential bug when calling it.
5199         * module.c (compare_pointers): Change proto to compare_fn.
5200         (compare_integers): Likewise.
5201         (compare_true_names): Likewise.
5202         (find_true_name): Adjust call to compare_true_names to match proto.
5203         (require_atom, write_atom, mio_name): Fix 'const' warnings.
5204         (init_pi_tree): Make compare a compare_fn instead of (int *).
5205         * resolve.c (compare_cases): Change proto to compare_fn.
5206         * symbol.c (g95_compare_symtree): Change proto to compare_fn, make
5207         it static, and rename to compare_symtree.
5208         (delete_symtree, g95_undo_symbols, g95_new_symtree): Use renamed
5209         function.
5210         * g95.h: Kill g95_compare_symtree prototype. Adjust prototypes
5211         of g95_insert_bbt, g95_insert_bbt_with_overlap, and g95_delete_bbt.
5212
5213 2003-01-06  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5214         * Make-lang.in: Fix spaces/tabs issues from previous patch.
5215         * patch.options: Blow away Paul's checkin mistake :-)
5216         * io.c (terminate_io): Fix memory leak (Arnaud).
5217
5218 2003-01-06  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5219
5220         * Make-lang.in: Teach about building DVI, info manual.
5221         * g95.texi: New file.
5222
5223 2003-01-02  Paul Brook  <paul@nowt.org>
5224
5225         * trans-array.c (g95_reverse_ss): Make static and don't use.
5226         (g95_conv_ss_descriptor): Don't use g95_loopinfo
5227         (g95_conv_array_parameters): Modify for pointer assignments.
5228         (g95_walk_subexpr): New function.
5229         (g95_walk_expr*): Use it.
5230         * trans-array.h (g95_reverse_ss): Remove prototype.
5231         * trans-expr.c (g95_trans_pointer_assign): Implement.
5232         (Many): Set se.want_pointer before calling g95_conv_array_parameter.
5233         * trans-intrinsic.c: Sync with scalarizer changes.
5234         * trans-io.c: Ditto.
5235
5236 2002-12-29  Paul Brook  <paul@nowt.org>
5237
5238         * trans-array.c: Document calling convention for arrays.
5239
5240 2002-12-19  Paul Brook  <paul@nowt.org>
5241
5242         * trans-intrinsic.c (g95_conv_intrsinsic_function): Remove incorrect
5243         assertion. Remove intrinsic subroutine G95_ISYM_* cases. Always pass
5244         optional parameters for some intrinsics.
5245         (g95_is_intrinsic_libcall): Add G95_ISYM_RESHAPE.
5246         * trans-expr.c (g95_conv_function_call): Pass NULL for absent
5247         optional parameters.
5248         * trans.h (g95_se): Add ignore_optional flag.
5249
5250 2002-12-15  Paul Brook  <paul@nowt.org>
5251
5252         * trans-array.c (g95_conv_array_parameter): Fix partial rank sections.
5253         * trans-decl.c (g95_generate_function_code): Use TDI_original.
5254
5255 2002-12-14  Paul Brook  <paul@nowt.org>
5256
5257         * trans-stmt.c (g95_trans_call): Use resolved symbol name.
5258
5259 2002-12-12  Paul Brook  <paul@nowt.org>
5260
5261         * trans-array.c (g95_trans_array_constructor_subarray): Fully
5262         initialize the scalarizer.
5263         (various): Update to new format of g95_expr->value.constructor.
5264
5265 2002-12-08  Paul Brook  <paul@nowt.org>
5266
5267         * trans-array.c (g95_put_offset_into_var): New function.
5268         (g95_trans_array_constructor_subarray): New function.
5269         (g95_trans_array_constructor_value): Use it.
5270         (g95_array_cons_size): Don't abort() on array components.
5271
5272 2002-12-08  Paul Brook  <paul@nowt.org>
5273
5274         * Make-lang.in (F95_ADDITIONAL_OBJS): Remove tree-dchain.o.
5275         * support.c: Update #includes.
5276         (statement_code_p, c_size_in_bytes, s_size_type_node): Remove.
5277         * trans-array.c: Update #includes.
5278         * trans.c: Ditto.
5279         * trans-const.c: Ditto.
5280         * trans-io.c: Ditto.
5281         * trans-types.c: Ditto.
5282         (g95_init_types): Set size_type_node.
5283         * trans-decl.c: Update #includes.
5284         (gfor_fndecl_adjust{l,r}): Declare and initialize.
5285         * trans-stmt.c: Update #includes.
5286         (g95_trans_do_while): Generate LABEL_EXPR, not GOTO_EXPR.
5287         (g95_trans_select): Fix check for unbounded ranges.
5288         * trans-expr.c: Update #includes.
5289         (g95_conv_string_tmp): New function.
5290         (g95_conv_concat_op): Use it.
5291         * trans.h (g95_conv_string_tmp, gfor_fndecl_adjust{l,r}): Declare.
5292         * Trans-intrisic.c: Update #includes.
5293         (g95_conv_intrinsic_strcmp): New function.
5294         (g95_conv_intrinsic_adjust): Ditto.
5295         (g95_conv_intrinsic_function: Use them.
5296
5297 2002-11-30  Paul Brook  <paul@nowt.org>
5298
5299         * trans-array.c (g95_walk_function_expr): Handle non-array return by
5300         reference.
5301         * trans-dec.c (g95_build_function_decl): Handle character return
5302         parammeters.
5303         (g95_get_fake_result_decl): Ditto.
5304         (g95_trans_deferred_vars): Ditto.
5305         * trans-expr.c (g95_conv_function_call): Ditto.
5306         (g95_trans_arrayfunc_assign) Limit to array valued functions.
5307         * trans-intrinsic.c (g95_conv_intrinsic_char): New function.
5308         (g95_conv_intrinsic_function): Use it.
5309         * trans-types.c (g95_sym_type): Handle functions returning strings.
5310         (g95_return_by_reference): Ditto.
5311         (g95_get_function_type): Ditto.
5312
5313 2002-11-18  Paul Brook  <paul@nowt.org>
5314
5315         * trans-stmt.c (g95_trans_if): Fix IF statements when the condition
5316         requires a temporary.
5317         (g95_trans_select): Handle computed gotos.
5318         * trans-types.c (g95_build_array_type): Warn about non-functional
5319         assumed shape arrays.
5320         * trans-expr.c (g95_trans_scalar_assign): Correctly handle post
5321         blocks.
5322         * trans-intrinsic.c (g95_conv_intrinsic_round): New function.
5323         (g95_conv_intrinsic_int): New function.
5324         (g95_conv_intrinsic_mod): New function.
5325         (g95_conv_intrinsic_ichar): New function.
5326         (g95_conv_intrinsic_function): Use them.
5327         (g95_conv_intrinsic_dim): Use g95_evaluate_now.
5328
5329 2002-11-17  Toon Moene  <toon@moene.indiv.nluug.nl>
5330
5331         * trans-types.c (g95_build_array_type): Assumed
5332         sized arrays can have rank > 1.
5333         * trans.c (g95_trans_code): Remove erroneous
5334         warning about CONTINUE.
5335         * trans-expr.c (g95_conv_variable): Remove
5336         erroneous assert.
5337
5338 2002-11-15  Paul Brook  <paul@nowt.org>
5339
5340         * trans-array.c (g95_conv_array_parameter): Check for NULL stride.
5341
5342 2002-10-31  Paul Brook  <paul@nowt.org>
5343
5344         * f95-tree.c: Remove tree copying stuff that's now in gimple.c
5345         * trans-expr.c (g95_conv_component_ref): Handle character string
5346         components.
5347         (g95_conv_string_parameter): Ditto.
5348         * trans-types.c (g95_get_derived_type): Add length decl to caracter
5349         string components.
5350
5351 2002-10-10  Paul Brook  <paul@nowt.org>
5352
5353         * trans-decl.c (gfor_fndecl_size?): Declare and initialize.
5354         * trans-expr.c (g95_conv_function_call): Remove unreliable return value
5355         check.
5356         * trans-intrinsic.c (g95_conv_intrinsic_size): New function.
5357         (g95_conv_intrinsic_function): Handle size and shape intrinsics.
5358         (g95_is_intrinsic_libcall): Add G95_ISYM_SHAPE.
5359         * trans-types.c (pvoid_type_node): Declare and initialize.
5360         * trans-array.c: Fix typo COMPONENT_REF->REF_COMPONENT
5361         (g95_array_allocate): Fix when base==data.
5362         (g95_conv_array_parameter): Correctly handle reduced rank sections.
5363         * trans-io.c (g95_trans_write): Correctly handle string modifiers.
5364
5365 2002-10-09  Paul Brook  <paul@nowt.org>
5366
5367         * (g95_conv_expr_reference): Handle character strings correctly.
5368
5369 2002-10-07  Paul Brook  <paul@nowt.org>
5370
5371         (g95_expand_decl): Rename from f95_expand_decl_stmt and use as
5372         langhook.
5373         * trans-array.c (g95_build_array_initializer): Remove.
5374         (g95_conv_array_initializer): New Function.
5375         (g95_trans_auto_arry_allocation): Cleanup.
5376         (g95_trans_init_character_array): Remove.
5377         * g95spec.c: Link in libgforbegin.
5378         * trans.c (g95_generate_code): Rename main function to MAIN__.
5379         (g95_create_var): New function.
5380         (g95_create_var_np): New function.
5381         (g95_evaluate_now): New function.
5382         (g95_start_block): New function.
5383         (g95_finish_block): New function.
5384         (g95_add_expr_to_block): New function.
5385         (g95_add_block_to_block): New function.
5386         * trans-expr.c (g95_conv_componen_ref): New function.
5387         * Make-lang.in (F95_ADDITIONAL_OBJS): Add gimplify.o.
5388         (F95_OBJS): Add dependency.o.
5389         * f95-lang.c (g95_is_simple_stmt): Remove.
5390         * f95-tree.c (mark_not_simple): New function.
5391         (unshare_all_trees): New function.
5392         (create_tmp_var, create_tmp_alias_var): Remove.
5393         * support.c (declare_tmp_vars, tree_last_decl): Remove.
5394         * trans*: Convert to new IR using GENERIC trees.  Don't bother about
5395         SIMPLE/GIMPLE rules, this is now done by Lang-independant code.
5396
5397 2002-10-01  Paul Brook  <paul@nowt.org>
5398
5399         * trans-array.c: Add support for descriptorless arrays.
5400         (g95_conv_array_data): New function.
5401         (g95_conv_array_base): New function.
5402         * trans-array.h: Declare these here.
5403         * trans-decl.c(g95_create_mopdule_variable): Perform variable
5404         initialization and creation here.
5405         (g95_create_module_vars): Instead of here.
5406         * trans.h (G95_TYPE_ARRAY_*: Rename from G95_TYPE_DESCRIPTOR_*.
5407         * trans-intrinsic.c: Ditto.
5408         * trans-types.c (g95_is_nodesc_array): New function.
5409         (g95_get_nodesc_array_type): New function.
5410         (g95_sym_type, g95_get_derived_type): Use them.
5411         * trans-const.c (g95_conv_mpf_to_tree): Remove workaround.
5412
5413 2002-09-28  Paul Brook  <paul@nowt.org>
5414
5415         * trans-const.c (g95_conv_mpf_to_tree): Work around backend bug.
5416         * trans-intrinsic.c (g95_conv_intrinsic_abs): Correctly detect complex
5417         parameters.
5418
5419 2002-09-24  Paul Brook  <paul@nowt.org>
5420
5421         * f95-lang.c (listify): Remove declaration.
5422         (expand_function_body): Use optimize >=1 instead of flag_tree_saa.
5423         (listify)
5424         * f95-tree.c (get_name): New function.
5425         * trans.c (module_namespace): Remove.
5426         * trans-decl.c: Use g95_chainon_list rather than chainon(listify()).
5427         * trans-types.c: Ditto.
5428
5429 2002-09-19  Paul Brook  <paul@nowt.org>
5430
5431         * trans-array.c (g95_get_array_cons_size): New Function.
5432         (g95_con_ss_startstride): Handle Array constructors.
5433         (g95_conv_loop_setup): Ditto.
5434         (g95_conv_array_parameter): Ditto.
5435         * tras-decl.c (g95_finish_var_decl): Make initializes variables
5436         static.
5437
5438 2002-09-19  Paul Brook  <paul@nowt.org>
5439
5440         * trans.c (g95_simple_fold_tmp): Detect variables inside
5441         NON_LVALUE_EXPR.
5442         * trans-stmt.c (g95_trans_arithmetic_if): Implement this.
5443
5444 2002-09-18  Steven Bosscher <s.bosscher@student.tudelft.nl>
5445
5446         * Make-lang.in (F95_ADDITIONAL_OBJS): Add tree-ssa-dce.o
5447
5448 2002-09-14  Paul Brook  <paul@nowt.org>
5449
5450         * trans.c (g95_create_module_variable): Move to trans-decl.c.
5451         * trans-const.c (g95_conv_string_init): New Function.
5452         * trans-const.h: Declare it.
5453         * trans-decl.c (g95_get_symbol_decl): Handle initializers for static
5454         variables. Don't bail on intrinsic symbols.
5455         (get_extern_function_decl): Handle specific intrinsic functions.
5456         * trans-types.c (g95_sym_type): Dummy functions don't return
5457         reference types.
5458         * trans-array.c (g95_build_array_initializer): New Function.
5459         (g95_trans_auto_array_allocation): Build initializer for static decls.
5460         Don't use mpz_addmul, it's GMP4 only.
5461
5462 2002-09-12  Paul Brook  <paul@nowt.org>
5463
5464         * trans-decl.c (g95_generate_code): Fix thinko with return variable.
5465         (g95_get_extern_function_decl, g95_build_function_decl): Mangle
5466         assembler names for module procedures.
5467
5468 2002-09-11  Tobias Schlueter  <Tobias.Schlueter@physik.uni-muenchen.de>
5469
5470         * trans-array.c,h trans-expr.c, trans-stmt.c: Correct spelling of
5471         dependency/
5472
5473 2002-09-10  Paul Brook  <paul@nowt.org>
5474
5475         * trans-array.c: Change format of G95_SS_TEMP strictures.
5476         (g95_check_fncall_dependancy): New function.
5477         (trans_dummy_array_bias): stride[n], not stride[n-1]. for calculating
5478         offsets.
5479         * trans-decl.c (g95_get_symbol_decl): move assertion after handling of
5480         result variables.
5481         (g95_build_function_decl): Don't assume result arrays are packed.
5482         (g95_trans-deferred-vars): Handle array result variables.
5483         (g95_generate_fuction_code): Clear saved_function_decls.
5484         * trans-expr.c (g95_conv_fnction_call): Handle direct array return by
5485         reference.
5486         (g95_trans_arrayfunc_assign): New function.
5487         (g95_trans_assignment): Use it.
5488         * trans.h (g95_ss): Add temp struct for G95_SS_TEMP.
5489         (g95_se): Add direct_byref.
5490         * trans-types.c: Use sym->result rather than sym where appropriate.
5491         * trans-intrinsic.c (g95_conv_intrinsic_funcall): New function.
5492         Update other functions to use this.
5493         (g95_is_intrinsic_libcall): New function.
5494         (g95_conv_intrinsic_function): Add MATMUL and PRODUCT intrinsics.
5495         (g95_walk_intrinsic_function): Ditto.
5496
5497 2002-09-08  Paul Brook  <paul@nowt.org>
5498
5499         * trans-types.c: Change rank field to dtype field in array descriptor.
5500         * trans-array.c: Implement filling of dtype array descriptor field.
5501         * trans-intrinsic.c: Fix broken LEN intrinsic.
5502
5503 2002-09-07  Paul Brook  <paul@nowt.org>
5504
5505         * trans-intrinsic.c: Remove outdated todo intrinsic list.
5506         (g95_get_symbol_for_expr): Remove hack for fortran based intrinsics.
5507         (g95_walk_intrinsic_function): Add MINLOC and MAXLOC.
5508
5509 2002-09-06  Paul Brook  <paul@nowt.org>
5510
5511         * Make-lang.in (F95_ADDITIONAL_OBJS): Add tree_alias_comon.o.
5512         (gt-f95-trans-types.h): Add dependancy information.
5513         * config-lang.in (gtfiles): Add trans-types.c
5514         * f95-lang.c (g95_be_parse_file): Pass error and warning counts
5515         back to top-level code.
5516         * trans-array.c, trans-types.c: Change format of array descriptor.
5517         (g95_conv_descriptor_dimension): New function.
5518         * trans-types.h (g95_conv_descriptor_rank): define.
5519         * trans-intrinsic.c: Implement PRODUCT, COUNT. MINLOC and MAXLOC
5520         intrinsics.
5521
5522 2002-09-02  Steven Bosscher <s.bosscher@student.tudelft.nl>
5523
5524         * trans-array.c, trans-types.c: Add rank information to descriptor.
5525
5526 2002-09-06  Tobias Schlueter  <Tobias.Schlueter@physik.uni-muenchen.de>
5527
5528         * trans-stmt.c (g95_trans_allocate): Fix when ref==NULL.
5529
5530 2002-09-04  Paul Brook  <paul@nowt.org>
5531
5532         * f95-lang.c (g95_create_decls): New function.
5533         (g95_init):  Move initialization of external decls to above, and call
5534         from g95_be_parse_file.
5535         * trans.c (g95_finish_stmt): Don't amputate the decl chain.
5536         * trans-types.c (g95_init_types): Always name integer and char types.
5537         (g95_get_array_type_bounds): TYPE_NAME may be a TYPE_DECL.
5538
5539 2002-09-02  Steven Bosscher <s.bosscher@student.tudelft.nl>
5540
5541         * Make-lang.in: Add options.c to F95_PARSER_OBJS
5542
5543 2002-09-02  Paul Brook  <paul@nowt.org>
5544
5545         * g95_generate_code: Clear the attr for __fortran_main.
5546         * trans-types.c (g95_finish_type): New function.
5547         * g95_init_io_state_type: Use g95_finish_type.
5548         * g95_conv_intrinsic_anyall: Fix thinko in result initialization.
5549
5550 2002-09-01  Paul Brook  <paul@nowt.org>
5551
5552         * README.backend: Warn about the dangers of extra config.h files.
5553         Remove obsolete libgfor stuff.
5554         * config-lang.in: Add target-libgfor dependancy.
5555         * g95_conv_mpf_to_tree: Use & free allocated buffer p rather than buff.
5556
5557 2002-09-01  Toon Moene  <toon@moene.indiv.nluug.nl>
5558
5559         * g95_conv_mpz_to_tree: Free storage pointed to by q,
5560         not by buff.
5561
5562 2002-08-30  Paul Brook  <paul@nowt.org>
5563
5564         * trans-intrinsic.c (g95_conv_intrinsic_function,
5565         g95_walk_intrinsic_function): Added ANY and ALL.
5566         (g95_conv_intrinsic_anyall): New function.
5567         * iresolve.c (g95_resolve_any, g95_resolve_all): Include rank in
5568         mangled name