OSDN Git Service

2994acf21891448f46c6435289eaef01d748c5b6
[pf3gnuchains/gcc-fork.git] / gcc / fortran / ChangeLog
1 2009-05-12  Tobias Burnus  <burnus@net-b.de>
2
3         PR fortran/40110
4         * decl.c (gfc_match_kind_spec): Turn C kind error into a warning.
5
6 2009-05-11  Steve Ellcey  <sje@cup.hp.com>
7
8         * resolve.c (check_host_association): Initialize tail.
9
10 2009-05-11  Janus Weil  <janus@gcc.gnu.org>
11
12         PR fortran/40089
13         * resolve.c (resolve_fl_derived): Only return FAILURE if
14         gfc_notify_std fails.
15
16 2009-05-10  Ian Lance Taylor  <iant@google.com>
17
18         * gfortran.h (enum gfc_omp_sched_kind): New enum, broken out of
19         gfc_omp_clauses.
20         (enum gfc_omp_default_sharing): Likewise.
21         * module.c (enum gfc_rsym_state): New enum, broken out of
22         pointer_info.
23         (enum gfc_wsym_state): Likewise.
24         * parse.c (enum state_order): New enum, broken out of st_state.
25
26 2009-05-10  Paul Thomas  <pault@gcc.gnu.org>
27
28         PR fortran/40018
29         * trans-array.c (gfc_trans_array_constructor_value): Fold
30         convert numeric constants.
31         (gfc_build_constant_array_constructor): The same.
32
33 2009-05-10  Paul Thomas  <pault@gcc.gnu.org>
34
35         PR fortran/38863
36         * trans-expr.c (gfc_conv_operator_assign): Remove function.
37         * trans.h : Remove prototype for gfc_conv_operator_assign.
38         * trans-stmt.c (gfc_conv_elemental_dependencies): Initialize
39         derivde types with intent(out).
40         (gfc_trans_call): Add mask, count1 and invert arguments. Add
41         code to use mask for WHERE assignments.
42         (gfc_trans_forall_1): Use new arguments for gfc_trans_call.
43         (gfc_trans_where_assign): The gfc_symbol argument is replaced
44         by the corresponding code. If this has a resolved_sym, then
45         gfc_trans_call is called. The call to gfc_conv_operator_assign
46         is removed.
47         (gfc_trans_where_2): Change the last argument in the call to
48         gfc_trans_where_assign.
49         * trans-stmt.h : Modify prototype for gfc_trans_call.
50         * trans.c (gfc_trans_code): Use new args for gfc_trans_call.
51
52 2009-05-08  Janus Weil  <janus@gcc.gnu.org>
53
54         PR fortran/39876
55         * intrinsic.c (gfc_is_intrinsic): Do not add the EXTERNAL attribute if
56         the symbol is a module procedure.
57
58 2009-05-08  Tobias Burnus  <burnus@net-b.de>
59
60         * invoke.texi: Add do/recursion to the -fcheck= summary.
61
62 2009-05-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
63
64         PR fortran/38830
65         * gfortran.texi: Document that we don't support variable FORMAT
66         expressions.
67
68 2009-05-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
69
70         PR fortran/39576
71         * error.c (error_print): Add missing break statement.
72
73 2009-05-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
74
75         PR fortran/36382
76         * invoke.texi: Document that -fdollar-ok does not allow $ to be
77         used in IMPLICIT statement.
78
79 2009-05-06  Janus Weil  <janus@gcc.gnu.org>
80             Paul Thomas  <pault@gcc.gnu.org>
81
82         PR fortran/39630
83         * decl.c (match_procedure_interface): New function to match the
84         interface for a PROCEDURE statement.
85         (match_procedure_decl): Call match_procedure_interface.
86         (match_ppc_decl): New function to match the declaration of a
87         procedure pointer component.
88         (gfc_match_procedure):  Call match_ppc_decl.
89         (match_binding_attributes): Add new argument 'ppc' and handle the
90         POINTER attribute for procedure pointer components.
91         (match_procedure_in_type,gfc_match_generic): Added new argument to
92         match_binding_attributes.
93         * dump-parse-tree.c (show_expr,show_components,show_code_node): Handle
94         procedure pointer components.
95         * expr.c (free_expr0,gfc_copy_expr,gfc_simplify_expr): Handle EXPR_PPC.
96         (gfc_check_pointer_assign): Handle procedure pointer components, but no
97         full checking yet.
98         (is_proc_ptr_comp): New function to determine if an expression is a
99         procedure pointer component.
100         * gfortran.h (expr_t): Add EXPR_PPC.
101         (symbol_attribute): Add new member 'proc_pointer_comp'.
102         (gfc_component): Add new member 'formal'.
103         (gfc_exec_op): Add EXEC_CALL_PPC.
104         (gfc_get_default_type): Changed first argument.
105         (is_proc_ptr_comp): Add prototype.
106         (gfc_match_varspec): Add new argument.
107         * interface.c (compare_actual_formal): Handle procedure pointer
108         components.
109         * match.c (gfc_match_pointer_assignment,match_typebound_call): Handle
110         procedure pointer components.
111         * module.c (mio_expr): Handle EXPR_PPC.
112         * parse.c (parse_derived): Handle procedure pointer components.
113         * primary.c (gfc_match_varspec): Add new argument 'ppc_arg' and handle
114         procedure pointer components.
115         (gfc_variable_attr): Handle procedure pointer components.
116         (gfc_match_rvalue): Added new argument to gfc_match_varspec and changed
117         first argument of gfc_get_default_type.
118         (match_variable): Added new argument to gfc_match_varspec.
119         * resolve.c (resolve_entries,set_type,resolve_fl_parameter): Changed
120         first argument of gfc_get_default_type.
121         (resolve_structure_cons,resolve_actual_arglist): Handle procedure
122         pointer components.
123         (resolve_ppc_call): New function to resolve a call to a procedure
124         pointer component (subroutine).
125         (resolve_expr_ppc): New function to resolve a call to a procedure
126         pointer component (function).
127         (gfc_resolve_expr): Handle EXPR_PPC.
128         (resolve_code): Handle EXEC_CALL_PPC.
129         (resolve_fl_derived): Copy the interface for a procedure pointer
130         component.
131         (resolve_symbol): Fix overlong line.
132         * st.c (gfc_free_statement): Handle EXEC_CALL_PPC.
133         * symbol.c (gfc_get_default_type): Changed first argument.
134         (gfc_set_default_type): Changed first argument of gfc_get_default_type.
135         (gfc_add_component): Initialize ts.type to BT_UNKNOWN.
136         * trans.h (gfc_conv_function_call): Renamed.
137         * trans.c (gfc_trans_code): Handle EXEC_CALL_PPC.
138         * trans-expr.c (gfc_conv_component_ref): Ditto.
139         (gfc_conv_function_val): Rename to 'conv_function_val', add new
140         argument 'expr' and handle procedure pointer components.
141         (gfc_conv_operator_assign): Renamed gfc_conv_function_val.
142         (gfc_apply_interface_mapping_to_expr): Handle EXPR_PPC.
143         (gfc_conv_function_call): Rename to 'gfc_conv_procedure_call', add new
144         argument 'expr' and handle procedure pointer components.
145         (gfc_get_proc_ptr_comp): New function to get the backend decl for a
146         procedure pointer component.
147         (gfc_conv_function_expr): Renamed gfc_conv_function_call.
148         (gfc_conv_structure): Handle procedure pointer components.
149         * trans-intrinsic.c (gfc_conv_intrinsic_funcall,
150         conv_generic_with_optional_char_arg): Renamed gfc_conv_function_call.
151         * trans-stmt.h (gfc_get_proc_ptr_comp): Add prototype.
152         * trans-stmt.c (gfc_trans_call): Renamed gfc_conv_function_call.
153         * trans-types.h (gfc_get_ppc_type): Add prototype.
154         * trans-types.c (gfc_get_ppc_type): New function to build a tree node
155         for a procedure pointer component.
156         (gfc_get_derived_type): Handle procedure pointer components.
157
158 2009-05-06  Tobias Burnus  <burnus@net-b.de>
159
160         PR fortran/40041
161         * resolve.c (resolve_symbol): Print no warning for implicitly
162         typed intrinsic functions.
163
164 2009-05-05  Janus Weil  <janus@gcc.gnu.org>
165
166         PR fortran/39998
167         * expr.c (gfc_check_pointer_assign): Check for statement functions and
168         internal procedures in procedure pointer assignments.
169
170 2009-04-28  Janus Weil  <janus@gcc.gnu.org>
171
172         PR fortran/39946
173         * resolve.c (resolve_symbol): Correctly copy the interface of a
174         PROCEDURE statement if the interface involves a RESULT variable.
175
176 2009-04-28  Janus Weil  <janus@gcc.gnu.org>
177
178         PR fortran/39930
179         PR fortran/39931
180         * expr.c (gfc_check_pointer_assign): Correctly detect if the left hand
181         side is a pointer.
182         * parse.c (gfc_fixup_sibling_symbols): Don't check for ambiguity.
183
184 2009-04-28  Paul Thomas  <pault@gcc.gnu.org>
185
186         PR fortran/39879
187         * trans_expr.c (gfc_conv_procedure_call): Deep copy a derived
188         type parentheses argument if it is a variable with allocatable
189         components.
190
191 2009-04-27  Ian Lance Taylor  <iant@google.com>
192
193         * trans-intrinsic.c (DEFINE_MATH_BUILTIN): Add casts to enum
194         type.
195         * trans-io.c (st_parameter_field): Add casts to enum type.
196
197 2009-04-26  Steven G. Kargl  <kargl@gcc.gnu.org>
198
199         PR fortran/39893
200         fortran/data.c (gfc_assign_data_value): If the lvalue is an 
201         assumed character length entity in a data statement, then 
202         return FAILURE to prevent segmentation fault.
203
204 2009-04-26  Jakub Jelinek  <jakub@redhat.com>
205
206         * trans-decl.c: Include pointer-set.h.
207         (nonlocal_dummy_decl_pset, tree nonlocal_dummy_decls): New variables.
208         (gfc_nonlocal_dummy_array_decl): New function.
209         (gfc_get_symbol_decl): Call it for non-local dummy args with saved
210         descriptor.
211         (gfc_get_symbol_decl): Set DECL_BY_REFERENCE when needed.
212         (gfc_generate_function_code): Initialize nonlocal_dummy_decl{s,_pset},
213         chain it to outermost block's vars, destroy it afterwards.
214         * Make-lang.in (trans-decl.o): Depend on pointer-set.h.
215
216 2009-04-25  Janus Weil  <janus@gcc.gnu.org>
217
218         PR fortran/39688
219         * decl.c (gfc_match_import): Use 'sym->name' instead of 'name'.
220         They differ if the symbol has been use-renamed.
221
222 2009-04-24  Ian Lance Taylor  <iant@google.com>
223
224         * gfortran.h (enum gfc_symbol_type): New named enum type, broken
225         out of struct gfc_symbol.
226         (struct gfc_symbol): Use enum gfc_symbol_type.
227         (enum gfc_array_ref_dimen_type): New named enum type, broken out
228         of struct gfc_array_ref).
229         (struct gfc_array_ref): Use enum gfc_array_ref_dimen_type.
230         (mod_pointee_as): Update declaration.
231         * decl.c (add_global_entry): Change type to enum gfc_symbol_type.
232         (gfc_mod_pointee_as): Change return type to "match".
233         * module.c (mio_array_ref): Add cast to enum type.
234         (mio_symbol): Likewise.
235         * resolve.c (resolve_global_procedure): Change type to enum
236         gfc_symbol_type.
237         * trans-io.c (gfc_build_st_parameter): Change type to unsigned
238         int.
239
240 2009-04-24  Daniel Kraft  <d@domob.eu>
241
242         * gfortran.h (gfc_get_typebound_proc): Removed as macro, now a function.
243         (struct gfc_symtree): Moved `typebound' member inside union.
244         (struct gfc_namespace): Add `tb_sym_root' as new symtree to sort out
245         type-bound procedures there.
246         (gfc_get_tbp_symtree): New procedure.
247         * symbol.c (tentative_tbp_list): New global.
248         (gfc_get_namespace): NULL new `tb_sym_root' member.
249         (gfc_new_symtree): Removed initialization of `typebound' member.
250         (gfc_undo_symbols): Process list of tentative tbp's.
251         (gfc_commit_symbols): Ditto.
252         (free_tb_tree): New method.
253         (gfc_free_namespace): Call it.
254         (gfc_get_typebound_proc): New method.
255         (gfc_get_tbp_symtree): New method.
256         (gfc_find_typebound_proc): Adapt to structural changes of gfc_symtree
257         and gfc_namespace with regards to tbp's.
258         * dump-parse-tree.c (show_typebound): Ditto.
259         * primary.c (gfc_match_varspec): Ditto.  Don't reference tbp-symbol
260         as it isn't a symbol any longer.
261         * module.c (mio_typebound_symtree): Adapt to changes.
262         (mio_typebound_proc): Ditto, create symtrees using `gfc_get_tbp_symtree'
263         rather than `gfc_get_sym_tree'.
264         (mio_f2k_derived): Ditto.
265         * decl.c (match_procedure_in_type): Ditto.
266         (gfc_match_generic): Ditto.  Don't reference tbp-symbol.
267         * resolve.c (check_typebound_override): Adapt to changes.
268         (resolve_typebound_generic): Ditto.
269         (resolve_typebound_procedures): Ditto.
270         (ensure_not_abstract_walker): Ditto.
271         (ensure_not_abstract): Ditto.
272         (resolve_typebound_procedure): Ditto, ignore erraneous symbols (for
273         instance, through removed tentative ones).
274         * gfc-internals.texi (Type-bound procedures): Document changes.
275
276 2009-04-24  Janus Weil  <janus@gcc.gnu.org>
277
278         PR fortran/39861
279         PR fortran/39864
280         * symbol.c (gfc_copy_formal_args_intr): Set attr.flavor and attr.dummy
281         for the formal arguments.
282
283 2009-04-21  Taras Glek <tglek@mozilla.com>
284
285         * f95-lang.c: Update GTY annotations to new syntax.
286         * trans-intrinsic.c: Likewise.
287         * trans-io.c: Likewise.
288         * trans.h: Likewise.
289
290 2009-04-22  Janus Weil  <janus@gcc.gnu.org>
291
292         PR fortran/39735
293         * decl.c (add_hidden_procptr_result): Bugfix for procptr results.
294         (match_procedure_decl): Set if_source.
295         * expr.c (gfc_check_pointer_assign): Bugfix: Return after error.
296         And: Check interface also for IFSRC_UNKNOWN (return type may be known).
297         * gfortran.h (typedef enum ifsrc): Remove IFSRC_USAGE,
298         add documentation. Rename copy_formal_args and copy_formal_args_intr.
299         * interface.c (gfc_compare_interfaces): Check for return types,
300         handle IFSRC_UNKNOWN.
301         (compare_intr_interfaces,compare_actual_formal_intr): Obsolete, removed.
302         (gfc_procedure_use): Modified handling of intrinsics.
303         * intrinsic.c (add_functions): Bugfix for "dim".
304         * resolve.c (resolve_intrinsic): New function to resolve intrinsics,
305         which copies the interface from isym to sym.
306         (resolve_procedure_expression,resolve_function): Use new function
307         'resolve_intrinsic'.
308         (resolve_symbol): Add function attribute for externals with return type
309         and use new function 'resolve_intrinsic'.
310         * symbol.c (ifsrc_types): Remove string for IFSRC_USAGE.
311         (copy_formal_args): Renamed to gfc_copy_formal_args.
312         (copy_formal_args_intr): Renamed to gfc_copy_formal_args_intr.
313         * trans-const.c (gfc_conv_const_charlen): Handle cl==NULL.
314
315 2009-04-21  Joseph Myers  <joseph@codesourcery.com>
316
317         * ChangeLog, ChangeLog-2002, ChangeLog-2003, ChangeLog-2004,
318         ChangeLog-2005, ChangeLog-2006, ChangeLog-2007, ChangeLog-2008,
319         ChangeLog.ptr, config-lang.in, ioparm.def, mathbuiltins.def: Add
320         copyright and license notices.
321         * ChangeLog, ChangeLog-2005, ChangeLog-2006, ChangeLog-2007,
322         ChangeLog-2008: Correct dates.
323
324 2009-04-20  Tobias Burnus  <burnus@net-b.de>
325
326         PR fortran/39811
327         * scanner.c (load_line): Fix bogus "&" compile-time diagnostic.
328
329 2009-04-20  Paul Thomas  <pault@gcc.gnu.org>
330
331         PR fortran/39800
332         * resolve.c (is_sym_host_assoc): New function.
333         (resolve_fl_derived): Call it when checking PRIVATE components
334         of PUBLIC derived types.  Change gfc_error to a gfc_notify_std
335         with std=f2003.
336         (resolve_fl_namelist): Call it twice to check for host
337         association.
338
339 2009-04-20  Ian Lance Taylor  <iant@google.com>
340
341         * module.c (import_iso_c_binding_module): Add casts to enum type.
342         * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Change op to enum
343         tree_code.
344         (gfc_conv_intrinsic_anyall): Likewise.
345         (gfc_conv_intrinsic_arith): Likewise.
346         (gfc_conv_intrinsic_minmaxloc): Likewise.
347         (gfc_conv_intrinsic_minmaxval): Likewise.
348         (gfc_conv_intrinsic_bitop): Likewise.
349         (gfc_conv_intrinsic_singlebitop): Likewise.
350         (gfc_conv_intrinsic_strcmp): Likewise.
351
352 2009-04-20  Vasilis Liaskovitis  <vliaskov@gmail.com>
353             Jakub Jelinek  <jakub@redhat.com>
354
355         PR fortran/35423
356         * trans.h (OMPWS_WORKSHARE_FLAG, OMPWS_CURR_SINGLEUNIT,
357         OMPWS_SCALARIZER_WS, OMPWS_NOWAIT): Define.
358         (ompws_flags): New extern decl.
359         * trans-array.c (gfc_trans_scalarized_loop_end): Build OMP_FOR
360         for the outer dimension if ompws_flags allow it.
361         * trans.c (gfc_generate_code): Clear ompws_flags.
362         * trans-expr.c (gfc_trans_assignment_1): Allow worksharing
363         array assignments inside of !$omp workshare.
364         * trans-stmt.c (gfc_trans_where_3): Similarly for where statements
365         and constructs.
366         * trans-openmp.c (ompws_flags): New variable.
367         (gfc_trans_omp_workshare): Rewritten.
368
369 2009-04-11  Daniel Kraft  <d@domob.eu>
370
371         PR fortran/37746
372         * gfortran.h (struct gfc_charlen): New field `passed_length' to store
373         the actual passed string length for dummy arguments.
374         * trans-decl.c (gfc_create_string_length): Formatting fixes and added
375         assertion, moved a local variable into the innermost block it is needed.
376         (create_function_arglist): Removed TODO about the check being
377         implemented and initialize cl->passed_length here.
378         (add_argument_checking): New method.
379         (gfc_generate_function_code): Call the argument checking method.
380
381 2009-04-11  Janus Weil  <janus@gcc.gnu.org>
382
383         PR fortran/39692
384         * symbol.c (check_conflict): Reject procedure pointers for -std=f95.
385
386 2009-04-11  Daniel Franke  <franke.daniel@gmail.com>
387
388         * resolve.c (resolve_global_procedure): Enable whole-file checking for
389         procedures that are declared later in the file.
390         
391 2009-04-10  Paolo Bonzini  <bonzini@gnu.org>
392
393         PR middle-end/39701
394         * trans.c (gfc_allocate_with_status): Fix type mismatches
395         on "pstat == 0".
396
397 2009-04-10  Daniel Franke  <franke.daniel@gmail.com>
398
399         PR fortran/38709
400         * expr.c (find_array_section): Leave early on zero-sized arrays.
401
402 2009-04-09  Janus Weil  <janus@gcc.gnu.org>
403
404         PR fortran/36704
405         * decl.c (add_hidden_procptr_result): New function for handling
406         procedure pointer return values by adding a hidden result variable.
407         (variable_decl,match_procedure_decl,gfc_match_function_decl,
408         gfc_match_subroutine,gfc_match_end,attr_decl1): Handle procedure pointer
409         return values.
410         * parse.c (parse_interface): Add EXTERNAL attribute only after
411         FUNCTION/SUBROUTINE declaration is complete.
412         * primary.c (replace_hidden_procptr_result): New function for replacing
413         function symbol by hidden result variable.
414         (gfc_match_rvalue,match_variable): Replace symbol by hidden result
415         variable.
416         * resolve.c (resolve_contained_fntype,resolve_function,resolve_variable,
417         resolve_symbol): Allow for procedure pointer function results.
418         (resolve_fl_procedure): Conflict detection moved here from
419         'check_conflict'.
420         * symbol.c (gfc_check_function_type): Allow for procedure pointer
421         function results.
422         (check_conflict): Move some conflict detection to resolution stage.
423         * trans-types.c (gfc_sym_type,gfc_get_function_type): Handle hidden
424         result variables.
425
426 2009-04-08  Jakub Jelinek  <jakub@redhat.com>
427
428         * trans-types.c (gfc_init_types): Ensure gfc_integer_types doesn't
429         contain TYPE_STRING_FLAG types.
430
431 2009-04-08  Janne Blomqvist  <jb@gcc.gnu.org>
432
433         PR fortran/39670
434         * invoke.texi (fdollar-ok): Fix typo.
435         
436 2009-04-08  Daniel Franke  <franke.daniel@gmail.com>
437
438         PR fortran/39670
439         * invoke.texi (fdollar-ok): Clarify limitations.
440
441 2009-04-08  Paul Thomas  <pault@gcc.gnu.org>
442
443         PR fortran/38863
444         * trans-array.c (gfc_trans_deferred_array): Return if this
445         is a result variable.
446
447 2009-04-07  Janus Weil  <janus@gcc.gnu.org>
448
449         PR fortran/38152
450         * trans-decl.c (gfc_get_symbol_decl): Correctly set decl location for
451         procedure pointer decls.
452
453 2009-04-07  Janus Weil  <janus@gcc.gnu.org>
454
455         PR fortran/38290
456         * expr.c (gfc_check_pointer_assign): Enable interface check for
457         procedure pointers.
458         * gfortran.h: Add copy_formal_args_intr.
459         * interface.c (gfc_compare_interfaces): Call gfc_compare_intr_interfaces
460         if second argument is an intrinsic.
461         (compare_intr_interfaces): Correctly set attr.function, attr.subroutine
462         and ts.
463         (compare_parameter): Call gfc_compare_interfaces also for intrinsics.
464         * resolve.c (resolve_specific_f0,resolve_specific_s0): Don't resolve
465         intrinsic interfaces here. Must happen earlier.
466         (resolve_symbol): Resolution of intrinsic interfaces moved here from
467         resolve_specific_..., and formal args are now copied from intrinsic
468         interfaces.
469         * symbol.c (copy_formal_args_intr): New function to copy the formal
470         arguments from an intinsic procedure.
471
472 2009-04-06  Paul Thomas  <pault@gcc.gnu.org>
473
474         PR fortran/38863
475         * dependency.c (ref_same_as_full_array): New function.
476         (gfc_dep_resolver): Call it.
477
478 2009-04-06  Janus Weil  <janus@gcc.gnu.org>
479
480        PR fortran/39414
481        * decl.c (match_procedure_decl): Fix double declaration problems with
482        PROCEDURE statements.
483        * symbol.c (gfc_add_type): Ditto.
484
485 2009-04-06  Paul Thomas  <pault@gcc.gnu.org>
486
487         PR fortran/36091
488         * trans-array.c (gfc_conv_array_ref): If the symbol has the
489         temporary attribute use the array_spec for the bounds.
490         * gfortran.h : Add the temporary field to the structure
491         'symbol_attribute'.
492         * trans-stmt.c (forall_make_variable_temp): Set the symbol's
493         temporary attribute.
494
495 2009-04-05  Daniel Franke  <franke.daniel@gmail.com>
496
497         PR fortran/29458
498         * trans-array.c (gfc_trans_array_constructor_value): Shadow
499         implied do-loop variable to avoid spurious middle-end warnings.
500
501 2009-04-04  Tobias Burnus  <burnus@net-b.de>
502
503         PR fortran/39577
504         * trans-decl.c (gfc_generate_function_code): Move recursive
505         check to the right position.
506
507 2009-04-04  Paul Thomas  <pault@gcc.gnu.org>
508
509         PR fortran/37614
510         * trans-common.c (translate_common): Do not offset the whole
511         coomon block.
512
513 2009-04-03  Tobias Burnus  <burnus@net-b.de>
514
515         PR fortran/39594
516         * resolve.c (resolve_common_vars): Add FL_VARIABLE to symbol
517         if it is not a procedure pointer.
518         * primary.c (match_actual_arg): Ditto.
519
520 2009-03-31  Joseph Myers  <joseph@codesourcery.com>
521
522         PR preprocessor/15638
523         * cpp.c (cb_cpp_error): Handle CPP_DL_FATAL.
524
525 2009-03-30  Steven G. Kargl  <kargls@comcast.net>
526
527         PR fortran/38389
528         * trans-stmt.c(gfc_trans_allocate): Add translation of ERRMSG.
529         (gfc_trans_deallocate): Add translation of ERRMSG.  Remove stale
530         comments.  Minor whitespace cleanup.
531         * resolve.c(is_scalar_expr_ptr): Whitespace cleanup.
532         (resolve_deallocate_expr (gfc_expr *e): Update error message.
533         (resolve_allocate_expr):  Remove dead code.  Update error message.
534         Move error checking to ...
535         (resolve_allocate_deallocate): ... here.  Add additional error
536         checking for STAT, ERRMSG, and allocate-objects.
537         * match.c(gfc_match_allocate,gfc_match_deallocate):  Parse ERRMSG.
538         Check for redundant uses of STAT and ERRMSG.  Reword error message
539         and add checking for pointer, allocatable, and proc_pointer attributes.
540
541 2009-03-30  Paul Thomas  <pault@gcc.gnu.org>
542
543         PR fortran/22571
544         PR fortran/26227
545         PR fortran/24886
546         * symbol.c : Add gfc_global_ns_list.
547         * decl.c (add_global_entry): Set the namespace ('ns') field.
548         * gfortran.h : Add the resolved field to gfc_namespace. Add the
549         namespace ('ns') field to gfc_gsymbol.  Add flag_whole_file to
550         gfc_option_t.  Add the prototype for gfc_free_dt_list.
551         * lang.opt : Add the whole-file option.
552         * invoke.texi : Document the whole-file option.
553         * resolve.c (resolve_global_procedure): If the fwhole-file
554         option is set, reorder gsymbols to ensure that translation is
555         in the right order.  Resolve the gsymbol's namespace if that
556         has not occurred and then check interfaces.
557         (resolve_function): Move call to resolve_global_procedure.
558         (resolve_call): The same.
559         (resolve_codes): Store the current labels_obstack.
560         (gfc_resolve) : Return if the namespace is already resolved.
561         trans-decl.c (gfc_get_extern_function_decl): If the whole_file
562         option is selected, use the backend_decl of a gsymbol, if it is
563         available.
564         parse.c (add_global_procedure, add_global_program): If the flag
565         whole-file is set, add the namespace to the gsymbol.
566         (gfc_parse_file): On -fwhole-file, put procedure namespaces on
567         the global namespace list.  Rearrange to do resolution of all
568         the procedures in a file, followed by their translation.
569         * options.c (gfc_init_options): Add -fwhole-file.
570         (gfc_handle_option): The same.
571
572 2009-03-30  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
573
574         * f95-lang.c (gfc_init_builtin_functions): Define BUILT_IN_HUGE_VAL
575         family of intrinsics instead of BUILT_IN_INF family.
576         * trans-intrinsics.c (gfc_conv_intrinsic_nearest): Use
577         BUILT_IN_HUGE_VAL instead of BUILT_IN_INF.
578
579 2009-03-30  Jakub Jelinek  <jakub@redhat.com>
580
581         * trans-types.c (gfc_sym_type, gfc_return_by_reference): For
582         sym->attr.result check sym->ns->proc_name->attr.is_bind_c.
583
584 2009-03-30  Joseph Myers  <joseph@codesourcery.com>
585
586         PR rtl-optimization/323
587         * options.c (gfc_post_options): Set
588         flag_excess_precision_cmdline.  Give an error for
589         -fexcess-precision=standard for processors where the option is
590         significant.
591
592 2009-03-29  Joseph Myers  <joseph@codesourcery.com>
593
594         PR preprocessor/34695
595         * cpp.c (cb_cpp_error): New.
596         (gfc_cpp_post_options): Don't set cpp_option->inhibit_warnings.
597         Don't check cpp_errors (cpp_in).
598         (gfc_cpp_init_0): Set cb->error.
599
600 2009-03-29  Steven G. Kargl  <kargl@gcc.gnu.org>
601
602         PR fortran/38823
603         * gfortran.h: Add ARITH_PROHIBIT to arith enum.
604         expr.c (gfc_match_init_expr): Add global variable init_flag to
605         flag matching an initialization expression.
606         (check_intrinsic_op): Move no longer reachable error message to ...
607         * arith.c (arith_power): ... here.  Remove gfc_ prefix in
608         gfc_arith_power.  Use init_flag.  Allow constant folding of x**y
609         when y is REAL or COMPLEX.
610         (eval_intrinsic): Remove restriction that y in x**y must be INTEGER
611         for constant folding.
612         * gfc_power: Update gfc_arith_power to arith_power
613
614 2009-03-29  Daniel Kraft  <d@domob.eu>
615
616         PR fortran/37423
617         * gfortran.h (struct gfc_typebound_proc): Added new flag `deferred' and
618         added a comment explaining DEFERRED binding handling.
619         * decl.c (match_binding_attributes): Really match DEFERRED attribute.
620         (match_procedure_in_type): Really match PROCEDURE(interface) syntax
621         and do some validity checks for DEFERRED and this construct.
622         * module.c (binding_overriding): New string constant for DEFERRED.
623         (mio_typebound_proc): Module-IO DEFERRED flag.
624         * resolve.c (check_typebound_override): Ensure that a non-DEFERRED
625         binding is not overridden by a DEFERRED one.
626         (resolve_typebound_procedure): Allow abstract interfaces as targets
627         for DEFERRED bindings.
628         (ensure_not_abstract_walker), (ensure_not_abstract): New methods.
629         (resolve_fl_derived): Use new `ensure_not_abstract' method for
630         non-ABSTRACT types extending ABSTRACT ones to ensure each DEFERRED
631         binding is overridden.
632         (check_typebound_baseobject): New method.
633         (resolve_compcall), (resolve_typebound_call): Check base-object of
634         the type-bound procedure call.
635         * gfc-internals.texi (Type-bound procedures): Document a little bit
636         about internal handling of DEFERRED bindings.
637
638 2009-03-29  Tobias Schlüter  <tobi@gcc.gnu.org>
639
640         PR fortran/38507
641         * gfortran.h (gfc_st_label): Fix comment.
642         (gfc_exec_op): Add statement code EXEC_END_BLOCK for end of block.
643         * parse.c (accept_statement): Use EXEC_END_BLOCK for END IF and
644         END SELECT with labels.
645         (check_do_closure): Fix formatting.
646         (parse_do_block): Fix typo in error message.
647         * resolve.c (code_stack): Remove tail member.  Update comment to
648         new use of reachable_labels.
649         (reachable_labels): Rename to ...
650         (find_reachable_labels): ... this.  Overhaul.  Update preceding
651         comment.
652         (resolve_branch): Fix comment preceding function.  Rewrite.
653         (resolve_code): Update call to find_reachable_labels.  Add code to
654         deal with EXEC_END_BLOCK.
655         * st.c (gfc_free_statement): Add code to deal with EXEC_END_BLOCK.
656         Add 2009 to copyright years.
657         * trans.c (gfc_trans_code): Likewise on both counts.
658
659 2009-03-31  Paul Thomas  <pault@gcc.gnu.org>
660
661         PR fortran/38917
662         * expr.c (gfc_check_assign): Allow pointer components when
663         checking for NULL.
664
665         PR fortran/38918
666         * resolve.c (check_data_variable): Treat pointer arrays with
667         scalars.
668
669 2009-03-31  Paul Thomas  <pault@gcc.gnu.org>
670
671         PR fortran/38915
672         * trans-expr.c (gfc_trans_assignment_1): Ensure temporaries
673         have a string_length.
674
675 2009-03-28  Tobias Burnus  <burnus@net-b.de>
676
677         PR fortran/34656
678         * trans-stmt.c (gfc_trans_simple_do, gfc_trans_do):
679         Add GFC_RTCHECK_DO support.
680         * option.c (gfc_handle_runtime_check_option): Enable GFC_RTCHECK_DO.
681         * invoke.texi (-fcheck): Document "do" option.
682
683 2009-03-28  Paul Thomas  <pault@gcc.gnu.org>
684
685         PR fortran/38538
686         * trans-array.c (get_elemental_fcn_charlen): Remove.
687         (get_array_charlen): New function to replace previous.
688
689 2009-03-28  Paul Thomas  <pault@gcc.gnu.org>
690
691         PR fortran/38765
692         * parse.c (parse_derived): Do not break on finding pointer,
693         allocatable or private components.
694
695 2009-03-28  Tobias Burnus  <burnus@net-b.de>
696
697         PR fortran/32626
698         * option.c (gfc_handle_runtime_check_option): Enable recursion check.
699         * trans-decl.c (gfc_generate_function_code): Add recursion check.
700         * invoke.texi (-fcheck): Add recursive option.
701
702 2009-03-28  Tobias Burnus  <burnus@net-b.de>
703
704         PR fortran/38432
705         * resolve.c (gfc_resolve_iterator): Add zero-loop warning.
706
707 2009-03-28  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
708             Paul Thomas  <pault@gcc.gnu.org>
709             Tobias Burnus  <burnus@net-b.de>
710
711         * gfortran.h (gfc_option_t): Add rtcheck.
712         * lang.opt: New option -fcheck.
713         * libgfortran.h: Add GFC_RTCHECK_* constants.
714         * invoke.texi: Document -fcheck.
715         * options.c (gfc_handle_runtime_check_option): New function.
716         (gfc_init_options,gfc_post_options,gfc_handle_option):
717         Add -fcheck option.
718
719 2009-03-27  Richard Guenther  <rguenther@suse.de>
720
721         * trans-array.c (gfc_conv_descriptor_data_addr): Use
722         gfc_build_addr_expr instead of build_fold_addr_expr.
723         (gfc_trans_allocate_array_storage, gfc_trans_array_constructor_value,
724         gfc_trans_constant_array_constructor, gfc_conv_array_data,
725         gfc_conv_expr_descriptor, gfc_conv_array_parameter): Likewise.
726         * trans-expr.c (gfc_conv_missing_dummy, gfc_conv_variable,
727         gfc_conv_function_val, gfc_conv_operator_assign,
728         gfc_conv_subref_array_arg, gfc_conv_function_call,
729         gfc_conv_expr_reference, gfc_trans_scalar_assign): Likewise.
730         * trans-intrinsic.c (gfc_conv_intrinsic_exponent,
731         gfc_conv_intrinsic_ctime, gfc_conv_intrinsic_fdate,
732         gfc_conv_intrinsic_ttynam, gfc_conv_intrinsic_minmax_char,
733         gfc_conv_intrinsic_fraction, gfc_conv_intrinsic_spacing,
734         gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_set_exponent,
735         gfc_conv_intrinsic_array_transfer, gfc_conv_intrinsic_transfer,
736         gfc_conv_intrinsic_si_kind, gfc_conv_intrinsic_trim): Likewise.
737         * trans-io.c (gfc_trans_io_runtime_check, set_parameter_ref,
738         gfc_convert_array_to_string, gfc_trans_open, gfc_trans_close,
739         build_filepos, gfc_trans_inquire, gfc_trans_wait,
740         nml_get_addr_expr, transfer_namelist_element, build_dt,
741         gfc_trans_dt_end, transfer_array_component, transfer_expr,
742         transfer_array_desc, gfc_trans_transfer): Likewise.
743         * trans-stmt.c (gfc_trans_allocate, gfc_trans_deallocate): Likewise.
744         * trans.c (gfc_build_addr_expr): Mark the base of the address
745         TREE_ADDRESSABLE.
746
747 2009-03-27  Tobias Burnus  <burnus@net-b.de>
748
749         * gfortran.h (enum init_local_real.): Add GFC_INIT_REAL_SNAN.
750         (gfc_expr): Add is_snan.
751         * trans-const.c (gfc_conv_mpfr_to_tree): Support SNaN.
752         (gfc_conv_constant_to_tree): Update call to gfc_conv_mpfr_to_tree.
753         * trans-const.h (gfc_conv_mpfr_to_tree): Update prototype.
754         * resolve.c (build_default_init_expr): Update call.
755         * target-memory.c (encode_float): Ditto.
756         * trans-intrinsic.c (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod,
757
758 2009-03-18  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
759
760         * lang.opt: Unify help texts for -I, -Wconversion, -d, -fopenmp,
761         and -fpreprocessed.
762
763 2009-03-06  Alexandre Oliva <aoliva@redhat.com>
764
765         * simplify.c (gfc_simplify_transfer): Zero-initialize the
766         buffer.
767
768 2009-02-27  Tobias Burnus  <burnus@net-b.de>
769
770         PR fortran/39309
771         * module.c (read_md5_from_module_file): Add missing quote.
772
773 2009-02-27  Tobias Burnus  <burnus@net-b.de>
774
775         PR fortran/39309
776         * module.c (read_md5_from_module_file): Include mod version
777         in had-changed test.
778
779 2009-02-26  Paul Thomas  <pault@gcc.gnu.org>
780
781         PR fortran/39295
782         * interface.c (compare_type_rank_if): Return 1 if the symbols
783         are the same and deal with external procedures where one is
784         identified to be a function or subroutine by usage but the
785         other is not.
786
787 2009-02-26  Paul Thomas  <pault@gcc.gnu.org>
788
789         PR fortran/39292
790         * trans-array.c (gfc_conv_array_initializer): Convert all
791         expressions rather than ICEing.
792
793 2009-02-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
794
795         PR fortran/38914
796         * array.c (ref_dimen_size):  Rename to gfc_ref_dimen_size,
797         make global.  Change function name in error messages.
798         (ref_size):  Change ref_dimen_size to gfc_ref_dimen_size.
799         (gfc_array_ref_shape):  Likewise.
800         * gfortran.h:  Add prototype for gfc_ref_dimen_size.
801         * simplify.c (simplify_bound_dim):  Add ref argument.
802         If the reference isn't a full array, return one for
803         the lower bound and the extent for the upper bound.
804         (simplify_bound):  For array sections, take as from the
805         argument.  Add reference to all to simplify_bound_dim.
806
807 2009-02-19  Daniel Franke  <franke.daniel@gmail.com>
808
809         * scanner.c (load_line): At end of line, skip '\r' without setting
810         the truncation flag.
811
812 2009-02-18  Daniel Kraft  <d@domob.eu>
813
814         * gfortran.texi: New chapter about compiler characteristics.
815         (Compiler Characteristics): Document KIND type parameters here.
816
817 2009-02-18  Tobias Burnus  <burnus@net-b.de>
818
819         * intrinsic.texi (MALLOC): Make example more portable.
820
821 2009-02-13  Mikael Morin  <mikael.morin@tele2.fr>
822
823         PR fortran/38259
824         * module.c (gfc_dump_module,gfc_use_module): Add module
825         version number.
826
827 2009-02-13  Paul Thomas  <pault@gcc.gnu.org>
828
829         PR fortran/36703
830         PR fortran/36528
831         * trans-expr.c (gfc_conv_function_val): Stabilize Cray-pointer
832         function references to ensure that a valid expression is used.
833         (gfc_conv_function_call): Pass Cray pointers to procedures.
834
835 2009-02-03  Jakub Jelinek  <jakub@redhat.com>
836
837         * gfortranspec.c (lang_specific_driver): Update copyright notice
838         dates.
839
840 2009-01-28  Paul Thomas  <pault@gcc.gnu.org>
841
842         PR fortran/38852
843         PR fortran/39006
844         * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use the array
845         descriptor ubound for UBOUND, when the array lbound == 1.
846
847 2009-01-27  Daniel Kraft  <d@domob.eu>
848
849         PR fortran/38883
850         * trans-stmt.c (gfc_conv_elemental_dependencies):  Create temporary
851         for the real type needed to make it work for subcomponent-references.
852
853 2009-01-21  Daniel Kraft  <d@domob.eu>
854
855         * trans-stmt.c (gfc_conv_elemental_dependencies):  Cleaned up comment.
856
857 2009-01-20  Paul Thomas  <pault@gcc.gnu.org>
858
859         PR fortran/38907
860         * resolve.c (check_host_association): Remove the matching to
861         correct an incorrect host association and use manipulation of
862         the expression instead.
863
864 2009-01-20  Tobias Burnus  <burnus@net-b.de>
865
866         * invoke.texi (RANGE): RANGE also takes INTEGER arguments.
867
868 2009-01-19  Mikael Morin  <mikael.morin@tele2.fr>
869
870         PR fortran/38859
871         * simplify.c (simplify_bound): Don't use array specification
872         if variable or component has subsequent references.
873
874 2009-01-17  Paul Thomas  <pault@gcc.gnu.org>
875
876         PR fortran/38657
877         * module.c (write_common_0): Add argument 'this_module' and
878         check that non-use associated common blocks are written first.
879         (write_common): Call write_common_0 twice, once with true and
880         then with false.
881
882 2009-01-17  Paul Thomas  <pault@gcc.gnu.org>
883
884         PR fortran/34955
885         * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): Has
886         been absorbed into gfc_conv_intrinsic_transfer. All
887         references to it in trans-intrinsic.c have been changed
888         accordingly.  PR fixed by using a temporary for scalar
889         character transfer, when the source is shorter than the
890         destination.
891
892 2009-01-17  Paul Thomas  <pault@gcc.gnu.org>
893
894         PR fortran/38657
895         * module.c (write_common_0): Revert patch of 2009-01-05.
896
897 2009-01-16  Janus Weil  <janus@gcc.gnu.org>
898
899         PR fortran/38152
900         * expr.c (gfc_check_pointer_assign): Allow use-associated procedure
901         pointers as lvalue.
902         * trans-decl.c (get_proc_pointer_decl,gfc_create_module_variable):
903         Enable procedure pointers as module variables.
904
905 2009-01-14  Steven G. Kargl  <kargl@gcc.gnu.org>
906
907         * ChangeLog-2007: Clean out svn merge droppings.
908
909 2009-01-10  Paul Thomas  <pault@gcc.gnu.org>
910
911         PR fortran/38763
912         * target-memory.c (encode_derived): Encode NULL.
913
914 2009-01-10  Paul Thomas  <pault@gcc.gnu.org>
915
916         PR fortran/38765
917         * resolve.c (check_host_association): Use the symtree name to
918         search for a potential contained procedure, since this is the
919         name by which it would be referenced.
920
921 2009-01-06  Thomas Koenig  <tkoenig@gcc.gnu.org>
922
923         PR fortran/38220
924         * interface.c (gfc_procedure_use):  Don't warn about functions
925         from ISO_C_BINDING.
926         * symbol.c (generate_isocbinding_symbol):  Mark c_loc and
927         c_funloc as pure.
928
929 2009-01-05  Paul Thomas  <pault@gcc.gnu.org>
930
931         PR fortran/38657
932         * module.c (write_common_0): Use the name of the symtree rather
933         than the common block, to determine if the common has been
934         written.
935
936 2009-01-05  Daniel Franke  <franke.daniel@gmail.com>
937
938         PR fortran/37159
939         * check.c (gfc_check_random_seed): Added size check for GET
940         dummy argument, reworded error messages to follow common pattern.
941
942 2009-01-05  Thomas Koenig  <tkoenig@gcc.gnu.org>
943
944         PR fortran/38672
945         * trans-types.c (gfc_get_derived_type):  Check for the
946         presence of derived->ns->proc_name before
947         accessing derived->ns->proc_name->attr.flavor .
948         * resolve.c (resolve_symbol):  Likewise.
949
950 2009-01-05  Paul Thomas  <pault@gcc.gnu.org>
951
952         PR fortran/38665
953         * gfortran.h : Add bit to gfc_expr 'user_operator'
954         * interface.c (gfc_extend_expr): Set the above if the operator
955         is substituted by a function. 
956         * resolve.c (check_host_association): Return if above is set.
957
958 2009-01-04  Mikael Morin  <mikael.morin@tele2.fr>
959
960         PR fortran/35681
961         * ChangeLog-2008: Fix function name.
962
963         PR fortran/38487
964         * dependency.c (gfc_check_argument_var_dependency):
965         Move the check for pointerness inside the if block
966         so that it doesn't affect the return value.
967
968         PR fortran/38669
969         * trans-stmt.c (gfc_trans_call):
970         Add the dependency code after the loop bounds calculation one.
971
972 2009-01-04  Daniel Franke  <franke.daniel@gmail.com>
973
974         * intrinsic.c (do_simplify): Removed already implemented TODO.
975
976 2009-01-04  Daniel Franke  <franke.daniel@gmail.com>
977
978         PR fortran/38718
979         * simplify.c (gfc_simplify_merge): New.
980         * intrinsic.h (gfc_simplify_merge): New prototype.
981         * intrinsic.c (add_functions): Added simplification for MERGE.
982
983 2009-01-04  Mikael Morin  <mikael.morin@tele2.fr>
984
985         PR fortran/38536
986         * gfortran.h (gfc_is_data_pointer): Added prototype
987         * resolve.c (gfc_iso_c_func_interface):
988         Use gfc_is_data_pointer to test for pointer attribute.
989         * dependency.c (gfc_is_data_pointer):
990         Support pointer-returning functions.
991
992 2009-01-03  Daniel Franke  <franke.daniel@gmail.com>
993
994         * symbol.c (save_symbol): Don't SAVE function results.
995
996 2009-01-03  Paul Thomas  <pault@gcc.gnu.org>
997
998         PR fortran/38594
999         * resolve.c (resolve_call): When searching for proper host
1000         association, use symtree rather than symbol.  For everything
1001         except generic subroutines, substitute the symtree in the call
1002         rather than the symbol.
1003
1004 \f
1005 Copyright (C) 2009 Free Software Foundation, Inc.
1006
1007 Copying and distribution of this file, with or without modification,
1008 are permitted in any medium without royalty provided the copyright
1009 notice and this notice are preserved.