2005-01-22 Steven G. Kargl <kargls@comcast.net>
[official-gcc.git] / gcc / fortran / ChangeLog
blob2a6a758b017c115eb804d1acd74018c9629599cb
1 2005-01-22  Steven G. Kargl  <kargls@comcast.net>
3         * intrinsic.c (make_alias):  Add standard argument. 
4         (add_functions): Update make_alias calls.
6 2005-01-22  Paul Brook  <paul@codesourcery.com>
8         * trans-expr.c (gfc_conv_function_call): Remove bogus TODO.
10 2005-01-22  Paul Brook  <paul@codesourcery.com>
12         * gfortran.h (gfc_check_access): Add prototype.
13         * match.c (gfc_match_namelist): Remove TODO.
14         * module.c (check_access): Rename ...
15         (gfc_check_access): ... to this.  Boolify.  Update callers.
16         * resolve.c (resolve_symbol): Check for private objects in public
17         namelists.
19 2005-01-22  Paul Brook  <paul@codesourcery.com>
21         * primary.c (gfc_match_rvalue): Only apply implicit type if variable
22         does not have an explicit type.
23         (gfc_match_variable): Resolve implicit derived types in all cases.
24         Resolve contained function types from their own namespace, not the
25         parent.
26         * resolve.c (resolve_contained_fntype): Remove duplicate sym->result
27         checking.  Resolve from the contained namespace, not the parent.
29 2005-01-22  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
31         PR fortran/19543
32         * trans-const.c (gfc_conv_constant_to_tree): Give logical
33         constants the correct type.
35         PR fortran/19194
36         * trans-io.c (ADD_STRING): Use gfc_charlen_type_node for string
37         length parameters.
38         (gfc_build_io_library_fndecls): 'rec' and 'recl_in' are not
39         pointer fields.
41 2005-01-18  Kazu Hirata  <kazu@cs.umass.edu>
43         * arith.c, array.c, check.c, decl.c, expr.c, f95-lang.c,
44         gfortran.h, interface.c, intrinsic.c, io.c, iresolve.c,
45         match.c, matchexp.c, misc.c, module.c, options.c, parse.c,
46         scanner.c, simplify.c, symbol.c, trans-array.c, trans-expr.c,
47         trans-io.c, trans-stmt.c, trans.c: Update copyright.
49 2005-01-17  Ira Rosen  <irar@il.ibm.com>
51         * f95-lang.c (gfc_init_builtin_functions): Call targetm.init_builtins.
53 2005-01-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
55         PR fortran/19182
56         * error.c (error_char): Line-buffer errors / warnings.
58 2005-01-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
60         * trans-intrinsic.c (gfc_conv_intrinsic_ishft): Fix signed /
61         unsigned issue.  Use build_int_cst instead of converting
62         integer_zero_node.  Remove unnecessary conversion.
64         * trans-types.c (gfc_get_character_type_len): : Use
65         gfc_charlen_type_node as basic type for the range field.
67         * trans-intrinsic.c (build_fixbound_expr,
68         gfc_conv_intrinsic_bound, gfc_conv_intrinsic_anyall,
69         gfc_conv_intrinsic_count, gfc_conv_intrinsic_btest,
70         gfc_conv_intrinsic_singlebitop): Use 'build_int_cst' instead
71         of converting 'integer_zero_node' or 'integer_one_node'
72         respectively.
73         (gfc_conv_intrinsic_ishftc): Same, but store in local variable to
74         evade re-building.
75         (gfc_conv_intrinsic_strcmp, gfc_conv_intrinsic_rrspacing,
76         gfc_conv_intrinsic_trim, gfc_conv_intrinsic_iargc): Use
77         'build_int_cst' instead of converting 'integer_zero_node' or
78         'integer_one_node' respectively.
80         * trans-intrinsic.c (gfc_conv_intrinsic_index,
81         gfc_conv_intrinsic_scan, gfc_conv_intrinsic_verify): Remove
82         'gfc'-prefix from local variable, remove dead code, use correct
83         type when inserting argument.
85         * trans-intrinsic.c, trans-types.c: Update copyright years.
87 2005-01-16  Steven G. Kargl  <kargls@comcast.net>
89         PR 19168
90         * resolve.c (check_case_overlap): Typo in comment.
91         (validate_case_label_expr):  Fix up kinds of case values
92         (resolve_select): Properly handle kind mismatches.
94 2004-01-16  Paul Brook  <paul@codesourcery.com>
96         PR fortran/17675
97         * trans-common.c (translate_common): Remove duplicate function call.
98         (finish_equivalences): Preserve alignment when biasing offsets.
100 2005-01-15  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de
102         * primary.c (check_digit): Call 'ISXDIGIT' instead of assuming
103         ASCII-like character encoding.
105 2005-01-14  Steven G. Kargl  <kargls@comcast.net>
107         * resolve.c (compare_case): Cleanup.
109 2005-01-14  Steven G. Kargl  <kargls@comcast.net>
111         * resolve.c (compare_case): Give arguments correct type.
113 2005-01-13  Kazu Hirata  <kazu@cs.umass.edu>
115         * iresolve.c, trans-common.c, trans-types.c: Fix comment
116         typos.
118 2005-01-09  Paul Brook  <paul@codesourcery.com>
120         PR fortran/17675
121         * trans-common.c (current_common, current_offset): Remove.
122         (create_common): Add head argument.
123         (align_segment): New function.
124         (apply_segment_offset): New function.
125         (translate_common): Merge code from new_segment.  Handle alignment.
126         (new_segment): Remove.
127         (finish_equivalences): Ensure proper alignment.
129 2005-01-08  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
131         * trans-const.c: Don't include unused math.h.
133         * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl,
134         gfc_conv_intrinsic_bound, gfc_conv_intrinsic_minmaxloc,
135         gfc_conv_intrinsic_ishft, gfc_conv_intrinsic_len): Remove
136         trailing whitespace.
137         (prepare_arg_info): Fix formatting, indenting and remove trailing
138         whitespace.
139         (gfc_conv_intrinsic_spacing, gfc_conv_intrinsic_trim): Remove
140         trailing whitespace.
142         * arith.c (arctangent2, gfc_arith_init_1, gfc_arith_done_1,
143         gfc_constant_result, gfc_range_check, gfc_arith_power,
144         eval_type_intrinsic0, eval_intrinsic_f2, gfc_real2real,
145         gfc_real2complex, gfc_complex2int, gfc_complex2real,
146         gfc_complex2complex): Fix whitespace issues.
147         * check.c (must_be, type_check, numeric_check, int_or_real_check,
148         logical_array_check, array_check, scalar_check, nonoptional_check,
149         variable_check, dim_check, check_a_kind, gfc_check_a_ikind,
150         gfc_check_a_xkind, gfc_check_abs, gfc_check_all_any,
151         gfc_check_allocated, gfc_check_a_p, gfc_check_besn,
152         gfc_check_btest, gfc_check_char, gfc_check_cmplx, gfc_check_count,
153         gfc_check_cshift, gfc_check_dcmplx, gfc_check_dble,
154         gfc_check_digits, gfc_check_dot_product, gfc_check_eoshift,
155         gfc_check_fnum, gfc_check_g77_math1, gfc_check_huge, gfc_check_i,
156         gfc_check_iand, gfc_check_ibclr, gfc_check_ibits, gfc_check_ibset,
157         gfc_check_idnint, gfc_check_ieor, gfc_check_index, gfc_check_int,
158         gfc_check_ior, gfc_check_ishft, gfc_check_ishftc, gfc_check_kind,
159         gfc_check_lbound, gfc_check_logical, min_max_args,
160         gfc_check_min_max_integer, gfc_check_min_max_real,
161         gfc_check_min_max_double, gfc_check_matmul,
162         gfc_check_minval_maxval, gfc_check_merge, gfc_check_nearest,
163         gfc_check_pack, gfc_check_precision, gfc_check_radix,
164         gfc_check_range, gfc_check_real, gfc_check_repeat,
165         gfc_check_scale, gfc_check_scan, gfc_check_selected_real_kind,
166         gfc_check_set_exponent): Fix formatting issues.
167         (gfc_check_size, gfc_check_sign): Alphabetize function order,
168         remove whitespace-only line.
169         (gfc_check_fstat, gfc_check_fstat_sub, gfc_check_stat,
170         gfc_check_stat_sub, gfc_check_transfer, gfc_check_transpose,
171         gfc_check_ubound, gfc_check_unpack, gfc_check_verify, gfc_check_x,
172         gfc_check_cpu_time, gfc_check_date_and_time, gfc_check_mvbits,
173         gfc_check_random_number, gfc_check_random_seed,
174         gfc_check_second_sub, gfc_check_system_clock,
175         gfc_check_getcwd_sub, gfc_check_exit, gfc_check_flush,
176         gfc_check_umask, gfc_check_umask_sub, gfc_check_unlink,
177         gfc_check_unlink_sub): Fix formatting issues.
178         
179 2005-01-08  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
181         * gfortran.h: Remove outdated comment.  Don't include stdio.h
182         explicitly.
184 2005-01-06  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
186         * gfortranspec.c (lang_specific_driver): Change year to 2005 in
187         output of 'gfortran --version'.
189 2005-01-03  Steven G. Kargl  <kargls@comcast.net>
191         * arith.c: Add system.h; remove string.h
192         * decl.c: Ditto
193         * matchexp.c: Ditto
194         * parse.c: Ditto
195         * resolve.c: Ditto
196         * st.c: Ditto
197         * check.c: Remove stdlib.h and stdarg.h
198         * error.c: Remove stdlib.h, stdarg.h, stdio.h, string.h
199         * expr.c: Add system.h; remove stdarg.h, stdio.h, and string.h
200         * f95-lang.c: Add system.h; remove stdio.h
201         * interface.c: Add system.h; remove stdlib.h and string.h
202         * intrinsic.c: Remove stdarg.h, stdio.h, and string.h
203         * io.c: Remove string.h
204         * simplify.c: Ditto
205         * match.c: Remove stdarg.h and string.h
206         * misc.c: Update copyright; add system.h; remove stdlib.h,
207         string.h, and sys/stat.h
208         * module.c: Add system.h; remove string.h, stdio.h, errno.h,
209         unistd.h, and time.h
210         * option.c: Remove string.h and stdlib.h
211         * primary.c: Ditto
212         * scanner.c: Update copyright; add system.h; remove stdlib.h,
213         stdio.h, string.h, and strings.h
214         * symbol.c: Add system.h; remove stdlib.h, stdio.h, and string.h
215         * trans-array.c: Remove stdio.h and gmp.h
216         * trans-const.c: Ditto
217         * trans-expr.c: Ditto
218         * trans-io.c: Ditto
219         * trans-stmt.c: Ditto
220         * trans.c: Ditto
221         * trans-intrinsic.c: Remove stdio.h and string.h
223 2004-12-29  Steven G. Kargl  <kargls@comcast.net>
225         * gfortran.h (gfc_case): fix typo in comment.
227 2004-12-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de> 
229         * trans-intrinsic.c (gfc_conv_intrinsic_ishft): Change to
230         logical shift.  Call fold.  Remove 0-bit shift shortcut.
231         (gfc_conv_intrinsic_ishftc): Convert first argument to at least
232         4 bytes bits.  Convert 2nd and 3rd argument to 4 bytes.  Convert
233         result if width(arg 1) < 4 bytes.  Call fold.
235         PR fortran/19032
236         * trans-intrinsic.c (gfc_conv_intrinsic_mod): Update comment
237         in front of function to match the standard.  Correct handling
238         of MODULO.
240 2004-12-27  Andrew Pinski  <pinskia@physics.uc.edu>
242         * trans-expr.c (gfc_conv_cst_int_power): Only check for
243         flag_unsafe_math_optimizations if we have a float type.
245 2004-12-23  Steven G. Kargl  <kargls@comcast.net>
247         * gfortran.texi: Fix typo.
249 2004-12-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
251         * trans-intrinsic.c (build_fixbound_expr): Clarify comment, fix
252         comment typo.
254 2004-12-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
256         PR fortran/18993
257         * match.c (gfc_match_if): Don't explicitly skip optional whitespace.
258         (gfc_match_nullify): Make sure that ')' is in front of the end of
259         statement.
261         * scanner.c (skip_fixed_comments): Fix typo in comment preceding
262         function.
264 2004-12-14  Richard Henderson  <rth@redhat.com>
266         * gfortran.h (gfc_expr.function.name): Make const.
267         (gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
268         (gfc_get_string): Update prototype.
269         * iresolve.c: Include tree.h.
270         (string_node, HASH_SIZE, string_head, hash): Remove.
271         (gfc_get_string): Use vsnprintf, get_identifier.
272         (free_strings, gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
273         * misc.c (gfc_init_1): Don't call gfc_iresolve_init_1.
274         (gfc_done_1): Don't call gfc_iresolve_done_1.
275         * module.c (mio_allocated_string): Take and return const char *,
276         instead of modifying char**.
277         (mio_expr): Update to match.
278         * resolve.c (pure_function): Constify name argument.
279         (resolve_function): Constify name.
280         * trans-intrinsic.c (gfc_conv_intrinsic_function): Likewise.
282 2004-12-12  Richard Henderson  <rth@redhat.com>
284         * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
285         gfc_resolve_cshift, gfc_resolve_dot_product, gfc_resolve_eoshift,
286         gfc_resolve_matmul, gfc_resolve_maxloc, gfc_resolve_maxval,
287         gfc_resolve_minloc, gfc_resolve_minval, gfc_resolve_pack,
288         gfc_resolve_product, gfc_resolve_reshape, gfc_resolve_shape,
289         gfc_resolve_spread, gfc_resolve_sum, gfc_resolve_transpose,
290         gfc_resolve_unpack: Use PREFIX.
292 2004-12-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
294         PR fortran/18869
295         * match.c (gfc_match_common): Skip whitespace.
297 2004-12-12  Steven G. Kargl  <kargls@comcast.net>
299         PR fortran/16581
300         * check.c (gfc_check_iand, gfc_check_ibclr, gfc_check_ibits,
301         gfc_check_ibset, gfc_check_ieor, gfc_check_ior): Remove default
302         integer kind check; Issue error for -std=f95 when needed.
303         * intrinsic.c (add_functions): Change ieor from GFC_STD_GNU to
304         GFC_STD_F95.
305         * iresolve.c (gfc_resolve_iand, gfc_resolve_ieor, gfc_resolve_ior):
306         Promote arguments to same kind.
308 2004-12-12  Steven G. Kargl  <kargls@comcast.net>
309         Paul Brook  <paul@codesourcery.com>
311         PR fortran/16222
312         * resolve.c (gfc_resolve_iterator_expr): New function.
313         (gfc_resolve_iterator): Use it.  Add real_ok argument.  Convert
314         start, end and stride to correct type.
315         (resolve_code): Pass extra argument.
316         * array.c (resolve_array_list): Pass extra argument.
317         * gfortran.h (gfc_resolve): Add prototype.
318         * trans-stmt.c (gfc_trans_do): Remove redundant type conversions.
319         Handle real type iterators.
321 2004-12-11  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
323         PR fortran/17175
324         * iresolve.c (gfc_resolve_scale): Convert 'I' argument if not of
325         same kind as C's 'int'.
326         (gfc_resolve_set_exponent): Convert 'I' argument if not of kind 4.
328 2004-12-08  Richard Henderson  <rth@redhat.com>
330         * intrinsic.c (gfc_convert_type_warn): Propagate the input shape
331         to the output expression.
332         * iresolve.c (gfc_resolve_cshift, gfc_resolve_eoshift): Suppress
333         warning conversion.
334         (gfc_resolve_reshape): Force convert SHAPE and ORDER parameters
335         to index kind.
337 2004-12-08  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
339         PR fortran/18826
340         * resolve.c (resolve_code): Impose correct restrictions on
341         assigned variable.
343         * decl.c (gfc_match_end): Use locus of END when eos is an error.
345 2004-12-02  Steven G. Kargl  <kargls@comcast.net>
346         Paul Brook  <paul@codesourcery.com>
348         * check.c (gfc_check_flush, gfc_check_fnum): New functions.
349         (gfc_check_fstat, gfc_check_fstat_sub): New functions.
350         (gfc_check_stat, gfc_check_stat_sub): New functions.
351         * gfortran.h (GFC_ISYM_FNUM,GFC_ISYM_FSTAT,GFC_ISYM_STAT): New symbols
352         * intrinsic.c (add_functions,add_subroutines): Add flush, fnum,
353         fstat, and stat to intrinsics symbol tables.
354         * intrinsic.h (gfc_check_flush, gfc_resolve_stat_sub): Add prototypes.
355         (gfc_resolve_fstat_sub, gfc_resolve_stat): Ditto.
356         * iresolve.c (gfc_resolve_fnum, gfc_resolve_fstat): New functions.
357         (gfc_resolve_stat, gfc_resolve_flush): New functions.
358         (gfc_resolve_stat_sub,gfc_resolve_fstat_sub): New functions
359         * trans-intrinsic.c (gfc_conv_intrinsic_function): Add new intrinsics.
361 2004-12-02  Steven G. Kargl  <kargls@comcast.net>
363         * intrinsic.c: Fix and add comments, fix function declarations
364         (OPTIONAL,REQUIRED): New symbols
365         (add_functions,add_subroutines): Use symbols
366         (gmp.h): Remove unused include
368 2004-11-25  Joseph S. Myers  <joseph@codesourcery.com>
370         * f95-lang.c, gfortranspec.c, trans-decl.c: Avoid ` as left quote
371         in diagnostics.
373 2004-11-24  Steven Bosscher  <stevenb@suse.de>
375         * options.c (gfc_post_options): Don't clear flag_inline_functions.
377 2004-11-20  Steven G. Kargl  <kargls@comcast.net>
379         * check.c (gfc_check_getcwd_sub): Fix seg fault.
381         * check.c (gfc_check_exit,gfc_check_umask,gfc_check_umask_sub,
382         gfc_check_unlink,gfc_check_unlink_sub): New functions
383         * gfortran.h (GFC_ISYM_UMASK,GFC_ISYM_UNLINK): New symbols
384         * intrinsic.c (add_functions,add_subroutines): Add umask, unlink,
385         exit to intrinsics symbol tables.
386         * intrinsic.h (gfc_check_umask,gfc_check_unlink,gfc_check_exit,
387         gfc_check_umask_sub,gfc_check_unlink_sub,gfc_resolve_umask,
388         gfc_resolve_unlink,gfc_resolve_exit,gfc_resolve_umask_sub,
389         gfc_resolve_unlink_sub): Add and sort prototypes.
390         * iresolve.c (gfc_resolve_umask,gfc_resolve_unlink,gfc_resolve_exit,
391         gfc_resolve_umask_sub,gfc_resolve_unlink_sub): New functions
392         * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbols
394 2004-11-16  Paul Brook  <paul@codesourcery.com>
396         PR fortran/13010
397         * trans-array.c (gfc_trans_allocate_temp_array): Use gfc_get_dtype.
398         (gfc_array_init_size, gfc_conv_expr_descriptor): Ditto.
399         * trans-types.c (gfc_get_dtype): Accept array type rather than element
400         type.
401         (gfc_get_nodesc_array_type): Don't set GFC_TYPE_ARRAY_DTYPE.
402         (gfc_get_array_type_bounds): Ditto.
403         (gfc_get_derived_type): Recurse into derived type pointers.
404         * trans-types.h (gfc_get_dtype): Add prototype.
405         * trans.h (GFC_TYPE_ARRAY_DTYPE): Add comment.
407 2004-11-15  Paul Brook  <paul@codesourcery.com>
409         * trans-types.c (gfc_get_dtype): Remove obsolete TODO.
411 2004-11-10  Paul Brook  <paul@codesourcery.com>
413         PR fortran/18375
414         * trans-expr.c (gfc_trans_subarray_assign): Free shape before ss.
415         * trans-io.c (transfer_array_component): Ditto.
417 2004-11-10  Paul Brook  <paul@codesourcery.com>
419         * invoke.texi: Fix typo.
421 2004-11-08  Kazu Hirata  <kazu@cs.umass.edu>
423         * arith.c, array.c, decl.c, expr.c, f95-lang.c, gfortran.h,
424         gfortranspec.c, interface.c, intrinsic.c, iresolve.c, match.c,
425         module.c, parse.c, parse.h, primary.c, resolve.c, scanner.c,
426         trans-array.c, trans-array.h, trans-expr.c, trans-intrinsic.c,
427         trans-io.c, trans-stmt.c, trans.h: Fix comment formatting.
429 2004-11-06  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
431         PR fortran/18023
432         * io.c (resolve_tag): Tighten up exception for assigned FORMAT.
434 2004-11-06  Kazu Hirata  <kazu@cs.umass.edu>
436         * gfortranspec.c: Replace GNU CC with GCC.
438 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
440         * gfortranspec.c (lang_specific_driver): Change year to 2004.
442 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
444         PR fortran/18111
445         *  trans-decl.c (create_function_arglist): Set DECL_ARTIFICIAL for
446         hidden parameters.
448 2004-11-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
450         PR fortran/15164
451         * trans-decl.c (gfc_finish_var_decl): Don't declare arguments to
452         module procedures as if they were module variables.
454 2004-11-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
456         PR fortran/17535
457         PR fortran/17583
458         PR fortran/17713
459         * module.c (write_symbol1): Set module_name for dummy arguments.
461 2004-11-02  Paul Brook  <paul@codesourcery.com>
463         * intrinsic.c (check_intrinsic_standard): Include error locus.
464         Remove VLA.
465         (gfc_intrinsic_func_interface, gfc_intrinsic_sub_interface): Pass
466         locus to check_intrinsic_standard.
468 2004-10-31  Janne Blomqvist  <jblomqvi@cc.hut.fi>
470         PR fortran/17590
471         * gfortran.h: Change GFC_STD_* flags to more appropriate
472         ones. (struct gfc_intrinsic_isym): Add field for standard. (struct
473         gfc_option_t): Add field for warning about use of nonstandard
474         intrinsics.
475         * intrinsic.c (add_sym): Add parameter for standard version, check
476         this against current standard.
477         (add_sym_0): Pass standard parameter to add_sym.
478         (add_sym_1, add_sym_0s, add_sym_1s, add_sym_1m, add_sym_2): Ditto.
479         (add_sym_2s, add_sym_3, add_sym_3ml, add_sym_3red, add_sym_3s): Ditto.
480         (add_sym_4, add_sym_4s, add_sym_5, add_sym_5s): Ditto.
481         (make_generic): Add parameter for standard, check this
482         against currently selected standard.
483         (add_functions, add_subroutines): Add parameter to tell which
484         standard an intrinsic belongs to.
485         (check_intrinsic_standard): New function.
486         (gfc_intrinsic_func_interface): Add call to check_intrinsic_standard.
487         (gfc_intrinsic_sub_interface): Ditto.
488         * lang.opt: Add Wnonstd-intrinsics option.
489         * options.c (gfc_init_options): Change to use new GFC_STD_* flags,
490         init new warning.
491         (set_Wall): Add warning about nonstd intrinsics.
492         (gfc_handle_option): Change to use new GFC_STD_* flags,
493         handle new warning.
494         * invoke.texi: Update manual to include -Wnonstd-intrinsics.
496 2004-10-30  Andrew Pinski  <pinskia@physics.uc.edu>
498         * f95-lang.c (lang_tree_node): Add chain_next to be the TREE_CHAIN.
500 2004-10-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
502         * simplify.c (twos_complement): Calculate mask in GMP arithmetic.
504 2004-10-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
506         * trans.c (gfc_trans_code): Set global locus after recursing. Fix
507         comment typo.
509 2004-10-30  Canqun Yang  <canqun@nudt.edu.cn>
511         * check.c (gfc_check_rand): Allow missing optional argument. 
512         (gfc_check_irand): Ditto.
513         * intrinsic.c (add_functions): Set arg optional flag for {i,}rand.
515 2004-10-28  Scott Robert Ladd  <scott.ladd@coyotegulch.com>
517         PR fortran/13490, PR fortran/17912
518         * gcc/fortran/gfortran.h: Added pedantic_min_int to gfc_integer_info
519         * gcc/fortran/gfortran.h: Added ARITH_ASYMMETRIC to arith
520         * gcc/fortran/arith.c: Added support for an "asymmetric integer"
521         warning when compiling with pedantic.
522         * gcc/fortran/arith.c: Set minimum integer values to reflect
523         realities of two's complement signed integers. Added
524         pedantic minimum.
526 2004-10-17  Andrew Pinski  <pinskia@physics.uc.edu>
528         * Make-lang.in (F95_ADDITIONAL_OBJS): Kill.
529         (f951): Do not depend on F95_ADDITIONAL_OBJS and don't
530         link it in.
532 2004-10-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
534         * trans-decl.c (generate_local_decl): Simplify logic, fix comment
535         typo.
536         (gfc_generate_function_code): Fix formatting issue.
538 2004-10-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
540         * module.c: Fix formatting issues.
542 2004-10-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
544         * module.c (mio_interface_rest): Set where member of interface
545         while loading.
547 2004-10-08  Andrew Pinski  <pinskia@physics.uc.edu>
549         PR fortran/17901
550         * options.c (gfc_handle_option): Add break after handing the
551         J/M option.
553 2004-10-08  Tobias Schlueter  <tobias.shclueter@physik.uni-muenchen.de>
555         * arith.c: Fix formatting issues.
556         
557 2004-10-07  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
559         PR fortran/17676
560         * resolve.c (resolve_operator): Use correct operator name in message.
562 2004-10-07  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
564         * primary.c (match_boz_constant): Allow kind parameter suffixes.
565         Move standard warning further to the front.
567 2004-10-07  Kazu Hirata  <kazu@cs.umass.edu>
569         * trans-stmt.c: Fix a comment typo.
571 2004-10-07  Paul Brook  <paul@codesourcery.com>
573         PR fortran/17678
574         * trans-array.c (gfc_trans_deferred_array): Leave use associated
575         variables alone.
577 2004-10-06  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
579         PR fortran/17568
580         * simplify.c (twos_complement): New function.
581         (gfc_simplify_ishft, gfc_simplify_ishftc): Revise.
583         * simplify.c (gfc_simplify_abs): Use mpfr_hypot for CABS.
585 2004-10-06  Paul Brook  <paul@codesourcery.com>
587         * trans-stmt.c (gfc_trans_simple_do): New function.
588         (gfc_trans_do): Use it.  Evaluate iteration bounds before entering
589         loop.  Update comments.
591 2004-10-04  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
593         PR fortran/17283
594         * iresolve.c (gfc_resolve_pack): Choose function depending if mask
595         is scalar.
597         PR fortran/17631
598         * intrinsic.c (add_sym_5): Remove.
599         (add_subroutines): Add resolution function for MVBITS.
600         * intrinsic.h (gfc_resolve_mvbits): Declare resolution function for
601         MVBITS
602         * iresolve.c (gfc_resolve_mvbits): New function.
603         (gfc_resolve_random_number): Remove empty line at end of function.
605         * trans-const.c (gfc_build_cstring_const): New function.
606         (gfc_init_cst): Use new function.
607         * trans-const.h (gfc_build_cstring_const): Add prototype.
608         * trans-io.c (set_string, set_error_locus): Use new function.
609         * trans-stmt.c (gfc_trans_goto): Use new function.
610         
611         PR fortran/17708
612         * parse.c (accept_statement): Don't treat END DO like END IF and
613         END SELECT.
614         (parse_do_block): Generate possible END DO label inside END DO
615         block.
617         PR fortran/17776
618         * check.c (gfc_check_system_sub): New function.
619         * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_SYSTEM.
620         * intrinsic.c (add_functions): Add 'system'.
621         (add_subroutines): Add 'system'.
622         * intrinsic.h (gfc_check_etime_sub, gfc_check_getcwd_sub):
623         Move prototypes to other suborutines.
624         (gfc_check_system_sub, gfc_resolve_system, gfc_resolve_system_sub):
625         Add prototype.
626         (gfc_resolve_system_clock): Fix formatting of prototype.
627         * iresolve.c (gfc_resolve_system, gfc_resolve_system_sub): New
628         functions.
629         * trans-intrinsic.c (gfc_conv_intrinsic_function): Deal with
630         GFC_ISYM_SYSTEM.
632 2004-10-04  Erik Schnetter  <schnetter@aei.mpg.de>
634         * scanner.c (preprocessor_line): Accept preprocessor lines without
635         file names.  Check file names for closing quotes.  Handle escaped
636         quotes in file names.
638 2004-10-04  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
639         Paul Brook  <paul@codesourcery.com>
641         * trans-array.c (gfc_conv_expr_descriptor): Check for substriungs.
642         Use gfc_get_expr_charlen.
643         * trans-expr.c (gfc_get_expr_charlen): New function.
644         * trans.h (gfc_get_expr_charlen): Add prototype.
646 2004-10-04  Kazu Hirata  <kazu@cs.umass.edu>
648         * trans-intrinsic.c: Fix a comment typo.
650 2004-10-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
652         * simplify.c (range_check): Remove blank line at beginning of function.
653         (gfc_simplify_dint): Same at end of function.
654         (gfc_simplify_exponent, gfc_simplify_fraction): Simplify calculations.
655         (gfc_simplify_bound): Fix indentation.
656         (gfc_simplify_log10): Simplify calculation.
657         (gfc_simplify_min, gfc_simplify_max): Remove blank line at beginning
658         of function.
659         (gfc_simplify_nearest): Same at end of function.
660         (gfc_simplify_nint, gfc_simplify_idnint): Same at beginning of
661         function.
662         (gfc_simplify_rrspacing, gfc_simplify_set_exponent,
663         gfc_simplify_spacing): Simplify calulations.
665 2004-10-03  Feng Wang  <fengwang@nudt.edu.cn>
667         * trans-intrinsic.c: Fix comments on spacing and rrspacing
668         (gfc_conv_intrinsic_rrspacing): Add fold on constant trees.
670 2004-10-01  Jan Hubicka  <jh@suse.cz>
672         * f95-lang.c (gfc_expand_function): Update call of
673         tree_rest_of_compilation.
674         * trans-decl.c (gfc_generate_constructors): Likewise.
676 2004-09-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
678         * trans-intrinsic.c: Comment fixes.
680 2004-09-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
682         * decl.c (add_init_expr_to_sym, variable_decl): Comment fixes.
684 2004-09-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
686         * trans-types.c (gfc_return_by_reference): Remove superfluous
687         assertion.
689         * intrinsic.h (gfc_resolve_getcwd): Update prototype.
690         * iresolve.c (gfc_resolve_getcwd): Add second argument to function.
692         PR fortran/17615
693         * trans-expr.c (gfc_trans_arrayfunc_assign): Look at resolved
694         function to determine return type.
695         
696 2004-09-20  Jan Hubicka  <jh@suse.cz>
698         * trans-decl.c (build_entry_thunks): Finalize the function; do not lower
699         tree.
700         (gfc_generate_function_code): Likewise.
702 2004-09-20  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
704         PR fortran/15957
705         * simplify.c (gfc_simplify_reshape): Set shape of return value
706         correctly.
708 2004-09-17  Jeffrey D. Oldham  <oldham@codesourcery.com>
709             Zack Weinberg  <zack@codesourcery.com>
711         * f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
712         enumeration constants.
714 2004-09-17  Paul Brook  <paul@codesourcery.com>
716         * gfortran.h (struct gfc_linebuf): Don't use C99 empty arrays.
717         (gfc_linebuf_header_size): Define.
718         * scanner.c (load_file): Use it.
720 2004-09-16  Kazu Hirata  <kazu@cs.umass.edu>
722         * array.c, data.c, decl.c, dependency.c, error.c, f95-lang.c,
723         interface.c, intrinsic.c, io.c, misc.c, module.c, parse.h,
724         resolve.c, scanner.c, trans-array.c, trans-array.h,
725         trans-common.c, trans-const.h, trans-decl.c, trans-expr.c,
726         trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.c,
727         trans.h: Fix comment typos.  Follow spelling conventions.
729 2004-09-16  Victor Leikehman  <lei@il.ibm.com>
731         PR/15364
732         * trans-io.c (transfer_array_component): New function.
733         (transfer_expr): For array fields, call transfer_array_component.
735 2004-09-16  Kazu Hirata  <kazu@cs.umass.edu>
737         * gfortran.texi: Fix a typo.
739 2004-09-15  Aaron W. LaFramboise <aaronavay62@aaronwl.com>
741         * parse.c (eof_buf): Rename eof to eof_buf.
742         (unexpected_eof): Same.
743         (gfc_parse_file): Same.
745 2004-09-15  Steven G. Kargl  <kargls@comcast.net>
747         * check.c (gfc_check_getcwd_sub): New function.
748         * gfortran.h (GFC_ISYM_GETCWD): New symbol.
749         * intrinsic.c (add_functions): Add function definition;
750         Use symbol.
751         * intrinsic.c (add_subroutines): Add subroutine definitions.
752         * intrinsic.h: Add prototypes.
753         * iresolve.c (gfc_resolve_getcwd, gfc_resolve_getcwd_sub):
754         New functions.
755         * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbol.
757 2004-09-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
759         PR fortran/16485
760         * module.c (write_symbol): Don't fill in module name here.
761         (write_symbol0): Fill in here instead.
763 2004-09-14  Kazu Hirata  <kazu@cs.umass.edu>
765         * data.c, decl.c, f95-lang.c, gfortran.h, match.c,
766         trans-array.c, trans-common.c, trans-expr.c,
767         trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.h: Fix
768         comment typos.  Follow spelling conventions.
770 2004-09-09  Paul Brook  <paul@codesourcery.com>
772         * scanner.c (get_file): Add ATTRIBUTE_UNUSED.
774 2004-09-08  Paul Brook  <paul@codesourcery.com>
776         * array.c: Don't include assert.h.
777         * data.c: Don't include assert.h.  Replace assert and abort with
778         gcc_assert and gcc_unreachable.
779         * dependency.c: Ditto.
780         * f95-lang.c: Ditto.
781         * iresolve.c: Ditto.
782         * resolve.c: Ditto.
783         * simplify.c: Ditto.
784         * symbol.c: Ditto.
785         * trans-array.c: Ditto.
786         * trans-common.c: Ditto.
787         * trans-const.c: Ditto.
788         * trans-decl.c: Ditto.
789         * trans-expr.c: Ditto.
790         * trans-intrinsic.c: Ditto.
791         * trans-io.c: Ditto.
792         * trans-stmt.c: Ditto.
793         * trans-types.c: Ditto.
794         * trans.c: Ditto.
796 2004-09-07  Per Bothner  <per@bothner.com>
797         Paul Brook  <paul@codesourcery.com>
799         * error.c (show_locus): Handle mapped locations.
800         * f95-lang.c (gfc_be_parse_file): Initialize mapped locations.
801         * gfortran.h: Include input.h.
802         (struct gfc_linebuf): Use source_location.
803         * scanner.c (get_file): Initialize linemap.
804         (preprocessor_line): Pass extra argument to get_file.
805         (load_file): Ditto.  Setup linemap.
806         (gfc_new_file): Handle mapped locations.
807         * trans-common.c (build_field, build_equiv_decl, build_common_decl):
808         Set decl source locations.
809         (gfc_trans_common): Set blank common block location.
810         * trans-decl.c (gfc_set_decl_location): New function.
811         (gfc_get_label_decl, gfc_get_symbol_decl): Use it.
812         (trans_function_start): Move call to gfc_set_backend_locus..
813         (build_function_decl): ... to here.
814         (build_entry_thunks): Set and restore the backend locus.
815         (gfc_generate_constructors): Remove excess arguments to
816         init_function_start.
817         (gfc_generate_block_data): Add comments.  Set the decl locus.
818         * trans-io.c (set_error_locus): Handle mapped locations.
819         * trans.c (gfc_get_backend_locus, gfc_get_backend_locus): Ditto.
820         (gfc_trans_code): Use SET_EXPR_LOCATION.
821         (gfc_generate_code): Override the location of the new symbol.
822         * trans.h (gfc_set_decl_location): Add prototype.
824 2004-08-31  Paul Brook  <paul@codesourcery.com>
826         * trans-types.c (gfc_type_for_mode): Return NULL for unknown modes.
828 2004-09-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
830         PR fortran/15327
831         * trans-intrinsic.c (gfc_conv_intrinsic_merge): Do the right thing for
832         strings.
834 2004-09-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
836         PR fortran/16400
837         PR fortran/16404
838         (port from g95)
839         * resolve.c (resolve_transfer): New function.
840         (resolve_code): Call resolve_transfer in case of EXEC_TRANSFER.
842 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
844         PR fortran/16579
845         * trans-types.c (gfc_init_types): Make gfc_character1_type_node an
846         unsigned char.
848 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
850         * CONTRIB, NEWS, README, TODO: Remove obsolete files.
852 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
854         PR fortran/17244
855         * trans-types.c (gfc_return_by_reference): Remove TODO error,
856         add comment pointing out possible issue WRT compatibility with g77.
858 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
860         * trans-decl.c, trans-expr.c, trans-io.c, trans-types.c: Replace
861         all occurences of 'gfc_strlen_type_node' by
862         'gfc_charlen_type_node'.
863         * trans-types.h: Same. Also update comment accordingly.
865 2004-08-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
867         * primary.c: Update copyright boilerplate to say GCC.
868         * f95-lang.c: Change initial comment to say gfortran.
870 2004-08-31  Paul Brook  <paul@codesourcery.com>
872         * trans-types.h: Add comments.
873         (intmax_type_node, string_type_node, const_string_type_node): Remove.
875 2004-08-30  Richard Henderson  <rth@redhat.com>
877         * Make-lang.in (fortran/f95-lang.o): Update dependencies.
878         (fortran/trans-decl.o, fortran/trans-types.o): Likewise.
879         * gfortran.h (gfc_integer_info): Add c_char, c_short, c_int,
880         c_long, c_long_long.
881         (gfc_logical_info): Add c_bool.
882         (gfc_real_info): Add mode_precision, c_float, c_double, c_long_double.
883         * trans-array.c (gfc_array_allocate): Use TYPE_PRECISION
884         rather than gfc_int[48]_type_node for allocate choice.
885         * trans-decl.c (gfc_build_intrinsic_function_decls): Cache
886         local copies of some kind type nodes.
887         (gfc_build_builtin_function_decls): Likewise.
888         * trans-expr.c (gfc_conv_power_op): Likewise.
889         * trans-intrinsic.c (gfc_conv_intrinsic_index,
890         gfc_conv_intrinsic_scan, gfc_conv_intrinsic_verify,
891         gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat): Likewise.
892         * trans-stmt.c (gfc_trans_pause, gfc_trans_stop,
893         gfc_trans_character_select, gfc_trans_allocate): Likewise.
894         * trans-io.c (gfc_pint4_type_node): Move into ...
895         (gfc_build_io_library_fndecls): ... here.  Cache local copies of
896         some kind type nodes.
897         * trans-types.c (gfc_type_nodes): Remove.
898         (gfc_character1_type_node, gfc_strlen_type_node): New.
899         (gfc_integer_types, gfc_logical_types): New.
900         (gfc_real_types, gfc_complex_types): New.
901         (gfc_init_kinds): Fill in real mode_precision.
902         (gfc_build_int_type, gfc_build_real_type): New.
903         (gfc_build_complex_type, gfc_build_logical_type): New.
904         (c_size_t_size): New.
905         (gfc_init_types): Loop over kinds.
906         (gfc_get_int_type, gfc_get_real_type): Use gfc_validate_kind.
907         (gfc_get_complex_type, gfc_get_logical_type): Likewise.
908         (gfc_get_character_type_len): Likewise.
909         (gfc_type_for_size): Loop over kinds; use a reduced set of
910         unsigned type nodes.
911         (gfc_type_for_mode): Loop over kinds.
912         (gfc_signed_or_unsigned_type): Use gfc_type_for_size.
913         (gfc_unsigned_type, gfc_signed_type): Use gfc_signed_or_unsigned_type.
914         * trans-types.h (F95_INT1_TYPE, F95_INT2_TYPE, F95_INT4_TYPE,
915         F95_INT8_TYPE, F95_INT16_TYPE, F95_REAL4_TYPE, F95_REAL8_TYPE,
916         F95_REAl16_TYPE, F95_COMPLEX4_TYPE, F95_COMPLEX8_TYPE,
917         F95_COMPLEX16_TYPE, F95_LOGICAL1_TYPE, F95_LOGICAL2_TYPE,
918         F95_LOGICAL4_TYPE, F95_LOGICAL8_TYPE, F95_LOGICAL16_TYPE,
919         F95_CHARACTER1_TYPE, NUM_F95_TYPES, gfc_type_nodes,
920         gfc_int1_type_node, gfc_int2_type_node, gfc_int4_type_node,
921         gfc_int8_type_node, gfc_int16_type_node, gfc_real4_type_node,
922         gfc_real8_type_node, gfc_real16_type_node, gfc_complex4_type_node,
923         gfc_complex8_type_node, gfc_complex16_type_node,
924         gfc_logical1_type_node, gfc_logical2_type_node,
925         gfc_logical4_type_node, gfc_logical8_type_node,
926         gfc_logical16_type_node, gfc_strlen_kind): Remove.
927         (gfc_character1_type_node): Turn in to a variable.
928         (gfc_strlen_type_node): Likewise.
930 2004-08-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
932         * gfortran.h (gfc_namespace): Add new field is_block_data.
933         * parse.c (accept_statement): Remove special handling for BLOCK DATA.
934         (parse_block_data): Record BLOCK DATA name, set is_block_data field.
935         * trans.c (gfc_generate_code): Handle BLOCK DATA units.
936         * trans.h (gfc_generate_block_data): Add prototype.
937         * trans-decl.c (gfc_generate_block_data): New function.
939 2004-08-29  Richard Henderson  <rth@redhat.com>
941         * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_export.
942         * trans-types.c (gfc_init_kinds): Reject integer kinds larger
943         than two HOST_WIDE_INT.
945 2004-08-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
947         PR fortran/13910
948         * decl.c (free_variable, free_value, gfc_free_data, var_list,
949         var_element, top_var_list, match_data_constant, top_val_list,
950         gfc_match_data): Move here from match.c.
951         (match_old_style_init): New function.
952         (variable_decl): Match old-style initialization.
953         * expr.c (gfc_get_variable_expr): New function.
954         * gfortran.h (gfc_get_variable_expr): Add prototype.
955         * gfortran.texi: Start documentation for supported extensions.
956         * match.c: Remove the functions moved to decl.c.
957         * match.h (gfc_match_data): Move prototype to under decl.c.
958         * symbol.c (gfc_find_sym_tree, gfc_find_symbol): Add/correct
959         comments.
961 2004-08-29  Steven G. Kargl  <kargls@comcast.net>
962         Paul Brook  <paul@codesourcery.com>
964         * check.c (gfc_check_besn, gfc_check_g77_math1): New functions.
965         * f95-lang.c (DO_DEFINE_MATH_BUILTIN): Define.
966         (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
967         (build_builtin_fntypes): New function.
968         (gfc_init_builtin_functions): Use it.
969         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_{J,Y}{0,1,N}
970         and GFC_ISYM_ERF{,C}.
971         (gfc_c_int_kind): Declare.
972         * intrinsic.c (add_functions): Add [d]bes* and [d]erf*.
973         * intrinsic.h (gfc_check_besn, gfc_check_g77_math1, gfc_resolve_besn,
974         gfc_resolve_g77_math1): Add prototypes.
975         * resolve.c (gfc_resolve_besn, gfc_resolve_g77_math1): New functions.
976         * mathbuiltins.def: Add comment.  Change third argument.  Use
977         DEFINE_MATH_BUILTIN_C.  Add bessel and error functions.
978         * trans-intrinsic.c (BUILT_IN_FUNCTION): Define.
979         (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
980         * trans-types.c (gfc_c_int_kind): Declare.
981         (gfc_init_kinds): Set it.
983 2004-08-29  Steven G. Kargl  <kargls@comcast.net>
984         Paul Brook  <paul@codesourcery.com>
986         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_GET?ID.
987         (gfc_check_f, gfc_simplify_f): Add f0.
988         * intrinsic.c (do_check): Call f0.  Flatten.
989         (add_sym_0): Fix prototype.  Set f0.
990         (add_functions): Add getgid, getgid and getuid.
991         (resolve_intrinsic): Remove obsolete comment.
992         (do_simplify): Call f0.
993         * intrinsic.h (gfc_resolve_getgid, gfc_resolve_getpid,
994         gfc_resolve_getuid): Add prototypes.
995         * iresolve.c (gfc_resolve_getgid, gfc_resolve_getpid,
996         gfc_resolve_getuid): New functions.
997         * trans-intrinsic.c (gfc_conv_intrinsic_function): Handle
998         GFC_ISYM_GET?ID.
1000 2004-08-28  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1002         * error.c (gfc_error_init_1): Remove blank line in front of
1003         function body. Add missing blank.
1004         (gfc_buffer_error, error_char, error_string): Remove blank line in
1005         front of function body.
1006         (show_locus): Add comma in comment.
1007         (gfc_clear_warning, gfc_warning_check, gfc_clear_error,
1008         gfc_push_error, gfc_pop_error): Remove blank line in front of
1009         function body.
1010         (gfc_get_errors): Typo fix in comment in front of function. Remove
1011         blank line in front of function body.
1013 2004-08-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1015         * gfortran.h (gfc_default_*_kind): Remove prototypes, add extern
1016         variable declaration of same name.
1017         * arith.c, check.c, decl.c, dump_parse_tree.c, expr.c,
1018         intrinsic.c, io.c, iresolve.c, match.c, options.c, primary.c,
1019         resolve.c, simplify.c, symbol.c, trans-const.c, trans-io.c:
1020         Replace all calls to gfc_default_*_kind with variable accesses.
1021         * trans-types.c: Same as above.
1022         (gfc_default_*_kind_1): Rename to gfc_default_*_kind, remove
1023         static qualifier. Replace all occurences.
1024         (gfc_default_*_kind): Remove functions.
1026 2004-08-26  Richard Henderson  <rth@redhat.com>
1028         * arith.c: Include system.h, not real system headers.
1029         (MPZ_NULL, MPF_NULL, DEF_GFC_INTEGER_KIND, DEF_GFC_LOGICAL_KIND,
1030         DEF_GFC_REAL_KIND, GFC_SP_KIND, GFC_SP_PREC, GFC_SP_EMIN, GFC_SP_EMAX,
1031         GFC_DP_KIND, GFC_DP_PREC, GFC_DP_EMIN, GFC_DP_EMAX, GFC_QP_KIND,
1032         GFC_QP_PREC, GFC_QP_EMIN, GFC_QP_EMAX): Remove.
1033         (gfc_integer_kinds, gfc_logical_kinds, gfc_real_kinds,
1034         gfc_index_integer_kind, gfc_default_integer_kind,
1035         gfc_default_real_kind,gfc_default_double_kind,
1036         gfc_default_character_kind, gfc_default_logical_kind,
1037         gfc_default_complex_kind, validate_integer, validate_real,
1038         validate_logical, validate_character,
1039         gfc_validate_kind): Move to trans-types.c.
1040         (gfc_set_model_kind): Use gfc_validate_kind.
1041         (gfc_set_model): Just copy the current precision to default.
1042         (gfc_arith_init_1): Use mpfr precision 128 for integer setup.
1043         * f95-lang.c (gfc_init_decl_processing): Invoke gfc_init_kinds.
1044         * gfortran.h: Update file commentary.
1045         * trans-types.c (MAX_INT_KINDS, MAX_REAL_KINDS): New.
1046         (gfc_default_integer_kind_1, gfc_default_real_kind_1,
1047         gfc_default_double_kind_1, gfc_default_character_kind_1,
1048         gfc_default_logical_kind_1, gfc_default_complex_kind_1): New.
1049         (gfc_init_kinds): New.
1050         (gfc_init_types): Don't set gfc_index_integer_kind here.
1051         * trans-types.h (gfc_init_kinds): Declare.
1052         * doc/invoke.texi: Clarify DOUBLE PRECISION behaviour wrt -r8.
1054 2004-08-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1056         * check.c (gfc_check_atan2): New function.
1057         * intrinsic.c (add_functions): Use gfc_check_atan2 for ATAN2
1058         * intrinsic.h (gfc_check_atan2): Add prototype.
1060 2004-08-25  Richard Henderson  <rth@redhat.com>
1062         * arith.c (gfc_validate_kind): Add may_fail argument; abort if
1063         false and we don't validate the kind.
1064         (gfc_check_integer_range, gfc_check_real_range): Update to match.
1065         * check.c (kind_check): Likewise.
1066         * decl.c (gfc_match_old_kind_spec, gfc_match_kind_spec): Likewise.
1067         (match_char_spec, match_logical_spec): Likewise.
1068         * gfortran.h (gfc_validate_kind): Likewise.
1069         * options.c (gfc_handle_option): Likewise.
1070         * primary.c (match_integer_constant, match_real_constant,
1071         match_string_constant, match_logical_constant,
1072         match_const_complex_part): Likewise.
1073         * simplify.c (get_kind, gfc_simplify_bit_size, gfc_simplify_digits,
1074         gfc_simplify_epsilon, gfc_simplify_huge, gfc_simplify_ibclr,
1075         gfc_simplify_ibset, gfc_simplify_ishft, gfc_simplify_ishftc,
1076         gfc_simplify_maxexponent, gfc_simplify_minexponent,
1077         gfc_simplify_nearest, gfc_simplify_not, gfc_simplify_precision,
1078         gfc_simplify_radix, gfc_simplify_range, gfc_simplify_rrspacing,
1079         gfc_simplify_scale, gfc_simplify_spacing, gfc_simplify_tan,
1080         gfc_simplify_tiny): Likewise.
1081         * trans-intrinsic.c (gfc_conv_intrinsic_aint, gfc_conv_intrinsic_mod,
1082         gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_minmaxval,
1083         prepare_arg_info): Likewise.
1085 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1087         * expr.c (gfc_check_assign): Add comment. Add new warning.
1088         * trans-expr.c (gfc_conv_function_call): Correctly dereference
1089         result of pointer valued function when not in pointer assignment.
1091 2004-08-25  Paul Brook  <paul@codesourcery.com>
1093         * config-lang.in: Remove dead commented line.
1094         * module.c: Replace g95 with gfortran in comment.
1096 2004-08-25  Paul Brook  <paul@codesourcery.com>
1098         PR fortran/17190
1099         * arith.c (gfc_mpfr_to_mpz): Workaround mpfr bug.
1101 2004-08-25  Paul Brook  <paul@codesourcery.com>
1103         PR fortran/17144
1104         * trans-array.c (gfc_trans_allocate_temp_array): Remove
1105         string_length argument.
1106         (gfc_trans_array_ctor_element): New function.
1107         (gfc_trans_array_constructor_subarray): Use it.
1108         (gfc_trans_array_constructor_value): Ditto.  Handle constant
1109         character arrays.
1110         (get_array_ctor_var_strlen, get_array_ctor_strlen): New functions.
1111         (gfc_trans_array_constructor): Use them.
1112         (gfc_add_loop_ss_code): Update to new gfc_ss layout.
1113         (gfc_conv_ss_descriptor): Remember section string length.
1114         (gfc_conv_scalarized_array_ref): Ditto.  Remove dead code.
1115         (gfc_conv_resolve_dependencies): Update to new gfc_ss layout.
1116         (gfc_conv_expr_descriptor): Ditto.
1117         (gfc_conv_loop_setup): Ditto.  Spelling fixes.
1118         * trans-array.h (gfc_trans_allocate_temp_array): Update prototype.
1119         * trans-const.c (gfc_conv_constant):  Update to new gfc_ss layout.
1120         * trans-expr.c (gfc_conv_component_ref): Turn error into ICE.
1121         (gfc_conv_variable): Set string_length from section.
1122         (gfc_conv_function_call): Remove extra argument.
1123         (gfc_conv_expr, gfc_conv_expr_reference): Update to new gfc_ss layout.
1124         * trans-types.c (gfc_get_character_type_len): New function.
1125         (gfc_get_character_type): Use it.
1126         (gfc_get_dtype): Return zero for internal types.
1127         * trans-types.h (gfc_get_character_type_len): Add prototype.
1128         * trans.h (struct gfc_ss): Move string_length out of union.
1130 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1132         * trans.h (build2_v, build3_v): New macros.
1133         (build_v): Remove.
1134         * f95-lang.c (gfc_truthvalue_conversion): Use build2 instead of
1135         build.
1136         * trans-array.c (gfc_conv_descriptor_data,
1137         gfc_conv_descriptor_offset, gfc_conv_descriptor_dimension,
1138         gfc_conv_descriptor_stride, gfc_conv_descriptor_lbound,
1139         gfc_conv_descriptor_ubound, gfc_trans_allocate_array_storage,
1140         gfc_trans_allocate_temp_array,
1141         gfc_trans_array_constructor_subarray,
1142         gfc_trans_array_constructor_value, gfc_conv_array_index_ref,
1143         gfc_trans_array_bound_check, gfc_conv_array_index_offset,
1144         gfc_conv_scalarized_array_ref, gfc_conv_array_ref,
1145         gfc_conv_array_ref, gfc_trans_preloop_setup,
1146         gfc_trans_scalarized_loop_end, gfc_conv_ss_startstride,
1147         gfc_conv_loop_setup, gfc_array_init_size,
1148         gfc_conv_array_initializer, gfc_trans_array_bounds,
1149         gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias,
1150         gfc_conv_expr_descriptor, gfc_conv_array_parameter,
1151         gfc_trans_deferred_array): Use buildN and buildN_v macros instead
1152         of build and build_v as appropriate.
1153         * trans-common.c (create_common): Same.
1154         * trans-decl.c (gfc_trans_auto_character_variable,
1155         gfc_trans_entry_master_switch, gfc_generate_function_code): Same.
1156         * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
1157         gfc_conv_component_ref, gfc_conv_unary_op, gfc_conv_powi,
1158         gfc_conv_cst_int_power, gfc_conv_string_tmp, gfc_conv_concat_op,
1159         gfc_conv_expr_op, gfc_conv_function_call,
1160         gfc_trans_structure_assign): Same.
1161         * trans-intrinsic.c (build_fixbound_expr, build_round_expr,
1162         gfc_conv_intrinsic_aint, gfc_conv_intrinsic_bound,
1163         gfc_conv_intrinsic_cmplx, gfc_conv_intrinsic_mod,
1164         gfc_conv_intrinsic_dim, gfc_conv_intrinsic_sign,
1165         gfc_conv_intrinsic_dprod, gfc_conv_intrinsic_minmax,
1166         gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
1167         gfc_conv_intrinsic_arith, gfc_conv_intrinsic_minmaxloc,
1168         gfc_conv_intrinsic_minmaxval, gfc_conv_intrinsic_btest,
1169         gfc_conv_intrinsic_bitop, gfc_conv_intrinsic_singlebitop,
1170         gfc_conv_intrinsic_ibits, gfc_conv_intrinsic_ishft,
1171         gfc_conv_intrinsic_merge, gfc_conv_intrinsic_strcmp,
1172         gfc_conv_allocated, gfc_conv_associated, prepare_arg_info,
1173         gfc_conv_intrinsic_spacing, gfc_conv_intrinsic_rrspacing,
1174         gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat,
1175         gfc_conv_intrinsic_iargc): Same.
1176         * trans-io.c (set_parameter_value, set_parameter_ref, set_string,
1177         set_flag, add_case, io_result, transfer_namelist_element,
1178         transfer_expr): Same.
1179         * trans-stmt.c (gfc_trans_goto, gfc_trans_return, gfc_trans_if_1,
1180         gfc_trans_arithmetic_if, gfc_trans_do, gfc_trans_do_while,
1181         gfc_trans_integer_select, gfc_trans_logical_select,
1182         gfc_trans_character_select, gfc_trans_forall_loop,
1183         gfc_trans_nested_forall_loop, gfc_do_allocate,
1184         generate_loop_for_temp_to_lhs, generate_loop_for_rhs_to_temp,
1185         compute_inner_temp_size, compute_overall_iter_number,
1186         allocate_temp_for_forall_nest, gfc_trans_pointer_assign_need_temp,
1187         gfc_trans_forall_1, gfc_evaluate_where_mask,
1188         gfc_trans_where_assign, gfc_trans_allocate): Same.
1189         * trans-types.c (gfc_get_dtype, gfc_get_array_type_bounds): Same.
1190         * trans.c (gfc_add_modify_expr, gfc_finish_block,
1191         gfc_build_array_ref, gfc_build_function_call,
1192         gfc_trans_runtime_check): Same.
1194 2004-08-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1196         * trans-const.c (gfc_conv_mpz_to_tree): Change call to
1197         build_int_cst to build_int_cst_wide in accordance to Nathan's
1198         previous patch.
1200 2004-08-25  Nathan Sidwell  <nathan@codesourcery.com>
1202         * trans-array.c (gfc_trans_array_constructor_value): Adjust
1203         build_int_cst calls.
1204         * trans-const.c (gfc_build_string_const, gfc_init_constants,
1205         gfc_conv_mpz_to_tree, gfc_conv_constant_to_tree): Likewise.
1206         * trans-decl.c (gfc_get_symbol_decl, build_entry_thunks,
1207         gfc_trans_entry_master_switch): Likewise.
1208         * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
1209         gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
1210         * trans-io.c (add_case, set_error_locus,
1211         transfer_namelist_element, transfer_expr): Likewise.
1212         * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
1213         gfc_trans_stop, gfc_trans_character_select): Likewise.
1214         * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
1215         * trans.c (gfc_trans_runtime_check): Likewise.
1217 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1219         * trans-decl.c, trans-types.c: Add and remove blank lines as
1220         required.
1222 2004-08-24  Richard Henderson  <rth@redhat.com>
1224         * trans-const.c (gfc_conv_mpz_to_tree): Fix 64-bit shift warning.
1226 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1228         * resolve.c (merge_argument_lists): Revert unintentionally
1229         committed change.
1231 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1233         * trans-decl.c (build_function_decl): Fix spelling in comment.
1234         (build_entry_thunks): Remove code with no function.
1235         (gfc_build_intrinsic_function_decls): Remove empty line.
1237         * resolve.c (resolve_entries): Fix a bunch of comment typos.
1239 2004-08-24  Nathan Sidwell  <nathan@codesourcery.com>
1241         * f95-lang.c (gfc_init_decl_processing): Adjust
1242         build_common_tree_nodes call.
1244 2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1246         * trans-types.c: Spelling and formatting fixes.
1248 2004-08-23  Richard Henderson  <rth@redhat.com>
1250         * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_getlimbn instead
1251         of going through an intermediate string.  Fix 32/64 int/long bug.
1253 2004-08-23  Eric Christopher  <echristo@redhat.com>
1255         * trans-types.c (gfc_type_for_mode): Remove VECTOR_TYPE_SUPPORTED_P
1256         usage. Use build_vector_type_for_mode for vector types.
1258 2004-08-22  Richard Henderson  <rth@redhat.com>
1260         PR 13465
1261         * data.c (find_con_by_offset): Search ordered list; handle
1262         elements with repeat counts.
1263         (gfc_assign_data_value_range): New.
1264         * gfortran.h (struct gfc_data_value): Make repeat unsigned.
1265         (gfc_assign_data_value_range): Declare.
1266         * match.c (top_val_list): Extract repeat count into a temporary.
1267         * resolve.c (values): Make left unsigned.
1268         (next_data_value): Don't decrement left.
1269         (check_data_variable): Use gfc_assign_data_value_range.
1271 2004-08-22  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1273         * trans-const.c, trans-decl.c, trans-expr.c: Spelling fixes.
1275 2004-08-22  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1277         * check.c (gfc_check_reduction): Rename to ...
1278         (check_reduction): ... this. Make static. Don't check type of
1279         first argument.
1280         (gfc_check_minval_maxval, gfc_check_prodcut_sum): New functions.
1281         * intrinsic.c (add_functions): Change MAXVAL, MINVAL, PRODUCT and
1282         SUM to use new check functions.
1283         (check_specific): Change logic to call new functions.
1284         * intrinsic.h (gfc_check_minval_maxval, gfc_check_product_sum):
1285         Add prototypes.
1286         (gfc_check_reduction): Remove prototype.
1288 2004-08-20  Paul Brook  <paul@codesourcery.com>
1289         Canqun Yang  <canqun@nudt.edu.cn>
1291         PR fortran/17077
1292         * trans-array.c (gfc_conv_array_parameter): Pass correct pointer
1293         for automatic arrays.
1294         * trans-types.c (gfc_get_nodesc_array_type): Add comment.
1296 2004-08-19  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1297         (Port from g95)
1299         PR fortran/17074
1300         * match.c (match_simple_forall, match_simple_where): Forward-declare.
1301         (gfc_match_if): Order statement list alphabetically, add WHERE and
1302         FORALL, remove double PAUSE.
1303         (gfc_match_simple_where, match_forall_header,
1304         gfc_match_simple_forall): New functions.
1305         (gfc_match_forall): Use match_forall_header.
1307 2004-08-19  Paul Brook  <paul@codesourcery.com>
1309         PR fortran/17091
1310         * gfortran.h (gfc_access): Give ACCESS_UNKNOWN value 0.
1311         * symbol.c (gfc_clear_attr): Use memset.
1313 2004-08-19  Paul Brook  <paul@codesourcery.com>
1315         PR fortran/14976
1316         PR fortran/16228
1317         * data.c (assign_substring_data_value): Remove.
1318         (create_character_intializer): New function.
1319         (gfc_assign_data_value): Track the typespec for the current
1320         subobject.  Use create_character_intializer.
1322 2004-08-19  Erik Schnetter  <schnetter@aei.mpg.de>
1324         PR fortran/16946
1325         * check.c (gfc_check_reduction): New function.
1326         (gfc_check_minval_maxval): Removed.
1327         (gfc_check_product): Removed.
1328         (gfc_check_sum): Removed.
1329         * intrinsic.h: Add/remove declarations for these.
1330         * gfortran.h: Add field f3red to union gfc_check_f.
1331         * intrinsic.c (add_sym_3red): New function.
1332         (add_functions): Register maxval, minval, product, and sum intrinsics
1333         through add_sym_3red.
1334         (check_specific): Handle f3red union field.
1335         * iresolve.c: Whitespace change.
1337 2004-08-18  Paul Brook  <paul@codesourcery.com>
1339         * trans-types.c (gfc_sym_type): Use pointer types for optional args.
1341 2004-08-18  Victor Leikehman  <lei@il.ibm.com>
1343         PR fortran/13278
1344         * trans-io.c (transfer_namelist_element): New. Recursively handle
1345         derived-type variables.  Pass string lengths.
1346         (build_dt): Code moved to build_namelist, with some
1347         changes and additions.
1348         (gfc_build_io_library_fndecls): Declare the fifth
1349         argument in st_set_nml_var_char -- string_length.
1351 2004-08-17  Paul Brook  <paul@codesourcery.com>
1352         Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1354         PR fortran/13082
1355         * decl.c (get_proc_name): Update mystery comment.
1356         (gfc_match_entry): Check for errors earlier.  Add entry point to list.
1357         * dump-parse-tree.c (gfc_show_code_node): Print EXEC_ENTRY nodes.
1358         * gfortran.h (symbol_attribute): Add entry_master.  Document entry.
1359         (struct gfc_entry_list): Define.
1360         (gfc_get_entry_list): Define.
1361         (struct gfc_namespace): Add refs and entries.
1362         (enum gfc_exec_op): Add EXEC_ENTRY.
1363         (struct gfc_code): Add ext.entry.
1364         * module.c (ab_attribute, attr_bits): Remove AB_ENTRY.
1365         (mio_symbol_attribute): Don't save/reture addr->entry.
1366         (mio_namespace_ref): Refcount namespaces.
1367         * parse.c (accept_statement): Handle ST_ENTRY.
1368         (gfc_fixup_sibling_symbols): Mark symbol as referenced.
1369         (parse_contained): Fixup sibling references to entry points
1370         after parsing the procedure body.
1371         * resolve.c (resolve_contained_fntype): New function.
1372         (merge_argument_lists, resolve_entries): New functions.
1373         (resolve_contained_functions): Use them.
1374         (resolve_code): Handle EXEC_ENTRY.
1375         (gfc_resolve): Call resolve_entries.
1376         * st.c (gfc_free_statement): Handle EXEC_ENTRY.
1377         * symbol.c (gfc_get_namespace): Refcount namespaces.
1378         (gfc_free_namespace): Ditto.
1379         * trans-array.c (gfc_trans_dummy_array_bias): Treat all args as
1380         optional when multiple entry points are present.
1381         * trans-decl.c (gfc_get_symbol_decl): Remove incorrect check.
1382         (gfc_get_extern_function_decl): Add assertion.  Fix coment.
1383         (create_function_arglist, trans_function_start, build_entry_thunks):
1384         New functions.
1385         (gfc_build_function_decl): Rename ...
1386         (build_function_decl): ... to this.
1387         (gfc_create_function_decl): New function.
1388         (gfc_generate_contained_functions): Use it.
1389         (gfc_trans_entry_master_switch): New function.
1390         (gfc_generate_function_code): Use new functions.
1391         * trans-stmt.c (gfc_trans_entry): New function.
1392         * trans-stmt.h (gfc_trans_entry): Add prototype.
1393         * trans-types.c (gfc_get_function_type): Add entry point argument.
1394         * trans.c (gfc_trans_code): Handle EXEC_ENTRY.
1395         (gfc_generate_module_code): Call gfc_create_function_decl.
1396         * trans.h (gfc_build_function_decl): Remove.
1397         (gfc_create_function_decl): Add prototype.
1399 2004-08-15  Andrew Pinski  <apinski@apple.com>
1401         PR fortran/17030
1402         * f95-lang.c (gfc_init_builtin_functions): Initialize the builtins
1403         for cabs{,f} and copysign{,f}.
1404         * trans-decl.c (gfor_fndecl_math_cabsf): Delete.
1405         (gfor_fndecl_math_cabs): Delete.
1406         (gfor_fndecl_math_sign4): Delete.
1407         (gfor_fndecl_math_sign8): Delete.
1408         (gfc_build_intrinsic_function_decls): Remove the
1409         initializing of cabs{,f} and copysign{,f} functions.
1410         * trans-intrinsic.c (gfc_conv_intrinsic_abs): Use the builtins
1411         instead of the functions definitions.
1412         (gfc_conv_intrinsic_sign): Likewise.
1413         * trans.h (gfor_fndecl_math_cabsf): Delete.
1414         (gfor_fndecl_math_cabs): Delete.
1415         (gfor_fndecl_math_sign4): Delete.
1416         (gfor_fndecl_math_sign8): Delete.
1418 2004-08-15  Nathan Sidwell  <nathan@codesourcery.com>
1420         * trans-array.c (gfc_trans_array_constructor_value): Use
1421         build_int_cst.
1422         * trans-const.c (gfc_build_string_const,
1423         gfc_init_constants, gfc_conv_mpz_to_tree,
1424         gfc_conv_constant_to_tree): Likewise.
1425         * trans-decl.c (gfc_get_symbol_decl): Likewise.
1426         * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
1427         gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
1428         * trans-io.c (add_case, set_error_locus, build_dt,
1429         transfer_expr): Likewise.
1430         * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
1431         gfc_trans_stop, gfc_trans_character_select): Likewise.
1432         * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
1433         * trans.c (gfc_trans_runtime_check): Likewise.
1435 2004-08-14  Paul Brook  <paul@codesourcery.com>
1437         * trans-decl.c (gfc_build_function_decl): Remove dead code.
1439 2004-08-14  Paul Brook  <paul@codesourcery.com>
1441         * trans-arry.c (gfc_trans_auto_array_allocation): Remove unused var.
1443 2004-08-13  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1445         * gfortran.h: Add comments.
1446         * parse.c (parse_contained): Fix comment typo.
1447         * resolve.c (was_declared): Ditto.
1448         * symbol.c: Ditto.
1450 2004-08-11  Paul Brook  <paul@codeourcery.com>
1452         PR fortran/16917
1453         * intrinsic.c (add_functions): Add dfloat as an alias for dble.
1455 2004-08-10  Richard Henderson  <rth@redhat.com>
1457         * f95-lang.c (gfc_init_builtin_functions): Remove
1458          __builtin_stack_alloc, add __builtin_alloca.
1459         * trans-array.c (gfc_trans_auto_array_allocation): Use DECL_EXPR.
1460         * trans-decl.c (gfc_trans_auto_character_variable): Likewise.
1462 2004-08-10  Paul Brook  <paul@codesourcery.com>
1464         * trans-io.c (transfer_expr): Handle pointters.
1466 2004-08-10  Paul Brook  <paul@codesourcery.com>
1468         PR fortran/16919
1469         * trans-array.c (gfc_add_loop_ss_code): Handle GFC_SS_COMPONENT.
1470         (gfc_conv_array_index_offset): Allow "temporary" with nonzero delta.
1471         (gfc_trans_preloop_setup, gfc_trans_scalarized_loop_boundary):
1472         Handle GFC_SS_COMPONENT.
1473         (gfc_conv_ss_startstride): Ditto.  Set ss->shape.
1474         (gfc_conv_loop_setup): Tweak commends. Remove dead code.
1475         Use ss->shape.
1476         (gfc_conv_array_initializer): Call specific initializer routines.
1477         * trans-expr.c (gfc_trans_structure_assign): New function.
1478         (gfc_trans_subarray_assign): New function.
1479         (gfc_trans_subcomponent_assign): New fucntion
1480         (gfc_conv_structure): Use them.
1481         * trans.h (gfc_ss_type): Add GFC_SS_COMPONENT.
1482         (gfc_ss): Add shape.
1484 2004-08-08  Victor Leikehman  <lei@il.ibm.com>
1486         * simplify.c (gfc_simplify_shape): Bugfix.
1487         * expr.c (gfc_copy_shape_excluding): New function.
1488         * gfortran.h (gfc_get_shape): Bugfix.
1489         (gfc_copy_shape_excluding): Added declaration.
1490         * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
1491         gfc_resolve_cshift, gfc_resolve_eoshift, gfc_resolve_lbound,
1492         gfc_resolve_ubound, gfc_resolve_transpose): Added compile
1493         time resolution of shape.
1495 2004-08-06  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1497         * intrinsic.c (add_subroutines): Add getenv and
1498         get_environment_variable. (add_sym_5s): New function.
1499         * intrinsic.h (gfc_resolve_get_environment_variable): Add
1500         prototype.
1501         * iresolve.c (gfc_resolve_get_environment_variable): New
1502         function.
1504 2004-08-06  Feng Wang  <fengwang@nudt.edu.cn>
1506         * f95-lang.c (gfc_init_builtin_functions): Fix the number of
1507         __builtin_pow[f] arguments.
1509 2004-08-06  Steven G. Kargl  <kargls@comcast.net>
1511         * arith.c: Add #define for model numbers.  Remove global GMP variables.
1512         (natural_logarithm,common_logarithm,exponential,sine,
1513         cosine,arctangent,hypercos,hypersine ): Remove.
1514         (gfc_mpfr_to_mpz,gfc_set_model_kind,gfc_set_model): New functions.
1515         (arctangent2,gfc_arith_init_1,gfc_arith_done_1
1516         gfc_check_real_range, gfc_constant_result, gfc_range_check,
1517         gfc_arith_uminus,gfc_arith_plus, gfc_arith_minus, gfc_arith_times,
1518         gfc_arith_divide,complex_reciprocal,complex_pow_ui,
1519         gfc_arith_power,gfc_compare_expr,compare_complex,gfc_convert_real,
1520         gfc_convert_complex,gfc_int2real,gfc_int2complex,
1521         gfc_real2int,gfc_real2real,gfc_real2complex,
1522         gfc_complex2int,gfc_complex2real,gfc_complex2complex): Convert GMP
1523         to MPFR, use new functions.
1524         * arith.h: Remove extern global variables.
1525         (natural_logarithm,common_logarithm,exponential, sine, cosine,
1526         arctangent,hypercos,hypersine): Remove prototypes.
1527         (arctangent2): Update prototype from GMP to MPFR.
1528         (gfc_mpfr_to_mpz, gfc_set_model_kind,gfc_set_model): Add prototypes.
1529         * dump-parse-tree.c (gfc_show_expr): Convert GMP to MPFR.
1530         * expr.c (free_expr0,gfc_copy_expr): Convert GMP to MPFR.
1531         * gfortran.h (GFC_REAL_BITS): Remove.
1532         (arith): Add ARITH_NAN.
1533         Include mpfr.h.  Define GFC_RND_MODE.
1534         Rename GCC_GFORTRAN_H GFC_GFC_H.
1535         (gfc_expr): Convert GMP to MPFR.
1536         * module.c: Add arith.h, correct type in comment.
1537         (mio_gmp_real): Convert GMP to MPFR.
1538         (mio_expr):  Use gfc_set_model_kind().
1539         * primary.c:  Update copyright date with 2004.
1540         (match_real_constant,match_const_complex_part): Convert GMP to MPFR.
1541         * simplify.c: Remove global GMP variables
1542         (gfc_simplify_abs,gfc_simplify_acos,gfc_simplify_aimag,
1543         gfc_simplify_aint,gfc_simplify_dint,gfc_simplify_anint,
1544         gfc_simplify_dnint,gfc_simplify_asin,gfc_simplify_atan,
1545         gfc_simplify_atan2,gfc_simplify_ceiling,simplify_cmplx,
1546         gfc_simplify_conjg,gfc_simplify_cos,gfc_simplify_cosh,
1547         gfc_simplify_dim,gfc_simplify_dprod,gfc_simplify_epsilon,
1548         gfc_simplify_exp,gfc_simplify_exponent,gfc_simplify_floor,
1549         gfc_simplify_fraction,gfc_simplify_huge,gfc_simplify_int,
1550         gfc_simplify_ifix,gfc_simplify_idint,gfc_simplify_log,
1551         gfc_simplify_log10,simplify_min_max,gfc_simplify_mod,
1552         gfc_simplify_modulo,gfc_simplify_nearest,simplify_nint,
1553         gfc_simplify_rrspacing,gfc_simplify_scale,
1554         gfc_simplify_set_exponent,gfc_simplify_sign,gfc_simplify_sin,
1555         gfc_simplify_sinh,gfc_simplify_spacing,gfc_simplify_sqrt,
1556         gfc_simplify_tan,gfc_simplify_tanh,gfc_simplify_tiny,
1557         gfc_simplify_init_1,gfc_simplify_done_1):  Convert GMP to MPFR.
1558         Use new functions.
1559         * trans-const.c (gfc_conv_mpfr_to_tree): Rename from
1560         gfc_conv_mpf_to_tree.  Convert it to use MPFR
1561         (gfc_conv_constant_to_tree): Use it.
1562         * trans-const.h: Update prototype for gfc_conv_mpfr_to_tree().
1563         * trans-intrinsic.c: Add arith.h, remove gmp.h
1564         (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod): Convert GMP to MPFR.
1566 2004-08-06  Victor Leikehman  <lei@il.ibm.com>
1567         Paul Brook  <paul@codesourcery.com>
1569         * trans-array.c (gfc_trans_allocate_array_storage,
1570         gfc_trans_allocate_temp_array, gfc_add_loop_ss_code,
1571         gfc_conv_loop_setup): For functions, if the shape of the result
1572         is not known in compile-time, generate an empty array descriptor for
1573         the result and let the callee to allocate the memory.
1574         (gfc_trans_dummy_array_bias): Do nothing for pointers.
1575         (gfc_conv_expr_descriptor): Use function return values directly.
1576         * trans-expr.c (gfc_conv_function_call): Always add byref call
1577         insn to pre chain.
1578         (gfc_trans_pointer_assignment): Add comments.
1579         (gfc_trans_arrayfunc_assign): Don't chain on expression.
1581 2004-08-01  Roger Sayle  <roger@eyesopen.com>
1583         * options.c (gfc_init_options): Don't warn about the use GNU
1584         extensions by default.
1585         (gfc_post_options): Warn about GNU extensions with -pedantic.
1586         (gfc_handle_option): Don't warn about GNU extensions with -std=gnu.
1588 2004-07-30  Richard Henderson  <rth@redhat.com>
1590         * trans-expr.c (gfc_conv_expr_reference): Create a CONST_DECL
1591         for TREE_CONSTANTs.
1593 2004-07-25  Richard Henderson  <rth@redhat.com>
1595         * trans-decl.c (gfc_build_function_decl): Set DECL_ARTIFICIAL
1596         and DECL_IGNORED_P on RESULT_DECL.
1597         (gfc_generate_constructors): Likewise.
1599 2004-07-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1601         PR fortran/16465
1602         * lang.opt (ffixed-line-length-none, ffixed-line-length-): New
1603         options.
1604         (ffixed-line-length-80, ffixed-line-length-132): Remove.
1605         * options.c (gfc_handle_options): Deal with changed options.
1606         * scanner.c (load_line): Change second arg to 'char **',
1607         allocate if pointing to NULL. Keep track of buffer's length.
1608         Adapt buffer size to overlong lines. Pad lines to full length
1609         in fixed form.
1610         (load_file): Adapt to new interface of load_line.
1612 2004-07-17  Joseph S. Myers  <jsm@polyomino.org.uk>
1614         * trans.h (builtin_function): Declare.
1616 2004-07-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1618         PR fortran/16404
1619         (parts ported from g95)
1620         * parse.h (gfc_state_data): New field do_variable.
1621         (gfc_check_do_variable): Add prototype.
1622         * parse.c (push_state): Initialize field 'do_variable'.
1623         (gfc_check_do_variable): New function.
1624         (parse_do_block): Remember do iterator variable.
1625         (parse_file): Initialize field 'do_variable'.
1626         * match.c (gfc_match_assignment, gfc_match_do,
1627         gfc_match_allocate, gfc_match_nullify, gfc_match_deallocate):
1628         Add previously missing checks.
1629         (gfc_match_return): Reformat error message.
1630         * io.c (match_out_tag): New function.
1631         (match_open_element, match_close_element,
1632         match_file_element, match_dt_element): Call match_out_tag
1633         instead of match_vtag where appropriate.
1634         (match_io_iterator, match_io_element): Add missing check.
1635         (match_io): Reformat error message.
1636         (match_inquire_element): Call match_out_tag where appropriate.
1638         * parse.c (gfc_check_do_variable): Fix error locus.
1640 2004-07-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1642         PR fortran/15129
1643         * trans-decl.c (gfc_build_function_decl): Create a new chardecl
1644         for every assumed length character dummy argument.
1646         PR fortran/15140
1647         * trans-decl.c (gfc_trans_deferred_vars): Remove bogus assertion.
1649         PR fortran/13792
1650         * simplify.c (gfc_simplify_bound): Copy the bound expression.
1652 2004-07-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1654         PR fortran/15324
1655         * trans-array.c gfc_trans_g77_array,
1656         gfc_trans_dummy_array_bias): Don't call gfc_trans_string_init
1657         for assumed length characters.
1658         (gfc_conv_expr_descriptor): Set se->string_length if dealing
1659         with a character expression.
1660         (gfc_cvonv_array_parameter): Pass string length when passing
1661         character array according to g77 conventions.
1663 2004-07-12  Paul Brook  <paul@codesourcery.com>
1665         * expr.c (gfc_check_assign_symbol): Handle pointer assignments.
1666         * trans-array.c (gfc_trans_auto_array_allocation): Remove
1667         initialization code.
1668         * trans-common.c (create_common): Use gfc_conv_initializer.
1669         * trans-decl.c (gfc_get_symbol_decl): Use gfc_conv_initializer.
1670         * trans-expr.c (gfc_conv_initializer): New function.
1671         (gfc_conv_structure): Use it.
1672         * trans.h (gfc_conv_initializer): Add prototype.
1674 2004-07-11  Paul Brook  <paul@codesourcery.com>
1676         PR fortran/15986
1677         * parse.c (gfc_fixup_sibling_symbols): Also look for untyped
1678         variables.
1679         (parse_contained): Mark contained symbols as referenced.
1681 2004-07-11  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1683         PR fortran/16455
1684         * module.c (gfc_dump_module, gfc_use_module): Print locus
1685         when opening of module file fails.
1687         PR fortran/16404
1688         * io.c (match_io): Flag 'WRITE(...), ...' as extension.
1690         PR fortran/16404
1691         * match.c (gfc_match_program): A program name is obligatory.
1692         (gfc_match_return): RETURN in main program is an extension.
1693         (gfc_match_block_data): A space is required before a block data
1694         name.
1696         PR fortran/16433
1697         * primary.c (match_boz_constant): Call gfc_notify_std only if
1698         we actually have a non-standard boz-literal-constant.
1700         PR fortran/15754
1701         * expr.c (gfc_check_assign): Print ranks if incompatible. Issue
1702         warning if assigning NULL().
1704 2004-07-11  Joseph S. Myers  <jsm@polyomino.org.uk>
1706         * f95-lang.c (set_block): Remove.
1707         (gfc_clear_binding_stack): New.
1708         (LANG_HOOKS_CLEAR_BINDING_STACK): Define.
1709         (struct binding_level): Remove block_created_by_back_end.
1710         (clear_binding_level): Likewise.
1711         (poplevel): Don't handle block_created_by_back_end.
1713 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1715         * trans-decl.c (gfc_create_module_variable): Nothing to do if
1716         symbol is in common, because we ...
1717         (gfc_generate_module_vars): Call gfc_trans_common.
1719 2004-07-10  Paul Brook  <paul@codesourcery.com>
1721         * trans-array.c (gfc_build_null_descriptor): New function.
1722         (gfc_trans_static_array_pointer): Use it.
1723         * trans-array.h (gfc_build_null_descriptor): Add prototype.
1724         * trans-expr.c (gfc_conv_structure): Handle array pointers.
1726 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1728         PR fortran/16336
1729         * decl.c (gfc_match_save): Use-associated common block
1730         doesn't collide.
1731         * gfortran.h (gfc_common_head): Add new field 'name'.
1732         Fix typo in comment after #endif.
1733         * match.c (gfc_get_common): Add new argument from_common,
1734         mangle name if flag is set, fill in new field in structure
1735         gfc_common_head.
1736         (match_common): Set new arg in call to gfc_get_common,
1737         use-associated common block doesn't collide.
1738         * match.h (gfc_get_common): Adapt prototype.
1739         * module.c (load_commons): Set new arg in call to
1740         gfc_get_common.
1741         * symbol.c (free_common_tree): New function.
1742         (gfc_free_namespace): Call new function.
1743         * trans-common.c (several functions): Remove argument
1744         'name', use name from gfc_common_head instead.
1746 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1748         * expr.c (gfc_check_pointer_assign): Verify that rank of the LHS
1749         and RHS match. Return early if the RHS is NULL().
1751         PR fortran/16336
1752         * match.c (match_common): Fix error reporting for used common.
1754         PR fortran/15969
1755         * trans-expr.c (gfc_conv_structure): Handle initialization
1756         of scalar pointer components.
1758         * parse.c (decode_statement): Fix matching of BLOCK DATA.
1760         * trans-decl.c (generate_local_decl): Remove workaround obsoleted
1761         by fix for PR 15481.
1763 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1765         * trans-common.c: Fix whitespace issues, make variable names
1766         more readable.
1767         (create_common): Additionally, make loop logic more obvious.
1769 2004-07-10  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1770         Paul Brook  <paul@codesourcery.com>
1772         PR fortran/13415
1773         * trans-common.c (calculate_length): Remove ...
1774         (get_segment_info): Merge into here.  Save field type.
1775         (build_field): Use saved type.
1776         (create_common, new_condition, new_segment, finish_equivalences):
1777         Use new get_segment_info.
1778         * trans-types.c: Update comment.
1780 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1782         PR fortran/14077
1783         * moduele.c (mio_symbol): Don't I/O initial values unless
1784         symbol is a parameter.
1786 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1788         PR fortran/13201
1789         * resolve.c (resolve_symbol): Verify that the shape of a
1790         parameter array is not only explicit, but also constant.
1791         * array.c (gfc_is_compile_time_shape): New function.
1792         * gfortran.h (gfc_is_compile_time_shape): Add prototype.
1794 2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1796         PR fortran/15481
1797         PR fortran/13372
1798         PR fortran/13575
1799         PR fortran/15978
1800         * module.c (write_symbol, write_symtree): Remove workaround.
1801         * primary.c (match_actual_arglist): Enhance comment.
1802         (gfc_match_rvalue): Handle function call with first argument
1803         a keyword argument correctly.
1804         * resolve.c (resolve_symbol): Change call to
1805         gfc_set_default_type to issue error if no implicit type
1806         can be found.
1807         * trans-decl.c (gfc_create_module_variable): Remove workaround.
1809 2004-07-08  Paul Brook  <paul@codesourcery.com>
1811         * intrinsic.c (add_sym_4s): New function.
1812         (add_subroutines): Change gfc_add_sym_? to gfc_add_sym_?s.
1814 2004-07-04  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1815         Paul Brook  <paul@codesourcery.com>
1817         PR fortran/15280
1818         PR fortran/15665
1819         * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_IARGC and
1820         GFC_ISYM_COMMAND_ARGUMENT_COUNT.
1821         * intrinsic.c (add_functions):  Identify iargc.  Add
1822         command_argument_count.
1823         (add_subroutines): Resolve getarg.  Add get_command and
1824         get_command_argument.
1825         * intrinsic.h (gfc_resolve_getarg, gfc_resolve_get_command,
1826         gfc_resolve_get_command_argument): Add prototypes.
1827         * iresolve.c (gfc_resolve_getarg, gfc_resolve_get_command,
1828         gfc_resolve_get_command_argument): New functions.
1829         * trans-decl.c (gfor_fndecl_iargc): New variable.
1830         (gfc_build_intrinsic_function_decls): Set it.
1831         * trans-intrinsic.c (gfc_conv_intrinsic_iargc): New function.
1832         (gfc_conv_intrinsic_function): Use it.
1833         * trans.h (gfor_fndecl_iargc): Declare.
1835 2004-07-04  Matthias Klose  <doko@debian.org>
1837         * Make-lang.in: Generate and install gfortran man page.
1838         * invoke.texi: Remove extra '@c man end'.
1840 2004-07-04  Richard Henderson  <rth@redhat.com>
1842         * f95-lang.c (gfc_mark_addressable): Don't put_var_into_stack.
1844 2004-07-04  Paul Brook  <paul@codesourcery.com>
1846         * decl.c (gfc_match_implicit_range): Don't use typespec.
1847         (gfc_match_implicit): Handle character selectors.
1848         * gfortran.h (gfc_set_implicit): Remove prototype.
1849         (gfc_add_new_implicit_range, gfc_merge_new_implicit): Update.
1850         * parse.c (accept_statement): Don't call gfc_set_implicit.
1851         * symbol.c (new_ts): Remove.
1852         (gfc_set_implicit_none): Use same loop bounds as other functions.
1853         (gfc_set_implicit): Remove.
1854         (gfc_clear_new_implicit, gfc_add_new_implicit_range): Only set flags.
1855         (gfc_merge_new_implicit): Combine with gfc_set_implicit.
1857 2004-06-30  Richard Henderson  <rth@redhat.com>
1859         * match.c (var_element): Remove unused variable.
1861         * trans-decl.c (gfc_generate_function_code): Don't set
1862         x_whole_function_mode_p.
1863         (gfc_generate_constructors): Likewise.
1865 2004-06-30  Richard Henderson  <rth@redhat.com>
1867         * trans-decl.c (gfc_generate_function_code): Don't set
1868         immediate_size_expand.
1869         (gfc_generate_constructors): Likewise.
1871 2004-06-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1873         PR fortran/16161
1874         * decl.c (gfc_match_type_spec): Rename second argument to
1875         'implicit_flag', reverse meaning. Don't match_char_spec if
1876         'implicit_flag' is set. Rename to ...
1877         (match_type_spec): ... this.
1878         (gfc_match_implicit_none, match_implicit_range): Move here
1879         from match.c.
1880         (gfc_match_implicit): Move here from match.c, try to
1881         match_char_len if match_implicit_range doesn't succeed for
1882         CHARACTER implicits. Call renamed fucntion match_type_spec.
1883         (gfc_match_data_decl, match_prefix): Call renamed function
1884         match_type_spec.
1885         * match.c (gfc_match_implicit_none, match_implicit_range,
1886         gfc_match_implicit): Move to decl.c.
1887         * match.h (gfc_match_implicit_none, gfc_match_implicit):
1888         Move protoypes to section 'decl.c'.
1889         (gfc_match_type_spec): Remove prototype.
1891 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1893         * decl.c, interface.c, symbol.c, trans-common.c: Add 2004 to
1894         copyright years.
1896 2004-06-29  Steven Bosscher  <stevenb@suse.de>
1898         Make sure types in assignments are compatible.  Mostly mechanical.
1899         * trans-const.h (gfc_index_one_node): New define.
1900         * trans-array.c (gfc_trans_allocate_array_storage,
1901         gfc_trans_allocate_temp_array, gfc_trans_array_constructor_subarray,
1902         gfc_trans_array_constructor_value, gfc_trans_array_constructor,
1903         gfc_conv_array_ubound, gfc_conv_array_ref,
1904         gfc_trans_scalarized_loop_end, gfc_conv_section_startstride,
1905         gfc_conv_ss_startstride, gfc_conv_loop_setup, gfc_array_init_size,
1906         gfc_trans_array_bounds, gfc_trans_dummy_array_bias,
1907         gfc_conv_expr_descriptor, gfc_trans_deferred_array): Use the correct
1908         types in assignments, conversions and conditionals for expressions.
1909         * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
1910         gfc_conv_unary_op, gfc_conv_cst_int_power, gfc_conv_string_tmp,
1911         gfc_conv_function_call, gfc_trans_pointer_assignment,
1912         gfc_trans_scalar_assign): Likewise.
1913         * trans-intrinsic.c (build_fixbound_expr, gfc_conv_intrinsic_bound,
1914         gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
1915         gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_btest,
1916         gfc_conv_intrinsic_singlebitop, gfc_conv_intrinsic_ishft,
1917         gfc_conv_intrinsic_ishftc, gfc_conv_intrinsic_strcmp,
1918         gfc_conv_allocated, gfc_conv_associated,
1919         gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_trim): Likewise.
1920         * trans-io.c (set_string): Likewise.
1921         * trans-stmt.c (gfc_trans_do, gfc_trans_forall_loop,
1922         gfc_do_allocate, generate_loop_for_temp_to_lhs,
1923         generate_loop_for_rhs_to_temp, compute_inner_temp_size,
1924         compute_overall_iter_number, gfc_trans_assign_need_temp,
1925         gfc_trans_pointer_assign_need_temp, gfc_trans_forall_1,
1926         gfc_evaluate_where_mask, gfc_trans_where_assign,
1927         gfc_trans_where_2): Likewise.
1928         * trans-types.c (gfc_get_character_type, gfc_build_array_type,
1929         gfc_get_nodesc_array_type, gfc_get_array_type_bounds): Likewise.
1931         * trans.c (gfc_add_modify_expr): Add sanity check that types
1932         for the lhs and rhs are the same for scalar assignments.
1934 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1936         * dump-parse-tree.c (show_common): New function.
1937         (gfc_show_namespace): Show commons.
1939 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
1940         Andrew Vaught  <andyv@firstinter.net>
1942         PR fortran/13249
1943         PR fortran/15481
1944         * decl.c (gfc_match_save): Adapt to new common structures,
1945         don't allow saving USE-associated common.
1946         * dump-parse-tree (gfc_show_attr): (saved_)common are not
1947         symbol attributes any longer.
1948         (gfc_show_symbol): Don't show old-style commons any longer.
1949         (gfc_show_namespace): Adapt call to gfc_traverse_symtree to new
1950         interface.
1951         * gfortran.h (symbol_attribute): Remove common and saved_common
1952         attributes.
1953         (gfc_symbol): Remove common_head element.
1954         (gfc_common_head): New struct.
1955         (gfc_get_common_head): New macro.
1956         (gfc_symtree): Add field 'common' to union.
1957         (gfc_namespace): Add field 'common_root'; change type of field
1958         'blank_common' to blank_common.
1959         (gfc_add_data): New prototype.
1960         (gfc_traverse_symtree): Expect a symtree as first argument
1961         instead of namespace.
1962         * match.c (gfc_get_common): New function.
1963         (match_common_name): Change to take char * as argument, adapt,
1964         fix bug with empty name.
1965         (gfc_match_common): Adapt to new data structures. Disallow
1966         redeclaration of USE-associated COMMON-block. Fix bug with
1967         empty common.
1968         (var_element): Adapt to new common structures.
1969         * match.h (gfc_get_common): Declare.
1970         * module.c: Add 2004 to copyright years, add commons to module
1971         file layout description.
1972         (ab_attribute, attr_bits, mio_symbol_attributes): Remove code
1973         for removed attributes.
1974         (mio_symbol): Adapt to new way of storing common relations.
1975         (load_commons): New function.
1976         (read_module): Skip common list on first pass, load_commons at
1977         second.
1978         (write_commons): New function.
1979         (write_module): Call write_commons().
1980         * symbol.c (gfc_add_saved_comon, gfc_add_common): Remove
1981         functions related to removed attributes.
1982         (gfc_add_data): New function.
1983         (gfc_clear_attr): Don't set removed attributes.
1984         (gfc_copy_attr): Don't copy removed attributes.
1985         (traverse_symtree): Remove.
1986         (gfc_traverse_symtree): Don't traverse symbol
1987         tree of the passed namespace, but require a symtree to be passed
1988         instead. Unify with traverse_symtree.
1989         (gfc_traverse_ns): Call gfc_traverse_symtree according to new
1990         interface.
1991         (save_symbol): Remove setting of removed attribute.
1992         * trans-common.c (gfc_sym_mangled_common_id): Change to
1993         take 'char *' argument instead of 'gfc_symbol'.
1994         (build_common_decl, new_segment, translate_common): Adapt to new
1995         data structures, add new
1996         argument name.
1997         (create_common): Adapt to new data structures, add new
1998         argument name. Fix typo in intialization of derived types.
1999         (finish_equivalences): Add second argument in call to
2000         create_common.
2001         (named_common): take 'gfc_symtree' instead of 'gfc_symbol'.
2002         (gfc_trans_common): Adapt to new data structures.
2003         * trans-decl.c (gfc_create_module_variables): Remove test for
2004         removed attribute.
2006 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2008         * io.c: Add 2004 to copyright years.
2010 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2011         Andrew Vaught  <andyv@firstinter.net>
2013         * gfortran.h (gfc_gsymbol): New typedef.
2014         (gfc_gsym_root): New variable.
2015         (gfc_get_gsymbol, gfc_find_gsym): New prototypes.
2016         * parse.c (global_used): New function.
2017         (parse_block_data): Check for double empty BLOCK DATA,
2018         use global symbol table.
2019         (parse_module): Use global symbol table.
2020         (add_global_procedure, add_global_program): New functions.
2021         (gfc_parse_file): Use global symbol table.
2022         * symbol.c (gfc_gsym_root): New variable.
2023         (gfc_find_gsym, gsym_compare, gfc_get_gsymbol): New
2024         functions.
2026 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2028         * module.c (mio_gmp_real): Correct writing of negative numbers.
2030 2004-06-29  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2032         PR fortran/15963
2033         * expr.c (check_intrinsic_op): Allow comparison of characters.
2034         Make logic easier.
2036 2004-06-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2037         Andrew Vaught  <andyv@firstinter.net>
2039         * decl.c (contained_procedure): New function.
2040         (match_end): Verify correctness of END STATEMENT in
2041         all cases.
2043 2004-06-26  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2044         Andrew Vaught  <andyv@firstinter.net>
2046         PR fortran/15190
2047         * decl.c (gfc_match_type_spec), io.c (match_io), parse.c
2048         (decode_statement): Enforce required space in free-form.
2050 2004-06-22  Richard Kenner  <kenner@vlsi1.ultra.nyu.edu>
2052         * f95-lang.c (LANG_HOOKS_GIMPLE_BEFORE_INLINING): Deleted.
2053         * trans-array.c (gfc_conv_descriptor_data): Add operand
2054         for COMPONENT_REF.
2055         (gfc_conv_descriptor_offset, gfc_conv_descriptor_dtype): Likewise.
2056         (gfc_conv_descriptor_dimension, gfc_conv_descriptor_stride): Likewise.
2057         (gfc_conv_descriptor_lbound, gfc_conv_descriptor_ubound): Likewise.
2058         * trans-common.c (create_common): Likewise.
2059         * trans-expr.c (gfc_conv_component_ref): Likewise.
2060         * trans-io.c (set_parameter_value): Likewise.
2061         (set_parameter_ref, set_string, set_flag, io_result): Likewise.
2062         (transfer_expr): Likewise.
2063         * trans-decl.c (gfc_trans_auto_character_variable):
2064         Set up to get DECL_SIZE and DECL_SIZE_UNIT gimplified.
2065         (gfc_gimplify_function): New function.
2066         (gfc_generate_function-code): Properly handle nested functions.
2067         * trans.c (gfc_build_array_ref): Add two new operands for ARRAY_REF.
2069 2004-06-22  Janne Blomqvist  <jblomqvi@cc.hut.fi>
2071         PR fortran/15750
2072         * io.c (gfc_match_inquire): Bugfix for iolength related stuff.
2073         (gfc_resolve_inquire): Resolve the iolength tag.  Return
2074         SUCCESS at end of function if no failure has occured.
2075         * resolve.c (resolve_code): Resolve if iolength is encountered.
2076         * trans-io.c: (ioparm_iolength, iocall_iolength,
2077         iocall_iolength_done): New variables.
2078         (last_dt): Add IOLENGTH.
2079         (gfc_build_io_library_fndecls ): Set iolength related variables.
2080         (gfc_trans_iolength): Implement.
2081         (gfc_trans_dt_end): Treat iolength as a third form of data transfer.
2083 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de
2085         PR fortran/15511
2086         * scanner.c (load_line): Don't truncate preprocessor lines.
2087         Reformat error message.
2088         (preprocessor_line): Issue warning in case of malformed
2089         preprocessor line.
2091 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2093         * resolve.c (resolve_symbol): Add comment in function body.
2094         (check_data_variable): Change type of mark to ar_type, adapt code
2095         accordingly.
2097 2004-06-21  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2099         * array.c (gfc_insert_constructor): Avoid redundant call to
2100         mpz_comp. Add 2004 to copyright years.
2102 2004-06-21  Joseph S. Myers  <jsm@polyomino.org.uk>
2104         * trans.h (stmtblock_t): Change has_scope to unsigned int.
2106 2004-06-20  Steven G. Kargl  <kargls@comcast.net>
2108         * arith.c (gfc_range_check): correct complex underflow.
2110 2004-06-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2112         PR fortran/15962
2113         * match.c (match_case_selector): Call gfc_match_init_expr
2114         instead of gfc_match_expr.
2115         * resolve.c (validate_case_label_expr): No need to check for
2116         constant, since it wouldn't have been matched with the fix to
2117         match.c.
2119 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2121         PR fortran/15211
2122         * trans-intrinsic.c (gfc_conv_intrinsic_len): Deal with arrays
2123         of strings.
2125 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2127         PR fortran/15510
2128         * trans-deecl.c (generate_local_decl): Do not issue warning for
2129         unused variables if they're use associated.
2131 2004-06-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2132         Andrew Vaught <andyv@firstinter.net>
2134         PR fortran/14928
2135         * gfortran.h (gfc_check_f): Add new field f3ml.
2136         * check.c (gfc_check_minloc_maxloc): Take argument list instead
2137         of individual arguments, reorder if necessary.
2138         * intrinsic.h (gfc_check_minloc_maxloc): ... adapt prototype.
2139         * intrinsic.c (add_sym_3ml): New function.
2140         (add_functions): Change to add_sym_3ml for MINLOC, MAXLOC.
2141         (check_specific): Catch special case MINLOC, MAXLOC.
2143 2004-06-14  Paul Brook  <paul@codesourcery.com>
2145         * intrinsic.c (add_sym_2s): Use correct function types.
2147 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2149         * Make-lang.in (F95_OBJS, F95_PARSER_OBJS): Alphabetize.  Move data.c
2150         * data.c (gfc_get_section_index):  Remove dependency on trans.h.
2152 2004-06-12  Steven G. Kargl  <kargls@comcast.net>
2154         * check.c (gfc_check_second_sub, gfc_check_irand, gfc_check_rand
2155         gfc_check_srand, gfc_check_etime, gfc_check_etime_sub): New functions.
2156         * gfortran.h (gfc_generic_isym_id): New symbols GFC_ISYM_ETIME,
2157         GFC_ISYM_IRAND, GFC_ISYM_RAND, GFC_ISYM_SECOND.
2158         * trans-intrinsic.c:  Use symbols.
2159         * intrinsic.c (add_sym_2s): New function.
2160         * intrinsic.c: Add etime, dtime, irand, rand, second, srand.
2161         * intrinsic.h: Function prototypes.
2162         * iresolve.c (gfc_resolve_etime_sub, gfc_resolve_second_sub
2163         gfc_resolve_srand):  New functions.
2165 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2167         PR fortran/14957
2168         * decl.c (gfc_match_end): Require END {SUBROUTINE|FUNCTION} for
2169         contained procedure.
2171 2004-06-12  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2173         PR fortran/12841
2174         * interface.c (compare_parameter, compare_actual_formal): Don't
2175         check types and array shapes for NULL()
2176         * trans-expr.c (conv_function_call): No double indirection for
2177         NULL()
2179 2004-06-09  Toon Moene  <toon@moene.indiv.nluug.nl>
2181         * trans-expr.c (gfc_conv_cst_int_power): Compute
2182         x**(-n) by converting it to (1/x)**n instead of
2183         1/x**n.
2185 2004-06-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2187         PR fortran/13372
2188         * module.c (write_symbol, write_symtree): Don't write symbols
2189         wrongly added to namespace.
2190         * trans-decl.c (gfc_create_module_variable): Don't create a
2191         backend decl for a symbol incorrectly added to namespace.
2193 2004-06-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2195         PR fortran/13201
2196         * resolve.c (resolve_symbol): Verify that parameter array has an
2197         explicit shape. Fix typos and coding style issues in surrounding
2198         lines.
2200 2004-06-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2202         PR fortran/15478
2203         * gfortran.texi: The documentation doesn't contain infomration on
2204         how to report bugs, and shouldn't, so remove the line which
2205         says it does.
2207 2004-06-05  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2209         * intrinsic.c (sort_actual): Keep track of type of missing
2210         arguments. (Missing from previous commit.)
2212 2004-06-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2214         * gfortran.h (gfc_actual_arglist): New field missing_arg_type.
2215         * interface.c (compare_actual_formal): Keep type of omitted
2216         optional arguments.
2217         * trans-expr.c (gfc_conv_function_call): Add string length
2218         argument for omitted string argument.
2220 2004-06-03  Paul Brook  <paul@codesourcery.com>
2222         * trans.c (gfc_finish_block, gfc_add_expr_to_block): Build statement
2223         lists instead of compound expr chains.
2224         (gfc_trans_code): Annotate statement lists.
2226 2004-06-03  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2228         * trans-array.c: Fix spelling in comments.
2230 2004-06-02  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2232         PR fortran/15557
2233         * data.c (assign_substring_data_value): New function.
2234         (gfc_assign_data_value): Call the new function if we're dealing
2235         with a substring LHS.
2237 2004-06-01  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2239         PR fortran/15477
2240         * gfortran.h (GFC_VERSION): Remove.
2241         * gfortran.texi (version-gfortran): Remove, replace by version-GCC
2242         where used.
2244 2004-05-31  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2246         * trans-types.c: Fix spelling & layout in comments.
2248 2004-05-30  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2250         PR fortran/14067
2251         * trans-const.c (gfc_conv_string_init): Allow variable string
2252         length lower than initialization string length.
2254 2004-05-30  Paul Brook  <paul@codesourcery.com>
2256         PR fortran/15620
2257         * trans-decl.c (gfc_shadow_sym, gfc_restore_sym): New functions.
2258         * trans-expr.c (gfc_trans_string_copy): New function.
2259         (gfc_conv_statement_function): Use them.  Create temp vars.  Enforce
2260         character lengths.
2261         (gfc_conv_string_parameter): Use gfc_trans_string_copy.
2262         * trans-stmt.c (gfc_trans_forall_1): Use gfc_{shadow,restore}_sym.
2263         * trans.h (struct gfc_saved_var): Define.
2264         (gfc_shadow_sym, gfc_restore_sym): Add prototypes.
2266 2004-05-30  Steven G. Kargl  <kargls@comcast.net>
2268         * iresolve.c (gfc_resolve_random_number): Clean up conditional.
2270 2004-05-29  Steven G. Kargl  <kargls@comcast.net>
2272         * simplify.c (gfc_simplify_log): Remove useless line of code.
2274 2004-05-29  Paul Brook  <paul@codesourcery.com>
2276         * trans-common.c (find_equivalence): Find multiple rules.
2278 2004-05-27  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2280         * gfortran.h (gfc_current_locus, gfc_set_locus): Remove.
2281         (gfc_current_locus): Declare new global variable.
2282         * scanner.c (gfc_current_locus, gfc_set_locus): Remove.
2283         (gfc_current_locus1): Rename ...
2284         (gfc_current_locus): ... to this.
2285         (gfc_at_eof, gfc_at_bol, gfc_at_eol, gfc_advance_line, next_char,
2286         skip_fixed_comments, skip_free_comments, gfc_next_char_literal,
2287         gfc_peek_char, gfc_gobble_whitespace, gfc_new_file): Use
2288         gfc_current_locus instead of gfc_current_locus1, gfc_set_locus()
2289         and gfc_current_locus(), respectively.
2290         * array.c (match_subscript, gfc_match_array_ref, match_array_list,
2291         match_array_cons_element, gfc_match_array_constructor):
2292         Read/modify gfc_current_locus instead of calling gfc_set_locus()
2293         and gfc_current_locus().
2294         * decl.c (gfc_match_null, variable_decl, gfc_match_kind_spec,
2295         match_attr_spec, gfc_match_function_decl, gfc_match_end,
2296         attr_decl1, gfc_match_save): Likewise.
2297         * error.c (error_print, gfc_internal_error): Likewise.
2298         * expr.c (gfc_int_expr, gfc_default_logical_kind): Likewise.
2299         * interface.c (gfc_add_interface): Likewise.
2300         * io.c (gfc_match_format, match_dt_format, match_dt_element,
2301         match_io_iterator, match_io): Likewise.
2302         * match.c (gfc_match_space, gfc_match_eos,
2303         gfc_match_small_literal_int, gfc_match_st_label,
2304         gfc_match_strings, gfc_match_name, gfc_match_iterator,
2305         gfc_match_char, gfc_match, gfc_match_assignment,
2306         gfc_match_pointer_assignment, gfc_match_if, gfc_match_do,
2307         gfc_match_nullify, gfc_match_call, match_implicit_range,
2308         gfc_match_implicit, gfc_match_data, match_case_selector,
2309         gfc_match_case, match_forall_iterator): Likewise.
2310         * matchexp.c (gfc_match_defined_op_name, next_operator,
2311         match_level_1, match_mult_operand, match_ext_mult_operand,
2312         match_add_operand, match_ext_add_operand, match_level_2,
2313         match_level_3, match_level_4, match_and_operand, match_or_operand,
2314         match_equiv_operand, match_level_5, gfc_match_expr): Likewise.
2315         * module.c (gfc_match_use, mio_array_ref, mio_expr): Likewise.
2316         * parse.c (match_word, decode_statement, next_free, next_fixed,
2317         add_statement, verify_st_order, parse_if_block, gfc_parse_file):
2318         Likewise.
2319         * primary.c (match_digits, match_integer_constant,
2320         match_boz_constant, match_real_constant, match_substring,
2321         next_string_char, match_charkind_name, match_string_constant,
2322         match_logical_constant, match_const_complex_part,
2323         match_complex_constant, match_actual_arg, match_keyword_arg,
2324         gfc_match_actual_arglist, gfc_match_structure_constructor,
2325         gfc_match_rvalue, gfc_match_variable): Likewise.
2326         * st.c (gfc_get_code): Likewise.
2327         * symbol.c (check_conflict, check_used, check_done,
2328         duplicate_attr, add_flavor, gfc_add_procedure, gfc_add_intent,
2329         gfc_add_access, gfc_add_explicit_interface, gfc_add_type,
2330         gfc_add_component, gfc_reference_st_label, gfc_new_symbol): Likewise.
2332 2004-05-26  Roger Sayle  <roger@eyesopen.com>
2334         * io.c (format_asterisk): Silence compiler warnings by correcting
2335         the number of elements of a "locus" initializer.
2337 2004-05-25  Roger Sayle  <roger@eyesopen.com>
2339         PR fortran/13912
2340         * matchexp.c: Allow unary operators after arithmetic operators
2341         as a GNU extension.
2342         (match_ext_mult_operand, match_ext_add_operand): New functions.
2343         (match_mult_operand): Tweak to call match_ext_mult_operand.
2344         (match_add_operand): Tweak to call match_ext_mult_operand.
2345         (match_level_2): Rearrange to call match_ext_add_operand.
2347 2004-05-25  Paul Brook  <paul@codesourcery.com>
2349         * expr.c (check_inquiry): Remove bogus tests.
2351 2004-05-23  Paul Brook  <paul@codesourcery.com>
2353         PR fortran/13773
2354         * expr.c (restricted_args): Remove redundant checks/argument.
2355         (external_spec_function): Update to match.
2356         (restricted_intrinsic): Rewrite.
2358 2004-05-23  Paul Brook  <paul@codesourcery.com>
2359         Victor Leikehman  <lei@haifasphere.co.il>
2361         * gfortran.h (struct gfc_symbol): Add equiv_built.
2362         * trans-common.c: Change int to HOST_WIDE_INT.  Capitalize error
2363         messages.
2364         (current_length): Remove.
2365         (add_segments): New function.
2366         (build_equiv_decl): Create initialized common blocks.
2367         (build_common_decl): Always add decl to bindings.
2368         (create_common): Create initializers.
2369         (find_segment_info): Reformat to match coding conventions.
2370         (new_condition): Use add_segments.
2371         (add_condition, find_equivalence, add_equivalences): Move iteration
2372         inside functions.  Only process each segment once.
2373         (new_segment, finish_equivalences, translate_common): Simplify.
2375 2004-05-23  Steven G. Kargl  <kargls@comcast.net>
2377         * check.c (gfc_check_random_seed): Issue for too many arguments.
2379 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2381         * intrinsic.c (add_subroutines): Use add_sym_3s for random_seed.
2383 2004-05-22  Paul Brook  <paul@codesourcery.com>
2385         * dump-parse-tree.c (gfc_show_equiv): New function.
2386         (gfc_show_namespace): Use it.
2388 2004-05-22  Victor Leikehman  <lei@haifasphere.co.il>
2390         PR fortran/13249
2391         * symbol.c (gfc_add_common): Disable checks to work around other more
2392         fundamental inadequacies.
2394 2004-05-22  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2396         * trans-decl.c (gfc_get_extern_function_decl): Set DECL_IS_PURE
2397         only for functions.
2398         (gfc_build_function_decl): Likewise.
2400 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2402         * check.c (gfc_check_system_clock): New function.
2403         * intrinsic.c (add_sym_3s): New function.
2404         (add_subroutines): Use it.
2405         * intrinsic.h (gfc_check_system_clock, gfc_resolve_system_clock):
2406         Add prototypes.
2407         * iresolve.c (gfc_resolve_system_clock): New function.
2409 2004-05-22  Steven G. Kargl  <kargls@comcast.net>
2411         * invoke.texi: Document -Wunderflow and spell check.
2412         * lang.opt: Add Wunderflow.
2413         * gfortran.h (gfc_option_t): Add warn_underflow option.
2414         * options.c (gfc_init_options, set_Wall): Use it.
2415         * primary.c (match_real_constant): Explicitly handle UNDERFLOW.
2416         * arith.c (gfc_arith_uminus, gfc_arith_plus, gfc_arith_minus,
2417         gfc_arith_times, gfc_arith_divide, gfc_arith_power, gfc_real2real,
2418         gfc_real2complex, gfc_complex2real, gfc_complex2complex): Ditto.
2419         * arith.c (common_logarithm): Fix typo in comment.
2421 2004-05-21  Roger Sayle  <roger@eyesopen.com>
2423         * io.c (check_format): As a GNU extension, allow the comma after a
2424         string literal to be optional in a format.  Use gfc_notify_std to
2425         issue an error/warning as appropriate.
2427 2004-05-21  Roger Sayle  <roger@eyesopen.com>
2429         * io.c (check_format): Use gfc_notify_std to determine whether to
2430         issue an error/warning for omitting the digits from the X format.
2432 2004-05-20  Roger Sayle  <roger@eyesopen.com>
2434         * io.c (check_format): Allow the number before the X format to
2435         be optional when not -pedantic.
2437 2004-05-18  Feng Wang  <fengwang@nudt.edu.cn>
2438         Paul Brook  <paul@codesourcery.com>
2440         * f95-lang.c (gfc_init_builtin_functions): Use vold_list_node.
2441         Create decls for __builtin_pow{,f}.
2442         * gfortran.h (PREFIX_LEN): Define.
2443         * trans-decl.c (gfor_fndecl_math_powi): Add.
2444         (gfor_fndecl_math_powf, gfor_fndecl_math_pow): Remove.
2445         (gfc_build_intrinsic_function_decls): Create decls for powi.
2446         * trans-expr.c (powi_table): Add.
2447         (gfc_conv_integer_power): Remove.
2448         (gfc_conv_powi): New function.
2449         (gfc_conv_cst_int_power): New function.
2450         (gfc_conv_power_op): Use new powi routines.
2451         * trans.h (struct gfc_powdecl_list): Add.
2452         (gfor_fndecl_math_powi): Add.
2453         (gfor_fndecl_math_powf, gfor_fndecl_math_pow): Remove.
2455 2004-05-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2457         * trans.c, trans-decl.c: Fix comment typos.
2459 2004-05-18  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2461         * trans-const.c (gfc_conv_mpf_to_tree): Fix typo.
2463 2004-05-18  Steve Kargl  <kargls@comcast.net>
2465         * arith.c (gfc_int2complex): Fix incorrect range checking.
2467 2004-05-18  Paul Brook  <paul@codesourcery.com>
2469         PR fortran/13930
2470         * decl.c (add_init_expr_to_sym): Remove incorrect check.
2471         (default_initializer): Move to expr.c.
2472         (variable_decl): Don't assign default initializer to variables.
2473         * expr.c (gfc_default_initializer): Move to here.
2474         * gfortran.h (gfc_default_initializer): Add prototype.
2475         * resolve.c (resolve_symbol): Check for illegal initializers.
2476         Assign default initializer.
2478 2004-05-17  Steve Kargl  <kargls@comcast.net>
2480         * arith.c (gfc_arith_power): Complex number raised to 0 power is 1.
2482 2004-05-17  Steve Kargl  <kargls@comcast.net>
2484         * arith.c (gfc_real2complex): Range checking wrong part of complex
2485         number.
2487 2004-05-16  Paul Brook  <paul@codesourcery.com>
2489         * options.c (gfc_handle_module_path_options): Fix buffer overrun.
2491 2004-05-16  Paul Brook  <paul@codesourcery.com>
2493         * arith.c (gfc_range_check): Fix logic error.
2495 2004-05-16  Steve Kargl  <sgk@troutmask.apl.washington.edu>
2497         * arith.c: Fix comment typos.
2499 2004-05-15  Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2501         PR fortran/13742
2502         * decl.c (add_init_expr_to_sym): Verify that COMMON variable is
2503         not initialized in a disallowed fashion.
2504         * match.c (gfc_match_common): Likewise.
2505         (var_element): Verify that variable is not in the blank COMMON,
2506         if it is in a common.
2508 2004-05-15  Joseph S. Myers  <jsm@polyomino.org.uk>
2510         * Make-lang.in (f95.generated-manpages): Remove.
2511         (f95.srcextra): New.
2512         (f95.info, fortran/gfortran.info, fortran/gfortran.dvi,
2513         f95.maintainer-clean): Generate info and dvi files in objdir/doc.
2514         (f95.dvi): Remove.
2515         (dvi): New.
2516         (f95.install-info): Remove.
2517         (install-info): New.
2519 2004-05-15  Victor Leikehman  <lei@haifasphere.co.il>
2521         * decl.c (add_init_expr_to_sym): Check for variable size arrays.
2523 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2525         * primary.c (match_boz_constant): Use gfc_notify_std() for
2526         issuing a warning or an error.
2528 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2530         PR fortran/13826
2531         * primary.c (match_structure_constructor): Rename ...
2532         (gfc_match_structure_constructor): ... to this. Make non-static.
2533         (gfc_match_rvalue): Call renamed function.
2534         * match.h (gfc_match_structure_constructor): Declare.
2535         * match.c (gfc_match_data_constant): Handle structure
2536         constructor.
2538 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2540         PR fortran/13702
2541         (Port from g95)
2542         * gfortran.h (gfc_linebuf): New typedef.
2543         (linebuf): Remove.
2544         (gfc_file): Revamped, use new gfc_linebuf.
2545         (locus): Revamped, use new types.
2546         (gfc_current_file): Remove.
2547         (gfc_current_form, gfc_source_file): New global variables.
2548         * match.c (gfc_match_space, gfc_match_strings): Use
2549         gfc_current_form to find source form.
2550         * module.c (gfc_dump_module): Use gfc_source_file when printing
2551         module header.
2552         * error.c (show_locus, show_loci) Use new data structures to print
2553         locus.
2554         * scanner.c (first_file, first_duplicated_file, gfc_current_file):
2555         Remove.
2556         (file_head, current_file, gfc_current_form, line_head, line_tail,
2557         gfc_current_locus1, gfc_source_file): New global variables.
2558         (gfc_scanner_init1): Set new global variables.
2559         (gfc_scanner_done1): Free new data structures.
2560         (gfc_current_locus): Return pointer to gfc_current_locus1.
2561         (gfc_set_locus): Set gfc_current_locus1.
2562         (gfc_at_eof): Set new variables.
2563         (gfc_at_bol, gfc_at_eol, gfc_advance_line, gfc_next_char): Adapt
2564         to new locus structure.
2565         (gfc_check_include): Remove.
2566         (skip_free_comments, skip_fixed_comments): Use gfc_current_locus1.
2567         (gfc_skip_comments): Use gfc_current_form, find locus with
2568         gfc_current_locus1.
2569         (gfc_next_char): Use gfc_current_form.
2570         (gfc_peek_char, gfc_gobble_whitespace): Use gfc_current_locus1.
2571         (load_line): Use gfc_current_form. Recognize ^Z as EOF. Fix
2572         comment formatting.
2573         (get_file): New function.
2574         (preprocessor_line, include_line): New functions.
2575         (load_file): Move down, rewrite to match new data structures.
2576         (gfc_new_file): Rewrite to match new data structures.
2577         * parse.c (next_statement): Remove code which is now useless. Use
2578         gfc_source_form and gfc_source_file where appropriate.
2579         * trans-decl.c (gfc_get_label_decl): adapt to new data structures
2580         when determining locus of frontend code.
2581         * trans-io.c (set_error_locus): Same.
2582         * trans.c (gfc_get_backend_locus, gfc_set_backend_locus): Likewise.
2583         * lang-specs.h (@f77-cpp-input, @f95-cpp-input): Remove '-P' from
2584         preprocessor flags.
2585         (all): Add missing initializers.
2587 2004-05-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2589         * Make-lang.in (trans-common.o): Remove redundant dependency.
2590         (data.c): Replace object file name ...
2591         (data.o): ... by the correct one.
2593 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2595         * dump-parse-tree.c (gfc_show_array_ref): Print colon only
2596         for ranges when dumping array references.
2598 2004-05-14  Victor Leikehman  <lei@haifasphere.co.il>
2600         * decl.c (variable_decl): Always apply default initializer.
2602 2004-05-08  Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2604         PR fortran/15206
2605         * trans-intrinsic.c (gfc_conv_intrinsic_rrspacing): Fixed to
2606         handle zero correctly.
2608 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2610         * match.c (gfc_match): Eliminate dead code.
2612 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2614         * parse.c (gfc_statement_next_fixed): (Change from Andy's tree)
2615         Detect bad continuation line in fixed form sources.
2617 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2619         PR fortran/15205
2620         * iresolve.c (gfc_resolve_nearest): Add new function.
2621         * intrinsic.h: ... declare it here.
2622         * intrinsic.c (add_functions): ... add it as resolving function
2623         for NEAREST.
2625 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2627         PR fortran/14066
2628         * match.c (gfc_match_do): Allow infinite loops with
2629         label-do-stmt. Do not enforce space after comma.
2631 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2633         PR fortran/15051
2634         * parse.c (parse_interface): Allow empty INTERFACE, remove
2635         seen_body.
2637 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2639         * Make-lang.in, arith.c, arith.h, array.c, bbt.c, check.c,
2640         decl.c, dependency.c, dependency.h, dump-parse-tree.c, error.c,
2641         expr.c, f95-lang.c, gfortran.h, interface.c, intrinsic.c,
2642         intrinsic.h, io.c, iresolve.c, lang-specs.h, match.c, match.h,
2643         matchexp.c, misc.c, module.c, options.c, parse.c, parse.h,
2644         primary.c, resolve.c, scanner.c, simplify.c, st.c, symbol.c,
2645         trans-array.c, trans-array.h, trans-common.c, trans-const.c,
2646         trans-const.h, trans-decl.c, trans-expr.c, trans-intrinsic.c,
2647         trans-io.c, trans-stmt.c, trans-stmt.h, trans-types.c,
2648         trans-types.h, trans.c, trans.h: Update copyright years and
2649         boilerplate.
2650         * data.c: Likewise, also removed two whitespace-only lines.
2651         * gfortranspec.c, lang.opt: Update copyright years.
2653 2004-05-14  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
2655         PR fortran/14568
2656         * trans-decl.c (generate_local_decl): Don't warn for unused
2657         variables which are in common blocks.
2659 2004-05-13  Diego Novillo  <dnovillo@redhat.com>
2661         * Make-lang.in, f95-lang.c, trans-array.c, trans-decl.c,
2662         trans-expr.c, trans-intrinsic.c, trans-io.c, trans-stmt.c,
2663         trans.c: Rename tree-simple.[ch] to tree-gimple.[ch].
2665 2004-05-13  Victor Leikehman  <lei@haifasphere.co.il>
2667         PR fortran/15314
2668         * trans-expr.c (gfc_conv_structure): Use field type, not expr type.
2670 2004-05-13  Joseph S. Myers  <jsm@polyomino.org.uk>
2672         * gfortran.texi: Use @table @emph instead of @itemize @emph.
2673         Remove "set DEVELOPMENT".
2674         (Compiling GFORTRAN): Remove.
2676 2004-05-09  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2678         * array.c (match_subscript, match_array_ref): Add comments
2679         explaining argument 'init'.
2680         * decl.c, f95-lang.c, match.c, resolve.c, trans-array.c,
2681         trans-expr.c, trans.c: Fix some typos in comments.
2682         * dump-parse-tree.c (gfc_show_expr): Remove wrong comment.
2683         * primary.c (match_digits, match_integer_constant): Add comment
2684         explaining signflag.
2686 2004-05-01  Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2688         PR fortran/13940
2689         * primary.c: Include system.h and flags.h, needed for pedantic.
2690         (match_boz_constant): Allow "x" for hexadecimal constants, warn if
2691         pedantic is set.
2693 2004-05-01  Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2695         PR fortran/13940
2696         * match.c (match_data_constant): Handle case where
2697         gfc_find_symbol sets sym to NULL
2699 2004-04-28  Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2701         * Make-lang.in (f95-lang.o, trans-intrinsic.o): Add missing
2702         dependency on mathbuiltins.def
2704 2004-04-24  Victor Leikehman  <lei@il.ibm.com>
2706         * trans-io.c (transfer_expr): Implemented recursive printing
2707         of derived types.
2709 2004-04-24  Andrew Pinski  <pinskia@physics.uc.edu>
2711         * gfortranspec.c: Do not include multilib.h.
2713 2004-04-24  Tobias Schlüter  <tobias.schlueter@physik.uni-muenchen.de>
2715         * trans-intrinsic.c: Fix comment, this is not trans-expr.c. Add
2716         2004 to copyright years.
2717         * trans-expr.c, trans-decl.c: Comment update, we now generate
2718         GENERIC, not SIMPLE. Add 2004 to copyright years.
2720 2004-04-24  Paul Brook  <paul@codesourcery.com>
2722         * Make-lang.in (gfortranspec.o): Add dependency on $(TM_H).
2724 2004-04-24  Feng Wang  <fengwang@nudt.edu.cn>
2726         PR 14817
2727         * arith.c (gfc_arith_divide): Fix complex divide.
2729 2004-04-23  Andrew Pinski  <pinskia@physics.uc.edu>
2731         * gfortranspec.c: Include the target headers.
2733 2004-04-18  Feng Wang  <fengwang@nudt.edu.cn>
2735         PR fortran/14921
2736         PR fortran/14540
2737         * arith.c (arctangent2): New function.
2738         * arith.h (arctangent2): Add function prototype.
2739         * simplify.c (gfc_simplify_atan2): Use it.
2740         (gfc_simplify_log): Use it.
2742 2004-04-12  Diego Novillo  <dnovillo@redhat.com>
2744         * fortran/f95-lang.c (gfc_expand_stmt): Remove.
2745         (LANG_HOOKS_RTL_EXPAND_STMT): Remove.
2747 2004-04-11  Bud Davis  <bdavis9659@comcast.net>
2749         PR fortran/14872
2750         * trans-io.c (build_dt): Change REC to value.
2752 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2754         PR 14394
2755         * trans-const.c (gfc_conv_mpf_to_tree): Loosen the maximum digits of
2756         the real value when converting mpf to string.
2758 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2760         PR 14395
2761         * trans-intrinsic.c (gfc_conv_intrinsic_cmplx): Fix the imag part of
2762         the result.
2764 2004-04-11  Feng Wang  <fengwang@nudt.edu.cn>
2766         PR fortran/14377
2767         * simplify.c (simplify_min_max): Convert the type of the result.
2769 2004-04-11  Paul Brook  <paul@codesourcery.com>
2771         * gfortran.texi: Use full target triplet.
2773 2004-04-11  Paul Brook  <paul@codesourcery.com>
2775         * Make-lang.in (GFORTRAN_TEXI): Set it.
2776         (fortran/dfortran.dvi): Use it.  Add fortran to include paths.
2777         (fortran/gfortran.info): Ditto.
2778         * gfortran.texi: Major update.
2779         * invoke.texi: New file.
2781 2004-04-10  Paul Brook  <paul@codesourcery.com>
2783         * trans-array.c (gfc_trans_allocate_temp_array,
2784         gfc_conv_tmp_array_ref): Don't use GFC_DECL_STRING.
2785         * trans-decl.c (gfc_build_dummy_array_decl,
2786         gfc_get_symbol_decl, gfc_build_function_decl,
2787         gfc_create_module_variable): Ditto.
2788         * trans-expr.c (gfc_conv_variable): Ditto.
2789         * trans-intrinsic.c (gfc_conv_intrinsic_len): Ditto.
2790         * trans.h (GFC_DECL_STRING): Remove.
2791         (GFC_DECL_PACKED_ARRAY, GFC_DECL_PARTIAL_PACKED_ARRAY,
2792         GFC_DECL_ASSIGN): Renumber flags.
2794 2004-04-05  Paul Brook  <paul@codesourcery.com>
2796         PR 13252
2797         PR 14081
2798         * f95-lang.c (gfc_init_builtin_functions): Add stack_alloc, stack_save
2799         and stack_restore.
2800         * gfortran.h (struct gfc_charlen): Add backend_decl.
2801         * trans-array.c (gfc_trans_allocate_temp_array,
2802         gfc_conv_temp_array_ref, gfc_conv_resolve_dependencies,
2803         (gfc_conv_loop_setup, gfc_array_allocate, gfc_conv_array_init_size):
2804         Remove old, broken string handling.
2805         (gfc_trans_auto_array_allocation, gfc_trans_g77_array,
2806         gfc_trans_dummy_array_bias, gfc_conv_expr_descriptor,
2807         gfc_trans_deferred_array): Handle character arrays.
2808         * trans-const.c (gfc_conv_const_charlen): New function.
2809         * trans-const.h (gfc_conv_const_charlen): Add prototype.
2810         * trans-decl.c (gfc_finish_var_decl): Don't mark automatic variables
2811         as static.
2812         (gfc_build_dummy_array_decl): Handle arrays with unknown element size.
2813         (gfc_create_string_length): New function.
2814         (gfc_get_symbol_decl): Create lengths for character variables.
2815         (gfc_get_fake_result_decl): Ditto.
2816         (gfc_build_function_decl): Only set length for assumed length
2817         character arguments.
2818         (gfc_trans_dummy_character): New function.
2819         (gfc_trans_auto_character_variable): Rewrite.
2820         (gfc_trans_deferred_vars): Handle more types of character variable.
2821         (gfc_create_module_variable): String lengths have moved.
2822         (gfc_generate_function_code): Initialize deferred var chain earlier.
2823         * trans-expr.c (gfc_conv_init_string_length): Rename ...
2824         (gfc_trans_init_string_length):  ... to this.
2825         (gfc_conv_component_ref, gfc_conv_variable, gfc_conv_concat_op,
2826         gfc_conv_function_call): Update to new format for character variables.
2827         (gfc_conv_string_length): Remove.
2828         (gfc_conv_string_parameter): Update assertion.
2829         * trans-intrinsic.c (gfc_conv_intrinsic_len): Use new location.
2830         * trans-io.c (set_string): Use new macro names.
2831         * trans-stmt.c (gfc_trans_label_assign. gfc_trans_goto): Ditto.
2832         * trans-types.c (gfc_get_character_type): Use existing length expr.
2833         (gfc_is_nodesc_array): Make public.
2834         (gfc_get_dtype_cst): Rename ...
2835         (gfc_get_dtype): ... to this.  Handle unknown size arrays.
2836         (gfc_get_nodesc_array_type): Use new name.
2837         (gfc_sym_type): New character variable code.
2838         (gfc_get_derived_type): Ditto.
2839         (gfc_get_function_type): Evaluate character variable lengths.
2840         * trans-types.h (gfc_strlen_kind): Define.
2841         (gfc_is_nodesc_array): Add prototype.
2842         * trans.h: Update prototypes.
2843         (struct lang_type): Update comments.
2844         (GFC_DECL_STRING_LEN): New name for GFC_DECL_STRING_LENGTH.
2845         (GFC_KNOWN_SIZE_STRING_TYPE): Remove.
2847 2004-04-04  Paul Brook  <paul@codesourcery.com>
2849         * gfortran.h (struct gfc_option_t): Remove flag_g77_calls.
2850         * options.c (gfc_init.options, gfc_handle_option): Ditto.
2851         * trans-expr.c (gfc_conv_function_call): Ditto.
2852         * trans-types.c (gfc_is_nodesc_array): Ditto
2853         * lang.opt (fg77-calls): Remove.
2855 2004-04-04  Paul Brook  <paul@codesourcery.com>
2857         * trans-array.c (OFFSET_FIELD): Rename from BASE_FIELD.
2858         (gfc_conv_descriptor_base): Rename ...
2859         (gfc_conv_descriptor_offset): ... to this.
2860         (gfc_trans_allocate_array_storage): Set offset to zero.
2861         (gfc_conv_array_base): Rename ...
2862         (gfc_conv_array_offset): ... to this.
2863         (gfc_conv_array_index_ref): Add offset parameter.
2864         (gfc_conv_array_ref): Include offset.
2865         (gfc_trans_preloop_setup): Use existing offset.
2866         (gfc_trans_allocate_temp_array,  gfc_array_allocate,
2867         gfc_trans_auto_array_allocation, gfc_trans_g77_array,
2868         gfc_trans_dummy_array_bias, gfc_conv_expr_descriptor,
2869         gfc_conf_ss_descriptor): Set offset.
2870         * trans-array.h: Rename prototypes.
2871         * trans-const.h (gfc_index_zero_node): Define.
2872         * trans-decl.c (gfc_build_qualified_array): Change base to offset.
2873         * trans-types.c (gfc_get_array_type_bounds): Ditto.
2874         (gfc_get_nodesc_array_type): Calculate offset before upper bound.
2876 2004-03-25  Diego Novillo  <dnovillo@redhat.com>
2878         * convert.c (convert): Don't handle WITH_RECORD_EXPR.
2880 2004-03-24  Bud Davis  <bdavis9659@comcast.net>
2882         PR 14055
2883         * arith.c (gfc_convert_integer,gfc_convert_real):  Removed leading '+'
2884         before conversion by gmp library call.
2886 2004-03-24  Bud Davis  <bdavis9659@comcast.net>
2888         PR 12921
2889         * trans-io.c (gfc_trans_open): Change RECL= to a value parameter.
2891 2004-02-24  Richard Henderson  <rth@redhat.com>
2893         * trans-array.c (gfc_trans_dummy_array_bias): Fix typo.
2895 2004-02-19  Loren J. Rittle  <ljrittle@acm.org>
2897         * Make-lang.in ($(srcdir)/fortran/gfortran.info): Move...
2898         (fortran/gfortran.info): ... to here.
2899         (f95.srcinfo): New.
2901 2004-02-16  Richard Henderson  <rth@redhat.com>
2903         * Make-lang.in (f95-lang.o, trans-decl.o): Depend on cgraph.h.
2904         * f95-lang.c (LANG_HOOKS_EXPAND_DECL): Remove.
2905         (LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION): New.
2906         (gfc_expand_function): Rename from expand_function_body, make static,
2907         don't do anything except invoke tree_rest_of_compilation.
2908         (gfc_be_parse_file): Invoke cgraph.
2909         (gfc_expand_decl): Remove.
2910         (gfc_init_builtin_functions): Add __builtin_init_trampoline and
2911         __builtin_adjust_trampoline.
2912         * trans-decl.c (gfc_get_extern_function_decl): Don't set DECL_CONTEXT.
2913         (gfc_finalize): New.
2914         (gfc_generate_function_code): Use it.  Lower nested functions.
2915         * trans-expr.c (gfc_conv_function_call): Add static chain operand
2916         to call_expr.
2917         * trans.c (gfc_build_function_call): Likewise.
2918         * trans.h (expand_function_body): Remove.
2920 2004-02-15  Victor Leikehman  <lei@il.ibm.com>
2922         PR gfortran/13433
2923         * trans-decl.c (gfc_build_function_decl) For functions
2924         returning CHARACTER pass an extra length argument,
2925         following g77 calling conventions.
2926         * trans-types.c (gfc_get_function_type) Ditto.
2927         * trans-expr.c (gfc_conv_function_call) Ditto.
2929 2004-02-14  Paul Brook  <paul@codesourcery.com>
2931         * f95-lang.c (gfc_init_builtin_functions): Build chain properly.
2933 2004-02-12  Paul Brook  <paul@nowt.org>
2935         * BUGS: Remove.
2937 2004-02-08  Steve Kargl  <sgk@troutmask.apl.washington.edu>
2939         * gfortran.texi: Fix typos.
2941 2004-02-07  Bud Davis  <bdavis9659@comcast.net>
2943         PR gfortran/13909
2944         * intrinsic.c (add_conversions) Use logical conversion instead
2945         of real.
2946         * trans-types.c (gfc_get_logical_type) implemented logical*1
2947         and logical*2.
2949 2004-01-17  Paul Brook  <paul@codesourcery.com>
2951         * lang-specs.h: Remove %<fixed-form.
2953 2004-01-15  Toon Moene  <toon@moene.indiv.nluug.nl>
2955         * lang-specs.h: Enable preprocessing of source files
2956         ending in .F, .fpp, .FPP, .F90 and .F95.
2958 2004-01-13  Toon Moene  <toon@moene.indiv.nluug.nl>
2960         PR fortran/12912
2961         * lang-specs.h: Enable compilation of files ending
2962         in .f, .for and .FOR.
2964 2004-01-11  Paul Brook  <paul@codesourcery.com>
2966         * trans-stmt.c (gfc_trans_if_1): New function.
2967         (gfc_trans_if): Use it.
2969 2004-01-11  Erik Schnetter  <schnetter@uni-tuebingen.de>
2971         * gfortran.h (GFC_MAX_SYMBOL_LEN): Increase.
2972         (gfc_option_t): Add max_identifier_length.
2973         * lang.opt: Add fmax-identifier-length.
2974         * match.c (parse_name): Use limit.
2975         * options.c (gfc_init_options): Set max_identifier_length.
2976         (gfc_handle_option): Ditto.
2978 2004-01-11  Feng Wang  <fengwang@nudt.edu.cn>
2980         * intrinsic.c (add_functions): Add resolve function to dcmplx.
2981         * intrinsic.h (gfc_resolve_dcmplx): Add prototype.
2982         * iresolve.c (gfc_resolve_dcmplx): New function.
2984 2004-01-10  Paul Brook  <paul@codesourcery.com>
2986         * trans-decl.c (gfc_get_symbol_decl): Don't set subroutine attr.
2987         * trans-types.c (gfc_sym_type): Handle external dummy procedures.
2988         (gfc_return_by_reference): Correct condition.
2989         (gfc_get_function_type): Ditto.
2991 2004-01-10  Paul Brook  <paul@codesourcery.com>
2993         * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Convert mismatched
2994         types.
2996 2004-01-10  Huang Chun  <chunhuang73@hotmail.com>
2998         * iresolve.c: Use correct kind.
3000 2004-01-10  Huang Chun  <chunhuang73@hotmail.com>
3002         PR fortran/13467
3003         * trans-decl.c (gfc_create_module_variable):  Output array valued
3004         parameters.
3006 2004-01-10  Paul Brook  <paul@codesourcery.com>
3008         * resolve.c (resolve_branch): Get error message right way round.
3010 2004-01-10  Canqun Yang <canqun@nudt.edu.cn>
3012         * trans-array (gfc_conv_loop_setup): Adjust comment to track
3013         reality.
3014         (gfc_array_allocate): Don't count size of element twice.
3016 2004-01-04  Paul Brook  <paul@codesourcery.com>
3018         * lang.opt (i8, r8, std=*): Remove RejectNegative.
3020 2004-01-04  Paul Brook  <paul@codesourcery.com>
3022         * error.c (gfc_notify_std): New function.
3023         * gfortran.h (gfc_notify_std): Declare.
3024         (GFC_STD_*): Define.
3025         (gfc_option_t): Add warn_std and allow_std.
3026         * intrinsic.c (gfc_init_expr_extensions): Fix logic.
3027         (gfc_intrinsic_func_interface): Use gfc_notify_std.
3028         * check.c (check_rest): Use gfc_notify_std.
3029         * match.c (gfc_match_pause): Ditto.
3030         (gfc_match_assign): Ditto.
3031         (gfc_match_goto): Ditto.
3032         * resolve.c (resolve_branch): Ditto.
3033         * lang.opt: Add std=<foo> and w.
3034         * options.c (gfc_init_options): Set allow_std and warn_std.
3035         (gfc_handle_option): Handle OPT_std_* and OPT_w.
3037 2004-01-01  Paul Brook  <paul@codesourcery.com>
3039         * array.c (gfc_append_constructor): Take constructor, not expression.
3040         * data.c (struct gfc_expr_stack): Remove.
3041         (expr_stack): Remove.
3042         (find_con_by_offset): Rename from find_expr_in_con.
3043         (find_con_by_component): Rename from find_component_in_con.
3044         (gfc_get_expr_stack): Remove.
3045         (gfc_assign_data_value): Rewrite.
3046         (gfc_expr_push): Remove.
3047         (gfc_expr_pop): Remove.
3048         (gfc_advance_section): Rename from
3049         gfc_modify_index_and_calculate_offset.  Handle unbounded sections.
3050         (gfc_get_section_index): Handle unbounded sections.
3051         * gfortran.h: Update prototypes.
3052         * resolve.c (check_data_variable): Array section maight not be the
3053         last ref.
3055 2004-01-01  Paul Brook  <paul@codesourcery.com>
3057         PR fortran/13432
3058         * resolve.c (resolve_symbol): Allow assumed length function results.
3060 2004-01-01  Steve Kargl  <sgk@troutmask.apl.washington.edu>
3062         * match.c (gfc_match_pause): Fix spelling.
3064 2004-01-01  Steven Bosscher  <stevenb@suse.de>
3066         PR fortran/13251
3067         * trans-expr.c (gfc_conv_variable): Take the type kind of a substring
3068         reference from the expression.
3070 2003-12-26  Feng Wang  <fengwang@nudt.edu.cn>
3072         * dump-parse-tree.c (gfc_show_code_node): Add ASSIGN and ASSIGNED GOTO
3073         dumping.
3074         * gfortran.h (gfc_statement): New ST_LABEL_ASSIGNMENT.
3075         (gfc_exec_op): New EXEC_LABEL_ASSIGN.
3076         (symbol_attribute):New variable attribute: assign.
3077         * io.c (resolve_tag):Integer variable is allowed.
3078         (match_dt_format): Add ASSIGN statement. Set assign flag.
3079         * match.c (gfc_match_if): Change ST_NONE to ST_LABEL_ASSIGNMENT.
3080         (gfc_match_assign): Add ASSIGN statement. Set assign flag.
3081         (gfc_match_goto): Add ASSIGNED GOTO statement. Set assign flag.
3082         * parse.c (decode_statement): Add ST_LABEL_ASSIGNMENT.
3083         (next_statement): Add ST_LABEL_ASSIGNMENT.
3084         (gfc_ascii_statement): Add ST_LABEL_ASSIGNMENT.
3085         * resolve.c (resolve_code): Resolve ASSIGN and ASSIGNED GOTO statement.
3086         (resolve_blocks): Resolve ASSIGNED GOTO statement label list.
3087         * st.c (gfc_free_statement): Add EXEC_LABEL_ASSIGN.
3088         * trans-decl.c (gfc_get_symbol_decl): Create the shadow variable for
3089         assign.  Put them into the stuct lang_decl.
3090         * trans-io.c (set_string): Add the assign statement.
3091         * trans-stmt.c (gfc_trans_label_assign): New function.
3092         (gfc_trans_goto): Translate ASSIGNED GOTO statement.
3093         * trans-stmt.h (gfc_trans_label_assign): Added function prototype.
3094         * trans.c (gfc_trans_code): Add EXEC_LABEL_ASSIGN.
3095         * trans.h (lang_decl):Add shadow variable decl tree needed by assign.
3096         (GFC_DECL_ASSIGN_ADDR(node)): New macro to access this.
3097         (GFC_DECL_ASSIGN(node)): New macro to access flag.
3099 2003-12-31  Huang Chun <chunhuang73@hotmail.com>
3101         PR fortran/13434
3102         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxval): Fixed bug in
3103         minval/maxval.
3105 2003-12-22  Toon Moene  <toon@moene.indiv.nluug.nl>
3107         * options.c (gfc_init_options): Set flag_argument_noalias to 2, to indicate
3108         that arguments to subroutines/functions can't alias themselves, nor global
3109         memory.
3111 2003-12-20  Steven Bosscher  <stevenb@suse.de>
3113         * trans-expr.c (gfc_conv_expr_op): Fold the result expression.
3114         * trans.c (gfc_add_modify_expr, gfc_add_expr_to_block): Likewise.
3116 2003-12-12  Huang Chun <chunhuang73@hotmail.com>
3118         * primary.c (match_substring): Fix substring bug for start point
3119         or end point is NULL.
3120         * trans-expr.c (gfc_conv_substring): Ditto
3121         * trans-types.c (gfc_sym_type): Get correct type of scalar
3122         character variables.
3123         * trans-intrinsic.c (gfc_conv_intrinsic_len): Handle character in
3124         derived type.
3126 2003-12-10  Richard Henderson  <rth@redhat.com>
3128         * options.c (gfc_post_options): Don't ever use rtl inlining.
3130 2003-12-05  Canqun Yang  <canqun@nudt.edu.cn>
3132         * trans-common.c: Re-implement COMMON blocks and EQUIVALENCE lists.
3133         * trans-equivalence.c: Remove.
3134         * trans-decl.c (gfc_get_symbol_decl): Update to match.
3135         (gfc_generate_function_code): Ditto.
3136         * trans-array.c (gfc_conv_array_parameter): Ditto.
3137         * Make-lang.in (F95_OBJS): Remove fortran/trans-equivalence.o
3138         (F95_ADDITIONAL_OBJS): Add stor-layout.o
3139         * trans.h (gfc_trans_equivalence): Remove.
3140         * gfortran.h (struct gfc_equiv): Add used field.
3141         (struct gfc_symbol): Remove addr_base, addr_offset, equiv_ring,
3142         equiv_offset fields.
3144 2003-12-05  Richard Henderson  <rth@redhat.com>
3146         * trans.c (gfc_build_addr_expr): New.
3147         (gfc_build_indirect_ref, gfc_build_array_ref): New.
3148         * trans.h: Declare them.
3149         * trans-array.c, trans-expr.c, trans-intrinsic.c, trans-io.c,
3150         trans-stmt.c, trans.c (*): Use them.
3152         * f95-lang.c (gfc_post_options): Remove dead prototype.
3153         * trans-array.c (gfc_trans_deferred_vars): Remove unused variable.
3154         * trans-stmt.c (gfc_evaluate_where_mask): Fix temporary_list
3155         allocation size.
3157 2003-12-01  Feng Wang  <fengwang@nudt.edu.cn>
3159         * io.c (gfc_match_format): Check for missing format label.
3161 2003-11-30 Huang Chun <chunhuang73@hotmail.com>
3163         PR fortran/13155
3164         * trans-decl.c (gfc_sym_mangled_function_id): Don't mangle symbols
3165         from interfaces in modules.
3167 2003-11-30  Paul Brook  <paul@nowt.org>
3169         * trans-array.c (gfc_trans_g77_array): Make non-static.
3170         (gfc_trans_assumed_size): Remove.
3171         (gfc_trans_dummy_array_bias): Explicitly free temporary.
3172         * trans-array.h (gfc_trans_g77_array): Add prototype.
3173         (gfc_trans_assumed_size): Remove.
3174         * trans-decls.c (gfor_fndecl_push_context): Remove.
3175         (gfor_fndecl_pop_context): Remove.
3176         (gfc_build_function)decls): Don't create them.
3177         (gfc_trans_deferred_vars): Update to match. Remove dead code.
3178         * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Free temp.
3180 2003-11-30  Kejia Zhao  <kejia_zh@nudt.edu.cn>
3182         * trans-array.c (gfc_conv_array_parameter): Simplify
3183         array argument passing for array name actual argument.
3184         * trans-expr.c (gfc_conv_function_call): Ditto
3185         * trans-types.c (gfc_is_nodesc_array):Ditto.
3187 2003-11-30  Paul Brook  <paul@nowt.org>
3189         * f95-lang.c (gfc_post_options): Move ...
3190         * options.c (gfc_post_options): .. to here.  Handle inlining options.
3191         * gfortran.h (gfc_post_options): Add prototype.
3193 2003-11-28  Richard Henderson  <rth@redhat.com>
3195         * trans.c (gfc_create_var_np): Use create_tmp_var_raw.
3197 2003-11-28 Huang Chun <chunhuang73@hotmail.com>
3199         * trans.h (has_alternate_specifier): New global variable.
3200         * match.c (gfc_match_call): Handle actual arguments associated with
3201         alternate return indicators.
3202         * trans-expr.c (gfc_conv_function_call): Ditto
3203         * trans-stmt.c (gfc_trans_call): Ditto
3204         (gfc_trans_return): Handle return statement with value.
3205         * trans-decl.c (gfc_generate_function_code): Handle functions with
3206         asterisk dummy.
3207         (gfc_get_fake_result_decl): Ditto
3208         * trans-types.c (gfc_get_function_type): Ditto
3209         * resolve.c (resolve_actual_arglist): Check alternate return indicators.
3210         (resolve_formal_arglist): Check asterisk dummy.
3212 2003-11-27  Paul Brook  <paul@nowt.org>
3214         * trans-array.c (gfc_tran_allocate_array_storage): Use new memory
3215         allocation interface.
3216         (gfc_conv_ array_parameter): Ditto.
3217         (gfc_trans_auto_array_allocation): Ditto. Also free the memory.
3218         * trans-array.c: Update prototype.
3219         * trans-decl.c (gfc_build_builtin_function_decls): Update prototypes.
3220         (gfc_trans_auto_character_variable): Use new memory alloc interface.
3221         * trans-expr.c (gfc_conv_string_tmp): Ditto.
3222         (gfc_conv_function_call): Use gfc_conv_string_tmp.
3223         * trans-stmt.c (gfc_do_allocate):  Use new memory alloc interface.
3224         * trans-intrinsic.c (gfc_conv_intrinsic_trim): Ditto.
3225         * trans.h (gfc_ss_info): Remove unused pdata field.
3226         * trans.c (gfc_create_var_np): Change T to V.
3228 2003-11-26  Richard Henderson  <rth@redhat.com>
3230         * mathbuiltins.def: Move acos, asin, cosh, log10, sinh, tanh from ...
3231         * trans-intrinsic.c (gfc_intrinsic_map): ... here.  Add SCALE,
3232         FRACTION, NEAREST, SET_EXPONENT.
3233         (gfc_intrinsic_map_t): Add libm_name, complex_available, is_constant.
3234         Fix GTY marking.  Remove unnecessary const's.
3235         (LIBM_FUNCTION): Rename from I_LIB.
3236         (LIBF_FUNCTION): New.
3237         (gfc_get_intrinsic_lib_fndecl): Handle libm and libgfortran naming
3238         conventions.  Assume the expr signature is correct.  Mark const.
3239         (gfc_conv_intrinsic_exponent): Use library functions.
3240         (gfc_conv_intrinsic_set_exponent): Remove.
3241         (gfc_conv_intrinsic_scale): Remove.
3242         (gfc_conv_intrinsic_nearest): Remove.
3243         (gfc_conv_intrinsic_fraction): Remove.
3244         (gfc_conv_intrinsic_function): Update.
3245         * trans-decl.c (gfor_fndecl_math_exponent4): New.
3246         (gfor_fndecl_math_exponent8): New.
3247         (gfc_build_intrinsic_function_decls): Set them.
3248         * trans.h: Declare them.
3250 2003-11-25  Canqun Yang  <canqun@nudt.edu.cn>
3252         * trans-common.c (gfc_layout_global_equiv): Locate the error for
3253         underflow COMMON block.
3254         (gfc_trans_one_common): Fix bug for size of COMMON block containing
3255         EQUIVALENCE object. Also fix typo in an error message.
3257 2003-11-25  Diego Novillo  <dnovillo@redhat.com>
3259         * Make-lang.in: Add check-gfortran to lang_checks.
3260         (check-f95): Alias for check-gfortran.
3262 2003-11-25  Jason Merrill  <jason@redhat.com>
3264         * Make-lang.in (f95.tags): Create TAGS.sub files in each
3265         directory and TAGS files that include them for each front end.
3267 2003-11-24  Paul Brook  <paul@nowt.org>
3269         PR fortran/13154
3270         * trans-decl.c (gfc_greate_module_variable): Skip COMMON blocks.
3272 2003-11-24  Paul Brook  <paul@nowt.org>
3274         * expr.c (simplify_const_ref): Return SUCCESS for things we don't
3275         handle.
3276         * resolve.c (gfc_resolve_expr): Resolve contents before rank/shape.
3278 2003-11-24  Paul Brook  <paul@nowt.org>
3280         PR fortran/13105
3281         * array.c (gfc_array_ref_shape): Handle elemental dimensions.
3282         * trans-array.c (gfc_trans_preloop_setup): Use correct dim lookup.
3284 2003-11-20  Richard Henderson  <rth@redhat.com>
3286         * trans-array.c (gfc_trans_allocate_array_storage): Use convert.
3287         (gfc_conv_array_base): Likewise.
3288         * trans-decl.c (gfc_trans_auto_character_variable): Likewise.
3289         * trans-expr.c (gfc_conv_string_tmp): Likewise.
3290         * trans-intrinsic.c (gfc_conv_intrinsic_trim): Likewise.
3291         * trans-stmt.c (gfc_trans_character_select): Likewise.
3293 2003-11-13  Paul Brook  <paul@nowt.org>
3295         * trans-decl.c (gfc_sym_mangled_function_id): Dont mangle externals.
3297 2003-11-13  Canqun Yang  <canqun@nudt.edu.cn>
3299         * resolve.c (gfc_resolve): Also resolve EQUIVALENCE objects.
3300         (resolve_equivalence): New function.
3301         (resolve_equivalence_derived): New function.
3303 2003-11-12  Richard Henderson  <rth@redhat.com>
3305         * trans.c (gfc_trans_code): Use annotate_with_locus instead of
3306         annotate_all_with_locus.
3308 2003-11-11  Canqun Yang  <canqun@nudt.edu.cn>
3310         * options.c (gfc_init_options): Set flag_max_stack_var_size as 32768.
3311         * trans-decl.c (gfc_finish_var_decl): Modified.
3313 2003-11-08  Paul Brook  <paul@nowt.org>
3315         PR fortran/12704
3316         * trans-intrinsic.c (gfc_conv_intrinsics_minmaxloc): Handle zero-size
3317         arrays.
3319 2003-11-06  Paul Brook  <paul@nowt.org>
3321         * trans-intrinsic.c (gfc_conv_intrinsics_minmaxloc): Initialize pos.
3323 2003-11-02  Canqun Yang  <canqun@nudt.edu.cn>
3325         * match.c (gfc_match_stopcode): Assign '0' to stop_code.
3327 2003-10-27  Anthony Green  <green@redhat.com>
3329         * Make-lang.in (f95.stageprofile): Use tabs, not spaces.
3330         (f95.stagefeedback): Ditto.
3332 2003-10-27  Andrew Pinski  <pinskia@physics.uc.edu>
3334         PR fortran/12682
3335         * Make-lang.in (f95.stageprofile): Add.
3336         (f95.stagefeedback): Add.
3338 2003-10-23  Richard Henderson  <rth@redhat.com>
3340         * f96-lang.c (gfc_gimplify_expr): Remove.
3341         (LANG_HOOKS_GIMPLIFY_EXPR): Remove.
3342         (LANG_HOOKS_GIMPLE_BEFORE_INLINING): New.
3344 2003-10-23  Richard Henderson  <rth@redhat.com>
3346         * f95-lang.c (gfc_gimplify_expr): Return gimplify_status.
3348 2003-10-20  Paul Brook  <paul@nowt.org>
3350         * trans-expr.c (gfc_conv_integer_power): Use boolean_type_node.
3351         * trans-stmt.c (gfc_trans_do_while): Ditto.
3353 2003-10-17  Paul Brook  <paul@nowt.org>
3355         * simplify.c (gfc_simplify_shape): Use gfc_array_dimen_size.
3357 2003-10-17  Paul Brook  <paul@nowt.org>
3359         * trans-io.c (gfc_build_io_library_fndecls): Set TREE_PUBLIC.
3361 2003-10-17  Feng Wang  <wf_cs@yahoo.com>
3363         * iresolve.c (gfc_resolve_maxloc): Change the result's kind and type.
3364         (gfc_resolve_minloc): Ditto.
3365         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Use correct types.
3366         Return the value after subtracting the lower bound.
3368 2003-10-16  Richard Henderson  <rth@redhat.com>
3370         * f95-lang.c (expand_function_body): Don't check flag_disable_gimple.
3372 2003-10-16  Steven Bosscher  <steven@gcc.gnu.org>
3374         * lang.c: Remove -M option for now, it's in the way for C.
3376 2003-10-14  Jason Merrill  <jason@redhat.com>
3378         * Make-lang.in (f95.tags): New rule.
3380 2003-10-13  Richard Henderson  <rth@redhat.com>
3382         * trans.c (gfc_trans_code): Use annotate_all_with_locus.
3384 2003-10-13  Paul Brook  <paul@nowt.org>
3386         * trans-decl.c (generate_local_decl): Don't create junk variables.
3388 2003-10-13  Paul Brook  <paul@nowt.org>
3390         * resolve.c (resolve_formal_arglist): Use function result decl in
3391         preference to function decl.
3393 2003-10-12  Richard Henderson  <rth@redhat.com>
3395         * f95-lang.c (gfc_define_builtin): New const_p argument.  Set
3396         TREE_READONLY.  Update all callers.
3398 2003-10-12  Feng Wang  <wf_cs@yahoo.com>
3400         * iresolve.c (gfc_resolve_cshift): Change to match implementation.
3401         * trans-intrinsic.c (gfc_conv_intrinsic_function): Remove CSHIFT.
3402         (gfc_is_intrinsic_libcall): Add CSHIFT.
3404 2003-10-12  Richard Henderson  <rth@redhat.com>
3406         * trans-array.c (gfc_trans_static_array_pointer): Set TREE_INVARIANT.
3407         (gfc_trans_array_constructor_value): Likewise.
3408         (gfc_conv_array_initializer): Likewise.
3409         * trans-stmt.c (gfc_trans_character_select): Likewise.
3411 2003-11-12  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3413         * trans-intrinsic.c (integer_kind_info, real_kind_info): Remove.
3415 2003-10-11  Huang Chun  <jiwang@mail.edu.cn>
3417         * check.c (gfc_check_repeat): Check arguments are scalar.
3418         (gfc_check_trim): New function.
3419         * intrinsic.h (gfc_check_trim): Add prototype.
3420         * intrinsic.c (add_functions): Use it.
3421         * trans.h (gfor_fndecl_string_trim, gfor_fndecl_string_repeat):
3422         Decalare.
3423         * trans-decl.c: Ditto.
3424         (gfc_build_intrinsic_fucntion_decls): Set them.
3425         * trans-intrinsic.c (gfc_conv_intrinsic_len): Handle result vars.
3426         (gfc_conv_intrinsic_trim): New function.
3427         (gfc_conv_intrinsic_repeat): New function.
3428         (gfc_conv_intrinsic_function): Use them.
3430 2003-10-11  Huang Chun  <jiwang@mail.edu.cn>
3432         * trans-types.c (gfc_sym_type): Handle result variables.
3434 2003-10-11  Huang Chun  <jiwang@mail.edu.cn>
3436         * trans-intrinsic.c (gfc_conv_intrinsic_char): Don't use
3437         gfc_get_character_type.
3439 2003-10-11  Feng Wang  <wf_cs@yahoo.com>
3441         * trans-expr.c (gfc_conv_variable): Check sym->ts, not the decl.
3443 2003-10-11  Paul Brook  <paul@nowt.org>
3445         * iresolve.c (gfc_resolve_dint, gfc_resolve_dnint): New functions.
3446         (gfc_resolve_dprod): New function.
3447         (gfc_resolve_aint, gfc_resolve_anint): Only base name on arg type.
3448         * intrinsic.h (gfc_resolve_dint, gfc_resolve_dnint): Declare.
3449         (gfc_resolve_dprod): Declare.
3450         * intrinsic.c (add_functions): Use them.
3451         * trans-decl.c (gfc_get_extern_function_decl): Only pass one arg.
3453 2003-10-06  Richard Henderson  <rth@redhat.com>
3455         * f95-lang.c (gfc_init_builtin_functions): Add clzll.
3456         * trans-intrinsic.c (call_builtin_clz): Use it.
3458 2003-10-05  Paul Brook  <paul@nowt.org>
3460         * f95-lang.c (expand_function_body): Call (push|pop)_function_context.
3461         * trans-decl.c (gfc_generate_function_code): Set
3462         cfun->function_end_locus.
3464 2003-09-24  Jason Merrill  <jason@redhat.com>
3466         * f95-lang.c, trans-decl.c: Use DECL_SOURCE_LOCATION instead of
3467         TREE_LOCUS.
3469 2003-09-21  Lifang Zeng  <zlf605@hotmail.com>
3470         Paul Brook  <paul@nowt.org>
3472         * Make-lang.in (F95_OBJS): Add fortran/data.o.
3473         * array.c (gfc_inser_constructor): New function.
3474         (gfc_get_constructor): New function.
3475         (gfc_free_constructor): Initialize offset and repeat.
3476         (iterator_stack): Remove.
3477         (expand_info): Add offset, component and repeat fields.
3478         (expand_constructor): Set them.
3479         (expand): Set new fields.
3480         (gfc_copy_constructor): Ditto. Avoid recursion.
3481         * gfortran.h: Add prototypes for new functions.
3482         (gfc_constructor): Add offset, component and repeat.
3483         (iteratio_stack): Move to here.
3484         * resolve.c (check_data_variable): Convert data values into variable
3485         initializers.
3486         (traverse_data_list): Build implicit loop chain.
3487         (gfc_resolve): Ditto.
3488         * trans-array.c (gfc_conv_array_intializer): Handle repeat count.
3489         * trans-decl.c (gfc_get_symbol_decl): Use gfc_conv_structure.
3490         * trans-expr.c (gfc_conv_structure): Handle array initializers.
3491         (gfc_conv_expr): Update to match.
3492         * trans.h (gfc_conv_structure): Declare.
3493         * data.c: New file.
3495 2003-09-20  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3497         * trans.h: Add declarations for gfor_fndecl_si_kind and
3498         gfor_fndecl_sr_kind.
3499         * trans-decl.c (g95_build_intrinsic_function_decls): Build them.
3500         * trans-intrinsic.c (g95_conv_intrinsic_si_kind): New function.
3501         (g95_conv_intrinsic_sr_kind): New function.
3502         (g95_conv_intrinsic_function): Add SELECTED_INT_KIND and
3503         SELECTED_REAL_KIND.
3505 2003-09-17  Lars Segerlund  <Lars.Segerlund@comsys.se>
3507         * iresolve.c (gfc_resolve_random_number): Generate _r4 & _r8
3508         instead of _4 and _8 as postfix for libgfortran calls.
3510 2003-09-16  Paul Brook  <paul@nowt.org>
3512         * array.c (compare_bounds): New function.
3513         (gfc_compare_array_spec): Use it.
3515 2003-09-14  Paul Brook  <paul@nowt.org>
3517         * primary.c (gfc_match_rvalue): Make sure sym->result is set.
3518         * trans-expr.c (gfc_conv_string_parameter): Also allow PRAM_DECLs.
3520 2003-09-14  Paul Brook  <paul@nowt.org>
3522         * check.c (dim_rank_check): Allow assumed bounds if requested.
3523         (gfc_check_lbound): Call it.
3524         (gfc_check_ubound): Ditto.
3525         (gfc_check_size): Change to match.
3526         * simplify.c (gfc_simplify_bound): New function.
3527         (gfc_simplify_lbound): New function.
3528         (gfc_simplify_ubound): New function.
3529         * intrinsic.h: Declare them.
3530         * intrinsic.c (add_functions): Use them.
3532 2003-09-14  Paul Brook  <paul@nowt.org>
3534         * io.c (format_lex): Initialize negative_flag.
3535         (check_format): Intialize repeat.
3536         * trans-io.c (gfc_new_nml_name_expr): Declare static.
3537         (gfc_new_var_expr): Ditto.
3539 2003-09-14  Paul Brook  <paul@nowt.org>
3541         * trans-array.c (gfc_conv_array_initializer): Handle derived types.
3542         * trans-decl.c (gfc_get_symbol_decl): Only do local scalar values.
3544 2003-09-12  Paul Brook  <paul@nowt.org>
3546         * trans-intrinsic.c (gfc_conv_intrinsic_sign): Call fold.
3548 2003-09-12  Zdenek Dvorak  <rakdver@atrey.karlin.mff.cuni.cz>
3550         * fortran/trans.c (gfc_finish_block): Call rationalize_compound_expr
3551         for a correct expression.
3553 2003-09-10  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3555         * trans-intrinsic.c (real_compnt_info): New struct.
3556         (prepare_arg_info): New function.
3557         (gfc_conv_intrinsic_set_exponent): New function.
3558         (gfc_conv_intrinsic_scale): New function.
3559         (gfc_conv_intrinsic_nearest): New function.
3560         (gfc_conv_intrinsic_fraction): New function.
3561         (gfc_conv_intrinsic_exponent): New function.
3562         (gfc_conv_intrinsic_spacing): New function.
3563         (gfc_conv_intrinsic_rrspacing): New function.
3564         (gfc_conv_intrinsic_function): Use them.
3566 2003-08-24 XiaoQiang Zhang  (zhangapache@yahoo.com>
3568         * trans-const.c (gfc_conv_mpz_to_tree): Fix bug, parameter for
3569         build_int_2 changed from (high, low) to (low, high).
3570         * trans-io.c (ioparm_namelist_name, ioparm_namelist_name_len,
3571         ioparm_namelist_read_mode, iocall_set_nml_val_int,
3572         iocall_set_nml_val_float, iocall_set_nml_val_char,
3573         iocall_set_nml_val_complex, iocall_set_nml_val_log): New declaration.
3574         (gfc_build_io_library_fndecls): Add variable initialization.
3575         (gfc_new_nml_name_expr, get_new_var_expr): New function.
3576         (build_dt): Add namelist support.
3577         * io.c (value): New variable.
3578         (check_format): Support FMT_H now.
3580 2003-09-07  Paul Brook  <paul@nowt.org>
3582         * io.c (gfc_resolve_dt): Error if format label is not defined.
3584 2003-09-07  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3586         * trans-intrinsic.c (gfc_conv_intrinsic_aint): Fix two bugs. One is
3587         about case_switch's break. The other is about building the condition
3588         statement tree, which judges the argument in the range of the
3589         corresponding integer type.
3590         * trans-intrinsic.c (gfc_conv_intrinsic_mod): MOD and MODULO can work
3591         for the large values.
3593 2003-09-05  Paul Brook  <paul@nowt.org>
3595         * f95-lang.c (expand_function_body): Gimplify the function.
3597 2003-09-04  Jeff Law  <law@redhat.com>
3599         * f95-lang.c (DEFINE_MATH_BUILTIN): C arrays start at
3600         index zero!
3602 2003-09-04  Paul Brook  <paul@nowt.org>
3604         * f95-lang.c (gfc_define_builtin): Also set implicit_built_in_decls.
3605         (gfc_expand_stmt): New function.
3606         (LANG_HOOKS_RTL_EXPAND_STMT): Define.
3607         (expand_function_body): Use tree_rest_of_compilation.
3608         * trans-decl.c (gfc_generate_function_code): Don't free cfun.
3610 2003-09-03  Jeff Law  <law@redhat.com>
3612         * f95-lang.c (gfc_init_builtin_functions): C arrays start at
3613         index zero!
3615 2003-08-30  Paul Brook  <paul@nowt.org>
3617         * f95-lang.c (builtin_function): Remove #if 0 code.
3618         (gfc_define_builtin): New function.
3619         (gfc_init_builtin_functions): Use mathbuiltins.def not ../builtins.def.
3620         * mathbuiltins.def: New file.
3621         * trans-intrinsic.c (gfc_intrinsic_map_t): Add builtin code fields.
3622         (gfc_intrinsic_map): Use mathbuiltins.def.
3623         (gfc_intrinsic_builtin_t): Remove.
3624         (gfc_build_intrinsic_lib_fndecls): Update.
3625         * trans-types.c (gfc_init_types): Remove redundant initilaization of
3626         signed_size_type_node.
3628 2003-08-29  Paul Brook  <paul@nowt.org>
3630         * arith.c (gfc_real_kinds): Use correct minimum exponents.
3632 2003-08-22  Kejia Zhao  <kejia_zh@yahoo.com.cn>
3634         * trans-instinsic.c (gfc_conv_intrinsic_mod): Also do MODULO.
3635         (gfc_conv_intrinsic_function): Add MODULO.
3637 2003-08-22  Jason Merrill  <jason@redhat.com>
3639         * trans-array.c (gfc_conv_expr_descriptor): Update use of predicates.
3641 2003-08-22  Andreas Jaeger  <aj@suse.de>
3643         * Make-lang.in (f95.install-common): Add DESTDIR support.
3644         * (f95.install-info): Likewise.
3645         (f95.uninstall): Likewise.
3647 2003-08-19  Diego Novillo  <dnovillo@redhat.com>
3649         * trans-types.c (gfc_init_types): Initialize
3650         signed_size_type_node with size_type_node.
3652 2003-08-18  Paul Brook  <paul@nowt.org>
3654         * dependency.c (gfc_dependency): New enum.
3655         (check_another_array_ref): Remove.
3656         (gfc_get_array_from_component): Remove.
3657         (get_x): Remove.
3658         (get_range): Remove.
3659         (get_no_of_elements): Use mpz_t, not mpf_t.
3660         (transform_sections): New function.
3661         (gfc_check_range_range): Rename ...
3662         (gfc_check_section_vs_section): ... to this.  Use new function.
3663         (gfc_is_inside_range): Rewrite to match.
3664         (gfc_check_element_vs_section): Ditto.
3665         (gfc_check_element_vs_element): Ditto.
3666         (get_deps): Ditto.
3667         (gfc_dep_resolver): Ditto.  Remove unused parameter.
3668         * Dependency.h (gfc_check_range_range, gfc_check_element_vs_section,
3669         gfc_check_element_vs_element, gfc_is_inside_range,
3670         gfc_get_array_from_component): Remove prototypes for static functions.
3671         (gfc_dep_resolver): Update prototype.
3672         * trans-array.c (gfc_conv_resolve_dependencies): Change to match.
3674 2003-08-15  Paul Brook  <paul@nowt.org>
3676         * trans-decl.c (gfc_build_qualified_array): Don't add symbols for
3677         return values to parent scope.
3678         (gfc_build_dummy_array_decl): Ditto.
3680 2003-08-14  Paul Brook  <paul@nowt.org>
3682         * trans-stmt.c (gfc_trans_allocate): Handle NULL refs. Allocate the
3683         size of the type, not the pointer.
3684         * resolve.c (resolve_symbol): Give more accurate error message.
3686 2003-08-10  Paul Brook  <paul@nowt.org>
3688         * trans-decl.c (gfc_build_function_decl): Only mangle global symbols.
3690 2003-08-10  Paul Brook  <paul@nowt.org>
3692         * trans-stmt.c (gfc_trans_allocate): Correctly handle non-array derived
3693         type components.
3695 2003-08-10  Chun Huang  <compiler@sohu.com>
3697         * resolve.c (resolve_formal_arglist): Resolve STATEMENT function.
3698         (resolve_symbol): Ditto.
3699         * trans-expr.c (gfc_conv_statement_function): New function.
3700         (gfc_conv_function_expr): Use it.
3702 2003-08-10  Paul Brook  <paul@nowt.org>
3704         * trans-array.c (gfc_conv_ss_startstride): Handle functions.
3705         (walk_function_expr): Set section rank.
3706         * trans-intrinsic.c (gfc_walk_intrinsic_libfunc): Ditto.
3708 2003-08-10  Paul Brook  <paul@nowt.org>
3710         * intrinsic.c (add_sym): Prefix names with correct string.
3711         (add_sym_0s): New function.
3712         (add_subroutines): Register abort.
3714 2003-08-10  Erik Schnetter  <schnetter@uni-tuebingen.de>
3716         * gfortran.h: Introduce options to control the mangling.
3717         * lang.opt: Likewise.
3718         * options.c (gfc_init_options): Handle the options.
3719         * trans-common.c (gfc_sym_mangled_common_id): New function.
3720         (gfc_build_common_decl): Call it.
3721         * trans-decl.c (gfc_sym_mangled_function_id): New function.
3722         (gfc_get_extern_function_decl, gfc_build_function_decl): Call it.
3724 2003-08-09  Paul Brook  <paul@nowt.org>
3726         * module.c (mio_symbol): Always ouput a namespace for formal args.
3727         (load_needed): Namespace now belong to their proper symbol.
3728         (gfc_dump_module): Change G95=>GFORTRAN.
3730 2003-08-05  Paul Brook  <paul@nowt.org>
3732         * options.c: Force -fg77-calls.
3734 2003-08-02  Paul Brook  <paul@nowt.org>
3736         * Makelang.in: Rename G95_* to GFORTRAN_*.
3737         * All sources: Rename G95_* to GFC_*.
3739 2003-08-01  Paul Brook  <paul@nowt.org>
3741         * fortran/Make-lang.in: Use GMPLIBS.
3742         * fortran/config-lang.in: Set need_gmp.
3743         * trans-expr.c (gfc_conv_variable): Remove incorrect assertion.
3745 2003-07-27  Andreas Jaeger  <aj@suse.de>
3747         * trans-decl.c (gfc_generate_constructors): Convert prototype to
3748         ISO C90.
3749         * trans-const.c (gfc_init_constants): Likewise.
3750         * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Likewise.
3752         * gfortranspec.c: Convert to ISO C90.
3753         (lang_specific_driver): Correct copyright, remove ALT_LIBM usage.
3755 2003-07-26  Paul Brook  <paul@nowt.org>
3757         * lang.opt: Add -fdump-parse-tree.
3758         * options.c (gfc_handle_option): Ditto.
3759         * resolve.c (resolve_forall_iterators): Convert to proper type.
3760         * trans-stmt.c (gfc_trans_forall_1): Create temp var with correct type.
3762 2003-07-26  Paul Brook  <paul@nowt.org>
3764         * Makefile.in: Add build dependencies on files common with rest of gcc.
3766 2003-07-26  Lifang Zeng  <zlf605@hotmail.com>
3768         * trans.h: Declare g95_trans_pointer_assignment.
3769         * trans-expr.c (g95_trans_pointer_assignment): New function.
3770         (g95_trans_pointer_assign): Use it.
3771         * trans-stmt.c (g95_trans_forall_1): Handle pointer assignment.
3772         (g95_trans_pointer_assign_need_temp): New function.
3774 2003-07-26  Paul Brook  <paul@nowt.org>
3776         * gfortran.texi: Replace references to g95.
3778 2003-07-26  Paul Brook  <paul@nowt.org>
3780         Rename g95_* to gfc_*.
3782 2003-07-25  Paul Brook  <paul@nowt.org>
3784         * gfortran.h: Rename from g95.h.
3785         * trans-types.c (boolean_type_node, booelan_true_node,
3786         boolean_false_node): Remove.
3787         * trans-types.h: Ditto.
3789 2003-07-25  Chun Huang  <compiler@sohu.com>
3791         * parse.c (accept_statement): Implement BLOCK DATA statement.
3792         * trans-expr.c (g95_conv_variable): Fix bug for dereference pointer
3793         variables.
3795 2003-07-24  Lifang Zeng  <zlf605@hotmail.com>
3797         * trans-stmt.c (temporary_list): Define.
3798         (g95_trans_assign_need_temp): New function.
3799         (g95_trans_forall_1): Modified for WHERE.
3800         (g95_trans_where_assign): Modified.
3801         (g95_trans_where_2): Modified.
3802         (g95_evaluate_where_mask): Modified.
3803         (g95_trans_where): Modified.
3804         (g95_get_temp_expr): Removed.
3805         (g95_add_to_where_stmt_list): Removed.
3806         (compute_overall_iter_number): Modified for WHERE.
3807         * trans.h: Remove where_stmt_list.
3809 2003-07-24  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3811         * lang.opt: Correct description of options -J and -M.
3813 2003-07-23  Steven Bosscher   <steven@gcc.gnu.org>
3815         * lang.opt: Move help text to here.
3816         * lang-options.h: Remove.
3818 2003-07-23  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3819         * iresolve.c (g95_resolve_transpose): Proper variable in switch.
3820         * simplify.c (g95_simplify_nearest): Fix typo and use a correct test
3821         on kind.
3823 2003-07-22  Steven Bosscher  <steven@gcc.gnu.org>
3824         Paul Brook  <paul@nowt.org>
3826         * check.c (check_rest): Use global pedantic flag.
3827         * io.c (data_desc): Ditto.
3828         * error.c (g95_warning, g95_warning_now): Use global flag.
3829         * f95-lang.c (LANG_HOOKS_HANDLE_OPTION): Rename from DECODE.
3830         (expand_function_body): Update to new prototypes.
3831         (g95_init): Use new option names.
3832         * g95.h (g95_option_t): Standardize names.
3833         (g95_init_options, g95_handle_option): Update prototypes.
3834         * interface.c: Use new option names.
3835         * match.c: Ditto.
3836         * module.c: Ditto.
3837         * parse.c: Ditto.
3838         * primary.c: Ditto.
3839         * resolve.c: Ditto.
3840         * scanner.c: Ditto.
3841         * simplify.c: Ditto.
3842         * symbol.c: Ditto.
3843         * trans-array.c: Ditto.
3844         * trans-expr.c: Ditto.
3845         * trans-types.c: Ditto.
3846         * trans-decl.c: Ditto.
3847         (g95_build_library_function_decl): Remove obsolete VPARAMS.
3848         * trans.h: Ditto.
3849         * options.c (g95_display_help): Remove.
3850         (g95_init_options): Convert to new scheme.
3851         (set_Wall): Ditto
3852         (g95module_option): Ditto, rename from g95_parse_arg.
3853         (g95_handle_module_path_options): New function.
3854         * trans-equivalence.c: Fix error message.
3855         * lang.opt: Corrections.
3857 2003-07-21  Steven Bosscher  <steven@gcc.gnu.org>
3859         * lang.opt: New file.
3861 2003-07-21  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3863         * decl.c (match_attr_spec): Set colon_seen.
3865 2003-07-14  Paul Brook  <paul@nowt.org>
3867         * trans-array.c: Update comment.
3868         (g95_trans_array_constructor_subarray): Cleanup loopinfo data.
3869         * trans-intrinsic.c (g95_conv_intrinsic_anyall,count,arith,
3870         minmaxloc,minmaxval): Ditto.
3871         * trans-io.c (g95_trans_transfer): Ditto.
3872         * trans-stmt.c: Remove unneeded prototypes.
3873         (generate_loop_for_lhs_to_rhs): Rename vars. Add loop post chain.
3874         (generate_loop_for_rhs_to_temp): Rename vars. Don't share loopinfo.
3875         (compute_inner_temp_size): Remove bits of dead code. Add comments.
3876         Don't share loopinfo.
3877         (compute_overall_iter_number): Declare as static.
3878         (allocate_temp_for_forall_nest): Ditto.
3879         (g95_trans_forall_1): Don't pass shared loopinfo.
3880         * trans.c (g95_start_block): Expand comment.
3882 2003-07-12  Paul Brook  <paul@nowt.org>
3884         * arith.c (g95_index_integer_kind): Remove unused initializer.
3885         * trans-stmt.c (generate_loop_for_temp_to_lhs): Don't multiply array
3886         index by size of element.
3887         (generate_loop_for_rhs_to_temp): Ditto.
3888         (allocate_temp_for_forall_nest): Use element size, not index size.
3890 2003-07-11  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3892         * arith.c (g95_index_integer_kind): Add a TODO.
3893         * simplify.c (g95_simplify_nearest): Add a TODO.
3895 2003-07-09  Chun Huang  <compiler@sohu.com>
3897         * trans.h: Add declarations for gfor_fndecl_string_scan and
3898         gfor_fndecl_string_verify.
3899         * trans-decl.c (g95_build_intrinsic_function_decls): Build them.
3900         * trans-intrinsic.c (g95_conv_intrinsic_scan): New function.
3901         (g95_conv_intrinsic_verify): New function.
3902         (g95_conv_intrinsic_function): Add SCAN and VERIFY.
3903         * simplify.c (g95_simplify_scan, g95_simplify_verify): Fix bug in case
3904         of parameter 'BACK=.TRUE.'
3906 2003-07-05  Lifang Zeng  <zlf605@hotmail.com>
3908         * trans-stmt.c (iter_info, forall_info): Define.
3909         (g95_trans_forall_block): Remove.
3910         (g95_trans_forall_loop): Use forall info blocks.
3911         (g95_trans_nested_forall_loop): New function.
3912         (g95_do_allocate): Handle things other than logical masks.
3913         (generate_loop_for_temp_to_lhs): New function.
3914         (generate_loop_for_rsh_to_temp): New function.
3915         (compute_inner_temp_size): New function.
3916         (compute_overall_iter_number): New function.
3917         (allocate_temp_for_forall_nest): New function.
3918         (g95_trans_forall): Move body ...
3919         (g95_trans_forall_1): ... to here.  Handle loops with temporaries.
3921 2003-07-02  Paul Brook  <paul@nowt.org>
3923         * trans-decl.c (create_index_var, g95_build_qualified_array): Put vars
3924         in correct scope.  Change callers to match.
3925         * trans-types.c (g95_get_dtype_cst): Allow rank 7 arrays.
3926         * iresolve.c (g95_resolve_reshape): Only use constant shapes.
3928 2003-07-02  Paul Brook  <paul@nowt.org>
3930         * trans-array.c (g95_conv_loop_setup): Remove dead var.  Use
3931         expression shape for all expressions.
3932         * trans-decl.c (g95_symbol_init): Allow adding at very end of list.
3934 2003-07-03  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3936         * g95.h (g95_option_t), lang-options.h, options.c (g95_init_options,
3937         g95_parse_arg), intrinsic.c (g95_convert_type): support of
3938         -Wconversion.
3939         * intrinsic.c, g95.h: Add g95_convert_type_warn,
3940         * resolve.c (g95_resolve_index): Call it.
3942 2003-07-02  Paul Brook  <paul@nowt.org>
3944         * iresolve.c (g95_resolve_reshape): Set expression shape.
3945         (g95_resolve_shape): Ditto.
3946         * simplify.c (g95_simplify_shape): Move common code outside condition.
3947         * trans-array.c (g95_conv_array_initializer): Teach it how to count.
3949 2003-07-01  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
3951         * array.c (g95_array_dimen_size): Deal with EXPR_ARRAY to improve
3952         conformance checks.
3954 2003-06-29  Paul Brook  <paul@nowt.org>
3956         * array.c (g95_simplify_iterator_var): Don't bother with return value.
3957         * expr.c (find_array_element, find_component_ref): New functions.
3958         (remove_subobject_ref): New function.
3959         (simplify_const_ref): Use them.  Rename from simplify_component_ref.
3960         (simplify_ref_chain): New function.
3961         (g95_simplify_expr): Use it.  Simplify parameter variable subobjects.
3962         (g95_specification_expr): Simplify the expression.
3963         * resolve.c (resolve_operator): Check simplifications return code.
3964         (g95_resolve_expr): Ditto.
3966 2003-06-26  Paul Brook  <paul@nowt.org>
3968         * expr.c (simplify_component_ref): New function.
3969         (g95_simplify_expr): Use it.
3970         * resolve.c (resolve_structure_cons): Handle references.
3972 2003-06-25  Paul Brook  <paul@nowt.org>
3974         * trans-io.c (build_dt): Handle internal units.
3976 2003-06-25  Canqun Yang  <canqun@yahoo.com.cn>
3978         * trans-common.c (g95_build_common_decl): Array index range starts at 0.
3979         (g95_build_common_decl, g95_layout_global_equiv, g95_trans_one_common):
3980         Use g95_array_index_type instead of integer_type_node.
3981         (g95_build_common_decl, g95_set_common_master_type): Use
3982         g95_character1_type_node instead of char_type_node.
3983         * trans-equivalence.c (g95_layout_local_equiv): As above.
3985 2003-06-24  Steven G. Kargl  <kargls@attbi.com>
3987         * g95.h (g95_option_t), options.c (g95_init_options, g95_parse_arg):
3988         remove last remains of -fquiet.
3990 2003-06-22  Paul Brook  <paul@nowt.org>
3992         * resolve.c (resolve_operator): Don't fail if we can't simplify.
3993         (g95_resolve_expr): Ditto.
3994         (resolce_code): Mark as static.
3995         * trans-stmt.c (g95_trans_chaaracter_select): Mark labels because the
3996         gimplifer doesn't (yet).
3998 2003-06-20  Paul Brook  <paul@nowt.org>
4000         * g95.h: Add ST_PAUSE and EXEC_PAUSE.
4001         * match.c (g95_match_if): Add ST_PAUSE.
4002         (g95_match_stopcode): New function.
4003         (g95_match_pause, g95_match_stop): Use it.
4004         * parse.c (g95_ascii_statement): Handle ST_PAUSE.
4005         (decode_stmt, next_statement, parse_executable): Ditto.
4006         * resolve.c (resolve_code): Ditto.
4007         * st.c (g95_free_statement): Ditto.
4008         * trans-stmt.c (g95_trans_pause): New function.
4009         * trans-stmt.h: Declare it.
4010         * trans.c (g95_trans_code): Use it.
4011         * trans-decl.c (gfor_fndecl_pause_numeric, gfor_fndecl_pause_string):
4012         Declare.
4013         (g95_build_builtin_function_decls): Initialize them.
4014         * trans.h: Ditto.
4015         * dump-parse-tree.c (g95_show_code_node): Handle EXEC_PAUSE.
4017 2003-06-18  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4019         * io.c (g95_match_open , g95_match_close, g95_match_inquire,
4020         match_filepos): Fix error handling.
4022 2003-06-18  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4024         * array.c (spec_dimen_size, ref_dimen_size, g95_array_dimen_size):
4025         Add assertions on arguments.
4026         * resolve.c (expression_shape): Remove useless &.
4027         * simplify.c (get_kind, g95_simplify_bit_size, g95_simplify_digits,
4028         g95_simplify_ibclr, g95_simplify_ibits, g95_simplify_ibset,
4029         g95_simplify_ishft,g95_simplify_ishftc, g95_simplify_maxexponent,
4030         g95_simplify_minexponent, g95_simplify_radix, g95_simplify_range
4031         g95_simplify_rrspacing, g95_simplify_scale, g95_simplify_spacing,
4032         g95_simplify_tan, g95_simplify_tiny): Clean predicates and assertions.
4033         (g95_simplify_not, g95_simplify_scale): Add assertions.
4035 2003-06-15  Paul Brook  <paul@nowt.org>
4037         Clean up stuff to work with the ssa optimizers.
4038         * convert.c (convert): Handle BOOLEAN_TYPEs.
4039         * f95-lang.c (g95_truthvalue_conversion): Implement.
4040         * trans-array.c (g95_trans_array_constructor_value): Group multiple
4041         scalar values.
4042         * trans.h (g95_truthvalue_conversion): Declare.
4043         * trans-intrinsic.c (g95_conv_intrinsic_anyall): Use bool constants.
4044         * trans-stmt.c (g95_trans_character_select): Don't create array
4045         assignments.  Mark labels as indirect jump targets.
4046         * trans-types.h (g95_init_types): Use BOOLEAN_TYPE nodes.
4047         (g95_get_dtype_cst): Handle LOGICAL types.
4049 2003-06-14  Paul Brook  <paul@nowt.org>
4051         * f95-lang.c (g95_gimplify_expr): New function.
4052         * trans-array.c (g95_trans_array_constructor_value): Don't create
4053         array assignments.
4054         (g95_conv_expr_descriptor): Rename simple->gimple.
4055         * trans-expr.c (conv_expr_op): Use proper logical operators.
4056         * trans-intrinsic.c (build_fixbound_expr): New function.
4057         (build_fix_expr): Ditto.
4058         (g95_conv_intinsic_aint): Use them. Use builtin functions.
4059         (g95_conv_intrinsic_function): Add FLOOR and CEILING.
4061 2003-06-10  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4063         * array.c (g95_compare_array_spec): Remove unreachable code.
4064         * expr.c (g95_copy_expr): Likewise.
4065         * intrinsic.c (g95_convert_type): Likewise.
4066         * misc.c (g95_code2string): Likewise.
4067         * simplify.c (g95_simplify_ishft, g95_simplify_real,
4068         g95_simplify_reshape, g95_simplify_sign, g95_simplify_sqrt): Likewise.
4069         * trans-stmt.c (g95_trans_select): Likewise.
4070         * primary.c (extend_ref): Add an assertion.
4071         * simplify.c (g95_convert_constant): Add const.
4072         * intrinsic.h: Remove g95_check_x_ni.
4073         * f95-lang.c (g95_finish): Call g95_release_include_path.
4075 2003-06-10  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4077         * resolve.c (resolve_contained_functions): Fix typo introduced on
4078         2003-01-13.
4080 2003-06-09  Paul Brook  <paul@nowt.org>
4082         * g95.h: Include system.h not hwint.h.
4083         * many: use safe-ctype.h not ctype.h.  Change isalpha -> ISALPHA, etc.
4084         * misc.c (g95_getmem): Use xmalloc/memset instead of calloc.
4086 2003-06-09  Paul Brook  <paul@nowt.org>
4088         * g95.h (g95_symbol): Add fields for COMMON and EQUIVALENCE variables.
4089         * Make-lang.in (F95_OBJS): Add files for COMMON and EQUIVALENCE.
4090         * trans-decl.c (g95_add_decl_to_functions): Make non-static.
4091         (g95_get_symbol_decl): Handle COMMON and EQUIVALENCE objects.
4092         (g95_generate_function_code): Translate COMMON and EQUIVALENCE
4093         objects.
4094         * trans.h (g95_trans_equivalence, g95_trans_common,
4095         g95_add_decl_to_function): Declare.
4096         * trans-common.c, trans-equivalence.c: New files.
4098 2003-06-08  Steven Bosscher  <steven@gcc.gnu.org>
4100         * intrinsic.c (g95_intrinsic_extension): Remove.
4101         (add_functions): Substitute g95_check_x for g95_check_x_ni
4102         everywhere.
4103         (g95_init_expr_extensions): New function.
4104         (g95_intrinsic_func_interface): Use it.
4105         * intrinsic.h: Remove extern decl for g95_intrinsic_extension.
4106         * check.c (g95_check_digit, g95_check_huge, g95_check_kind,
4107         g95_check_precision, g95_check_present, g95_check_radix,
4108         g95_check_range, g95_check_selected_real_kind): Do not set
4109         g95_intrinsic_extension.
4110         (g95_check_x_ni): Remove now duplicate of g95_check_x.
4112         * expr.c (check_inquiry): Add FIXME, fixup some code style.
4114 2003-06-06  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4116         * g95.h (ref_type): Name this type explicitly.
4117         * module.c (MIO_NAME): Add specialisations of mio_name.
4118         (mio_symbol_attribute, mio_typespec, mio_array_ref,
4119         mio_array_spec, mio_ref, mio_expr, mio_symbol): Use them.
4120         (ab_attribute): Name this type explicitly.
4121         (mio_symbol_attribute, mio_expr): Add cast to call to find_enum.
4123 2003-06-05  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4125         * trans-intrinsic.c (g95_conv_allocated): New function.
4126         (g95_conv_intrinsic_function): Make G95_ISYM_ALLOCATED work.
4128 2003-06-05  Steven Bosscher  <steven@gcc.gnu.org>
4130         * f95-lang.c: Don't include g95-support.h
4131         (g95_mark_addressable): Add prototype.
4132         (g95_init_decl_processing): Remove C front end hack.
4133         * f95-tree.c: Remove file.
4134         * support.c: Remove file.
4135         * g95-support.h: Remove file.
4136         * trans-types.c (g95_init_types): Set up boolean
4137         type related tree nodes.
4138         * Make-lang.in: Remove rules for dead files and
4139         dependencies on them.
4141 2003-06-05  Steven Bosscher  <steven@gcc.gnu.org>
4143         * Make-lang.in (F95_ADDITIONAL_OBJS): Remove the final
4144         C front end dependency.  Also, convert.c does not depend on
4145         g95-support.h anymore.
4146         * convert.c: Don't include c-common.h and g95-support.h
4147         * f95-lang.c: Don't inlude c-common.h and c-common.def (3x).
4148         (g95_stmt_tree, g95_scope_stmt_stack, anon_aggr_type_p,
4149         stmts_are_full_exprs_p, current_stmt_tree,
4150         current_scope_stmt_stack): Remove.
4151         * g95-support.h (unsigned_conversion_warning): Kill proto.
4152         (boolean_type_node, boolean_true_node, boolean_false_node):
4153         Don't define here.  Instead, make then true tree nodes in
4154         trans-types.
4155         * support.c (c_global_trees): Die, C front end, die!!!
4156         (g95_init_c_decl_hacks): Don't touch intmax_type_node,
4157         uintmax_type_node, string_type_node and const_string_type_node.
4158         (decl_constant_value, overflow_warning): Make static functions.
4159         They are in death row too, though.
4160         (default_conversion, c_expand_asm_operands): Remove.
4161         * trans-array.c, trans-expr.c, trans-intrinsic.c, trans-stmt.c,
4162         trans.c: Don't include c-common.h.
4163         * trans-types.c (boolean_type_node, boolean_true_node,
4164         boolean_false_node): Make them real tree nodes.
4165         * trans-types.h (intmax_type_node, string_type_node,
4166         const_string_type_node): Hack to work around C dependencies
4167         in builtin-types.def.
4169 2003-06-04  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4171         * decl.c (decl_types): Add some iterators-like sentinels.
4172         * decl.c (match_attr_spec): Use them.
4173         Use "decl_types" instead of "int".
4174         Add cast in call to g95_match_strings.
4175         * dump-parse-tree.c (g95_show_namespace):  Use "g95_intrinsic_op"
4176         instead of "int".
4177         * g95.h (g95_intrinsic_op): Add some iterators-like sentinels.
4178         (g95_interface_info): Use "g95_intrinsic_op".
4179         * dump-parse-tree.c (g95_show_namespace): Use them.
4180         * interface.c (g95_check_interfaces): Use them.
4181         * module.c (read_module, write_module): Use them.
4182         * symbol.c (g95_get_namespace, g95_free_namespace): Use them.
4183         Use "g95_intrinsic_op".
4184         * interface.c (check_operator_interface): Use "g95_intrinsic_op".
4185         Add a default case in switch statement.
4186         * intrinsic.h (g95_generic_isym_id): Moved to...
4187         * g95.h (g95_generic_isym_id): here.
4188         (g95_intrinsic_sym): Use "g95_generic_isym_id".
4189         * intrinsic.c (make_generic): Use "g95_generice_isym_id".
4190         * trans-intrinsic.c (g95_intrinsic_map_t,
4191          g95_conv_intrinsic_lib_funtion): Use "g95_generice_isym_id".
4192         * match.c (g95_match_intrinsic_op): Add cast in call to
4193         g95_match_strings.
4195 2003-06-03  Steven Bosscher  <steven@gcc.gnu.org>
4197         * support.c (skip_evaluation, warn_conversion, lvalue_p,
4198         lvalue_or_else, pedantic_lvalue_warning, warn_for_assignment,
4199         constant_fits_type_p, convert_and_check,
4200         unsigned_conversion_warning): Remove these ugly remnants
4201         we inherited from the C front end.
4202         (function_types_compatible): Remove '#if 0'-edcode.
4203         (build_modify_expr): Likewise.
4204         (convert_for_assignment): Don't use the deceased functions.
4205         The parameter fundecl is now unused.
4206         (decl_constant_value): Always just return decl.  In fact
4207         this function is not used at present, but it might be in
4208         the future, when we start using the tree inliner.
4209         (overflow_warning, default_conversion, c_expand_asm_operands):
4210         Abort when these are called, they are part of the C type
4211         checking implementation and therefore poison to Fortran.
4213 2003-06-04  Steven Bosscher  <steven@gcc.gnu.org>
4215         * Make-lang.in (F95_ADDITIONAL_OBJS): Don't depend on
4216         c-pretty-print.o and c-dump.o.  Add a comment on why we
4217         depend on c-semantics.c.
4218         * f95-lang.c (LANG_HOOKS_TREE_DUMP_DUMP_TREE_FN):
4219         Don't use the C front end tree dumper hook to dump the
4220         language specific tree representation -- we don't have
4221         one.  So instead, inherit the default langhook.
4223 2003-06-02  Paul Brook  <paul@nowt.org>
4225         * trans-expr.c (g95_conv_variable): Remove incorrent assertion.
4227 2003-06-02  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4229         * check.c (g95_check_associated): Use proper types.  Remove
4230         extraneous argument in call to g95_error().
4232 2003-06-02  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4234         * resolve.c (resolve_operator): Make logical operands convert to the
4235         type with higher kind.
4237 2003-06-02  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4239         * check.c (g95_check_associated): Make sure both pointer and target has
4240         the same type and rank. Null pointer or array section with vector
4241         subscript as target are not allowed.
4242         * trans.h: Declare gfor_fndecl_associated.
4243         * trans-decl.c: (g95_build_builtin_function_decls): Initialize
4244         gfor_fndecl_associated.
4245         * trans-intrinsic.c (g95_conv_associated): New function.
4246         (g95_conv_intrinsic_function): Make G95_ISYM_ASSOCIATED work.
4248 2003-06-02  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4250         * trans-array.c (g95_conv_expr_descriptor): Set the base of POINTER
4251         according to POINTER itself rather than TARGET.
4252         (g95_conv_expr_descriptor): Make lbound start at 1.
4253         * trans-expr.c (g95_trans_pointer_assign): Fix a bug for Nullify.
4255 2003-06-01  Paul Brook  <paul@nowt.org>
4257         * expr.c (g95_type_convert_binary): Make it match the standard.
4258         * g95.texi: Remove dead link.
4260 2003-06-01  Steven Bosscher  <steven@gcc.gnu.org>
4262         * g95.texi: Cleanup somewhat in preparation for inclusion
4263         in GCC CVS.
4265 2003-05-23  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4266             Canqun Yang  <canqun@yahoo.com.cn>
4268         * resolve.c (compare_bound_int, resolve_where_shape): Proper return
4269         type.
4270         (g95_find_forall_index): Return proper value.
4271         (g95_resolve_assign_in_forall, g95_resolve_forall): Use proper type to
4272         compare the return value from g95_find_forall_index.
4274 2003-05-23  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4275         * g95.h, io.c (g95_st_label): Remove "length".
4276         (g95_symtree): Remove "link".
4277         (g95_case): Remove "code".
4278         * arith.c, arith.h (g95_compare_string, g95_convert_integer,
4279         g95_convert_real): Make an argument pointer to const.
4280         * decl.c (colon_seen): Add a TODO.
4281         * interface.c (g95_compare_types): Fix typo.
4282         * interface.c (compare_interfaces): Preserve value of "p".
4283         * intrinsic.c (sort_actual): Remove "i".
4284         * match.c (g95_match_assign): Proper type in call to g95_match().
4285         * parse.c (next_free): Avoid duplicate call due to macro.
4286         * parse.c (check_statement_label): wrong type in call to g95_error.
4287         * primary.c (match_real_constant): Add a TODO.
4288         * resolve.c (resolve_select):  Remove useless conditional.
4289         * simplify.c (g95_simplify_repeat): Proper assignment to
4290         "value.character.string".
4291         * simplify.c (g95_simplify_reshape): Wrong variable in call to
4292         g95_error.
4294 2003-05-20  Canqun Yang  <canqun@yahoo.com.cn>
4296         * trans-stmt.c: Remove unnecessary include file defaults.h.
4298 2003-05-19  Lifang Zeng  <zlf605@hotmail.com>
4300         * trans-stmt.c (g95_trans_forall_loop): Handle FORALL with negative
4301         stride.
4302         (g95_trans_forall): Allow arbitrary number of FORALL indexes and
4303         actual variables used as FORALL indexes.
4305 2003-05-15  Paul Brook  <paul@nowt.org>
4307         * trans-array.c (g95_trans_static_array_pointer): Use
4308         null_pointer_node.
4309         (g95_trans_deferred_array): Initialize static array pointers.
4310         * trans-expr.c (g95_conv_function_call): Use formal arglist to
4311         correctly pass POINTER and absent CHARACTER arguments.
4313 2003-05-14  Lifang Zeng  <zlf605@hotmail.com>
4315         * resolve.c (g95_resolve_forall): Resolve FORALL construct/statement.
4316         (g95_resolve_forall_body): Resolve FORALL body.
4317         (g95_resolve_where_code_in_forall): Resolve WHERE inside FORALL.
4318         (g95_resolve_assign_in_forall): Resolve assignment inside FORALL.
4319         (g95_find_forall_index): Check whether the FORALL index appears in
4320         the expression or not.
4321         (resolve_code): Modified.
4323 2003-05-14  Paul Brook  <paul@nowt.org>
4325         * iresolve.c (g95_resolve_spread): Convert ncopies to index_type.
4327 2003-05-13  Paul Brook  <paul@nowt.org>
4329         * trans-types.c (g95_max_array_element_size): Now a tree node.
4330         (g95_init_types): Work out max size properly.
4331         (g95_get_dtype_cst): Modify to match.
4333 2003-05-11  Paul Brook  <paul@nowt.org>
4335         * trans-io.c (add_case): Create a label decl for case labels.
4337 2003-05-11  Paul Brook  <paul@nowt.org>
4339         * arith.c (g95_integer_index_kind): New variable.
4340         * f95-lang.c (g95_init): Move frontend initialization here ...
4341         (g95_post_options): ... from here.
4342         * g95.h (g95_index_integer_kind, g95_resolve_index): Declare.
4343         * intrinsic.c (add_functions): Use index kinds.
4344         * iresolve.c: Convert to index_kind where needed.
4345         * resolve.c (g95_resolve_index): Make public, use index_kind.
4346         (resolve_array_ref): Adjust to match.
4347         * trans-array.c: Rename g95_array_index_kind to g95_index_integer_kind.
4348         * trans-stmt.c: Ditto.
4349         * trans-types.c: Ditto.
4350         * trans-types.h (g95_array_index_kind): Remove declaration.
4351         * trans-expr.c (g95_conv_expr_present): Use null_pointer_node.
4353 2003-05-07  Paul Brook  <paul@nowt.org>
4355         * trans-const.c (g95_conv_mpz_to_tree): Typecast constant.
4356         * trans-intrinsic.c (g95_conv_intrinsic_bound): Convert type
4357         of bound indices.
4359 2003-05-07  Paul Brook  <paul@nowt.org>
4361         * trans-array.c (trans_static_array_pointer,
4362         g95_trans_array_constructor_value, g95_conv_array_initializer,
4363         g95_conv_structure): CONSTRUCTOR nodes only have one operand.
4364         (g95_add_loop_ss_code): Convert subscripts to the correct type.
4365         * trans-stmt.c (g95_trans_character_select): Ditto.
4366         * trans-types.c (g95_init_types): Ditto.
4368 2003-05-07  Steven Bosscher  <steven@gcc.gnu.org>
4370         * f95-lang.c (expand_function_body): Use input_line, not lineno.
4371         * trans-decl.c (g95_generate_function_code,
4372         g95_generate_constructors): Likewise.
4373         * trans.c (g95_trans_runtime_check, g95_add_block_to_block,
4374         g95_get_backend_locus, g95_set_backend_locus, g95_trans_code):
4375         Likewise.
4377 2003-05-07  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4378         * trans-types.c (g95_get_derived_type): Fix bug for DERIVED type
4379         with components point to the DERIVED type itself, and two DERIVED
4380         type with components point to each other.
4381         * trans-expr.c (g95_conv_componet_ref): Modified
4383 2003-05-07  Kejia Zhao  <kejia_zh@yahoo.com.cn>
4384         * trans-expr.c (g95_conv_expr): Translate EXPR_NULL into
4385         null_pointer_node.
4386         (g95_trans_pointer_assign): Implement Nullify.
4388 2003-05-01  Paul Brook  <paul@nowt.org>
4390         * trans-array.c (g95_walk_function_expr): Cope with NULL esym.
4391         * trans-decl.c (g95_get_symbol_decl): Don't mangle dummy functions.
4393 2003-05-01  Paul Brook  <paul@nowr.org>
4395         * trans-array.c, trans.c, trans-expr.c, trans-intrinsic.c,
4396         trans-stmt.c: Replace empty_stmt_node with build_empty_stmt () and
4397         IS_EMPTY_STMT.
4399 2003-05-01  Canqun Yang  <canqun@yahoo.com.cn>
4401         * trans-stmt.c (g95_trans_integer_select): Add a parameter to build
4402         CASE_LABEL_EXPR.
4404 2003-04-28  Paul Brook  <paul@nowt.org>
4406         * iresolve.c (g95_resolve_transpose): COMPLEX types are twice as big
4407         as their kind suggests.
4408         (g95_resolve_reshape): Ditto.
4410 2003-04-28  Chun Huang  <compiler@sohu.com>
4412         * trans-expr.c (g95_conv_substring_expr): New function.
4413         (g95_conv_expr): Use it.
4415 2003-04-28  Paul Brook  <paul@nowt.org>
4417         * iresolve.c (g95_resolve_transpose): Make it match the
4418         implementation.
4419         * trans-intrinsic.c (g95_is_intrinsic_libcall): Add TRANSPOSE.
4421 2003-04-18  Steven Bosscher  <steven@gcc.gnu.org>
4423         * trans-types.c (g95_add_field_to_struct): New function to
4424         add a field to a UNION_TYPE or RECORD_TYPE.
4425         * trans-types.h (g95_add_field_to_struct): Prototype.
4426         (g95_get_derived_type): Use g95_add_field_to_struct to add
4427         components.
4428         * trans-io.c (g95_add_field): Remove.
4429         (ADD_FIELD): Use new g95_add_field_to_struct function.
4430         (ADD_STRING): Likewise.
4431         * trans-stmt.c (g95_trans_select): Likewise.
4432         (g95_add_field): Remove duplicated function.
4434 2003-04-18  Canqun Yang  <canqun@yahoo.com.cn>
4436         Port implementation for CHARACTER SELECT from Andy's tree.
4437         * trans-stmt.c (g95_trans_character_select): Implement character
4438         select. (g95_add_field): New function.
4439         * trans-decl.c: Declare 'gfor_gndecl_select_string'.
4440         (g95_build_builtin_function_decls): Add 'gfor_fndecl_select_string'.
4441         * g95.h (struct g95_case): Add field 'int n'.
4442         * trans.h: Declare 'gfor_fndecl_select_string'.
4444 2003-04-18  Steven Bosscher  <steven@gcc.gnu.org>
4446         * bbt.c (duplicate_key, g95_insert_bbt_with_overlap): Remove.
4447         (g95_insert_bbd): Die on duplicates.
4448         * g95.h (g95_insert_bbt_with_overlap): Delete prototype.
4450 2003-04-14  Steven Bosscher  <steven@gcc.gnu.org>
4452         * g95.texi: Require GMP 4.0 -- like we actually
4453         do.  Explain the testsuite and what-goes-where.
4454         Don't use undefined texinfo symbol.  Break very
4455         long line.  Remove finished item from the list
4456         of open projects.
4458 2003-04-11  Canqun Yang  <canqun@yahoo.com.cn>
4460         * trans-stmt.c (g95_evaluate_where_mask): Give mask temporaries
4461         LOGICAL type.
4463 2003-04-10  Canqun Yang  <canqun@yahoo.com.cn>
4465         * trans-stmt.c (g95_trans_forall): Implement WHERE inside FORALL.
4466         (g95_trans_forall_body): New function.
4468 2003-04-10  Canqun Yang  <canqun@yahoo.com.cn>
4470         * resolve.c (resove_where): New function.
4471         (resolve_where_shape): New function.
4472         (resolve_code): Add call to 'resolve_where'
4473         * trans-stmt.c (g95_trans_where): Modified.
4474         (g95_trans_where_2): New function.
4475         (g95_trans_where_assign): New function.
4476         (g95_evaluate_where_mask): New function.
4477         (g95_add_to_stmt_list): New function.
4478         (g95_get_temp_expr): New function.
4479         * trans.h (where_stmt_list): New structure.
4481 2003-04-10  Paul Brook  <paul@nowt.org>
4483         * g95spec.c (DEFAULT_SWITCH_TAKES_ARG): Remove.
4484         (DEFAULT_WORD_SWITCH_TAKES_ARG): Ditto.
4486 2003-04-10  Steven Bosscher  <steven@gcc.gnu.org>
4488         Update after mainline -> tree-ssa-branch merge.
4489         * f95-lang.c (g95_mark_addressable): Update put_var_into_stack
4490         call.
4491         (g95_init): Update for new lang_hooks definition.
4492         (g95_post_options): New langhook.
4493         (LANG_HOOK_POST_OPTIONS): Clear, then define to g95_post_options.
4494         * scanner.c (g95_new_file): Comment update.
4496 2003-04-09  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4498         * g95.h, lang-options.h: Add -Wimplicit-interface.
4499         * options.c (g95_init_options, g95_parse_arg): Set it.
4500         * interface.c (check_intents): Warn about call with implicit
4501         interface.
4502         * resolve.c (resolve_unknown_f, resolve_unknown_s): Call
4503         g95_procedure_use.
4505 2003-04-05  Paul Brook  <paul@nowt.org>
4507         * iresolve.c (g95_resolve_spread): Don't resole based on type.
4508         * trans-intrinsic.c (g95_is_intrinsic_libcall): Add G95_ISYM_SPREAD.
4510 2003-03-29  Paul Brook  <paul@nowt.org>
4512         * iresolve.c (g95_resolve_pack): Don't bother resolving based on type.
4513         (g95_resolve_unpack): Ditto.
4514         * trans-intrinsic.c (g95_conv_intrinsic_merge): New Function.
4515         (g95_conv_intrinsic_function): Use it.  Remove PACK and UNPACK.
4516         (g95_is_intrinsic_libcall): Add PACK and UNPACK.
4518 2003-03-25  Paul Brook  <paul@nowt.org>
4520         * arith.c (g95_unary_user, g95_user): Remove dead functions.
4521         * arith.h: Ditto.
4522         * array.c (g95_free_array_ref): Ditto.
4523         * g95.h: Ditto.
4524         * symbol.c (g95_use_derived_tree): Ditto.
4525         * intrinsic.c (add_functions): Use simplification for SCALE.
4526         * primary.c (g95_match_rvalue): Test sym, not symtree.
4528 2003-03-25  Paul Brook  <paul@nowt.org>
4530         * trans-decl.c (build_function_decl): Add parameter before it gets
4531         turned into a constant.
4532         * iresolve.c (g95_resolve_eoshift): Resolve to a useful name.
4533         * trans-intrinsic.c (g95_is_intrinsic_libcall): Add G95_ISYM_EOSHIFT.
4534         * trans-decl.c (g95_create_module_variable): Don't pushdecl constants.
4536 2003-03-22  Paul Brook  <paul@nowt.org>
4538         * trans-array.c (g95_conv_array_initializer): Allow scalar
4539         expressions.
4540         * trans-decl.c (g95_finish_var_decl): Result variables are not
4541         module variables.
4542         * trans-intrinsic.c (g95_conv_intrinsic_transfer): New function.
4543         (g95_conv_intrinsic_function): Use it.
4544         * trans-types.h (g95_type_spec): Remove dead declaration.
4546 2003-03-21  Paul Brook  <paul@nowt.org>
4548         * trans-decl.c (g95_build_function_decl): Mark string parameters.
4550 2003-03-20  Paul Brook  <paul@nowt.org>
4552         * trans-decl.c (g95_build_function_decl): Put character length
4553         parameters at the end of the function declaration.
4554         * trans-expr.c (g95_conv_function_call): Ditto.
4555         * trans-types.c (g95_get_function_type): Ditto.
4557 2003-03-20  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4559         * resolve.c (resolve_formal_arglist): Don't impose intent for
4560         procedure arguments of pure functions.
4561         (resolve_select): Remove redundant assignment.
4563 2003-03-19  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4565         * arith.c (validate_logical), g95.h, options.c (g95_init_options):
4566         Remove option l1.
4567         * g95.h, intrinsic.c(g95_get_intrinsic_sub_symbol): Add const.
4568         * iresolve.c(g95_resolve_cpu_time, g95_resolve_random_number): Add
4569         const.
4570         * lang-options.h: Remove -finline-repack-arrays. Add -fg77-calls.
4571         Order list.
4572         * symbol.c (g95_add_type): Fix typo in comment.
4575 2003-03-16  Paul Brook  <paul@nowt.org>
4577         * dump-parse-tree.c (g95_show_code_node): Print resolved sym name.
4578         * expr.c (g95_build_call): Remove.
4579         * f95-lang.c (puchdecl_top_level): New function.
4580         * g95.h (g95_code): Store resolved symbol, not just the name.
4581         * intrinsic.c (g95_intrinsic_namespace): New global namespace.
4582         (g95_intirinsic_init_1, g95_intrinsic_done_1): Use it.
4583         (g95_get_intrinsic_sub_symbol): New function.
4584         * iresolve.c (g95_resolve_cpu_time): Use it.
4585         (g95_resolve_random_number): Ditto.
4586         * resolve.c: Set code->resolved_sym instead of code->sub_name.
4587         * trans-decl.c (g95_get_extern_function_decl): Give external decls
4588         the correct DECL_CONTEXT.  Add global symbold to the global scope.
4589         * trans-stmt.c (g95_trans_code): Remove hacks now the fronted is
4590         fixed.
4592 2003-03-16  Paul Brook  <paul@nowt.org>
4594         * g95.h (g95_option_t): Add g77_calls. Remove inline_repack_arrays.
4595         * options.c (g95_parse_arg): Ditto.
4596         * module.c (mio_symbol_attribute): Handle the always_explicit bit.
4597         * resolve.c (resolve_formal_arglist): The always_explicit sould be set
4598         for the procedure, not the parameter.
4599         * trans-array.c (g95_trans_g77_array): New function.
4600         (g95_trans_assumed_size): Use it.
4601         (g95_trans_dummy_array_bias): Ditto.
4602         (g95_conv_array_parameter): Handle g77 arrays. Move existing body ...
4603         (g95_conv_expr_descriptor): ... to here.  Update callers.
4604         * trans-decl.c (g95_build_dummy_array_decl): Handle g77 arrays.
4605         (g95_get_symbol_decl): Avoid processing g77 arrays multiple times.
4606         * trans-expr.c (g95_conv_function_call): Handle g77 arrays.
4607         * trans-intrinsic.c (g95_get_symbol_for_expr): Never use g77 arrays.
4608         * trans-types.c (g95_is_nodesc_array): Handle g77 arrays.
4609         (g95_sym_type): Ditto.
4611 2003-03-15  Paul Brook  <paul@nowt.org>
4613         * trans-array.c (g95_walk_elemental_function_args): Don't amputate the
4614         first chain.
4615         * trans-expr.c (g95_conv_function_call): Use the resolved symbol.
4617 2003-03-14  Paul Brook  <paul@nowt.org>
4619         * trans-array.c (g95_array_is_packed): Remove.
4620         (g95_conv_array_base): Correctly handle all descriptorless cases.
4621         (g95_conv_array_stride): Use descriptorless strides.
4622         (g95_trans_dummy_array_bias): Don't always repack the array.
4623         (g95_build_dummy_array_decl): Automatic dummy arrays are only partial
4624         packed.
4625         * trans-types.c (g95_get_nodesc_array_type): Differentiate between
4626         dummy and non-dummy arrays...
4627         (g95_sym_type, g95_get_derived_type): ... like these.
4628         (g95_get_array_type_bounds): Allow discontiguous arrays.
4630 2003-03-12  Paul Brook  <paul@nowt.org>
4632         * array.c (g95_resolve_array_spec): Fix comment.
4633         * g95.h (symbol_attributes): New flag always_explicit.
4634         * resolve.c (resolve_formal_arglist): Set it always_explicit.
4635         * iresolve.c (g95_resolve_lbound, g95_resolve_ubound): Simplify.
4636         * trans-array.c (g95_conv_descriptor_dimension): Remove dead assert.
4637         (g95_trans_array_bounds): Allow assumed shape arrays.
4638         (g95_trans_repack_array): Remove.
4639         (g95_trans_dummy_array_bias): Rewite to use descriptorless arrays.
4640         * trans-decl.c (g95_build_qualified_array): Only ignore absent
4641         bounds for assumed size arrays.
4642         (g95_build_dummy_array_decl): Use descriptorless arrays.
4643         * trans-expr.c (g95_conv_expr_present): Allow descriptorless arrays.
4644         (g95_trans_pointer_assign): Fix typo.
4645         * trans-intrinsic.c (g95_conv_intrinsic_function_args): Remove dead
4646         code.
4647         (g95_conv_intrinsic_bound): Rewrite to handle descriptorless arrays.
4648         * trans-types.c (g95_get_nodesc_array_type): Allow non-packed arrays.
4649         Also modify callers.
4650         * trans-types.h (g95_get_nodesc_array_type): Modify prototype.
4652 2003-03-08  Paul Brook  <paul@nowt.org>
4654         * trans-array.c (g95_walk_elemental_functions): Don't reverse the SS.
4655         (g95_conv_array_ubound): Provide dummy value for assumed size arrays.
4656         * resolve.c (compare_spec_to_ref): Allow full array sections.
4658 2003-03-08  Paul Brook  <paul@nowt.org>
4660         * expr.c (g95_simplify_expr): Also simplify array index and
4661         substring expressions.
4662         * resolve.c (compare_spec_to_ref): Check for assumed size bounds.
4663         * trans-array.c (g95_trans_array_bounds): New function.
4664         (g95_trans_auto_array_allocation): Use it.
4665         (g95_trans_assumed_size): Rewrite.
4666         * trans-decl.c (gfor_fndecl_in_pack, gfor_fndecl_in_unpack): Declare.
4667         (gfor_fndecl_repack): Remove.
4668         (g95_build_qualified_array): Handle absent upper bounds.
4669         (g95_build_dummy_array_decl): Assumed shape arrays are descriptorless.
4670         (g95_get_symbol_decl): Update.
4671         (g95_build_intrinsic_function_decls): Initialize new decls.
4672         * trans.h (gfor_fndecl_in_pack, gfor_fndecl_in_unpack): Declare.
4673         (gfor_fndecl_repack): Remove.
4674         * trans-io.c (g95_build_io_library_fndecls): Correct prototypes.
4675         * trans-types.c: (g95_build_array_type): Merge duplicated code..
4676         (g95_get_nodesc_array_type): Handle absent bounds.
4677         * trans-types.h (g95_get_nodesc_array_type): Declare.
4679 2003-03-04  Paul Brook  <paul@nowt.org>
4681         * f95-lang.c (DEF_FUNCTION_TYPE_VAR_3): Define before including
4682         builtin-types.def.
4684 2003-03-02  Paul Brook  <paul@nowt.org>
4686         * options.c (g95_init_options): Drfault to 1.
4687         (g95_pasrse_arg): Add -frepack-arrays, use strcmp.
4688         * trans-array.c (g95_conv_array_data, g95_conv_array_base,
4689         g95_conv_array_stride,g95_conv_array_lbound, g95_conv_array_ubound):
4690         Handle non-constant size automatic arrays.
4691         (g95_conv_section_upper_bound, g95_conv_section_startstride): Use
4692         generic bound functions.
4693         (g95_trans_auto_array_allocation): Don't create a descriptor.
4694         (g95_trans_assumed_size): New function (broken).
4695         (g95_trans_dummy_array_bias): Remove unused var.
4696         * trans-array.h (g95_trans_assumed_size): Declare.
4697         * trans-decl.c (create_index_var): New fuction.
4698         (g95_build_qualified_array): New function.
4699         (g95_get_symbol_decl): Use it.
4700         (g95_trans_deferred_vars): Handle assumed shape seperately.
4701         * trans-types.c (get_element_type): Handle heap allocated arrays.
4702         (g95_is_nodesc_array): Include non-const size arrays.
4703         (g95_get_nodesc_array_type): Ditto.
4705 2003-02-23  Paul Brook  <paul@nowt.org>
4707         * trans-array.c (g95_array_init_size): Should use stride, not size of
4708         last dimension.
4710 2003-02-18  Paul Brook  <paul@nowt.org>
4712         * trans-expr.c (g95_trans_arrayfunc_assign): Nove elemental check
4713         after intrinsic function check.
4715 2003-02-18  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4717         * io.c (match_io): Fix missing return value and remove useless
4718         assignment.
4719         * match.c (g95_match): Remove useless assignment.
4720         * module.c (parse_string):  Remove useless post increment.
4721         * simplify.c (g95_simplify_verify): Remove useless assignment.
4723 2003-02-15  Paul Brook  <paul@nowt.org>
4725         * expr.c (restricted_intrinsic): Handle bad values gracefully.
4726         * g95.h (symbol_attribute): Add referenced member.
4727         (g95_symbol): Add dummy_order member.
4728         (g95_set_sym_referenced): Declare.
4729         * match.c (g95_match_assignment, g95_match_call): Use it
4730         * primary.c (match_actual_arg, g95_match_rvalue,
4731         g95_match_variable): Ditto.
4732         * symbol.c (next_dummy_order): New variable.
4733         (g95_set_sym_referenced): New function.
4734         (check_done): New function.
4735         (g95_add_*): Use it.
4736         * trans-decl.c: Make formatting conform to GCC standards.
4737         (g95_defer_symbol_init): Add dummy variables in the right order.
4738         (g95_get_symbol_decl): Only accept referenced variables.
4739         (g95_create_module_variable): Module variables are always required.
4740         (generatr_local_decls): New function.
4741         (generate_local_vars): New function.
4742         (g95_generate_function_code): Use it.
4744 2003-02-13  Paul Brook  <paul@nowt.org>
4746         * trans-decl.c (g95_conv_struct_cons): Remove.
4747         (g95_get_symbol_decl): Use g95_conv_expr for structure initializers.
4748         * trans-expr.c (g95_conv_structure): New function.
4749         (g95_conv_expr): Use it.
4751 2003-02-09  Paul Brook  <paul@nowt.org>
4753         * trans-array.c (g95_array_init_size): Don't evaluate the linit
4754         expressions multiple times.
4755         (g95_trans_auto_arry_allocation): Use pointer not tmp.
4757 2003-02-08  Paul Brook  <paul@nowt.org>
4759         * module.c (mio_symtree_ref): Declare as static.
4760         (mio_expr): Remove dead code.
4761         (read_module): Set the symtree link for fixups.
4762         * trans-intrinsic.c (g95_conv_intrinsic_round): Rename...
4763         (build_round_expr): ... to this.
4764         (g95_conv_intrinsic_aint): New function.
4765         (g95_conv_intrinsic_function): Use it.
4767 2003-02-08  Paul Brook  <paul@nowt.org>
4769         * trans-array.c (g95_trans_array_constructor_value): Use the acutal
4770         offset after modificaton, not the increment expression.
4771         * dependency.c: Kill excess whitespace.
4773 2003-02-07  Sanjiv Gupta  <sanjivg@noida.hcltech.com>
4775         * dependency.h: Remove some function declarations.
4776         * dependency.c (get_no_of_elements): Change this function not to
4777         return int.
4778         * other: Add comments for all modified functions.
4780 2003-02-06  Paul Brook  <paul@nowt.org>
4782         * g95spec.c (lang_specific_functions): Fix initializer warning.
4783         * dump-parse-tree.c (g95_show_expr): Use typespec instead of symtree
4784         for structure type names.
4785         * trans-decl.c (g95_cons_structure_cons): New function.
4786         (g95_get_symbol_decl): Use it.
4787         * trans-expr.c (g95_conv_component_ref): Remove duplicate pointer
4788         referencing code.
4790 2003-02-06  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4792         * resolve.c (compare_cases): Add const to casts.
4794 2003-01-30  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4796         * g95.h (g95_check_f): Change a1 to f1m.
4797         * intrinsic.c (add_sym_1m, check_specific,
4798         g95_intrinsic_func_interface): Use it.
4800         * module.c (init_pi_tree): Remove useless cast.
4801         (fp2): Fix argument type.
4803         * parse.c (parse_select_block): Add comment.
4805 2003-02-05  Toon Moene  <toon@moene.indiv.nluug.nl>
4807         * lang-options.h: Fix warning involving C90 concatenated
4808         strings.
4810 2003-02-06  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4811             Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4813         * io.c (format_asterisk): Complete initializer to kill warning.
4814         * arith.c (DEF_G95_INTEGER_KIND, DEF_G95_LOGICAL_KIND,
4815         DEF_G95_REAL_KIND, MPZ_NULL, MPF_NULL): New #defines.
4816         (g95_integer_kinds, g95_logical_kinds, g95_real_kinds): Use the
4817         new defines to complete initializers.  Kills all warnings.
4819         * Make-lang.in: Comment cleanup.
4821 2003-02-05  Paul Brook  <paul@nowt.org>
4823         * array.c (g95_free_constructor): Handle NULL expressions.
4824         * resolve.c (resolve_structure_cons): Ditto.
4825         * decl.c (g95_match_null): New Function.
4826         (variable_decl): Use it.
4827         * module.c (mio_expr): Don't bother saving symtree for EXPR_STRUCTURE.
4828         * primary.c (g95_match_runtime): Don't use symtree for EXPR_STRUCTURE.
4829         * trans-types.c (g95_set_decl_attributes): Remove empty function.
4831 2003-02-05  Paul Brook  <paul@nowt.org>
4833         * trans.h (build1_v): New macro.
4834         (build_v): Remove pointless and incorrect prototype.
4835         * various: Use build1_v for GOTO_EXPR and LABEL_EXPRs.
4836         * f95-lang.c (g95_init_builtin_decls): DEF_BUILTIN takes 10 args.
4838 2003-02-01  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4840         * Make-lang.in (F95_OBJS): Remove one more dead file.
4842 2003-02-01  Paul Brook  <paul@nowt.org>
4844         * lang-specs.h: Don't pass -ffixed-form to the linker.
4845         * trans-decl.c (g95_generate_function_code): Clear saved decl chain.
4847 2003-02-01  Paul Brook  <paul@nowt.org>
4849         * Make-lang.in (F95_OBJS): Remove dead files.
4850         * trans-array.c (g95_array_init_size): Do the right thing when
4851         ubound=NULL.
4852         * trans-decl.c (g95_generate_function_code): Initialize deffered
4853         symbol list before translating contained subroutines.
4854         * trans-expr.c (g95_conv_expr, g95_conv_expr_reference): Substitute
4855         scalar invariant values here...
4856         (g95_conv_variable, g95_conv_function_call): ... instead of here ...
4857         * trans-intrinsic.c (g95_conv_intrinsic_function_args): .. and here.
4859 2003-01-29  Paul Brook  <paul@nowt.org>
4861         * trans-array.c (g95_add_loop_code): Put pre code in the right block.
4862         (g95_walk_elemental_function_args): Reverse chains before adding.
4863         (g95_reverse_ss): Move about a bit.
4864         * trans-expr.c (g95_conv_function_call): Handle scalar intrinsic
4865         function arguments.
4867 2003-01-28  Paul Brook  <paul@nowt.org>
4869         * intrinsic.c (resolve_intrinsic): Use correct union member.
4870         * trans-array.c (g95_trans_dummy_array_bias): Don't touch absent
4871         parameters.
4872         * trans-decl.c (g95_get_symbol_decl): Don't translate initializers for
4873         use associated variables.
4874         * trans-intrinsic.c (g95_conv_intrinsic_present): Move body ...
4875         * trans-expr.c (g95_conv_expr_present): ... to here.
4876         * trans.h: Declare it.
4877         * trans-types.c (g95_sym_type): Assume subroutine if not specified.
4879 2003-01-28  Arnaud Desitter  <arnaud.desitter@geography.oxford.ac.uk>
4881         * array.c (expand_iterator): Suppress useless assignment.
4882         * decl.c (match_char_spec): Ditto.
4883         * io.c (match_io_iterator): Ditto.
4884         * primary.c (match_real_constant): Ditto.
4885         * interface.c (fold_unary, g95_free_interface, g95_extend_expr):
4886         Ditto.  Also, use g95_intrinsic_op not int for intrinsic operators.
4887         * matchexp.c (match_add_operand, match_level_5): Likewise.
4888         * module.c (parse_atom, find_enum): Likewise.
4889         * resolve.c: move #include <string.h>
4890         (resolve_select): Fix serious typo.
4892 2003-01-28  Steven Bosscher  <s.bosscher@student.tudelft.n>
4894         * Make-lang.in: Don't build with broken tree-ssa-pre.
4896 2003-01-28  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4898         * resolve.c (resolve_index): Add a TODO.
4899         * symbol.c: Remove useless "#include <ctype.h>".
4901 2003-01-27  Paul Brook  <paul@nowt.org>
4903         * check.c (check_rest): Allow different type kinds as an extension.
4904         * g95.h (g95_resolve_f): Add f1m.
4905         * intrinsic.c (add_sym_1m, resolve_intrinsic): Use it.
4906         * intrinsic.h: Chenge prototypes for MIN and MAX.
4907         * iresolve.c (g95_resolve_minmax): New function.
4908         (g95_resolve_min, g95_resolve_max): Use it.
4909         * trans-intrinsic.c (g95_trans_intrinsic_minmax): Only evaluate
4910         arguments once.
4911         (g95_conv_intrinsic_present): Fix logic.
4913 2003-01-27  Steven Bossche  <s.bosscher@student.tudelft.nl>
4915         * g95.h (g95_case): Don't be a tree, be a double linked list.
4916         * match.c (match_case_selector): Remove redundant semantics check.
4917         Clean up a few goto's to make it a tiny little bit faster.
4918         * resolve.c (case_tree): Die.
4919         (compare_cases): Accept and compare unbounded cases too.
4920         (check_case_overlap): Don't build a tree.  Instead, merge-sort the
4921         whole list of g95_cases passed from resolve_select.
4922         (sane_logical_select): Die.
4923         (check_case_expr): Return FAILURE if a CASE label is of the wrong
4924         type kind.
4925         (resolve_select): Fixup case expression for computed GOTOs, put it
4926         in expr, not expr2, for easier handing in the parse tree dumper and
4927         the code generator.  Rewrite the rest of the function: Kill
4928         unreachable case labels and unreachable case blocks.
4929         * dump-parse-tree.c (g95_show_code_node): Always dump expr for
4930         an EXEC_SELECT, not case2 anymore.
4931         * trans-const.c (g95_conv_constant_to_tree): New function.
4932         (g95_conv_constant): Use it.
4933         * trans-const.h: Declare prototype for the new function.
4934         * trans-stmt.c (g95_trans_integer_select, g95_trans_logical_select,
4935         g95_trans_character_select): New static functions.
4936         (g95_trans_select): Rewrite.
4938 2003-01-26  Paul Brook  <paul@nowt.org>
4940         * intrinsic.c (add_fnctions): Properly add dreal.
4941         * trans-intrinsic.c (g95_conv_intrinsic_present): New function.
4942         (g95_conv_intrinsic_function): Use it.
4943         * trans-io.c (build_dt): Abort on internal files (unimplemented).
4945 2003-01-26  Paul Brook  <paul@nowt.org>
4947         Widespread changes to the handling of symbols in expressions.  These
4948         are now linked via g95_symtree nodes.
4949         * parse.c (g95_fixup_sibling symbols): New function.
4950         (parse_contained): Use it.
4951         * g95.h (symbol_attribute): Add contained.  Indicates a symbol is a
4952         contained procedure that has bee correctly fixed up.
4953         (g95_code, g95_expr): Point to a g95_symtree, not a g95_symbol.
4955 2003-01-24  Paul Brook  <paul@nowt.org>
4957         * trans-array.c (g95_walk_expr): Function result attributes are in
4958         sym->result.
4959         * trans-expr.c (g95_conv_function_call,
4960         g95_trans_arrayfunc_assign): Ditto.
4961         * trans-decl.c (g95_get_symbol_for_expr): Set sym->result.
4963 2003-01-23  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4965         * expr.c (check_restricted): Fix error message.
4966         * symbol.c (free_st_labels): Plug memleak.
4968 2003-01-22  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4970         * arith.c (reduce_unary, reduce_binary_ac, reduce_binary_ca,
4971         reduce_binary_aa, reduce_binary, eval_intrinsic,
4972         eval_intrinsic_f2): Use typesafe prototypes for eval functions.
4973         * g95.h (g95_check_f, g95_simplify_f, g95_resolve_f): New unions
4974         for typesafe intrinsics helper functions.
4975         (g95_intrinsic_sym): Use them.
4976         * intrinsic.c (do_check, add_sym, add_sym_0, add_sym_1,
4977         add_sym_1s, add_sym_1m, add_sym_2, add_sym_3, add_sym_4,
4978         add_sym_5, add_conv, resolve_intrinsic, do_simplify,
4979         check_specific, g95_intrinsic_func_interface,
4980         g95_intrinsic_sub_interface): Adjust all calls to intrinsics
4981         helper functions.
4982         * trans-decl.c (g95_get_extern_function_decl): Likewise.
4983         * Make-lang.in: Don't disable warnings for strict prototypes
4984         any longer, everything is typesafe now.
4986 2003-01-22  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4988         * bbt.c (duplicate_node): Make static.
4989         * module.c (module_name): Make static.
4990         * scanner.c (include_dirs): Make static.
4992 2003-01-20  Steven Bosscher  <s.bosscher@student.tudelft.nl>
4994         Hard coded _gfor_'s should not show up anymore.
4995         * g95.h (PREFIX): New macro.
4996         * iresolve.c (g95_resolve_cpu_time): Use PREFIX, not
4997         hard-coded "_gfor".
4998         (g95_resolve_random_number): Likewise.
4999         * trans-decl.c (g95_build_intrinsic_function_decls): Likewise.
5000         * trans-io.c: Remove 'prefix' macro.  Replace all uses with
5001         the new PREFIX macro from g95.h.
5003 2003-01-20  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5005         The troubles of forking... Andy implemented this just now too.
5006         Let's stick to that and keep the trees close.
5007         * g95.h (g95_st_label): 'format' member is now a g95_expr.
5008         * io.c: Revert previous changes.
5009         (g95_match_format): Match the format string as a character
5010         literal expression.
5011         * match.h (g95_statement_label): Declare external.
5012         * parse.c: Revert previous changes.
5013         * symbol.c (g95_free_st_label): Free a g95_expr instead
5014         if a 'char *'.
5015         * trans-io.c: Revert previous changes.
5016         (build_dt): Use set_string to set the format string.
5018 2003-01-20  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5020         * io.c (format_string): Make non-static.
5021         (g95_match_format): Remember the format string.
5022         (terminate_io): Add I/O termination for empty I/O lists.
5023         * match.h: Declare external format_string.
5024         * parse.c (check_statement_label): Attack the format string
5025         to a format label for FORMAT statements.
5026         * trans-io.c (g95_add_field): Define prefix macro.  Replace
5027         all uses of PREFIX define with a use of this macro.
5028         (build_dt): Implement formatted I/O for format labels.
5030 2003-01-20  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5032         * lang-options.h: Kill "-std=F".
5033         * options.c: Remove unimplemented "-std=F".  Modify
5034         web address.
5035         * misc.c (g95_terminal_width): New function.
5036         * error.c (g95_error_init_1): Use g95_terminal_width.
5037         * g95.h: Add prototype for g95_terminal_width, remove
5038         fmode flag.
5040 2003-01-19  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5042         * Make-lang.in: Fix typo.
5044 2003-01-18  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5046         * g95.h (struct g95_case): Remove unused cruft, new member
5047         'where' to keep track of the locus of the default case.
5048         * match.c (g95_match_case): Add locus to the current case.
5049         (match_case_selector): Likewise.
5050         * parse.c (parse_select_block): Move semantics check for
5051         multiple DEFAULT cases out of here to...
5052         * resolve.c (check_case_overlap): ...here.  Return sooner
5053         when possible.
5054         (check_case_expr): Take two g95_cases now, use to sure the
5055         expression kinds are the same.
5056         (resolve_select): Cleanup.
5058 2003-01-18  Paul Brook  <paul@nowt.org>
5060         * trans-io.c: Fix typos in ported IO work (set_fla[tg]).
5061         * trans-decl.c (g95_set_symbol_decl): Handle non-array result
5062         variables.
5063         (g95_get_extern_function_decl): Put decls in the correct context.
5065 2003-01-18  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5067         * trans-io.c: Port changes from Andy to set ERR flag.
5069 2003-01-17  Paul Brook  <paul@nowt.org>
5071         * trans-array.c: Add various comments.
5072         (g95_ss_terminator): Declare as const.
5073         (g95_walk_expr): Remove first parameter and update all callers.
5074         (g95_walk_op_expr): Initialize scalar SS properly.
5075         * trans-array.h (g95_walk_expr): Update prototype.
5076         * trans-expr.c: Update for new g95_walk_expr.
5077         * trans-intrinsic.c: Ditto.
5078         * trans-io.c: Ditto.
5079         * trans.h: Various comments for SS chains.
5081 2003-01-17  Paul Brook  <paul@nowt.org>
5083         * intrinsic.h (g95_generic_isym_id): Add G95_ISYM_S?_KIND, SPACING
5084         and RRSPACING.
5085         * intrinsic.c (add_functions): Use them.
5086         * trans-intrinsic.c (g95_conv_intrinsic_function): Ditto.
5087         * trans-expr.c (g95_conv_expr_lhs): Abort on impossible error.
5089 2003-01-17  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5091         Fallout of a small merge conflict:
5092         * intrinsic.c: Un-revert lost patch (G95_ISYM_SCALE).
5094 2003-01-17  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5096         * initrinsic.c: New add_sym_* functions for strong typing.
5097         (add_conv): Make prototype strict.
5098         * dump-parse-tree.c, dependency.c: Include config.h
5099         * resolve.c, trans-io.c: Fix typos.
5101 2003-01-17  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5103         * dump-parse-tree.c (g95_show_code_node): Show the
5104         condition for a computed GOTO that was transformed
5105         to a SELECT CASE construct.
5106         * resolve.c (check_case_overlap): Revert previous switch
5107         to treaps, it was too slow and didn't catch all trouble.
5108         (resolve_symbol): Be more flexible about module procedures.
5109         * symbol.c (check_conflict): Point to relevant section in
5110         the standard for dubious conflict.  Allow procedure
5111         dummy arguments to be optional again.
5112         * trans-io (add_field): Rename to g95_add_field.  Change
5113         all callers.
5114         * trans-stmt (trans_select): Handle unbounded cases for
5115         integer SELECT CASE constructs.  Fix/add more comment.
5117 2003-01-17  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5119         * g95.h: Uses GCC's function attribute macros.
5120         * error.c, module.c, parse.c, g95.h: More function attributes.
5122 2003-01-16  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5123         Forgot a file...
5124         * trans-decl.c (get_label_decl): Use TREE_LINENO instead
5125         of DECL_SOURCE_LINE, and TREE_FILENAME instead of
5126         DECL_SOURCE_FILE.
5128 2003-01-16  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5130         * f95-lang.c (pushdecl): Use TREE_LINENO instead of
5131         DECL_SOURCE_LINE.
5132         * trans.c (g95_trans_code): Use annotate_all_with_file_line
5133         instead of nowdead wrap_all_with_wfl.
5135 2003-01-14  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5137         * parse.c (g95_parse_file): In verbose mode, dump the parse tree
5138         before generating code, so we can still see it even if the code
5139         generation phase dies.
5141 2003-01-14  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5143         * decl.c (build_sym): Split out initialization expression parts...
5144         (add_init_expr_to_sym): ...to here.
5145         (variable_decl): Add the symbol following an attribute list to the
5146         symbol tree before parsing the optional initialization expression
5147         if the symbol is not of a derived type.
5148         * primary.c (g95_match_rvalue): Don't assume a symbol always has
5149         a value if it is a PARAMETER.
5151 2003-01-14  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5153         * misc.c: Don't #include <mcheck.h>
5154         * module.c: Ditto.  Kill uses of mtrace, muntrace.  If there
5155         ever was a glibc bug, then either this was never reported to
5156         glibc people, or it has been fixed for so long that there's
5157         no information you can find about it, anywhere.
5159 2003-01-14  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5161         Fix warnings:
5162         * module.c (attr_bits, bt_types, array_spec_types):
5163         Switch 'const' and 'static'.
5164         * iresolve.c (g95_resolve_reshape): Make __resolve0 non-'const'.
5166         GNU'ify source code:
5167         * trans-io.c: Numerous fixes, one fixed warning and a few
5168         TODO markers so that we don't forget about them.
5170 2003-01-13  Paul Brook  <paul@nowt.org>
5172         * intrinsic.c (add_functions): Add G95_ISYM_SCALE.
5173         * intrinsic.h (g95_generic_isym_id): Remove bogus G95_ISYM_ANINIT.
5174         Add G95_ISYM_SCALE.
5175         * trans-intrinsic.c (g95_conv_intrinsic_function): Ditto
5176         * match.c (g95_match_stop): Fix dumb == -> != error.
5178 2003-01-13  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5180         * dump-parse-tree.c (show_indent): Add line breaks.  This
5181         whole dumping process needs cleanups.
5182         * f95-lang.c (g95_mark_addressable): Fix prototype to match
5183         the langhook.  Fix 'return's accordingly.
5184         * g95-support.h: Adjust prototype.
5185         * g95.h: Add 'no_backend' member to 'g95_option_t' struct.
5186         * lang-options.h: Add '-fsyntax-only'.
5187         * options.c (g95_init_options): Init 'no_backend'.
5188         (g95_parse_arg): Deal with '-fsyntax-only'.
5189         * parse.c (g95_parse_file): Do not generate code if 'no_backend'
5190         is set.
5192 2003-01-13  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5193         Patch from Arnaud
5194         * resolve.c (resolve_symbol): Assumed shape arrays must be dummy
5195         arguments.  Also make sure that if a symbol is marked INTRINSIC,
5196         an intrinsic with the symbol's name actually exists.
5197         (check_conflict): Make EXTERNAL and DIMENSION attributes conflict.
5198         Do not allow PROCEDURES to have the SAVE, POINTER, TARGET,
5199         ALLOCATABLE, RESULT, IN_NAMESPACE, OPTIONAL or FUNCTION attribute.
5201 2003-01-13  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5203         * resolve.c (resolve_contained_functions): Fix condition, don't
5204         throw internal_error if a child namespace has no name.  Apparently
5205         this can be the case?
5207 2003-01-11  Paul Brook  <paul@nowt.org>
5209         Port changes from Andy's tree:
5210         * g95.h (g95_code): Add stop_code.
5211         * match.c (g95_match_stop): Detter syntax checking.
5212         * resolve.c (resolve_generic_f0): Return match type.
5213         (resolve_generic_f): Remove dead/duplicated code.
5214         (resolve_specific_f): Ditto.
5215         * dump-parse-tree.c (g95_show_code_node): Handle new STOP format.
5216         * trans-decl.c (gfor_fndel_stop_*): New fndecl nodes.
5217         * trans-stmt.c (g95_trans_stop): Handle new STOP format.
5219 2003-01-11  Paul Brook  <paul@nowt.org>
5221         * trans-array.c: Various documentation/comment changes.
5222         * trans-stmt.c: Ditto.
5225 2003-01-10  Paul Brook  <paul@nowt.org>
5227         * options.c/h: Add -fdump-parse-tree as alias of -v.
5229 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5231         * dump-parse-tree.c (g95_show_namespace): Fixed another
5232         typo.  Sorry, it's Friday...
5234 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5236         Spotted by Tobi:
5237         * trans-array.c, trans-array.h, trans.c, trans-const.c,
5238         trans-const.h, trans-decl.c, trans-expr.c, trans.h
5239         trans-intrinsic.c, trans-io.c, trans-stmt.c, trans-stmt.h
5240         trans-types.c: Fix bogus copyright years, add 2003.
5241         * trans-types.h: Give copyright header.
5243 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5245         * dump-parse-tree.c (g95_show_namespace): Fixed typo.
5246         * expr.c, options.c, scanner.c: Add some more 'const' markers.
5247         * intrinsic.c: Some constant strings moved to read-only memory.
5248         * io.c (format_asterisk): Move to...
5249         * g95.h: ...here.
5251 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5253         * dump-parse-tree.c (g95_show_namespace): Dump implicit
5254         types for ranges instead of per-letter.  Indent the
5255         'CONTAINS' just like everything else.
5256         * resolve.c (resolve_contained_functions): Clarify comment.
5257         Explain non-obvious conditional expression.  Improve
5258         diagnostics if tyoe cannot be resolved.
5259         Port semi-fix from Andy's tree:
5260         (was_declared): Move up before first use.
5261         (generic_sym, specific_sym): New functions.  Code moved
5262         out if procedure_kind.
5263         (procedure_kind): Simplify using new functions.
5264         (resolve_generic_f): Make sure the functions we find in
5265         a parent namespace is generic.
5266         (resolve_specific_f): Ditto for specific functions.
5268 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5270         * trans-stmt.c, trans.c: Fix some code style issues. Add
5271         some more comment (but still not enough!).
5273 2003-01-10  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5275         * symbol.c (flavors, procedures, intents, acces_types,
5276         access_types, ifsrc_types): Make const.
5277         * misc.c (g95_string2code): Make 'm' param 'const'.
5278         * module.c (find_enum, write_atom, mio_name): Make
5279         'm' param 'const'.
5280         (attr_bits, bt_types, array_spec_types, array_ref_types,
5281         ref_types, expr_types): Make const.
5282         * g95.h: Adjust external decls.
5284 2003-01-09  Paul Brook  <paul@nowt.org>
5286         * Testsuite: Add a load of new cases.
5288 2003-01-08  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5290         * Make-file.in: Add dependency on back end header files;
5291         a parallel build should work now.
5292         * f95-lang-c (lang_identifier): Remove bogus comment.
5293         (g95_be_parse_file): Fix prototype.
5294         (g95_init): Make static.
5295         (g95_finish): Make static.
5296         * error.c (g95_syntax_error): Kill. Make define in...
5297         * g95.h (g95_syntax_error): Define.
5298         (g95.options): Make 'source' member 'const'.
5299         * interface.c (g95_match_interface): Explain
5300         hard-to-read condition.
5301         (g95_match_end_interface): Ditto.
5302         * trans_const.c (g95_build_string_const): Make 's' parameter
5303         'const'.
5304         * trans_const.h: Adjust protoype accordingly.
5305         * trans-decl.c: Include tree-dump.h
5306         (g95_generate_function_code): Build fixes for recent changes
5307         in the tree-ssa branch.
5309 2003-01-08  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5311         * format.c: Kill, move code from here...
5312         * io.c: ...to here.
5313         * Make-lang.in: Adjust.
5314         * MANIFEST: Ditto.
5315         * match.h: Ditto.
5316         * BUGS: Mention where to submit bugs.  Move old content...
5317         * TODO: ...to here.  New file.
5319 2003-01-08  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5320         Fix most warnings, and suppress the ones we can't fix for now.
5321         * Make-lang.in: Suppress warnings about bad proto's in g95.h,
5322         these warnings just clutter the screen and there's not much
5323         we can do about them for now anyway.
5324         * check.c, iresolve.c: Mark unused function parameters.
5325         * dump-parse-tree.c (g95_show_array_spec): Punt on AS_UNKNOWN,
5326         they should be resolved before they get here.
5327         * error.c: Remove unused FILE *status_out.
5328         * f95-lang.c (g95_init): Remove bogus cast.
5329         * Many files: Make things 'const' where required.
5330         * g95.h: Fix prototypes for all modified functions above.
5331         (g95_options): Remove 'object' member.
5333 2003-01-07  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5335         * Make-file.in: Cleanup bogus targets.  Add more comment.
5336         * lang-options.h: New option '-w'.
5337         * g95.h: add no_options field to struct g95_options.
5338         * options.c (g95_init_options): Default no_warnings to off.
5339         (g95_parse_arg): Recognise the '-w' switch and its alias,
5340         '-fno-warnings'.
5341         * error.c (g95_warning, g95_warning_now): Don't emit warning if
5342         no_warning option is set.
5343         * iresolve.c (g95_resolve_shape): Fix warning.
5345 2003-01-07  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5347         * primary.c (g95_next_string_char): Rename next_string_char, and
5348         make static.  Adjust callers accordingly.
5349         * resolve.c (resolve_generic_f0): Return try, not match.  Adjust
5350         callers accordingly.
5351         * g95.h: Split out all g95_match* functions to...
5352         * match.h: ...here. New file.
5353         * array.c, decl.c, expr.c, format.c, interface.c, io.c, match.c,
5354         matchexp.c, module.c, parse.c, primary.c: Inlcude match.h
5356 2003-01-07  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5358         * symbol.c (g95_clear_new_implicit, g95_add_new_implicit_range,
5359         g95_merge_new_implicit): New functions.
5360         (g95_match_implicit_none, g95_match_implicit): Move from here...
5361         * match.c (g95_match_implicit_none, g95_match_implicit): ... to here.
5362         Modify to use the new functions in symbol.c.
5363         * g95.h: Add and move prototypes.
5365 2003-01-06  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5367         * bbt.c (insert): Use a typedef'ed compare_fn prototype for the
5368         node compare function.
5369         (g95_insert_bbt): Likewise.
5370         (g95_insert_bbt_with_overlap): Likewise.
5371         (g95_delete_bbt): Likewise.
5372         (delete_treap): Likewise. Also fix a potential bug when calling it.
5373         * module.c (compare_pointers): Change proto to compare_fn.
5374         (compare_integers): Likewise.
5375         (compare_true_names): Likewise.
5376         (find_true_name): Adjust call to compare_true_names to match proto.
5377         (require_atom, write_atom, mio_name): Fix 'const' warnings.
5378         (init_pi_tree): Make compare a compare_fn instead of (int *).
5379         * resolve.c (compare_cases): Change proto to compare_fn.
5380         * symbol.c (g95_compare_symtree): Change proto to compare_fn, make
5381         it static, and rename to compare_symtree.
5382         (delete_symtree, g95_undo_symbols, g95_new_symtree): Use renamed
5383         function.
5384         * g95.h: Kill g95_compare_symtree prototype. Adjust prototypes
5385         of g95_insert_bbt, g95_insert_bbt_with_overlap, and g95_delete_bbt.
5387 2003-01-06  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5388         * Make-lang.in: Fix spaces/tabs issues from previous patch.
5389         * patch.options: Blow away Paul's checkin mistake :-)
5390         * io.c (terminate_io): Fix memory leak (Arnaud).
5392 2003-01-06  Steven Bosscher  <s.bosscher@student.tudelft.nl>
5394         * Make-lang.in: Teach about building DVI, info manual.
5395         * g95.texi: New file.
5397 2003-01-02  Paul Brook  <paul@nowt.org>
5399         * trans-array.c (g95_reverse_ss): Make static and don't use.
5400         (g95_conv_ss_descriptor): Don't use g95_loopinfo
5401         (g95_conv_array_parameters): Modify for pointer assignments.
5402         (g95_walk_subexpr): New function.
5403         (g95_walk_expr*): Use it.
5404         * trans-array.h (g95_reverse_ss): Remove prototype.
5405         * trans-expr.c (g95_trans_pointer_assign): Implement.
5406         (Many): Set se.want_pointer before calling g95_conv_array_parameter.
5407         * trans-intrinsic.c: Sync with scalarizer changes.
5408         * trans-io.c: Ditto.
5410 2002-12-29  Paul Brook  <paul@nowt.org>
5412         * trans-array.c: Document calling convention for arrays.
5414 2002-12-19  Paul Brook  <paul@nowt.org>
5416         * trans-intrinsic.c (g95_conv_intrsinsic_function): Remove incorrect
5417         assertion. Remove intrinsic subroutine G95_ISYM_* cases. Always pass
5418         optional parameters for some intrinsics.
5419         (g95_is_intrinsic_libcall): Add G95_ISYM_RESHAPE.
5420         * trans-expr.c (g95_conv_function_call): Pass NULL for absent
5421         optional parameters.
5422         * trans.h (g95_se): Add ignore_optional flag.
5424 2002-12-15  Paul Brook  <paul@nowt.org>
5426         * trans-array.c (g95_conv_array_parameter): Fix partial rank sections.
5427         * trans-decl.c (g95_generate_function_code): Use TDI_original.
5429 2002-12-14  Paul Brook  <paul@nowt.org>
5431         * trans-stmt.c (g95_trans_call): Use resolved symbol name.
5433 2002-12-12  Paul Brook  <paul@nowt.org>
5435         * trans-array.c (g95_trans_array_constructor_subarray): Fully
5436         initialize the scalarizer.
5437         (various): Update to new format of g95_expr->value.constructor.
5439 2002-12-08  Paul Brook  <paul@nowt.org>
5441         * trans-array.c (g95_put_offset_into_var): New function.
5442         (g95_trans_array_constructor_subarray): New function.
5443         (g95_trans_array_constructor_value): Use it.
5444         (g95_array_cons_size): Don't abort() on array components.
5446 2002-12-08  Paul Brook  <paul@nowt.org>
5448         * Make-lang.in (F95_ADDITIONAL_OBJS): Remove tree-dchain.o.
5449         * support.c: Update #includes.
5450         (statement_code_p, c_size_in_bytes, s_size_type_node): Remove.
5451         * trans-array.c: Update #includes.
5452         * trans.c: Ditto.
5453         * trans-const.c: Ditto.
5454         * trans-io.c: Ditto.
5455         * trans-types.c: Ditto.
5456         (g95_init_types): Set size_type_node.
5457         * trans-decl.c: Update #includes.
5458         (gfor_fndecl_adjust{l,r}): Declare and initialize.
5459         * trans-stmt.c: Update #includes.
5460         (g95_trans_do_while): Generate LABEL_EXPR, not GOTO_EXPR.
5461         (g95_trans_select): Fix check for unbounded ranges.
5462         * trans-expr.c: Update #includes.
5463         (g95_conv_string_tmp): New function.
5464         (g95_conv_concat_op): Use it.
5465         * trans.h (g95_conv_string_tmp, gfor_fndecl_adjust{l,r}): Declare.
5466         * Trans-intrisic.c: Update #includes.
5467         (g95_conv_intrinsic_strcmp): New function.
5468         (g95_conv_intrinsic_adjust): Ditto.
5469         (g95_conv_intrinsic_function: Use them.
5471 2002-11-30  Paul Brook  <paul@nowt.org>
5473         * trans-array.c (g95_walk_function_expr): Handle non-array return by
5474         reference.
5475         * trans-dec.c (g95_build_function_decl): Handle character return
5476         parammeters.
5477         (g95_get_fake_result_decl): Ditto.
5478         (g95_trans_deferred_vars): Ditto.
5479         * trans-expr.c (g95_conv_function_call): Ditto.
5480         (g95_trans_arrayfunc_assign) Limit to array valued functions.
5481         * trans-intrinsic.c (g95_conv_intrinsic_char): New function.
5482         (g95_conv_intrinsic_function): Use it.
5483         * trans-types.c (g95_sym_type): Handle functions returning strings.
5484         (g95_return_by_reference): Ditto.
5485         (g95_get_function_type): Ditto.
5487 2002-11-18  Paul Brook  <paul@nowt.org>
5489         * trans-stmt.c (g95_trans_if): Fix IF statements when the condition
5490         requires a temporary.
5491         (g95_trans_select): Handle computed gotos.
5492         * trans-types.c (g95_build_array_type): Warn about non-functional
5493         assumed shape arrays.
5494         * trans-expr.c (g95_trans_scalar_assign): Correctly handle post
5495         blocks.
5496         * trans-intrinsic.c (g95_conv_intrinsic_round): New function.
5497         (g95_conv_intrinsic_int): New function.
5498         (g95_conv_intrinsic_mod): New function.
5499         (g95_conv_intrinsic_ichar): New function.
5500         (g95_conv_intrinsic_function): Use them.
5501         (g95_conv_intrinsic_dim): Use g95_evaluate_now.
5503 2002-11-17  Toon Moene  <toon@moene.indiv.nluug.nl>
5505         * trans-types.c (g95_build_array_type): Assumed
5506         sized arrays can have rank > 1.
5507         * trans.c (g95_trans_code): Remove erroneous
5508         warning about CONTINUE.
5509         * trans-expr.c (g95_conv_variable): Remove
5510         erroneous assert.
5512 2002-11-15  Paul Brook  <paul@nowt.org>
5514         * trans-array.c (g95_conv_array_parameter): Check for NULL stride.
5516 2002-10-31  Paul Brook  <paul@nowt.org>
5518         * f95-tree.c: Remove tree copying stuff that's now in gimple.c
5519         * trans-expr.c (g95_conv_component_ref): Handle character string
5520         components.
5521         (g95_conv_string_parameter): Ditto.
5522         * trans-types.c (g95_get_derived_type): Add length decl to caracter
5523         string components.
5525 2002-10-10  Paul Brook  <paul@nowt.org>
5527         * trans-decl.c (gfor_fndecl_size?): Declare and initialize.
5528         * trans-expr.c (g95_conv_function_call): Remove unreliable return value
5529         check.
5530         * trans-intrinsic.c (g95_conv_intrinsic_size): New function.
5531         (g95_conv_intrinsic_function): Handle size and shape intrinsics.
5532         (g95_is_intrinsic_libcall): Add G95_ISYM_SHAPE.
5533         * trans-types.c (pvoid_type_node): Declare and initialize.
5534         * trans-array.c: Fix typo COMPONENT_REF->REF_COMPONENT
5535         (g95_array_allocate): Fix when base==data.
5536         (g95_conv_array_parameter): Correctly handle reduced rank sections.
5537         * trans-io.c (g95_trans_write): Correctly handle string modifiers.
5539 2002-10-09  Paul Brook  <paul@nowt.org>
5541         * (g95_conv_expr_reference): Handle character strings correctly.
5543 2002-10-07  Paul Brook  <paul@nowt.org>
5545         (g95_expand_decl): Rename from f95_expand_decl_stmt and use as
5546         langhook.
5547         * trans-array.c (g95_build_array_initializer): Remove.
5548         (g95_conv_array_initializer): New Function.
5549         (g95_trans_auto_arry_allocation): Cleanup.
5550         (g95_trans_init_character_array): Remove.
5551         * g95spec.c: Link in libgforbegin.
5552         * trans.c (g95_generate_code): Rename main function to MAIN__.
5553         (g95_create_var): New function.
5554         (g95_create_var_np): New function.
5555         (g95_evaluate_now): New function.
5556         (g95_start_block): New function.
5557         (g95_finish_block): New function.
5558         (g95_add_expr_to_block): New function.
5559         (g95_add_block_to_block): New function.
5560         * trans-expr.c (g95_conv_componen_ref): New function.
5561         * Make-lang.in (F95_ADDITIONAL_OBJS): Add gimplify.o.
5562         (F95_OBJS): Add dependency.o.
5563         * f95-lang.c (g95_is_simple_stmt): Remove.
5564         * f95-tree.c (mark_not_simple): New function.
5565         (unshare_all_trees): New function.
5566         (create_tmp_var, create_tmp_alias_var): Remove.
5567         * support.c (declare_tmp_vars, tree_last_decl): Remove.
5568         * trans*: Convert to new IR using GENERIC trees.  Don't bother about
5569         SIMPLE/GIMPLE rules, this is now done by Lang-independant code.
5571 2002-10-01  Paul Brook  <paul@nowt.org>
5573         * trans-array.c: Add support for descriptorless arrays.
5574         (g95_conv_array_data): New function.
5575         (g95_conv_array_base): New function.
5576         * trans-array.h: Declare these here.
5577         * trans-decl.c(g95_create_mopdule_variable): Perform variable
5578         initialization and creation here.
5579         (g95_create_module_vars): Instead of here.
5580         * trans.h (G95_TYPE_ARRAY_*: Rename from G95_TYPE_DESCRIPTOR_*.
5581         * trans-intrinsic.c: Ditto.
5582         * trans-types.c (g95_is_nodesc_array): New function.
5583         (g95_get_nodesc_array_type): New function.
5584         (g95_sym_type, g95_get_derived_type): Use them.
5585         * trans-const.c (g95_conv_mpf_to_tree): Remove workaround.
5587 2002-09-28  Paul Brook  <paul@nowt.org>
5589         * trans-const.c (g95_conv_mpf_to_tree): Work around backend bug.
5590         * trans-intrinsic.c (g95_conv_intrinsic_abs): Correctly detect complex
5591         parameters.
5593 2002-09-24  Paul Brook  <paul@nowt.org>
5595         * f95-lang.c (listify): Remove declaration.
5596         (expand_function_body): Use optimize >=1 instead of flag_tree_saa.
5597         (listify)
5598         * f95-tree.c (get_name): New function.
5599         * trans.c (module_namespace): Remove.
5600         * trans-decl.c: Use g95_chainon_list rather than chainon(listify()).
5601         * trans-types.c: Ditto.
5603 2002-09-19  Paul Brook  <paul@nowt.org>
5605         * trans-array.c (g95_get_array_cons_size): New Function.
5606         (g95_con_ss_startstride): Handle Array constructors.
5607         (g95_conv_loop_setup): Ditto.
5608         (g95_conv_array_parameter): Ditto.
5609         * tras-decl.c (g95_finish_var_decl): Make initializes variables
5610         static.
5612 2002-09-19  Paul Brook  <paul@nowt.org>
5614         * trans.c (g95_simple_fold_tmp): Detect variables inside
5615         NON_LVALUE_EXPR.
5616         * trans-stmt.c (g95_trans_arithmetic_if): Implement this.
5618 2002-09-18  Steven Bosscher <s.bosscher@student.tudelft.nl>
5620         * Make-lang.in (F95_ADDITIONAL_OBJS): Add tree-ssa-dce.o
5622 2002-09-14  Paul Brook  <paul@nowt.org>
5624         * trans.c (g95_create_module_variable): Move to trans-decl.c.
5625         * trans-const.c (g95_conv_string_init): New Function.
5626         * trans-const.h: Declare it.
5627         * trans-decl.c (g95_get_symbol_decl): Handle initializers for static
5628         variables. Don't bail on intrinsic symbols.
5629         (get_extern_function_decl): Handle specific intrinsic functions.
5630         * trans-types.c (g95_sym_type): Dummy functions don't return
5631         reference types.
5632         * trans-array.c (g95_build_array_initializer): New Function.
5633         (g95_trans_auto_array_allocation): Build initializer for static decls.
5634         Don't use mpz_addmul, it's GMP4 only.
5636 2002-09-12  Paul Brook  <paul@nowt.org>
5638         * trans-decl.c (g95_generate_code): Fix thinko with return variable.
5639         (g95_get_extern_function_decl, g95_build_function_decl): Mangle
5640         assembler names for module procedures.
5642 2002-09-11  Tobias Schlueter  <Tobias.Schlueter@physik.uni-muenchen.de>
5644         * trans-array.c,h trans-expr.c, trans-stmt.c: Correct spelling of
5645         dependency/
5647 2002-09-10  Paul Brook  <paul@nowt.org>
5649         * trans-array.c: Change format of G95_SS_TEMP strictures.
5650         (g95_check_fncall_dependancy): New function.
5651         (trans_dummy_array_bias): stride[n], not stride[n-1]. for calculating
5652         offsets.
5653         * trans-decl.c (g95_get_symbol_decl): move assertion after handling of
5654         result variables.
5655         (g95_build_function_decl): Don't assume result arrays are packed.
5656         (g95_trans-deferred-vars): Handle array result variables.
5657         (g95_generate_fuction_code): Clear saved_function_decls.
5658         * trans-expr.c (g95_conv_fnction_call): Handle direct array return by
5659         reference.
5660         (g95_trans_arrayfunc_assign): New function.
5661         (g95_trans_assignment): Use it.
5662         * trans.h (g95_ss): Add temp struct for G95_SS_TEMP.
5663         (g95_se): Add direct_byref.
5664         * trans-types.c: Use sym->result rather than sym where appropriate.
5665         * trans-intrinsic.c (g95_conv_intrinsic_funcall): New function.
5666         Update other functions to use this.
5667         (g95_is_intrinsic_libcall): New function.
5668         (g95_conv_intrinsic_function): Add MATMUL and PRODUCT intrinsics.
5669         (g95_walk_intrinsic_function): Ditto.
5671 2002-09-08  Paul Brook  <paul@nowt.org>
5673         * trans-types.c: Change rank field to dtype field in array descriptor.
5674         * trans-array.c: Implement filling of dtype array descriptor field.
5675         * trans-intrinsic.c: Fix broken LEN intrinsic.
5677 2002-09-07  Paul Brook  <paul@nowt.org>
5679         * trans-intrinsic.c: Remove outdated todo intrinsic list.
5680         (g95_get_symbol_for_expr): Remove hack for fortran based intrinsics.
5681         (g95_walk_intrinsic_function): Add MINLOC and MAXLOC.
5683 2002-09-06  Paul Brook  <paul@nowt.org>
5685         * Make-lang.in (F95_ADDITIONAL_OBJS): Add tree_alias_comon.o.
5686         (gt-f95-trans-types.h): Add dependancy information.
5687         * config-lang.in (gtfiles): Add trans-types.c
5688         * f95-lang.c (g95_be_parse_file): Pass error and warning counts
5689         back to top-level code.
5690         * trans-array.c, trans-types.c: Change format of array descriptor.
5691         (g95_conv_descriptor_dimension): New function.
5692         * trans-types.h (g95_conv_descriptor_rank): define.
5693         * trans-intrinsic.c: Implement PRODUCT, COUNT. MINLOC and MAXLOC
5694         intrinsics.
5696 2002-09-02  Steven Bosscher <s.bosscher@student.tudelft.nl>
5698         * trans-array.c, trans-types.c: Add rank information to descriptor.
5700 2002-09-06  Tobias Schlueter  <Tobias.Schlueter@physik.uni-muenchen.de>
5702         * trans-stmt.c (g95_trans_allocate): Fix when ref==NULL.
5704 2002-09-04  Paul Brook  <paul@nowt.org>
5706         * f95-lang.c (g95_create_decls): New function.
5707         (g95_init):  Move initialization of external decls to above, and call
5708         from g95_be_parse_file.
5709         * trans.c (g95_finish_stmt): Don't amputate the decl chain.
5710         * trans-types.c (g95_init_types): Always name integer and char types.
5711         (g95_get_array_type_bounds): TYPE_NAME may be a TYPE_DECL.
5713 2002-09-02  Steven Bosscher <s.bosscher@student.tudelft.nl>
5715         * Make-lang.in: Add options.c to F95_PARSER_OBJS
5717 2002-09-02  Paul Brook  <paul@nowt.org>
5719         * g95_generate_code: Clear the attr for __fortran_main.
5720         * trans-types.c (g95_finish_type): New function.
5721         * g95_init_io_state_type: Use g95_finish_type.
5722         * g95_conv_intrinsic_anyall: Fix thinko in result initialization.
5724 2002-09-01  Paul Brook  <paul@nowt.org>
5726         * README.backend: Warn about the dangers of extra config.h files.
5727         Remove obsolete libgfor stuff.
5728         * config-lang.in: Add target-libgfor dependancy.
5729         * g95_conv_mpf_to_tree: Use & free allocated buffer p rather than buff.
5731 2002-09-01  Toon Moene  <toon@moene.indiv.nluug.nl>
5733         * g95_conv_mpz_to_tree: Free storage pointed to by q,
5734         not by buff.
5736 2002-08-30  Paul Brook  <paul@nowt.org>
5738         * trans-intrinsic.c (g95_conv_intrinsic_function,
5739         g95_walk_intrinsic_function): Added ANY and ALL.
5740         (g95_conv_intrinsic_anyall): New function.
5741         * iresolve.c (g95_resolve_any, g95_resolve_all): Include rank in
5742         mangled name