gcc/fortran/ChangeLog

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