OSDN Git Service

* trans-types.c (gfc_type_for_size): Return wider type
[pf3gnuchains/gcc-fork.git] / gcc / fortran / ChangeLog
1 2011-09-27  Jakub Jelinek  <jakub@redhat.com>
2
3         * trans-types.c (gfc_type_for_size): Return wider type
4         if no suitable narrower type has been found.
5         (gfc_type_for_mode): Return NULL_TREE if gfc_type_for_size
6         returned type doesn't have expected TYPE_MODE.
7
8 2011-09-26  Janus Weil  <janus@gcc.gnu.org>
9
10         PR fortran/50515
11         * resolve.c (resolve_common_blocks): Check for EXTERNAL attribute.
12
13         PR fortran/50517
14         * interface.c (gfc_compare_interfaces): Bugfix in check for result type.
15
16 2011-09-22  Janus Weil  <janus@gcc.gnu.org>
17
18         PR fortran/41733
19         * expr.c (gfc_check_pointer_assign): Check for nonintrinsic elemental
20         procedures.
21         * interface.c (gfc_compare_interfaces): Rename 'intent_flag'. Check
22         for PURE and ELEMENTAL attributes.
23         (compare_actual_formal): Remove pureness check here.
24
25 2011-09-20  Steven G. Kargl  <kargl@gcc.gnu.org>
26
27         * check.c (gfc_check_c_sizeof): Remove redundant word.
28
29 2011-09-20  Simon Baldwin  <simonb@google.com>
30
31         * module.c (gfc_dump_module): Omit timestamp from output.
32
33 2011-09-17  Janus Weil  <janus@gcc.gnu.org>
34
35         PR fortran/50403
36         * symbol.c (gfc_use_derived): Fix coding style.
37
38 2011-09-15  Janus Weil  <janus@gcc.gnu.org>
39
40         PR fortran/50401
41         * resolve.c (resolve_transfer): Check if component 'ref' is defined.
42
43         PR fortran/50403
44         * symbol.c (gfc_use_derived): Check if argument 'sym' is defined.
45
46 2011-09-14  Tobias Burnus  <burnus@net-b.de>
47
48         PR fortran/34547
49         PR fortran/50375
50         * check.c (gfc_check_null): Allow allocatables as MOLD to NULL.
51         * resolve.c (resolve_transfer): Reject NULL without MOLD.
52         * interface.c (gfc_procedure_use): Reject NULL without MOLD
53         if no explicit interface is known.
54         (gfc_search_interface): Reject NULL without MOLD if it would
55         lead to ambiguity.
56
57 2011-09-13  Janus Weil  <janus@gcc.gnu.org>
58
59         PR fortran/50379
60         * symbol.c (check_conflict): Check conflict between GENERIC and RESULT
61         attributes.
62
63 2011-09-11  Thomas Koenig  <tkoenig@gcc.gnu.org>
64
65         PR fortran/50327
66         * frontend-passes.c (dummy_expr_callback):  New function.
67         (convert_do_while):  New function.
68         (optimize_namespace):  Call code walker to convert do while loops.
69
70 2011-09-11  Janus Weil  <janus@gcc.gnu.org>
71
72         PR fortran/35831
73         PR fortran/47978
74         * interface.c (check_dummy_characteristics): New function to check the
75         characteristics of dummy arguments.
76         (gfc_compare_interfaces,gfc_check_typebound_override): Call it here.
77
78 2011-09-08  Mikael Morin  <mikael.morin@sfr.fr>
79
80         * trans-array.c (gfc_trans_constant_array_constructor): Remove
81         superfluous initialisation of DIM field.
82         (gfc_trans_array_constructor): Assert that DIMEN field is properly set.
83         (gfc_conv_expr_descriptor): Ditto.
84         * trans-expr.c (gfc_conv_procedure_call): Ditto.
85
86 2011-09-08  Mikael Morin  <mikael.morin@sfr.fr>
87
88         * trans-array.h (gfc_get_scalar_ss): New prototype.
89         * trans-array.c (gfc_get_scalar_ss): New function.
90         (gfc_walk_variable_expr, gfc_walk_op_expr,
91         gfc_walk_elemental_function_args): Re-use gfc_get_scalar_ss.
92         * trans-expr.c (gfc_trans_subarray_assign): Ditto.
93         (gfc_trans_assignment_1): Ditto.
94         * trans-stmt.c (compute_inner_temp_size, gfc_trans_where_assign,
95         gfc_trans_where_3): Ditto.
96
97 2011-09-08  Mikael Morin  <mikael.morin@sfr.fr>
98
99         * trans-array.h (gfc_get_temp_ss): New prototype.
100         * trans-array.c (gfc_get_temp_ss): New function.
101         (gfc_conv_resolve_dependencies): Re-use gfc_get_temp_ss.
102         (gfc_conv_expr_descriptor): Ditto.
103         * trans-expr.c (gfc_conv_subref_array_arg): Ditto.
104
105 2011-09-08  Mikael Morin  <mikael.morin@sfr.fr>
106
107         * trans-array.h (gfc_get_array_ss): New prototype.
108         * trans-array.c (gfc_get_array_ss): New function.
109         (gfc_walk_variable_expr, gfc_walk_function_expr,
110         gfc_walk_array_constructor): Re-use gfc_get_array_ss.
111         * trans-expr.c (gfc_trans_subarray_assign): Ditto.
112         * trans-intrinsic.c (gfc_walk_intrinsic_bound,
113         gfc_walk_intrinsic_libfunc): Ditto.
114         * trans-io.c (transfer_array_component): Ditto.
115
116 2011-09-08  Tobias Burnus  <burnus@net-b.de>
117
118         PR fortran/44646
119         * decl.c (gfc_match_entry, gfc_match_end): Handle COMP_DO_CONCURRENT.
120         * dump-parse-tree.c (show_code_node): Handle EXEC_DO_CONCURRENT.
121         * gfortran.h (gfc_exec_op): Add EXEC_DO_CONCURRENT.
122         * match.c (gfc_match_critical, match_exit_cycle, gfc_match_stopcode,
123         lock_unlock_statement, sync_statement, gfc_match_allocate,
124         gfc_match_deallocate, gfc_match_return): Add DO CONCURRENT diagnostic.
125         (gfc_match_do): Match DO CONCURRENT.
126         (match_derived_type_spec, match_type_spec, gfc_free_forall_iterator,
127         match_forall_iterator, match_forall_header, match_simple_forall,
128         gfc_match_forall): Move up in the file.
129         * parse.c (check_do_closure, parse_do_block): Handle do concurrent.
130         * parse.h (gfc_compile_state): Add COMP_DO_CONCURRENT.
131         * resolve.c (do_concurrent_flag): New global variable.
132         (resolve_function, pure_subroutine, resolve_branch,
133         gfc_resolve_blocks, resolve_code, resolve_types): Add do concurrent
134         diagnostic.
135         * st.c (gfc_free_statement): Handle EXEC_DO_CONCURRENT.
136         * trans-stmt.c (gfc_trans_do_concurrent): New function.
137         (gfc_trans_forall_1): Handle do concurrent.
138         * trans-stmt.h (gfc_trans_do_concurrent): New function prototype.
139         * trans.c (trans_code): Call it.
140         * frontend-passes.c (gfc_code_walker): Handle EXEC_DO_CONCURRENT.
141
142 2011-09-07  Janus Weil  <janus@gcc.gnu.org>
143
144         PR fortran/48095
145         * primary.c (gfc_match_structure_constructor): Handle parsing of
146         procedure pointers components in structure constructors.
147         * resolve.c (resolve_structure_cons): Check interface of procedure
148         pointer components. Changed wording of some error messages.
149
150 2011-09-04  Janus Weil  <janus@gcc.gnu.org>
151
152         PR fortran/50227
153         * trans-types.c (gfc_sym_type): Check for proc_name.
154
155 2011-08-30  Tobias Burnus  <burnus@net-b.de>
156
157         PR fortran/45044
158         * trans-common.c (build_common_decl): Warn if named common
159         block's size is not everywhere the same.
160
161 2011-08-30  Steven G. Kargl  <kargl@gcc.gnu.org>
162
163         PR fortran/45170
164         * trans-stmt.c (gfc_trans_allocate): Evaluate the substring.
165
166 2011-08-29  Janus Weil  <janus@gcc.gnu.org>
167
168         PR fortran/50225
169         * trans-decl.c (gfc_generate_function_code): Nullify polymorphic
170         allocatable function results.
171
172 2011-08-29  Tobias Burnus  <burnus@net-b.de>
173
174         * trans-decl.c (generate_coarray_sym_init): Use
175         GFC_CAF_COARRAY_STATIC for static coarrays.
176
177 2011-08-28  Dodji Seketeli  <dodji@redhat.com>
178
179         * scanner.c (load_file): Don't abuse LC_RENAME reason while
180         (indirectly) calling linemap_add.
181
182 2011-08-26  Jakub Jelinek  <jakub@redhat.com>
183
184         * trans-decl.c (get_proc_pointer_decl): Set DECL_TLS_MODEL
185         if threadprivate.
186         * symbol.c (check_conflict): Allow threadprivate attribute with
187         FL_PROCEDURE if proc_pointer.
188
189 2011-08-25  Mikael Morin  <mikael.morin@gcc.gnu.org>
190
191         PR fortran/50050
192         * expr.c (gfc_free_shape): Do nothing if shape is NULL.
193         (free_expr0): Remove redundant NULL shape check.
194         * resolve.c (check_host_association): Ditto.
195         * trans-expr.c (gfc_trans_subarray_assign): Assert that shape is
196         non-NULL.
197         * trans-io.c (transfer_array_component): Ditto.
198
199 2011-08-25  Tobias Burnus  <burnus@net-b.de>
200
201         * trans-array.c (gfc_conv_descriptor_token): Add assert.
202         * trans-decl.c (gfc_build_qualified_array,
203         create_function_arglist): Handle assumed-shape arrays.
204         * trans-expr.c (gfc_conv_procedure_call): Ditto.
205         * trans-types.c (gfc_get_array_descriptor_base): Ditto, don't
206         add "caf_token" to assumed-shape descriptors, new akind argument.
207         (gfc_get_array_type_bounds): Pass akind.
208         * trans.h (lang_decl): New elements caf_offset and token.
209         (GFC_DECL_TOKEN, GFC_DECL_CAF_OFFSET): New macros.
210
211 2011-08-25  Tobias Burnus  <burnus@net-b.de>
212
213         * trans-array.c (structure_alloc_comps): Fix for allocatable
214         scalar coarray components.
215         * trans-expr.c (gfc_conv_component_ref): Ditto.
216         * trans-type.c (gfc_get_derived_type): Ditto.
217
218 2011-08-24  Tobias Burnus  <burnus@net-b.de>
219
220         PR fortran/50163
221         * expr.c (check_init_expr): Return when an error occured.
222
223 2011-08-24  Joseph Myers  <joseph@codesourcery.com>
224
225         * Make-lang.in (fortran/cpp.o): Remove explicit compilation rule.
226
227 2011-08-23  Tobias Burnus  <burnus@net-b.de>
228
229         PR fortran/31600
230         * symbol.c (gfc_add_type): Better diagnostic if redefining
231         use-associated symbol.
232         * module.c (gfc_use_module): Use module name as locus.
233
234 2011-08-22  Gabriel Charette  <gchare@google.com>
235
236         * cpp.c (gfc_cpp_init): Force BUILTINS_LOCATION for tokens
237         defined in cpp_define_builtins.
238
239 2011-08-22  Mikael Morin  <mikael.morin@gcc.gnu.org>
240
241         PR fortran/50050
242         * gfortran.h (gfc_clear_shape, gfc_free_shape): New prototypes.
243         * expr.c (gfc_clear_shape, gfc_free_shape): New functions.
244         (free_expr0): Re-use gfc_free_shape.
245         * trans-expr.c (gfc_trans_subarray_assign): Ditto.
246         * trans-io.c (transfer_array_component): Ditto.
247         * resolve.c (check_host_association): Ditto.
248         (gfc_expr_to_initialize): Don't force the rank value and free the shape
249         after updating the expression. Recalculate shape and rank.
250         (resolve_where_shape): Re-use gfc_clear_shape.
251         * array.c (gfc_array_ref_shape): Ditto.
252
253 2011-08-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
254
255         PR fortran/47659
256         * expr.c (gfc_check_assign): Check for type conversions when the
257         right-hand side is a constant REAL/COMPLEX contstant the left-hand
258         side is also REAL/COMPLEX.  Don't warn when a narrowing conversion
259         for REAL does not change the value of the constant.
260
261 2011-08-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
262
263         PR fortran/50130
264         * resolve.c (resolve_array_ref):  Don't calculate upper bound
265         if the stride is zero.
266
267 2011-08-20  Janus Weil  <janus@gcc.gnu.org>
268
269         PR fortran/49638
270         * dependency.c (gfc_dep_compare_expr): Add new result value "-3".
271         (gfc_check_element_vs_section,gfc_check_element_vs_element): Handle
272         result value "-3".
273         * frontend-passes.c (optimize_comparison): Ditto.
274         * interface.c (gfc_check_typebound_override): Ditto.
275
276 2011-08-19  Mikael Morin  <mikael.morin@sfr.fr>
277
278         PR fortran/50129
279         * parse.c (parse_where): Undo changes after emitting an error. 
280
281 2011-08-19  Jakub Jelinek  <jakub@redhat.com>
282
283         PR fortran/49792
284         * trans-expr.c (gfc_trans_assignment_1): Set OMPWS_SCALARIZER_WS
285         bit in ompws_flags only if loop.temp_ss is NULL, and clear it if
286         lhs needs reallocation.
287         * trans-openmp.c (gfc_trans_omp_workshare): Don't return early if
288         code is NULL, emit a barrier if workshare emitted no code at all
289         and NOWAIT clause isn't present.
290
291 2011-08-19  Mikael Morin  <mikael.morin@sfr.fr>
292
293         PR fortran/50071
294         * gfortran.h (gfc_exec_op): New constant EXEC_END_NESTED_BLOCK.
295         * parse.c (check_statement_label): Accept ST_END_BLOCK and
296         ST_END_ASSOCIATE as valid branch target.
297         (accept_statement): Change EXEC_END_BLOCK to EXEC_END_NESTED_BLOCK.
298         Add EXEC_END_BLOCK code in the ST_END_BLOCK and ST_END_ASSOCIATE cases.
299         * resolve.c (find_reachable_labels): Change EXEC_END_BLOCK to
300         EXEC_END_NESTED_BLOCK.
301         (resolve_branch): Ditto.
302         (resolve_code): Add EXEC_END_NESTED_BLOCK case.
303         * st.c (gfc_free_statement): Ditto.
304         * trans.c (trans_code): Ditto.
305
306 2011-08-18  Mikael Morin  <mikael.morin@sfr.fr>
307
308         PR fortran/50071
309         * symbol.c (gfc_get_st_label): Use the derived type namespace when
310         we are parsing a derived type definition.
311
312 2011-08-18  Tobias Burnus  <burnus@net-b.de>
313
314         PR fortran/18918
315         * parse.c (parse_derived): Add lock_type
316         checks, improve coarray_comp handling.
317         * resolve.c (resolve_allocate_expr,
318         resolve_lock_unlock, resolve_symbol): Fix lock_type
319         constraint checks.
320
321 2011-08-17  Tobias Burnus  <burnus@net-b.de>
322
323         PR fortran/31461
324         * trans-decl.c (generate_local_decl): Warn about
325         unused explicitly imported module variables/parameters.
326
327 2011-08-17  Janus Weil  <janus@gcc.gnu.org>
328
329         PR fortran/50070
330         * resolve.c (resolve_fl_variable): Reject non-constant character lengths
331         in COMMON variables.
332
333 2011-08-16  Tobias Burnus  <burnus@net-b.de>
334             Dominique Dhumieres  <dominiq@lps.ens.fr>
335
336         PR fortran/50094
337         * resolve.c (resolve_symbol): Fix stupid typo.
338
339 2011-08-15  Tobias Burnus  <burnus@net-b.de>
340
341         * resolve.c (resolve_symbol): Fix coarray result-var check.
342
343 2011-08-14  Steven G. Kargl  <kargl@gcc.gnu.org>
344
345         * module.c (use_iso_fortran_env_module):  Spell 'referrenced' correctly.
346
347 2011-08-14  Janus Weil  <janus@gcc.gnu.org>
348
349         PR fortran/50073
350         * decl.c (check_function_name): New function, separated off from
351         'variable_decl' and slightly extended.
352         (variable_decl,attr_decl1): Call it.
353
354 2011-08-08  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
355
356         * Make-lang.in (gfortran$(exeext)): Add $(EXTRA_GCC_LIBS).
357
358 2011-08-07  Janus Weil  <janus@gcc.gnu.org>
359             Thomas Koenig  <tkoenig@gcc.gnu.org>
360
361         PR fortran/49638
362         * dependency.c (are_identical_variables): For dummy arguments only
363         check for equal names, not equal symbols.
364         * interface.c (gfc_check_typebound_override): Add checking for rank
365         and character length.
366
367 2011-08-07  Janus Weil  <janus@gcc.gnu.org>
368
369         PR fortran/49638
370         * dependency.h (gfc_is_same_range,gfc_are_identical_variables): Remove
371         two prototypes.
372         * dependency.c (gfc_are_identical_variables,are_identical_variables):
373         Renamed the former to the latter and made static.
374         (gfc_dep_compare_expr): Renamed 'gfc_are_identical_variables', handle
375         commutativity of multiplication.
376         (gfc_is_same_range,is_same_range): Renamed the former to the latter,
377         made static and removed argument 'def'.
378         (check_section_vs_section): Renamed 'gfc_is_same_range'.
379         * gfortran.h (gfc_check_typebound_override): New prototype.
380         * interface.c (gfc_check_typebound_override): Moved here from ...
381         * resolve.c (check_typebound_override): ... here (and renamed).
382         (resolve_typebound_procedure): Renamed 'check_typebound_override'.
383
384 2011-08-06  Thomas Koenig  <tkoenig@gcc.gnu.org>
385
386         PR fortran/50004
387         * target-memory.c (gfc_target_expr-size): Don't clobber typespec
388         for derived types.
389         * simplify.c (gfc_simplify_transfer): Don't calculate source_size
390         twice.
391
392 2011-08-05  Thomas Koenig  <tkoenig@gcc.gnu.org>
393
394         PR fortran/37211
395         * gfortran.h (gfc_calculate_transfer_sizes):  Add prototype.
396         * target-memory.h (gfc_target_interpret_expr):  Add boolean
397         argument wether to convert wide characters.
398         * target-memory.c (gfc_target_expr_size):  Also return length
399         of characters for non-constant expressions if these can be
400         determined from the cl.
401         (interpret_array):  Add argument for gfc_target_interpret_expr.
402         (gfc_interpret_derived):  Likewise.
403         (gfc_target_interpret_expr):  Likewise.
404         * check.c:  Include target-memory.h.
405         (gfc_calculate_transfer_sizes):  New function.
406         (gfc_check_transfer):  When -Wsurprising is in force, calculate
407         sizes and warn if result is larger than size (check moved from
408         gfc_simplify_transfer).
409         * simplify.c (gfc_simplify_transfer):  Use
410         gfc_calculate_transfer_sizes.  Remove warning.
411
412 2011-08-04  Richard Guenther  <rguenther@suse.de>
413
414         PR fortran/49957
415         * trans-array.c (add_to_offset): New function.
416         (gfc_conv_array_ref): Build the array index expression in optimally
417         associated order.
418         (gfc_walk_variable_expr): Adjust for the backward walk.
419
420 2011-08-02  Daniel Kraft  <d@domob.eu>
421
422         PR fortran/49885
423         * trans-array.c (gfc_trans_auto_array_allocation): Change
424         gfc_start_block to gfc_init_block to avoid spurious extra-scope.
425
426 2011-08-02  Tobias Burnus  <burnus@net-b.de>
427
428         * trans-array.c (gfc_array_allocate): Pass token to
429           gfc_allocate_allocatable for -fcoarray=lib.
430         * trans-stmt.c (gfc_trans_allocate): Update
431         gfc_allocate_allocatable call.
432         * trans.h (gfc_allocate_allocatable): Update prototype.
433         (gfc_allocate_using_lib): Remove.
434         * trans.c (gfc_allocate_using_lib): Make static, handle token.
435         (gfc_allocate_allocatable): Ditto.
436
437 2011-08-02  Jakub Jelinek  <jakub@redhat.com>
438
439         PR fortran/46752
440         * cpp.c (cpp_define_builtins): Change _OPENMP to 201107.
441         * openmp.c (gfc_free_omp_clauses): Free also final_expr.
442         (OMP_CLAUSE_FINAL, OMP_CLAUSE_MERGEABLE): Define.
443         (gfc_match_omp_clauses): Handle parsing final and mergeable
444         clauses.
445         (OMP_TASK_CLAUSES): Allow final and mergeable clauses.
446         (gfc_match_omp_taskyield): New function.
447         (resolve_omp_clauses): Resolve final clause.  Allow POINTERs and
448         Cray pointers in clauses other than REDUCTION.
449         (gfc_match_omp_atomic): Match optional
450         read/write/update/capture keywords after !$omp atomic.
451         (resolve_omp_atomic): Handle all OpenMP 3.1 atomic forms.
452         * dump-parse-tree.c (show_omp_node): Handle EXEC_OMP_TASKYIELD,
453         print final and mergeable clauses.
454         (show_code_node): Handle EXEC_OMP_TASKYIELD.
455         * trans-openmp.c (gfc_trans_omp_clauses): Handle final and
456         mergeable clauses.
457         (gfc_trans_omp_taskyield): New function.
458         (gfc_trans_omp_directive): Handle EXEC_OMP_TASKYIELD.
459         (gfc_trans_omp_atomic): Handle all OpenMP 3.1 atomic forms.
460         (gfc_omp_clause_copy_ctor): Handle non-allocated allocatable.
461         (gfc_omp_predetermined_sharing): Adjust comment.
462         * gfortran.h (gfc_statement): Add ST_OMP_TASKYIELD and
463         ST_OMP_END_ATOMIC.
464         (gfc_omp_clauses): Add final_expr and mergeable fields.
465         (gfc_exec_op): Add EXEC_OMP_TASKYIELD.
466         (gfc_omp_atomic_op): New enum typedef.
467         (struct gfc_code): Add ext.omp_atomic.
468         * trans.c (trans_code): Handle EXEC_OMP_TASKYIELD.
469         * frontend-passes.c (gfc_code_walker): Also walk final_expr.
470         * resolve.c (gfc_resolve_blocks, resolve_code): Handle
471         EXEC_OMP_TASKYIELD.
472         * st.c (gfc_free_statement): Likewise.
473         * match.h (gfc_match_omp_taskyield): New prototype.
474         * parse.c (decode_omp_directive): Handle taskyield directive.
475         Handle !$omp end atomic.
476         (case_executable): Add ST_OMP_TASKYIELD case.
477         (gfc_ascii_statement): Handle ST_OMP_TASKYIELD.
478         (parse_omp_atomic): Return gfc_statement instead of void.
479         For !$omp atomic capture parse two assignments instead of
480         just one and require !$omp end atomic afterwards, for
481         other !$omp atomic forms just allow !$omp end atomic at the
482         end.
483         (parse_omp_structured_block, parse_executable): Adjust
484         parse_omp_atomic callers.
485
486 2011-08-02  Tobias Burnus  <burnus@net-b.de>
487
488         * intrinsic.c (OMP_LIB): Updated openmp_version's
489         value to 201107.
490         * gfortran.texi (OpenMP): Update ref to OpenMP 3.1.
491         * intrinsic.texi (OpenMP Modules): Update ref to OpenMP 3.1;
492         remove deleted omp_integer_kind and omp_logical_kind constants.
493
494 2011-07-31  Janus Weil  <janus@gcc.gnu.org>
495
496         PR fortran/49112
497         * resolve.c (resolve_structure_cons): Don't do the full dt resolution,
498         only call 'resolve_fl_derived0'.
499         (resolve_typebound_procedures): Resolve typebound procedures of
500         parent type.
501         (resolve_fl_derived0): New function, which does a part of the work
502         for 'resolve_fl_derived'.
503         (resolve_fl_derived): Call 'resolve_fl_derived0' and do some additional
504         things.
505
506 2011-07-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
507
508         PR fortran/48876
509         * expr.c (gfc_simplify_expr):  If end of a string is less
510         than zero, set it to zero.
511
512 2011-07-28  Jakub Jelinek  <jakub@redhat.com>
513
514         PR fortran/31067
515         * frontend-passes.c (optimize_minmaxloc): New function.
516         (optimize_expr): Call it.
517
518 2011-07-27  Tobias Burnus  <burnus@net-b.de>
519
520         PR fortran/45586
521         * trans-types.c (gfc_get_derived_type): Ensure that pointer
522         component types are marked as nonrestricted.
523
524 2011-07-27  Daniel Carrera  <dcarrera@gmail.com>
525
526         PR fortran/49755
527         * trans.c (gfc_allocate_using_malloc): Change function signature.
528         Return nothing. New parameter "pointer". Eliminate temorary variables. 
529         (gfc_allocate_using_lib): Ditto.
530         (gfc_allocate_allocatable): Ditto. Update call to gfc_allocate_using_lib
531         and gfc_allocate_using_malloc. Do not free and then reallocate a
532         variable that is already allocated.
533         (gfc_likely): New function. Basedon gfc_unlikely.
534         * trans-array.c (gfc_array_init_size): New parameter "descriptor_block".
535         Instructions to modify the array descriptor are stored in this block
536         while other instructions continue to be stored in "pblock".
537         (gfc_array_allocate): Update call to gfc_array_init_size. Move the
538         descriptor_block so that the array descriptor is only updated if
539         the array was allocated successfully.
540         Update calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
541         * trans.h (gfc_allocate_allocatable): Change function signature.
542         Function now returns void.
543         (gfc_allocate_using_lib): Ditto, and new function parameter.
544         (gfc_allocate_using_malloc): Ditto.
545         * trans-openmp.c (gfc_omp_clause_default_ctor,
546         gfc_omp_clause_copy_ctor,gfc_trans_omp_array_reduction): Replace a call
547         to gfc_allocate_allocatable with gfc_allocate_using_malloc.
548         * trans-stmt.c (gfc_trans_allocate): Update function calls for
549         gfc_allocate_allocatable and gfc_allocate_using_malloc.
550
551 2011-07-26  Tobias Burnus  <burnus@net-b.de>
552
553         * trans-array.c (CAF_TOKEN_FIELD): New macro constant.
554         (gfc_conv_descriptor_token): New function.
555         * trans-array.h (gfc_conv_descriptor_token): New prototype.
556         * trans-types.c (gfc_get_array_descriptor_base): For coarrays
557         with -fcoarray=lib, append "void *token" to the array descriptor.
558         (gfc_array_descriptor_base_caf): New static variable.
559         * trans-expr.c (gfc_conv_procedure_call): Handle token and offset
560         when passing a descriptor coarray to a nondescriptor dummy. 
561
562 2011-07-23  Tobias Burnus  <burnus@net-b.de>
563
564         * resolve.c (resolve_symbol): Fix coarray var decl check.
565
566 2011-07-21  Daniel Carrera  <dcarrera@gmail.com>
567
568         * trans.c (gfc_allocate_with_status): Split into two functions
569         gfc_allocate_using_malloc and gfc_allocate_usig_lib.
570         (gfc_allocate_using_malloc): The status parameter is now the
571         actual status rather than a pointer. Code cleanup.
572         (gfc_allocate_using_lib): Ditto. Add new parametrs errmsg and
573         errlen. Pass these to the coarray lib.
574         * trans-openmp.c (gfc_omp_clause_default_ctor): Update calls to
575         gfc_allocate_allocatable.
576         (gfc_omp_clause_copy_ctor): Ditto.
577         (gfc_trans_omp_array_reduction): Ditto.
578         * trans-stmt.c (gfc_trans_allocate): Ditto. Update call to
579         gfc_allocate_using_malloc. Pass stat rather than pstat to the allocate
580         fuctions. If using coarray lib, pass errmsg and errlen to the allocate
581         functions. Move error checking outside the if (!gfc_array_allocate)
582         block so that it also affects trees produced by gfc_array_allocate.
583         * trans-array.c (gfc_array_allocate): Add new parameters errmsg
584         and errlen. Replace parameter pstat by status. Code cleanup. Update
585         calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
586         * trans-array.h (gfc_array_allocate): Update signature of
587         gfc_array_allocate.
588
589 2011-07-21  Steven G. Kargl  <kargl@gcc.gnu.org>
590
591         * gfortran.texi: Remove a duplicate word.
592
593 2011-07-21  Tobias Burnus  <burnus@net-b.de>
594
595         * check.c (gfc_check_present): Allow coarrays.
596         * trans-array.c (gfc_conv_array_ref): Avoid casting
597         when a pointer is wanted.
598         * trans-decl.c (create_function_arglist): For -fcoarray=lib,
599         handle hidden token and offset arguments for nondescriptor
600         coarrays.
601         * trans-expr.c (get_tree_for_caf_expr): New function.
602         (gfc_conv_procedure_call): For -fcoarray=lib pass the
603         token and offset for nondescriptor coarray dummies.
604         * trans.h (lang_type): Add caf_offset tree.
605         (GFC_TYPE_ARRAY_CAF_OFFSET): New macro.
606
607 2011-07-19  Tobias Burnus  <burnus@net-b.de>
608
609         * expr.c (gfc_is_coarray): New function.
610         * gfortran.h (gfc_is_coarray): New prototype.
611         * interface.c (compare_parameter): Use it.
612
613 2011-07-19  Richard Guenther  <rguenther@suse.de>
614
615         * trans-expr.c (fill_with_spaces): Use fold_build_pointer_plus.
616         (gfc_trans_string_copy): Likewise.
617         * trans-intrinsic.c (gfc_conv_intrinsic_repeat): Likewise.
618         * trans-types.c (gfc_get_array_descr_info): Likewise.
619         * trans.c (gfc_build_array_ref): Likewise.
620
621 2011-07-19  Janus Weil  <janus@gcc.gnu.org>
622
623         PR fortran/49708
624         * resolve.c (resolve_allocate_expr): Fix diagnostics for pointers.
625
626 2011-07-18  Tobias Burnus  <burnus@net-b.de>
627
628         * trans-decl.c (gfc_build_qualified_array): Make coarray's
629         token TYPE_QUAL_RESTRICT.
630
631 2011-07-18  Tobias Burnus  <burnus@net-b.de>
632
633         * resolve.c (resolve_transfer): Mention defined I/O
634         in the diagnostic for alloc_comp/pointer_comp.
635
636 2011-07-17  Tobias Burnus  <burnus@net-b.de>
637
638         PR fortran/34657
639         * module.c (check_for_ambiguous): Check whether the name is matches
640         the current program unit.
641
642 2011-07-17  Tobias Burnus  <burnus@net-b.de>
643
644         PR fortran/49624
645         * expr.c (gfc_check_pointer_assign): Fix checking for invalid
646         pointer bounds.
647
648 2011-07-16  Tobias Burnus  <burnus@net-b.de>
649         
650         * expr.c (gfc_ref_this_image): New function.
651         (gfc_is_coindexed): Use it.
652         * gfortran.h (gfc_ref_this_image): New prototype.
653         * resolve.c (resolve_deallocate_expr,
654         resolve_allocate_expr): Support alloc scalar coarrays.
655         * trans-array.c (gfc_conv_array_ref, gfc_array_init_size,
656         gfc_conv_descriptor_cosize, gfc_array_allocate,
657         gfc_trans_deferred_array): Ditto.
658         * trans-expr.c (gfc_conv_variable) Ditto.:
659         * trans-stmt.c (gfc_trans_deallocate): Ditto.
660         * trans-types.c (gfc_get_element_type, gfc_get_array_type_bounds
661         gfc_get_array_descr_info): Ditto.
662         * trans-decl.c (gfc_get_symbol_decl): Ditto.
663
664 2011-07-11  Jakub Jelinek  <jakub@redhat.com>
665
666         PR fortran/49698
667         * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Initialize
668         inner_size to gfc_index_one_node instead of integer_one_node.
669
670 2011-07-10  Tobias Burnus  <burnus@net-b.de>
671
672         PR fortran/49690
673         * intrinsic.c (add_functions): Use BT_VOID for 2nd argument of SIGNAL.
674
675 2011-07-09  Uros Bizjak  <ubizjak@gmail.com>
676
677         PR fortran/48926
678         * expr.c (gfc_get_corank): Change return value to int.
679         * gfortran.h (gfc_get_corank): Update function prototype.
680
681 2011-07-07  Mikael Morin  <mikael.morin@sfr.fr>
682
683         PR fortran/49648
684         * resolve.c (resolve_symbol): Force resolution of function result's
685         array specification.
686
687 2011-07-07  Tobias Burnus  <burnus@net-b.de>
688
689         * trans.c (gfc_allocate_with_status): Call _gfortran_caf_register
690         with NULL arguments for (new) stat=/errmsg= arguments.
691
692 2011-07-06  Daniel Carrera  <dcarrera@gmail.com>
693
694         * trans-array.c (gfc_array_allocate): Rename allocatable_array to
695         allocatable. Rename function gfc_allocate_array_with_status to
696         gfc_allocate_allocatable_with_status. Update function call for
697         gfc_allocate_with_status.
698         * trans-opemp.c (gfc_omp_clause_default_ctor): Rename function
699         gfc_allocate_array_with_status to gfc_allocate_allocatable_with_status.
700         * trans-stmt.c (gfc_trans_allocate): Update function call for
701         gfc_allocate_with_status. Rename function gfc_allocate_array_with_status
702         to gfc_allocate_allocatable_with_status.
703         * trans.c (gfc_call_malloc): Add new parameter gfc_allocate_with_status
704         so it uses the library for memory allocation when -fcoarray=lib.
705         (gfc_allocate_allocatable_with_status): Renamed from
706         gfc_allocate_array_with_status.
707         (gfc_allocate_allocatable_with_status): Update function call for
708         gfc_allocate_with_status.
709         * trans.h (gfc_coarray_type): New enum.
710         (gfc_allocate_with_status): Update prototype.
711         (gfc_allocate_allocatable_with_status): Renamed from
712         gfc_allocate_array_with_status.
713         * trans-decl.c (generate_coarray_sym_init): Use the new constant
714         GFC_CAF_COARRAY_ALLOC in the call to gfor_fndecl_caf_register.
715
716 2011-07-06  Richard Guenther  <rguenther@suse.de>
717
718         * f95-lang.c (gfc_init_decl_processing):
719         Merge calls to build_common_tree_nodes and build_common_tree_nodes_2.
720
721 2011-07-04  Jakub Jelinek  <jakub@redhat.com>
722
723         PR fortran/49623
724         * gfortranspec.c (lang_specific_driver): Ignore options with
725         CL_ERR_MISSING_ARG errors.
726
727 2011-07-02  Janus Weil  <janus@gcc.gnu.org>
728
729         PR fortran/49562
730         * expr.c (gfc_check_vardef_context): Handle type-bound procedures.
731
732 2011-06-30  Jakub Jelinek  <jakub@redhat.com>
733
734         PR fortran/49540
735         * gfortran.h (gfc_constructor): Add repeat field.
736         * trans-array.c (gfc_conv_array_initializer): Handle repeat > 1.
737         * array.c (current_expand): Add repeat field.
738         (expand_constructor): Copy repeat.
739         * constructor.c (node_free, node_copy, gfc_constructor_get,
740         gfc_constructor_lookup): Handle repeat field.
741         (gfc_constructor_lookup_next, gfc_constructor_remove): New functions.
742         * data.h (gfc_assign_data_value): Add mpz_t * argument.
743         (gfc_assign_data_value_range): Removed.
744         * constructor.h (gfc_constructor_advance): Removed.
745         (gfc_constructor_lookup_next, gfc_constructor_remove): New prototypes.
746         * data.c (gfc_assign_data_value): Add REPEAT argument, handle it and
747         also handle overwriting a range with a single entry.
748         (gfc_assign_data_value_range): Removed.
749         * resolve.c (check_data_variable): Adjust gfc_assign_data_value
750         call.  Use gfc_assign_data_value instead of
751         gfc_assign_data_value_expr.
752
753 2011-06-27  Janus Weil  <janus@gcc.gnu.org>
754
755         PR fortran/49466
756         * trans-array.c (structure_alloc_comps): Make sure sub-components
757         and extended types are correctly deallocated.
758
759 2011-06-21  Andrew MacLeod  <amacleod@redhat.com>
760
761         * trans-openmp.c: Add sync_ or SYNC__ to builtin names.
762         * trans-stmt.c: Add sync_ or SYNC__ to builtin names.
763         * trans-decl.c: Add sync_ or SYNC__ to builtin names.
764
765 2011-06-21  Janus Weil  <janus@gcc.gnu.org>
766
767         PR fortran/49112
768         * class.c (gfc_find_derived_vtab): Make vtab and default initialization
769         symbols SAVE_IMPLICIT.
770
771 2011-06-20  Tobias Burnus  <burnus@net-b.de>
772
773         PR fortran/18918
774         * gfortran.h (gfc_check_vardef_context): Update prototype.
775         (iso_fortran_env_symbol): Handle derived types.
776         (symbol_attribute): Add lock_comp.
777         * expr.c (gfc_check_vardef_context): Add LOCK_TYPE check.
778         * interface.c (compare_parameter, gfc_procedure_use): Handle
779         LOCK_TYPE.
780         (compare_actual_formal): Update
781         gfc_check_vardef_context call.
782         * check.c (gfc_check_atomic_def, gfc_check_atomic_ref): Ditto.
783         * intrinsic.c (check_arglist): Ditto.
784         * io.c (resolve_tag, gfc_resolve_dt, gfc_resolve_inquire): Ditto.
785         * iso-fortran-env.def (ISOFORTRAN_LOCK_TYPE): Add.
786         * intrinsic.texi (ISO_FORTRAN_ENV): Document LOCK_TYPE.
787         * module.c (mio_symbol_attribute): Handle lock_comp.
788         (create_derived_type): New function.
789         (use_iso_fortran_env_module): Call it to handle LOCK_TYPE.
790         * parse.c (parse_derived): Add constraint check for LOCK_TYPE.
791         * resolve.c (resolve_symbol, resolve_lock_unlock): Add constraint
792         checks for LOCK_TYPE.
793         (gfc_resolve_iterator, resolve_deallocate_expr,
794         resolve_allocate_expr, resolve_code, resolve_transfer): Update
795         gfc_check_vardef_context call.
796         * trans-stmt.h (gfc_trans_lock_unlock): New prototype.
797         * trans-stmt.c (gfc_trans_lock_unlock): New function.
798         * trans.c (trans_code): Handle LOCK and UNLOCK.
799
800 2011-06-18  Janus Weil  <janus@gcc.gnu.org>
801
802         PR fortran/49400
803         * decl.c (gfc_match_procedure): Allow PROCEDURE declarations inside
804         BLOCK constructs.
805
806 2011-06-17  Janus Weil  <janus@gcc.gnu.org>
807
808         PR fortran/48699
809         * check.c (gfc_check_move_alloc): If 'TO' argument is polymorphic,
810         make sure the vtab is present.
811
812 2011-06-16  Janus Weil  <janus@gcc.gnu.org>
813
814         PR fortran/49074
815         * interface.c (gfc_extend_assign): Propagate the locus from the
816         assignment to the type-bound procedure call.
817
818 2011-06-16  Janus Weil  <janus@gcc.gnu.org>
819
820         PR fortran/49417
821         * module.c (mio_component): Make sure the 'class_ok' attribute is set
822         for use-associated CLASS components.
823         * parse.c (parse_derived): Check for 'class_ok' attribute.
824         * resolve.c (resolve_fl_derived): Ditto.
825
826 2011-06-13  Thomas Koenig  <tkoenig@gcc.gnu.org>
827
828         * frontend-passes.c (remove_trim):  New function.
829         (optimize_assignment):  Use it.
830         (optimize_comparison):  Likewise.  Return correct status
831         for previous change.
832
833 2011-06-12  Tobias Burnus
834
835         PR fortran/49324
836         * trans-expr.c (gfc_trans_assignment_1): Tell
837         gfc_trans_scalar_assign to also deep-copy RHS nonvariables
838         with allocatable components.
839         * trans-array.c (gfc_conv_expr_descriptor): Ditto.
840
841 2011-05-11  Thomas Koenig  <tkoenig@gcc.gnu.org>
842
843         * frontend-passes.c (optimize_assignment): Follow chains
844         of concatenation operators to the end for removing trailing
845         TRIMS for assignments.
846
847 2011-06-10  Daniel Carrera  <dcarrera@gmail.com>
848
849         * trans-decl.c (gfc_build_builtin_function_decls):
850         Updated declaration of caf_sync_all and caf_sync_images.
851         * trans-stmt.c (gfc_trans_sync): Function
852         can now handle a "stat" variable that has an integer type
853         different from integer_type_node.
854
855 2011-06-09  Richard Guenther  <rguenther@suse.de>
856
857         * trans.c (gfc_allocate_array_with_status): Mark error path
858         as unlikely.
859
860 2011-06-08  Tobias Burnus  <burnus@net-b.de>
861
862         PR fortran/18918
863         * gfortran.h (gfc_statement): Add ST_LOCK and ST_UNLOCK.
864         (gfc_exec_op): Add EXEC_LOCK and EXEC_UNLOCK.
865         (gfc_code): Add expr4.
866         * match.h (gfc_match_lock, gfc_match_unlock): New prototypes.
867         * match.c (gfc_match_lock, gfc_match_unlock,
868         lock_unlock_statement): New functions.
869         (sync_statement): Bug fix, avoiding double freeing.
870         (gfc_match_if): Handle LOCK/UNLOCK statement.
871         * parse.c (decode_statement, next_statement,
872         gfc_ascii_statement): Ditto.
873         * st.c (gfc_free_statement): Handle LOCK and UNLOCK.
874         * resolve.c (resolve_lock_unlock): New function.
875         (resolve_code): Call it.
876         * dump-parse-tree.c (show_code_node): Handle LOCK/UNLOCK.
877
878 2011-06-07  Richard Guenther  <rguenther@suse.de>
879
880         * f95-lang.c (gfc_init_decl_processing): Do not set
881         size_type_node or call set_sizetype.
882
883 2011-06-05  Tobias Burnus  <burnus@net-b.de>
884
885         PR fortran/49255
886         * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
887         for F2008.
888
889 2011-06-05  Andreas Schmidt  <andreas.schmidt.42@gmx.net>
890         Thomas Koenig  <tkoenig@gcc.gnu.org>
891
892         * dump-parse-tree.c (show_symbol):  Don't dump namespace
893         for ENTRY to avoid infinite recursion.
894
895 2011-06-02  Asher Langton  <langton2@llnl.gov>
896
897         PR fortran/49268
898         * trans-decl.c (gfc_trans_deferred_vars): Treat assumed-size Cray
899         pointees as AS_EXPLICIT.
900
901 2011-06-02  Asher Langton  <langton2@llnl.gov>
902
903         PR fortran/37039
904         * decl.c (variable_decl): Merge current_as before copying to cp_as.
905
906 2011-06-02  Steven G. Kargl  <kargl@gcc.gnu.org>
907
908         PR fortran/49265
909         * decl.c (gfc_match_modproc):  Allow for a double colon in a module
910         procedure statement.
911         * parse.c ( decode_statement): Deal with whitespace around :: in
912         gfc_match_modproc.
913
914 2011-05-31  Tobias Burnus  <burnus@net-b.de>
915
916         PR fortran/18918
917         * intrinsic.c (klass): Add CLASS_ATOMIC.
918         (add_subroutines): Add atomic_ref/atomic_define.
919         * intrinsic.texi (ATOMIC_REF, ATOMIC_DEFINE): Document.
920         * intrinsic.h (gfc_check_atomic_def, gfc_check_atomic_ref,
921         gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New prototypes.
922         * gfortran.h (gfc_isym_id): Add GFC_ISYM_ATOMIC_DEF
923         and GFC_ISYM_ATOMIC_REF.
924         (gfc_atomic_int_kind, gfc_atomic_logical_kind): New global vars.
925         * iresolve.c (gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New
926         functions.
927         * check.c (gfc_check_atomic, gfc_check_atomic_def,
928         gfc_check_atomic_ref): New functions.
929         * iso-fortran-env.def (ISOFORTRANENV_FILE_ATOMIC_INT_KIND,
930         ISOFORTRANENV_FILE_ATOMIC_LOGICAL_KIND): Change kind value.
931         * trans-intrinsic.c (conv_intrinsic_atomic_def,
932         conv_intrinsic_atomic_ref, gfc_conv_intrinsic_subroutine): New
933         functions.
934         (conv_intrinsic_move_alloc) Renamed from
935         gfc_conv_intrinsic_move_alloc - and made static.
936         * trans.h (gfc_conv_intrinsic_move_alloc): Remove.
937         (gfc_conv_intrinsic_subroutine) Add prototype.
938         * trans.c (trans_code): Call gfc_conv_intrinsic_subroutine.
939         * trans-types (gfc_atomic_int_kind, gfc_atomic_logical_kind): New
940         global vars.
941         (gfc_init_kinds): Set them.
942
943 2011-05-31  Tobias Burnus  <burnus@net-b.de>
944
945         PR fortran/18918
946         * trans-array.c (gfc_trans_dummy_array_bias): Handle
947         cobounds of assumed-shape arrays.
948
949 2011-05-31  Tobias Burnus  <burnus@net-b.de>
950
951         PR fortran/18918
952         * resolve.c (resolve_fl_variable): Handle static coarrays
953         with non-constant cobounds.
954
955 2011-05-29  Janus Weil  <janus@gcc.gnu.org>
956
957         PR fortran/47601
958         * module.c (mio_component_ref): Handle components of extended types.
959         * symbol.c (gfc_find_component): Return is sym is NULL.
960
961 2011-05-29  Tobias Burnus  <burnus@net-b.de>
962
963         PR fortran/18918
964         * interface.c (compare_parameter): Add check for passing coarray
965         to allocatable noncoarray dummy.
966
967 2011-05-29  Tobias Burnus  <burnus@net-b.de>
968             Richard Guenther  <rguenther@suse.de>
969
970         PR fortran/18918
971         * trans-types.c (gfc_get_nodesc_array_type): Don't mess with
972         the type's TREE_TYPE.
973         * trans-array.c (gfc_conv_array_ref): Use TYPE_MAIN_VARIANT.
974         * trans.c (gfc_build_array_ref): Ditto.
975
976 2011-05-27  Tobias Burnus  <burnus@net-b.de>
977
978         PR fortran/18918
979         * check.c (gfc_check_associated, gfc_check_null): Add coindexed check.
980         * match.c (gfc_match_nullify): Ditto.
981         * resolve.c (resolve_deallocate_expr): Ditto.
982         * trans-types.c (gfc_get_nodesc_array_type): Don't set restricted
983         for nonpointers.
984
985 2011-05-27  Tobias Burnus  <burnus@net-b.de>
986
987         PR fortran/48820
988         * gfortran.h (gfc_isym_id): Add GFC_ISYM_RANK.
989         * intrinsic.c (add_functions): Add rank intrinsic.
990         (gfc_check_intrinsic_standard): Handle GFC_STD_F2008_TR.
991         * intrinsic.h (gfc_simplify_rank, gfc_check_rank): Add prototypes.
992         * simplify.c (gfc_simplify_rank): New function.
993         * intrinsic.texi (RANK): Add description for rank intrinsic.
994         * check.c (gfc_check_rank): New function.
995
996 2011-05-26  Paul Thomas  <pault@gcc.gnu.org>
997             Thomas Koenig  <tkoenig@gcc.gnu.org>
998
999         PR fortran/48955
1000         * trans-expr.c (gfc_trans_assignment_1): GFC_REVERSE_NOT_SET
1001         changed to GFC_ENABLE_REVERSE.
1002         * trans-array.c (gfc_init_loopinfo): GFC_CANNOT_REVERSE changed
1003         to GFC_INHIBIT_REVERSE.
1004         * gfortran.h : Enum gfc_reverse is now GFC_ENABLE_REVERSE,
1005         GFC_FORWARD_SET, GFC_REVERSE_SET and GFC_INHIBIT_REVERSE.
1006         * dependency.c (gfc_dep_resolver): Change names for elements of
1007         gfc_reverse as necessary. Change the logic so that forward
1008         dependences are remembered as well as backward ones. When both
1009         have appeared, force a temporary.
1010
1011 2011-05-26  Tobias Burnus  <burnus@net-b.de>
1012
1013         PR fortran/18918
1014         * trans-array.c (gfc_conv_array_ref): Handle pointer coarrays.
1015         * trans-decl.c (has_coarray_vars, caf_init_block,
1016         gfor_fndecl_caf_register): New file-global variables.
1017         (gfc_finish_var_decl): Make sure that coarrays in main are static.
1018         (gfc_build_qualified_array): Generate coarray token variable.
1019         (gfc_get_symbol_decl): Don't use a static initializer for coarrays.
1020         (gfc_build_builtin_function_decls): Set gfor_fndecl_caf_register.
1021         (gfc_trans_deferred_vars, gfc_emit_parameter_debug_info): Skip for
1022         static coarrays.
1023         (generate_local_decl): Check for local coarrays.
1024         (create_main_function): SYNC ALL before calling MAIN.
1025         (generate_coarray_sym_init): Register static coarray.
1026         (generate_coarray_init): Generate CAF registering constructor
1027         function.
1028         (gfc_generate_function_code): Call it, if needed, do not create
1029         cgraph twice.
1030         (gfc_generate_module_vars, gfc_process_block_locals): Call
1031         generate_coarray_init.
1032         * trans-types.c (gfc_get_nodesc_array_type): Generate pointers for
1033         -fcoarray=lib.
1034         * trans.h (gfor_fndecl_caf_register): New variable.
1035         (lang_type): New element caf_token.
1036         (GFC_TYPE_ARRAY_CAF_TOKEN): New macro.
1037
1038 2011-05-24  Joseph Myers  <joseph@codesourcery.com>
1039
1040         * Make-lang.in (GFORTRAN_D_OBJS): Remove prefix.o.
1041         (gfortran$(exeext)): Use libcommon-target.a.
1042
1043 2011-05-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
1044
1045         * frontend-passes.c (cfe_register_funcs):  Also register
1046         character functions if their charlens are known and constant.
1047         Also register allocatable functions.
1048
1049 2011-05-21  Janus Weil  <janus@gcc.gnu.org>
1050
1051         PR fortran/48699
1052         * match.c (select_type_set_tmp): Make the temporary ALLOCATABLE if the
1053         selector is ALLOCATABLE.
1054
1055 2011-05-20  Janus Weil  <janus@gcc.gnu.org>
1056
1057         PR fortran/48706
1058         * module.c (write_dt_extensions): Do not write extended types which
1059         are local to a subroutine.
1060
1061 2011-05-20  Joseph Myers  <joseph@codesourcery.com>
1062
1063         * Make-lang.in (GFORTRAN_D_OBJS): Remove version.o and intl.o.
1064
1065 2011-05-20  Janne Blomqvist  <jb@gcc.gnu.org>
1066
1067         * gfortran.texi (set_fpe): Update documentation.
1068         * invoke.texi (-ffpe-trap): Likewise.
1069         * libgfortran.h (GFC_FPE_PRECISION): Rename to GFC_FPE_INEXACT.
1070         * options.c (gfc_handle_fpe_trap_option): Handle inexact and make
1071         precision an alias for it.
1072
1073 2011-05-19  Tobias Burnus  <burnus@net-b.de>
1074
1075         PR fortran/18918
1076         * trans-types.c (gfc_get_element_type): Handle scalar coarrays.
1077         (gfc_get_nodesc_array_type): Make a variant-type copy for scalar
1078         coarrays.
1079         * trans.c (gfc_build_array_ref): Return original type not variant
1080         copy for scalar coarrays.
1081         * trans-array.c (gfc_conv_array_ref): Ditto.
1082
1083 2011-05-18  Janus Weil  <janus@gcc.gnu.org>
1084
1085         PR fortran/48700
1086         * trans-intrinsic.c (gfc_conv_intrinsic_move_alloc): Deallocate 'TO'
1087         argument to avoid memory leaks.
1088
1089 2011-05-16  Tobias Burnus  <burnus@net-b.de>
1090
1091         * gfortran.texi (_gfortran_set_options): Add GFC_STD_F2008_TR.
1092         (Fortran 2008 status): Multi-image support for coarrays.
1093         (TR 19113 status): New section.
1094
1095 2011-05-15  Tobias Burnus  <burnus@net-b.de>
1096
1097         PR fortran/18918
1098         actual argument is not an array; rank mismatch is diagnosted later.
1099         * trans-decl.c (gfc_get_symbol_decl, gfc_trans_deferred_vars): Handle
1100         scalar coarrays.
1101         * trans-types.c (gfc_get_array_type_bounds): Ditto.
1102
1103 2011-05-15  Joern Rennecke  <amylaar@spamcop.net>
1104
1105         PR middle-end/46500
1106         * trans-types.c: Include "tm.h".
1107         [0] (c_size_t_size): Remove.
1108
1109 2011-05-15  Janne Blomqvist  <jb@gcc.gnu.org>
1110
1111         PR libfortran/48915
1112         * gfortran.texi (_gfortran_set_options): Even though -fbacktrace
1113         is now the default, the library defaults to backtracing disabled.
1114
1115 2011-05-14  Tobias Burnus  <burnus@net-b.de>
1116
1117         * lang.opt (fdump-core): Re-add as ignored option
1118         for backward compatibility.
1119
1120 2011-05-14  Janne Blomqvist  <jb@gcc.gnu.org>
1121
1122         PR libfortran/48915
1123         * gfortran.texi: Update mixed-language programming section
1124         reflecting the removal of the fdump-core option, and that
1125         -fbacktrace is now enabled by default.
1126
1127 2011-05-14  Thomas Koenig  <tkoenig@gcc.gnu.org>
1128
1129         PR fortran/22572
1130         * frontend-passes.c (cfe_register_funcs):  Also register functions
1131         for potential elimination if the rank is > 0, the shape is unknown
1132         and reallocate on assignment is active.
1133         (create_var):  For rank > 0 functions with unknown shape, create
1134         an allocatable temporary.
1135
1136 2011-05-14  Tobias Burnus  <burnus@net-b.de>
1137
1138         PR fortran/18918
1139         * interface.c (compare_parameter): Skip diagnostic if
1140         actual argument is not an array; rank mismatch is diagnosted later.
1141
1142 2011-05-14  Tobias Burnus  <burnus@net-b.de>
1143
1144         * options.c (gfc_init_options, gfc_post_options): Enable
1145         -fstack-arrays by default if -Ofast is used.
1146         * invoke.texi (-fstack-arrays): Document this.
1147
1148 2011-05-14  Janne Blomqvist  <jb@gcc.gnu.org>
1149
1150         PR libfortran/48915
1151         * gfortran.h (gfc_option_t): Remove flag_dump_core.
1152         * gfortran.texi (GFORTRAN_ERROR_DUMPCORE): Remove section.
1153         (GFORTRAN_ERROR_BACKTRACE): Document that it's enabled by default.
1154         * intrinsic.texi (ABORT): Remove explanation of -fdump-core.
1155         * invoke.texi: Remove -fdump-core, document that -fbacktrace is
1156         enabled by default.
1157         * lang.opt: Remove -fdump-core.
1158         * options.c (gfc_init_options): Make backtrace default to enabled,
1159         remove dump_core.
1160         (gfc_handle_option): Remove OPT_fdump-core.
1161         * trans-decl.c: Pass a 0 to preserve ABI.
1162
1163 2011-05-14  Janne Blomqvist  <jb@gcc.gnu.org>
1164
1165         * gfortran.texi: Remove GFORTRAN_USE_STDERR documentation.
1166
1167 2011-05-13  Tobias Burnus  <burnus@net-b.de>
1168
1169         PR fortran/48972
1170         * io.c (resolve_tag_format, resolve_tag): Make sure
1171         that the string is of default kind.
1172         (gfc_resolve_inquire): Also resolve decimal tag.
1173
1174 2011-05-12  Tobias Burnus  <burnus@net-b.de>
1175
1176         PR fortran/48972
1177         * resolve.c (resolve_intrinsic): Don't resolve module
1178         intrinsics multiple times.
1179
1180 2011-05-11  Tobias Burnus  <burnus@net-b.de>
1181
1182         PR fortran/48889
1183         * expr.c (gfc_is_constant_expr): Use e->value.function.esym
1184         instead of e->symtree->n.sym, if available.
1185
1186 2011-05-07  Eric Botcazou  <ebotcazou@adacore.com>
1187
1188         * f95-lang.c (global_bindings_p): Return bool and simplify.
1189
1190 2011-05-07  Tobias Burnus  <burnus@net-b.de>
1191
1192         PR fortran/18918
1193         PR fortran/48919
1194         * trans.h: Move gfc_init_coarray_decl prototype ...
1195         * gfortran.h: ... to here.
1196         * parse.c (translate_all_program_units): Call gfc_init_coarray_decl.
1197         (gfc_parse_file): Update translate_all_program_units call.
1198         * trans-decl.c (gfc_init_coarray_decl): Fix variable declaration,
1199         new argument whether DECL_EXTERNAL should be used.
1200         (create_main_function): Update gfc_init_coarray_decl call.
1201         * trans-intrinsic.c (trans_this_image, trans_image_index,
1202         conv_intrinsic_cobound): Ditto.
1203
1204 2011-05-06  Tobias Burnus  <burnus@net-b.de>
1205
1206         PR fortran/18918
1207         * trans-array.c (gfc_walk_variable_expr): Continue walking
1208         for scalar coarrays.
1209         * trans-intrinsic.c (convert_element_to_coarray_ref): New function.
1210         (trans_this_image, trans_image_index, conv_intrinsic_cobound): Use it.
1211         (trans_this_image): Fix algorithm.
1212         * trans-types.c (gfc_get_element_type, gfc_get_array_descriptor_base,
1213         gfc_sym_type): Handle scalar coarrays.
1214
1215 2011-05-06  Tobias Burnus  <burnus@net-b.de>
1216
1217         PR fortran/48858
1218         PR fortran/48820
1219         * lang.opt (std=f2008tr): New.
1220         * libgfortran.h (GFC_STD_F2008_TR): New macro constant.
1221         * decl.c (verify_c_interop_param): Allow OPTIONAL in BIND(C)
1222         procedures for -std=f2008tr/gnu/legacy.
1223         (gfc_match_import): Set sym to NULL.
1224         * options.c (set_default_std_flags,gfc_handle_option): Handle
1225         -std=f2008tr.
1226         * invoke.texi (-std=): Document -std=f2008tr.
1227
1228 2011-05-05  Nathan Froyd  <froydnj@codesourcery.com>
1229
1230         * trans-decl.c (gfc_trans_entry_master_switch): Call build_case_label.
1231         * trans-io.c (add_case): Likewise.
1232         * trans-stmt.c (gfc_trans_integer_select): Likewise.
1233         (gfc_trans_character_select): Likewise.
1234
1235 2011-05-05  Eric Botcazou  <ebotcazou@adacore.com>
1236
1237         * trans-decl.c (trans_function_start): Do not set
1238         dont_save_pending_sizes_p.
1239
1240 2011-05-04  Nathan Froyd  <froydnj@codesourcery.com>
1241
1242         * trans.h (gfc_chainon_list): Delete.
1243         * trans.c (gfc_chainon_list): Delete.
1244
1245 2011-05-04  Tobias Burnus  <burnus@net-b.de>
1246
1247         PR fortran/48864
1248         * invoke.texi (fno-protect-parens): Document
1249         that -Ofast implies -fno-protect-parens.
1250         * options.c (gfc_init_options, gfc_post_options):
1251         Make -Ofast imply -fno-protect-parens.
1252
1253 2011-05-04  Nathan Froyd  <froydnj@codesourcery.com>
1254
1255         * trans-decl.c (build_library_function_decl_1): Call
1256         build_function_type_vec.  Adjust argument list building accordingly.
1257         * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl): Likewise.
1258         * trans-types.c (gfc_get_function_type): Likewise.
1259
1260 2011-05-04  Richard Guenther  <rguenther@suse.de>
1261
1262         * trans-array.c (gfc_trans_array_constructor_value): Use
1263         size_int for bounds of range types.
1264         (gfc_trans_array_constructor_value): Use size_type_node
1265         for memcpy argument.
1266         * trans-common.c (build_field): Use gfc_charlen_type_node
1267         for lengths.
1268         * trans-openmp.c (gfc_trans_omp_clauses): Do not pass NULL
1269         as type to build_int_cst.
1270         * trans-const.c (gfc_build_string_const): Use size_int
1271         for bounds of range types.
1272         (gfc_build_wide_string_const): Likewise.
1273         * trans-stmt.c (gfc_trans_label_assign): Use gfc_charlen_type_node
1274         for lengths.
1275         (gfc_trans_character_select): Likewise.
1276         (gfc_trans_character_select): Do not pass NULL
1277         as type to build_int_cst.
1278         (gfc_trans_character_select): Use size_int for bounds of range types.
1279         * trans-io.c (gfc_build_io_library_fndecls): Likewise.
1280         (add_case): Do not pass NULL as type to build_int_cst.
1281         (transfer_expr): Likewise.
1282         (transfer_array_desc): Likewise.
1283         * trans-decl.c (gfc_add_assign_aux_vars): Use gfc_charlen_type_node
1284         for lengths.
1285         (gfc_trans_assign_aux_var): Likewise.
1286         (create_main_function): Use size_int for bounds of range types.
1287         * trans-intrinsic.c (gfc_conv_intrinsic_minmax_char): Do not pass
1288         NULL as type to build_int_cst.
1289         (gfc_conv_intrinsic_spacing): Likewise.
1290         (gfc_conv_intrinsic_rrspacing): Likewise.
1291         (gfc_conv_intrinsic_len): Use gfc_charlen_type_node for lengths.
1292
1293 2011-05-04  Richard Guenther  <rguenther@suse.de>
1294
1295         * trans-types.c (gfc_get_array_type_bounds): Remove zero notrunc
1296         argument to int_const_binop.
1297
1298 2011-05-03  Tobias Burnus  <burnus@net-b.de>
1299
1300         PR fortran/18918
1301         * trans-intrinsic.c (trans_this_image): Implement version with
1302         coarray argument.
1303         (conv_intrinsic_cobound): Simplify code.
1304         (gfc_conv_intrinsic_function): Call trans_this_image for
1305         this_image(coarray) except for -fcoarray=single.
1306
1307 2011-05-02  Steven G. Kargl  <kargl@gcc.gnu.org>
1308
1309         PR fortran/48720
1310         * gfortran.texi: Document the 'Q' exponent-letter extension.
1311         * invoke.texi: Document -Wreal-q-constant.
1312         * lang.opt: Add -Wreal-q-constant option.
1313         * gfortran.h: Add warn_real_q_constant to option struct.
1314         * primary.c (match_real_constant):  Use it.  Accept 'Q' as
1315         exponent-letter for REAL(16) real-literal-constant with a
1316         fallback to REAL(10) or error if REAL(10) is not available.
1317         * options.c (gfc_init_options, set_Wall) Set it.
1318         (gfc_handle_option): Handle new option.
1319
1320 2011-04-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
1321
1322         * dump-prase-tree.c (show_code_node):  Set the current
1323         namespace to the BLOCK before displaying it; restore
1324         afterwards.
1325
1326 2011-04-30  Tobias Burnus  <burnus@net-b.de>
1327
1328         PR fortran/48821
1329         * decl.c (gfc_match_import): Don't try to find the
1330         symbol if already found.
1331
1332 2011-04-30  Paul Thomas  <pault@gcc.gnu.org>
1333
1334         PR fortran/48746
1335         * trans-expr.c (fcncall_realloc_result): Set the bounds and the
1336         offset so that the lbounds are one.
1337         (gfc_trans_arrayfunc_assign): Add rank to arguments of above.
1338
1339 2011-04-29  Paul Thomas  <pault@gcc.gnu.org>
1340
1341         PR fortran/48462
1342         * trans-expr.c (arrayfunc_assign_needs_temporary): Deal with
1343         automatic reallocation when the lhs is a target.
1344
1345         PR fortran/48746
1346         * trans-expr.c (fcncall_realloc_result): Make sure that the
1347         result dtype field is set before the function call.
1348
1349 2011-04-29  Tobias Burnus  <burnus@net-b.de>
1350
1351         PR fortran/48810
1352         * resolve.c (resolve_typebound_generic_call): Don't check access
1353         flags of the specific function.
1354
1355         PR fortran/48800
1356         * resolve.c (resolve_formal_arglist): Don't change AS_DEFERRED
1357         to AS_ASSUMED_SHAPE for function results.
1358         (resolve_fl_var_and_proc): Print also for function results with
1359         AS_DEFERRED an error, if they are not a pointer or allocatable.
1360         (resolve_types): Make sure arguments of procedures in interface
1361         blocks are resolved.
1362
1363 2011-04-29  Michael Matz  <matz@suse.de>
1364
1365         * options.c (options.c): Set warn_maybe_uninitialized.
1366
1367 2011-04-28  Tobias Burnus  <burnus@net-b.de>
1368
1369         PR fortran/48112
1370         * resolve.c (resolve_fl_var_and_proc): Print diagnostic of
1371         function results only once.
1372         (resolve_symbol): Always resolve function results.
1373
1374         PR fortran/48279
1375         * expr.c (gfc_check_vardef_context): Fix handling of generic
1376         EXPR_FUNCTION.
1377         * interface.c (check_interface0): Reject internal functions
1378         in generic interfaces, unless -std=gnu.
1379
1380 2011-04-27  Tobias Burnus  <burnus@net-b.de>
1381
1382         PR fortran/48788
1383         * resolve.c (resolve_global_procedure): Error recovery -
1384         avoid segfault for (non)character-returning functions.
1385
1386 2011-04-26  Thomas Koenig  <tkoenig@gcc.gnu.org>
1387
1388         * decl.c (gfc_match_end):  Check that the block name starts
1389         with "block@".
1390         * parse.c (gfc_build_block_ns):  Make block names unique by
1391         numbering them.
1392
1393 2011-04-26  Thomas Koenig  <tkoenig@gcc.gnu.org>
1394
1395         * frontend-passes.c (inserted_block):  New variable.
1396         (changed_statement):  Likewise.
1397         (create_var):  Encase statement to be operated on in a BLOCK.
1398         Adjust code insertion for BLOCK.
1399         (cfe_code):  Set inserted_block and changed_statement to NULL.
1400
1401 2011-04-23  Tobias Burnus  <burnus@net-b.de>
1402
1403         PR fortran/18918
1404         * module.c (mio_array_spec): Set as->cotype on reading.
1405         * resolve.c (resolve_allocate_expr): Fix allocating coarray
1406         components.
1407
1408 2011-04-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
1409
1410         PR fortran/48405
1411         * frontend_passes (cfe_register_funcs): Remove workaround for DO
1412         loops.
1413         (gfc_code_walker):  Make sure the pointer to the current
1414         statement doen't change when other statements are inserted.
1415
1416 2011-04-21  Tobias Burnus  <burnus@net-b.de>
1417
1418         PR fortran/18918
1419         * array.c (gfc_match_array_spec): Fix maximal rank(+corank) check.
1420
1421 2011-04-20  Jim Meyering  <meyering@redhat.com>
1422
1423         * expr.c (free_expr0): Remove useless if-before-free.
1424         * gfortranspec.c (lang_specific_pre_link): Likewise.
1425         * interface.c (gfc_extend_expr): Likewise.
1426         * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
1427
1428 2011-04-19  Tobias Burnus  <burnus@net-b.de>
1429
1430         PR fortran/48588
1431         PR fortran/48692
1432
1433         * module.c (fix_mio_expr): Commit created symbol.
1434
1435 2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
1436
1437         * scanner.c (load_file): Use XCNEWVAR instead of xcalloc.
1438
1439 2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
1440
1441         * frontend-passes.c (gfc_run_passes): Use XDELETEVEC instead of
1442         free.
1443
1444 2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
1445
1446         * misc.c (gfc_getmem): Remove function.
1447         * gfortran.h: Remove gfc_getmem prototype. Replace gfc_getmem
1448         usage with XCNEW or XCNEWVEC.
1449         * expr.c (gfc_check_assign_symbol): Replace gfc_getmem usage with
1450         XCNEW or XCNEWVEC.
1451         * options.c (gfc_handle_module_path_options)
1452         (gfc_get_option_string): Likewise.
1453         * resolve.c (gfc_resolve_forall): Likewise.
1454         * simplify.c (simplify_transformation_to_array): Likewise.
1455         * target-memory.c (gfc_target_interpret_expr): Likewise.
1456         * trans-common.c (get_segment_info, copy_equiv_list_to_ns)
1457         (get_init_field): Likewise.
1458         * trans-expr.c (gfc_conv_statement_function): Likewise.
1459         * trans-io.c (nml_full_name): Likewise.
1460         * trans-stmt.c (gfc_trans_forall_1): Likewise.
1461         * scanner.c (load_file): Replace gfc_getmem usage with xcalloc.
1462
1463 2011-04-19  Tobias Burnus  <burnus@net-b.de>
1464
1465         PR fortran/48588
1466         * parse.c (resolve_all_program_units): Skip modules.
1467         (translate_all_program_units): Handle modules.
1468         (gfc_parse_file): Defer code generation for modules.
1469
1470 2011-04-19  Martin Jambor  <mjambor@suse.cz>
1471
1472         * trans-decl.c (gfc_generate_function_code): Call cgraph_create_node
1473         instead of cgraph_get_create_node.
1474
1475 2011-04-18  Jim Meyering  <meyering@redhat.com>
1476
1477         remove now-unused definition of gfc_free
1478         * misc.c (gfc_free): Remove function.
1479         * gfortran.h (gfc_free): Remove its prototype.
1480
1481 2011-04-18  Jim Meyering  <meyering@redhat.com>
1482
1483         convert each use of gfc_free (p) to free (p)
1484         Do that by running this command:
1485           perl -pi -e    's/\bgfc_free ?\(/free (/' \
1486             $(git grep -El '\bgfc_free ?\(')
1487         which also corrects the few uses that lacked a space between
1488         the function name and the open parenthesis.
1489         Manually undo the change to the function definition itself
1490         and its prototype.  They'll be removed next.
1491         * array.c (gfc_free_array_spec, gfc_set_array_spec): s/gfc_free/free/
1492         * constructor.c (node_free): Likewise.
1493         * cpp.c (dump_queued_macros): Likewise.
1494         * data.c (gfc_assign_data_value): Likewise.
1495         * decl.c (free_variable, free_value, gfc_free_data): Likewise.
1496         (gfc_free_data_all, match_old_style_init): Likewise.
1497         (gfc_set_constant_character_len, gfc_free_enum_history, NUM_DECL):
1498         Likewise.
1499         (gfc_match_modproc): Likewise.
1500         * dependency.c (check_section_vs_section): Likewise.
1501         * error.c (gfc_pop_error, gfc_free_error): Likewise.
1502         * expr.c (free_expr0, gfc_free_expr, gfc_free_actual_arglist): Likewise.
1503         (gfc_free_ref_list, gfc_replace_expr, gfc_copy_ref): Likewise.
1504         (find_substring_ref, gfc_simplify_expr, gfc_check_assign_symbol):
1505         Likewise.
1506         * frontend-passes.c (gfc_run_passes, cfe_expr_0): Likewise.
1507         (strip_function_call, optimize_comparison): Likewise.
1508         * interface.c (gfc_free_interface, arginfo, check_interface0): Likewise.
1509         (CHECK_OS_COMPARISON, gfc_extend_assign, gfc_free_formal_arglist):
1510         Likewise.
1511         * intrinsic.c (gfc_intrinsic_done_1, gfc_convert_type_warn): Likewise.
1512         (gfc_convert_chartype): Likewise.
1513         * io.c (gfc_free_open, compare_to_allowed_values, gfc_free_close):
1514         Likewise.
1515         (gfc_free_filepos, gfc_free_dt, gfc_free_inquire): Likewise.
1516         * match.c (gfc_free_iterator, gfc_match_associate): Likewise.
1517         (gfc_free_alloc_list, gfc_free_namelist, gfc_free_equiv_until):
1518         Likewise.
1519         (free_case, gfc_free_forall_iterator): Likewise.
1520         * misc.c: Likewise.
1521         * module.c (free_pi_tree, resolve_fixups, free_rename): Likewise.
1522         (free_true_name, peek_atom, mio_allocated_wide_string): Likewise.
1523         (mio_pool_string, mio_internal_string, mio_gmp_integer): Likewise.
1524         (mio_gmp_real, mio_expr, mio_typebound_proc): Likewise.
1525         (mio_full_typebound_tree, skip_list, load_equiv): Likewise.
1526         (free_written_common, gfc_use_module, gfc_free_use_stmts): Likewise.
1527         * openmp.c (gfc_free_omp_clauses): Likewise.
1528         * options.c (gfc_post_options): Likewise.
1529         * parse.c (select_type_pop, parse_omp_structured_block): Likewise.
1530         * primary.c (gfc_free_structure_ctor_component): Likewise.
1531         * resolve.c (resolve_structure_cons, check_host_association): Likewise.
1532         (gfc_resolve_forall, resolve_equivalence): Likewise.
1533         * scanner.c (gfc_scanner_done_1, gfc_release_include_path): Likewise.
1534         (gfc_define_undef_line, preprocessor_line, include_line): Likewise.
1535         (load_file, gfc_read_orig_filename): Likewise.
1536         * simplify.c (simplify_transformation_to_array): Likewise.
1537         (gfc_simplify_ibits, simplify_shift, gfc_simplify_ishftc, STRING):
1538         Likewise.
1539         (gfc_simplify_compiler_options): Likewise.
1540         * st.c (gfc_free_statement, gfc_free_statements): Likewise.
1541         (gfc_free_association_list): Likewise.
1542         * symbol.c (free_components, gfc_free_st_label, free_st_labels):
1543         Likewise.
1544         (gfc_delete_symtree, gfc_free_symbol, gfc_undo_symbols): Likewise.
1545         (free_old_symbol, gfc_commit_symbols, free_tb_tree): Likewise.
1546         (free_common_tree, free_uop_tree, free_sym_tree): Likewise.
1547         (gfc_free_dt_list, gfc_free_equiv_infos, gfc_free_equiv_lists):
1548         Likewise.
1549         (gfc_free_finalizer, gfc_free_charlen, free_entry_list): Likewise.
1550         (gfc_free_namespace): Likewise.
1551         * trans-array.c (gfc_free_ss, gfc_trans_array_bound_check): Likewise.
1552         (gfc_conv_array_ref, gfc_conv_ss_startstride): Likewise.
1553         (gfc_trans_dummy_array_bias, gfc_conv_array_parameter): Likewise.
1554         * trans-common.c (get_init_field, create_common): Likewise.
1555         * trans-const.c (gfc_build_wide_string_const): Likewise.
1556         (gfc_conv_string_init): Likewise.
1557         * trans-decl.c (gfc_generate_function_code): Likewise.
1558         * trans-expr.c (gfc_conv_substring, gfc_free_interface_mapping):
1559         Likewise.
1560         (SCALAR_POINTER, gfc_conv_statement_function): Likewise.
1561         (gfc_trans_subarray_assign): Likewise.
1562         * trans-intrinsic.c (conv_generic_with_optional_char_arg): Likewise.
1563         * trans-io.c (gfc_trans_io_runtime_check, set_string): Likewise.
1564         (transfer_namelist_element, transfer_array_component): Likewise.
1565         * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
1566         * trans-stmt.c (cleanup_forall_symtrees, gfc_trans_forall_1): Likewise.
1567         * trans.c (trans_runtime_error_vararg, gfc_restore_backend_locus):
1568         Likewise.
1569
1570 2011-04-15  Jim Meyering  <meyering@redhat.com>
1571
1572         gfortran: remove cpp definition of free, ...
1573         in preparation for the s/gfc_free/free/ transformation.
1574         * gfortran.h (free): Remove macro definition that would otherwise
1575         prevent direct use of the function.
1576
1577 2011-04-18  Tobias Burnus  <burnus@net-b.de>
1578
1579         PR fortran/18918
1580         * array.c (gfc_match_array_ref): Check for too many codimensions.
1581         * check.c (gfc_check_image_index): Check number of elements
1582         in SUB argument.
1583         * simplify.c (gfc_simplify_image_index): Remove unreachable checks.
1584
1585 2011-04-18  Tobias Burnus  <burnus@net-b.de>
1586
1587         PR fortran/18918
1588         * iresolve.c (gfc_resolve_image_index): Set ts.type.
1589         * simplify.c (gfc_simplify_image_index): Don't abort if the bounds
1590         are not known at compile time and handle -fcoarray=lib.
1591         * trans-intrinsics.c (gfc_conv_intrinsic_function): Handle
1592         IMAGE_INDEX.
1593         (conv_intrinsic_cobound): Fix comment typo.
1594         (trans_this_image): New function.
1595         * trans-array.c (gfc_unlikely): Move to trans.c.
1596         * trans.c (gfc_unlikely): Function moved from trans-array.c.
1597         (gfc_trans_runtime_check): Use it.
1598         * trans-io.c (gfc_trans_io_runtime_check): Ditto.
1599         * trans.h (gfc_unlikely): Add prototype.
1600
1601 2011-04-18  Paul Thomas  <pault@gcc.gnu.org>
1602
1603         PR fortran/48462
1604         * trans-expr.c (fcncall_realloc_result): Renamed version of
1605         realloc_lhs_bounds_for_intrinsic_call that does not touch the
1606         descriptor bounds anymore but makes a temporary descriptor to
1607         hold the result.
1608         (gfc_trans_arrayfunc_assign): Modify the reference to above
1609         renamed function.
1610
1611 2011-05-17  Tobias Burnus  <burnus@net-b.de>
1612
1613         PR fortran/48624
1614         * trans-decl.c (gfc_get_extern_function_decl): Fix decl
1615         for external procedures with proc arguments.
1616
1617 2011-04-15  Michael Matz  <matz@suse.de>
1618
1619         * trans-array.c (toplevel): Include gimple.h.
1620         (gfc_trans_allocate_array_storage): Check flag_stack_arrays,
1621         properly expand variable length arrays.
1622         (gfc_trans_auto_array_allocation): If flag_stack_arrays create
1623         variable length decls and associate them with their scope.
1624         * gfortran.h (gfc_option_t): Add flag_stack_arrays member.
1625         * options.c (gfc_init_options): Handle -fstack_arrays option.
1626         * lang.opt (fstack-arrays): Add option.
1627         * invoke.texi (Code Gen Options): Document it.
1628         * Make-lang.in (trans-array.o): Depend on GIMPLE_H.
1629
1630 2011-04-15  Tobias Burnus  <burnus@net-b.de>
1631
1632         PR fortran/18918
1633         * trans-intrinsic.c (conv_intrinsic_cobound): Remove unused
1634         code which is also causing an ICE.
1635
1636 2011-04-14  Nathan Froyd  <froydnj@codesourcery.com>
1637
1638         * f95-lang.c (poplevel): Use BLOCK_CHAIN and block_chainon.
1639
1640 2011-04-12  Nathan Froyd  <froydnj@codesourcery.com>
1641
1642         * f95-lang.c (union lang_tree_node): Check for TS_COMMON before
1643         calling TREE_CHAIN.
1644
1645 2011-04-12  Paul Thomas  <pault@gcc.gnu.org>
1646
1647         PR fortran/48360
1648         PR fortran/48456
1649         * trans-array.c (get_std_lbound): For derived type variables
1650         return array valued component lbound.
1651
1652 2011-04-12  Martin Jambor  <mjambor@suse.cz>
1653
1654         * trans-decl.c (gfc_generate_function_code): Call
1655         cgraph_get_create_node instead of cgraph_node.
1656
1657 2011-04-11  Tobias Burnus  <burnus@net-b.de>
1658
1659         PR fortran/18918
1660         * simplify.c (simplify_bound_dim): Exit for
1661         ucobound's last dimension unless -fcoarray=single.
1662         * trans-array (gfc_conv_descriptor_size_1): Renamed from
1663         gfc_conv_descriptor_size, made static, has now from_dim and
1664         to_dim arguments.
1665         (gfc_conv_descriptor_size): Call gfc_conv_descriptor_size.
1666         (gfc_conv_descriptor_cosize): New function.
1667         * trans-array.h (gfc_conv_descriptor_cosize): New prototype.
1668         * trans-intrinsic.c (conv_intrinsic_cobound): Add input_location
1669         and handle last codim of ucobound for when -fcoarray is not "single".
1670
1671 2011-04-08  Thomas Koenig  <tkoenig@gcc.gnu.org>
1672
1673         PR fortran/48448
1674         * gfortran.h (gfc_option_t):  Add warn_function_elimination and
1675         flag_frontend_optimize.
1676         * lang.opt (Wfunction-elimination):  Add.
1677         (ffrontend-optimize):  Add.
1678         * invoke.texi:  Add documentation for -Wfunction-elimination
1679         and -ffrontend-optimize.  Add -faggressive-function-elimination
1680         to list of code generation options.
1681         * frontend-passes.c (gfc_run_passes):  Run optimizations if
1682         flag_frontend_optimize is set.
1683         (warn_function_elimination):  New function.
1684         (cfe_expr_0):  Call it if requested to do so.
1685         * options.c (gfc_init_options):  Initiate warn_function_elimination
1686         and flag_frontend_optimize.
1687         (gfc_post_options):  Set flag_frontend_optimize if not specified
1688         by user, depending on the optimization level.
1689         (gfc_handle_option):  Handle -Wfunction-elimination and
1690         -ffrontend-optimize.
1691
1692 2011-04-06  Tobias Burnus  <burnus@net-b.de>
1693
1694         PR fortran/18918
1695         * trans-intrinsic.c (gfc_conv_intrinsic_function): Fix
1696         call for this_image.
1697
1698 2011-04-05  Nathan Froyd  <froydnj@codesourcery.com>
1699
1700         * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Use
1701         build_function_type_list instead of build_function_type.  Correct
1702         argument order for func_frexp and func_scalbn.
1703
1704 2011-04-05  Duncan Sands  <baldrick@free.fr>
1705
1706         * f95-lang.c (build_builtin_fntypes): Swap frexp parameter types.
1707
1708 2011-04-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
1709
1710         * frontend-passes: (optimize_lexical_comparison): New function.
1711         (optimize_expr): Call it.
1712         (optimize_comparison): Also handle lexical comparison functions.
1713         Return false instad of -2 for unequal comparison.
1714
1715 2011-04-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
1716
1717         PR fortran/48412
1718         * frontend-passes (cfe_expr_0):  Reverse the order of going
1719         through the loops.
1720
1721 2011-04-04  Tobias Burnus  <burnus@net-b.de>
1722             Mikael Morin  <mikael.morin@sfr.fr>
1723
1724         PR fortran/18918
1725         * check.c (is_coarray): Update - because of DIMEN_THIS_IMAGE.
1726         * expr.c (gfc_is_coindexed): Ditto.
1727         * gfortran.h (gfc_array_ref_dimen_type): Add DIMEN_THIS_IMAGE.
1728         * interface.c (compare_parameter): Use gfc_expr_attr and
1729         gfc_is_coindexed.
1730         * resolve.c (check_dimension, compare_spec_to_ref,
1731         resolve_allocate_expr, check_data_variable): Update for
1732         DIMEN_THIS_IMAGE.
1733         * simplify.c (gfc_simplify_lcobound, gfc_simplify_this_image,
1734         gfc_simplify_ucobound): Allow non-constant bounds.
1735         * trans-array.c (gfc_set_loop_bounds_from_array_spec,
1736         gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
1737         gfc_set_vector_loop_bounds, gfc_conv_array_index_offset,
1738         gfc_start_scalarized_body, gfc_trans_scalarizing_loops,
1739         gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
1740         gfc_conv_ss_startstride, gfc_conv_loop_setup,
1741         gfc_trans_array_bounds, gfc_conv_expr_descriptor,
1742         gfc_walk_variable_expr): Handle codimen.
1743         * trans-decl.c (gfc_build_qualified_array): Save cobounds.
1744         * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use arg2.
1745         (conv_intrinsic_cobound): New function.
1746         (gfc_conv_intrinsic_function): Call it.
1747         (gfc_walk_intrinsic_function, gfc_add_intrinsic_ss_code): Handle
1748         ucobound, lcobound, this_image.
1749         * fortran/trans-types.c (gfc_build_array_type): Save cobounds.
1750         (gfc_get_dtype): Honour corank.
1751         (gfc_get_nodesc_array_type): Save corank and codimensions.
1752         (gfc_get_array_type_bounds): Save cobound.
1753         * fortran/trans.h (gfc_ss_info,gfc_loopinfo): Add codimen item.
1754         (gfc_array_kind): Add corank item.
1755         (GFC_TYPE_ARRAY_CORANK): New macro.
1756
1757 2011-04-03  Kai Tietz  <ktietz@redhat.com>
1758
1759         PR middle-end/48422
1760         * Make-lang.in (f95-lang.o): Add some missing dependencies.
1761
1762 2011-04-01  Thomas Koenig  <tkoenig@gcc.gnu.org>
1763
1764         PR fortran/48352
1765         * frontend-passes (cfe_register_funcs):  Don't
1766         register functions if they appear as iterators in DO loops.
1767
1768 2011-03-30  Michael Matz  <matz@suse.de>
1769
1770         PR fortran/47516
1771         * trans-expr.c (realloc_lhs_loop_for_fcn_call): Take loop as parameter,
1772         don't use local variable.
1773         (gfc_trans_arrayfunc_assign): Adjust caller.
1774
1775 2011-03-29  Janus Weil  <janus@gcc.gnu.org>
1776
1777         PR fortran/48095
1778         * decl.c (match_procedure_decl,match_ppc_decl): Set flavor of interface.
1779         * module.c (MOD_VERSION): Bump.
1780         (mio_typespec): Read/write 'interface' field.
1781         * primary.c (match_string_constant,match_logical_constant): Remove
1782         unneeded code.
1783         (match_complex_constant): Make sure to clear the typespec.
1784
1785 2011-03-29  Thomas Koenig  <tkoenig@gcc.gnu.org>
1786
1787         * frontend-passes.c (create_var):  Warn about creating an
1788         array temporary if requested.
1789
1790 2011-03-27  Thomas Koenig  <tkoenig@gcc.gnu.org>
1791
1792         PR fortran/47065
1793         * frontend-passes.c (optimize_trim): Also follow references, except
1794         when they are substring references or array references.
1795
1796 2011-03-27  Tobias Burnus  <burnus@net-b.de>
1797
1798         PR fortran/18918
1799         * gfortran.h (gfc_isym_id): Rename GFC_ISYM_NUMIMAGES to
1800         GFC_ISYM_NUM_IMAGES.
1801         (gfc_fcoarray): Add GFC_FCOARRAY_LIB.
1802         * intrinsic.c (add_functions): Update due to GFC_ISYM_NUM_IMAGES
1803         rename.
1804         * invoke.texi (-fcoarray=): Document "lib" argument.
1805         * iresolve.c (gfc_resolve_this_image): Fix THIS IMAGE().
1806         * libgfortran.h (libgfortran_stat_codes): Add comments.
1807         * options.c (gfc_handle_coarray_option): Add -fcoarray=lib.
1808         * simplify.c (gfc_simplify_num_images, gfc_simplify_this_image):
1809         Handle GFC_FCOARRAY_LIB.
1810         * trans.h (gfc_init_coarray_decl): New prototype.
1811         (gfor_fndecl_caf_init, gfor_fndecl_caf_finalize,
1812         gfor_fndecl_caf_critical, gfor_fndecl_caf_end_critical,
1813         gfor_fndecl_caf_sync_all, gfor_fndecl_caf_sync_images,
1814         gfor_fndecl_caf_error_stop, gfor_fndecl_caf_error_stop_str,
1815         gfort_gvar_caf_num_images, gfort_gvar_caf_this_image):
1816         New global variables.
1817         * trans-decl.c: Declare several CAF functions (cf. above).
1818         (gfc_build_builtin_function_decls): Initialize those.
1819         (gfc_init_coarray_decl): New function.
1820         (create_main_function): Call CAF init/finalize functions.
1821         * trans-intrinsic.c (trans_this_image, trans_num_images): New.
1822         (gfc_conv_intrinsic_function): Call those.
1823         * trans-stmt.c (gfc_trans_stop, gfc_trans_sync, gfc_trans_critical):
1824         Add code for GFC_FCOARRAY_LIB.
1825
1826 2011-03-26  Janus Weil  <janus@gcc.gnu.org>
1827
1828         PR fortran/48291
1829         * class.c (get_unique_hashed_string): Adjust maximum allowable length
1830         for unique type string.
1831
1832 2011-03-25  Kai Tietz  <ktietz@redhat.com>
1833
1834         * scanner.c (preprocessor_line): Use filename_cmp
1835         instead of strcmp.
1836
1837 2011-03-25  Tobias Burnus  <burnus@net-b.de>
1838
1839         PR fortran/48174
1840         PR fortran/45304
1841         * trans-types.c (gfc_get_function_type): Don't use varargs if the
1842         procedure is known to have no arguments.
1843
1844 2011-03-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
1845
1846         PR fortran/22572
1847         * gfortran.h (gfc_option_t) : Add
1848         flag_aggressive_function_elimination.
1849         (gfc_dep_compare_functions):  Add prototype.
1850         * lang.opt: Add faggressive-function-elimination.
1851         * invoke.texi: Document -faggressive-function-elimination.
1852         * frontend_passes (expr_array):  New static variable.
1853         (expr_size):  Likewise.
1854         (expr_count):  Likewise.
1855         (current_code):  Likewise.
1856         (current_ns):  Likewise.
1857         (gfc_run_passes):  Allocate and free space for expressions.
1858         (cfe_register_funcs):  New function.
1859         (create_var):  New function.
1860         (cfc_expr_0):  New function.
1861         (cfe_code):  New function.
1862         (optimize_namespace):  Invoke gfc_code_walker with cfe_code
1863         and cfe_expr_0.
1864         * dependency.c (gfc_dep_compare_functions):  New function.
1865         (gfc_dep_compare_expr):  Use it.
1866         * options.c (gfc_init_options):  Handle
1867         flag_aggressive_function_elimination.
1868         (gfc_handle_option):  Likewise.
1869
1870 2011-03-15  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1871
1872         * arith.c (arith_power): Plug memory leak.
1873
1874 2011-03-12  Janus Weil  <janus@gcc.gnu.org>
1875
1876         PR fortran/48059
1877         * trans-expr.c (gfc_apply_interface_mapping_to_expr): Replace base type
1878         for polymorphic arguments.
1879
1880 2011-03-12  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1881
1882         PR fortran/48054
1883         * intrinsic.texi: Clarify doc of logarithm functions.
1884
1885 2011-03-12  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1886
1887         PR fortran/47552
1888         * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Fix type of
1889         the string length variable.
1890
1891 2011-03-11  Janus Weil  <janus@gcc.gnu.org>
1892
1893         PR fortran/47768
1894         * module.c (ab_attribute,attr_bits): Add AB_PROC_POINTER_COMP.
1895         (mio_symbol_attribute): Handle attribute 'proc_pointer_comp'.
1896
1897 2011-03-06  Paul Thomas  <pault@gcc.gnu.org>
1898             Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1899
1900         PR fortran/47850
1901         * expr.c (gfc_is_constant_expr): Only use gfc_constant_ac if
1902         the expression has an iterator.  Otherwise, iterate through the
1903         array, checking for constant expressions for each element.
1904
1905 2011-03-04  Janne Blomqvist  <jb@gcc.gnu.org>
1906
1907         PR libfortran/47802
1908         * intrinsic.texi: Update CTIME and FDATE documentation.
1909
1910 2011-03-03  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
1911
1912         * invoke.texi (Option Summary, Fortran Dialect Options)
1913         (Preprocessing Options, Runtime Options, Code Gen Options):
1914         Fix vertical list spacing by using @itemx for additinoal
1915         items, empty line before @table.  Fix typos.
1916
1917 2011-02-28  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1918
1919         PR fortran/47894
1920         * intrinsic.texi: Fix doc of the VERIFY intrinsic.
1921
1922 2011-02-26  Tobias Burnus  <burnus@net-b.de>
1923
1924         PR fortran/47846
1925         * trans-stmt.c (gfc_trans_allocate): Fix allocation with
1926         type-spec of deferred-length strings.
1927
1928 2011-02-26  Tobias Burnus  <burnus@net-b.de>
1929
1930         PR fortran/47886
1931         * openmp.c (gfc_resolve_omp_directive): Resolve if()
1932         condition of OpenMP's task.
1933
1934 2011-02-26  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1935
1936         PR fortran/47894
1937         * intrinsic.texi: Fix doc of the VERIFY intrinsic.
1938
1939 2011-02-24  Tobias Burnus  <burnus@net-b.de>
1940
1941         PR fortran/47872
1942         * intrinsic.texi (ALLOCATED, ATAN, BESSEL_JN, BESSEL_YN): Add
1943         multitable for linebreak between different syntax variants.
1944
1945 2011-02-24  Richard Guenther  <rguenther@suse.de>
1946
1947         PR fortran/47839
1948         * f95-lang.c (pushdecl): For externs in non-global scope push
1949         a copy of the decl into the BLOCK.
1950
1951 2011-02-23  Mikael Morin  <mikael@gcc.gnu.org>
1952
1953         PR fortran/40850
1954         * trans.c (gfc_prepend_expr_to_block): New function.
1955         * trans.h (gfc_prepend_expr_to_block): Declare.
1956         * trans-array.c (gfc_conv_array_parameter): Replace
1957         gfc_add_expr_to_block with gfc_prepend_expr_to_block.
1958
1959 2011-02-22  Paul Thomas  <pault@gcc.gnu.org>
1960
1961         PR fortran/45743
1962         * trans-decl.c (gfc_get_extern_function_decl): Don't use the
1963         gsymbol backend_decl if the procedure has a formal argument
1964         that is a procedure.
1965
1966 2011-02-22  Tobias Burnus  <burnus@net-b.de>
1967
1968         PR fortran/41359
1969         * trans-stmt.c (gfc_trans_if_1): Use correct line for
1970         expressions in the if condition.
1971
1972 2011-02-20  Tobias Burnus  <burnus@net-b.de>
1973
1974         PR fortran/47797
1975         * trans-decl.c (gfc_trans_deferred_vars): Use gfc_set_backend_locus and
1976         gfc_restore_backend_locus to have better debug locations.
1977         * trans-array.c (gfc_trans_deferred_array): Ditto.
1978
1979 2011-02-20  Paul Thomas  <pault@gcc.gnu.org>
1980
1981         PR fortran/45077
1982         PR fortran/44945
1983         * trans-types.c (gfc_get_derived_type): Remove code that looks
1984         for decls in gsym and add call to gfc_get_module_backend_decl.
1985         * trans.h : Add prototype for gfc_get_module_backend_decl.
1986         * trans-decl.c (gfc_get_module_backend_decl): New function.
1987         (gfc_get_symbol_decl): Call it.
1988
1989 2011-02-19  Paul Thomas  <pault@gcc.gnu.org>
1990
1991         PR fortran/47348
1992         * trans-array.c (get_array_ctor_all_strlen): Move up in file.
1993         (get_array_ctor_var_strlen): Add block dummy and add call to
1994         get_array_ctor_all_strlen instead of giving up on substrings.
1995         Call gcc_unreachable for default case.
1996         (get_array_ctor_strlen): Add extra argument to in call to
1997         get_array_ctor_var_strlen.
1998
1999 2011-02-18  Janus Weil  <janus@gcc.gnu.org>
2000
2001         PR fortran/47789
2002         * primary.c (gfc_match_structure_constructor): Handle empty parent
2003         types.
2004
2005 2011-02-18  Tobias Burnus
2006
2007         PR fortran/47775
2008         * trans-expr.c (arrayfunc_assign_needs_temporary): Use
2009         esym to check whether the specific procedure returns an
2010         allocatable or pointer.
2011
2012 2011-02-18  Michael Matz  <matz@suse.de>
2013
2014         PR fortran/45586
2015         * gfortran.h (struct gfc_component): Add norestrict_decl member.
2016         * trans.h (struct lang_type): Add nonrestricted_type member.
2017         * trans-expr.c (gfc_conv_component_ref): Search fields with correct
2018         parent type.
2019         * trans-types.c (mirror_fields, gfc_nonrestricted_type): New.
2020         (gfc_sym_type): Use it.
2021
2022 2011-02-18  Janus Weil  <janus@gcc.gnu.org>
2023
2024         PR fortran/47768
2025         * resolve.c (resolve_transfer): Reject variables with procedure pointer
2026         components.
2027
2028 2011-02-18  Janus Weil  <janus@gcc.gnu.org>
2029
2030         PR fortran/47767
2031         * gfortran.h (gfc_check_access): Removed prototype.
2032         (gfc_check_symbol_access): Added prototype.
2033         * module.c (gfc_check_access): Renamed to 'check_access', made static.
2034         (gfc_check_symbol_access): New function, basically a shortcut for
2035         'check_access'.
2036         (write_dt_extensions,write_symbol0,write_generic,write_symtree): Use
2037         'gfc_check_symbol_access'.
2038         (write_operator,write_module): Renamed 'gfc_check_access'.
2039         * resolve.c (resolve_fl_procedure,resolve_fl_derived,
2040         resolve_fl_namelist,resolve_symbol,resolve_fntype): Use
2041         'gfc_check_symbol_access'.
2042
2043 2011-02-16  Janus Weil  <janus@gcc.gnu.org>
2044
2045         PR fortran/47745
2046         * class.c (gfc_build_class_symbol): Set 'class_ok' attribute.
2047         * decl.c (build_sym,attr_decl1): Move setting of 'class_ok' into
2048         'gfc_build_class_symbol'.
2049         (gfc_match_decl_type_spec): Reject unlimited polymorphism.
2050         * interface.c (matching_typebound_op): Check for 'class_ok' attribute.
2051         * match.c (select_type_set_tmp): Move setting of 'class_ok' into
2052         'gfc_build_class_symbol'.
2053         * primary.c (gfc_variable_attr): Check for 'class_ok' attribute.
2054
2055 2011-02-15  Steven G. Kargl  <kargl@gcc.gnu.org>
2056
2057         PR fortran/47633
2058         . simplify.c (gfc_simplify_compiler_version): Fix off-by-one issue.
2059
2060 2011-02-14  Janus Weil  <janus@gcc.gnu.org>
2061
2062         PR fortran/47730
2063         * parse.c (gfc_build_block_ns): Commit 'block@' symbol.
2064
2065 2011-02-14  Janus Weil  <janus@gcc.gnu.org>
2066
2067         PR fortran/47728
2068         * class.c (gfc_build_class_symbol): Give a fatal error on polymorphic
2069         arrays.
2070         * primary.c (gfc_match_varspec): Avoid ICE for invalid class
2071         declaration.
2072
2073 2011-02-14  Janus Weil  <janus@gcc.gnu.org>
2074
2075         PR fortran/47349
2076         * interface.c (get_expr_storage_size): Handle derived-type components.
2077
2078 2011-02-13  Tobias Burnus  <burnus@net-b.de>
2079
2080         PR fortran/47569
2081         * interface.c (compare_parameter): Avoid ICE with
2082         character components.
2083
2084 2011-02-12  Janus Weil  <janus@gcc.gnu.org>
2085
2086         * class.c (gfc_build_class_symbol): Reject polymorphic arrays.
2087         * decl.c (build_sym,build_struct,attr_decl1): Use return value of
2088         'gfc_build_class_symbol'.
2089
2090 2011-02-12  Michael Matz  <matz@suse.de>
2091             Janus Weil  <janus@gcc.gnu.org>
2092             Tobias Burnus  <burnus@net-b.de>
2093
2094         PR fortran/45586
2095         * trans-expr.c (conv_parent_component_references): Avoid unintendent
2096         skipping of parent compounds.
2097
2098 2011-02-11  Tobias Burnus  <burnus@net-b.de>
2099
2100         PR fortran/47550
2101         * resolve.c (resolve_formal_arglist): PURE with VALUE
2102         and no INTENT: Add -std= diagnostics.
2103
2104 2011-02-09  Janus Weil  <janus@gcc.gnu.org>
2105
2106         PR fortran/47352
2107         * resolve.c (resolve_procedure_interface): If interface has a result
2108         variable, copy the typespec and set result pointer to self.
2109
2110 2011-02-09  Janus Weil  <janus@gcc.gnu.org>
2111
2112         PR fortran/47463
2113         * resolve.c (resolve_typebound_subroutine): Remove erroneous line.
2114
2115 2011-02-09  Janus Weil  <janus@gcc.gnu.org>
2116
2117         PR fortran/47637
2118         * trans-decl.c (init_intent_out_dt): Handle CLASS arguments.
2119
2120 2011-02-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2121
2122         * io.c (match_io_element): Do not set dt if not inquire.
2123
2124 2011-02-08  Janus Weil  <janus@gcc.gnu.org>
2125
2126         PR fortran/45290
2127         * expr.c (gfc_check_assign_symbol): Reject pointers as pointer
2128         initialization target.
2129
2130 2011-02-07  Janne Blomqvist  <jb@gcc.gnu.org>
2131             Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
2132
2133         * gfortran.texi (Thread-safety): texinfo styling fixes.
2134         * intrinsic.texi: Likewise.
2135
2136 2011-02-06  Janne Blomqvist  <jb@gcc.gnu.org>
2137
2138         * gfortran.texi (Compiler Characteristics): Add reference to
2139         thread-safety section.
2140
2141 2011-02-06  Janne Blomqvist  <jb@gcc.gnu.org>
2142
2143         * gfortran.texi (Thread-safety): New section.
2144         * intrinsic.texi (EXECUTE_COMMAND_LINE): Mention thread-safety.
2145         (GETENV): Likewise.
2146         (GET_ENVIRONMENT_VARIABLE): Likewise.
2147         (SYSTEM): Likewise.
2148
2149 2011-02-06  Paul Thomas  <pault@gcc.gnu.org>
2150
2151         PR fortran/47592
2152         * trans-stmt.c (gfc_trans_allocate): For deferred character
2153         length allocations with SOURCE, store to the values and string
2154         length to avoid calculating twice.  Replace gfc_start_block
2155         with gfc_init_block to avoid unnecessary contexts and to keep
2156         declarations of temporaries where they should be. Tidy up the
2157         code a bit.
2158
2159 2011-02-05  Janne Blomqvist  <jb@gcc.gnu.org>
2160
2161         PR fortran/42434
2162         * intrinsic.texi (SYSTEM_CLOCK): Update documentation.
2163
2164 2011-02-02  Janus Weil  <janus@gcc.gnu.org>
2165             Paul Thomas  <pault@gcc.gnu.org>
2166
2167         PR fortran/47082
2168         * trans-expr.c (gfc_trans_class_init_assign): Add call to
2169         gfc_get_derived_type.
2170         * module.c (read_cleanup): Do not use unique_symtrees for vtabs
2171         or vtypes.
2172
2173 2011-02-02  Janus Weil  <janus@gcc.gnu.org>
2174
2175         PR fortran/47572
2176         * resolve.c (resolve_fl_variable): Handle polymorphic allocatables.
2177
2178 2011-02-01  Janus Weil  <janus@gcc.gnu.org>
2179
2180         PR fortran/47565
2181         * trans-expr.c (gfc_conv_structure): Handle constructors for procedure
2182         pointer components with allocatable result.
2183
2184 2011-01-31  Janus Weil  <janus@gcc.gnu.org>
2185
2186         PR fortran/47455
2187         * trans-expr.c (gfc_conv_procedure_call): Handle procedure pointers
2188         with pointer or allocatable result.
2189
2190 2011-01-31  Paul Thomas  <pault@gcc.gnu.org>
2191
2192         PR fortran/47519
2193         * trans-stmt.c (gfc_trans_allocate): Improve handling of
2194         deferred character lengths with SOURCE.
2195         * iresolve.c (gfc_resolve_repeat): Calculate character
2196         length from source length and ncopies.
2197         * dump-parse-tree.c (show_code_node): Show MOLD and SOURCE
2198         expressions for ALLOCATE.
2199
2200 2011-01-31  Janus Weil  <janus@gcc.gnu.org>
2201
2202         PR fortran/47463
2203         * resolve.c (resolve_typebound_subroutine): Bug fix for the case of
2204         an argument of a typebound assignment being a component.
2205
2206 2011-01-31  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
2207
2208         * gfortranspec.c (add_arg_libgfortran) [HAVE_LD_STATIC_DYNAMIC] Use
2209         LD_STATIC_OPTION, LD_DYNAMIC_OPTION.
2210
2211 2011-01-31  Tobias Burnus  <burnus@net-b.de>
2212
2213         PR fortran/47042
2214         * resolve.c (resolve_fl_procedure): Reject stmt functions
2215         with pointer/allocatable attribute.
2216
2217 2011-01-31  Tobias Burnus  <burnus@net-b.de>
2218
2219         PR fortran/47042
2220         * interface.c (gfc_procedure_use): Add explicit interface check for
2221         pointer/allocatable functions.
2222
2223 2011-01-30  Paul Thomas  <pault@gcc.gnu.org>
2224
2225         PR fortran/47523
2226         * trans-expr.c (gfc_trans_assignment_1): If the rhs is an op
2227         expr and is assigned to a deferred character length scalar,
2228         make sure that the function is called before reallocation,
2229         so that the length is available. Include procedure pointer
2230         and procedure pointer component rhs as well.
2231
2232         PR fortran/45170
2233         PR fortran/35810
2234         PR fortran/47350
2235         * gfortran.dg/allocatable_function_5.f90: New test not added by
2236         mistake on 2011-01-28.
2237
2238 2011-01-29  Tobias Burnus  <burnus@net-b.de>
2239
2240         PR fortran/47531
2241         * check.c (gfc_check_shape): Support kind argument in SHAPE.
2242         * intrinsic.c (add_functions): Ditto.
2243         * resolve.c (gfc_resolve_shape): Ditto.
2244         * simplify.c (gfc_simplify_shape): Ditto.
2245         * intrinsic.h (gfc_check_shape, gfc_resolve_shape,
2246         gfc_simplify_shape): Update prototypes.
2247         * intrinisc.text (SHAPE): Document kind argument.
2248
2249 2011-01-28  Tobias Burnus  <burnus@net-b.de>
2250
2251         PR fortran/47507
2252         * resolve.c (resolve_formal_arglist): Allow arguments with VALUE
2253         attribute also without INTENT.
2254
2255 2011-01-28  Tobias Burnus  <burnus@net-b.de>
2256
2257         * gfortran.texi (Fortran 2003 status): Mention support for
2258         nonconstant namelist variables.
2259
2260 2011-01-28  Paul Thomas  <pault@gcc.gnu.org>
2261             Tobias Burnus  <burnus@gcc.gnu.org>
2262
2263         PR fortran/45170
2264         PR fortran/35810
2265         PR fortran/47350
2266         * interface.c (compare_actual_formal): An allocatable or pointer
2267         deferred length actual is only allowed if the formal argument
2268         is also deferred length. Clean up whitespace.
2269         * trans-expr.c (gfc_conv_procedure_call): Pass string length for
2270         deferred character length formal arguments by reference. Do the
2271         same for function results.
2272         (gfc_trans_pointer_assignment): Do not do runtime check of lhs
2273         and rhs character lengths, if deferred length lhs.  In this case
2274         set the lhs character length to that of the rhs.
2275         (gfc_conv_string_parameter): Remove assert that string length is
2276         an integer type.
2277         (is_scalar_reallocatable_lhs): New function.
2278         (alloc_scalar_allocatable_for_assignment): New function.
2279         (gfc_trans_assignment_1): Call above new function. If the rhs is
2280         a deferred character length itself, makes ure that the function
2281         is called before reallocation, so that the length is available.
2282         (gfc_trans_asssignment): Remove error about assignment to
2283         deferred length character variables.
2284         * gfortran.texi : Update entry about (re)allocation on
2285         assignment.
2286         * trans-stmt.c (gfc_trans_allocate): Add code to handle deferred
2287         length character variables.
2288         * module.c (mio_typespec): Transfer deferred characteristic.
2289         * trans-types.c (gfc_get_function_type): New code to generate
2290         hidden typelist, so that those character lengths that are
2291         passed by reference get the right type.
2292         * resolve.c (resolve_contained_fntype): Supress error for
2293         deferred character length functions.
2294         (resolve_function, resolve_fl_procedure) The same.
2295         (check_symbols): Remove the error that support for
2296         entity with deferred type parameter is not yet implemented.
2297         (resolve_fl_derived): The same.
2298         match.c (alloc_opt_list): Allow MOLD for deferred length object.
2299         * trans-decl.c (gfc_get_symbol_decl): For deferred character
2300         length dummies, generate a local variable for string length.
2301         (create_function_arglist): Hidden length can be a pointer.
2302         (gfc_trans_deferred_vars): For deferred character length
2303         results and dummies, assign the string length to the local
2304         variable from the hidden argument on entry and the other way
2305         round on exit, as appropriate.
2306
2307 2011-01-27  Tobias Burnus  <burnus@net-b.de>
2308
2309         PR fortran/47474
2310         * trans-decl.c (gfc_generate_function_code): Fix init
2311         of allocatable result variable with allocatable components.
2312
2313 2011-01-27  Tobias Burnus  <burnus@net-b.de>
2314
2315         PR fortran/47472
2316         * options.c (gfc_handle_module_path_options): Save
2317         module path without trailing slash as include path.
2318
2319 2011-01-25  Tobias Burnus  <burnus@net-b.de>
2320
2321         PR fortran/47448
2322         * interface.c (gfc_check_operator_interface): Fix
2323         defined-assignment check.
2324
2325 2011-01-23  Tobias Burnus  <burnus@net-b.de>
2326
2327         PR fortran/47421
2328         * trans-decl.c (gfc_trans_deferred_vars): Do not nullify
2329         scalar allocatable dummy arguments.
2330
2331 2011-01-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
2332
2333         PR fortran/38536
2334         * resolve.c (gfc_iso_c_func_interface):  For C_LOC,
2335         check for array sections followed by component references
2336         which are illegal.  Also check for coindexed arguments.
2337
2338 2011-01-22  Tobias Burnus  <burnus@net-b.de>
2339
2340         PR fortran/47399
2341         * primary.c (gfc_match_varspec): Relax gcc_assert to allow for
2342         PARAMETER TBP.
2343
2344 2011-01-21  Tobias Burnus  <burnus@net-b.de>
2345
2346         PR fortran/47394
2347         * error.c (gfc_error_now, gfc_fatal_error, gfc_error_check):
2348         Use defined instead of magic number exit status codes.
2349         * scanner.c (include_line, gfc_new_file): Ditto.
2350
2351 2011-01-21  Tobias Burnus  <burnus@net-b.de>
2352
2353         PR fortran/47377
2354         * expr.c (gfc_check_pointer_assign): Reject expr data-targets
2355         without pointer attribute.
2356
2357 2011-01-18  Janus Weil  <janus@gcc.gnu.org>
2358
2359         PR fortran/47240
2360         * resolve.c (expression_rank): Fix rank of procedure poiner components.
2361         * trans-expr.c (gfc_conv_procedure_call): Take care of procedure
2362         pointer components as actual arguments.
2363
2364 2011-01-17  Jakub Jelinek  <jakub@redhat.com>
2365
2366         PR fortran/47331
2367         * gfortran.h (struct gfc_omp_saved_state): New type.
2368         (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New prototypes.
2369         * resolve.c (resolve_global_procedure): Call it around gfc_resolve
2370         call.
2371         * openmp.c (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New
2372         functions.
2373
2374 2011-01-17  Tobias Burnus  <burnus@net-b.de>
2375
2376         PR fortran/47327
2377         * invoke.texi (Options to request or suppress errors
2378         and warnings): Fix cross link.
2379
2380 2011-01-15  Tobias Burnus  <burnus@net-b.de>
2381
2382         * gfortran.texi: Update Fortran 2003 Status section.
2383
2384         PR fortran/47177
2385         * invoke.texi: Add missing "-E" to the -dM example.
2386
2387 2011-01-13  Tobias Burnus  <burnus@net-b.de>
2388
2389         PR fortran/47268
2390         * intrinsic.texi (get_command_argument, get_environment_variable):
2391         Mark arguments as optional in the Arguments section.
2392
2393 2011-01-13  Kai Tietz  <kai.tietz@onevision.com>
2394             Tobias Burnus  <burnus@net-b.de>
2395
2396         PR fortran/47260
2397         * trans-decl.c (gfc_get_extern_function_decl,
2398         build_function_decl): Set TREE_PUBLIC/TREE_EXTERNAL before
2399         calling decl_attributes.
2400
2401 2011-01-13  Tobias Burnus  <burnus@net-b.de>
2402             Mikael Morin  <mikael@gcc.gnu.org>
2403
2404         PR fortran/45848
2405         PR fortran/47204
2406         * gfortran.h (gfc_code): Move union ext's case_list into
2407         the struct block.
2408         * dump-parse-tree.c (show_code_node): Adapt by prefixing case_list
2409         by "block.".
2410         * frontend-passes.c (gfc_code_walker): Ditto.
2411         * match.c (gfc_match_goto, gfc_match_call, gfc_match_case,
2412         gfc_match_type_is, gfc_match_class_is): Ditto.
2413         * resolve.c (resolve_select, resolve_select_type): Ditto.
2414         * st.c (gfc_free_statement): Ditto.
2415         * trans-stmt.c (gfc_trans_integer_select, gfc_trans_logical_select,
2416         gfc_trans_character_select): Ditto.
2417         * parse.c (resolve_all_program_units): For error recovery, avoid
2418         segfault is proc_name is NULL.
2419
2420 2011-01-11  Paul Thomas  <pault@gcc.gnu.org>
2421
2422         PR fortran/47051
2423         * trans-array.c (gfc_alloc_allocatable_for_assignment): Change
2424         to be standard compliant by testing for shape rather than size
2425         before skipping reallocation. Improve comments.
2426
2427 2011-01-09  Janus Weil  <janus@gcc.gnu.org>
2428
2429         PR fortran/47224
2430         * resolve.c (resolve_actual_arglist): Remove unneeded and buggy piece
2431         of code.
2432
2433 2011-01-09  Thomas Koenig  <tkoenig@gcc.gnu.org>
2434
2435         PR fortran/38536
2436         * resolve.c (is_scalar_expr_ptr):  For a substring reference,
2437         use gfc_dep_compare_expr to compare start and end expession.
2438         Add FIXME for using gfc_deb_compare_expr elsewhere.
2439
2440 2011-01-09  Janus Weil  <janus@gcc.gnu.org>
2441
2442         PR fortran/46313
2443         * class.c (get_unique_type_string): Make type name start with upper
2444         case letter.
2445
2446 2011-01-08  Thomas Koenig  <tkoenig@gcc.gnu.org>
2447
2448         PR fortran/46405
2449         * invoke.texi:  Mention -ffree-line-length-none and
2450         -ffixed-line-length-none for preprocessing.
2451
2452 2011-01-08  Paul Thomas  <pault@gcc.gnu.org>
2453
2454         PR fortran/46896
2455         * trans-expr.c (gfc_conv_procedure_call): With a non-copying
2456         procedure argument (eg TRANSPOSE) use a temporary if there is
2457         any chance of aliasing due to host or use association.
2458         (arrayfunc_assign_needs_temporary): Correct logic for function
2459         results and do not use a temporary for implicitly PURE
2460         variables.  Use a temporary for Cray pointees.
2461         * symbol.c (gfc_add_save): Explicit SAVE not compatible with
2462         implicit pureness of containing procedure.
2463         * decl.c (match_old_style_init, gfc_match_data): Where decl
2464         would fail in PURE procedure, set implicit_pure to zero.
2465         * gfortran.h : Add implicit_pure to structure symbol_attr and
2466         add prototype for function gfc_implicit_pure.
2467         * expr.c (gfc_check_pointer_assign, gfc_check_vardef_context):
2468         Where decl would fail in PURE procedure, reset implicit_pure.
2469         * io.c (match_vtag, gfc_match_open, gfc_match_close,
2470         gfc_match_print, gfc_match_inquire, gfc_match_wait): The same.
2471         * match.c (gfc_match_critical, gfc_match_stopcode,
2472         sync_statement, gfc_match_allocate, gfc_match_deallocate): The
2473         same.
2474         * parse.c (decode_omp_directive): The same.
2475         (parse_contained): If not PURE, set implicit pure attribute.
2476         * resolve.c (resolve_formal_arglist, resolve_structure_cons,
2477         resolve_function, resolve_ordinary_assign) : The same.
2478         (gfc_implicit_pure): New function.
2479         * module.c (mio_symbol_attribute): Introduce AB_IMPLICIT_PURE
2480         to ab_attribute enum and use it in this function.
2481
2482 2011-01-08  Thomas Koenig  <tkoenig@gcc.gnu.org>
2483
2484         PR fortran/45777
2485         * symbol.c (gfc_symbols_could_alias):  Strip gfc_ prefix,
2486         make static and move in front of its only caller, to ...
2487         * trans-array.c (symbols_could_alias): ... here.
2488         Pass information about pointer and target status as
2489         arguments.  Allocatable arrays don't alias anything
2490         unless they have the POINTER attribute.
2491         (gfc_could_be_alias):  Keep track of pointer and target
2492         status when following references.  Also check if typespecs
2493         of components match those of other components or symbols.
2494
2495 2011-01-07  Tobias Burnus  <burnus@net-b.de>
2496
2497         PR fortran/41580
2498         * class.c (gfc_build_class_symbol): Mark __vtab as attr.vtab.
2499         * intrinsic.c (add_functions): Use simplify functions for
2500         EXTENDS_TYPE_OF and SAME_TYPE_AS.
2501         * intrinsic.h (gfc_simplify_extends_type_of,
2502         gfc_simplify_same_type_as): New prototypes.
2503         * simplify.c (is_last_ref_vtab, gfc_simplify_extends_type_of,
2504         gfc_simplify_same_type_as): New functions.
2505
2506 2011-01-07  Janus Weil  <janus@gcc.gnu.org>
2507
2508         PR fortran/47189
2509         PR fortran/47194
2510         * gfortran.h (gfc_lval_expr_from_sym): Moved prototype.
2511         * class.c (gfc_class_null_initializer): Initialize _vptr to declared
2512         type.
2513         * expr.c (gfc_lval_expr_from_sym): Moved here from symbol.c.
2514         * resolve.c (resolve_deallocate_expr): _data component will be added
2515         at translation stage.
2516         * symbol.c (gfc_lval_expr_from_sym): Moved to expr.c.
2517         * trans-stmt.c (gfc_trans_deallocate): Reset _vptr to declared type.
2518
2519 2011-01-06  Daniel Franke  <franke.daniel@gmail.com>
2520
2521         PR fortran/33117
2522         PR fortran/46478
2523         * parse.c (parse_interface): Remove check for procedure types.
2524         * interface.c (check_interface0): Verify that procedures are
2525         either all SUBROUTINEs or all FUNCTIONs.
2526
2527 2011-01-05  Janus Weil  <janus@gcc.gnu.org>
2528
2529         PR fortran/47180
2530         * trans-expr.c (gfc_trans_class_assign): Bugfix for r168524 (make sure
2531         'vtab' is initialized).
2532
2533 2011-01-05  Janus Weil  <janus@gcc.gnu.org>
2534
2535         PR fortran/47180
2536         * trans-expr.c (gfc_trans_class_assign): For a polymorphic NULL pointer
2537         assignment, set the _vptr component to the declared type.
2538
2539 2011-01-05  Thomas Koenig  <tkoenig@gcc.gnu.org>
2540
2541         PR fortran/46017
2542         * resolve.c (resolve_allocate_deallocate): Follow references to
2543         check for duplicate occurence of allocation/deallocation objects.
2544
2545 2011-01-05  Janus Weil  <janus@gcc.gnu.org>
2546
2547         PR fortran/47024
2548         * trans-decl.c (gfc_trans_deferred_vars): Initialize the _vpr component
2549         of polymorphic allocatables according to their declared type.
2550
2551 2011-01-04  Janus Weil  <janus@gcc.gnu.org>
2552
2553         PR fortran/46448
2554         * class.c (gfc_find_derived_vtab): Set the module field for the copying
2555         routine to make sure it receives module name mangling.
2556
2557 2011-01-03  Jakub Jelinek  <jakub@redhat.com>
2558
2559         * gfortranspec.c (lang_specific_driver): Update copyright notice
2560         dates.
2561
2562 2011-01-03  Janus Weil  <janus@gcc.gnu.org>
2563
2564         * intrinsic.texi (LEADZ): Fix example.
2565
2566 2011-01-02  Janus Weil  <janus@gcc.gnu.org>
2567
2568         PR fortran/46408
2569         * class.c (gfc_find_derived_vtab): Use EXEC_INIT_ASSIGN for __copy_
2570         routine.
2571
2572 \f
2573 Copyright (C) 2011 Free Software Foundation, Inc.
2574
2575 Copying and distribution of this file, with or without modification,
2576 are permitted in any medium without royalty provided the copyright
2577 notice and this notice are preserved.