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