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