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