OSDN Git Service

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