re PR fortran/40727 ([4.4] ICE gfc_simplify_dcmplx(): Bad type when passing BT_COMPLE...
[gcc.git] / gcc / fortran / ChangeLog
1 2009-07-19 Steven G. Kargl <kargl@gcc.gnu.org>
2
3 PR fortran/40727
4 * fortran/check.c (gfc_check_cmplx, gfc_check_dcmplx): Add check that
5 the optional second argument isn't of COMPLEX type.
6
7 2009-07-17 Richard Guenther <rguenther@suse.de>
8
9 PR c/40401
10 * f95-lang.c (gfc_be_parse_file): Do not finalize the CU here.
11 * trans-decl.c (gfc_gimplify_function): Remove.
12 (build_entry_thunks): Do not gimplify here.
13 (create_main_function): Likewise.
14 (gfc_generate_function_code): Likewise.
15
16 2009-07-17 Aldy Hernandez <aldyh@redhat.com>
17 Manuel López-Ibáñez <manu@gcc.gnu.org>
18
19 PR 40435
20 * trans-expr.c, trans-array.c, trans-openmp.c, trans-stmt.c,
21 trans.c, trans-io.c, trans-decl.c, trans-intrinsic.c: Add location
22 argument to fold_{unary,binary,ternary}, fold_build[123],
23 build_call_expr, build_size_arg, build_fold_addr_expr,
24 build_call_array, non_lvalue, size_diffop,
25 fold_build1_initializer, fold_build2_initializer,
26 fold_build3_initializer, fold_build_call_array,
27 fold_build_call_array_initializer, fold_single_bit_test,
28 omit_one_operand, omit_two_operands, invert_truthvalue,
29 fold_truth_not_expr, build_fold_indirect_ref, fold_indirect_ref,
30 combine_comparisons, fold_builtin_*, fold_call_expr,
31 build_range_check, maybe_fold_offset_to_address, round_up,
32 round_down.
33
34 2009-07-15 Janus Weil <janus@gcc.gnu.org>
35
36 PR fortran/40743
37 * resolve.c (resolve_symbol): Don't resolve the formal namespace of a
38 contained procedure.
39
40 2009-07-14 Taras Glek <tglek@mozilla.com>
41 Rafael Espindola <espindola@google.com>
42
43 * Make-lang.in (fortran.install-plugin): New target for
44 installing plugin headers.
45
46 2009-07-13 H.J. Lu <hongjiu.lu@intel.com>
47
48 * module.c (mio_symbol): Remove the unused variable, formal.
49
50 2009-07-13 Janus Weil <janus@gcc.gnu.org>
51
52 PR fortran/40646
53 * module.c (mio_symbol): If the symbol has formal arguments,
54 the formal namespace will be present.
55 * resolve.c (resolve_actual_arglist): Correctly handle 'called'
56 procedure pointer components as actual arguments.
57 (resolve_fl_derived,resolve_symbol): Make sure the formal namespace
58 is present.
59 * trans-expr.c (gfc_conv_procedure_call): Correctly handle the formal
60 arguments of procedure pointer components.
61
62 2009-07-12 Tobias Burnus <burnus@net-b.de>
63 Philippe Marguinaud <philippe.marguinaud@meteo.fr>
64
65 PR fortran/40588
66 * primary.c (match_charkind_name): Fix condition for $ matching.
67
68 PR libfortran/22423
69 * libgfortran.h: Typedef the GFC_DTYPE_* enum.
70
71 2009-07-11 Tobias Burnus <burnus@net-b.de>
72
73 PR fortran/33197
74 * check.c (gfc_check_fn_rc2008): New function.
75 * intrinsic.h (gfc_check_fn_rc2008): New prototype.
76 * intrinsic.c (add_functions): Add complex tan, cosh, sinh,
77 and tanh.
78
79 2009-07-10 Paul Thomas <pault@gcc.gnu.org>
80
81 PR fortran/39334
82 * primary.c (match_kind_param): Return MATCH_NO if the symbol
83 has no value.
84
85 2008-07-09 Paul Thomas <pault@gcc.gnu.org>
86
87 PR fortran/40629
88 * resolve.c (check_host_association): Use the existing
89 accessible symtree and treat function expressions with
90 symbols that have procedure flavor.
91
92 2009-07-09 Janus Weil <janus@gcc.gnu.org>
93
94 PR fortran/40646
95 * dump-parse-tree.c (show_expr): Renamed 'is_proc_ptr_comp'.
96 * expr.c (is_proc_ptr_comp): Renamed to 'gfc_is_proc_ptr_comp'.
97 (gfc_check_pointer_assign): Renamed 'is_proc_ptr_comp'.
98 (replace_comp,gfc_expr_replace_comp): New functions, analogous
99 to 'replace_symbol' and 'gfc_expr_replace_symbol', just with components
100 instead of symbols.
101 * gfortran.h (gfc_expr_replace_comp): New prototype.
102 (is_proc_ptr_comp): Renamed to 'gfc_is_proc_ptr_comp'.
103 * interface.c (compare_actual_formal): Renamed 'is_proc_ptr_comp'.
104 * match.c (gfc_match_pointer_assignment): Ditto.
105 * primary.c (gfc_match_varspec): Handle array-valued procedure pointers
106 and procedure pointer components. Renamed 'is_proc_ptr_comp'.
107 * resolve.c (resolve_fl_derived): Correctly handle interfaces with
108 RESULT statement, and handle array-valued procedure pointer components.
109 (resolve_actual_arglist,resolve_ppc_call,resolve_expr_ppc): Renamed
110 'is_proc_ptr_comp'.
111 * trans-array.c (gfc_walk_function_expr): Ditto.
112 * trans-decl.c (gfc_get_symbol_decl): Security check for presence of
113 ns->proc_name.
114 * trans-expr.c (gfc_conv_procedure_call): Handle array-valued procedure
115 pointer components. Renamed 'is_proc_ptr_comp'.
116 (conv_function_val,gfc_trans_arrayfunc_assign): Renamed
117 'is_proc_ptr_comp'.
118 (gfc_get_proc_ptr_comp): Do not modify the argument 'e', but instead
119 make a copy of it.
120 * trans-io.c (gfc_trans_transfer): Handle array-valued procedure
121 pointer components.
122
123 2009-07-09 Tobias Burnus <burnus@net-b.de>
124
125 PR fortran/40604
126 * intrinsic.c (gfc_convert_type_warn): Set sym->result.
127 * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
128 for optional arguments.
129
130 2009-07-08 Tobias Burnus <burnus@net-b.de>
131
132 PR fortran/40675
133 * simplify.c (gfc_simplify_sign): Handle signed zero correctly.
134 * trans-intrinsic.c (gfc_conv_intrinsic_sign): Support
135 -fno-sign-zero.
136 * invoke.texi (-fno-sign-zero): Add text regarding SIGN intrinsic.
137
138 2008-07-08 Paul Thomas <pault@gcc.gnu.org>
139
140 PR fortran/40591
141 * decl.c (match_procedure_interface): Correct the association
142 or creation of the interface procedure's symbol.
143
144 2009-07-04 Jakub Jelinek <jakub@redhat.com>
145
146 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): For integer
147 maxloc initialize limit to -huge-1 rather than just -huge.
148
149 2009-07-04 Janus Weil <janus@gcc.gnu.org>
150
151 PR fortran/40593
152 * interface.c (compare_actual_formal): Take care of proc-pointer-valued
153 functions as actual arguments.
154 * trans-expr.c (gfc_conv_procedure_call): Ditto.
155 * resolve.c (resolve_specific_f0): Use the correct ts.
156
157 2009-07-02 Michael Matz <matz@suse.de>
158
159 PR fortran/32131
160 * trans-array.c (gfc_conv_descriptor_stride_get): Return
161 constant one for strides in the first dimension of ALLOCATABLE
162 arrays.
163
164 2009-06-30 Janus Weil <janus@gcc.gnu.org>
165
166 PR fortran/40594
167 * trans-types.c (gfc_get_derived_type): Bugfix, reverting one hunk from
168 r147206.
169
170 2009-06-29 Tobias Burnus <burnus@net-b.de>
171
172 PR fortran/40580
173 * trans-expr.c (gfc_conv_procedure_call): Add -fcheck=pointer check.
174 * libgfortran.h: Add GFC_RTCHECK_POINTER.
175 * invoke.texi (-fcheck): Document new pointer option.
176 * options.c (gfc_handle_runtime_check_option): Handle pointer option.
177
178 * gfortran.texi (C Binding): Improve wording.
179 * iso-c-binding.def: Remove obsolete comment.
180
181 2009-06-29 Paul Thomas <pault@gcc.gnu.org>
182
183 PR fortran/40551
184 * dependency.h : Add second bool* argument to prototype of
185 gfc_full_array_ref_p.
186 * dependency.c (gfc_full_array_ref_p): If second argument is
187 present, return true if last dimension of reference is an
188 element or has unity stride.
189 * trans-array.c : Add NULL second argument to references to
190 gfc_full_array_ref_p.
191 * trans-expr.c : The same, except for;
192 (gfc_trans_arrayfunc_assign): Return fail if lhs reference
193 is not a full array or a contiguous section.
194
195 2009-06-28 Tobias Burnus <burnus@net-b.de>
196 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
197
198 PR fortran/34112
199 * symbol.c (gfc_add_ext_attribute): New function.
200 (gfc_get_sym_tree): New argument allow_subroutine.
201 (gfc_get_symbol,gfc_get_ha_sym_tree,gen_cptr_param,gen_fptr_param
202 gen_shape_param,generate_isocbinding_symbol): Use it.
203 * decl.c (find_special): New argument allow_subroutine.
204 (add_init_expr_to_sym,add_hidden_procptr_result,attr_decl1,
205 match_procedure_in_type,gfc_match_final_decl): Use it.
206 (gfc_match_gcc_attributes): New function.
207 * gfortran.texi (Mixed-Language Programming): New section
208 "GNU Fortran Compiler Directives".
209 * gfortran.h (ext_attr_t): New struct.
210 (symbol_attributes): Use it.
211 (gfc_add_ext_attribute): New prototype.
212 (gfc_get_sym_tree): Update pototype.
213 * expr.c (gfc_check_pointer_assign): Check whether call
214 convention is the same.
215 * module.c (import_iso_c_binding_module, create_int_parameter,
216 use_iso_fortran_env_module): Update gfc_get_sym_tree call.
217 * scanner.c (skip_gcc_attribute): New function.
218 (skip_free_comments,skip_fixed_comments): Use it.
219 (gfc_next_char_literal): Support !GCC$ lines.
220 * resolve.c (check_host_association): Update
221 gfc_get_sym_tree call.
222 * match.c (gfc_match_sym_tree,gfc_match_call): Update
223 gfc_get_sym_tree call.
224 * trans-decl.c (add_attributes_to_decl): New function.
225 (gfc_get_symbol_decl,get_proc_pointer_decl,
226 gfc_get_extern_function_decl,build_function_decl: Use it.
227 * match.h (gfc_match_gcc_attributes): Add prototype.
228 * parse.c (decode_gcc_attribute): New function.
229 (next_free,next_fixed): Support !GCC$ lines.
230 * primary.c (match_actual_arg,check_for_implicit_index,
231 gfc_match_rvalue,gfc_match_rvalue): Update
232 gfc_get_sym_tree call.
233
234 2009-06-28 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
235
236 * gfortran.h: Define HAVE_mpc_pow.
237 * arith.c (complex_reciprocal, complex_pow): If HAVE_mpc_pow,
238 don't define these functions.
239 (arith_power): If HAVE_mpc_pow, use mpc_pow.
240
241 2009-06-26 Janus Weil <janus@gcc.gnu.org>
242
243 PR fortran/39997
244 PR fortran/40541
245 * decl.c (add_hidden_procptr_result): Copy the typespec to the hidden
246 result.
247 * expr.c (gfc_check_pointer_assign): Enable interface check for
248 procedure pointer assignments where the rhs is a function returning a
249 procedure pointer.
250 * resolve.c (resolve_symbol): If an external procedure with unspecified
251 return type can not be implicitly typed, it must be a subroutine.
252
253 2009-06-24 Janus Weil <janus@gcc.gnu.org>
254
255 PR fortran/40427
256 * gfortran.h (gfc_component): New member 'formal_ns'.
257 (gfc_copy_formal_args_ppc,void gfc_ppc_use): New.
258 * interface.c (gfc_ppc_use): New function, analogous to
259 gfc_procedure_use, but for procedure pointer components.
260 * module.c (MOD_VERSION): Bump module version.
261 (mio_component): Treat formal arguments.
262 (mio_formal_arglist): Changed argument from gfc_symbol to
263 gfc_formal_arglist.
264 (mio_symbol): Changed argument of mio_formal_arglist.
265 * resolve.c (resolve_ppc_call,resolve_expr_ppc): Call gfc_ppc_use,
266 to check actual arguments and treat formal args correctly.
267 (resolve_fl_derived): Copy formal args of procedure pointer components
268 from their interface.
269 * symbol.c (gfc_copy_formal_args_ppc): New function, analogous to
270 gfc_copy_formal_args, but for procedure pointer components.
271
272 2009-06-22 Janus Weil <janus@gcc.gnu.org>
273
274 PR fortran/37254
275 PR fortran/39850
276 * interface.c (compare_parameter): Set implicit type for function
277 actual arguments with BT_UNKNOWN.
278
279 2009-06-22 Tobias Burnus <burnus@net-b.de>
280
281 PR fortran/40472
282 PR fortran/50520
283 * simplify.c (gfc_simplify_spread): Fix the case that source=
284 is a scalar.
285
286 2009-06-22 Paul Thomas <pault@gcc.gnu.org>
287
288 PR fortran/40443
289 * interface.c (gfc_search_interface): Hold back a match to an
290 elementary procedure until all other possibilities are
291 exhausted.
292
293 2009-06-22 Paul Thomas <pault@gcc.gnu.org>
294
295 PR fortran/40472
296 * simplify.c (gfc_simplify_spread): Restrict the result size to
297 the limit for an array constructor.
298
299 2009-06-21 Janus Weil <janus@gcc.gnu.org>
300
301 PR fortran/39850
302 * interface.c (gfc_compare_interfaces): Take care of implicit typing
303 when checking the function attribute. Plus another bugfix.
304 (compare_parameter): Set attr.function and attr.subroutine according
305 to the usage of a procedure as actual argument.
306
307 2009-06-20 Tobias Burnus <burnus@net-b.de>
308
309 PR fortran/40452
310 * trans-decl.c (add_argument_checking): Disable bounds check
311 for allowed argument storage association.
312
313 2009-06-19 Paul Thomas <pault@gcc.gnu.org>
314
315 PR fortran/40440
316 * trans-expr.c (gfc_conv_procedure_call): Do not deallocate
317 allocatable components if the argument is a pointer.
318
319 2009-06-19 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
320
321 * gfortran.h (gfc_expr): Use mpc_t to represent complex numbers.
322
323 * arith.c, dump-parse-tree.c, expr.c, module.c, resolve.c,
324 simplify.c, target-memory.c, target-memory.h, trans-const.c,
325 trans-expr.c: Convert to mpc_t throughout.
326
327 2009-06-19 Ian Lance Taylor <iant@google.com>
328
329 * cpp.c (struct gfc_cpp_option_data): Give this struct, used for
330 the global variable gfc_cpp_option, a name.
331
332 2009-06-19 Janus Weil <janus@gcc.gnu.org>
333
334 PR fortran/40450
335 * trans-expr.c (gfc_conv_procedure_call): Only add an extra addr_expr
336 to a procedure pointer actual argument, if it is not itself a
337 dummy arg.
338
339 2009-06-18 Janus Weil <janus@gcc.gnu.org>
340
341 PR fortran/40451
342 * resolve.c (resolve_contained_fntype): Prevent implicit typing for
343 procedures with explicit interface.
344 * symbol.c (gfc_check_function_type): Ditto.
345
346 2009-06-16 Ian Lance Taylor <iant@google.com>
347
348 * decl.c (build_struct): Rewrite loop over constructor elements.
349
350 2009-06-16 Janus Weil <janus@gcc.gnu.org>
351
352 PR fortran/36947
353 PR fortran/40039
354 * expr.c (gfc_check_pointer_assign): Call 'gfc_compare_interfaces' with
355 error message.
356 * gfortran.h (gfc_compare_interfaces): Additional argument.
357 * interface.c (operator_correspondence): Removed.
358 (gfc_compare_interfaces): Additional argument to return error message.
359 Directly use the code from 'operator_correspondence' instead of calling
360 the function. Check for OPTIONAL. Some rearrangements.
361 (check_interface1): Call 'gfc_compare_interfaces' without error message.
362 (compare_parameter): Call 'gfc_compare_interfaces' with error message.
363 * resolve.c (check_generic_tbp_ambiguity): Call 'gfc_compare_interfaces'
364 without error message.
365
366 2009-06-16 Tobias Burnus <burnus@net-b.de>
367
368 PR fortran/40383
369 * trans-decl.c (create_function_arglist): Copy formal charlist to
370 have a proper passed_length for -fcheck=bounds.
371
372 2009-06-12 Steven G. Kargl <kargls@comcast.net>
373
374 * arith.c (gfc_enum_initializer): Move function ...
375 * decl.c: ... here. Remove gfc_ prefix and make static.
376 (enumerator_decl): Update function call.
377 * gfortran.h: Remove gfc_enum_initializer prototype.
378
379 2009-06-12 Aldy Hernandez <aldyh@redhat.com>
380
381 * trans-array.c (gfc_trans_allocate_array_storage): Pass
382 location on down.
383 (gfc_trans_array_constructor_value): Same.
384 (gfc_trans_scalarized_loop_end): Same.
385 (gfc_conv_ss_startstride): Same.
386 (gfc_trans_g77_array): Same.
387 (gfc_trans_dummy_array_bias): Same.
388 (gfc_conv_array_parameter): Same.
389 (structure_alloc_comps): Same.
390 * trans-expr.c (gfc_conv_function_call): Same.
391 (fill_with_spaces): Same.
392 (gfc_trans_string_copy): Same.
393 (gfc_trans_scalar_assign): Same.
394 * trans-stmt.c (gfc_trans_goto): Same.
395 (gfc_trans_if_1): Same.
396 (gfc_trans_simple_do): Same.
397 (gfc_trans_do): Same.
398 (gfc_trans_do_while): Same.
399 (gfc_trans_logical_select): Same.
400 (gfc_trans_select): Same.
401 (gfc_trans_forall_loop): Same.
402 (gfc_trans_nested_forall_loop): Same.
403 (generate_loop_for_temp_to_lhs): Same.
404 (generate_loop_for_rhs_to_temp): Same.
405 (gfc_trans_forall_1): Same.
406 (gfc_trans_where_assign): Same.
407 (gfc_trans_where_3): Same.
408 (gfc_trans_allocate): Same.
409 * trans.c (gfc_finish_block): Same.
410 (gfc_trans_runtime_check): Same.
411 (gfc_call_malloc): Same.
412 (gfc_allocate_with_status): Same.
413 (gfc_call_free): Same.
414 (gfc_deallocate_with_status): Same.
415 (gfc_call_realloc): Same.
416 (gfc_trans_code): Same.
417 * trans-decl.c (gfc_init_default_dt): Same.
418 (gfc_generate_constructors): Same.
419 * trans-io.c (gfc_trans_io_runtime_check): Same.
420 * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Same.
421 (gfc_conv_intrinsic_fdate): Same.
422 (gfc_conv_intrinsic_ttynam): Same.
423 (gfc_conv_intrinsic_minmax): Same.
424 (gfc_conv_intrinsic_minmax_char): Same.
425 (gfc_conv_intrinsic_anyall): Same.
426 (gfc_conv_intrinsic_count): Same.
427 (gfc_conv_intrinsic_arith): Same.
428 (gfc_conv_intrinsic_minmaxloc): Same.
429 (gfc_conv_intrinsic_minmaxval): Same.
430 (gfc_conv_intrinsic_rrspacing): Same.
431 (gfc_conv_intrinsic_array_transfer): Same.
432 (gfc_conv_intrinsic_trim): Same.
433 (gfc_conv_intrinsic_repeat): Same.
434
435 2009-06-12 Janus Weil <janus@gcc.gnu.org>
436
437 PR fortran/40176
438 * resolve.c (resolve_symbol): Additional error check, preventing an
439 infinite loop.
440
441 2009-06-11 Paul Thomas <pault@gcc.gnu.org>
442
443 PR fortran/40402
444 * resolve.c (next_data_value): It is an error if the value is
445 not constant.
446
447 2009-06-11 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
448
449 PR fortran/38718
450 * intrinsic.c (add_functions): Add simplifiers for ISNAN,
451 IS_IOSTAT_END and IS_IOSTAT_EOR.
452 * intrinsic.h (gfc_simplify_is_iostat_end, gfc_simplify_is_iostat_eor,
453 gfc_simplify_isnan): New prototypes.
454 * intrinsic.c (gfc_simplify_is_iostat_end, gfc_simplify_is_iostat_eor,
455 gfc_simplify_isnan): New functions.
456
457 2009-06-11 Jakub Jelinek <jakub@redhat.com>
458
459 * interface.c (fold_unary): Rename to...
460 (fold_unary_intrinsic): ... this.
461 (gfc_extend_expr): Adjust caller.
462 (gfc_match_generic_spec): Likewise. Initialize *op to INTRINSIC_NONE
463 to avoid warnings.
464 * expr.c (gfc_simplify_expr): Initialize start and end before calling
465 gfc_extract_int.
466
467 2009-06-10 Dave Korn <dave.korn.cygwin@gmail.com>
468
469 * trans-decl.c (create_main_function): Don't build main decl twice.
470
471 2009-06-09 Tobias Burnus <burnus@net-b.de>
472
473 * trans-decl.c (gfc_generate_function_code): Use gfc_option.rtcheck
474 instead of flag_bounds_check.
475 * intrinsic.texi (ISO_FORTRAN_ENV): Document INT{8,16,32,64} and
476 REAL{32,64,128}.
477
478 2009-06-08 Paul Thomas <pault@gcc.gnu.org>
479
480 * trans-array.h : Replace prototypes for
481 gfc_conv_descriptor_offset, gfc_conv_descriptor_stride,
482 gfc_conv_descriptor_lbound, gfc_conv_descriptor_ubound with new
483 prototypes of the same names with _get or _set appended.
484 * trans-array.c : Make the originals of the above static and
485 new functions for the _get and _set functions. Update all the
486 references to these descriptor access functions.
487 * trans-expr.c : Update references to the above descriptor
488 access functions.
489 * trans-intrinsic.c : The same.
490 * trans-openmp.c : The same.
491 * trans-stmt.c : The same.
492
493 2009-06-08 Alexandre Oliva <aoliva@redhat.com>
494
495 * options.c (gfc_post_options): Disable dump_parse_tree
496 during -fcompare-debug-second.
497
498 2009-06-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
499
500 PR fortran/40008
501 * gfortran.h (gfc_open): Add newunit expression to structure.
502 * io.c (io_tag): Add new unit tag and fix whitespace.
503 (match_open_element): Add matching for newunit.
504 (gfc_free_open): Free the newunit expression.
505 (gfc_resolve_open): Add newunit to resolution and check constraints.
506 (gfc_resolve_close): Add check for non-negative unit.
507 (gfc_resolve_filepos): Likewise.
508 (gfc_resolve_dt): Likewise.
509 * trans-io.c (set_parameter_value): Build runtime checks for unit
510 numbers within range of kind=4 integer. (gfc_trans_open) Set the
511 newunit parameter.
512 * ioparm.def (IOPARM): Define the newunit parameter as a pointer
513 to GFC_INTEGER_4, pint4.
514
515 2009-06-07 Daniel Franke <franke.daniel@gmail.com>
516
517 PR fortran/25104
518 PR fortran/29962
519 * array.c (gfc_append_constructor): Added NULL-check.
520 * check.c (gfc_check_spread): Check DIM.
521 (gfc_check_unpack): Check that the ARRAY arguments provides enough
522 values for MASK.
523 * intrinsic.h (gfc_simplify_spread): New prototype.
524 (gfc_simplify_unpack): Likewise.
525 * intrinsic.c (add_functions): Added new simplifier callbacks.
526 * simplify.c (gfc_simplify_spread): New.
527 (gfc_simplify_unpack): New.
528 * expr.c (check_transformational): Allow additional transformational
529 intrinsics in initialization expression.
530
531 2009-06-07 Daniel Franke <franke.daniel@gmail.com>
532
533 PR fortran/25104
534 PR fortran/29962
535 * check.c (gfc_check_all_any): Check rank of DIM.
536 (gfc_check_count): Likewise.
537 * intrinsic.h (gfc_simplify_all): New prototype.
538 (gfc_simplify_any): Likewise.
539 (gfc_simplify_count): Likewise.
540 (gfc_simplify_sum): Likewise.
541 (gfc_simplify_product): Likewise.
542 * intrinsic.c (add_functions): Added new simplifier callbacks.
543 * simplify.c (transformational_result): New.
544 (simplify_transformation_to_scalar): New.
545 (simplify_transformation_to_array): New.
546 (gfc_count): New.
547 (gfc_simplify_all): New.
548 (gfc_simplify_any): New.
549 (gfc_simplify_count): New.
550 (gfc_simplify_sum): New.
551 (gfc_simplify_product): New.
552 * expr.c (check_transformational): Allow additional transformational
553 intrinsics in initialization expression.
554
555 2009-06-07 Daniel Franke <franke.daniel@gmail.com>
556
557 * check.c (dim_rank_check): Return SUCCESS if DIM=NULL.
558 (gfc_check_lbound): Removed (now) redundant check for DIM=NULL.
559 (gfc_check_minloc_maxloc): Likewise.
560 (check_reduction): Likewise.
561 (gfc_check_size): Likewise.
562 (gfc_check_ubound): Likewise.
563 (gfc_check_cshift): Added missing shape-conformance checks.
564 (gfc_check_eoshift): Likewise.
565 * gfortran.h (gfc_check_conformance): Modified prototype to printf-style.
566 * expr.c (gfc_check_conformance): Accept error-message chunks in
567 printf-style. Changed all callers.
568
569
570 2009-06-07 Daniel Franke <franke.daniel@gmail.com>
571
572 PR fortran/25104
573 PR fortran/29962
574 * intrinsic.h (gfc_simplify_dot_product): New prototype.
575 (gfc_simplify_matmul): Likewise.
576 (gfc_simplify_transpose): Likewise.
577 * intrinsic.c (add_functions): Added new simplifier callbacks.
578 * simplify.c (init_result_expr): New.
579 (compute_dot_product): New.
580 (gfc_simplify_dot_product): New.
581 (gfc_simplify_matmul): New.
582 (gfc_simplify_transpose): New.
583 * expr.c (check_transformational): Allow transformational intrinsics
584 with simplifier in initialization expression.
585
586 2009-06-06 Daniel Franke <franke.daniel@gmail.com>
587
588 PR fortran/37203
589 * simplify.c (gfc_simplify_reshape): Fixed reshaping of empty arrays
590 without padding.
591
592 2009-06-06 Daniel Franke <franke.daniel@gmail.com>
593
594 PR fortran/32890
595 * intrinsic.h (gfc_simplify_pack): New prototype.
596 * intrinsic.c (add_functions): Added
597 simplifier-callback to PACK.
598 * simplify.c (is_constant_array_expr): Moved
599 to beginning of file.
600 (gfc_simplify_pack): New.
601 * check.c (gfc_check_pack): Check that VECTOR has enough elements.
602 Added safeguards for empty arrays.
603
604 2009-06-05 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
605
606 * simplify.c (call_mpc_func): Use mpc_realref/mpc_imagref
607 instead of MPC_RE/MPC_IM.
608
609 2009-06-05 Alexandre Oliva <aoliva@redhat.com>
610
611 * trans-decl.c (gfc_build_qualified_array): Don't skip generation
612 of range types.
613 * trans.h (struct lang_type): Add base_decls.
614 (GFC_TYPE_ARRAY_BASE_DECL): New.
615 * trans-types.c (gfc_get_array_type_bounds): Initialize base decls
616 proactively and excessively.
617 (gfc_get_array_descr_info): Use existing base decls if available.
618
619 2009-06-04 Daniel Franke <franke.daniel@gmail.com>
620
621 PR fortran/37203
622 * check.c (gfc_check_reshape): Additional checks for the
623 SHAPE and ORDER arguments.
624 * simplify.c (gfc_simplify_reshape): Converted argument checks
625 to asserts.
626
627 2009-06-03 Tobias Burnus <burnus@net-b.de>
628
629 * gfortran.texi: Add mixed-language programming, mention
630 varying string lengths, some clean up of introduction parts.
631 * intrinsic.texi (instrinsic modules): Create @menu for subsections.
632 (ISO_C_BINDING): Support ISOCBINDING_INT_FAST128_T.
633 * libgfortran.h: Comment to rember to keep gfortran.texi in sync.
634 * iso-c-binding.def: Support ISOCBINDING_INT_FAST128_T.
635
636 2009-06-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
637 Tobias Burnus <burnus@net-b.de>
638
639 * iso-c-binding.def: Use INTMAX_TYPE instead of intmax_type_node.
640 * trans-types.c (init_c_interop_kinds): Remove intmax_type_node.
641
642 2009-06-03 Alexandre Oliva <aoliva@redhat.com>
643
644 * module.c (mio_f2k_derived): Initialize cur.
645
646 2009-06-01 Tobias Burnus <burnus@net-b.de>
647
648 PR fortran/40309
649 * trans-decl.c (gfc_sym_identifier): Use "MAIN__" for PROGRAM "main".
650 (create_main_function): Set main_identifier_node.
651
652 2009-05-29 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
653
654 PR fortran/40019
655 * trans-types.c (gfc_build_uint_type): Make nonstatic.
656 * trans.h (gfor_fndecl_clz128, gfor_fndecl_ctz128): New prototypes.
657 * trans-types.h (gfc_build_uint_type): Add prototype.
658 * trans-decl.c (gfc_build_intrinsic_function_decls): Build
659 gfor_fndecl_clz128 and gfor_fndecl_ctz128.
660 * trans-intrinsic.c (gfc_conv_intrinsic_leadz,
661 gfc_conv_intrinsic_trailz): Call the right builtins or library
662 functions, and cast arguments to unsigned types first.
663 * simplify.c (gfc_simplify_leadz): Deal with negative arguments.
664
665 2009-05-27 Ian Lance Taylor <iant@google.com>
666
667 * Make-lang.in (gfortran$(exeext)): Change $(COMPILER) to
668 $(LINKER).
669 (f951$(exeext)): Likewise.
670
671 2009-05-27 Tobias Burnus <burnus@net-b.de>
672
673 PR fortran/40270
674 * trans-decl.c (create_main_function): Mark MAIN__ and
675 argc/argv as TREE_USED and push/pop function_decl context
676 if needed.
677
678 2009-05-26 Tobias Burnus <burnus@net-b.de>
679
680 PR fortran/39178
681 * gfortranspec.c (lang_specific_driver): Stop linking
682 libgfortranbegin.
683 * trans-decl.c (gfc_build_builtin_function_decls): Stop
684 making MAIN__ publicly visible.
685 (gfc_build_builtin_function_decls): Add
686 gfor_fndecl_set_args.
687 (create_main_function) New function.
688 (gfc_generate_function_code): Use it.
689
690 2009-05-26 Tobias Burnus <burnus@net-b.de>
691
692 PR fortran/40246
693 * match.c (gfc_match_nullify): NULLify freed pointer.
694
695 2009-05-26 Ian Lance Taylor <iant@google.com>
696
697 * Make-lang.in (gfortranspec.o): Use $(COMPILER).
698 (gfortran$(exeext), f951$(exeext), fortran/cpp.o): Likewise.
699
700 2009-05-26 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
701
702 * gfortran.h (GFC_MPC_RND_MODE): New.
703 * simplify.c (call_mpc_func): New helper function.
704 (gfc_simplify_cos, gfc_simplify_exp, gfc_simplify_log,
705 gfc_simplify_sin, gfc_simplify_sqrt): Add MPC support.
706
707 2009-05-25 Janus Weil <janus@gcc.gnu.org>
708
709 PR fortran/40176
710 * primary.c (gfc_match_varspec): Handle procedure pointer components
711 with array return value.
712 * resolve.c (resolve_expr_ppc): Ditto.
713 (resolve_symbol): Make sure the interface of a procedure pointer has
714 been resolved.
715 * trans-array.c (gfc_walk_function_expr): Handle procedure pointer
716 components with array return value.
717 * trans-expr.c (gfc_conv_component_ref,gfc_conv_procedure_call,
718 gfc_trans_arrayfunc_assign): Ditto.
719 (gfc_trans_pointer_assignment): Handle procedure pointer assignments,
720 where the rhs is a dummy argument.
721 * trans-types.c (gfc_get_ppc_type,gfc_get_derived_type): Handle
722 procedure pointer components with array return value.
723
724 2009-05-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
725 Dominique Dhumieres
726
727 PR fortran/35732
728 PR fortran/39872
729 * trans-array.c (gfc_conv_ss_startstride): Add one to index.
730
731 2009-05-22 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
732
733 PR fortran/40195
734 * module.c (read_md5_from_module_file): Close file before returning.
735
736 2009-05-18 Janus Weil <janus@gcc.gnu.org>
737
738 PR fortran/40164
739 * primary.c (gfc_match_rvalue): Handle procedure pointer components in
740 arrays.
741 * resolve.c (resolve_ppc_call,resolve_expr_ppc): Resolve component and
742 array references.
743 (resolve_fl_derived): Procedure pointer components are not required to
744 have constant array bounds in their return value.
745
746 2009-05-18 Janus Weil <janus@gcc.gnu.org>
747
748 * intrinsic.c (add_sym): Fix my last commit (r147655),
749 which broke bootstrap.
750
751 2009-05-18 Richard Guenther <rguenther@suse.de>
752
753 PR fortran/40168
754 * trans-expr.c (gfc_trans_zero_assign): For local array
755 destinations use an assignment from an empty constructor.
756
757 2009-05-18 Janus Weil <janus@gcc.gnu.org>
758
759 PR fortran/36947
760 PR fortran/40039
761 * expr.c (gfc_check_pointer_assign): Check intents when comparing
762 interfaces.
763 * gfortran.h (typedef struct gfc_intrinsic_arg): Add 'intent' member.
764 (gfc_compare_interfaces): Additional argument.
765 * interface.c (operator_correspondence): Add check for equality of
766 intents, and new argument 'intent_check'.
767 (gfc_compare_interfaces): New argument 'intent_check', which is passed
768 on to operator_correspondence.
769 (check_interface1): Don't check intents when comparing interfaces.
770 (compare_parameter): Do check intents when comparing interfaces.
771 * intrinsic.c (add_sym): Add intents for arguments of intrinsic
772 procedures.
773 (add_sym_1,add_sym_1s,add_sym_1m,add_sym_2,add_sym_2s,add_sym_3,
774 add_sym_3ml,add_sym_3red,add_sym_3s,add_sym_4): Use INTENT_IN by
775 default.
776 (add_sym_1_intent,add_sym_1s_intent,add_sym_2s_intent,add_sym_3s_intent)
777 : New functions to add intrinsic symbols, specifying custom intents.
778 (add_sym_4s,add_sym_5s): Add new arguments to specify intents.
779 (add_functions,add_subroutines): Add intents for various intrinsics.
780 * resolve.c (check_generic_tbp_ambiguity): Don't check intents when
781 comparing interfaces.
782 * symbol.c (gfc_copy_formal_args_intr): Copy intent.
783
784 2009-05-17 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
785
786 * iso-fortran-env.def: Define INT8, INT16, INT32, INT64, REAL32,
787 REAL64 and REAL128.
788 * gfortran.h (gfc_get_int_kind_from_width_isofortranenv,
789 gfc_get_real_kind_from_width_isofortranenv): New prototypes.
790 * iso-c-binding.def: Update definitions for the INT*_T,
791 INT_LEAST*_T and INT_FAST*_T named parameters.
792 * trans-types.c (get_typenode_from_name, get_int_kind_from_name,
793 gfc_get_real_kind_from_width_isofortranenv): New functions.
794
795 2009-05-17 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
796
797 PR fortran/36260
798 * intrinsic.c (add_functions, add_subroutines): Fix argument
799 names and wrap long lines.
800 * intrinsic.texi: Fix documentation and argument names of
801 LOG_GAMMA, DATAN2, DBESJN, DTIME, ETIME, FSTAT, STAT, LSTAT,
802 GET_COMMAND, IDATE, LTIME, MOVE_ALLOC, NINT, OR, PRODUCT,
803 SUM, RAND, RANDOM_SEED, REAL, SELECTED_INT_KIND,
804 SELECTED_REAL_KIND and XOR.
805
806 2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
807
808 PR fortran/33197
809 * intrinsic.c (add_functions): Use ERFC_SCALED simplification.
810 * intrinsic.h (gfc_simplify_erfc_scaled): New prototype.
811 * simplify.c (fullprec_erfc_scaled, asympt_erfc_scaled,
812 gfc_simplify_erfc_scaled): New functions.
813
814 2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
815
816 PR fortran/31243
817 * resolve.c (resolve_substring): Don't allow too large substring
818 indexes.
819 (gfc_resolve_substring_charlen): Fix typo.
820 (gfc_resolve_character_operator): Fix typo.
821 (resolve_charlen): Catch unreasonably large string lengths.
822 * simplify.c (gfc_simplify_len): Don't error out on LEN
823 range checks.
824
825 2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
826
827 PR fortran/36031
828 * decl.c (set_enum_kind): Use global short-enums flag.
829 * gfortran.h (gfc_option_t): Remove short_enums flag.
830 * lang.opt (-fshort-enums): Refer to C documentation.
831 * options.c (gfc_init_options, gfc_handle_option): Use global
832 short-enums flag.
833
834 2009-05-15 Tobias Burnus <burnus@net-b.de>
835
836 PR fortran/39352
837 * f95-lang.c: Add gfc_maybe_initialize_eh.
838 * gfortran.h: Add gfc_maybe_initialize_eh prototype.
839 * Make-lang.in: Add new .h dendencies for f95-lang.c
840 * openmp.c (resolve_omp_do): Call gfc_maybe_initialize_eh.
841 * misc.c (gfc_free): Avoid #define trickery for free.
842
843 2009-05-14 Steven G. Kargl <kargl@gcc.gnu.org>
844
845 * dump-parse-tree.c (show_code_node): Add ERRMSG to the dumping
846 of allocate and deallocate statements.
847
848 2009-05-14 Ian Lance Taylor <iant@google.com>
849
850 * decl.c (match_attr_spec): Change d to unsigned int.
851 * dump-parse-tree.c (show_namespace): Change op to int. Add cast.
852 * interface.c (gfc_check_interfaces): Change i to int. Add casts.
853 * module.c (read_module): Change i to int. Add cast.
854 (write_module): Change i to int.
855 * symbol.c (gfc_get_namespace): Change in to int.
856 (gfc_free_namespace): Change i to int.
857 * trans-io.c (gfc_build_io_library_fndecls): Change ptype to
858 unsigned int. Add cast.
859 * trans-types.c (gfc_init_kinds): Change mode to unsigned int.
860 Add casts.
861
862 2009-05-14 Daniel Kraft <d@domob.eu>
863
864 PR fortran/40045
865 * dump-parse-tree.c (show_typebound): Fix missing adaption to new
866 type-bound procedure storage structure.
867
868 2009-05-14 Janus Weil <janus@gcc.gnu.org>
869
870 PR fortran/39996
871 * decl.c (gfc_match_function_decl): Use gfc_add_type.
872 * symbol.c (gfc_add_type): Better checking for duplicate types in
873 function declarations. And: Always give an error for duplicte types,
874 not just a warning with -std=gnu.
875
876 2009-05-14 Jakub Jelinek <jakub@redhat.com>
877
878 PR fortran/39865
879 * io.c (resolve_tag_format): CHARACTER array in FMT= argument
880 isn't an extension. Reject non-CHARACTER array element of
881 assumed shape or pointer or assumed size array.
882 * trans-array.c (array_parameter_size): New function.
883 (gfc_conv_array_parameter): Add size argument. Call
884 array_parameter_size if it is non-NULL.
885 * trans-array.h (gfc_conv_array_parameter): Adjust prototype.
886 * trans-expr.c (gfc_conv_function_call, gfc_trans_arrayfunc_assign):
887 Adjust callers.
888 * trans-intrinsic.c (gfc_conv_intrinsic_loc): Likewise.
889 * trans-io.c (gfc_convert_array_to_string): Rewritten.
890
891 2009-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
892
893 * gfortran.h (gfc_code): Rename struct member expr to expr1.
894 * openmp.c (resolve_omp_atomic): Update expr to expr1.
895 * interface.c (gfc_extend_assign): Ditto.
896 * trans-expr.c (gfc_conv_expr_reference, gfc_trans_assignment,
897 gfc_trans_init_assign): Ditto.
898 * dump-parse-tree.c (show_code_node): Ditto.
899 * trans-openmp.c (gfc_trans_omp_atomic): Ditto.
900 * trans-stmt.c ( gfc_trans_label_assign, gfc_trans_goto, gfc_trans_call,
901 gfc_trans_return, gfc_trans_pause, gfc_trans_stop, gfc_trans_if_1,
902 gfc_trans_arithmetic_if, gfc_trans_do_while, gfc_trans_integer_select,
903 gfc_trans_logical_select, gfc_trans_character_select
904 forall_make_variable_temp, check_forall_dependencies
905 gfc_trans_forall_1, gfc_trans_where_2, gfc_trans_where_3
906 gfc_trans_where, gfc_trans_allocate, gfc_trans_deallocate): Ditto.
907 * io.c (match_io_element, gfc_match_inquire): Ditto.
908 * resolve.c (resolve_typebound_call, resolve_ppc_call,
909 resolve_allocate_expr, resolve_allocate_deallocate, resolve_select,
910 resolve_transfer, resolve_where, gfc_resolve_assign_in_forall,
911 gfc_resolve_blocks, resolve_code, build_init_assign): Ditto.
912 * st.c (gfc_free_statement): Ditto.
913 * match.c (gfc_match_assignment, gfc_match_pointer_assignment,
914 match_arithmetic_if, gfc_match_if, gfc_match_elseif
915 gfc_match_stopcode, gfc_match_assign, gfc_match_goto,
916 gfc_match_nullify, match_typebound_call, gfc_match_call
917 gfc_match_select, match_simple_where, gfc_match_where
918 gfc_match_elsewhere, match_simple_forall, gfc_match_forall): Ditto.
919 * trans-io.c (gfc_trans_transfer): Ditto.
920 * parse.c (parse_where_block, parse_if_block): Ditto.
921
922 2009-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
923
924 * gfortran.h (gfc_code): Rename struct member label to label1.
925 * dump-parse-tree.c (show_code_node): Update symbol.
926 * trans-stmt.c (gfc_trans_label_assign, gfc_trans_goto,
927 gfc_trans_arithmetic_if): Ditto.
928 * resolve.c (gfc_resolve_blocks, resolve_code): Ditto.
929 * match.c (match_arithmetic_if, gfc_match_if, gfc_reference_st_label,
930 gfc_match_assign, gfc_match_goto): Ditto.
931 * parse.c (parse_do_block): Ditto.
932
933 2009-05-13 Tobias Burnus <burnus@net-b.de>
934
935 PR fortran/34153
936 * gfortran.h (gfc_exec_op): Add EXEC_END_PROCEDURE.
937 * dump-parse-tree.c (show_code_node): Use EXEC_END_PROCEDURE.
938 * trans.c (gfc_trans_code): Ditto.
939 * resolve.c (resolve_code): Ditto.
940 * st.c (gfc_free_statement): Ditto.
941 * parse.c (accept_statement): Ditto.
942
943 2009-05-12 Tobias Burnus <burnus@net-b.de>
944
945 PR fortran/40110
946 * decl.c (gfc_match_kind_spec): Turn C kind error into a warning.
947
948 2009-05-11 Steve Ellcey <sje@cup.hp.com>
949
950 * resolve.c (check_host_association): Initialize tail.
951
952 2009-05-11 Janus Weil <janus@gcc.gnu.org>
953
954 PR fortran/40089
955 * resolve.c (resolve_fl_derived): Only return FAILURE if
956 gfc_notify_std fails.
957
958 2009-05-10 Ian Lance Taylor <iant@google.com>
959
960 * gfortran.h (enum gfc_omp_sched_kind): New enum, broken out of
961 gfc_omp_clauses.
962 (enum gfc_omp_default_sharing): Likewise.
963 * module.c (enum gfc_rsym_state): New enum, broken out of
964 pointer_info.
965 (enum gfc_wsym_state): Likewise.
966 * parse.c (enum state_order): New enum, broken out of st_state.
967
968 2009-05-10 Paul Thomas <pault@gcc.gnu.org>
969
970 PR fortran/40018
971 * trans-array.c (gfc_trans_array_constructor_value): Fold
972 convert numeric constants.
973 (gfc_build_constant_array_constructor): The same.
974
975 2009-05-10 Paul Thomas <pault@gcc.gnu.org>
976
977 PR fortran/38863
978 * trans-expr.c (gfc_conv_operator_assign): Remove function.
979 * trans.h : Remove prototype for gfc_conv_operator_assign.
980 * trans-stmt.c (gfc_conv_elemental_dependencies): Initialize
981 derivde types with intent(out).
982 (gfc_trans_call): Add mask, count1 and invert arguments. Add
983 code to use mask for WHERE assignments.
984 (gfc_trans_forall_1): Use new arguments for gfc_trans_call.
985 (gfc_trans_where_assign): The gfc_symbol argument is replaced
986 by the corresponding code. If this has a resolved_sym, then
987 gfc_trans_call is called. The call to gfc_conv_operator_assign
988 is removed.
989 (gfc_trans_where_2): Change the last argument in the call to
990 gfc_trans_where_assign.
991 * trans-stmt.h : Modify prototype for gfc_trans_call.
992 * trans.c (gfc_trans_code): Use new args for gfc_trans_call.
993
994 2009-05-08 Janus Weil <janus@gcc.gnu.org>
995
996 PR fortran/39876
997 * intrinsic.c (gfc_is_intrinsic): Do not add the EXTERNAL attribute if
998 the symbol is a module procedure.
999
1000 2009-05-08 Tobias Burnus <burnus@net-b.de>
1001
1002 * invoke.texi: Add do/recursion to the -fcheck= summary.
1003
1004 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1005
1006 PR fortran/38830
1007 * gfortran.texi: Document that we don't support variable FORMAT
1008 expressions.
1009
1010 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1011
1012 PR fortran/39576
1013 * error.c (error_print): Add missing break statement.
1014
1015 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1016
1017 PR fortran/36382
1018 * invoke.texi: Document that -fdollar-ok does not allow $ to be
1019 used in IMPLICIT statement.
1020
1021 2009-05-06 Janus Weil <janus@gcc.gnu.org>
1022 Paul Thomas <pault@gcc.gnu.org>
1023
1024 PR fortran/39630
1025 * decl.c (match_procedure_interface): New function to match the
1026 interface for a PROCEDURE statement.
1027 (match_procedure_decl): Call match_procedure_interface.
1028 (match_ppc_decl): New function to match the declaration of a
1029 procedure pointer component.
1030 (gfc_match_procedure): Call match_ppc_decl.
1031 (match_binding_attributes): Add new argument 'ppc' and handle the
1032 POINTER attribute for procedure pointer components.
1033 (match_procedure_in_type,gfc_match_generic): Added new argument to
1034 match_binding_attributes.
1035 * dump-parse-tree.c (show_expr,show_components,show_code_node): Handle
1036 procedure pointer components.
1037 * expr.c (free_expr0,gfc_copy_expr,gfc_simplify_expr): Handle EXPR_PPC.
1038 (gfc_check_pointer_assign): Handle procedure pointer components, but no
1039 full checking yet.
1040 (is_proc_ptr_comp): New function to determine if an expression is a
1041 procedure pointer component.
1042 * gfortran.h (expr_t): Add EXPR_PPC.
1043 (symbol_attribute): Add new member 'proc_pointer_comp'.
1044 (gfc_component): Add new member 'formal'.
1045 (gfc_exec_op): Add EXEC_CALL_PPC.
1046 (gfc_get_default_type): Changed first argument.
1047 (is_proc_ptr_comp): Add prototype.
1048 (gfc_match_varspec): Add new argument.
1049 * interface.c (compare_actual_formal): Handle procedure pointer
1050 components.
1051 * match.c (gfc_match_pointer_assignment,match_typebound_call): Handle
1052 procedure pointer components.
1053 * module.c (mio_expr): Handle EXPR_PPC.
1054 * parse.c (parse_derived): Handle procedure pointer components.
1055 * primary.c (gfc_match_varspec): Add new argument 'ppc_arg' and handle
1056 procedure pointer components.
1057 (gfc_variable_attr): Handle procedure pointer components.
1058 (gfc_match_rvalue): Added new argument to gfc_match_varspec and changed
1059 first argument of gfc_get_default_type.
1060 (match_variable): Added new argument to gfc_match_varspec.
1061 * resolve.c (resolve_entries,set_type,resolve_fl_parameter): Changed
1062 first argument of gfc_get_default_type.
1063 (resolve_structure_cons,resolve_actual_arglist): Handle procedure
1064 pointer components.
1065 (resolve_ppc_call): New function to resolve a call to a procedure
1066 pointer component (subroutine).
1067 (resolve_expr_ppc): New function to resolve a call to a procedure
1068 pointer component (function).
1069 (gfc_resolve_expr): Handle EXPR_PPC.
1070 (resolve_code): Handle EXEC_CALL_PPC.
1071 (resolve_fl_derived): Copy the interface for a procedure pointer
1072 component.
1073 (resolve_symbol): Fix overlong line.
1074 * st.c (gfc_free_statement): Handle EXEC_CALL_PPC.
1075 * symbol.c (gfc_get_default_type): Changed first argument.
1076 (gfc_set_default_type): Changed first argument of gfc_get_default_type.
1077 (gfc_add_component): Initialize ts.type to BT_UNKNOWN.
1078 * trans.h (gfc_conv_function_call): Renamed.
1079 * trans.c (gfc_trans_code): Handle EXEC_CALL_PPC.
1080 * trans-expr.c (gfc_conv_component_ref): Ditto.
1081 (gfc_conv_function_val): Rename to 'conv_function_val', add new
1082 argument 'expr' and handle procedure pointer components.
1083 (gfc_conv_operator_assign): Renamed gfc_conv_function_val.
1084 (gfc_apply_interface_mapping_to_expr): Handle EXPR_PPC.
1085 (gfc_conv_function_call): Rename to 'gfc_conv_procedure_call', add new
1086 argument 'expr' and handle procedure pointer components.
1087 (gfc_get_proc_ptr_comp): New function to get the backend decl for a
1088 procedure pointer component.
1089 (gfc_conv_function_expr): Renamed gfc_conv_function_call.
1090 (gfc_conv_structure): Handle procedure pointer components.
1091 * trans-intrinsic.c (gfc_conv_intrinsic_funcall,
1092 conv_generic_with_optional_char_arg): Renamed gfc_conv_function_call.
1093 * trans-stmt.h (gfc_get_proc_ptr_comp): Add prototype.
1094 * trans-stmt.c (gfc_trans_call): Renamed gfc_conv_function_call.
1095 * trans-types.h (gfc_get_ppc_type): Add prototype.
1096 * trans-types.c (gfc_get_ppc_type): New function to build a tree node
1097 for a procedure pointer component.
1098 (gfc_get_derived_type): Handle procedure pointer components.
1099
1100 2009-05-06 Tobias Burnus <burnus@net-b.de>
1101
1102 PR fortran/40041
1103 * resolve.c (resolve_symbol): Print no warning for implicitly
1104 typed intrinsic functions.
1105
1106 2009-05-05 Janus Weil <janus@gcc.gnu.org>
1107
1108 PR fortran/39998
1109 * expr.c (gfc_check_pointer_assign): Check for statement functions and
1110 internal procedures in procedure pointer assignments.
1111
1112 2009-04-28 Janus Weil <janus@gcc.gnu.org>
1113
1114 PR fortran/39946
1115 * resolve.c (resolve_symbol): Correctly copy the interface of a
1116 PROCEDURE statement if the interface involves a RESULT variable.
1117
1118 2009-04-28 Janus Weil <janus@gcc.gnu.org>
1119
1120 PR fortran/39930
1121 PR fortran/39931
1122 * expr.c (gfc_check_pointer_assign): Correctly detect if the left hand
1123 side is a pointer.
1124 * parse.c (gfc_fixup_sibling_symbols): Don't check for ambiguity.
1125
1126 2009-04-28 Paul Thomas <pault@gcc.gnu.org>
1127
1128 PR fortran/39879
1129 * trans_expr.c (gfc_conv_procedure_call): Deep copy a derived
1130 type parentheses argument if it is a variable with allocatable
1131 components.
1132
1133 2009-04-27 Ian Lance Taylor <iant@google.com>
1134
1135 * trans-intrinsic.c (DEFINE_MATH_BUILTIN): Add casts to enum
1136 type.
1137 * trans-io.c (st_parameter_field): Add casts to enum type.
1138
1139 2009-04-26 Steven G. Kargl <kargl@gcc.gnu.org>
1140
1141 PR fortran/39893
1142 fortran/data.c (gfc_assign_data_value): If the lvalue is an
1143 assumed character length entity in a data statement, then
1144 return FAILURE to prevent segmentation fault.
1145
1146 2009-04-26 Jakub Jelinek <jakub@redhat.com>
1147
1148 * trans-decl.c: Include pointer-set.h.
1149 (nonlocal_dummy_decl_pset, tree nonlocal_dummy_decls): New variables.
1150 (gfc_nonlocal_dummy_array_decl): New function.
1151 (gfc_get_symbol_decl): Call it for non-local dummy args with saved
1152 descriptor.
1153 (gfc_get_symbol_decl): Set DECL_BY_REFERENCE when needed.
1154 (gfc_generate_function_code): Initialize nonlocal_dummy_decl{s,_pset},
1155 chain it to outermost block's vars, destroy it afterwards.
1156 * Make-lang.in (trans-decl.o): Depend on pointer-set.h.
1157
1158 2009-04-25 Janus Weil <janus@gcc.gnu.org>
1159
1160 PR fortran/39688
1161 * decl.c (gfc_match_import): Use 'sym->name' instead of 'name'.
1162 They differ if the symbol has been use-renamed.
1163
1164 2009-04-24 Ian Lance Taylor <iant@google.com>
1165
1166 * gfortran.h (enum gfc_symbol_type): New named enum type, broken
1167 out of struct gfc_symbol.
1168 (struct gfc_symbol): Use enum gfc_symbol_type.
1169 (enum gfc_array_ref_dimen_type): New named enum type, broken out
1170 of struct gfc_array_ref).
1171 (struct gfc_array_ref): Use enum gfc_array_ref_dimen_type.
1172 (mod_pointee_as): Update declaration.
1173 * decl.c (add_global_entry): Change type to enum gfc_symbol_type.
1174 (gfc_mod_pointee_as): Change return type to "match".
1175 * module.c (mio_array_ref): Add cast to enum type.
1176 (mio_symbol): Likewise.
1177 * resolve.c (resolve_global_procedure): Change type to enum
1178 gfc_symbol_type.
1179 * trans-io.c (gfc_build_st_parameter): Change type to unsigned
1180 int.
1181
1182 2009-04-24 Daniel Kraft <d@domob.eu>
1183
1184 * gfortran.h (gfc_get_typebound_proc): Removed as macro, now a function.
1185 (struct gfc_symtree): Moved "typebound" member inside union.
1186 (struct gfc_namespace): Add "tb_sym_root" as new symtree to sort out
1187 type-bound procedures there.
1188 (gfc_get_tbp_symtree): New procedure.
1189 * symbol.c (tentative_tbp_list): New global.
1190 (gfc_get_namespace): NULL new "tb_sym_root" member.
1191 (gfc_new_symtree): Removed initialization of "typebound" member.
1192 (gfc_undo_symbols): Process list of tentative tbp's.
1193 (gfc_commit_symbols): Ditto.
1194 (free_tb_tree): New method.
1195 (gfc_free_namespace): Call it.
1196 (gfc_get_typebound_proc): New method.
1197 (gfc_get_tbp_symtree): New method.
1198 (gfc_find_typebound_proc): Adapt to structural changes of gfc_symtree
1199 and gfc_namespace with regards to tbp's.
1200 * dump-parse-tree.c (show_typebound): Ditto.
1201 * primary.c (gfc_match_varspec): Ditto. Don't reference tbp-symbol
1202 as it isn't a symbol any longer.
1203 * module.c (mio_typebound_symtree): Adapt to changes.
1204 (mio_typebound_proc): Ditto, create symtrees using "gfc_get_tbp_symtree"
1205 rather than "gfc_get_sym_tree".
1206 (mio_f2k_derived): Ditto.
1207 * decl.c (match_procedure_in_type): Ditto.
1208 (gfc_match_generic): Ditto. Don't reference tbp-symbol.
1209 * resolve.c (check_typebound_override): Adapt to changes.
1210 (resolve_typebound_generic): Ditto.
1211 (resolve_typebound_procedures): Ditto.
1212 (ensure_not_abstract_walker): Ditto.
1213 (ensure_not_abstract): Ditto.
1214 (resolve_typebound_procedure): Ditto, ignore erraneous symbols (for
1215 instance, through removed tentative ones).
1216 * gfc-internals.texi (Type-bound procedures): Document changes.
1217
1218 2009-04-24 Janus Weil <janus@gcc.gnu.org>
1219
1220 PR fortran/39861
1221 PR fortran/39864
1222 * symbol.c (gfc_copy_formal_args_intr): Set attr.flavor and attr.dummy
1223 for the formal arguments.
1224
1225 2009-04-21 Taras Glek <tglek@mozilla.com>
1226
1227 * f95-lang.c: Update GTY annotations to new syntax.
1228 * trans-intrinsic.c: Likewise.
1229 * trans-io.c: Likewise.
1230 * trans.h: Likewise.
1231
1232 2009-04-22 Janus Weil <janus@gcc.gnu.org>
1233
1234 PR fortran/39735
1235 * decl.c (add_hidden_procptr_result): Bugfix for procptr results.
1236 (match_procedure_decl): Set if_source.
1237 * expr.c (gfc_check_pointer_assign): Bugfix: Return after error.
1238 And: Check interface also for IFSRC_UNKNOWN (return type may be known).
1239 * gfortran.h (typedef enum ifsrc): Remove IFSRC_USAGE,
1240 add documentation. Rename copy_formal_args and copy_formal_args_intr.
1241 * interface.c (gfc_compare_interfaces): Check for return types,
1242 handle IFSRC_UNKNOWN.
1243 (compare_intr_interfaces,compare_actual_formal_intr): Obsolete, removed.
1244 (gfc_procedure_use): Modified handling of intrinsics.
1245 * intrinsic.c (add_functions): Bugfix for "dim".
1246 * resolve.c (resolve_intrinsic): New function to resolve intrinsics,
1247 which copies the interface from isym to sym.
1248 (resolve_procedure_expression,resolve_function): Use new function
1249 'resolve_intrinsic'.
1250 (resolve_symbol): Add function attribute for externals with return type
1251 and use new function 'resolve_intrinsic'.
1252 * symbol.c (ifsrc_types): Remove string for IFSRC_USAGE.
1253 (copy_formal_args): Renamed to gfc_copy_formal_args.
1254 (copy_formal_args_intr): Renamed to gfc_copy_formal_args_intr.
1255 * trans-const.c (gfc_conv_const_charlen): Handle cl==NULL.
1256
1257 2009-04-21 Joseph Myers <joseph@codesourcery.com>
1258
1259 * ChangeLog, ChangeLog-2002, ChangeLog-2003, ChangeLog-2004,
1260 ChangeLog-2005, ChangeLog-2006, ChangeLog-2007, ChangeLog-2008,
1261 ChangeLog.ptr, config-lang.in, ioparm.def, mathbuiltins.def: Add
1262 copyright and license notices.
1263 * ChangeLog, ChangeLog-2005, ChangeLog-2006, ChangeLog-2007,
1264 ChangeLog-2008: Correct dates.
1265
1266 2009-04-20 Tobias Burnus <burnus@net-b.de>
1267
1268 PR fortran/39811
1269 * scanner.c (load_line): Fix bogus "&" compile-time diagnostic.
1270
1271 2009-04-20 Paul Thomas <pault@gcc.gnu.org>
1272
1273 PR fortran/39800
1274 * resolve.c (is_sym_host_assoc): New function.
1275 (resolve_fl_derived): Call it when checking PRIVATE components
1276 of PUBLIC derived types. Change gfc_error to a gfc_notify_std
1277 with std=f2003.
1278 (resolve_fl_namelist): Call it twice to check for host
1279 association.
1280
1281 2009-04-20 Ian Lance Taylor <iant@google.com>
1282
1283 * module.c (import_iso_c_binding_module): Add casts to enum type.
1284 * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Change op to enum
1285 tree_code.
1286 (gfc_conv_intrinsic_anyall): Likewise.
1287 (gfc_conv_intrinsic_arith): Likewise.
1288 (gfc_conv_intrinsic_minmaxloc): Likewise.
1289 (gfc_conv_intrinsic_minmaxval): Likewise.
1290 (gfc_conv_intrinsic_bitop): Likewise.
1291 (gfc_conv_intrinsic_singlebitop): Likewise.
1292 (gfc_conv_intrinsic_strcmp): Likewise.
1293
1294 2009-04-20 Vasilis Liaskovitis <vliaskov@gmail.com>
1295 Jakub Jelinek <jakub@redhat.com>
1296
1297 PR fortran/35423
1298 * trans.h (OMPWS_WORKSHARE_FLAG, OMPWS_CURR_SINGLEUNIT,
1299 OMPWS_SCALARIZER_WS, OMPWS_NOWAIT): Define.
1300 (ompws_flags): New extern decl.
1301 * trans-array.c (gfc_trans_scalarized_loop_end): Build OMP_FOR
1302 for the outer dimension if ompws_flags allow it.
1303 * trans.c (gfc_generate_code): Clear ompws_flags.
1304 * trans-expr.c (gfc_trans_assignment_1): Allow worksharing
1305 array assignments inside of !$omp workshare.
1306 * trans-stmt.c (gfc_trans_where_3): Similarly for where statements
1307 and constructs.
1308 * trans-openmp.c (ompws_flags): New variable.
1309 (gfc_trans_omp_workshare): Rewritten.
1310
1311 2009-04-11 Daniel Kraft <d@domob.eu>
1312
1313 PR fortran/37746
1314 * gfortran.h (struct gfc_charlen): New field "passed_length" to store
1315 the actual passed string length for dummy arguments.
1316 * trans-decl.c (gfc_create_string_length): Formatting fixes and added
1317 assertion, moved a local variable into the innermost block it is needed.
1318 (create_function_arglist): Removed TODO about the check being
1319 implemented and initialize cl->passed_length here.
1320 (add_argument_checking): New method.
1321 (gfc_generate_function_code): Call the argument checking method.
1322
1323 2009-04-11 Janus Weil <janus@gcc.gnu.org>
1324
1325 PR fortran/39692
1326 * symbol.c (check_conflict): Reject procedure pointers for -std=f95.
1327
1328 2009-04-11 Daniel Franke <franke.daniel@gmail.com>
1329
1330 * resolve.c (resolve_global_procedure): Enable whole-file checking for
1331 procedures that are declared later in the file.
1332
1333 2009-04-10 Paolo Bonzini <bonzini@gnu.org>
1334
1335 PR middle-end/39701
1336 * trans.c (gfc_allocate_with_status): Fix type mismatches
1337 on "pstat == 0".
1338
1339 2009-04-10 Daniel Franke <franke.daniel@gmail.com>
1340
1341 PR fortran/38709
1342 * expr.c (find_array_section): Leave early on zero-sized arrays.
1343
1344 2009-04-09 Janus Weil <janus@gcc.gnu.org>
1345
1346 PR fortran/36704
1347 * decl.c (add_hidden_procptr_result): New function for handling
1348 procedure pointer return values by adding a hidden result variable.
1349 (variable_decl,match_procedure_decl,gfc_match_function_decl,
1350 gfc_match_subroutine,gfc_match_end,attr_decl1): Handle procedure pointer
1351 return values.
1352 * parse.c (parse_interface): Add EXTERNAL attribute only after
1353 FUNCTION/SUBROUTINE declaration is complete.
1354 * primary.c (replace_hidden_procptr_result): New function for replacing
1355 function symbol by hidden result variable.
1356 (gfc_match_rvalue,match_variable): Replace symbol by hidden result
1357 variable.
1358 * resolve.c (resolve_contained_fntype,resolve_function,resolve_variable,
1359 resolve_symbol): Allow for procedure pointer function results.
1360 (resolve_fl_procedure): Conflict detection moved here from
1361 'check_conflict'.
1362 * symbol.c (gfc_check_function_type): Allow for procedure pointer
1363 function results.
1364 (check_conflict): Move some conflict detection to resolution stage.
1365 * trans-types.c (gfc_sym_type,gfc_get_function_type): Handle hidden
1366 result variables.
1367
1368 2009-04-08 Jakub Jelinek <jakub@redhat.com>
1369
1370 * trans-types.c (gfc_init_types): Ensure gfc_integer_types doesn't
1371 contain TYPE_STRING_FLAG types.
1372
1373 2009-04-08 Janne Blomqvist <jb@gcc.gnu.org>
1374
1375 PR fortran/39670
1376 * invoke.texi (fdollar-ok): Fix typo.
1377
1378 2009-04-08 Daniel Franke <franke.daniel@gmail.com>
1379
1380 PR fortran/39670
1381 * invoke.texi (fdollar-ok): Clarify limitations.
1382
1383 2009-04-08 Paul Thomas <pault@gcc.gnu.org>
1384
1385 PR fortran/38863
1386 * trans-array.c (gfc_trans_deferred_array): Return if this
1387 is a result variable.
1388
1389 2009-04-07 Janus Weil <janus@gcc.gnu.org>
1390
1391 PR fortran/38152
1392 * trans-decl.c (gfc_get_symbol_decl): Correctly set decl location for
1393 procedure pointer decls.
1394
1395 2009-04-07 Janus Weil <janus@gcc.gnu.org>
1396
1397 PR fortran/38290
1398 * expr.c (gfc_check_pointer_assign): Enable interface check for
1399 procedure pointers.
1400 * gfortran.h: Add copy_formal_args_intr.
1401 * interface.c (gfc_compare_interfaces): Call gfc_compare_intr_interfaces
1402 if second argument is an intrinsic.
1403 (compare_intr_interfaces): Correctly set attr.function, attr.subroutine
1404 and ts.
1405 (compare_parameter): Call gfc_compare_interfaces also for intrinsics.
1406 * resolve.c (resolve_specific_f0,resolve_specific_s0): Don't resolve
1407 intrinsic interfaces here. Must happen earlier.
1408 (resolve_symbol): Resolution of intrinsic interfaces moved here from
1409 resolve_specific_..., and formal args are now copied from intrinsic
1410 interfaces.
1411 * symbol.c (copy_formal_args_intr): New function to copy the formal
1412 arguments from an intinsic procedure.
1413
1414 2009-04-06 Paul Thomas <pault@gcc.gnu.org>
1415
1416 PR fortran/38863
1417 * dependency.c (ref_same_as_full_array): New function.
1418 (gfc_dep_resolver): Call it.
1419
1420 2009-04-06 Janus Weil <janus@gcc.gnu.org>
1421
1422 PR fortran/39414
1423 * decl.c (match_procedure_decl): Fix double declaration problems with
1424 PROCEDURE statements.
1425 * symbol.c (gfc_add_type): Ditto.
1426
1427 2009-04-06 Paul Thomas <pault@gcc.gnu.org>
1428
1429 PR fortran/36091
1430 * trans-array.c (gfc_conv_array_ref): If the symbol has the
1431 temporary attribute use the array_spec for the bounds.
1432 * gfortran.h : Add the temporary field to the structure
1433 'symbol_attribute'.
1434 * trans-stmt.c (forall_make_variable_temp): Set the symbol's
1435 temporary attribute.
1436
1437 2009-04-05 Daniel Franke <franke.daniel@gmail.com>
1438
1439 PR fortran/29458
1440 * trans-array.c (gfc_trans_array_constructor_value): Shadow
1441 implied do-loop variable to avoid spurious middle-end warnings.
1442
1443 2009-04-04 Tobias Burnus <burnus@net-b.de>
1444
1445 PR fortran/39577
1446 * trans-decl.c (gfc_generate_function_code): Move recursive
1447 check to the right position.
1448
1449 2009-04-04 Paul Thomas <pault@gcc.gnu.org>
1450
1451 PR fortran/37614
1452 * trans-common.c (translate_common): Do not offset the whole
1453 coomon block.
1454
1455 2009-04-03 Tobias Burnus <burnus@net-b.de>
1456
1457 PR fortran/39594
1458 * resolve.c (resolve_common_vars): Add FL_VARIABLE to symbol
1459 if it is not a procedure pointer.
1460 * primary.c (match_actual_arg): Ditto.
1461
1462 2009-03-31 Joseph Myers <joseph@codesourcery.com>
1463
1464 PR preprocessor/15638
1465 * cpp.c (cb_cpp_error): Handle CPP_DL_FATAL.
1466
1467 2009-03-30 Steven G. Kargl <kargls@comcast.net>
1468
1469 PR fortran/38389
1470 * trans-stmt.c(gfc_trans_allocate): Add translation of ERRMSG.
1471 (gfc_trans_deallocate): Add translation of ERRMSG. Remove stale
1472 comments. Minor whitespace cleanup.
1473 * resolve.c(is_scalar_expr_ptr): Whitespace cleanup.
1474 (resolve_deallocate_expr (gfc_expr *e): Update error message.
1475 (resolve_allocate_expr): Remove dead code. Update error message.
1476 Move error checking to ...
1477 (resolve_allocate_deallocate): ... here. Add additional error
1478 checking for STAT, ERRMSG, and allocate-objects.
1479 * match.c(gfc_match_allocate,gfc_match_deallocate): Parse ERRMSG.
1480 Check for redundant uses of STAT and ERRMSG. Reword error message
1481 and add checking for pointer, allocatable, and proc_pointer attributes.
1482
1483 2009-03-30 Paul Thomas <pault@gcc.gnu.org>
1484
1485 PR fortran/22571
1486 PR fortran/26227
1487 PR fortran/24886
1488 * symbol.c : Add gfc_global_ns_list.
1489 * decl.c (add_global_entry): Set the namespace ('ns') field.
1490 * gfortran.h : Add the resolved field to gfc_namespace. Add the
1491 namespace ('ns') field to gfc_gsymbol. Add flag_whole_file to
1492 gfc_option_t. Add the prototype for gfc_free_dt_list.
1493 * lang.opt : Add the whole-file option.
1494 * invoke.texi : Document the whole-file option.
1495 * resolve.c (resolve_global_procedure): If the fwhole-file
1496 option is set, reorder gsymbols to ensure that translation is
1497 in the right order. Resolve the gsymbol's namespace if that
1498 has not occurred and then check interfaces.
1499 (resolve_function): Move call to resolve_global_procedure.
1500 (resolve_call): The same.
1501 (resolve_codes): Store the current labels_obstack.
1502 (gfc_resolve) : Return if the namespace is already resolved.
1503 trans-decl.c (gfc_get_extern_function_decl): If the whole_file
1504 option is selected, use the backend_decl of a gsymbol, if it is
1505 available.
1506 parse.c (add_global_procedure, add_global_program): If the flag
1507 whole-file is set, add the namespace to the gsymbol.
1508 (gfc_parse_file): On -fwhole-file, put procedure namespaces on
1509 the global namespace list. Rearrange to do resolution of all
1510 the procedures in a file, followed by their translation.
1511 * options.c (gfc_init_options): Add -fwhole-file.
1512 (gfc_handle_option): The same.
1513
1514 2009-03-30 Ulrich Weigand <Ulrich.Weigand@de.ibm.com>
1515
1516 * f95-lang.c (gfc_init_builtin_functions): Define BUILT_IN_HUGE_VAL
1517 family of intrinsics instead of BUILT_IN_INF family.
1518 * trans-intrinsics.c (gfc_conv_intrinsic_nearest): Use
1519 BUILT_IN_HUGE_VAL instead of BUILT_IN_INF.
1520
1521 2009-03-30 Jakub Jelinek <jakub@redhat.com>
1522
1523 * trans-types.c (gfc_sym_type, gfc_return_by_reference): For
1524 sym->attr.result check sym->ns->proc_name->attr.is_bind_c.
1525
1526 2009-03-30 Joseph Myers <joseph@codesourcery.com>
1527
1528 PR rtl-optimization/323
1529 * options.c (gfc_post_options): Set
1530 flag_excess_precision_cmdline. Give an error for
1531 -fexcess-precision=standard for processors where the option is
1532 significant.
1533
1534 2009-03-29 Joseph Myers <joseph@codesourcery.com>
1535
1536 PR preprocessor/34695
1537 * cpp.c (cb_cpp_error): New.
1538 (gfc_cpp_post_options): Don't set cpp_option->inhibit_warnings.
1539 Don't check cpp_errors (cpp_in).
1540 (gfc_cpp_init_0): Set cb->error.
1541
1542 2009-03-29 Steven G. Kargl <kargl@gcc.gnu.org>
1543
1544 PR fortran/38823
1545 * gfortran.h: Add ARITH_PROHIBIT to arith enum.
1546 expr.c (gfc_match_init_expr): Add global variable init_flag to
1547 flag matching an initialization expression.
1548 (check_intrinsic_op): Move no longer reachable error message to ...
1549 * arith.c (arith_power): ... here. Remove gfc_ prefix in
1550 gfc_arith_power. Use init_flag. Allow constant folding of x**y
1551 when y is REAL or COMPLEX.
1552 (eval_intrinsic): Remove restriction that y in x**y must be INTEGER
1553 for constant folding.
1554 * gfc_power: Update gfc_arith_power to arith_power
1555
1556 2009-03-29 Daniel Kraft <d@domob.eu>
1557
1558 PR fortran/37423
1559 * gfortran.h (struct gfc_typebound_proc): Added new flag "deferred" and
1560 added a comment explaining DEFERRED binding handling.
1561 * decl.c (match_binding_attributes): Really match DEFERRED attribute.
1562 (match_procedure_in_type): Really match PROCEDURE(interface) syntax
1563 and do some validity checks for DEFERRED and this construct.
1564 * module.c (binding_overriding): New string constant for DEFERRED.
1565 (mio_typebound_proc): Module-IO DEFERRED flag.
1566 * resolve.c (check_typebound_override): Ensure that a non-DEFERRED
1567 binding is not overridden by a DEFERRED one.
1568 (resolve_typebound_procedure): Allow abstract interfaces as targets
1569 for DEFERRED bindings.
1570 (ensure_not_abstract_walker), (ensure_not_abstract): New methods.
1571 (resolve_fl_derived): Use new "ensure_not_abstract" method for
1572 non-ABSTRACT types extending ABSTRACT ones to ensure each DEFERRED
1573 binding is overridden.
1574 (check_typebound_baseobject): New method.
1575 (resolve_compcall), (resolve_typebound_call): Check base-object of
1576 the type-bound procedure call.
1577 * gfc-internals.texi (Type-bound procedures): Document a little bit
1578 about internal handling of DEFERRED bindings.
1579
1580 2009-03-29 Tobias Schlueter <tobi@gcc.gnu.org>
1581
1582 PR fortran/38507
1583 * gfortran.h (gfc_st_label): Fix comment.
1584 (gfc_exec_op): Add statement code EXEC_END_BLOCK for end of block.
1585 * parse.c (accept_statement): Use EXEC_END_BLOCK for END IF and
1586 END SELECT with labels.
1587 (check_do_closure): Fix formatting.
1588 (parse_do_block): Fix typo in error message.
1589 * resolve.c (code_stack): Remove tail member. Update comment to
1590 new use of reachable_labels.
1591 (reachable_labels): Rename to ...
1592 (find_reachable_labels): ... this. Overhaul. Update preceding
1593 comment.
1594 (resolve_branch): Fix comment preceding function. Rewrite.
1595 (resolve_code): Update call to find_reachable_labels. Add code to
1596 deal with EXEC_END_BLOCK.
1597 * st.c (gfc_free_statement): Add code to deal with EXEC_END_BLOCK.
1598 Add 2009 to copyright years.
1599 * trans.c (gfc_trans_code): Likewise on both counts.
1600
1601 2009-03-31 Paul Thomas <pault@gcc.gnu.org>
1602
1603 PR fortran/38917
1604 * expr.c (gfc_check_assign): Allow pointer components when
1605 checking for NULL.
1606
1607 PR fortran/38918
1608 * resolve.c (check_data_variable): Treat pointer arrays with
1609 scalars.
1610
1611 2009-03-31 Paul Thomas <pault@gcc.gnu.org>
1612
1613 PR fortran/38915
1614 * trans-expr.c (gfc_trans_assignment_1): Ensure temporaries
1615 have a string_length.
1616
1617 2009-03-28 Tobias Burnus <burnus@net-b.de>
1618
1619 PR fortran/34656
1620 * trans-stmt.c (gfc_trans_simple_do, gfc_trans_do):
1621 Add GFC_RTCHECK_DO support.
1622 * option.c (gfc_handle_runtime_check_option): Enable GFC_RTCHECK_DO.
1623 * invoke.texi (-fcheck): Document "do" option.
1624
1625 2009-03-28 Paul Thomas <pault@gcc.gnu.org>
1626
1627 PR fortran/38538
1628 * trans-array.c (get_elemental_fcn_charlen): Remove.
1629 (get_array_charlen): New function to replace previous.
1630
1631 2009-03-28 Paul Thomas <pault@gcc.gnu.org>
1632
1633 PR fortran/38765
1634 * parse.c (parse_derived): Do not break on finding pointer,
1635 allocatable or private components.
1636
1637 2009-03-28 Tobias Burnus <burnus@net-b.de>
1638
1639 PR fortran/32626
1640 * option.c (gfc_handle_runtime_check_option): Enable recursion check.
1641 * trans-decl.c (gfc_generate_function_code): Add recursion check.
1642 * invoke.texi (-fcheck): Add recursive option.
1643
1644 2009-03-28 Tobias Burnus <burnus@net-b.de>
1645
1646 PR fortran/38432
1647 * resolve.c (gfc_resolve_iterator): Add zero-loop warning.
1648
1649 2009-03-28 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1650 Paul Thomas <pault@gcc.gnu.org>
1651 Tobias Burnus <burnus@net-b.de>
1652
1653 * gfortran.h (gfc_option_t): Add rtcheck.
1654 * lang.opt: New option -fcheck.
1655 * libgfortran.h: Add GFC_RTCHECK_* constants.
1656 * invoke.texi: Document -fcheck.
1657 * options.c (gfc_handle_runtime_check_option): New function.
1658 (gfc_init_options,gfc_post_options,gfc_handle_option):
1659 Add -fcheck option.
1660
1661 2009-03-27 Richard Guenther <rguenther@suse.de>
1662
1663 * trans-array.c (gfc_conv_descriptor_data_addr): Use
1664 gfc_build_addr_expr instead of build_fold_addr_expr.
1665 (gfc_trans_allocate_array_storage, gfc_trans_array_constructor_value,
1666 gfc_trans_constant_array_constructor, gfc_conv_array_data,
1667 gfc_conv_expr_descriptor, gfc_conv_array_parameter): Likewise.
1668 * trans-expr.c (gfc_conv_missing_dummy, gfc_conv_variable,
1669 gfc_conv_function_val, gfc_conv_operator_assign,
1670 gfc_conv_subref_array_arg, gfc_conv_function_call,
1671 gfc_conv_expr_reference, gfc_trans_scalar_assign): Likewise.
1672 * trans-intrinsic.c (gfc_conv_intrinsic_exponent,
1673 gfc_conv_intrinsic_ctime, gfc_conv_intrinsic_fdate,
1674 gfc_conv_intrinsic_ttynam, gfc_conv_intrinsic_minmax_char,
1675 gfc_conv_intrinsic_fraction, gfc_conv_intrinsic_spacing,
1676 gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_set_exponent,
1677 gfc_conv_intrinsic_array_transfer, gfc_conv_intrinsic_transfer,
1678 gfc_conv_intrinsic_si_kind, gfc_conv_intrinsic_trim): Likewise.
1679 * trans-io.c (gfc_trans_io_runtime_check, set_parameter_ref,
1680 gfc_convert_array_to_string, gfc_trans_open, gfc_trans_close,
1681 build_filepos, gfc_trans_inquire, gfc_trans_wait,
1682 nml_get_addr_expr, transfer_namelist_element, build_dt,
1683 gfc_trans_dt_end, transfer_array_component, transfer_expr,
1684 transfer_array_desc, gfc_trans_transfer): Likewise.
1685 * trans-stmt.c (gfc_trans_allocate, gfc_trans_deallocate): Likewise.
1686 * trans.c (gfc_build_addr_expr): Mark the base of the address
1687 TREE_ADDRESSABLE.
1688
1689 2009-03-27 Tobias Burnus <burnus@net-b.de>
1690
1691 * gfortran.h (enum init_local_real.): Add GFC_INIT_REAL_SNAN.
1692 (gfc_expr): Add is_snan.
1693 * trans-const.c (gfc_conv_mpfr_to_tree): Support SNaN.
1694 (gfc_conv_constant_to_tree): Update call to gfc_conv_mpfr_to_tree.
1695 * trans-const.h (gfc_conv_mpfr_to_tree): Update prototype.
1696 * resolve.c (build_default_init_expr): Update call.
1697 * target-memory.c (encode_float): Ditto.
1698 * trans-intrinsic.c (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod,
1699
1700 2009-03-18 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
1701
1702 * lang.opt: Unify help texts for -I, -Wconversion, -d, -fopenmp,
1703 and -fpreprocessed.
1704
1705 2009-03-06 Alexandre Oliva <aoliva@redhat.com>
1706
1707 * simplify.c (gfc_simplify_transfer): Zero-initialize the
1708 buffer.
1709
1710 2009-02-27 Tobias Burnus <burnus@net-b.de>
1711
1712 PR fortran/39309
1713 * module.c (read_md5_from_module_file): Add missing quote.
1714
1715 2009-02-27 Tobias Burnus <burnus@net-b.de>
1716
1717 PR fortran/39309
1718 * module.c (read_md5_from_module_file): Include mod version
1719 in had-changed test.
1720
1721 2009-02-26 Paul Thomas <pault@gcc.gnu.org>
1722
1723 PR fortran/39295
1724 * interface.c (compare_type_rank_if): Return 1 if the symbols
1725 are the same and deal with external procedures where one is
1726 identified to be a function or subroutine by usage but the
1727 other is not.
1728
1729 2009-02-26 Paul Thomas <pault@gcc.gnu.org>
1730
1731 PR fortran/39292
1732 * trans-array.c (gfc_conv_array_initializer): Convert all
1733 expressions rather than ICEing.
1734
1735 2009-02-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1736
1737 PR fortran/38914
1738 * array.c (ref_dimen_size): Rename to gfc_ref_dimen_size,
1739 make global. Change function name in error messages.
1740 (ref_size): Change ref_dimen_size to gfc_ref_dimen_size.
1741 (gfc_array_ref_shape): Likewise.
1742 * gfortran.h: Add prototype for gfc_ref_dimen_size.
1743 * simplify.c (simplify_bound_dim): Add ref argument.
1744 If the reference isn't a full array, return one for
1745 the lower bound and the extent for the upper bound.
1746 (simplify_bound): For array sections, take as from the
1747 argument. Add reference to all to simplify_bound_dim.
1748
1749 2009-02-19 Daniel Franke <franke.daniel@gmail.com>
1750
1751 * scanner.c (load_line): At end of line, skip '\r' without setting
1752 the truncation flag.
1753
1754 2009-02-18 Daniel Kraft <d@domob.eu>
1755
1756 * gfortran.texi: New chapter about compiler characteristics.
1757 (Compiler Characteristics): Document KIND type parameters here.
1758
1759 2009-02-18 Tobias Burnus <burnus@net-b.de>
1760
1761 * intrinsic.texi (MALLOC): Make example more portable.
1762
1763 2009-02-13 Mikael Morin <mikael.morin@tele2.fr>
1764
1765 PR fortran/38259
1766 * module.c (gfc_dump_module,gfc_use_module): Add module
1767 version number.
1768
1769 2009-02-13 Paul Thomas <pault@gcc.gnu.org>
1770
1771 PR fortran/36703
1772 PR fortran/36528
1773 * trans-expr.c (gfc_conv_function_val): Stabilize Cray-pointer
1774 function references to ensure that a valid expression is used.
1775 (gfc_conv_function_call): Pass Cray pointers to procedures.
1776
1777 2009-02-03 Jakub Jelinek <jakub@redhat.com>
1778
1779 * gfortranspec.c (lang_specific_driver): Update copyright notice
1780 dates.
1781
1782 2009-01-28 Paul Thomas <pault@gcc.gnu.org>
1783
1784 PR fortran/38852
1785 PR fortran/39006
1786 * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use the array
1787 descriptor ubound for UBOUND, when the array lbound == 1.
1788
1789 2009-01-27 Daniel Kraft <d@domob.eu>
1790
1791 PR fortran/38883
1792 * trans-stmt.c (gfc_conv_elemental_dependencies): Create temporary
1793 for the real type needed to make it work for subcomponent-references.
1794
1795 2009-01-21 Daniel Kraft <d@domob.eu>
1796
1797 * trans-stmt.c (gfc_conv_elemental_dependencies): Cleaned up comment.
1798
1799 2009-01-20 Paul Thomas <pault@gcc.gnu.org>
1800
1801 PR fortran/38907
1802 * resolve.c (check_host_association): Remove the matching to
1803 correct an incorrect host association and use manipulation of
1804 the expression instead.
1805
1806 2009-01-20 Tobias Burnus <burnus@net-b.de>
1807
1808 * invoke.texi (RANGE): RANGE also takes INTEGER arguments.
1809
1810 2009-01-19 Mikael Morin <mikael.morin@tele2.fr>
1811
1812 PR fortran/38859
1813 * simplify.c (simplify_bound): Don't use array specification
1814 if variable or component has subsequent references.
1815
1816 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
1817
1818 PR fortran/38657
1819 * module.c (write_common_0): Add argument 'this_module' and
1820 check that non-use associated common blocks are written first.
1821 (write_common): Call write_common_0 twice, once with true and
1822 then with false.
1823
1824 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
1825
1826 PR fortran/34955
1827 * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): Has
1828 been absorbed into gfc_conv_intrinsic_transfer. All
1829 references to it in trans-intrinsic.c have been changed
1830 accordingly. PR fixed by using a temporary for scalar
1831 character transfer, when the source is shorter than the
1832 destination.
1833
1834 2009-01-17 Paul Thomas <pault@gcc.gnu.org>
1835
1836 PR fortran/38657
1837 * module.c (write_common_0): Revert patch of 2009-01-05.
1838
1839 2009-01-16 Janus Weil <janus@gcc.gnu.org>
1840
1841 PR fortran/38152
1842 * expr.c (gfc_check_pointer_assign): Allow use-associated procedure
1843 pointers as lvalue.
1844 * trans-decl.c (get_proc_pointer_decl,gfc_create_module_variable):
1845 Enable procedure pointers as module variables.
1846
1847 2009-01-14 Steven G. Kargl <kargl@gcc.gnu.org>
1848
1849 * ChangeLog-2007: Clean out svn merge droppings.
1850
1851 2009-01-10 Paul Thomas <pault@gcc.gnu.org>
1852
1853 PR fortran/38763
1854 * target-memory.c (encode_derived): Encode NULL.
1855
1856 2009-01-10 Paul Thomas <pault@gcc.gnu.org>
1857
1858 PR fortran/38765
1859 * resolve.c (check_host_association): Use the symtree name to
1860 search for a potential contained procedure, since this is the
1861 name by which it would be referenced.
1862
1863 2009-01-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1864
1865 PR fortran/38220
1866 * interface.c (gfc_procedure_use): Don't warn about functions
1867 from ISO_C_BINDING.
1868 * symbol.c (generate_isocbinding_symbol): Mark c_loc and
1869 c_funloc as pure.
1870
1871 2009-01-05 Paul Thomas <pault@gcc.gnu.org>
1872
1873 PR fortran/38657
1874 * module.c (write_common_0): Use the name of the symtree rather
1875 than the common block, to determine if the common has been
1876 written.
1877
1878 2009-01-05 Daniel Franke <franke.daniel@gmail.com>
1879
1880 PR fortran/37159
1881 * check.c (gfc_check_random_seed): Added size check for GET
1882 dummy argument, reworded error messages to follow common pattern.
1883
1884 2009-01-05 Thomas Koenig <tkoenig@gcc.gnu.org>
1885
1886 PR fortran/38672
1887 * trans-types.c (gfc_get_derived_type): Check for the
1888 presence of derived->ns->proc_name before
1889 accessing derived->ns->proc_name->attr.flavor .
1890 * resolve.c (resolve_symbol): Likewise.
1891
1892 2009-01-05 Paul Thomas <pault@gcc.gnu.org>
1893
1894 PR fortran/38665
1895 * gfortran.h : Add bit to gfc_expr 'user_operator'
1896 * interface.c (gfc_extend_expr): Set the above if the operator
1897 is substituted by a function.
1898 * resolve.c (check_host_association): Return if above is set.
1899
1900 2009-01-04 Mikael Morin <mikael.morin@tele2.fr>
1901
1902 PR fortran/35681
1903 * ChangeLog-2008: Fix function name.
1904
1905 PR fortran/38487
1906 * dependency.c (gfc_check_argument_var_dependency):
1907 Move the check for pointerness inside the if block
1908 so that it doesn't affect the return value.
1909
1910 PR fortran/38669
1911 * trans-stmt.c (gfc_trans_call):
1912 Add the dependency code after the loop bounds calculation one.
1913
1914 2009-01-04 Daniel Franke <franke.daniel@gmail.com>
1915
1916 * intrinsic.c (do_simplify): Removed already implemented TODO.
1917
1918 2009-01-04 Daniel Franke <franke.daniel@gmail.com>
1919
1920 PR fortran/38718
1921 * simplify.c (gfc_simplify_merge): New.
1922 * intrinsic.h (gfc_simplify_merge): New prototype.
1923 * intrinsic.c (add_functions): Added simplification for MERGE.
1924
1925 2009-01-04 Mikael Morin <mikael.morin@tele2.fr>
1926
1927 PR fortran/38536
1928 * gfortran.h (gfc_is_data_pointer): Added prototype
1929 * resolve.c (gfc_iso_c_func_interface):
1930 Use gfc_is_data_pointer to test for pointer attribute.
1931 * dependency.c (gfc_is_data_pointer):
1932 Support pointer-returning functions.
1933
1934 2009-01-03 Daniel Franke <franke.daniel@gmail.com>
1935
1936 * symbol.c (save_symbol): Don't SAVE function results.
1937
1938 2009-01-03 Paul Thomas <pault@gcc.gnu.org>
1939
1940 PR fortran/38594
1941 * resolve.c (resolve_call): When searching for proper host
1942 association, use symtree rather than symbol. For everything
1943 except generic subroutines, substitute the symtree in the call
1944 rather than the symbol.
1945
1946 \f
1947 Copyright (C) 2009 Free Software Foundation, Inc.
1948
1949 Copying and distribution of this file, with or without modification,
1950 are permitted in any medium without royalty provided the copyright
1951 notice and this notice are preserved.