1 2009-07-25 Richard Guenther <rguenther@suse.de>
4 * trans-types.c (gfc_get_array_type_bounds): Use
5 build_distinct_type_copy with a proper TYPE_CANONICAL and
6 re-use the type-decl of the original type.
7 * trans-decl.c (build_entry_thunks): Signal cgraph we may not
9 (create_main_function): Likewise.
10 (gfc_generate_function_code): Likewise.
11 * trans-expr.c (gfc_trans_subcomponent_assign): Do not use
12 fold_convert on record types.
14 2009-07-25 Janus Weil <janus@gcc.gnu.org>
17 * decl.c (match_ppc_decl): Implement the PASS attribute for procedure
19 (match_binding_attributes): Ditto.
20 * gfortran.h (gfc_component): Add member 'tb'.
21 (gfc_typebound_proc): Add member 'ppc' and make 'pass_arg' const.
22 * module.c (MOD_VERSION): Bump module version.
23 (binding_ppc): New string constants.
24 (mio_component): Only use formal args if component is a procedure
25 pointer and add 'tb' member.
26 (mio_typebound_proc): Include pass_arg and take care of procedure
28 * resolve.c (update_arglist_pass): Add argument 'name' and take care of
30 (extract_ppc_passed_object): New function, analogous to
31 extract_compcall_passed_object, but for procedure pointer components.
32 (update_ppc_arglist): New function, analogous to
33 update_compcall_arglist, but for procedure pointer components.
34 (resolve_typebound_generic_call): Added argument to update_arglist_pass.
35 (resolve_ppc_call, resolve_expr_ppc): Take care of PASS attribute.
36 (resolve_fl_derived): Check the PASS argument for procedure pointer
38 * symbol.c (verify_bind_c_derived_type): Reject procedure pointer
39 components in BIND(C) types.
41 2009-07-24 Janus Weil <janus@gcc.gnu.org>
44 * array.c (gfc_resolve_character_array_constructor): Use new function
46 * decl.c (add_init_expr_to_sym,variable_decl,match_char_spec,
47 gfc_match_implicit): Ditto.
48 * expr.c (gfc_simplify_expr): Ditto.
49 * gfortran.h (gfc_new_charlen): New prototype.
50 * iresolve.c (check_charlen_present,gfc_resolve_char_achar): Use new
51 function gfc_new_charlen.
52 * module.c (mio_charlen): Ditto.
53 * resolve.c (gfc_resolve_substring_charlen,
54 gfc_resolve_character_operator,fixup_charlen,resolve_fl_derived,
55 resolve_symbol): Ditto.
56 * symbol.c (gfc_new_charlen): New function to create a new gfc_charlen
57 structure and add it to a namespace.
58 (gfc_copy_formal_args_intr): Make sure ts.cl is present
59 for CHARACTER variables.
61 2009-07-24 Jakub Jelinek <jakub@redhat.com>
65 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc,
66 gfc_conv_intrinsic_minmaxval): Handle Infinities and NaNs properly,
68 * trans-array.c (gfc_trans_scalarized_loop_end): No longer static.
69 * trans-array.h (gfc_trans_scalarized_loop_end): New prototype.
71 2009-07-23 Jakub Jelinek <jakub@redhat.com>
74 * io.c (gfc_resolve_dt): Add LOC argument. Fail if
75 dt->io_unit is NULL. Return FAILURE after issuing error about
77 (match_io_element): Don't segfault if current_dt->io_unit is NULL.
78 * gfortran.h (gfc_resolve_dt): Adjust prototype.
79 * resolve.c (resolve_code): Adjust caller.
81 2009-07-22 Paul Thomas <pault@gcc.gnu.org>
84 * trans-decl.c (generate_local_decl): Unreferenced result
85 variables with allocatable components should be treated like
86 INTENT_OUT dummy variables.
88 2009-07-22 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
90 * trans.h (gfc_set_decl_assembler_name): New prototype.
91 * trans-decl.c (gfc_set_decl_assembler_name): New function.
92 (gfc_get_symbol_decl, gfc_get_extern_function_decl,
93 build_function_decl): Use gfc_set_decl_assembler_name instead of
94 SET_DECL_ASSEMBLER_NAME.
95 * trans-common.c (build_common_decl): Use
96 gfc_set_decl_assembler_name instead of SET_DECL_ASSEMBLER_NAME.
98 2009-07-21 Richard Guenther <rguenther@suse.de>
101 * trans-decl.c (gfc_get_extern_function_decl): Do not set
102 DECL_IS_MALLOC for pointer valued functions.
103 (build_function_decl): The same.
105 2009-07-19 Steven G. Kargl <kargl@gcc.gnu.org>
108 * fortran/check.c (gfc_check_cmplx, gfc_check_dcmplx): Add check that
109 the optional second argument isn't of COMPLEX type.
111 2009-07-17 Richard Guenther <rguenther@suse.de>
114 * f95-lang.c (gfc_be_parse_file): Do not finalize the CU here.
115 * trans-decl.c (gfc_gimplify_function): Remove.
116 (build_entry_thunks): Do not gimplify here.
117 (create_main_function): Likewise.
118 (gfc_generate_function_code): Likewise.
120 2009-07-17 Aldy Hernandez <aldyh@redhat.com>
121 Manuel López-Ibáñez <manu@gcc.gnu.org>
124 * trans-expr.c, trans-array.c, trans-openmp.c, trans-stmt.c,
125 trans.c, trans-io.c, trans-decl.c, trans-intrinsic.c: Add location
126 argument to fold_{unary,binary,ternary}, fold_build[123],
127 build_call_expr, build_size_arg, build_fold_addr_expr,
128 build_call_array, non_lvalue, size_diffop,
129 fold_build1_initializer, fold_build2_initializer,
130 fold_build3_initializer, fold_build_call_array,
131 fold_build_call_array_initializer, fold_single_bit_test,
132 omit_one_operand, omit_two_operands, invert_truthvalue,
133 fold_truth_not_expr, build_fold_indirect_ref, fold_indirect_ref,
134 combine_comparisons, fold_builtin_*, fold_call_expr,
135 build_range_check, maybe_fold_offset_to_address, round_up,
138 2009-07-15 Janus Weil <janus@gcc.gnu.org>
141 * resolve.c (resolve_symbol): Don't resolve the formal namespace of a
144 2009-07-14 Taras Glek <tglek@mozilla.com>
145 Rafael Espindola <espindola@google.com>
147 * Make-lang.in (fortran.install-plugin): New target for
148 installing plugin headers.
150 2009-07-13 H.J. Lu <hongjiu.lu@intel.com>
152 * module.c (mio_symbol): Remove the unused variable, formal.
154 2009-07-13 Janus Weil <janus@gcc.gnu.org>
157 * module.c (mio_symbol): If the symbol has formal arguments,
158 the formal namespace will be present.
159 * resolve.c (resolve_actual_arglist): Correctly handle 'called'
160 procedure pointer components as actual arguments.
161 (resolve_fl_derived,resolve_symbol): Make sure the formal namespace
163 * trans-expr.c (gfc_conv_procedure_call): Correctly handle the formal
164 arguments of procedure pointer components.
166 2009-07-12 Tobias Burnus <burnus@net-b.de>
167 Philippe Marguinaud <philippe.marguinaud@meteo.fr>
170 * primary.c (match_charkind_name): Fix condition for $ matching.
173 * libgfortran.h: Typedef the GFC_DTYPE_* enum.
175 2009-07-11 Tobias Burnus <burnus@net-b.de>
178 * check.c (gfc_check_fn_rc2008): New function.
179 * intrinsic.h (gfc_check_fn_rc2008): New prototype.
180 * intrinsic.c (add_functions): Add complex tan, cosh, sinh,
183 2009-07-10 Paul Thomas <pault@gcc.gnu.org>
186 * primary.c (match_kind_param): Return MATCH_NO if the symbol
189 2008-07-09 Paul Thomas <pault@gcc.gnu.org>
192 * resolve.c (check_host_association): Use the existing
193 accessible symtree and treat function expressions with
194 symbols that have procedure flavor.
196 2009-07-09 Janus Weil <janus@gcc.gnu.org>
199 * dump-parse-tree.c (show_expr): Renamed 'is_proc_ptr_comp'.
200 * expr.c (is_proc_ptr_comp): Renamed to 'gfc_is_proc_ptr_comp'.
201 (gfc_check_pointer_assign): Renamed 'is_proc_ptr_comp'.
202 (replace_comp,gfc_expr_replace_comp): New functions, analogous
203 to 'replace_symbol' and 'gfc_expr_replace_symbol', just with components
205 * gfortran.h (gfc_expr_replace_comp): New prototype.
206 (is_proc_ptr_comp): Renamed to 'gfc_is_proc_ptr_comp'.
207 * interface.c (compare_actual_formal): Renamed 'is_proc_ptr_comp'.
208 * match.c (gfc_match_pointer_assignment): Ditto.
209 * primary.c (gfc_match_varspec): Handle array-valued procedure pointers
210 and procedure pointer components. Renamed 'is_proc_ptr_comp'.
211 * resolve.c (resolve_fl_derived): Correctly handle interfaces with
212 RESULT statement, and handle array-valued procedure pointer components.
213 (resolve_actual_arglist,resolve_ppc_call,resolve_expr_ppc): Renamed
215 * trans-array.c (gfc_walk_function_expr): Ditto.
216 * trans-decl.c (gfc_get_symbol_decl): Security check for presence of
218 * trans-expr.c (gfc_conv_procedure_call): Handle array-valued procedure
219 pointer components. Renamed 'is_proc_ptr_comp'.
220 (conv_function_val,gfc_trans_arrayfunc_assign): Renamed
222 (gfc_get_proc_ptr_comp): Do not modify the argument 'e', but instead
224 * trans-io.c (gfc_trans_transfer): Handle array-valued procedure
227 2009-07-09 Tobias Burnus <burnus@net-b.de>
230 * intrinsic.c (gfc_convert_type_warn): Set sym->result.
231 * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
232 for optional arguments.
234 2009-07-08 Tobias Burnus <burnus@net-b.de>
237 * simplify.c (gfc_simplify_sign): Handle signed zero correctly.
238 * trans-intrinsic.c (gfc_conv_intrinsic_sign): Support
240 * invoke.texi (-fno-sign-zero): Add text regarding SIGN intrinsic.
242 2008-07-08 Paul Thomas <pault@gcc.gnu.org>
245 * decl.c (match_procedure_interface): Correct the association
246 or creation of the interface procedure's symbol.
248 2009-07-04 Jakub Jelinek <jakub@redhat.com>
250 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): For integer
251 maxloc initialize limit to -huge-1 rather than just -huge.
253 2009-07-04 Janus Weil <janus@gcc.gnu.org>
256 * interface.c (compare_actual_formal): Take care of proc-pointer-valued
257 functions as actual arguments.
258 * trans-expr.c (gfc_conv_procedure_call): Ditto.
259 * resolve.c (resolve_specific_f0): Use the correct ts.
261 2009-07-02 Michael Matz <matz@suse.de>
264 * trans-array.c (gfc_conv_descriptor_stride_get): Return
265 constant one for strides in the first dimension of ALLOCATABLE
268 2009-06-30 Janus Weil <janus@gcc.gnu.org>
271 * trans-types.c (gfc_get_derived_type): Bugfix, reverting one hunk from
274 2009-06-29 Tobias Burnus <burnus@net-b.de>
277 * trans-expr.c (gfc_conv_procedure_call): Add -fcheck=pointer check.
278 * libgfortran.h: Add GFC_RTCHECK_POINTER.
279 * invoke.texi (-fcheck): Document new pointer option.
280 * options.c (gfc_handle_runtime_check_option): Handle pointer option.
282 * gfortran.texi (C Binding): Improve wording.
283 * iso-c-binding.def: Remove obsolete comment.
285 2009-06-29 Paul Thomas <pault@gcc.gnu.org>
288 * dependency.h : Add second bool* argument to prototype of
289 gfc_full_array_ref_p.
290 * dependency.c (gfc_full_array_ref_p): If second argument is
291 present, return true if last dimension of reference is an
292 element or has unity stride.
293 * trans-array.c : Add NULL second argument to references to
294 gfc_full_array_ref_p.
295 * trans-expr.c : The same, except for;
296 (gfc_trans_arrayfunc_assign): Return fail if lhs reference
297 is not a full array or a contiguous section.
299 2009-06-28 Tobias Burnus <burnus@net-b.de>
300 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
303 * symbol.c (gfc_add_ext_attribute): New function.
304 (gfc_get_sym_tree): New argument allow_subroutine.
305 (gfc_get_symbol,gfc_get_ha_sym_tree,gen_cptr_param,gen_fptr_param
306 gen_shape_param,generate_isocbinding_symbol): Use it.
307 * decl.c (find_special): New argument allow_subroutine.
308 (add_init_expr_to_sym,add_hidden_procptr_result,attr_decl1,
309 match_procedure_in_type,gfc_match_final_decl): Use it.
310 (gfc_match_gcc_attributes): New function.
311 * gfortran.texi (Mixed-Language Programming): New section
312 "GNU Fortran Compiler Directives".
313 * gfortran.h (ext_attr_t): New struct.
314 (symbol_attributes): Use it.
315 (gfc_add_ext_attribute): New prototype.
316 (gfc_get_sym_tree): Update pototype.
317 * expr.c (gfc_check_pointer_assign): Check whether call
318 convention is the same.
319 * module.c (import_iso_c_binding_module, create_int_parameter,
320 use_iso_fortran_env_module): Update gfc_get_sym_tree call.
321 * scanner.c (skip_gcc_attribute): New function.
322 (skip_free_comments,skip_fixed_comments): Use it.
323 (gfc_next_char_literal): Support !GCC$ lines.
324 * resolve.c (check_host_association): Update
325 gfc_get_sym_tree call.
326 * match.c (gfc_match_sym_tree,gfc_match_call): Update
327 gfc_get_sym_tree call.
328 * trans-decl.c (add_attributes_to_decl): New function.
329 (gfc_get_symbol_decl,get_proc_pointer_decl,
330 gfc_get_extern_function_decl,build_function_decl: Use it.
331 * match.h (gfc_match_gcc_attributes): Add prototype.
332 * parse.c (decode_gcc_attribute): New function.
333 (next_free,next_fixed): Support !GCC$ lines.
334 * primary.c (match_actual_arg,check_for_implicit_index,
335 gfc_match_rvalue,gfc_match_rvalue): Update
336 gfc_get_sym_tree call.
338 2009-06-28 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
340 * gfortran.h: Define HAVE_mpc_pow.
341 * arith.c (complex_reciprocal, complex_pow): If HAVE_mpc_pow,
342 don't define these functions.
343 (arith_power): If HAVE_mpc_pow, use mpc_pow.
345 2009-06-26 Janus Weil <janus@gcc.gnu.org>
349 * decl.c (add_hidden_procptr_result): Copy the typespec to the hidden
351 * expr.c (gfc_check_pointer_assign): Enable interface check for
352 procedure pointer assignments where the rhs is a function returning a
354 * resolve.c (resolve_symbol): If an external procedure with unspecified
355 return type can not be implicitly typed, it must be a subroutine.
357 2009-06-24 Janus Weil <janus@gcc.gnu.org>
360 * gfortran.h (gfc_component): New member 'formal_ns'.
361 (gfc_copy_formal_args_ppc,void gfc_ppc_use): New.
362 * interface.c (gfc_ppc_use): New function, analogous to
363 gfc_procedure_use, but for procedure pointer components.
364 * module.c (MOD_VERSION): Bump module version.
365 (mio_component): Treat formal arguments.
366 (mio_formal_arglist): Changed argument from gfc_symbol to
368 (mio_symbol): Changed argument of mio_formal_arglist.
369 * resolve.c (resolve_ppc_call,resolve_expr_ppc): Call gfc_ppc_use,
370 to check actual arguments and treat formal args correctly.
371 (resolve_fl_derived): Copy formal args of procedure pointer components
372 from their interface.
373 * symbol.c (gfc_copy_formal_args_ppc): New function, analogous to
374 gfc_copy_formal_args, but for procedure pointer components.
376 2009-06-22 Janus Weil <janus@gcc.gnu.org>
380 * interface.c (compare_parameter): Set implicit type for function
381 actual arguments with BT_UNKNOWN.
383 2009-06-22 Tobias Burnus <burnus@net-b.de>
387 * simplify.c (gfc_simplify_spread): Fix the case that source=
390 2009-06-22 Paul Thomas <pault@gcc.gnu.org>
393 * interface.c (gfc_search_interface): Hold back a match to an
394 elementary procedure until all other possibilities are
397 2009-06-22 Paul Thomas <pault@gcc.gnu.org>
400 * simplify.c (gfc_simplify_spread): Restrict the result size to
401 the limit for an array constructor.
403 2009-06-21 Janus Weil <janus@gcc.gnu.org>
406 * interface.c (gfc_compare_interfaces): Take care of implicit typing
407 when checking the function attribute. Plus another bugfix.
408 (compare_parameter): Set attr.function and attr.subroutine according
409 to the usage of a procedure as actual argument.
411 2009-06-20 Tobias Burnus <burnus@net-b.de>
414 * trans-decl.c (add_argument_checking): Disable bounds check
415 for allowed argument storage association.
417 2009-06-19 Paul Thomas <pault@gcc.gnu.org>
420 * trans-expr.c (gfc_conv_procedure_call): Do not deallocate
421 allocatable components if the argument is a pointer.
423 2009-06-19 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
425 * gfortran.h (gfc_expr): Use mpc_t to represent complex numbers.
427 * arith.c, dump-parse-tree.c, expr.c, module.c, resolve.c,
428 simplify.c, target-memory.c, target-memory.h, trans-const.c,
429 trans-expr.c: Convert to mpc_t throughout.
431 2009-06-19 Ian Lance Taylor <iant@google.com>
433 * cpp.c (struct gfc_cpp_option_data): Give this struct, used for
434 the global variable gfc_cpp_option, a name.
436 2009-06-19 Janus Weil <janus@gcc.gnu.org>
439 * trans-expr.c (gfc_conv_procedure_call): Only add an extra addr_expr
440 to a procedure pointer actual argument, if it is not itself a
443 2009-06-18 Janus Weil <janus@gcc.gnu.org>
446 * resolve.c (resolve_contained_fntype): Prevent implicit typing for
447 procedures with explicit interface.
448 * symbol.c (gfc_check_function_type): Ditto.
450 2009-06-16 Ian Lance Taylor <iant@google.com>
452 * decl.c (build_struct): Rewrite loop over constructor elements.
454 2009-06-16 Janus Weil <janus@gcc.gnu.org>
458 * expr.c (gfc_check_pointer_assign): Call 'gfc_compare_interfaces' with
460 * gfortran.h (gfc_compare_interfaces): Additional argument.
461 * interface.c (operator_correspondence): Removed.
462 (gfc_compare_interfaces): Additional argument to return error message.
463 Directly use the code from 'operator_correspondence' instead of calling
464 the function. Check for OPTIONAL. Some rearrangements.
465 (check_interface1): Call 'gfc_compare_interfaces' without error message.
466 (compare_parameter): Call 'gfc_compare_interfaces' with error message.
467 * resolve.c (check_generic_tbp_ambiguity): Call 'gfc_compare_interfaces'
468 without error message.
470 2009-06-16 Tobias Burnus <burnus@net-b.de>
473 * trans-decl.c (create_function_arglist): Copy formal charlist to
474 have a proper passed_length for -fcheck=bounds.
476 2009-06-12 Steven G. Kargl <kargls@comcast.net>
478 * arith.c (gfc_enum_initializer): Move function ...
479 * decl.c: ... here. Remove gfc_ prefix and make static.
480 (enumerator_decl): Update function call.
481 * gfortran.h: Remove gfc_enum_initializer prototype.
483 2009-06-12 Aldy Hernandez <aldyh@redhat.com>
485 * trans-array.c (gfc_trans_allocate_array_storage): Pass
487 (gfc_trans_array_constructor_value): Same.
488 (gfc_trans_scalarized_loop_end): Same.
489 (gfc_conv_ss_startstride): Same.
490 (gfc_trans_g77_array): Same.
491 (gfc_trans_dummy_array_bias): Same.
492 (gfc_conv_array_parameter): Same.
493 (structure_alloc_comps): Same.
494 * trans-expr.c (gfc_conv_function_call): Same.
495 (fill_with_spaces): Same.
496 (gfc_trans_string_copy): Same.
497 (gfc_trans_scalar_assign): Same.
498 * trans-stmt.c (gfc_trans_goto): Same.
499 (gfc_trans_if_1): Same.
500 (gfc_trans_simple_do): Same.
501 (gfc_trans_do): Same.
502 (gfc_trans_do_while): Same.
503 (gfc_trans_logical_select): Same.
504 (gfc_trans_select): Same.
505 (gfc_trans_forall_loop): Same.
506 (gfc_trans_nested_forall_loop): Same.
507 (generate_loop_for_temp_to_lhs): Same.
508 (generate_loop_for_rhs_to_temp): Same.
509 (gfc_trans_forall_1): Same.
510 (gfc_trans_where_assign): Same.
511 (gfc_trans_where_3): Same.
512 (gfc_trans_allocate): Same.
513 * trans.c (gfc_finish_block): Same.
514 (gfc_trans_runtime_check): Same.
515 (gfc_call_malloc): Same.
516 (gfc_allocate_with_status): Same.
517 (gfc_call_free): Same.
518 (gfc_deallocate_with_status): Same.
519 (gfc_call_realloc): Same.
520 (gfc_trans_code): Same.
521 * trans-decl.c (gfc_init_default_dt): Same.
522 (gfc_generate_constructors): Same.
523 * trans-io.c (gfc_trans_io_runtime_check): Same.
524 * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Same.
525 (gfc_conv_intrinsic_fdate): Same.
526 (gfc_conv_intrinsic_ttynam): Same.
527 (gfc_conv_intrinsic_minmax): Same.
528 (gfc_conv_intrinsic_minmax_char): Same.
529 (gfc_conv_intrinsic_anyall): Same.
530 (gfc_conv_intrinsic_count): Same.
531 (gfc_conv_intrinsic_arith): Same.
532 (gfc_conv_intrinsic_minmaxloc): Same.
533 (gfc_conv_intrinsic_minmaxval): Same.
534 (gfc_conv_intrinsic_rrspacing): Same.
535 (gfc_conv_intrinsic_array_transfer): Same.
536 (gfc_conv_intrinsic_trim): Same.
537 (gfc_conv_intrinsic_repeat): Same.
539 2009-06-12 Janus Weil <janus@gcc.gnu.org>
542 * resolve.c (resolve_symbol): Additional error check, preventing an
545 2009-06-11 Paul Thomas <pault@gcc.gnu.org>
548 * resolve.c (next_data_value): It is an error if the value is
551 2009-06-11 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
554 * intrinsic.c (add_functions): Add simplifiers for ISNAN,
555 IS_IOSTAT_END and IS_IOSTAT_EOR.
556 * intrinsic.h (gfc_simplify_is_iostat_end, gfc_simplify_is_iostat_eor,
557 gfc_simplify_isnan): New prototypes.
558 * intrinsic.c (gfc_simplify_is_iostat_end, gfc_simplify_is_iostat_eor,
559 gfc_simplify_isnan): New functions.
561 2009-06-11 Jakub Jelinek <jakub@redhat.com>
563 * interface.c (fold_unary): Rename to...
564 (fold_unary_intrinsic): ... this.
565 (gfc_extend_expr): Adjust caller.
566 (gfc_match_generic_spec): Likewise. Initialize *op to INTRINSIC_NONE
568 * expr.c (gfc_simplify_expr): Initialize start and end before calling
571 2009-06-10 Dave Korn <dave.korn.cygwin@gmail.com>
573 * trans-decl.c (create_main_function): Don't build main decl twice.
575 2009-06-09 Tobias Burnus <burnus@net-b.de>
577 * trans-decl.c (gfc_generate_function_code): Use gfc_option.rtcheck
578 instead of flag_bounds_check.
579 * intrinsic.texi (ISO_FORTRAN_ENV): Document INT{8,16,32,64} and
582 2009-06-08 Paul Thomas <pault@gcc.gnu.org>
584 * trans-array.h : Replace prototypes for
585 gfc_conv_descriptor_offset, gfc_conv_descriptor_stride,
586 gfc_conv_descriptor_lbound, gfc_conv_descriptor_ubound with new
587 prototypes of the same names with _get or _set appended.
588 * trans-array.c : Make the originals of the above static and
589 new functions for the _get and _set functions. Update all the
590 references to these descriptor access functions.
591 * trans-expr.c : Update references to the above descriptor
593 * trans-intrinsic.c : The same.
594 * trans-openmp.c : The same.
595 * trans-stmt.c : The same.
597 2009-06-08 Alexandre Oliva <aoliva@redhat.com>
599 * options.c (gfc_post_options): Disable dump_parse_tree
600 during -fcompare-debug-second.
602 2009-06-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
605 * gfortran.h (gfc_open): Add newunit expression to structure.
606 * io.c (io_tag): Add new unit tag and fix whitespace.
607 (match_open_element): Add matching for newunit.
608 (gfc_free_open): Free the newunit expression.
609 (gfc_resolve_open): Add newunit to resolution and check constraints.
610 (gfc_resolve_close): Add check for non-negative unit.
611 (gfc_resolve_filepos): Likewise.
612 (gfc_resolve_dt): Likewise.
613 * trans-io.c (set_parameter_value): Build runtime checks for unit
614 numbers within range of kind=4 integer. (gfc_trans_open) Set the
616 * ioparm.def (IOPARM): Define the newunit parameter as a pointer
617 to GFC_INTEGER_4, pint4.
619 2009-06-07 Daniel Franke <franke.daniel@gmail.com>
623 * array.c (gfc_append_constructor): Added NULL-check.
624 * check.c (gfc_check_spread): Check DIM.
625 (gfc_check_unpack): Check that the ARRAY arguments provides enough
627 * intrinsic.h (gfc_simplify_spread): New prototype.
628 (gfc_simplify_unpack): Likewise.
629 * intrinsic.c (add_functions): Added new simplifier callbacks.
630 * simplify.c (gfc_simplify_spread): New.
631 (gfc_simplify_unpack): New.
632 * expr.c (check_transformational): Allow additional transformational
633 intrinsics in initialization expression.
635 2009-06-07 Daniel Franke <franke.daniel@gmail.com>
639 * check.c (gfc_check_all_any): Check rank of DIM.
640 (gfc_check_count): Likewise.
641 * intrinsic.h (gfc_simplify_all): New prototype.
642 (gfc_simplify_any): Likewise.
643 (gfc_simplify_count): Likewise.
644 (gfc_simplify_sum): Likewise.
645 (gfc_simplify_product): Likewise.
646 * intrinsic.c (add_functions): Added new simplifier callbacks.
647 * simplify.c (transformational_result): New.
648 (simplify_transformation_to_scalar): New.
649 (simplify_transformation_to_array): New.
651 (gfc_simplify_all): New.
652 (gfc_simplify_any): New.
653 (gfc_simplify_count): New.
654 (gfc_simplify_sum): New.
655 (gfc_simplify_product): New.
656 * expr.c (check_transformational): Allow additional transformational
657 intrinsics in initialization expression.
659 2009-06-07 Daniel Franke <franke.daniel@gmail.com>
661 * check.c (dim_rank_check): Return SUCCESS if DIM=NULL.
662 (gfc_check_lbound): Removed (now) redundant check for DIM=NULL.
663 (gfc_check_minloc_maxloc): Likewise.
664 (check_reduction): Likewise.
665 (gfc_check_size): Likewise.
666 (gfc_check_ubound): Likewise.
667 (gfc_check_cshift): Added missing shape-conformance checks.
668 (gfc_check_eoshift): Likewise.
669 * gfortran.h (gfc_check_conformance): Modified prototype to printf-style.
670 * expr.c (gfc_check_conformance): Accept error-message chunks in
671 printf-style. Changed all callers.
674 2009-06-07 Daniel Franke <franke.daniel@gmail.com>
678 * intrinsic.h (gfc_simplify_dot_product): New prototype.
679 (gfc_simplify_matmul): Likewise.
680 (gfc_simplify_transpose): Likewise.
681 * intrinsic.c (add_functions): Added new simplifier callbacks.
682 * simplify.c (init_result_expr): New.
683 (compute_dot_product): New.
684 (gfc_simplify_dot_product): New.
685 (gfc_simplify_matmul): New.
686 (gfc_simplify_transpose): New.
687 * expr.c (check_transformational): Allow transformational intrinsics
688 with simplifier in initialization expression.
690 2009-06-06 Daniel Franke <franke.daniel@gmail.com>
693 * simplify.c (gfc_simplify_reshape): Fixed reshaping of empty arrays
696 2009-06-06 Daniel Franke <franke.daniel@gmail.com>
699 * intrinsic.h (gfc_simplify_pack): New prototype.
700 * intrinsic.c (add_functions): Added
701 simplifier-callback to PACK.
702 * simplify.c (is_constant_array_expr): Moved
703 to beginning of file.
704 (gfc_simplify_pack): New.
705 * check.c (gfc_check_pack): Check that VECTOR has enough elements.
706 Added safeguards for empty arrays.
708 2009-06-05 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
710 * simplify.c (call_mpc_func): Use mpc_realref/mpc_imagref
711 instead of MPC_RE/MPC_IM.
713 2009-06-05 Alexandre Oliva <aoliva@redhat.com>
715 * trans-decl.c (gfc_build_qualified_array): Don't skip generation
717 * trans.h (struct lang_type): Add base_decls.
718 (GFC_TYPE_ARRAY_BASE_DECL): New.
719 * trans-types.c (gfc_get_array_type_bounds): Initialize base decls
720 proactively and excessively.
721 (gfc_get_array_descr_info): Use existing base decls if available.
723 2009-06-04 Daniel Franke <franke.daniel@gmail.com>
726 * check.c (gfc_check_reshape): Additional checks for the
727 SHAPE and ORDER arguments.
728 * simplify.c (gfc_simplify_reshape): Converted argument checks
731 2009-06-03 Tobias Burnus <burnus@net-b.de>
733 * gfortran.texi: Add mixed-language programming, mention
734 varying string lengths, some clean up of introduction parts.
735 * intrinsic.texi (instrinsic modules): Create @menu for subsections.
736 (ISO_C_BINDING): Support ISOCBINDING_INT_FAST128_T.
737 * libgfortran.h: Comment to rember to keep gfortran.texi in sync.
738 * iso-c-binding.def: Support ISOCBINDING_INT_FAST128_T.
740 2009-06-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
741 Tobias Burnus <burnus@net-b.de>
743 * iso-c-binding.def: Use INTMAX_TYPE instead of intmax_type_node.
744 * trans-types.c (init_c_interop_kinds): Remove intmax_type_node.
746 2009-06-03 Alexandre Oliva <aoliva@redhat.com>
748 * module.c (mio_f2k_derived): Initialize cur.
750 2009-06-01 Tobias Burnus <burnus@net-b.de>
753 * trans-decl.c (gfc_sym_identifier): Use "MAIN__" for PROGRAM "main".
754 (create_main_function): Set main_identifier_node.
756 2009-05-29 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
759 * trans-types.c (gfc_build_uint_type): Make nonstatic.
760 * trans.h (gfor_fndecl_clz128, gfor_fndecl_ctz128): New prototypes.
761 * trans-types.h (gfc_build_uint_type): Add prototype.
762 * trans-decl.c (gfc_build_intrinsic_function_decls): Build
763 gfor_fndecl_clz128 and gfor_fndecl_ctz128.
764 * trans-intrinsic.c (gfc_conv_intrinsic_leadz,
765 gfc_conv_intrinsic_trailz): Call the right builtins or library
766 functions, and cast arguments to unsigned types first.
767 * simplify.c (gfc_simplify_leadz): Deal with negative arguments.
769 2009-05-27 Ian Lance Taylor <iant@google.com>
771 * Make-lang.in (gfortran$(exeext)): Change $(COMPILER) to
773 (f951$(exeext)): Likewise.
775 2009-05-27 Tobias Burnus <burnus@net-b.de>
778 * trans-decl.c (create_main_function): Mark MAIN__ and
779 argc/argv as TREE_USED and push/pop function_decl context
782 2009-05-26 Tobias Burnus <burnus@net-b.de>
785 * gfortranspec.c (lang_specific_driver): Stop linking
787 * trans-decl.c (gfc_build_builtin_function_decls): Stop
788 making MAIN__ publicly visible.
789 (gfc_build_builtin_function_decls): Add
790 gfor_fndecl_set_args.
791 (create_main_function) New function.
792 (gfc_generate_function_code): Use it.
794 2009-05-26 Tobias Burnus <burnus@net-b.de>
797 * match.c (gfc_match_nullify): NULLify freed pointer.
799 2009-05-26 Ian Lance Taylor <iant@google.com>
801 * Make-lang.in (gfortranspec.o): Use $(COMPILER).
802 (gfortran$(exeext), f951$(exeext), fortran/cpp.o): Likewise.
804 2009-05-26 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
806 * gfortran.h (GFC_MPC_RND_MODE): New.
807 * simplify.c (call_mpc_func): New helper function.
808 (gfc_simplify_cos, gfc_simplify_exp, gfc_simplify_log,
809 gfc_simplify_sin, gfc_simplify_sqrt): Add MPC support.
811 2009-05-25 Janus Weil <janus@gcc.gnu.org>
814 * primary.c (gfc_match_varspec): Handle procedure pointer components
815 with array return value.
816 * resolve.c (resolve_expr_ppc): Ditto.
817 (resolve_symbol): Make sure the interface of a procedure pointer has
819 * trans-array.c (gfc_walk_function_expr): Handle procedure pointer
820 components with array return value.
821 * trans-expr.c (gfc_conv_component_ref,gfc_conv_procedure_call,
822 gfc_trans_arrayfunc_assign): Ditto.
823 (gfc_trans_pointer_assignment): Handle procedure pointer assignments,
824 where the rhs is a dummy argument.
825 * trans-types.c (gfc_get_ppc_type,gfc_get_derived_type): Handle
826 procedure pointer components with array return value.
828 2009-05-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
833 * trans-array.c (gfc_conv_ss_startstride): Add one to index.
835 2009-05-22 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
838 * module.c (read_md5_from_module_file): Close file before returning.
840 2009-05-18 Janus Weil <janus@gcc.gnu.org>
843 * primary.c (gfc_match_rvalue): Handle procedure pointer components in
845 * resolve.c (resolve_ppc_call,resolve_expr_ppc): Resolve component and
847 (resolve_fl_derived): Procedure pointer components are not required to
848 have constant array bounds in their return value.
850 2009-05-18 Janus Weil <janus@gcc.gnu.org>
852 * intrinsic.c (add_sym): Fix my last commit (r147655),
853 which broke bootstrap.
855 2009-05-18 Richard Guenther <rguenther@suse.de>
858 * trans-expr.c (gfc_trans_zero_assign): For local array
859 destinations use an assignment from an empty constructor.
861 2009-05-18 Janus Weil <janus@gcc.gnu.org>
865 * expr.c (gfc_check_pointer_assign): Check intents when comparing
867 * gfortran.h (typedef struct gfc_intrinsic_arg): Add 'intent' member.
868 (gfc_compare_interfaces): Additional argument.
869 * interface.c (operator_correspondence): Add check for equality of
870 intents, and new argument 'intent_check'.
871 (gfc_compare_interfaces): New argument 'intent_check', which is passed
872 on to operator_correspondence.
873 (check_interface1): Don't check intents when comparing interfaces.
874 (compare_parameter): Do check intents when comparing interfaces.
875 * intrinsic.c (add_sym): Add intents for arguments of intrinsic
877 (add_sym_1,add_sym_1s,add_sym_1m,add_sym_2,add_sym_2s,add_sym_3,
878 add_sym_3ml,add_sym_3red,add_sym_3s,add_sym_4): Use INTENT_IN by
880 (add_sym_1_intent,add_sym_1s_intent,add_sym_2s_intent,add_sym_3s_intent)
881 : New functions to add intrinsic symbols, specifying custom intents.
882 (add_sym_4s,add_sym_5s): Add new arguments to specify intents.
883 (add_functions,add_subroutines): Add intents for various intrinsics.
884 * resolve.c (check_generic_tbp_ambiguity): Don't check intents when
885 comparing interfaces.
886 * symbol.c (gfc_copy_formal_args_intr): Copy intent.
888 2009-05-17 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
890 * iso-fortran-env.def: Define INT8, INT16, INT32, INT64, REAL32,
892 * gfortran.h (gfc_get_int_kind_from_width_isofortranenv,
893 gfc_get_real_kind_from_width_isofortranenv): New prototypes.
894 * iso-c-binding.def: Update definitions for the INT*_T,
895 INT_LEAST*_T and INT_FAST*_T named parameters.
896 * trans-types.c (get_typenode_from_name, get_int_kind_from_name,
897 gfc_get_real_kind_from_width_isofortranenv): New functions.
899 2009-05-17 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
902 * intrinsic.c (add_functions, add_subroutines): Fix argument
903 names and wrap long lines.
904 * intrinsic.texi: Fix documentation and argument names of
905 LOG_GAMMA, DATAN2, DBESJN, DTIME, ETIME, FSTAT, STAT, LSTAT,
906 GET_COMMAND, IDATE, LTIME, MOVE_ALLOC, NINT, OR, PRODUCT,
907 SUM, RAND, RANDOM_SEED, REAL, SELECTED_INT_KIND,
908 SELECTED_REAL_KIND and XOR.
910 2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
913 * intrinsic.c (add_functions): Use ERFC_SCALED simplification.
914 * intrinsic.h (gfc_simplify_erfc_scaled): New prototype.
915 * simplify.c (fullprec_erfc_scaled, asympt_erfc_scaled,
916 gfc_simplify_erfc_scaled): New functions.
918 2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
921 * resolve.c (resolve_substring): Don't allow too large substring
923 (gfc_resolve_substring_charlen): Fix typo.
924 (gfc_resolve_character_operator): Fix typo.
925 (resolve_charlen): Catch unreasonably large string lengths.
926 * simplify.c (gfc_simplify_len): Don't error out on LEN
929 2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
932 * decl.c (set_enum_kind): Use global short-enums flag.
933 * gfortran.h (gfc_option_t): Remove short_enums flag.
934 * lang.opt (-fshort-enums): Refer to C documentation.
935 * options.c (gfc_init_options, gfc_handle_option): Use global
938 2009-05-15 Tobias Burnus <burnus@net-b.de>
941 * f95-lang.c: Add gfc_maybe_initialize_eh.
942 * gfortran.h: Add gfc_maybe_initialize_eh prototype.
943 * Make-lang.in: Add new .h dendencies for f95-lang.c
944 * openmp.c (resolve_omp_do): Call gfc_maybe_initialize_eh.
945 * misc.c (gfc_free): Avoid #define trickery for free.
947 2009-05-14 Steven G. Kargl <kargl@gcc.gnu.org>
949 * dump-parse-tree.c (show_code_node): Add ERRMSG to the dumping
950 of allocate and deallocate statements.
952 2009-05-14 Ian Lance Taylor <iant@google.com>
954 * decl.c (match_attr_spec): Change d to unsigned int.
955 * dump-parse-tree.c (show_namespace): Change op to int. Add cast.
956 * interface.c (gfc_check_interfaces): Change i to int. Add casts.
957 * module.c (read_module): Change i to int. Add cast.
958 (write_module): Change i to int.
959 * symbol.c (gfc_get_namespace): Change in to int.
960 (gfc_free_namespace): Change i to int.
961 * trans-io.c (gfc_build_io_library_fndecls): Change ptype to
962 unsigned int. Add cast.
963 * trans-types.c (gfc_init_kinds): Change mode to unsigned int.
966 2009-05-14 Daniel Kraft <d@domob.eu>
969 * dump-parse-tree.c (show_typebound): Fix missing adaption to new
970 type-bound procedure storage structure.
972 2009-05-14 Janus Weil <janus@gcc.gnu.org>
975 * decl.c (gfc_match_function_decl): Use gfc_add_type.
976 * symbol.c (gfc_add_type): Better checking for duplicate types in
977 function declarations. And: Always give an error for duplicte types,
978 not just a warning with -std=gnu.
980 2009-05-14 Jakub Jelinek <jakub@redhat.com>
983 * io.c (resolve_tag_format): CHARACTER array in FMT= argument
984 isn't an extension. Reject non-CHARACTER array element of
985 assumed shape or pointer or assumed size array.
986 * trans-array.c (array_parameter_size): New function.
987 (gfc_conv_array_parameter): Add size argument. Call
988 array_parameter_size if it is non-NULL.
989 * trans-array.h (gfc_conv_array_parameter): Adjust prototype.
990 * trans-expr.c (gfc_conv_function_call, gfc_trans_arrayfunc_assign):
992 * trans-intrinsic.c (gfc_conv_intrinsic_loc): Likewise.
993 * trans-io.c (gfc_convert_array_to_string): Rewritten.
995 2009-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
997 * gfortran.h (gfc_code): Rename struct member expr to expr1.
998 * openmp.c (resolve_omp_atomic): Update expr to expr1.
999 * interface.c (gfc_extend_assign): Ditto.
1000 * trans-expr.c (gfc_conv_expr_reference, gfc_trans_assignment,
1001 gfc_trans_init_assign): Ditto.
1002 * dump-parse-tree.c (show_code_node): Ditto.
1003 * trans-openmp.c (gfc_trans_omp_atomic): Ditto.
1004 * trans-stmt.c ( gfc_trans_label_assign, gfc_trans_goto, gfc_trans_call,
1005 gfc_trans_return, gfc_trans_pause, gfc_trans_stop, gfc_trans_if_1,
1006 gfc_trans_arithmetic_if, gfc_trans_do_while, gfc_trans_integer_select,
1007 gfc_trans_logical_select, gfc_trans_character_select
1008 forall_make_variable_temp, check_forall_dependencies
1009 gfc_trans_forall_1, gfc_trans_where_2, gfc_trans_where_3
1010 gfc_trans_where, gfc_trans_allocate, gfc_trans_deallocate): Ditto.
1011 * io.c (match_io_element, gfc_match_inquire): Ditto.
1012 * resolve.c (resolve_typebound_call, resolve_ppc_call,
1013 resolve_allocate_expr, resolve_allocate_deallocate, resolve_select,
1014 resolve_transfer, resolve_where, gfc_resolve_assign_in_forall,
1015 gfc_resolve_blocks, resolve_code, build_init_assign): Ditto.
1016 * st.c (gfc_free_statement): Ditto.
1017 * match.c (gfc_match_assignment, gfc_match_pointer_assignment,
1018 match_arithmetic_if, gfc_match_if, gfc_match_elseif
1019 gfc_match_stopcode, gfc_match_assign, gfc_match_goto,
1020 gfc_match_nullify, match_typebound_call, gfc_match_call
1021 gfc_match_select, match_simple_where, gfc_match_where
1022 gfc_match_elsewhere, match_simple_forall, gfc_match_forall): Ditto.
1023 * trans-io.c (gfc_trans_transfer): Ditto.
1024 * parse.c (parse_where_block, parse_if_block): Ditto.
1026 2009-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
1028 * gfortran.h (gfc_code): Rename struct member label to label1.
1029 * dump-parse-tree.c (show_code_node): Update symbol.
1030 * trans-stmt.c (gfc_trans_label_assign, gfc_trans_goto,
1031 gfc_trans_arithmetic_if): Ditto.
1032 * resolve.c (gfc_resolve_blocks, resolve_code): Ditto.
1033 * match.c (match_arithmetic_if, gfc_match_if, gfc_reference_st_label,
1034 gfc_match_assign, gfc_match_goto): Ditto.
1035 * parse.c (parse_do_block): Ditto.
1037 2009-05-13 Tobias Burnus <burnus@net-b.de>
1040 * gfortran.h (gfc_exec_op): Add EXEC_END_PROCEDURE.
1041 * dump-parse-tree.c (show_code_node): Use EXEC_END_PROCEDURE.
1042 * trans.c (gfc_trans_code): Ditto.
1043 * resolve.c (resolve_code): Ditto.
1044 * st.c (gfc_free_statement): Ditto.
1045 * parse.c (accept_statement): Ditto.
1047 2009-05-12 Tobias Burnus <burnus@net-b.de>
1050 * decl.c (gfc_match_kind_spec): Turn C kind error into a warning.
1052 2009-05-11 Steve Ellcey <sje@cup.hp.com>
1054 * resolve.c (check_host_association): Initialize tail.
1056 2009-05-11 Janus Weil <janus@gcc.gnu.org>
1059 * resolve.c (resolve_fl_derived): Only return FAILURE if
1060 gfc_notify_std fails.
1062 2009-05-10 Ian Lance Taylor <iant@google.com>
1064 * gfortran.h (enum gfc_omp_sched_kind): New enum, broken out of
1066 (enum gfc_omp_default_sharing): Likewise.
1067 * module.c (enum gfc_rsym_state): New enum, broken out of
1069 (enum gfc_wsym_state): Likewise.
1070 * parse.c (enum state_order): New enum, broken out of st_state.
1072 2009-05-10 Paul Thomas <pault@gcc.gnu.org>
1075 * trans-array.c (gfc_trans_array_constructor_value): Fold
1076 convert numeric constants.
1077 (gfc_build_constant_array_constructor): The same.
1079 2009-05-10 Paul Thomas <pault@gcc.gnu.org>
1082 * trans-expr.c (gfc_conv_operator_assign): Remove function.
1083 * trans.h : Remove prototype for gfc_conv_operator_assign.
1084 * trans-stmt.c (gfc_conv_elemental_dependencies): Initialize
1085 derivde types with intent(out).
1086 (gfc_trans_call): Add mask, count1 and invert arguments. Add
1087 code to use mask for WHERE assignments.
1088 (gfc_trans_forall_1): Use new arguments for gfc_trans_call.
1089 (gfc_trans_where_assign): The gfc_symbol argument is replaced
1090 by the corresponding code. If this has a resolved_sym, then
1091 gfc_trans_call is called. The call to gfc_conv_operator_assign
1093 (gfc_trans_where_2): Change the last argument in the call to
1094 gfc_trans_where_assign.
1095 * trans-stmt.h : Modify prototype for gfc_trans_call.
1096 * trans.c (gfc_trans_code): Use new args for gfc_trans_call.
1098 2009-05-08 Janus Weil <janus@gcc.gnu.org>
1101 * intrinsic.c (gfc_is_intrinsic): Do not add the EXTERNAL attribute if
1102 the symbol is a module procedure.
1104 2009-05-08 Tobias Burnus <burnus@net-b.de>
1106 * invoke.texi: Add do/recursion to the -fcheck= summary.
1108 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1111 * gfortran.texi: Document that we don't support variable FORMAT
1114 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1117 * error.c (error_print): Add missing break statement.
1119 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1122 * invoke.texi: Document that -fdollar-ok does not allow $ to be
1123 used in IMPLICIT statement.
1125 2009-05-06 Janus Weil <janus@gcc.gnu.org>
1126 Paul Thomas <pault@gcc.gnu.org>
1129 * decl.c (match_procedure_interface): New function to match the
1130 interface for a PROCEDURE statement.
1131 (match_procedure_decl): Call match_procedure_interface.
1132 (match_ppc_decl): New function to match the declaration of a
1133 procedure pointer component.
1134 (gfc_match_procedure): Call match_ppc_decl.
1135 (match_binding_attributes): Add new argument 'ppc' and handle the
1136 POINTER attribute for procedure pointer components.
1137 (match_procedure_in_type,gfc_match_generic): Added new argument to
1138 match_binding_attributes.
1139 * dump-parse-tree.c (show_expr,show_components,show_code_node): Handle
1140 procedure pointer components.
1141 * expr.c (free_expr0,gfc_copy_expr,gfc_simplify_expr): Handle EXPR_PPC.
1142 (gfc_check_pointer_assign): Handle procedure pointer components, but no
1144 (is_proc_ptr_comp): New function to determine if an expression is a
1145 procedure pointer component.
1146 * gfortran.h (expr_t): Add EXPR_PPC.
1147 (symbol_attribute): Add new member 'proc_pointer_comp'.
1148 (gfc_component): Add new member 'formal'.
1149 (gfc_exec_op): Add EXEC_CALL_PPC.
1150 (gfc_get_default_type): Changed first argument.
1151 (is_proc_ptr_comp): Add prototype.
1152 (gfc_match_varspec): Add new argument.
1153 * interface.c (compare_actual_formal): Handle procedure pointer
1155 * match.c (gfc_match_pointer_assignment,match_typebound_call): Handle
1156 procedure pointer components.
1157 * module.c (mio_expr): Handle EXPR_PPC.
1158 * parse.c (parse_derived): Handle procedure pointer components.
1159 * primary.c (gfc_match_varspec): Add new argument 'ppc_arg' and handle
1160 procedure pointer components.
1161 (gfc_variable_attr): Handle procedure pointer components.
1162 (gfc_match_rvalue): Added new argument to gfc_match_varspec and changed
1163 first argument of gfc_get_default_type.
1164 (match_variable): Added new argument to gfc_match_varspec.
1165 * resolve.c (resolve_entries,set_type,resolve_fl_parameter): Changed
1166 first argument of gfc_get_default_type.
1167 (resolve_structure_cons,resolve_actual_arglist): Handle procedure
1169 (resolve_ppc_call): New function to resolve a call to a procedure
1170 pointer component (subroutine).
1171 (resolve_expr_ppc): New function to resolve a call to a procedure
1172 pointer component (function).
1173 (gfc_resolve_expr): Handle EXPR_PPC.
1174 (resolve_code): Handle EXEC_CALL_PPC.
1175 (resolve_fl_derived): Copy the interface for a procedure pointer
1177 (resolve_symbol): Fix overlong line.
1178 * st.c (gfc_free_statement): Handle EXEC_CALL_PPC.
1179 * symbol.c (gfc_get_default_type): Changed first argument.
1180 (gfc_set_default_type): Changed first argument of gfc_get_default_type.
1181 (gfc_add_component): Initialize ts.type to BT_UNKNOWN.
1182 * trans.h (gfc_conv_function_call): Renamed.
1183 * trans.c (gfc_trans_code): Handle EXEC_CALL_PPC.
1184 * trans-expr.c (gfc_conv_component_ref): Ditto.
1185 (gfc_conv_function_val): Rename to 'conv_function_val', add new
1186 argument 'expr' and handle procedure pointer components.
1187 (gfc_conv_operator_assign): Renamed gfc_conv_function_val.
1188 (gfc_apply_interface_mapping_to_expr): Handle EXPR_PPC.
1189 (gfc_conv_function_call): Rename to 'gfc_conv_procedure_call', add new
1190 argument 'expr' and handle procedure pointer components.
1191 (gfc_get_proc_ptr_comp): New function to get the backend decl for a
1192 procedure pointer component.
1193 (gfc_conv_function_expr): Renamed gfc_conv_function_call.
1194 (gfc_conv_structure): Handle procedure pointer components.
1195 * trans-intrinsic.c (gfc_conv_intrinsic_funcall,
1196 conv_generic_with_optional_char_arg): Renamed gfc_conv_function_call.
1197 * trans-stmt.h (gfc_get_proc_ptr_comp): Add prototype.
1198 * trans-stmt.c (gfc_trans_call): Renamed gfc_conv_function_call.
1199 * trans-types.h (gfc_get_ppc_type): Add prototype.
1200 * trans-types.c (gfc_get_ppc_type): New function to build a tree node
1201 for a procedure pointer component.
1202 (gfc_get_derived_type): Handle procedure pointer components.
1204 2009-05-06 Tobias Burnus <burnus@net-b.de>
1207 * resolve.c (resolve_symbol): Print no warning for implicitly
1208 typed intrinsic functions.
1210 2009-05-05 Janus Weil <janus@gcc.gnu.org>
1213 * expr.c (gfc_check_pointer_assign): Check for statement functions and
1214 internal procedures in procedure pointer assignments.
1216 2009-04-28 Janus Weil <janus@gcc.gnu.org>
1219 * resolve.c (resolve_symbol): Correctly copy the interface of a
1220 PROCEDURE statement if the interface involves a RESULT variable.
1222 2009-04-28 Janus Weil <janus@gcc.gnu.org>
1226 * expr.c (gfc_check_pointer_assign): Correctly detect if the left hand
1228 * parse.c (gfc_fixup_sibling_symbols): Don't check for ambiguity.
1230 2009-04-28 Paul Thomas <pault@gcc.gnu.org>
1233 * trans_expr.c (gfc_conv_procedure_call): Deep copy a derived
1234 type parentheses argument if it is a variable with allocatable
1237 2009-04-27 Ian Lance Taylor <iant@google.com>
1239 * trans-intrinsic.c (DEFINE_MATH_BUILTIN): Add casts to enum
1241 * trans-io.c (st_parameter_field): Add casts to enum type.
1243 2009-04-26 Steven G. Kargl <kargl@gcc.gnu.org>
1246 fortran/data.c (gfc_assign_data_value): If the lvalue is an
1247 assumed character length entity in a data statement, then
1248 return FAILURE to prevent segmentation fault.
1250 2009-04-26 Jakub Jelinek <jakub@redhat.com>
1252 * trans-decl.c: Include pointer-set.h.
1253 (nonlocal_dummy_decl_pset, tree nonlocal_dummy_decls): New variables.
1254 (gfc_nonlocal_dummy_array_decl): New function.
1255 (gfc_get_symbol_decl): Call it for non-local dummy args with saved
1257 (gfc_get_symbol_decl): Set DECL_BY_REFERENCE when needed.
1258 (gfc_generate_function_code): Initialize nonlocal_dummy_decl{s,_pset},
1259 chain it to outermost block's vars, destroy it afterwards.
1260 * Make-lang.in (trans-decl.o): Depend on pointer-set.h.
1262 2009-04-25 Janus Weil <janus@gcc.gnu.org>
1265 * decl.c (gfc_match_import): Use 'sym->name' instead of 'name'.
1266 They differ if the symbol has been use-renamed.
1268 2009-04-24 Ian Lance Taylor <iant@google.com>
1270 * gfortran.h (enum gfc_symbol_type): New named enum type, broken
1271 out of struct gfc_symbol.
1272 (struct gfc_symbol): Use enum gfc_symbol_type.
1273 (enum gfc_array_ref_dimen_type): New named enum type, broken out
1274 of struct gfc_array_ref).
1275 (struct gfc_array_ref): Use enum gfc_array_ref_dimen_type.
1276 (mod_pointee_as): Update declaration.
1277 * decl.c (add_global_entry): Change type to enum gfc_symbol_type.
1278 (gfc_mod_pointee_as): Change return type to "match".
1279 * module.c (mio_array_ref): Add cast to enum type.
1280 (mio_symbol): Likewise.
1281 * resolve.c (resolve_global_procedure): Change type to enum
1283 * trans-io.c (gfc_build_st_parameter): Change type to unsigned
1286 2009-04-24 Daniel Kraft <d@domob.eu>
1288 * gfortran.h (gfc_get_typebound_proc): Removed as macro, now a function.
1289 (struct gfc_symtree): Moved "typebound" member inside union.
1290 (struct gfc_namespace): Add "tb_sym_root" as new symtree to sort out
1291 type-bound procedures there.
1292 (gfc_get_tbp_symtree): New procedure.
1293 * symbol.c (tentative_tbp_list): New global.
1294 (gfc_get_namespace): NULL new "tb_sym_root" member.
1295 (gfc_new_symtree): Removed initialization of "typebound" member.
1296 (gfc_undo_symbols): Process list of tentative tbp's.
1297 (gfc_commit_symbols): Ditto.
1298 (free_tb_tree): New method.
1299 (gfc_free_namespace): Call it.
1300 (gfc_get_typebound_proc): New method.
1301 (gfc_get_tbp_symtree): New method.
1302 (gfc_find_typebound_proc): Adapt to structural changes of gfc_symtree
1303 and gfc_namespace with regards to tbp's.
1304 * dump-parse-tree.c (show_typebound): Ditto.
1305 * primary.c (gfc_match_varspec): Ditto. Don't reference tbp-symbol
1306 as it isn't a symbol any longer.
1307 * module.c (mio_typebound_symtree): Adapt to changes.
1308 (mio_typebound_proc): Ditto, create symtrees using "gfc_get_tbp_symtree"
1309 rather than "gfc_get_sym_tree".
1310 (mio_f2k_derived): Ditto.
1311 * decl.c (match_procedure_in_type): Ditto.
1312 (gfc_match_generic): Ditto. Don't reference tbp-symbol.
1313 * resolve.c (check_typebound_override): Adapt to changes.
1314 (resolve_typebound_generic): Ditto.
1315 (resolve_typebound_procedures): Ditto.
1316 (ensure_not_abstract_walker): Ditto.
1317 (ensure_not_abstract): Ditto.
1318 (resolve_typebound_procedure): Ditto, ignore erraneous symbols (for
1319 instance, through removed tentative ones).
1320 * gfc-internals.texi (Type-bound procedures): Document changes.
1322 2009-04-24 Janus Weil <janus@gcc.gnu.org>
1326 * symbol.c (gfc_copy_formal_args_intr): Set attr.flavor and attr.dummy
1327 for the formal arguments.
1329 2009-04-21 Taras Glek <tglek@mozilla.com>
1331 * f95-lang.c: Update GTY annotations to new syntax.
1332 * trans-intrinsic.c: Likewise.
1333 * trans-io.c: Likewise.
1334 * trans.h: Likewise.
1336 2009-04-22 Janus Weil <janus@gcc.gnu.org>
1339 * decl.c (add_hidden_procptr_result): Bugfix for procptr results.
1340 (match_procedure_decl): Set if_source.
1341 * expr.c (gfc_check_pointer_assign): Bugfix: Return after error.
1342 And: Check interface also for IFSRC_UNKNOWN (return type may be known).
1343 * gfortran.h (typedef enum ifsrc): Remove IFSRC_USAGE,
1344 add documentation. Rename copy_formal_args and copy_formal_args_intr.
1345 * interface.c (gfc_compare_interfaces): Check for return types,
1346 handle IFSRC_UNKNOWN.
1347 (compare_intr_interfaces,compare_actual_formal_intr): Obsolete, removed.
1348 (gfc_procedure_use): Modified handling of intrinsics.
1349 * intrinsic.c (add_functions): Bugfix for "dim".
1350 * resolve.c (resolve_intrinsic): New function to resolve intrinsics,
1351 which copies the interface from isym to sym.
1352 (resolve_procedure_expression,resolve_function): Use new function
1353 'resolve_intrinsic'.
1354 (resolve_symbol): Add function attribute for externals with return type
1355 and use new function 'resolve_intrinsic'.
1356 * symbol.c (ifsrc_types): Remove string for IFSRC_USAGE.
1357 (copy_formal_args): Renamed to gfc_copy_formal_args.
1358 (copy_formal_args_intr): Renamed to gfc_copy_formal_args_intr.
1359 * trans-const.c (gfc_conv_const_charlen): Handle cl==NULL.
1361 2009-04-21 Joseph Myers <joseph@codesourcery.com>
1363 * ChangeLog, ChangeLog-2002, ChangeLog-2003, ChangeLog-2004,
1364 ChangeLog-2005, ChangeLog-2006, ChangeLog-2007, ChangeLog-2008,
1365 ChangeLog.ptr, config-lang.in, ioparm.def, mathbuiltins.def: Add
1366 copyright and license notices.
1367 * ChangeLog, ChangeLog-2005, ChangeLog-2006, ChangeLog-2007,
1368 ChangeLog-2008: Correct dates.
1370 2009-04-20 Tobias Burnus <burnus@net-b.de>
1373 * scanner.c (load_line): Fix bogus "&" compile-time diagnostic.
1375 2009-04-20 Paul Thomas <pault@gcc.gnu.org>
1378 * resolve.c (is_sym_host_assoc): New function.
1379 (resolve_fl_derived): Call it when checking PRIVATE components
1380 of PUBLIC derived types. Change gfc_error to a gfc_notify_std
1382 (resolve_fl_namelist): Call it twice to check for host
1385 2009-04-20 Ian Lance Taylor <iant@google.com>
1387 * module.c (import_iso_c_binding_module): Add casts to enum type.
1388 * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Change op to enum
1390 (gfc_conv_intrinsic_anyall): Likewise.
1391 (gfc_conv_intrinsic_arith): Likewise.
1392 (gfc_conv_intrinsic_minmaxloc): Likewise.
1393 (gfc_conv_intrinsic_minmaxval): Likewise.
1394 (gfc_conv_intrinsic_bitop): Likewise.
1395 (gfc_conv_intrinsic_singlebitop): Likewise.
1396 (gfc_conv_intrinsic_strcmp): Likewise.
1398 2009-04-20 Vasilis Liaskovitis <vliaskov@gmail.com>
1399 Jakub Jelinek <jakub@redhat.com>
1402 * trans.h (OMPWS_WORKSHARE_FLAG, OMPWS_CURR_SINGLEUNIT,
1403 OMPWS_SCALARIZER_WS, OMPWS_NOWAIT): Define.
1404 (ompws_flags): New extern decl.
1405 * trans-array.c (gfc_trans_scalarized_loop_end): Build OMP_FOR
1406 for the outer dimension if ompws_flags allow it.
1407 * trans.c (gfc_generate_code): Clear ompws_flags.
1408 * trans-expr.c (gfc_trans_assignment_1): Allow worksharing
1409 array assignments inside of !$omp workshare.
1410 * trans-stmt.c (gfc_trans_where_3): Similarly for where statements
1412 * trans-openmp.c (ompws_flags): New variable.
1413 (gfc_trans_omp_workshare): Rewritten.
1415 2009-04-11 Daniel Kraft <d@domob.eu>
1418 * gfortran.h (struct gfc_charlen): New field "passed_length" to store
1419 the actual passed string length for dummy arguments.
1420 * trans-decl.c (gfc_create_string_length): Formatting fixes and added
1421 assertion, moved a local variable into the innermost block it is needed.
1422 (create_function_arglist): Removed TODO about the check being
1423 implemented and initialize cl->passed_length here.
1424 (add_argument_checking): New method.
1425 (gfc_generate_function_code): Call the argument checking method.
1427 2009-04-11 Janus Weil <janus@gcc.gnu.org>
1430 * symbol.c (check_conflict): Reject procedure pointers for -std=f95.
1432 2009-04-11 Daniel Franke <franke.daniel@gmail.com>
1434 * resolve.c (resolve_global_procedure): Enable whole-file checking for
1435 procedures that are declared later in the file.
1437 2009-04-10 Paolo Bonzini <bonzini@gnu.org>
1440 * trans.c (gfc_allocate_with_status): Fix type mismatches
1443 2009-04-10 Daniel Franke <franke.daniel@gmail.com>
1446 * expr.c (find_array_section): Leave early on zero-sized arrays.
1448 2009-04-09 Janus Weil <janus@gcc.gnu.org>
1451 * decl.c (add_hidden_procptr_result): New function for handling
1452 procedure pointer return values by adding a hidden result variable.
1453 (variable_decl,match_procedure_decl,gfc_match_function_decl,
1454 gfc_match_subroutine,gfc_match_end,attr_decl1): Handle procedure pointer
1456 * parse.c (parse_interface): Add EXTERNAL attribute only after
1457 FUNCTION/SUBROUTINE declaration is complete.
1458 * primary.c (replace_hidden_procptr_result): New function for replacing
1459 function symbol by hidden result variable.
1460 (gfc_match_rvalue,match_variable): Replace symbol by hidden result
1462 * resolve.c (resolve_contained_fntype,resolve_function,resolve_variable,
1463 resolve_symbol): Allow for procedure pointer function results.
1464 (resolve_fl_procedure): Conflict detection moved here from
1466 * symbol.c (gfc_check_function_type): Allow for procedure pointer
1468 (check_conflict): Move some conflict detection to resolution stage.
1469 * trans-types.c (gfc_sym_type,gfc_get_function_type): Handle hidden
1472 2009-04-08 Jakub Jelinek <jakub@redhat.com>
1474 * trans-types.c (gfc_init_types): Ensure gfc_integer_types doesn't
1475 contain TYPE_STRING_FLAG types.
1477 2009-04-08 Janne Blomqvist <jb@gcc.gnu.org>
1480 * invoke.texi (fdollar-ok): Fix typo.
1482 2009-04-08 Daniel Franke <franke.daniel@gmail.com>
1485 * invoke.texi (fdollar-ok): Clarify limitations.
1487 2009-04-08 Paul Thomas <pault@gcc.gnu.org>
1490 * trans-array.c (gfc_trans_deferred_array): Return if this
1491 is a result variable.
1493 2009-04-07 Janus Weil <janus@gcc.gnu.org>
1496 * trans-decl.c (gfc_get_symbol_decl): Correctly set decl location for
1497 procedure pointer decls.
1499 2009-04-07 Janus Weil <janus@gcc.gnu.org>
1502 * expr.c (gfc_check_pointer_assign): Enable interface check for
1504 * gfortran.h: Add copy_formal_args_intr.
1505 * interface.c (gfc_compare_interfaces): Call gfc_compare_intr_interfaces
1506 if second argument is an intrinsic.
1507 (compare_intr_interfaces): Correctly set attr.function, attr.subroutine
1509 (compare_parameter): Call gfc_compare_interfaces also for intrinsics.
1510 * resolve.c (resolve_specific_f0,resolve_specific_s0): Don't resolve
1511 intrinsic interfaces here. Must happen earlier.
1512 (resolve_symbol): Resolution of intrinsic interfaces moved here from
1513 resolve_specific_..., and formal args are now copied from intrinsic
1515 * symbol.c (copy_formal_args_intr): New function to copy the formal
1516 arguments from an intinsic procedure.
1518 2009-04-06 Paul Thomas <pault@gcc.gnu.org>
1521 * dependency.c (ref_same_as_full_array): New function.
1522 (gfc_dep_resolver): Call it.
1524 2009-04-06 Janus Weil <janus@gcc.gnu.org>
1527 * decl.c (match_procedure_decl): Fix double declaration problems with
1528 PROCEDURE statements.
1529 * symbol.c (gfc_add_type): Ditto.
1531 2009-04-06 Paul Thomas <pault@gcc.gnu.org>
1534 * trans-array.c (gfc_conv_array_ref): If the symbol has the
1535 temporary attribute use the array_spec for the bounds.
1536 * gfortran.h : Add the temporary field to the structure
1538 * trans-stmt.c (forall_make_variable_temp): Set the symbol's
1539 temporary attribute.
1541 2009-04-05 Daniel Franke <franke.daniel@gmail.com>
1544 * trans-array.c (gfc_trans_array_constructor_value): Shadow
1545 implied do-loop variable to avoid spurious middle-end warnings.
1547 2009-04-04 Tobias Burnus <burnus@net-b.de>
1550 * trans-decl.c (gfc_generate_function_code): Move recursive
1551 check to the right position.
1553 2009-04-04 Paul Thomas <pault@gcc.gnu.org>
1556 * trans-common.c (translate_common): Do not offset the whole
1559 2009-04-03 Tobias Burnus <burnus@net-b.de>
1562 * resolve.c (resolve_common_vars): Add FL_VARIABLE to symbol
1563 if it is not a procedure pointer.
1564 * primary.c (match_actual_arg): Ditto.
1566 2009-03-31 Joseph Myers <joseph@codesourcery.com>
1568 PR preprocessor/15638
1569 * cpp.c (cb_cpp_error): Handle CPP_DL_FATAL.
1571 2009-03-30 Steven G. Kargl <kargls@comcast.net>
1574 * trans-stmt.c(gfc_trans_allocate): Add translation of ERRMSG.
1575 (gfc_trans_deallocate): Add translation of ERRMSG. Remove stale
1576 comments. Minor whitespace cleanup.
1577 * resolve.c(is_scalar_expr_ptr): Whitespace cleanup.
1578 (resolve_deallocate_expr (gfc_expr *e): Update error message.
1579 (resolve_allocate_expr): Remove dead code. Update error message.
1580 Move error checking to ...
1581 (resolve_allocate_deallocate): ... here. Add additional error
1582 checking for STAT, ERRMSG, and allocate-objects.
1583 * match.c(gfc_match_allocate,gfc_match_deallocate): Parse ERRMSG.
1584 Check for redundant uses of STAT and ERRMSG. Reword error message
1585 and add checking for pointer, allocatable, and proc_pointer attributes.
1587 2009-03-30 Paul Thomas <pault@gcc.gnu.org>
1592 * symbol.c : Add gfc_global_ns_list.
1593 * decl.c (add_global_entry): Set the namespace ('ns') field.
1594 * gfortran.h : Add the resolved field to gfc_namespace. Add the
1595 namespace ('ns') field to gfc_gsymbol. Add flag_whole_file to
1596 gfc_option_t. Add the prototype for gfc_free_dt_list.
1597 * lang.opt : Add the whole-file option.
1598 * invoke.texi : Document the whole-file option.
1599 * resolve.c (resolve_global_procedure): If the fwhole-file
1600 option is set, reorder gsymbols to ensure that translation is
1601 in the right order. Resolve the gsymbol's namespace if that
1602 has not occurred and then check interfaces.
1603 (resolve_function): Move call to resolve_global_procedure.
1604 (resolve_call): The same.
1605 (resolve_codes): Store the current labels_obstack.
1606 (gfc_resolve) : Return if the namespace is already resolved.
1607 trans-decl.c (gfc_get_extern_function_decl): If the whole_file
1608 option is selected, use the backend_decl of a gsymbol, if it is
1610 parse.c (add_global_procedure, add_global_program): If the flag
1611 whole-file is set, add the namespace to the gsymbol.
1612 (gfc_parse_file): On -fwhole-file, put procedure namespaces on
1613 the global namespace list. Rearrange to do resolution of all
1614 the procedures in a file, followed by their translation.
1615 * options.c (gfc_init_options): Add -fwhole-file.
1616 (gfc_handle_option): The same.
1618 2009-03-30 Ulrich Weigand <Ulrich.Weigand@de.ibm.com>
1620 * f95-lang.c (gfc_init_builtin_functions): Define BUILT_IN_HUGE_VAL
1621 family of intrinsics instead of BUILT_IN_INF family.
1622 * trans-intrinsics.c (gfc_conv_intrinsic_nearest): Use
1623 BUILT_IN_HUGE_VAL instead of BUILT_IN_INF.
1625 2009-03-30 Jakub Jelinek <jakub@redhat.com>
1627 * trans-types.c (gfc_sym_type, gfc_return_by_reference): For
1628 sym->attr.result check sym->ns->proc_name->attr.is_bind_c.
1630 2009-03-30 Joseph Myers <joseph@codesourcery.com>
1632 PR rtl-optimization/323
1633 * options.c (gfc_post_options): Set
1634 flag_excess_precision_cmdline. Give an error for
1635 -fexcess-precision=standard for processors where the option is
1638 2009-03-29 Joseph Myers <joseph@codesourcery.com>
1640 PR preprocessor/34695
1641 * cpp.c (cb_cpp_error): New.
1642 (gfc_cpp_post_options): Don't set cpp_option->inhibit_warnings.
1643 Don't check cpp_errors (cpp_in).
1644 (gfc_cpp_init_0): Set cb->error.
1646 2009-03-29 Steven G. Kargl <kargl@gcc.gnu.org>
1649 * gfortran.h: Add ARITH_PROHIBIT to arith enum.
1650 expr.c (gfc_match_init_expr): Add global variable init_flag to
1651 flag matching an initialization expression.
1652 (check_intrinsic_op): Move no longer reachable error message to ...
1653 * arith.c (arith_power): ... here. Remove gfc_ prefix in
1654 gfc_arith_power. Use init_flag. Allow constant folding of x**y
1655 when y is REAL or COMPLEX.
1656 (eval_intrinsic): Remove restriction that y in x**y must be INTEGER
1657 for constant folding.
1658 * gfc_power: Update gfc_arith_power to arith_power
1660 2009-03-29 Daniel Kraft <d@domob.eu>
1663 * gfortran.h (struct gfc_typebound_proc): Added new flag "deferred" and
1664 added a comment explaining DEFERRED binding handling.
1665 * decl.c (match_binding_attributes): Really match DEFERRED attribute.
1666 (match_procedure_in_type): Really match PROCEDURE(interface) syntax
1667 and do some validity checks for DEFERRED and this construct.
1668 * module.c (binding_overriding): New string constant for DEFERRED.
1669 (mio_typebound_proc): Module-IO DEFERRED flag.
1670 * resolve.c (check_typebound_override): Ensure that a non-DEFERRED
1671 binding is not overridden by a DEFERRED one.
1672 (resolve_typebound_procedure): Allow abstract interfaces as targets
1673 for DEFERRED bindings.
1674 (ensure_not_abstract_walker), (ensure_not_abstract): New methods.
1675 (resolve_fl_derived): Use new "ensure_not_abstract" method for
1676 non-ABSTRACT types extending ABSTRACT ones to ensure each DEFERRED
1677 binding is overridden.
1678 (check_typebound_baseobject): New method.
1679 (resolve_compcall), (resolve_typebound_call): Check base-object of
1680 the type-bound procedure call.
1681 * gfc-internals.texi (Type-bound procedures): Document a little bit
1682 about internal handling of DEFERRED bindings.
1684 2009-03-29 Tobias Schlueter <tobi@gcc.gnu.org>
1687 * gfortran.h (gfc_st_label): Fix comment.
1688 (gfc_exec_op): Add statement code EXEC_END_BLOCK for end of block.
1689 * parse.c (accept_statement): Use EXEC_END_BLOCK for END IF and
1690 END SELECT with labels.
1691 (check_do_closure): Fix formatting.
1692 (parse_do_block): Fix typo in error message.
1693 * resolve.c (code_stack): Remove tail member. Update comment to
1694 new use of reachable_labels.
1695 (reachable_labels): Rename to ...
1696 (find_reachable_labels): ... this. Overhaul. Update preceding
1698 (resolve_branch): Fix comment preceding function. Rewrite.
1699 (resolve_code): Update call to find_reachable_labels. Add code to
1700 deal with EXEC_END_BLOCK.
1701 * st.c (gfc_free_statement): Add code to deal with EXEC_END_BLOCK.
1702 Add 2009 to copyright years.
1703 * trans.c (gfc_trans_code): Likewise on both counts.
1705 2009-03-31 Paul Thomas <pault@gcc.gnu.org>
1708 * expr.c (gfc_check_assign): Allow pointer components when
1712 * resolve.c (check_data_variable): Treat pointer arrays with
1715 2009-03-31 Paul Thomas <pault@gcc.gnu.org>
1718 * trans-expr.c (gfc_trans_assignment_1): Ensure temporaries
1719 have a string_length.
1721 2009-03-28 Tobias Burnus <burnus@net-b.de>
1724 * trans-stmt.c (gfc_trans_simple_do, gfc_trans_do):
1725 Add GFC_RTCHECK_DO support.
1726 * option.c (gfc_handle_runtime_check_option): Enable GFC_RTCHECK_DO.
1727 * invoke.texi (-fcheck): Document "do" option.
1729 2009-03-28 Paul Thomas <pault@gcc.gnu.org>
1732 * trans-array.c (get_elemental_fcn_charlen): Remove.
1733 (get_array_charlen): New function to replace previous.
1735 2009-03-28 Paul Thomas <pault@gcc.gnu.org>
1738 * parse.c (parse_derived): Do not break on finding pointer,
1739 allocatable or private components.
1741 2009-03-28 Tobias Burnus <burnus@net-b.de>
1744 * option.c (gfc_handle_runtime_check_option): Enable recursion check.
1745 * trans-decl.c (gfc_generate_function_code): Add recursion check.
1746 * invoke.texi (-fcheck): Add recursive option.
1748 2009-03-28 Tobias Burnus <burnus@net-b.de>
1751 * resolve.c (gfc_resolve_iterator): Add zero-loop warning.
1753 2009-03-28 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1754 Paul Thomas <pault@gcc.gnu.org>
1755 Tobias Burnus <burnus@net-b.de>
1757 * gfortran.h (gfc_option_t): Add rtcheck.
1758 * lang.opt: New option -fcheck.
1759 * libgfortran.h: Add GFC_RTCHECK_* constants.
1760 * invoke.texi: Document -fcheck.
1761 * options.c (gfc_handle_runtime_check_option): New function.
1762 (gfc_init_options,gfc_post_options,gfc_handle_option):
1765 2009-03-27 Richard Guenther <rguenther@suse.de>
1767 * trans-array.c (gfc_conv_descriptor_data_addr): Use
1768 gfc_build_addr_expr instead of build_fold_addr_expr.
1769 (gfc_trans_allocate_array_storage, gfc_trans_array_constructor_value,
1770 gfc_trans_constant_array_constructor, gfc_conv_array_data,
1771 gfc_conv_expr_descriptor, gfc_conv_array_parameter): Likewise.
1772 * trans-expr.c (gfc_conv_missing_dummy, gfc_conv_variable,
1773 gfc_conv_function_val, gfc_conv_operator_assign,
1774 gfc_conv_subref_array_arg, gfc_conv_function_call,
1775 gfc_conv_expr_reference, gfc_trans_scalar_assign): Likewise.
1776 * trans-intrinsic.c (gfc_conv_intrinsic_exponent,
1777 gfc_conv_intrinsic_ctime, gfc_conv_intrinsic_fdate,
1778 gfc_conv_intrinsic_ttynam, gfc_conv_intrinsic_minmax_char,
1779 gfc_conv_intrinsic_fraction, gfc_conv_intrinsic_spacing,
1780 gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_set_exponent,
1781 gfc_conv_intrinsic_array_transfer, gfc_conv_intrinsic_transfer,
1782 gfc_conv_intrinsic_si_kind, gfc_conv_intrinsic_trim): Likewise.
1783 * trans-io.c (gfc_trans_io_runtime_check, set_parameter_ref,
1784 gfc_convert_array_to_string, gfc_trans_open, gfc_trans_close,
1785 build_filepos, gfc_trans_inquire, gfc_trans_wait,
1786 nml_get_addr_expr, transfer_namelist_element, build_dt,
1787 gfc_trans_dt_end, transfer_array_component, transfer_expr,
1788 transfer_array_desc, gfc_trans_transfer): Likewise.
1789 * trans-stmt.c (gfc_trans_allocate, gfc_trans_deallocate): Likewise.
1790 * trans.c (gfc_build_addr_expr): Mark the base of the address
1793 2009-03-27 Tobias Burnus <burnus@net-b.de>
1795 * gfortran.h (enum init_local_real.): Add GFC_INIT_REAL_SNAN.
1796 (gfc_expr): Add is_snan.
1797 * trans-const.c (gfc_conv_mpfr_to_tree): Support SNaN.
1798 (gfc_conv_constant_to_tree): Update call to gfc_conv_mpfr_to_tree.
1799 * trans-const.h (gfc_conv_mpfr_to_tree): Update prototype.
1800 * resolve.c (build_default_init_expr): Update call.
1801 * target-memory.c (encode_float): Ditto.
1802 * trans-intrinsic.c (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod,
1804 2009-03-18 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
1806 * lang.opt: Unify help texts for -I, -Wconversion, -d, -fopenmp,
1809 2009-03-06 Alexandre Oliva <aoliva@redhat.com>
1811 * simplify.c (gfc_simplify_transfer): Zero-initialize the
1814 2009-02-27 Tobias Burnus <burnus@net-b.de>
1817 * module.c (read_md5_from_module_file): Add missing quote.
1819 2009-02-27 Tobias Burnus <burnus@net-b.de>
1822 * module.c (read_md5_from_module_file): Include mod version
1823 in had-changed test.
1825 2009-02-26 Paul Thomas <pault@gcc.gnu.org>
1828 * interface.c (compare_type_rank_if): Return 1 if the symbols
1829 are the same and deal with external procedures where one is
1830 identified to be a function or subroutine by usage but the
1833 2009-02-26 Paul Thomas <pault@gcc.gnu.org>
1836 * trans-array.c (gfc_conv_array_initializer): Convert all
1837 expressions rather than ICEing.
1839 2009-02-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1842 * array.c (ref_dimen_size): Rename to gfc_ref_dimen_size,
1843 make global. Change function name in error messages.
1844 (ref_size): Change ref_dimen_size to gfc_ref_dimen_size.
1845 (gfc_array_ref_shape): Likewise.
1846 * gfortran.h: Add prototype for gfc_ref_dimen_size.
1847 * simplify.c (simplify_bound_dim): Add ref argument.
1848 If the reference isn't a full array, return one for
1849 the lower bound and the extent for the upper bound.
1850 (simplify_bound): For array sections, take as from the
1851 argument. Add reference to all to simplify_bound_dim.
1853 2009-02-19 Daniel Franke <franke.daniel@gmail.com>
1855 * scanner.c (load_line): At end of line, skip '\r' without setting
1856 the truncation flag.
1858 2009-02-18 Daniel Kraft <d@domob.eu>
1860 * gfortran.texi: New chapter about compiler characteristics.
1861 (Compiler Characteristics): Document KIND type parameters here.
1863 2009-02-18 Tobias Burnus <burnus@net-b.de>
1865 * intrinsic.texi (MALLOC): Make example more portable.
1867 2009-02-13 Mikael Morin <mikael.morin@tele2.fr>
1870 * module.c (gfc_dump_module,gfc_use_module): Add module
1873 2009-02-13 Paul Thomas <pault@gcc.gnu.org>
1877 * trans-expr.c (gfc_conv_function_val): Stabilize Cray-pointer
1878 function references to ensure that a valid expression is used.
1879 (gfc_conv_function_call): Pass Cray pointers to procedures.
1881 2009-02-03 Jakub Jelinek <jakub@redhat.com>
1883 * gfortranspec.c (lang_specific_driver): Update copyright notice
1886 2009-01-28 Paul Thomas <pault@gcc.gnu.org>
1890 * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use the array
1891 descriptor ubound for UBOUND, when the array lbound == 1.
1893 2009-01-27 Daniel Kraft <d@domob.eu>
1896 * trans-stmt.c (gfc_conv_elemental_dependencies): Create temporary
1897 for the real type needed to make it work for subcomponent-references.
1899 2009-01-21 Daniel Kraft <d@domob.eu>
1901 * trans-stmt.c (gfc_conv_elemental_dependencies): Cleaned up comment.
1903 2009-01-20 Paul Thomas <pault@gcc.gnu.org>
1906 * resolve.c (check_host_association): Remove the matching to
1907 correct an incorrect host association and use manipulation of
1908 the expression instead.
1910 2009-01-20 Tobias Burnus <burnus@net-b.de>
1912 * invoke.texi (RANGE): RANGE also takes INTEGER arguments.
1914 2009-01-19 Mikael Morin <mikael.morin@tele2.fr>
1917 * simplify.c (simplify_bound): Don't use array specification
1918 if variable or component has subsequent references.
1920 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
1923 * module.c (write_common_0): Add argument 'this_module' and
1924 check that non-use associated common blocks are written first.
1925 (write_common): Call write_common_0 twice, once with true and
1928 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
1931 * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): Has
1932 been absorbed into gfc_conv_intrinsic_transfer. All
1933 references to it in trans-intrinsic.c have been changed
1934 accordingly. PR fixed by using a temporary for scalar
1935 character transfer, when the source is shorter than the
1938 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
1941 * module.c (write_common_0): Revert patch of 2009-01-05.
1943 2009-01-16 Janus Weil <janus@gcc.gnu.org>
1946 * expr.c (gfc_check_pointer_assign): Allow use-associated procedure
1948 * trans-decl.c (get_proc_pointer_decl,gfc_create_module_variable):
1949 Enable procedure pointers as module variables.
1951 2009-01-14 Steven G. Kargl <kargl@gcc.gnu.org>
1953 * ChangeLog-2007: Clean out svn merge droppings.
1955 2009-01-10 Paul Thomas <pault@gcc.gnu.org>
1958 * target-memory.c (encode_derived): Encode NULL.
1960 2009-01-10 Paul Thomas <pault@gcc.gnu.org>
1963 * resolve.c (check_host_association): Use the symtree name to
1964 search for a potential contained procedure, since this is the
1965 name by which it would be referenced.
1967 2009-01-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1970 * interface.c (gfc_procedure_use): Don't warn about functions
1972 * symbol.c (generate_isocbinding_symbol): Mark c_loc and
1975 2009-01-05 Paul Thomas <pault@gcc.gnu.org>
1978 * module.c (write_common_0): Use the name of the symtree rather
1979 than the common block, to determine if the common has been
1982 2009-01-05 Daniel Franke <franke.daniel@gmail.com>
1985 * check.c (gfc_check_random_seed): Added size check for GET
1986 dummy argument, reworded error messages to follow common pattern.
1988 2009-01-05 Thomas Koenig <tkoenig@gcc.gnu.org>
1991 * trans-types.c (gfc_get_derived_type): Check for the
1992 presence of derived->ns->proc_name before
1993 accessing derived->ns->proc_name->attr.flavor .
1994 * resolve.c (resolve_symbol): Likewise.
1996 2009-01-05 Paul Thomas <pault@gcc.gnu.org>
1999 * gfortran.h : Add bit to gfc_expr 'user_operator'
2000 * interface.c (gfc_extend_expr): Set the above if the operator
2001 is substituted by a function.
2002 * resolve.c (check_host_association): Return if above is set.
2004 2009-01-04 Mikael Morin <mikael.morin@tele2.fr>
2007 * ChangeLog-2008: Fix function name.
2010 * dependency.c (gfc_check_argument_var_dependency):
2011 Move the check for pointerness inside the if block
2012 so that it doesn't affect the return value.
2015 * trans-stmt.c (gfc_trans_call):
2016 Add the dependency code after the loop bounds calculation one.
2018 2009-01-04 Daniel Franke <franke.daniel@gmail.com>
2020 * intrinsic.c (do_simplify): Removed already implemented TODO.
2022 2009-01-04 Daniel Franke <franke.daniel@gmail.com>
2025 * simplify.c (gfc_simplify_merge): New.
2026 * intrinsic.h (gfc_simplify_merge): New prototype.
2027 * intrinsic.c (add_functions): Added simplification for MERGE.
2029 2009-01-04 Mikael Morin <mikael.morin@tele2.fr>
2032 * gfortran.h (gfc_is_data_pointer): Added prototype
2033 * resolve.c (gfc_iso_c_func_interface):
2034 Use gfc_is_data_pointer to test for pointer attribute.
2035 * dependency.c (gfc_is_data_pointer):
2036 Support pointer-returning functions.
2038 2009-01-03 Daniel Franke <franke.daniel@gmail.com>
2040 * symbol.c (save_symbol): Don't SAVE function results.
2042 2009-01-03 Paul Thomas <pault@gcc.gnu.org>
2045 * resolve.c (resolve_call): When searching for proper host
2046 association, use symtree rather than symbol. For everything
2047 except generic subroutines, substitute the symtree in the call
2048 rather than the symbol.
2051 Copyright (C) 2009 Free Software Foundation, Inc.
2053 Copying and distribution of this file, with or without modification,
2054 are permitted in any medium without royalty provided the copyright
2055 notice and this notice are preserved.