OSDN Git Service

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