1 2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
4 * decl.c (set_enum_kind): Use global short-enums flag.
5 * gfortran.h (gfc_option_t): Remove short_enums flag.
6 * lang.opt (-fshort-enums): Refer to C documentation.
7 * options.c (gfc_init_options, gfc_handle_option): Use global
10 2009-05-15 Tobias Burnus <burnus@net-b.de>
13 * f95-lang.c: Add gfc_maybe_initialize_eh.
14 * gfortran.h: Add gfc_maybe_initialize_eh prototype.
15 * Make-lang.in: Add new .h dendencies for f95-lang.c
16 * openmp.c (resolve_omp_do): Call gfc_maybe_initialize_eh.
17 * misc.c (gfc_free): Avoid #define trickery for free.
19 2009-05-14 Steven G. Kargl <kargl@gcc.gnu.org>
21 * dump-parse-tree.c (show_code_node): Add ERRMSG to the dumping
22 of allocate and deallocate statements.
24 2009-05-14 Ian Lance Taylor <iant@google.com>
26 * decl.c (match_attr_spec): Change d to unsigned int.
27 * dump-parse-tree.c (show_namespace): Change op to int. Add cast.
28 * interface.c (gfc_check_interfaces): Change i to int. Add casts.
29 * module.c (read_module): Change i to int. Add cast.
30 (write_module): Change i to int.
31 * symbol.c (gfc_get_namespace): Change in to int.
32 (gfc_free_namespace): Change i to int.
33 * trans-io.c (gfc_build_io_library_fndecls): Change ptype to
34 unsigned int. Add cast.
35 * trans-types.c (gfc_init_kinds): Change mode to unsigned int.
38 2009-05-14 Daniel Kraft <d@domob.eu>
41 * dump-parse-tree.c (show_typebound): Fix missing adaption to new
42 type-bound procedure storage structure.
44 2009-05-14 Janus Weil <janus@gcc.gnu.org>
47 * decl.c (gfc_match_function_decl): Use gfc_add_type.
48 * symbol.c (gfc_add_type): Better checking for duplicate types in
49 function declarations. And: Always give an error for duplicte types,
50 not just a warning with -std=gnu.
52 2009-05-14 Jakub Jelinek <jakub@redhat.com>
55 * io.c (resolve_tag_format): CHARACTER array in FMT= argument
56 isn't an extension. Reject non-CHARACTER array element of
57 assumed shape or pointer or assumed size array.
58 * trans-array.c (array_parameter_size): New function.
59 (gfc_conv_array_parameter): Add size argument. Call
60 array_parameter_size if it is non-NULL.
61 * trans-array.h (gfc_conv_array_parameter): Adjust prototype.
62 * trans-expr.c (gfc_conv_function_call, gfc_trans_arrayfunc_assign):
64 * trans-intrinsic.c (gfc_conv_intrinsic_loc): Likewise.
65 * trans-io.c (gfc_convert_array_to_string): Rewritten.
67 2009-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
69 * gfortran.h (gfc_code): Rename struct member expr to expr1.
70 * openmp.c (resolve_omp_atomic): Update expr to expr1.
71 * interface.c (gfc_extend_assign): Ditto.
72 * trans-expr.c (gfc_conv_expr_reference, gfc_trans_assignment,
73 gfc_trans_init_assign): Ditto.
74 * dump-parse-tree.c (show_code_node): Ditto.
75 * trans-openmp.c (gfc_trans_omp_atomic): Ditto.
76 * trans-stmt.c ( gfc_trans_label_assign, gfc_trans_goto, gfc_trans_call,
77 gfc_trans_return, gfc_trans_pause, gfc_trans_stop, gfc_trans_if_1,
78 gfc_trans_arithmetic_if, gfc_trans_do_while, gfc_trans_integer_select,
79 gfc_trans_logical_select, gfc_trans_character_select
80 forall_make_variable_temp, check_forall_dependencies
81 gfc_trans_forall_1, gfc_trans_where_2, gfc_trans_where_3
82 gfc_trans_where, gfc_trans_allocate, gfc_trans_deallocate): Ditto.
83 * io.c (match_io_element, gfc_match_inquire): Ditto.
84 * resolve.c (resolve_typebound_call, resolve_ppc_call,
85 resolve_allocate_expr, resolve_allocate_deallocate, resolve_select,
86 resolve_transfer, resolve_where, gfc_resolve_assign_in_forall,
87 gfc_resolve_blocks, resolve_code, build_init_assign): Ditto.
88 * st.c (gfc_free_statement): Ditto.
89 * match.c (gfc_match_assignment, gfc_match_pointer_assignment,
90 match_arithmetic_if, gfc_match_if, gfc_match_elseif
91 gfc_match_stopcode, gfc_match_assign, gfc_match_goto,
92 gfc_match_nullify, match_typebound_call, gfc_match_call
93 gfc_match_select, match_simple_where, gfc_match_where
94 gfc_match_elsewhere, match_simple_forall, gfc_match_forall): Ditto.
95 * trans-io.c (gfc_trans_transfer): Ditto.
96 * parse.c (parse_where_block, parse_if_block): Ditto.
98 2009-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
100 * gfortran.h (gfc_code): Rename struct member label to label1.
101 * dump-parse-tree.c (show_code_node): Update symbol.
102 * trans-stmt.c (gfc_trans_label_assign, gfc_trans_goto,
103 gfc_trans_arithmetic_if)": Ditto.
104 * resolve.c (gfc_resolve_blocks, resolve_code): Ditto.
105 * match.c (match_arithmetic_if, gfc_match_if, gfc_reference_st_label,
106 gfc_match_assign, gfc_match_goto): Ditto.
107 * parse.c (parse_do_block): Ditto.
109 2009-05-13 Tobias Burnus <burnus@net-b.de>
112 * gfortran.h (gfc_exec_op): Add EXEC_END_PROCEDURE.
113 * dump-parse-tree.c (show_code_node): Use EXEC_END_PROCEDURE.
114 * trans.c (gfc_trans_code): Ditto.
115 * resolve.c (resolve_code): Ditto.
116 * st.c (gfc_free_statement): Ditto.
117 * parse.c (accept_statement): Ditto.
119 2009-05-12 Tobias Burnus <burnus@net-b.de>
122 * decl.c (gfc_match_kind_spec): Turn C kind error into a warning.
124 2009-05-11 Steve Ellcey <sje@cup.hp.com>
126 * resolve.c (check_host_association): Initialize tail.
128 2009-05-11 Janus Weil <janus@gcc.gnu.org>
131 * resolve.c (resolve_fl_derived): Only return FAILURE if
132 gfc_notify_std fails.
134 2009-05-10 Ian Lance Taylor <iant@google.com>
136 * gfortran.h (enum gfc_omp_sched_kind): New enum, broken out of
138 (enum gfc_omp_default_sharing): Likewise.
139 * module.c (enum gfc_rsym_state): New enum, broken out of
141 (enum gfc_wsym_state): Likewise.
142 * parse.c (enum state_order): New enum, broken out of st_state.
144 2009-05-10 Paul Thomas <pault@gcc.gnu.org>
147 * trans-array.c (gfc_trans_array_constructor_value): Fold
148 convert numeric constants.
149 (gfc_build_constant_array_constructor): The same.
151 2009-05-10 Paul Thomas <pault@gcc.gnu.org>
154 * trans-expr.c (gfc_conv_operator_assign): Remove function.
155 * trans.h : Remove prototype for gfc_conv_operator_assign.
156 * trans-stmt.c (gfc_conv_elemental_dependencies): Initialize
157 derivde types with intent(out).
158 (gfc_trans_call): Add mask, count1 and invert arguments. Add
159 code to use mask for WHERE assignments.
160 (gfc_trans_forall_1): Use new arguments for gfc_trans_call.
161 (gfc_trans_where_assign): The gfc_symbol argument is replaced
162 by the corresponding code. If this has a resolved_sym, then
163 gfc_trans_call is called. The call to gfc_conv_operator_assign
165 (gfc_trans_where_2): Change the last argument in the call to
166 gfc_trans_where_assign.
167 * trans-stmt.h : Modify prototype for gfc_trans_call.
168 * trans.c (gfc_trans_code): Use new args for gfc_trans_call.
170 2009-05-08 Janus Weil <janus@gcc.gnu.org>
173 * intrinsic.c (gfc_is_intrinsic): Do not add the EXTERNAL attribute if
174 the symbol is a module procedure.
176 2009-05-08 Tobias Burnus <burnus@net-b.de>
178 * invoke.texi: Add do/recursion to the -fcheck= summary.
180 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
183 * gfortran.texi: Document that we don't support variable FORMAT
186 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
189 * error.c (error_print): Add missing break statement.
191 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
194 * invoke.texi: Document that -fdollar-ok does not allow $ to be
195 used in IMPLICIT statement.
197 2009-05-06 Janus Weil <janus@gcc.gnu.org>
198 Paul Thomas <pault@gcc.gnu.org>
201 * decl.c (match_procedure_interface): New function to match the
202 interface for a PROCEDURE statement.
203 (match_procedure_decl): Call match_procedure_interface.
204 (match_ppc_decl): New function to match the declaration of a
205 procedure pointer component.
206 (gfc_match_procedure): Call match_ppc_decl.
207 (match_binding_attributes): Add new argument 'ppc' and handle the
208 POINTER attribute for procedure pointer components.
209 (match_procedure_in_type,gfc_match_generic): Added new argument to
210 match_binding_attributes.
211 * dump-parse-tree.c (show_expr,show_components,show_code_node): Handle
212 procedure pointer components.
213 * expr.c (free_expr0,gfc_copy_expr,gfc_simplify_expr): Handle EXPR_PPC.
214 (gfc_check_pointer_assign): Handle procedure pointer components, but no
216 (is_proc_ptr_comp): New function to determine if an expression is a
217 procedure pointer component.
218 * gfortran.h (expr_t): Add EXPR_PPC.
219 (symbol_attribute): Add new member 'proc_pointer_comp'.
220 (gfc_component): Add new member 'formal'.
221 (gfc_exec_op): Add EXEC_CALL_PPC.
222 (gfc_get_default_type): Changed first argument.
223 (is_proc_ptr_comp): Add prototype.
224 (gfc_match_varspec): Add new argument.
225 * interface.c (compare_actual_formal): Handle procedure pointer
227 * match.c (gfc_match_pointer_assignment,match_typebound_call): Handle
228 procedure pointer components.
229 * module.c (mio_expr): Handle EXPR_PPC.
230 * parse.c (parse_derived): Handle procedure pointer components.
231 * primary.c (gfc_match_varspec): Add new argument 'ppc_arg' and handle
232 procedure pointer components.
233 (gfc_variable_attr): Handle procedure pointer components.
234 (gfc_match_rvalue): Added new argument to gfc_match_varspec and changed
235 first argument of gfc_get_default_type.
236 (match_variable): Added new argument to gfc_match_varspec.
237 * resolve.c (resolve_entries,set_type,resolve_fl_parameter): Changed
238 first argument of gfc_get_default_type.
239 (resolve_structure_cons,resolve_actual_arglist): Handle procedure
241 (resolve_ppc_call): New function to resolve a call to a procedure
242 pointer component (subroutine).
243 (resolve_expr_ppc): New function to resolve a call to a procedure
244 pointer component (function).
245 (gfc_resolve_expr): Handle EXPR_PPC.
246 (resolve_code): Handle EXEC_CALL_PPC.
247 (resolve_fl_derived): Copy the interface for a procedure pointer
249 (resolve_symbol): Fix overlong line.
250 * st.c (gfc_free_statement): Handle EXEC_CALL_PPC.
251 * symbol.c (gfc_get_default_type): Changed first argument.
252 (gfc_set_default_type): Changed first argument of gfc_get_default_type.
253 (gfc_add_component): Initialize ts.type to BT_UNKNOWN.
254 * trans.h (gfc_conv_function_call): Renamed.
255 * trans.c (gfc_trans_code): Handle EXEC_CALL_PPC.
256 * trans-expr.c (gfc_conv_component_ref): Ditto.
257 (gfc_conv_function_val): Rename to 'conv_function_val', add new
258 argument 'expr' and handle procedure pointer components.
259 (gfc_conv_operator_assign): Renamed gfc_conv_function_val.
260 (gfc_apply_interface_mapping_to_expr): Handle EXPR_PPC.
261 (gfc_conv_function_call): Rename to 'gfc_conv_procedure_call', add new
262 argument 'expr' and handle procedure pointer components.
263 (gfc_get_proc_ptr_comp): New function to get the backend decl for a
264 procedure pointer component.
265 (gfc_conv_function_expr): Renamed gfc_conv_function_call.
266 (gfc_conv_structure): Handle procedure pointer components.
267 * trans-intrinsic.c (gfc_conv_intrinsic_funcall,
268 conv_generic_with_optional_char_arg): Renamed gfc_conv_function_call.
269 * trans-stmt.h (gfc_get_proc_ptr_comp): Add prototype.
270 * trans-stmt.c (gfc_trans_call): Renamed gfc_conv_function_call.
271 * trans-types.h (gfc_get_ppc_type): Add prototype.
272 * trans-types.c (gfc_get_ppc_type): New function to build a tree node
273 for a procedure pointer component.
274 (gfc_get_derived_type): Handle procedure pointer components.
276 2009-05-06 Tobias Burnus <burnus@net-b.de>
279 * resolve.c (resolve_symbol): Print no warning for implicitly
280 typed intrinsic functions.
282 2009-05-05 Janus Weil <janus@gcc.gnu.org>
285 * expr.c (gfc_check_pointer_assign): Check for statement functions and
286 internal procedures in procedure pointer assignments.
288 2009-04-28 Janus Weil <janus@gcc.gnu.org>
291 * resolve.c (resolve_symbol): Correctly copy the interface of a
292 PROCEDURE statement if the interface involves a RESULT variable.
294 2009-04-28 Janus Weil <janus@gcc.gnu.org>
298 * expr.c (gfc_check_pointer_assign): Correctly detect if the left hand
300 * parse.c (gfc_fixup_sibling_symbols): Don't check for ambiguity.
302 2009-04-28 Paul Thomas <pault@gcc.gnu.org>
305 * trans_expr.c (gfc_conv_procedure_call): Deep copy a derived
306 type parentheses argument if it is a variable with allocatable
309 2009-04-27 Ian Lance Taylor <iant@google.com>
311 * trans-intrinsic.c (DEFINE_MATH_BUILTIN): Add casts to enum
313 * trans-io.c (st_parameter_field): Add casts to enum type.
315 2009-04-26 Steven G. Kargl <kargl@gcc.gnu.org>
318 fortran/data.c (gfc_assign_data_value): If the lvalue is an
319 assumed character length entity in a data statement, then
320 return FAILURE to prevent segmentation fault.
322 2009-04-26 Jakub Jelinek <jakub@redhat.com>
324 * trans-decl.c: Include pointer-set.h.
325 (nonlocal_dummy_decl_pset, tree nonlocal_dummy_decls): New variables.
326 (gfc_nonlocal_dummy_array_decl): New function.
327 (gfc_get_symbol_decl): Call it for non-local dummy args with saved
329 (gfc_get_symbol_decl): Set DECL_BY_REFERENCE when needed.
330 (gfc_generate_function_code): Initialize nonlocal_dummy_decl{s,_pset},
331 chain it to outermost block's vars, destroy it afterwards.
332 * Make-lang.in (trans-decl.o): Depend on pointer-set.h.
334 2009-04-25 Janus Weil <janus@gcc.gnu.org>
337 * decl.c (gfc_match_import): Use 'sym->name' instead of 'name'.
338 They differ if the symbol has been use-renamed.
340 2009-04-24 Ian Lance Taylor <iant@google.com>
342 * gfortran.h (enum gfc_symbol_type): New named enum type, broken
343 out of struct gfc_symbol.
344 (struct gfc_symbol): Use enum gfc_symbol_type.
345 (enum gfc_array_ref_dimen_type): New named enum type, broken out
346 of struct gfc_array_ref).
347 (struct gfc_array_ref): Use enum gfc_array_ref_dimen_type.
348 (mod_pointee_as): Update declaration.
349 * decl.c (add_global_entry): Change type to enum gfc_symbol_type.
350 (gfc_mod_pointee_as): Change return type to "match".
351 * module.c (mio_array_ref): Add cast to enum type.
352 (mio_symbol): Likewise.
353 * resolve.c (resolve_global_procedure): Change type to enum
355 * trans-io.c (gfc_build_st_parameter): Change type to unsigned
358 2009-04-24 Daniel Kraft <d@domob.eu>
360 * gfortran.h (gfc_get_typebound_proc): Removed as macro, now a function.
361 (struct gfc_symtree): Moved `typebound' member inside union.
362 (struct gfc_namespace): Add `tb_sym_root' as new symtree to sort out
363 type-bound procedures there.
364 (gfc_get_tbp_symtree): New procedure.
365 * symbol.c (tentative_tbp_list): New global.
366 (gfc_get_namespace): NULL new `tb_sym_root' member.
367 (gfc_new_symtree): Removed initialization of `typebound' member.
368 (gfc_undo_symbols): Process list of tentative tbp's.
369 (gfc_commit_symbols): Ditto.
370 (free_tb_tree): New method.
371 (gfc_free_namespace): Call it.
372 (gfc_get_typebound_proc): New method.
373 (gfc_get_tbp_symtree): New method.
374 (gfc_find_typebound_proc): Adapt to structural changes of gfc_symtree
375 and gfc_namespace with regards to tbp's.
376 * dump-parse-tree.c (show_typebound): Ditto.
377 * primary.c (gfc_match_varspec): Ditto. Don't reference tbp-symbol
378 as it isn't a symbol any longer.
379 * module.c (mio_typebound_symtree): Adapt to changes.
380 (mio_typebound_proc): Ditto, create symtrees using `gfc_get_tbp_symtree'
381 rather than `gfc_get_sym_tree'.
382 (mio_f2k_derived): Ditto.
383 * decl.c (match_procedure_in_type): Ditto.
384 (gfc_match_generic): Ditto. Don't reference tbp-symbol.
385 * resolve.c (check_typebound_override): Adapt to changes.
386 (resolve_typebound_generic): Ditto.
387 (resolve_typebound_procedures): Ditto.
388 (ensure_not_abstract_walker): Ditto.
389 (ensure_not_abstract): Ditto.
390 (resolve_typebound_procedure): Ditto, ignore erraneous symbols (for
391 instance, through removed tentative ones).
392 * gfc-internals.texi (Type-bound procedures): Document changes.
394 2009-04-24 Janus Weil <janus@gcc.gnu.org>
398 * symbol.c (gfc_copy_formal_args_intr): Set attr.flavor and attr.dummy
399 for the formal arguments.
401 2009-04-21 Taras Glek <tglek@mozilla.com>
403 * f95-lang.c: Update GTY annotations to new syntax.
404 * trans-intrinsic.c: Likewise.
405 * trans-io.c: Likewise.
408 2009-04-22 Janus Weil <janus@gcc.gnu.org>
411 * decl.c (add_hidden_procptr_result): Bugfix for procptr results.
412 (match_procedure_decl): Set if_source.
413 * expr.c (gfc_check_pointer_assign): Bugfix: Return after error.
414 And: Check interface also for IFSRC_UNKNOWN (return type may be known).
415 * gfortran.h (typedef enum ifsrc): Remove IFSRC_USAGE,
416 add documentation. Rename copy_formal_args and copy_formal_args_intr.
417 * interface.c (gfc_compare_interfaces): Check for return types,
418 handle IFSRC_UNKNOWN.
419 (compare_intr_interfaces,compare_actual_formal_intr): Obsolete, removed.
420 (gfc_procedure_use): Modified handling of intrinsics.
421 * intrinsic.c (add_functions): Bugfix for "dim".
422 * resolve.c (resolve_intrinsic): New function to resolve intrinsics,
423 which copies the interface from isym to sym.
424 (resolve_procedure_expression,resolve_function): Use new function
426 (resolve_symbol): Add function attribute for externals with return type
427 and use new function 'resolve_intrinsic'.
428 * symbol.c (ifsrc_types): Remove string for IFSRC_USAGE.
429 (copy_formal_args): Renamed to gfc_copy_formal_args.
430 (copy_formal_args_intr): Renamed to gfc_copy_formal_args_intr.
431 * trans-const.c (gfc_conv_const_charlen): Handle cl==NULL.
433 2009-04-21 Joseph Myers <joseph@codesourcery.com>
435 * ChangeLog, ChangeLog-2002, ChangeLog-2003, ChangeLog-2004,
436 ChangeLog-2005, ChangeLog-2006, ChangeLog-2007, ChangeLog-2008,
437 ChangeLog.ptr, config-lang.in, ioparm.def, mathbuiltins.def: Add
438 copyright and license notices.
439 * ChangeLog, ChangeLog-2005, ChangeLog-2006, ChangeLog-2007,
440 ChangeLog-2008: Correct dates.
442 2009-04-20 Tobias Burnus <burnus@net-b.de>
445 * scanner.c (load_line): Fix bogus "&" compile-time diagnostic.
447 2009-04-20 Paul Thomas <pault@gcc.gnu.org>
450 * resolve.c (is_sym_host_assoc): New function.
451 (resolve_fl_derived): Call it when checking PRIVATE components
452 of PUBLIC derived types. Change gfc_error to a gfc_notify_std
454 (resolve_fl_namelist): Call it twice to check for host
457 2009-04-20 Ian Lance Taylor <iant@google.com>
459 * module.c (import_iso_c_binding_module): Add casts to enum type.
460 * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Change op to enum
462 (gfc_conv_intrinsic_anyall): Likewise.
463 (gfc_conv_intrinsic_arith): Likewise.
464 (gfc_conv_intrinsic_minmaxloc): Likewise.
465 (gfc_conv_intrinsic_minmaxval): Likewise.
466 (gfc_conv_intrinsic_bitop): Likewise.
467 (gfc_conv_intrinsic_singlebitop): Likewise.
468 (gfc_conv_intrinsic_strcmp): Likewise.
470 2009-04-20 Vasilis Liaskovitis <vliaskov@gmail.com>
471 Jakub Jelinek <jakub@redhat.com>
474 * trans.h (OMPWS_WORKSHARE_FLAG, OMPWS_CURR_SINGLEUNIT,
475 OMPWS_SCALARIZER_WS, OMPWS_NOWAIT): Define.
476 (ompws_flags): New extern decl.
477 * trans-array.c (gfc_trans_scalarized_loop_end): Build OMP_FOR
478 for the outer dimension if ompws_flags allow it.
479 * trans.c (gfc_generate_code): Clear ompws_flags.
480 * trans-expr.c (gfc_trans_assignment_1): Allow worksharing
481 array assignments inside of !$omp workshare.
482 * trans-stmt.c (gfc_trans_where_3): Similarly for where statements
484 * trans-openmp.c (ompws_flags): New variable.
485 (gfc_trans_omp_workshare): Rewritten.
487 2009-04-11 Daniel Kraft <d@domob.eu>
490 * gfortran.h (struct gfc_charlen): New field `passed_length' to store
491 the actual passed string length for dummy arguments.
492 * trans-decl.c (gfc_create_string_length): Formatting fixes and added
493 assertion, moved a local variable into the innermost block it is needed.
494 (create_function_arglist): Removed TODO about the check being
495 implemented and initialize cl->passed_length here.
496 (add_argument_checking): New method.
497 (gfc_generate_function_code): Call the argument checking method.
499 2009-04-11 Janus Weil <janus@gcc.gnu.org>
502 * symbol.c (check_conflict): Reject procedure pointers for -std=f95.
504 2009-04-11 Daniel Franke <franke.daniel@gmail.com>
506 * resolve.c (resolve_global_procedure): Enable whole-file checking for
507 procedures that are declared later in the file.
509 2009-04-10 Paolo Bonzini <bonzini@gnu.org>
512 * trans.c (gfc_allocate_with_status): Fix type mismatches
515 2009-04-10 Daniel Franke <franke.daniel@gmail.com>
518 * expr.c (find_array_section): Leave early on zero-sized arrays.
520 2009-04-09 Janus Weil <janus@gcc.gnu.org>
523 * decl.c (add_hidden_procptr_result): New function for handling
524 procedure pointer return values by adding a hidden result variable.
525 (variable_decl,match_procedure_decl,gfc_match_function_decl,
526 gfc_match_subroutine,gfc_match_end,attr_decl1): Handle procedure pointer
528 * parse.c (parse_interface): Add EXTERNAL attribute only after
529 FUNCTION/SUBROUTINE declaration is complete.
530 * primary.c (replace_hidden_procptr_result): New function for replacing
531 function symbol by hidden result variable.
532 (gfc_match_rvalue,match_variable): Replace symbol by hidden result
534 * resolve.c (resolve_contained_fntype,resolve_function,resolve_variable,
535 resolve_symbol): Allow for procedure pointer function results.
536 (resolve_fl_procedure): Conflict detection moved here from
538 * symbol.c (gfc_check_function_type): Allow for procedure pointer
540 (check_conflict): Move some conflict detection to resolution stage.
541 * trans-types.c (gfc_sym_type,gfc_get_function_type): Handle hidden
544 2009-04-08 Jakub Jelinek <jakub@redhat.com>
546 * trans-types.c (gfc_init_types): Ensure gfc_integer_types doesn't
547 contain TYPE_STRING_FLAG types.
549 2009-04-08 Janne Blomqvist <jb@gcc.gnu.org>
552 * invoke.texi (fdollar-ok): Fix typo.
554 2009-04-08 Daniel Franke <franke.daniel@gmail.com>
557 * invoke.texi (fdollar-ok): Clarify limitations.
559 2009-04-08 Paul Thomas <pault@gcc.gnu.org>
562 * trans-array.c (gfc_trans_deferred_array): Return if this
563 is a result variable.
565 2009-04-07 Janus Weil <janus@gcc.gnu.org>
568 * trans-decl.c (gfc_get_symbol_decl): Correctly set decl location for
569 procedure pointer decls.
571 2009-04-07 Janus Weil <janus@gcc.gnu.org>
574 * expr.c (gfc_check_pointer_assign): Enable interface check for
576 * gfortran.h: Add copy_formal_args_intr.
577 * interface.c (gfc_compare_interfaces): Call gfc_compare_intr_interfaces
578 if second argument is an intrinsic.
579 (compare_intr_interfaces): Correctly set attr.function, attr.subroutine
581 (compare_parameter): Call gfc_compare_interfaces also for intrinsics.
582 * resolve.c (resolve_specific_f0,resolve_specific_s0): Don't resolve
583 intrinsic interfaces here. Must happen earlier.
584 (resolve_symbol): Resolution of intrinsic interfaces moved here from
585 resolve_specific_..., and formal args are now copied from intrinsic
587 * symbol.c (copy_formal_args_intr): New function to copy the formal
588 arguments from an intinsic procedure.
590 2009-04-06 Paul Thomas <pault@gcc.gnu.org>
593 * dependency.c (ref_same_as_full_array): New function.
594 (gfc_dep_resolver): Call it.
596 2009-04-06 Janus Weil <janus@gcc.gnu.org>
599 * decl.c (match_procedure_decl): Fix double declaration problems with
600 PROCEDURE statements.
601 * symbol.c (gfc_add_type): Ditto.
603 2009-04-06 Paul Thomas <pault@gcc.gnu.org>
606 * trans-array.c (gfc_conv_array_ref): If the symbol has the
607 temporary attribute use the array_spec for the bounds.
608 * gfortran.h : Add the temporary field to the structure
610 * trans-stmt.c (forall_make_variable_temp): Set the symbol's
613 2009-04-05 Daniel Franke <franke.daniel@gmail.com>
616 * trans-array.c (gfc_trans_array_constructor_value): Shadow
617 implied do-loop variable to avoid spurious middle-end warnings.
619 2009-04-04 Tobias Burnus <burnus@net-b.de>
622 * trans-decl.c (gfc_generate_function_code): Move recursive
623 check to the right position.
625 2009-04-04 Paul Thomas <pault@gcc.gnu.org>
628 * trans-common.c (translate_common): Do not offset the whole
631 2009-04-03 Tobias Burnus <burnus@net-b.de>
634 * resolve.c (resolve_common_vars): Add FL_VARIABLE to symbol
635 if it is not a procedure pointer.
636 * primary.c (match_actual_arg): Ditto.
638 2009-03-31 Joseph Myers <joseph@codesourcery.com>
640 PR preprocessor/15638
641 * cpp.c (cb_cpp_error): Handle CPP_DL_FATAL.
643 2009-03-30 Steven G. Kargl <kargls@comcast.net>
646 * trans-stmt.c(gfc_trans_allocate): Add translation of ERRMSG.
647 (gfc_trans_deallocate): Add translation of ERRMSG. Remove stale
648 comments. Minor whitespace cleanup.
649 * resolve.c(is_scalar_expr_ptr): Whitespace cleanup.
650 (resolve_deallocate_expr (gfc_expr *e): Update error message.
651 (resolve_allocate_expr): Remove dead code. Update error message.
652 Move error checking to ...
653 (resolve_allocate_deallocate): ... here. Add additional error
654 checking for STAT, ERRMSG, and allocate-objects.
655 * match.c(gfc_match_allocate,gfc_match_deallocate): Parse ERRMSG.
656 Check for redundant uses of STAT and ERRMSG. Reword error message
657 and add checking for pointer, allocatable, and proc_pointer attributes.
659 2009-03-30 Paul Thomas <pault@gcc.gnu.org>
664 * symbol.c : Add gfc_global_ns_list.
665 * decl.c (add_global_entry): Set the namespace ('ns') field.
666 * gfortran.h : Add the resolved field to gfc_namespace. Add the
667 namespace ('ns') field to gfc_gsymbol. Add flag_whole_file to
668 gfc_option_t. Add the prototype for gfc_free_dt_list.
669 * lang.opt : Add the whole-file option.
670 * invoke.texi : Document the whole-file option.
671 * resolve.c (resolve_global_procedure): If the fwhole-file
672 option is set, reorder gsymbols to ensure that translation is
673 in the right order. Resolve the gsymbol's namespace if that
674 has not occurred and then check interfaces.
675 (resolve_function): Move call to resolve_global_procedure.
676 (resolve_call): The same.
677 (resolve_codes): Store the current labels_obstack.
678 (gfc_resolve) : Return if the namespace is already resolved.
679 trans-decl.c (gfc_get_extern_function_decl): If the whole_file
680 option is selected, use the backend_decl of a gsymbol, if it is
682 parse.c (add_global_procedure, add_global_program): If the flag
683 whole-file is set, add the namespace to the gsymbol.
684 (gfc_parse_file): On -fwhole-file, put procedure namespaces on
685 the global namespace list. Rearrange to do resolution of all
686 the procedures in a file, followed by their translation.
687 * options.c (gfc_init_options): Add -fwhole-file.
688 (gfc_handle_option): The same.
690 2009-03-30 Ulrich Weigand <Ulrich.Weigand@de.ibm.com>
692 * f95-lang.c (gfc_init_builtin_functions): Define BUILT_IN_HUGE_VAL
693 family of intrinsics instead of BUILT_IN_INF family.
694 * trans-intrinsics.c (gfc_conv_intrinsic_nearest): Use
695 BUILT_IN_HUGE_VAL instead of BUILT_IN_INF.
697 2009-03-30 Jakub Jelinek <jakub@redhat.com>
699 * trans-types.c (gfc_sym_type, gfc_return_by_reference): For
700 sym->attr.result check sym->ns->proc_name->attr.is_bind_c.
702 2009-03-30 Joseph Myers <joseph@codesourcery.com>
704 PR rtl-optimization/323
705 * options.c (gfc_post_options): Set
706 flag_excess_precision_cmdline. Give an error for
707 -fexcess-precision=standard for processors where the option is
710 2009-03-29 Joseph Myers <joseph@codesourcery.com>
712 PR preprocessor/34695
713 * cpp.c (cb_cpp_error): New.
714 (gfc_cpp_post_options): Don't set cpp_option->inhibit_warnings.
715 Don't check cpp_errors (cpp_in).
716 (gfc_cpp_init_0): Set cb->error.
718 2009-03-29 Steven G. Kargl <kargl@gcc.gnu.org>
721 * gfortran.h: Add ARITH_PROHIBIT to arith enum.
722 expr.c (gfc_match_init_expr): Add global variable init_flag to
723 flag matching an initialization expression.
724 (check_intrinsic_op): Move no longer reachable error message to ...
725 * arith.c (arith_power): ... here. Remove gfc_ prefix in
726 gfc_arith_power. Use init_flag. Allow constant folding of x**y
727 when y is REAL or COMPLEX.
728 (eval_intrinsic): Remove restriction that y in x**y must be INTEGER
729 for constant folding.
730 * gfc_power: Update gfc_arith_power to arith_power
732 2009-03-29 Daniel Kraft <d@domob.eu>
735 * gfortran.h (struct gfc_typebound_proc): Added new flag `deferred' and
736 added a comment explaining DEFERRED binding handling.
737 * decl.c (match_binding_attributes): Really match DEFERRED attribute.
738 (match_procedure_in_type): Really match PROCEDURE(interface) syntax
739 and do some validity checks for DEFERRED and this construct.
740 * module.c (binding_overriding): New string constant for DEFERRED.
741 (mio_typebound_proc): Module-IO DEFERRED flag.
742 * resolve.c (check_typebound_override): Ensure that a non-DEFERRED
743 binding is not overridden by a DEFERRED one.
744 (resolve_typebound_procedure): Allow abstract interfaces as targets
745 for DEFERRED bindings.
746 (ensure_not_abstract_walker), (ensure_not_abstract): New methods.
747 (resolve_fl_derived): Use new `ensure_not_abstract' method for
748 non-ABSTRACT types extending ABSTRACT ones to ensure each DEFERRED
749 binding is overridden.
750 (check_typebound_baseobject): New method.
751 (resolve_compcall), (resolve_typebound_call): Check base-object of
752 the type-bound procedure call.
753 * gfc-internals.texi (Type-bound procedures): Document a little bit
754 about internal handling of DEFERRED bindings.
756 2009-03-29 Tobias Schlüter <tobi@gcc.gnu.org>
759 * gfortran.h (gfc_st_label): Fix comment.
760 (gfc_exec_op): Add statement code EXEC_END_BLOCK for end of block.
761 * parse.c (accept_statement): Use EXEC_END_BLOCK for END IF and
762 END SELECT with labels.
763 (check_do_closure): Fix formatting.
764 (parse_do_block): Fix typo in error message.
765 * resolve.c (code_stack): Remove tail member. Update comment to
766 new use of reachable_labels.
767 (reachable_labels): Rename to ...
768 (find_reachable_labels): ... this. Overhaul. Update preceding
770 (resolve_branch): Fix comment preceding function. Rewrite.
771 (resolve_code): Update call to find_reachable_labels. Add code to
772 deal with EXEC_END_BLOCK.
773 * st.c (gfc_free_statement): Add code to deal with EXEC_END_BLOCK.
774 Add 2009 to copyright years.
775 * trans.c (gfc_trans_code): Likewise on both counts.
777 2009-03-31 Paul Thomas <pault@gcc.gnu.org>
780 * expr.c (gfc_check_assign): Allow pointer components when
784 * resolve.c (check_data_variable): Treat pointer arrays with
787 2009-03-31 Paul Thomas <pault@gcc.gnu.org>
790 * trans-expr.c (gfc_trans_assignment_1): Ensure temporaries
791 have a string_length.
793 2009-03-28 Tobias Burnus <burnus@net-b.de>
796 * trans-stmt.c (gfc_trans_simple_do, gfc_trans_do):
797 Add GFC_RTCHECK_DO support.
798 * option.c (gfc_handle_runtime_check_option): Enable GFC_RTCHECK_DO.
799 * invoke.texi (-fcheck): Document "do" option.
801 2009-03-28 Paul Thomas <pault@gcc.gnu.org>
804 * trans-array.c (get_elemental_fcn_charlen): Remove.
805 (get_array_charlen): New function to replace previous.
807 2009-03-28 Paul Thomas <pault@gcc.gnu.org>
810 * parse.c (parse_derived): Do not break on finding pointer,
811 allocatable or private components.
813 2009-03-28 Tobias Burnus <burnus@net-b.de>
816 * option.c (gfc_handle_runtime_check_option): Enable recursion check.
817 * trans-decl.c (gfc_generate_function_code): Add recursion check.
818 * invoke.texi (-fcheck): Add recursive option.
820 2009-03-28 Tobias Burnus <burnus@net-b.de>
823 * resolve.c (gfc_resolve_iterator): Add zero-loop warning.
825 2009-03-28 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
826 Paul Thomas <pault@gcc.gnu.org>
827 Tobias Burnus <burnus@net-b.de>
829 * gfortran.h (gfc_option_t): Add rtcheck.
830 * lang.opt: New option -fcheck.
831 * libgfortran.h: Add GFC_RTCHECK_* constants.
832 * invoke.texi: Document -fcheck.
833 * options.c (gfc_handle_runtime_check_option): New function.
834 (gfc_init_options,gfc_post_options,gfc_handle_option):
837 2009-03-27 Richard Guenther <rguenther@suse.de>
839 * trans-array.c (gfc_conv_descriptor_data_addr): Use
840 gfc_build_addr_expr instead of build_fold_addr_expr.
841 (gfc_trans_allocate_array_storage, gfc_trans_array_constructor_value,
842 gfc_trans_constant_array_constructor, gfc_conv_array_data,
843 gfc_conv_expr_descriptor, gfc_conv_array_parameter): Likewise.
844 * trans-expr.c (gfc_conv_missing_dummy, gfc_conv_variable,
845 gfc_conv_function_val, gfc_conv_operator_assign,
846 gfc_conv_subref_array_arg, gfc_conv_function_call,
847 gfc_conv_expr_reference, gfc_trans_scalar_assign): Likewise.
848 * trans-intrinsic.c (gfc_conv_intrinsic_exponent,
849 gfc_conv_intrinsic_ctime, gfc_conv_intrinsic_fdate,
850 gfc_conv_intrinsic_ttynam, gfc_conv_intrinsic_minmax_char,
851 gfc_conv_intrinsic_fraction, gfc_conv_intrinsic_spacing,
852 gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_set_exponent,
853 gfc_conv_intrinsic_array_transfer, gfc_conv_intrinsic_transfer,
854 gfc_conv_intrinsic_si_kind, gfc_conv_intrinsic_trim): Likewise.
855 * trans-io.c (gfc_trans_io_runtime_check, set_parameter_ref,
856 gfc_convert_array_to_string, gfc_trans_open, gfc_trans_close,
857 build_filepos, gfc_trans_inquire, gfc_trans_wait,
858 nml_get_addr_expr, transfer_namelist_element, build_dt,
859 gfc_trans_dt_end, transfer_array_component, transfer_expr,
860 transfer_array_desc, gfc_trans_transfer): Likewise.
861 * trans-stmt.c (gfc_trans_allocate, gfc_trans_deallocate): Likewise.
862 * trans.c (gfc_build_addr_expr): Mark the base of the address
865 2009-03-27 Tobias Burnus <burnus@net-b.de>
867 * gfortran.h (enum init_local_real.): Add GFC_INIT_REAL_SNAN.
868 (gfc_expr): Add is_snan.
869 * trans-const.c (gfc_conv_mpfr_to_tree): Support SNaN.
870 (gfc_conv_constant_to_tree): Update call to gfc_conv_mpfr_to_tree.
871 * trans-const.h (gfc_conv_mpfr_to_tree): Update prototype.
872 * resolve.c (build_default_init_expr): Update call.
873 * target-memory.c (encode_float): Ditto.
874 * trans-intrinsic.c (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod,
876 2009-03-18 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
878 * lang.opt: Unify help texts for -I, -Wconversion, -d, -fopenmp,
881 2009-03-06 Alexandre Oliva <aoliva@redhat.com>
883 * simplify.c (gfc_simplify_transfer): Zero-initialize the
886 2009-02-27 Tobias Burnus <burnus@net-b.de>
889 * module.c (read_md5_from_module_file): Add missing quote.
891 2009-02-27 Tobias Burnus <burnus@net-b.de>
894 * module.c (read_md5_from_module_file): Include mod version
897 2009-02-26 Paul Thomas <pault@gcc.gnu.org>
900 * interface.c (compare_type_rank_if): Return 1 if the symbols
901 are the same and deal with external procedures where one is
902 identified to be a function or subroutine by usage but the
905 2009-02-26 Paul Thomas <pault@gcc.gnu.org>
908 * trans-array.c (gfc_conv_array_initializer): Convert all
909 expressions rather than ICEing.
911 2009-02-21 Thomas Koenig <tkoenig@gcc.gnu.org>
914 * array.c (ref_dimen_size): Rename to gfc_ref_dimen_size,
915 make global. Change function name in error messages.
916 (ref_size): Change ref_dimen_size to gfc_ref_dimen_size.
917 (gfc_array_ref_shape): Likewise.
918 * gfortran.h: Add prototype for gfc_ref_dimen_size.
919 * simplify.c (simplify_bound_dim): Add ref argument.
920 If the reference isn't a full array, return one for
921 the lower bound and the extent for the upper bound.
922 (simplify_bound): For array sections, take as from the
923 argument. Add reference to all to simplify_bound_dim.
925 2009-02-19 Daniel Franke <franke.daniel@gmail.com>
927 * scanner.c (load_line): At end of line, skip '\r' without setting
930 2009-02-18 Daniel Kraft <d@domob.eu>
932 * gfortran.texi: New chapter about compiler characteristics.
933 (Compiler Characteristics): Document KIND type parameters here.
935 2009-02-18 Tobias Burnus <burnus@net-b.de>
937 * intrinsic.texi (MALLOC): Make example more portable.
939 2009-02-13 Mikael Morin <mikael.morin@tele2.fr>
942 * module.c (gfc_dump_module,gfc_use_module): Add module
945 2009-02-13 Paul Thomas <pault@gcc.gnu.org>
949 * trans-expr.c (gfc_conv_function_val): Stabilize Cray-pointer
950 function references to ensure that a valid expression is used.
951 (gfc_conv_function_call): Pass Cray pointers to procedures.
953 2009-02-03 Jakub Jelinek <jakub@redhat.com>
955 * gfortranspec.c (lang_specific_driver): Update copyright notice
958 2009-01-28 Paul Thomas <pault@gcc.gnu.org>
962 * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use the array
963 descriptor ubound for UBOUND, when the array lbound == 1.
965 2009-01-27 Daniel Kraft <d@domob.eu>
968 * trans-stmt.c (gfc_conv_elemental_dependencies): Create temporary
969 for the real type needed to make it work for subcomponent-references.
971 2009-01-21 Daniel Kraft <d@domob.eu>
973 * trans-stmt.c (gfc_conv_elemental_dependencies): Cleaned up comment.
975 2009-01-20 Paul Thomas <pault@gcc.gnu.org>
978 * resolve.c (check_host_association): Remove the matching to
979 correct an incorrect host association and use manipulation of
980 the expression instead.
982 2009-01-20 Tobias Burnus <burnus@net-b.de>
984 * invoke.texi (RANGE): RANGE also takes INTEGER arguments.
986 2009-01-19 Mikael Morin <mikael.morin@tele2.fr>
989 * simplify.c (simplify_bound): Don't use array specification
990 if variable or component has subsequent references.
992 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
995 * module.c (write_common_0): Add argument 'this_module' and
996 check that non-use associated common blocks are written first.
997 (write_common): Call write_common_0 twice, once with true and
1000 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
1003 * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): Has
1004 been absorbed into gfc_conv_intrinsic_transfer. All
1005 references to it in trans-intrinsic.c have been changed
1006 accordingly. PR fixed by using a temporary for scalar
1007 character transfer, when the source is shorter than the
1010 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
1013 * module.c (write_common_0): Revert patch of 2009-01-05.
1015 2009-01-16 Janus Weil <janus@gcc.gnu.org>
1018 * expr.c (gfc_check_pointer_assign): Allow use-associated procedure
1020 * trans-decl.c (get_proc_pointer_decl,gfc_create_module_variable):
1021 Enable procedure pointers as module variables.
1023 2009-01-14 Steven G. Kargl <kargl@gcc.gnu.org>
1025 * ChangeLog-2007: Clean out svn merge droppings.
1027 2009-01-10 Paul Thomas <pault@gcc.gnu.org>
1030 * target-memory.c (encode_derived): Encode NULL.
1032 2009-01-10 Paul Thomas <pault@gcc.gnu.org>
1035 * resolve.c (check_host_association): Use the symtree name to
1036 search for a potential contained procedure, since this is the
1037 name by which it would be referenced.
1039 2009-01-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1042 * interface.c (gfc_procedure_use): Don't warn about functions
1044 * symbol.c (generate_isocbinding_symbol): Mark c_loc and
1047 2009-01-05 Paul Thomas <pault@gcc.gnu.org>
1050 * module.c (write_common_0): Use the name of the symtree rather
1051 than the common block, to determine if the common has been
1054 2009-01-05 Daniel Franke <franke.daniel@gmail.com>
1057 * check.c (gfc_check_random_seed): Added size check for GET
1058 dummy argument, reworded error messages to follow common pattern.
1060 2009-01-05 Thomas Koenig <tkoenig@gcc.gnu.org>
1063 * trans-types.c (gfc_get_derived_type): Check for the
1064 presence of derived->ns->proc_name before
1065 accessing derived->ns->proc_name->attr.flavor .
1066 * resolve.c (resolve_symbol): Likewise.
1068 2009-01-05 Paul Thomas <pault@gcc.gnu.org>
1071 * gfortran.h : Add bit to gfc_expr 'user_operator'
1072 * interface.c (gfc_extend_expr): Set the above if the operator
1073 is substituted by a function.
1074 * resolve.c (check_host_association): Return if above is set.
1076 2009-01-04 Mikael Morin <mikael.morin@tele2.fr>
1079 * ChangeLog-2008: Fix function name.
1082 * dependency.c (gfc_check_argument_var_dependency):
1083 Move the check for pointerness inside the if block
1084 so that it doesn't affect the return value.
1087 * trans-stmt.c (gfc_trans_call):
1088 Add the dependency code after the loop bounds calculation one.
1090 2009-01-04 Daniel Franke <franke.daniel@gmail.com>
1092 * intrinsic.c (do_simplify): Removed already implemented TODO.
1094 2009-01-04 Daniel Franke <franke.daniel@gmail.com>
1097 * simplify.c (gfc_simplify_merge): New.
1098 * intrinsic.h (gfc_simplify_merge): New prototype.
1099 * intrinsic.c (add_functions): Added simplification for MERGE.
1101 2009-01-04 Mikael Morin <mikael.morin@tele2.fr>
1104 * gfortran.h (gfc_is_data_pointer): Added prototype
1105 * resolve.c (gfc_iso_c_func_interface):
1106 Use gfc_is_data_pointer to test for pointer attribute.
1107 * dependency.c (gfc_is_data_pointer):
1108 Support pointer-returning functions.
1110 2009-01-03 Daniel Franke <franke.daniel@gmail.com>
1112 * symbol.c (save_symbol): Don't SAVE function results.
1114 2009-01-03 Paul Thomas <pault@gcc.gnu.org>
1117 * resolve.c (resolve_call): When searching for proper host
1118 association, use symtree rather than symbol. For everything
1119 except generic subroutines, substitute the symtree in the call
1120 rather than the symbol.
1123 Copyright (C) 2009 Free Software Foundation, Inc.
1125 Copying and distribution of this file, with or without modification,
1126 are permitted in any medium without royalty provided the copyright
1127 notice and this notice are preserved.