1 2012-03-04 Mikael Morin <mikael@gcc.gnu.org>
4 * gfortran.h (gfc_is_class_container_ref): New prototype.
5 * class.c (gfc_is_class_container_ref): New function.
6 * trans-expr.c (gfc_conv_procedure_call): Add a "_data" component
7 reference to polymorphic actual arguments.
9 2012-03-04 Mikael Morin <mikael@gcc.gnu.org>
12 * trans-expr.c (gfc_conv_procedure_call): Save se->ss's value.
13 Handle the case of unallocated arrays passed to elemental procedures.
15 2012-03-04 Mikael Morin <mikael@gcc.gnu.org>
17 * trans.h (struct gfc_ss_info): Move can_be_null_ref component from
18 the data::scalar subcomponent to the toplevel.
19 * trans-expr.c (gfc_conv_expr): Update component reference.
20 * trans-array.c (gfc_add_loop_ss_code): Ditto.
21 (gfc_walk_elemental_function_args): Ditto. Move the conditional setting
22 the field out of the scalar-only block.
24 2012-03-04 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
27 * error.c (gfc_widechar_display_length, gfc_wide_display_length):
29 (print_wide_char_into_buffer): Return length written.
30 (show_locus): Fix locus displayed when wide characters are present.
32 2012-03-04 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
34 * module.c (gfc_use_module): Improve error message some more.
36 2012-03-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
39 * module.c (gfc_use_module): Improve error messages.
41 2012-03-03 Tobias Burnus <burnus@net-b.de>
44 * resolve.c (resolve_actual_arglist): Properly reset
45 assumed_type_expr_allowed.
47 2012-03-03 Tobias Burnus <burnus@net-b.de>
49 * lang.opt (Wc-binding-type): New flag.
50 * options.c (gfc_init_options, gfc_handle_option): Handle it.
51 * invoke.texi (Wc-binding-type): Document it.
52 * gfortran.h (gfc_option_t): Add warn_c_binding_type.
53 * decl.c (verify_bind_c_sym): Handle -Wc-binding-type.
54 * symbol.c (gfc_set_default_type, verify_bind_c_derived_type):
57 2012-03-03 Tobias Burnus <burnus@net-b.de>
60 * decl.c (gfc_match_decl_type_spec): Support type(*).
61 (gfc_verify_c_interop): Allow type(*).
62 * dump-parse-tree.c (show_typespec): Handle type(*).
63 * expr.c (gfc_copy_expr): Ditto.
64 * interface.c (compare_type_rank, compare_parameter,
65 compare_actual_formal, gfc_procedure_use): Ditto.
66 * libgfortran.h (bt): Add BT_ASSUMED.
67 * misc.c (gfc_basic_typename, gfc_typename): Handle type(*).
68 * module.c (bt_types): Ditto.
69 * resolve.c (assumed_type_expr_allowed): New static variable.
70 (resolve_actual_arglist, resolve_variable, resolve_symbol):
72 * trans-expr.c (gfc_conv_procedure_call): Ditto.
73 * trans-types.c (gfc_typenode_for_spec, gfc_get_dtype): Ditto.
75 2012-03-02 Tobias Burnus <burnus@net-b.de>
78 * primary.c (gfc_match_varspec): Add missing ;.
80 2012-03-02 Tobias Burnus <burnus@net-b.de>
83 * primary.c (gfc_match_varspec): Add diagnostic for % with
86 2012-03-02 Tobias Burnus <burnus@net-b.de>
89 * expr.c (gfc_check_vardef_context): Fix check for
90 intent-in polymorphic pointer .
91 * interface.c (compare_parameter): Allow passing TYPE to
92 intent-in polymorphic pointer.
94 2012-03-02 Tobias Burnus <burnus@net-b.de>
97 * resolve.c (resolve_intrinsic): Don't search for a
98 function if we know that it is a subroutine.
100 2012-02-29 Paul Thomas <pault@gcc.gnu.org>
103 * trans-expr.c (fcncall_realloc_result): Dereference the
104 descriptor if needed.
106 2012-02-22 Tobias Burnus <burnus@net-b.de>
109 * io.c (gfc_match_open): Remove bogus F2003 DELIM= check.
111 2012-02-18 Tobias Burnus <burnus@net-b.de>
114 * interface.c (check_interface0): Internal procs in
115 generic interfaces are allowed in Fortran 2008.
117 2012-02-17 Tobias Burnus <burnus@net-b.de>
118 Roland Stigge <stigge@antcom.de>
121 * interface.c (compare_actual_formal): Fix typo "at at".
123 2012-02-17 Tobias Burnus <burnus@net-b.de>
125 * gfortran.texi (Q exponent-letter): Fix grammar.
127 2012-02-17 Tobias Burnus <burnus@net-b.de>
129 * gfortran.texi (Status): Fix typos.
130 * invoke.texi (ffixed-form, fstack-arrays): Spell Fortran with
133 2012-02-17 Tobias Burnus <burnus@net-b.de>
134 Roland Stigge <stigge@antcom.de>
142 * io.c (gfc_match_open): Fix typo.
143 * interface.c (compare_actual_formal): Ditto.
144 * lang.opt (freal-4-real-8, freal-4-real-16, freal-8-real-16): Ditto.
145 * match.c (alloc_opt_list, gfc_match_nullify): Ditto.
146 * check.c (gfc_check_associated, gfc_check_null): Ditto.
148 2012-02-12 Mikael Morin <mikael@gcc.gnu.org>
151 * trans-stmt.c (gfc_get_proc_ifc_for_call): New function.
152 (gfc_trans_call): Use gfc_get_proc_ifc_for_call.
154 2012-02-12 Mikael Morin <mikael@gcc.gnu.org>
156 * trans-array.c (gfc_walk_elemental_function_args,
157 gfc_walk_function_expr): Move call to gfc_get_proc_ifc_for_expr out
158 of gfc_walk_elemental_function_args.
159 * trans-stmt.c (gfc_trans_call): Ditto.
160 * trans-array.h (gfc_get_proc_ifc_for_expr): New prototype.
161 (gfc_walk_elemental_function_args): Update prototype.
163 2012-02-12 Mikael Morin <mikael@gcc.gnu.org>
165 * trans-array.c (gfc_get_proc_ifc_for_expr): New function.
166 (gfc_walk_elemental_function_args): Move code to
167 gfc_get_proc_ifc_for_expr and call it.
169 2012-02-08 Tobias Burnus <burnus@net-b.de>
172 * trans-expr.c (fcncall_realloc_result): Set also the stride.
174 2012-02-07 Tobias Burnus <burnus@net-b.de>
177 * trans-expr.c (gfc_conv_procedure_call): Add _data component
178 for calls of scalar CLASS actuals to TYPE dummies.
180 2012-02-05 Thomas König <tkoenig@gcc.gnu.org>
183 * trans-decl.c: Warn about unused dummy procedure arguments
184 if -Wunused-dummy-argument is specified. Suppress middle-end
185 warnings about procedure arguments.
187 2012-02-05 Paul Thomas <pault@gcc.gnu.org>
189 * trans-array.c (gfc_array_allocate): Zero memory for all class
191 * trans-stmt.c (gfc_trans_allocate): Ditto for class scalars.
194 * trans-stmt.c (gfc_trans_allocate): Before correcting a class
195 array reference, ensure that 'dataref' points to the _data
196 component that is followed by the array reference..
198 2012-02-02 Mikael Morin <mikael@gcc.gnu.org>
204 * class.c (insert_component_ref, class_data_ref_missing,
205 gfc_fix_class_refs): New functions.
206 * gfortran.h (gfc_fix_class_refs): New prototype.
207 * trans-expr.c (gfc_conv_expr): Remove special case handling and call
208 gfc_fix_class_refs instead.
210 2012-02-02 Paul Thomas <pault@gcc.gnu.org>
213 * trans-expr.c (fcncall_realloc_result): If variable shape is
214 correct, retain the bounds, whatever they are.
216 2012-02-02 Tobias Burnus <burnus@net-b.de>
219 * simplify.c (gfc_simplify_size): Handle INTRINSIC_PARENTHESES.
221 2012-02-01 Thomas König <tkoenig@gcc.gnu.org>
224 * frontend-passes.c (convert_elseif): New function.
225 (optimize_namespace): Call it.
227 2012-02-01 Tobias Burnus <burnus@net-b.de>
230 * module.c (MOD_VERSION): Bump.
231 (mio_typebound_proc): Read/write is_operator from/to the
234 2012-02-01 Tobias Burnus <burnus@net-b.de>
237 * trans-expr.c (gfc_conv_procedure_call): Add array ref
240 2012-01-31 Tobias Burnus <burnus@net-b.de>
243 * gfortran.h (gfc_tbp_generic): Store whether the
244 generic is an operator.
245 * decl.c (gfc_match_generic): Set that flag.
246 * resolve.c (check_generic_tbp_ambiguity): Use it in the
247 gfc_compare_interfaces check.
249 2012-01-31 Tobias Burnus <burnus@net-b.de>
252 * class.c (gfc_find_derived_vtab): Mark _copy function as pure.
254 2012-01-31 Tobias Burnus <burnus@net-b.de>
257 * class.c (get_unique_hashed_string): Adapt trim length.
258 (gfc_build_class_symbol) Encode also corank in the container name.
260 2012-01-31 Paul Thomas <pault@gcc.gnu.org>
263 * trans-expr.c (fcncall_realloc_result): Correct calculation of
266 2012-01-29 Janne Blomqvist <jb@gcc.gnu.org>
268 * module.c (pointer_info): Make true_name and module pointers
269 rather than arrays, order pointers before other fields.
270 (free_pi_tree): free true_name and module as well.
271 (mio_read_string): Rename to read_string.
272 (mio_write_string): Remove.
273 (load_commons): Use read_string.
274 (read_module): Use read_string rather than mio_internal_string.
275 (write_blank_common): Call write_atom directly.
276 (write_symbol): Likewise.
278 2012-01-29 Tobias Burnus <burnus@net-b.de>
281 * expr.c (gfc_default_initializer): Convert the values if
282 the type does not match.
284 2012-01-29 Tobias Burnus <burnus@net-b.de>
287 * trans-array.c (structure_alloc_comps): Fix assignment of
288 polymorphic components (polymorphic deep copying).
290 2012-01-29 Janne Blomqvist <jb@gcc.gnu.org>
293 * decl.c (set_binding_label): Make binding_label argument const.
294 (curr_binding_label): Constify.
295 * gfortran.h (gfc_symbol): Constify binding_label.
296 (gfc_common_head): Likewise.
297 (get_iso_c_sym): Likewise.
298 * match.c (gfc_match_name_C): Constify buffer argument.
299 * match.h (gfc_match_name_C): Likewise.
300 * resolve.c (set_name_and_label): Constify binding_label argument.
301 (gfc_iso_c_sub_interface): Constify binding_label variable.
302 * symbol.c (get_iso_c_sym): Constify binding_label argument.
304 2012-01-29 Janne Blomqvist <jb@gcc.gnu.org>
307 * decl.c (set_binding_label): Move prototype from match.h to here.
308 (curr_binding_label): Make a pointer rather than static array.
309 (build_sym): Check sym->binding_label pointer rather than array,
310 update set_binding_label call, handle curr_binding_label changes.
311 (set_binding_label): Handle new curr_binding_label, dest_label
312 double ptr, and sym->binding_label.
313 (verify_bind_c_sym): Handle sym->binding_label being a pointer.
314 (set_verify_bind_c_sym): Check sym->binding_label pointer rather
315 than array, update set_binding_label call.
316 (gfc_match_bind_c_stmt): Handle curr_binding_label change.
317 (match_procedure_decl): Update set_binding_label call.
318 (gfc_match_bind_c): Change binding_label to pointer, update
319 gfc_match_name_C call.
320 * gfortran.h (GFC_MAX_BINDING_LABEL_LEN): Remove macro.
321 (gfc_symbol): Make binding_label a pointer.
322 (gfc_common_head): Likewise.
323 * match.c (gfc_match_name_C): Heap allocate bind(C) name.
324 * match.h (gfc_match_name_C): Change prototype argument.
325 (set_binding_label): Move prototype to decl.c.
326 * module.c (struct pointer_info): Make binding_label a pointer.
327 (free_pi_tree): Free unused binding_label.
328 (mio_read_string): New function.
329 (mio_write_string): New function.
330 (load_commons): Redo reading of binding_label.
331 (read_module): Likewise.
332 (write_common_0): Change to write empty string instead of name if
334 (write_blank_common): Write empty string for binding label.
335 (write_symbol): Change to write empty string instead of name if no
337 * resolve.c (gfc_iso_c_func_interface): Don't set binding_label.
338 (set_name_and_label): Make binding_label double pointer, use
340 (gfc_iso_c_sub_interface): Make binding_label a pointer.
341 (resolve_bind_c_comms): Handle cases if
342 gfc_common_head->binding_label is NULL.
343 (gfc_verify_binding_labels): sym->binding_label is a pointer.
344 * symbol.c (gfc_new_symbol): Rely on XCNEW zero init for
346 (gen_special_c_interop_ptr): Don't set binding label.
347 (generate_isocbinding_symbol): Insert binding_label into symbol
349 (get_iso_c_sym): Use pointer assignment instead of strcpy.
350 * trans-common.c (gfc_sym_mangled_common_id): Handle
351 com->binding_label being a pointer.
352 * trans-decl.c (gfc_sym_mangled_identifier): Handle
353 sym->binding_label being a pointer.
354 (gfc_sym_mangled_function_id): Likewise.
356 2012-01-29 Tobias Burnus <burnus@net-b.de>
359 * resolve.c (symbol_as): Remove unused, accidentally
362 2012-01-28 Tobias Burnus <burnus@net-b.de>
365 * trans-stmt.c (gfc_trans_allocate): Properly check whether
366 we have a BT_CLASS which needs to be memset.
368 2012-01-27 Tobias Burnus <burnus@net-b.de>
371 * trans-expr.c (gfc_conv_procedure_call): Fix passing
372 of functions, which return allocatables.
374 2012-01-27 Tobias Burnus <burnus@net-b.de>
377 * resolve.c (resolve_formal_arglist): Fix elemental
378 constraint checks for polymorphic dummies also for
381 2012-01-27 Tobias Burnus <burnus@net-b.de>
385 * primary.c (gfc_match_varspec. gfc_match_rvalue): Set
386 handle array spec for BT_CLASS.
387 * expr.c (gfc_get_variable_expr, gfc_lval_expr_from_sym)
388 * frontend-passes.c (create_var): Ditto.
389 * resolve.c (resolve_actual_arglist, resolve_assoc_var): Ditto.
390 * trans-decl.c (gfc_trans_deferred_vars): Use class_pointer
391 instead of attr.pointer.
392 (gfc_generate_function_code): Use CLASS_DATA (sym) for BT_CLASS.
393 * trans-intrinsic.c (conv_intrinsic_move_alloc): Move assert.
394 * trans-stmt.c (trans_associate_var): Ask for the descriptor.
396 2012-01-27 Tobias Burnus <burnus@net-b.de>
399 * match.c (gfc_match_allocate): Allow more than allocate
402 2012-01-27 Tobias Burnus <burnus@net-b.de>
405 * resolve.c (resolve_formal_arglist): Fix elemental
406 constraint checks for polymorphic dummies.
408 2012-01-27 Paul Thomas <pault@gcc.gnu.org>
409 Tobias Burnus <burnus@gcc.gnu.org>
415 * trans-array.c (gfc_array_init_size): Add two extra arguments
416 to convey the dynamic element size of a calls object and to
417 return the number of elements that have been allocated.
418 (gfc_array_allocate): Add the same arguments and use them to
419 call gfc_array_init_size. Before the allocation dereference
420 the data pointer, if necessary. Set the allocated array to zero
421 if the class element size or expr3 are non-null.
422 * trans-expr.c (gfc_conv_class_to_class): Give this function
424 (get_class_array_ref): New function.
425 (gfc_copy_class_to_class): New function.
426 * trans-array.h : Update prototype for gfc_array_allocate.
427 * trans-stmt.c (gfc_trans_allocate): For non-variable class
428 STATUS expressions extract the class object and the dynamic
429 element size. Use the latter to call gfc_array_allocate and
430 the former for setting the vptr and, via
431 gfc_copy_class_to_clasfc_cs, to copy to the allocated data.
432 * trans.h : Prototypes for gfc_get_class_array_ref,
433 gfc_copy_class_to_class and gfc_conv_class_to_class.
435 2012-01-25 Tobias Burnus <burnus@net-b.de>
437 * resolve.c (symbol_as): Check also for attr.class_ok.
439 2012-01-25 Tobias Burnus <burnus@net-b.de>
442 * class.c (gfc_build_class_symbol): Fix invalid freeing
443 issue with fclass->f2k_derived.
445 2012-01-25 Tobias Burnus <burnus@net-b.de>
448 * class.c (gfc_build_class_symbol): Ensure that
449 fclass->f2k_derived is set.
451 2012-01-25 Tobias Burnus <burnus@net-b.de>
454 * resolve.c (resolve_structure_cons): Only create an
455 array constructors for nonscalars.
457 2012-01-23 Tobias Burnus <burnus@net-b.de>
460 * check.c (variable_check): Fix checking for
461 variables and deeply nested BLOCKs.
463 2012-01-21 Tobias Burnus <burnus@net-b.de>
464 Steven G. Kargl <kargl@gcc.gnu.org>
467 * symbol.c (check_conflict): namelist-group-name cannot have the SAVE
470 2012-01-21 Tobias Burnus <burnus@net-b.de>
473 * interface.c (compare_parameter): Fix CLASS comparison.
475 2012-01-20 Tobias Burnus <burnus@net-b.de>
476 Janus Weil <janus@gcc.gnu.org>
479 * module.c (load_needed, read_module): Don't mark __vtab etc.
482 2012-01-19 Tobias Burnus <burnus@net-b.de>
485 * expr.c (gfc_build_intrinsic_call): Also set the symtree.
487 2012-01-18 Paul Thomas <pault@gcc.gnu.org>
490 * trans-expr.c (gfc_conv_procedure_call): Deallocate allocatable
491 components of temporary class arguments.
493 2012-01-17 Tobias Burnus <burnus@net-b.de>
494 Janne Blomqvist <jb@gcc.gnu.org>
497 * trans-expr.c (alloc_scalar_allocatable_for_assignment): Nullify
498 LHS after allocation, if it has allocatable components.
499 * f95-lang.c (gfc_init_builtin_functions): Add BUILT_IN_CALLOC.
501 2012-01-16 Mikael Morin <mikael@gcc.gnu.org>
502 Tobias Burnus <burnus@net-b.de>
505 * trans-array.c (gfc_walk_elemental_function_args): Fix
506 passing of deallocated allocatables/pointers as absent argument.
508 2012-01-16 Tobias Burnus <burnus@net-b.de>
511 * class.c (gfc_find_derived_vtab): Mark __vtab and
512 __def_init as FL_VARIABLE not as FL_PARAMETER.
513 * expr.c (gfc_simplify_expr): Remove special
515 * resolve.c (resolve_values): Ditto.
516 * trans-decl.c (gfc_get_symbol_decl): Mark __vtab
517 and __def_init as TREE_READONLY.
519 2012-01-16 Zydrunas Gimbutas <gimbutas@cims.nyu.edu>
520 Andreas Kloeckner <kloeckner@cims.nyu.edu>
521 Steven G. Kargl <kargl@gcc.gnu.org>
524 * gfortran.h (gfc_option_t): Add members flag_*_kind to store kind.
525 * lang.opt: Add options -freal-4-real-8, -freal-4-real-10,
526 -freal-4-real-16, -freal-8-real-4, -freal-8-real-10, -freal-8-real-16
527 and -finteger-4-integer-8. User-desired type conversion information.
528 * decl.c (gfc_match_old_kind_spec,kind_expr): Type conversions
529 in declaration parsing.
530 * trans-types.c (gfc_init_kinds): User-specified type conversion
531 checked for current backend.
532 * primary.c (match_integer_constant,match_real_constant): Implement
533 type conversion in constant parsing.
534 * options.c (gfc_init_options,gfc_handle_option): Translate input
535 options to flags in internal options data structure.
536 * invoke.texi: Document new options. Re-order options in Options
539 2012-01-16 Paul Thomas <pault@gcc.gnu.org>
541 * trans-array.c (gfc_trans_create_temp_array): In the case of a
542 class array temporary, detect a null 'eltype' on entry and use
543 'initial' to provde the class reference and so, through the
544 vtable, the element size for the dynamic type.
545 * trans-stmt.c (gfc_conv_elemental_dependencies): For class
546 expressions, set 'eltype' to null and pass the values via the
547 'initial' expression.
549 2012-01-14 Tobias Burnus <burnus@net-b.de>
552 * resolve.c (build_default_init_expr): Also initialize
553 nonconstant-length strings with -finit-character=<n>.
555 2011-01-14 Tobias Burnus <burnus@net-b.de>
558 * module.c (read_module): Don't make nonexisting
559 intrinsic operators as found.
560 (rename_list_remove_duplicate): New function.
561 (gfc_use_modules): Use it.
563 2012-01-13 Paul Thomas <pault@gcc.gnu.org>
566 * trans-array.c (structure_alloc_comps): Suppress interative
567 call to self, when current component is deallocated using
568 gfc_trans_dealloc_allocated.
569 * class.c (gfc_build_class_symbol): Copy the 'alloc_comp'
570 attribute from the declared type to the class structure.
572 2012-01-13 Tobias Burnus <burnus@net-b.de>
575 * fortran/trans-types.c (gfc_init_kinds): Use PTRDIFF_TYPE
576 instead of a signed int of size POINTER_SIZE for
577 gfc_index_integer_kind.
579 2012-01-12 Tobias Burnus <burnus@net-b.de>
582 * intrinsic.texi (CHMOD): Extend a bit and remove statement
583 that /bin/chmod is called.
585 2012-01-10 Gerald Pfeifer <gerald@pfeifer.com>
587 * gfortran.texi (Fortran 2003 Status): Fix grammar.
589 2012-01-10 Tobias Burnus <burnus@net-b.de>
592 * resolve.c (resolve_allocate_expr): For non-deferred char lengths,
593 check whether type-spec matches declaration.
595 2012-01-10 Tobias Burnus <burnus@net-b.de>
597 * resolve.c (resolve_ordinary_assign): Improve error wording.
599 2012-01-09 Paul Thomas <pault@gcc.gnu.org>
602 * interface.c (matching_typebound_op): Drill down through
603 possible parentheses to obtain base expression. Do not test for
604 'class_ok' but, instead for the class structure components.
605 * resolve.c (resolve_ordinary_assign): Extend error message for
606 polymorphic assignment to advise checking for specific
610 * resolve.c (resolve_typebound_function): Restore 'static' to
613 2012-01-09 Mikael Morin <mikael@gcc.gnu.org>
616 * trans-array.c (gfc_walk_elemental_function_args):
617 Skip over NULL() actual arguments.
619 2012-01-09 Tobias Burnus <burnus@net-b.de>
621 * gfortran.texi: Bump copyright year.
622 (Fortran 2003 Status): Update polymorphism item, add
623 item for generic interface with DT name.
625 2012-01-09 Tobias Burnus <burnus@net-b.de>
628 * gfortran.h (gfc_use_list):
629 * match.h (gfc_use_module): Rename to ...
630 (gfc_use_modules): ... this.
631 * module.c (use_locus, specified_nonint, specified_int): Remove
633 (module_name): Change type to const char*, used with gfc_get_string.
634 (module_list): New global variable.
635 (free_rename): Free argument not global var.
636 (gfc_match_use): Save match to module_list.
637 (load_generic_interfaces, read_module): Don't free symtree.
638 (write_dt_extensions, gfc_dump_module): Fix module-name I/O due to the
639 type change of module_name.
640 (write_symbol0, write_generic): Optimize due to the type change.
641 (import_iso_c_binding_module, use_iso_fortran_env_module): Use
642 locus of rename->where.
643 (gfc_use_module): Take module_list as argument.
644 (gfc_use_modules): New function.
645 (gfc_module_init_2, gfc_module_done_2): Init module_list, rename_list.
646 * parse.c (last_was_use_stmt): New global variable.
647 (use_modules): New function.
648 (decode_specification_statement, decode_statement): Move USE match up
649 and call use_modules.
650 (next_free, next_fixed): Call use_modules.
651 (accept_statement): Don't call gfc_module_use.
653 2012-01-06 Tobias Burnus <burnus@net-b.de>
655 * trans-openmp.c (gfc_omp_clause_dtor, gfc_trans_omp_array_reduction):
656 Update call to gfc_trans_dealloc_allocated.
657 * trans.c (gfc_allocate_using_malloc): Fix spacing.
658 (gfc_allocate_allocatable): For gfc_allocate_using_lib, jump to
659 label_finish when an error occurs.
660 (gfc_deallocate_with_status): Call caf_deregister for -fcoarray=lib.
661 * trans.h (gfc_allocate_allocatable, gfc_deallocate_with_status):
663 (gfor_fndecl_caf_deregister): New tree symbol.
664 * trans-expr.c (gfc_conv_procedure_call): Update
665 gfc_deallocate_with_status and gfc_trans_dealloc_allocated calls.
666 * trans-array.c (gfc_array_allocate, gfc_trans_dealloc_allocated,
667 structure_alloc_comps, gfc_trans_deferred_array): Ditto.
668 (gfc_array_deallocate): Handle coarrays with -fcoarray=lib.
669 * trans-array.h (gfc_array_deallocate, gfc_array_allocate,
670 gfc_trans_dealloc_allocated): Update prototypes.
671 * trans-stmt.c (gfc_trans_sync): Fix indentation.
672 (gfc_trans_allocate): Fix errmsg padding and label handling.
673 (gfc_trans_deallocate): Ditto and handle -fcoarray=lib.
674 * expr.c (gfc_is_coarray): Fix algorithm for BT_CLASS.
675 * libgfortran.h (GFC_STAT_STOPPED_IMAGE): Use large value
676 to avoid other stats accidentally matching this one.
677 * trans-decl.c (gfor_fndecl_caf_deregister): New global var.
678 (gfc_build_builtin_function_decls): Fix prototype decl of caf_register
679 and add decl for caf_deregister.
680 (gfc_trans_deferred_vars): Handle CAF vars with -fcoarrays=lib.
681 * trans-intrinsic.c (conv_intrinsic_move_alloc): Update call to
682 gfc_deallocate_with_status.
684 2012-01-05 Paul Thomas <pault@gcc.gnu.org>
687 * resolve.c (resolve_typebound_static): If the typebound
688 procedure is 'deferred' try to find the correct specific
689 procedure in the derived type operator space itself.
691 2012-01-04 Mikael Morin <mikael@gcc.gnu.org>
694 * trans-array.h (gfc_walk_elemental_function_args): New argument.
695 * trans-intrinsic.c (gfc_walk_intrinsic_function): Update call.
696 * trans-stmt.c (gfc_trans_call): Ditto.
697 * trans-array.c (gfc_walk_function_expr): Ditto.
698 (gfc_walk_elemental_function_args): Get the dummy argument list
699 if possible. Check that the dummy and the actual argument are both
700 optional, and set can_be_null_ref accordingly.
702 2012-01-04 Mikael Morin <mikael@gcc.gnu.org>
705 * trans.h (struct gfc_ss_info): New field data::scalar::can_be_null_ref
706 * trans-array.c: If the reference can be NULL, save the reference
707 instead of the value.
708 * trans-expr.c (gfc_conv_expr): If we have saved a reference,
711 2012-01-04 Mikael Morin <mikael@gcc.gnu.org>
713 * trans-expr.c (gfc_conv_expr): Move address taking...
714 (gfc_conv_expr_reference): ... here.
716 2012-01-04 Thomas Koenig <tkoenig@gcc.gnu.org>
719 * trans-common.c (create_common): Update copyright years. Mark
720 variables as used to avoid warnings about unused variables in
723 2012-01-03 Hans-Peter Nilsson <hp@axis.com>
725 * gfortran.h (struct gfc_expr): Add missing "struct"
726 qualifier for member base_expr.
728 2012-01-02 Paul Thomas <pault@gcc.gnu.org>
731 * trans-array.c (gfc_array_allocate): Null allocated memory of
732 newly allocted class arrays.
737 * interface.c(build_compcall_for_operator): Add a type to the
739 * trans-expr.c (conv_base_obj_fcn_val): New function.
740 (gfc_conv_procedure_call): Use base_expr to detect non-variable
741 base objects and, ensuring that there is a temporary variable,
742 build up the typebound call using conv_base_obj_fcn_val.
743 (gfc_trans_class_assign): Pick out class procedure pointer
744 assignments and do the assignment with no further prcessing.
745 (gfc_trans_class_array_init_assign, gfc_trans_class_init_assign
746 gfc_trans_class_assign): Move to top of file.
747 * gfortran.h : Add 'base_expr' field to gfc_expr.
748 * resolve.c (get_declared_from_expr): Add 'types' argument to
749 switch checking of derived types on or off.
750 (resolve_typebound_generic_call): Set the new argument.
751 (resolve_typebound_function, resolve_typebound_subroutine):
752 Set 'types' argument for get_declared_from_expr appropriately.
753 Identify base expression, if not a variable, in the argument
754 list of class valued calls. Assign it to the 'base_expr' field
755 of the final expression. Strip away all references after the
756 last class reference.
758 2012-01-02 Tobias Burnus <burnus@net-b.de>
761 * trans-intrinsic.c (trans_this_image, trans_image_index,
762 trans_num_images, conv_intrinsic_cobound): Fold_convert the
763 caf_num_images/caf_this_images variables to the correct int kind.
765 2012-01-01 Jakub Jelinek <jakub@redhat.com>
767 * gfortranspec.c (lang_specific_driver): Update copyright notice
770 Copyright (C) 2012 Free Software Foundation, Inc.
772 Copying and distribution of this file, with or without modification,
773 are permitted in any medium without royalty provided the copyright
774 notice and this notice are preserved.