gcc/fortran/ChangeLog

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