OSDN Git Service

29e8cabeb7026293ff108cb677365d0061cb245a
[pf3gnuchains/gcc-fork.git] / gcc / fortran / ChangeLog
1 2012-01-09  Tobias Burnus  <burnus@net-b.de>
2
3         * gfortran.texi: Bump copyright year.
4         (Fortran 2003 Status): Update polymorphism item, add
5         item for generic interface with DT name.
6
7 2012-01-09  Tobias Burnus  <burnus@net-b.de>
8
9         PR fortran/51578
10         * gfortran.h (gfc_use_list):
11         * match.h (gfc_use_module): Rename to ...
12         (gfc_use_modules): ... this.
13         * module.c (use_locus, specified_nonint, specified_int): Remove
14         global variable.
15         (module_name): Change type to const char*, used with gfc_get_string.
16         (module_list): New global variable.
17         (free_rename): Free argument not global var.
18         (gfc_match_use): Save match to module_list.
19         (load_generic_interfaces, read_module): Don't free symtree.
20         (write_dt_extensions, gfc_dump_module): Fix module-name I/O due to the
21         type change of module_name.
22         (write_symbol0, write_generic): Optimize due to the type change.
23         (import_iso_c_binding_module, use_iso_fortran_env_module): Use
24         locus of rename->where.
25         (gfc_use_module): Take module_list as argument.
26         (gfc_use_modules): New function.
27         (gfc_module_init_2, gfc_module_done_2): Init module_list, rename_list.
28         * parse.c (last_was_use_stmt): New global variable.
29         (use_modules): New function.
30         (decode_specification_statement, decode_statement): Move USE match up
31         and call use_modules.
32         (next_free, next_fixed): Call use_modules.
33         (accept_statement): Don't call gfc_module_use.
34
35 2012-01-06  Tobias Burnus <burnus@net-b.de>
36
37         * trans-openmp.c (gfc_omp_clause_dtor, gfc_trans_omp_array_reduction):
38         Update call to gfc_trans_dealloc_allocated.
39         * trans.c (gfc_allocate_using_malloc): Fix spacing.
40         (gfc_allocate_allocatable): For gfc_allocate_using_lib, jump to
41         label_finish when an error occurs.
42         (gfc_deallocate_with_status): Call caf_deregister for -fcoarray=lib.
43         * trans.h (gfc_allocate_allocatable, gfc_deallocate_with_status):
44         Update prototype.
45         (gfor_fndecl_caf_deregister): New tree symbol.
46         * trans-expr.c (gfc_conv_procedure_call): Update
47         gfc_deallocate_with_status and gfc_trans_dealloc_allocated calls.
48         * trans-array.c (gfc_array_allocate, gfc_trans_dealloc_allocated,
49         structure_alloc_comps, gfc_trans_deferred_array): Ditto.
50         (gfc_array_deallocate): Handle coarrays with -fcoarray=lib.
51         * trans-array.h (gfc_array_deallocate, gfc_array_allocate,
52         gfc_trans_dealloc_allocated): Update prototypes.
53         * trans-stmt.c (gfc_trans_sync): Fix indentation.
54         (gfc_trans_allocate): Fix errmsg padding and label handling.
55         (gfc_trans_deallocate): Ditto and handle -fcoarray=lib.
56         * expr.c (gfc_is_coarray): Fix algorithm for BT_CLASS.
57         * libgfortran.h (GFC_STAT_STOPPED_IMAGE): Use large value
58         to avoid other stats accidentally matching this one.
59         * trans-decl.c (gfor_fndecl_caf_deregister): New global var.
60         (gfc_build_builtin_function_decls): Fix prototype decl of caf_register
61         and add decl for caf_deregister.
62         (gfc_trans_deferred_vars): Handle CAF vars with -fcoarrays=lib.
63         * trans-intrinsic.c (conv_intrinsic_move_alloc): Update call to
64         gfc_deallocate_with_status.
65
66 2012-01-05  Paul Thomas  <pault@gcc.gnu.org>
67
68         PR fortran/PR48946
69         * resolve.c (resolve_typebound_static): If the typebound
70         procedure is 'deferred' try to find the correct specific
71         procedure in the derived type operator space itself.
72
73 2012-01-04  Mikael Morin  <mikael@gcc.gnu.org>
74
75         PR fortran/50981
76         * trans-array.h (gfc_walk_elemental_function_args): New argument.
77         * trans-intrinsic.c (gfc_walk_intrinsic_function): Update call.
78         * trans-stmt.c (gfc_trans_call): Ditto.
79         * trans-array.c (gfc_walk_function_expr): Ditto.
80         (gfc_walk_elemental_function_args): Get the dummy argument list
81         if possible.  Check that the dummy and the actual argument are both
82         optional, and set can_be_null_ref accordingly.
83
84 2012-01-04  Mikael Morin  <mikael@gcc.gnu.org>
85
86         PR fortran/50981
87         * trans.h (struct gfc_ss_info): New field data::scalar::can_be_null_ref
88         * trans-array.c: If the reference can be NULL, save the reference
89         instead of the value.
90         * trans-expr.c (gfc_conv_expr): If we have saved a reference,
91         dereference it.
92
93 2012-01-04  Mikael Morin  <mikael@gcc.gnu.org>
94
95         * trans-expr.c (gfc_conv_expr): Move address taking...
96         (gfc_conv_expr_reference): ... here.
97
98 2012-01-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
99
100         PR fortran/49693
101         * trans-common.c (create_common): Update copyright years.  Mark
102         variables as used to avoid warnings about unused variables in
103         common blocks.
104
105 2012-01-03  Hans-Peter Nilsson  <hp@axis.com>
106
107         * gfortran.h (struct gfc_expr): Add missing "struct"
108         qualifier for member base_expr.
109
110 2012-01-02  Paul Thomas  <pault@gcc.gnu.org>
111
112         PR fortran/51529
113         * trans-array.c (gfc_array_allocate): Null allocated memory of
114         newly allocted class arrays.
115
116         PR fortran/46262
117         PR fortran/46328
118         PR fortran/51052
119         * interface.c(build_compcall_for_operator): Add a type to the
120         expression.
121         * trans-expr.c (conv_base_obj_fcn_val): New function.
122         (gfc_conv_procedure_call): Use base_expr to detect non-variable
123         base objects and, ensuring that there is a temporary variable,
124         build up the typebound call using conv_base_obj_fcn_val.
125         (gfc_trans_class_assign): Pick out class procedure pointer
126         assignments and do the assignment with no further prcessing.
127         (gfc_trans_class_array_init_assign, gfc_trans_class_init_assign
128         gfc_trans_class_assign): Move to top of file.
129         * gfortran.h : Add 'base_expr' field to gfc_expr.
130         * resolve.c (get_declared_from_expr): Add 'types' argument to
131         switch checking of derived types on or off.
132         (resolve_typebound_generic_call): Set the new argument.
133         (resolve_typebound_function, resolve_typebound_subroutine):
134         Set 'types' argument for get_declared_from_expr appropriately.
135         Identify base expression, if not a variable, in the argument
136         list of class valued calls. Assign it to the 'base_expr' field
137         of the final expression. Strip away all references after the
138         last class reference.
139
140 2012-01-02  Tobias Burnus  <burnus@net-b.de>
141
142         PR fortran/51682
143         * trans-intrinsic.c (trans_this_image, trans_image_index,
144         trans_num_images, conv_intrinsic_cobound): Fold_convert the
145         caf_num_images/caf_this_images variables to the correct int kind.
146
147 2012-01-01  Jakub Jelinek  <jakub@redhat.com>
148
149         * gfortranspec.c (lang_specific_driver): Update copyright notice
150         dates.
151 \f
152 Copyright (C) 2012 Free Software Foundation, Inc.
153
154 Copying and distribution of this file, with or without modification,
155 are permitted in any medium without royalty provided the copyright
156 notice and this notice are preserved.