OSDN Git Service

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