OSDN Git Service

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