OSDN Git Service

33deec4d8ac97866099cb06f02f92f72680902c1
[pf3gnuchains/gcc-fork.git] / gcc / fortran / ChangeLog
1 2009-11-06  Steven G. Kargl  <kargl@gcc.gnu.org>
2
3         resolve.c (check_typebound_override): Remove duplicate "in" in error
4         message.
5
6 2009-11-05  Steven G. Kargl  <kargl@gcc.gnu.org>
7
8         PR fortran/41918
9         * fortran/trans-decl.c: Silence intent(out) warning for derived type
10         dummy arguments with default initialization.
11
12 2009-11-05  Janus Weil  <janus@gcc.gnu.org>
13
14         PR fortran/41556
15         * interface.c (matching_typebound_op,gfc_extend_assign): Handle CLASS
16         variables.
17
18 2009-11-05  Janus Weil  <janus@gcc.gnu.org>
19
20         PR fortran/41556
21         PR fortran/41873
22         * resolve.c (resolve_function,resolve_call): Prevent abstract interfaces
23         from being called, but allow deferred type-bound procedures with
24         abstract interface.
25
26 2009-11-04  Tobias Burnus <burnus@gcc.gnu.org>
27             Janus Weil  <janus@gcc.gnu.org>
28
29         PR fortran/41556
30         PR fortran/41937
31         * interface.c (gfc_check_operator_interface): Handle CLASS arguments.
32         * resolve.c (resolve_allocate_expr): Handle allocatable components of
33         CLASS variables.
34
35 2009-11-04  Richard Guenther  <rguenther@suse.de>
36
37         * options.c (gfc_post_options): Rely on common code processing
38         LTO options.  Only enable -fwhole-file here.
39
40 2009-11-03  Tobias Burnus  <burnus@net-b.de>
41
42         PR fortran/41907
43         * trans-expr.c (gfc_conv_procedure_call): Fix presence check
44         for optional arguments.
45
46 2009-11-01  Tobias Burnus  <burnus@net-b.de>
47
48         PR fortran/41872
49         * trans-decl.c (gfc_trans_deferred_vars): Do not nullify
50         autodeallocated allocatable scalars at the end of scope.
51         (gfc_generate_function_code): Fix indention.
52         * trans-expr.c (gfc_conv_procedure_call): For allocatable
53         scalars, fix calling by reference and autodeallocating
54         of intent out variables.
55
56 2009-11-01  Tobias Burnus  <burnus@net-b.de>
57
58         PR fortran/41850
59         * trans-expr.c (gfc_conv_procedure_call): Deallocate intent-out
60         variables only when present. Remove unneccessary present check.
61
62 2009-10-29  Tobias Burnus  <burnus@net-b.de>
63
64         PR fortran/41777
65         * trans-expr.c (gfc_conv_procedure_call,gfc_conv_expr_reference):
66         Use for generic EXPR_FUNCTION the attributes of the specific
67         function.
68
69 2009-10-29  Janne Blomqvist  <jb@gcc.gnu.org>
70
71         PR fortran/41860
72         * resolve.c (apply_default_init_local): Treat -fno-automatic as if
73         var was saved.
74
75 2009-10-28  Rafael Avila de Espindola  <espindola@google.com>
76
77         * trans-common.c (create_common): Set TREE_PUBLIC to false on
78         fake variables.
79
80 2009-10-26  Janus Weil  <janus@gcc.gnu.org>
81
82         PR fortran/41714
83         * trans.c (gfc_trans_code): Remove call to
84         'tree_annotate_all_with_location'. Location should already be set.
85         * trans-openmp.c (gfc_trans_omp_workshare): Ditto.
86         * trans-stmt.c (gfc_trans_allocate): Do correct data initialization for
87         CLASS variables with SOURCE tag, plus some cleanup.
88
89 2009-10-24  Janus Weil  <janus@gcc.gnu.org>
90             Paul Thomas  <pault@gcc.gnu.org>
91
92         PR fortran/41784
93         * module.c (load_derived_extensions): Skip symbols which are not being
94         loaded.
95
96 2009-10-24  Paul Thomas  <pault@gcc.gnu.org>
97
98         PR fortran/41772
99         * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Stop'extent'
100         from going negative.
101
102 2009-10-23  Janus Weil  <janus@gcc.gnu.org>
103
104         PR fortran/41800
105         * trans-expr.c (gfc_trans_scalar_assign): Handle CLASS variables.
106
107 2009-10-23  Janus Weil  <janus@gcc.gnu.org>
108
109         PR fortran/41758
110         * match.c (conformable_arrays): Move to resolve.c.
111         (gfc_match_allocate): Don't resolve SOURCE expr yet, and move some
112         checks to resolve_allocate_expr.
113         * resolve.c (conformable_arrays): Moved here from match.c.
114         (resolve_allocate_expr): Moved some checks here from gfc_match_allocate.
115         (resolve_code): Resolve SOURCE tag for ALLOCATE expressions.
116
117 2009-10-22  Janus Weil  <janus@gcc.gnu.org>
118
119         PR fortran/41781
120         * resolve.c (resolve_codes): Don't clear 'cs_base' for BLOCK constructs,
121         to make sure labels are treated correctly.
122         * symbol.c (gfc_get_st_label): Create labels in the right namespace.
123         For BLOCK constructs go into the parent namespace.
124
125 2009-10-21  Janus Weil  <janus@gcc.gnu.org>
126
127         PR fortran/41706
128         PR fortran/41766
129         * match.c (select_type_set_tmp): Set flavor for temporary.
130         * resolve.c (resolve_class_typebound_call): Correctly resolve actual
131         arguments.
132
133 2009-10-20  Paul Thomas  <pault@gcc.gnu.org>
134
135         PR fortran/41706
136         * resolve.c (resolve_arg_exprs): New function.
137         (resolve_class_compcall): Call the above.
138         (resolve_class_typebound_call): The same.
139
140 2009-10-19  Janus Weil  <janus@gcc.gnu.org>
141
142         PR fortran/41586
143         * parse.c (parse_derived): Correctly set 'alloc_comp' and 'pointer_comp'
144         for CLASS variables.
145         * trans-array.c (structure_alloc_comps): Handle deallocation and
146         nullification of allocatable scalar components.
147         * trans-decl.c (gfc_get_symbol_decl): Remember allocatable scalars for
148         automatic deallocation.
149         (gfc_trans_deferred_vars): Automatically deallocate allocatable scalars.
150
151 2009-10-19  Tobias Burnus  <burnus@net-b.de>
152             Steven G. Kargl  <kargl@gcc.gnu.org>
153
154         PR fortran/41755
155         * symbol.c (gfc_undo_symbols): Add NULL check.
156         * match.c (gfc_match_equivalence): Add check for
157         missing comma.
158
159 2009-10-19  Richard Guenther  <rguenther@suse.de>
160
161         PR fortran/41494
162         * trans-expr.c (gfc_trans_scalar_assign): Do not call
163         gfc_evaluate_now.
164
165 2009-10-17  Janus Weil  <janus@gcc.gnu.org>
166             Paul Thomas  <pault@gcc.gnu.org>
167
168         PR fortran/41608
169         * decl.c (gfc_match_data_decl): Add BT_CLASS for undefined type
170         and empty type errors.
171         * parse.c (gfc_build_block_ns): Only set recursive if parent ns
172         has a proc_name.
173
174         PR fortran/41629
175         PR fortran/41618
176         PR fortran/41587
177         * gfortran.h : Add class_ok bitfield to symbol_attr.
178         * decl.c (build_sym): Set attr.class_ok if dummy, pointer or
179         allocatable.
180         (build_struct): Use gfc_try 't' to carry errors past the call
181         to encapsulate_class_symbol.
182         (attr_decl1): For a CLASS object, apply the new attribute to
183         the data component.
184         * match.c (gfc_match_select_type): Set attr.class_ok for an
185         assigned selector.
186         * resolve.c (resolve_fl_variable_derived): Check a CLASS object
187         is dummy, pointer or allocatable by testing the class_ok and
188         the use_assoc attribute.
189
190 2009-10-16  Janus Weil  <janus@gcc.gnu.org>
191
192         PR fortran/41719
193         * resolve.c (resolve_ordinary_assign): Reject intrinsic assignments
194         to polymorphic variables.
195
196 2009-10-16  Paul Thomas  <pault@gcc.gnu.org>
197
198         PR fortran/41648
199         PR fortran/41656
200         * trans-expr.c (select_class_proc): Convert the expression for the
201         vindex, carried on the first member of the esym list.
202         * gfortran.h : Add the vindex field to the esym_list structure.
203         and eliminate the class_object field.
204         * resolve.c (check_class_members): Remove the setting of the
205         class_object field.
206         (vindex_expr): New function.
207         (get_class_from_expr): New function.
208         (resolve_class_compcall): Call the above to find the ultimate
209         class or derived component.  If derived, do not generate the
210         esym list.  Add and expression for the vindex to the esym list
211         by calling the above.
212         (resolve_class_typebound_call): The same.
213
214 2009-10-15  Steven G. Kargl  <kargl@gcc.gnu.org>
215
216         PR fortran/41712
217         * intrinsic.texi: Explicitly state that ETIME and DTIME take
218         REAL(4) arguments.  Fix nearby typographically errors where 
219         /leq was used instead of \leq.
220
221 2009-10-13  Janus Weil  <janus@gcc.gnu.org>
222
223         PR fortran/41581
224         * decl.c (encapsulate_class_symbol): Add new component '$size'.
225         * resolve.c (resolve_allocate_expr): Move CLASS handling to
226         gfc_trans_allocate.
227         (resolve_class_assign): Replaced by gfc_trans_class_assign.
228         (resolve_code): Remove calls to resolve_class_assign.
229         * trans.c (gfc_trans_code): Use new function gfc_trans_class_assign.
230         * trans-expr.c (get_proc_ptr_comp): Fix a memory leak.
231         (gfc_conv_procedure_call): For CLASS dummies, set the
232         $size component.
233         (gfc_trans_class_assign): New function, replacing resolve_class_assign.
234         * trans-stmt.h (gfc_trans_class_assign): New prototype.
235         * trans-stmt.c (gfc_trans_allocate): Use correct size when allocating
236         CLASS variables. Do proper initialization. Move some code here from
237         resolve_allocate_expr.
238
239 2009-10-11 Jerry DeLisle  <jvdelisle@gcc.gnu.org>
240
241         PR fortran/38439
242         * io.c (check_format): Fix locus for error messages and fix a comment.
243
244 2009-10-11  Paul Thomas  <pault@gcc.gnu.org>
245
246         PR fortran/41583
247         * decl.c (hash_value): New function.
248         (gfc_match_derived_decl): Call it.
249
250 2009-10-09  Janus Weil  <janus@gcc.gnu.org>
251
252         PR fortran/41585
253         * decl.c (build_struct): Bugfix for CLASS components.
254
255 2009-10-09  Tobias Burnus  <burnus@net-b.de>
256
257         PR fortran/41582
258         * decl.c (encapsulate_class_symbol): Save attr.abstract.
259         * resolve.c (resolve_allocate_expr): Reject class allocate
260         without typespec or source=.
261         * trans-stmt.c (gfc_trans_allocate): Change gfc_warning
262         into gfc_error for "not yet implemented".
263
264 2009-10-09  Janus Weil  <janus@gcc.gnu.org>
265
266         PR fortran/41579
267         * gfortran.h (gfc_select_type_stack): New struct, to be used as a stack
268         for SELECT TYPE statements.
269         (select_type_stack): New global variable.
270         (type_selector,select_type_tmp): Removed.
271         * match.c (type_selector,type_selector): Removed.
272         (select_type_stack): New variable, serving as a stack for
273         SELECT TYPE statements.
274         (select_type_push,select_type_set_tmp): New functions.
275         (gfc_match_select_type): Call select_type_push.
276         (gfc_match_type_is): Call select_type_set_tmp.
277         * parse.c (select_type_pop): New function.
278         (parse_select_type_block): Call select_type_pop.
279         * symbol.c (select_type_insert_tmp): New function.
280         (gfc_find_sym_tree): Call select_type_insert_tmp.
281
282 2009-10-07  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
283
284         * arith.c (arith_power): Use mpc_pow_z.
285         * gfortran.h (HAVE_mpc_pow_z): Define.
286
287 2009-10-07  Daniel Kraft  <d@domob.eu>
288
289         PR fortran/41615
290         * resolve.c (resolve_contained_fntype): Clarify error message for
291         invalid assumed-length character result on module procedures.
292
293 2009-10-07  Janus Weil  <janus@gcc.gnu.org>
294
295         * expr.c (gfc_check_pointer_assign): Do the correct type checking when
296         CLASS variables are involved.
297         * match.c (gfc_match_select_type): Parse associate-name in SELECT TYPE
298         statements, and set up a local namespace for the SELECT TYPE block.
299         * parse.h (gfc_build_block_ns): New prototype.
300         * parse.c (parse_select_type_block): Return from local namespace to its
301         parent after SELECT TYPE block.
302         (gfc_build_block_ns): New function for setting up the local namespace
303         for a BLOCK construct.
304         (parse_block_construct): Use gfc_build_block_ns.
305         * resolve.c (resolve_select_type): Insert assignment for the selector
306         variable, in case an associate-name is given, and put the SELECT TYPE
307         statement inside a BLOCK.
308         (resolve_code): Call resolve_class_assign after checking the assignment.
309         * symbol.c (gfc_find_sym_tree): Moved some code here from
310         gfc_get_ha_sym_tree.
311         (gfc_get_ha_sym_tree): Moved some code to gfc_find_sym_tree.
312
313 2009-10-07  Paul Thomas <pault@gcc.gnu.org>
314
315         PR fortran/41613
316         * resolve.c (check_class_members): Reset compcall.assign.
317
318 2009-10-05  Paul Thomas  <pault@gcc.gnu.org>
319
320         * trans-expr.c (select_class_proc): New function.
321         (conv_function_val): Deal with class methods and call above.
322         * symbol.c (gfc_type_compatible): Treat case where both ts1 and
323         ts2 are BT_CLASS.
324         gfortran.h : Add structure gfc_class_esym_list and include in
325         the structure gfc_expr.
326         * module.c (load_derived_extensions): New function.
327         (read_module): Call above.
328         (write_dt_extensions): New function.
329         (write_derived_extensions): New function.
330         (write_module): Use the above.
331         * resolve.c (resolve_typebound_call): Add a function expression
332         for class methods.  This carries the chain of symbols for the
333         dynamic dispatch in select_class_proc.
334         (resolve_compcall): Add second, boolean argument to indicate if
335         a function is being handled.
336         (check_members): New function.
337         (check_class_members): New function.
338         (resolve_class_compcall): New function.
339         (resolve_class_typebound_call): New function.
340         (gfc_resolve_expr): Call above for component calls.. 
341
342 2009-10-05  Daniel Kraft  <d@domob.eu>
343
344         PR fortran/41403
345         * trans-stmt.c (gfc_trans_goto): Ignore statement list on assigned goto
346         if it is present.
347
348 2009-10-03  Richard Guenther  <rguenther@suse.de>
349
350         * options.c (gfc_post_options): Handle -flto and -fwhopr.
351
352 2009-10-02  Tobias Burnus  <burnus@net-b.de>
353
354         PR fortran/41479
355         * trans-decl.c (gfc_init_default_dt): Check for presence of
356         the argument only if it is optional or in entry master.
357         (init_intent_out_dt): Ditto; call gfc_init_default_dt
358         for all derived types with initializers.
359
360 2009-10-01  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
361
362         PR fortran/33197
363         * gfortran.h (HAVE_mpc_arc): Define.
364         * simplify.c (gfc_simplify_acos): Handle complex acos.
365         (gfc_simplify_acosh): Likewise for acosh.
366         (gfc_simplify_asin): Likewise for asin.
367         (gfc_simplify_asinh): Likewise for asinh.
368         (gfc_simplify_atan): Likewise for atan.
369         (gfc_simplify_atanh): Likewise for atanh.
370
371 2009-10-01  Tobias Burnus  <burnus@net-b.de>
372
373         PR fortran/41515
374         * decl.c (do_parm): Call add_init_expr_to_sym.
375
376 2009-09-30  Dennis Wassel  <dennis.wassel@gmail.com>
377
378         * gcc/fortran/trans-array.c (gfc_trans_array_bound_check): Improved
379         bounds checking error messages. (gfc_conv_array_ref): Likewise.
380         (gfc_conv_ss_startstride): Likewise.
381
382 2009-09-30  Janus Weil  <janus@gcc.gnu.org>
383
384         * resolve.c (check_typebound_baseobject): Don't check for
385         abstract types for CLASS.
386         (resolve_class_assign): Adapt for RHS being a CLASS.
387         * trans-intrinsic.c (gfc_conv_associated): Add component ref
388         if expr is a CLASS.
389
390 2009-09-30  Janus Weil  <janus@gcc.gnu.org>
391
392         * check.c (gfc_check_same_type_as): New function for checking
393         SAME_TYPE_AS and EXTENDS_TYPE_OF.
394         * decl.c (encapsulate_class_symbol): Set ABSTRACT attribute for class
395         container, if the contained type has it. Add an initializer for the
396         class container.
397         (add_init_expr_to_sym): Handle BT_CLASS.
398         (vindex_counter): New counter for setting vindices.
399         (gfc_match_derived_decl): Set vindex for all derived types, not only
400         those which are being extended.
401         * expr.c (gfc_check_assign_symbol): Handle NULL initialization of class
402         pointers.
403         * gfortran.h (gfc_isym_id): New values GFC_ISYM_SAME_TYPE_AS and
404         GFC_ISYM_EXTENDS_TYPE_OF.
405         (gfc_type_is_extensible): New prototype.
406         * intrinsic.h (gfc_check_same_type_as): New prototype.
407         * intrinsic.c (add_functions): Add SAME_TYPE_AS and EXTENDS_TYPE_OF.
408         * primary.c (gfc_expr_attr): Handle CLASS-valued functions.
409         * resolve.c (resolve_structure_cons): Handle BT_CLASS.
410         (type_is_extensible): Make non-static and rename to
411         'gfc_type_is_extensible.
412         (resolve_select_type): Renamed type_is_extensible.
413         (resolve_class_assign): Handle NULL pointers.
414         (resolve_fl_variable_derived): Renamed type_is_extensible.
415         (resolve_fl_derived): Ditto.
416         * trans-expr.c (gfc_trans_subcomponent_assign): Handle NULL
417         initialization of class pointer components.
418         (gfc_conv_structure): Handle BT_CLASS.
419         * trans-intrinsic.c (gfc_conv_same_type_as,gfc_conv_extends_type_of):
420         New functions.
421         (gfc_conv_intrinsic_function): Handle SAME_TYPE_AS and EXTENDS_TYPE_OF.
422
423 2009-09-30  Janus Weil  <janus@gcc.gnu.org>
424
425         * gfortran.h (type_selector, select_type_tmp): New global variables.
426         * match.c (type_selector, select_type_tmp): New global variables,
427         used for SELECT TYPE statements.
428         (gfc_match_select_type): Better error handling. Remember selector.
429         (gfc_match_type_is): Create temporary variable.
430         * module.c (ab_attribute): New value 'AB_IS_CLASS'.
431         (attr_bits): New string.
432         (mio_symbol_attribute): Handle 'is_class'.
433         * resolve.c (resolve_select_type): Insert pointer assignment statement,
434         to assign temporary to selector.
435         * symbol.c (gfc_get_ha_sym_tree): Replace selector by a temporary
436         in SELECT TYPE statements.
437
438 2009-09-30  Janus Weil  <janus@gcc.gnu.org>
439
440         * dump-parse-tree.c (show_code_node): Renamed 'alloc_list'.
441         * gfortran.h (gfc_code): Rename 'alloc_list'. Add member 'ts'.
442         (gfc_expr_to_initialize): New prototype.
443         * match.c (alloc_opt_list): Correctly check type compatibility.
444         Renamed 'alloc_list'.
445         (dealloc_opt_list): Renamed 'alloc_list'.
446         * resolve.c (expr_to_initialize): Rename to 'gfc_expr_to_initialize'
447         and make it non-static.
448         (resolve_allocate_expr): Set vindex for CLASS variables correctly.
449         Move initialization code to gfc_trans_allocate. Renamed 'alloc_list'.
450         (resolve_allocate_deallocate): Renamed 'alloc_list'.
451         (check_class_pointer_assign): Rename to 'resolve_class_assign'. Change
452         argument type. Adjust to work with ordinary assignments.
453         (resolve_code): Call 'resolve_class_assign' for ordinary assignments.
454         Renamed 'check_class_pointer_assign'.
455         * st.c (gfc_free_statement): Renamed 'alloc_list'.
456         * trans-stmt.c (gfc_trans_allocate): Renamed 'alloc_list'. Handle
457         size determination and initialization of CLASS variables. Bugfix for
458         ALLOCATE statements with default initialization and SOURCE block.
459         (gfc_trans_deallocate): Renamed 'alloc_list'.
460
461 2009-09-30  Paul Thomas  <pault@gcc.gnu.org>
462
463         * trans-expr.c (gfc_conv_procedure_call): Convert a derived
464         type actual to a class object if the formal argument is a
465         class.
466
467 2009-09-30  Janus Weil  <janus@gcc.gnu.org>
468
469         PR fortran/40996
470         * decl.c (build_struct): Handle allocatable scalar components.
471         * expr.c (gfc_add_component_ref): Correctly set typespec of expression,
472         after inserting component reference.
473         * match.c (gfc_match_type_is,gfc_match_class_is): Make sure that no
474         variables are being used uninitialized.
475         * primary.c (gfc_match_varspec): Handle CLASS array components.
476         * resolve.c (resolve_select_type): Transform EXEC_SELECT_TYPE to
477         EXEC_SELECT.
478         * trans-array.c (structure_alloc_comps,gfc_trans_deferred_array):
479         Handle allocatable scalar components.
480         * trans-expr.c (gfc_conv_component_ref): Ditto.
481         * trans-types.c (gfc_get_derived_type): Ditto.
482
483 2009-09-30  Janus Weil  <janus@gcc.gnu.org>
484
485         * decl.c (encapsulate_class_symbol): Modify names of class container
486         components by prefixing with '$'.
487         (gfc_match_end): Handle COMP_SELECT_TYPE.
488         * expr.c (gfc_add_component_ref): Modify names of class container
489         components by prefixing with '$'.
490         * gfortran.h (gfc_statement): Add ST_SELECT_TYPE, ST_TYPE_IS and
491         ST_CLASS_IS.
492         (gfc_case): New field 'ts'.
493         (gfc_exec_op): Add EXEC_SELECT_TYPE.
494         (gfc_type_is_extension_of): New prototype.
495         * match.h (gfc_match_select_type,gfc_match_type_is,gfc_match_class_is):
496         New prototypes.
497         * match.c (match_derived_type_spec): New function.
498         (match_type_spec): Use 'match_derived_type_spec'.
499         (match_case_eos): Modify error message.
500         (gfc_match_select_type): New function.
501         (gfc_match_case): Modify error message.
502         (gfc_match_type_is): New function.
503         (gfc_match_class_is): Ditto.
504         * parse.h (gfc_compile_state): Add COMP_SELECT_TYPE.
505         * parse.c (decode_statement): Handle SELECT TYPE, TYPE IS and CLASS IS
506         statements.
507         (next_statement): Handle ST_SELECT_TYPE.
508         (gfc_ascii_statement): Handle ST_SELECT_TYPE, ST_TYPE_IS, ST_CLASS_IS.
509         (parse_select_type_block): New function.
510         (parse_executable): Handle ST_SELECT_TYPE.
511         * resolve.c (resolve_deallocate_expr): Handle BT_CLASS. Modify names of
512         class container components by prefixing with '$'.
513         (resolve_allocate_expr): Ditto.
514         (resolve_select_type): New function.
515         (gfc_resolve_blocks): Handle EXEC_SELECT_TYPE.
516         (check_class_pointer_assign): Modify names of class container
517         components by prefixing with '$'.
518         (resolve_code): Ditto.
519         * st.c (gfc_free_statement): Ditto.
520         * symbol.c (gfc_type_is_extension_of): New function.
521         (gfc_type_compatible): Use 'gfc_type_is_extension_of', plus a bugfix.
522         * trans.c (gfc_trans_code): Handel EXEC_SELECT_TYPE.
523
524 2009-09-30  Janus Weil  <janus@gcc.gnu.org>
525             Paul Thomas <pault@gcc.gnu.org> 
526
527         * check.c (gfc_check_move_alloc): Arguments don't have to be arrays.
528         The second argument needs to be type-compatible with the first (not the
529         other way around, which makes a difference for CLASS entities).
530         * decl.c (encapsulate_class_symbol): New function.
531         (build_sym,build_struct): Handle BT_CLASS, call
532         'encapsulate_class_symbol'.
533         (gfc_match_decl_type_spec): Remove warning, use BT_CLASS.
534         (gfc_match_derived_decl): Set vindex;
535         * expr.c (gfc_add_component_ref): New function.
536         (gfc_copy_expr,gfc_check_pointer_assign,gfc_check_assign_symbol):
537         Handle BT_CLASS.
538         * dump-parse-tree.c (show_symbol): Print vindex.
539         * gfortran.h (bt): New basic type BT_CLASS.
540         (symbol_attribute): New field 'is_class'.
541         (gfc_typespec): Remove field 'is_class'.
542         (gfc_symbol): New field 'vindex'.
543         (gfc_get_ultimate_derived_super_type): New prototype.
544         (gfc_add_component_ref): Ditto.
545         * interface.c (gfc_compare_derived_types): Pointer equality check
546         moved here from gfc_compare_types.
547         (gfc_compare_types): Handle BT_CLASS and use
548         gfc_type_compatible.
549         * match.c (gfc_match_allocate,gfc_match_deallocate,gfc_match_call):
550         Handle BT_CLASS.
551         * misc.c (gfc_clear_ts): Removed is_class.
552         (gfc_basic_typename,gfc_typename): Handle BT_CLASS.
553         * module.c (bt_types,mio_typespec): Handle BT_CLASS.
554         (mio_symbol): Handle vindex.
555         * primary.c (gfc_match_varspec,gfc_variable_attr): Handle BT_CLASS.
556         * resolve.c (find_array_spec,check_typebound_baseobject):
557         Handle BT_CLASS.
558         (resolve_ppc_call,resolve_expr_ppc): Don't call 'gfc_is_proc_ptr_comp'
559         inside 'gcc_assert'.
560         (resolve_deallocate_expr,resolve_allocate_expr): Handle BT_CLASS.
561         (check_class_pointer_assign): New function.
562         (resolve_code): Handle BT_CLASS, call check_class_pointer_assign.
563         (resolve_fl_var_and_proc,type_is_extensible,resolve_fl_variable_derived,
564         resolve_fl_variable): Handle BT_CLASS.
565         (check_generic_tbp_ambiguity): Add special case.
566         (resolve_typebound_procedure,resolve_fl_derived): Handle BT_CLASS.
567         * symbol.c (gfc_get_ultimate_derived_super_type): New function.
568         (gfc_type_compatible): Handle BT_CLASS.
569         * trans-expr.c (conv_parent_component_references): Handle CLASS
570         containers.
571         (gfc_conv_initializer): Handle BT_CLASS.
572         * trans-types.c (gfc_typenode_for_spec,gfc_get_derived_type):
573         Handle BT_CLASS.
574
575 2009-09-29  Daniel Kraft  <d@domob.eu>
576
577         PR fortran/39626
578         * gfortran.h (enum gfc_statement): Add ST_BLOCK and ST_END_BLOCK.
579         (struct gfc_namespace): Convert flags to bit-fields and add flag
580         `construct_entities' for use with BLOCK constructs.
581         (enum gfc_exec_code): Add EXEC_BLOCK.
582         (struct gfc_code): Add namespace field to union for EXEC_BLOCK.
583         * match.h (gfc_match_block): New prototype.
584         * parse.h (enum gfc_compile_state): Add COMP_BLOCK.
585         * trans.h (gfc_process_block_locals): New prototype.
586         (gfc_trans_deferred_vars): Made public, new prototype.
587         * trans-stmt.h (gfc_trans_block_construct): New prototype.
588         * decl.c (gfc_match_end): Handle END BLOCK correctly.
589         (gfc_match_intent): Error if inside of BLOCK.
590         (gfc_match_optional), (gfc_match_value): Ditto.
591         * match.c (gfc_match_block): New routine.
592         * parse.c (decode_statement): Handle BLOCK statement.
593         (case_exec_markers): Add ST_BLOCK.
594         (case_end): Add ST_END_BLOCK.
595         (gfc_ascii_statement): Handle ST_BLOCK and ST_END_BLOCK.
596         (parse_spec): Check for statements not allowed inside of BLOCK.
597         (parse_block_construct): New routine.
598         (parse_executable): Parse BLOCKs.
599         (parse_progunit): Disallow CONTAINS in BLOCK constructs.
600         * resolve.c (is_illegal_recursion): Find real container procedure and
601         don't get confused by BLOCK constructs.
602         (resolve_block_construct): New routine.
603         (gfc_resolve_blocks), (resolve_code): Handle EXEC_BLOCK.
604         * st.c (gfc_free_statement): Handle EXEC_BLOCK statements.
605         * trans-decl.c (saved_local_decls): New static variable.
606         (add_decl_as_local): New routine.
607         (gfc_finish_var_decl): Add variable as local if inside BLOCK.
608         (gfc_trans_deferred_vars): Make public.
609         (gfc_process_block_locals): New routine.
610         * trans-stmt.c (gfc_trans_block_construct): New routine.
611         * trans.c (gfc_trans_code): Handle EXEC_BLOCK statements.
612
613 2009-09-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
614
615         PR fortran/35862
616         * io.c (format_token): Add enumerators for rounding format specifiers.
617         (format_lex): Tokenize the rounding format specifiers.
618         (gfc_match_open): Enable rounding modes in OPEN statement.
619
620 2009-09-28  Richard Henderson  <rth@redhat.com>
621
622         * f95-lang.c (gfc_init_builtin_functions): Update call to
623         build_common_builtin_nodes.
624
625 2009-09-25  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
626
627         * simplify.c (gfc_simplify_acos, gfc_simplify_acosh,
628         gfc_simplify_asin, gfc_simplify_asinh, gfc_simplify_atan,
629         gfc_simplify_atanh): Fix error message.
630
631 2009-09-24  Steven G. Kargl  <kargl@gcc.gnu.org>
632
633         PR fortran/41459
634         * error.c(gfc_warning_now): Move warnings_are_errors test to 
635         after actual emitting of the warning.
636         * parse.c (next_free): Improve error locus printing.
637         (next_fixed): Change gfc_warn to gfc_warning_now, and improve
638         locus reporting.
639
640 2009-09-16  Michael Matz  <matz@suse.de>
641
642         PR fortran/41212
643         * trans.h (struct lang_type): Remove nontarget_type member.
644         * trans.c (gfc_add_modify): Don't access it.
645         * trans-decl.c (gfc_finish_var_decl): Don't allocate and set it,
646         instead set DECL_RESTRICTED_P on affected decls.
647
648 2009-09-14  Richard Henderson  <rth@redhat.com>
649
650         * f95-lang.c (gfc_init_builtin_functions): Update call to
651         build_common_builtin_nodes.
652         (gfc_maybe_initialize_eh): Don't call
653         default_init_unwind_resume_libfunc.
654
655 2009-09-13  Richard Guenther  <rguenther@suse.de>
656         Rafael Avila de Espindola  <espindola@google.com>
657
658         * f95-lang.c (gfc_maybe_initialize_eh): Do not init
659         eh_personality_libfunc.
660
661 2009-09-11  Janus Weil  <janus@gcc.gnu.org>
662
663         PR fortran/41242
664         * resolve.c (resolve_ordinary_assign): Don't call resolve_code,
665         to avoid that subsequent codes are resolved more than once.
666         (resolve_code): Make sure that type-bound assignment operators are
667         resolved correctly.
668
669
670 2009-09-10  Steven G. Kargl  <kargl@gcc.gnu.org>
671
672         PR fortran/31292
673         * fortran/decl.c(gfc_match_modproc): Check that module procedures
674         from a module can USEd in module procedure statements in other
675         program units.  Update locus for better error message display.
676         Detect intrinsic procedures in module procedure statements.
677
678 2009-09-09  Richard Guenther  <rguenther@suse.de>
679
680         PR fortran/41297
681         * trans-expr.c (gfc_trans_scalar_assign): Correct typo that
682         left 'tmp' unused in derived type assignment.
683
684 2009-09-07  Thomas Koenig  <tkoenig@gcc.gnu.org>
685
686         PR fortran/41197
687         * resolve_c (resolve_allocate_deallocate):  Complain
688         if stat or errmsg varaible is an array.
689
690 2009-09-05  Paul Thomas  <pault@gcc.gnu.org>
691
692         PR fortran/41258
693         * primary.c (gfc_match_varspec): Do not look for typebound
694         procedures unless the derived type has a f2k_derived namespace.
695
696 2009-09-03  Diego Novillo  <dnovillo@google.com>
697
698         * f95-lang.c (lang_hooks): Remove const qualifier.
699
700 2009-09-01  Richard Guenther  <rguenther@suse.de>
701
702         * f95-lang.c (gfc_mark_addressable): Remove.
703         (LANG_HOOKS_MARK_ADDRESSABLE): Likewise.
704
705 2009-08-31  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
706
707         PR fortran/39229
708         * scanner.c (next_char): Fix typo in comment.
709         (gfc_get_char_literal): Warn if truncate flag is set for both fixed and
710         free form source, adjusting error locus as needed.
711         * parse.c (next_fixed): Clear the truncate flag.
712         (next_statement): Remove truncate warning.
713
714 2009-08-31  Janus Weil  <janus@gcc.gnu.org>
715             Paul Thomas  <pault@gcc.gnu.org>
716
717         PR fortran/40940
718         * array.c (gfc_match_array_constructor): Rename gfc_match_type_spec.
719         * decl.c (gfc_match_type_spec): Rename to gfc_match_decl_type_spec,
720         and reject CLASS with -std=f95.
721         (gfc_match_implicit, gfc_match_data_decl,gfc_match_prefix,
722         match_procedure_interface): Rename gfc_match_type_spec.
723         * gfortran.h (gfc_type_compatible): Add prototype.
724         * match.h (gfc_match_type_spec): Rename to gfc_match_decl_type_spec.
725         * match.c (match_intrinsic_typespec): Rename to match_type_spec, and
726         add handling of derived types.
727         (gfc_match_allocate): Rename match_intrinsic_typespec and check
728         type compatibility of derived types.
729         * symbol.c (gfc_type_compatible): New function to check if two types
730         are compatible.
731
732 2009-08-31  Janus Weil  <janus@gcc.gnu.org>
733
734         PR fortran/40996
735         * check.c (gfc_check_allocated): Implement allocatable scalars.
736         * resolve.c (resolve_allocate_expr,resolve_fl_var_and_proc): Ditto.
737         * trans-intrinsic.c (gfc_conv_allocated): Ditto.
738
739 2009-08-30  Daniel Kraft  <d@domob.eu>
740
741         PR fortran/37425
742         * dump-parse-tree.c (show_typebound_proc): Renamed from `show_typebound'
743         and accept gfc_typebound_proc and name instead of the symtree, needed
744         for intrinsic operator output.
745         (show_typebound_symtree): New method calling `show_typebound_proc'.
746         (show_f2k_derived): Output type-bound operators also.
747         (show_symbol): Moved output of `Procedure bindings:' label to
748         `show_f2k_derived'.
749         * gfortran.texi (Fortran 2003 status): Mention support of
750         array-constructors with explicit type specification, type-bound
751         procedures/operators, type extension, ABSTRACT types and DEFERRED.
752         Link to Fortran 2003 wiki page.
753         (Fortran 2008 status): Fix typo.  Link to Fortran 2008 wiki page.
754         * gfc-internals.texi (Type-bound Procedures): Document the new
755         members/attributes of gfc_expr.value.compcall used for type-bound
756         operators.
757         (Type-bound Operators): New section documenting their internals.
758
759 2009-08-27  Janus Weil  <janus@gcc.gnu.org>
760
761         PR fortran/40869
762         * expr.c (gfc_check_pointer_assign): Enable interface check for
763         pointer assignments involving procedure pointer components.
764         * gfortran.h (gfc_compare_interfaces): Modified prototype.
765         * interface.c (gfc_compare_interfaces): Add argument 'name2', to be
766         used instead of s2->name. Don't rely on the proc_pointer attribute,
767         but instead on the flags handed to this function.
768         (check_interface1,compare_parameter): Add argument for
769         gfc_compare_interfaces.
770         * resolve.c (check_generic_tbp_ambiguity): Ditto.
771
772 2009-08-27  Daniel Kraft  <d@domob.eu>
773
774         PR fortran/37425
775         * gfortran.h (gfc_expr): Optionally store base-object in compcall value
776         and add a new flag to distinguish assign-calls generated.
777         (gfc_find_typebound_proc): Add locus argument.
778         (gfc_find_typebound_user_op), (gfc_find_typebound_intrinsic_op): Ditto.
779         (gfc_extend_expr): Return if failure was by a real error.
780         * interface.c (matching_typebound_op): New routine.
781         (build_compcall_for_operator): New routine.
782         (gfc_extend_expr): Handle type-bound operators, some clean-up and
783         return if failure was by a real error or just by not finding an
784         appropriate operator definition.
785         (gfc_extend_assign): Handle type-bound assignments.
786         * module.c (MOD_VERSION): Incremented.
787         (mio_intrinsic_op): New routine.
788         (mio_full_typebound_tree): New routine to make typebound-procedures IO
789         code reusable for type-bound user operators.
790         (mio_f2k_derived): IO of type-bound operators.
791         * primary.c (gfc_match_varspec): Initialize new fields in gfc_expr and
792         pass locus to gfc_find_typebound_proc.
793         * resolve.c (resolve_operator): Only output error about no matching
794         interface if gfc_extend_expr did not already fail with an error.
795         (extract_compcall_passed_object): Use specified base-object if present.
796         (update_compcall_arglist): Handle ignore_pass field.
797         (resolve_ordinary_assign): Update to handle extended code for
798         type-bound assignments, too.
799         (resolve_code): Handle EXEC_ASSIGN_CALL statement code.
800         (resolve_tb_generic_targets): Pass locus to gfc_find_typebound_proc.
801         (resolve_typebound_generic), (resolve_typebound_procedure): Ditto.
802         (resolve_typebound_intrinsic_op), (resolve_typebound_user_op): Ditto.
803         (ensure_not_abstract_walker), (resolve_fl_derived): Ditto.
804         (resolve_typebound_procedures): Remove not-implemented error.
805         (resolve_typebound_call): Handle assign-call flag.
806         * symbol.c (find_typebound_proc_uop): New argument to pass locus for
807         error message about PRIVATE, verify that a found procedure is not marked
808         as erraneous.
809         (gfc_find_typebound_intrinsic_op): Ditto.
810         (gfc_find_typebound_proc), (gfc_find_typebound_user_op): New locus arg.
811
812 2009-08-22  Bud Davis <bdavis9659@sbcglobal.net>
813
814         PR fortran/28093
815         * io.c: reverted previous patch.
816
817 2009-08-25  Janne Blomqvist  <jb@gcc.gnu.org>
818
819         * gfortran.texi: Fix ENCODE example.
820
821 2009-08-25  Janus Weil  <janus@gcc.gnu.org>
822
823         PR fortran/41139
824         * primary.c (gfc_match_varspec): Make sure EXPR_PPC is only used for
825         calls to procedure pointer components, other references to procedure
826         pointer components are EXPR_VARIABLE.
827         * resolve.c (resolve_actual_arglist): Bugfix (there can be calls without
828         actual arglist).
829         * trans-expr.c (gfc_get_proc_ptr_comp): Renamed to 'get_proc_ptr_comp',
830         removed argument 'se' and made static. Avoid inserting a temporary
831         variable for calling the PPC.
832         (conv_function_val): Renamed gfc_get_proc_ptr_comp.
833         (gfc_conv_procedure_call): Distinguish functions returning a procedure
834         pointer from calls to a procedure pointer. Distinguish calls to
835         procedure pointer components from procedure pointer components as
836         actual arguments.
837         * trans-stmt.h (gfc_get_proc_ptr_comp): Make it static.
838
839 2009-08-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
840
841         PR fortran/41162
842         * io.c (check_format): Fix to not error on slash after P. Fix some
843         error loci.
844         
845 2009-08-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
846
847         PR fortran/41154
848         * io.c (check_format): Fix to not error on right paren after P.
849
850 2009-08-24  Aldy Hernandez  <aldyh@redhat.com>
851
852         PR fortran/40660
853         * trans-io.c (build_dt): Pass UNKNOWN_LOCATION to build_call_expr_loc.
854         (transfer_array_desc): Same.
855
856 2009-08-23  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
857
858         PR fortran/35754
859         * io.c (check_format): Add checks for comma and the allowed
860         format specifiers after the 'P' specifier. Fix typo in error message
861         and adjust locus.
862
863 2009-08-23  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
864
865         PR fortran/37446
866         * io.c (enum format_token): Change FMT_EXT to FMT_EN and FMT_ES.
867         (format_lex): Likewise.
868         (token_to_string): New function.
869         (check_format): Use the new tokens and the new function. Add
870         check for positive width.
871
872 2009-08-22  Steven G. Kargl  <kargl@gcc.gnu.org>
873
874         * fortran/decl.c: Disallow procedure pointers with -std=f95.
875
876 2009-08-22 Steven K. kargl  <kargl@gcc.gnu.org>
877            Paul Thomas  <pault@gcc.gnu.org>
878
879         * fortran/decl.c (match_char_spec): Rename to gfc_match_char_spec,
880         and remove static.
881         * fortran/gfortran.h: Add *expr3 entity to gfc_code.  Add prototype
882         for gfc_match_char_spec.
883         * fortran/trans-stmt.c (gfc_trans_allocate): Translate the SOURCE=
884         tag.
885         * fortran/match.c (match_intrinsic_typespec): New function to match
886         F2003 intrinsic-type-spec.
887         (conformable_arrays): New function. Check SOURCE= and
888         allocation-object are conformable.
889         (gfc_match_allocate): Use new functions.  Match SOURCE= tag.
890
891 2009-08-22  Bud Davis <bdavis9659@sbcglobal.net>
892
893         PR fortran/28093
894         * io.c : added variable to store original len of fmt
895         * io.c (check_format): Consume H items using next_char
896         in both modes to handle consecutive single quotes.
897         Test for extra characters in fmt, issue warning.
898
899 2009-08-21  Janus Weil  <janus@gcc.gnu.org>
900
901         PR fortran/41106
902         * primary.c (gfc_variable_attr): Make it work also on EXPR_FUNCTION.
903         (gfc_expr_attr): Use gfc_variable_attr for procedure pointer components.
904         * resolve.c (resolve_fl_derived): Handle CHARACTER-valued procedure
905         pointer components.
906         * trans-expr.c (gfc_conv_component_ref): Ditto.
907         (gfc_conv_variable): Ditto.
908         (gfc_conv_procedure_call): Ditto.
909         (gfc_trans_pointer_assignment): Ditto.
910         * trans-types.c (gfc_get_derived_type): Ditto.
911
912 2009-08-20  Tobias Schlüter  <tobi@gcc.gnu.org>
913
914         * trans-stmt.c (gfc_trans_do): Add a few missing folds.
915
916 2009-08-20  Michael Matz  <matz@suse.de>
917
918         PR fortran/41126
919         * trans-expr.c (gfc_conv_string_tmp): Check type compatibility
920         instead of equality.
921
922 2009-08-20  Janus Weil  <janus@gcc.gnu.org>
923
924         PR fortran/41121
925         * resolve.c (resolve_symbol): Don't resolve formal_ns of intrinsic
926         procedures.
927
928 2009-08-18  Michael Matz  <matz@suse.de>
929
930         * trans-expr.c (gfc_conv_substring): Don't evaluate casted decl early,
931         change order of length calculation to (end - start) + 1.
932         (gfc_get_interface_mapping_array): Adjust call to
933         gfc_get_nodesc_array_type.
934         * trans-array.c (gfc_trans_create_temp_array,
935         gfc_build_constant_array_constructor, gfc_conv_expr_descriptor): Ditto.
936         * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Ditto.
937         * trans.c (gfc_add_modify): Assignment between base type and nontarget
938         type are equal enough.
939         (gfc_call_malloc): Use prvoid_type_node for return value of
940         __builtin_malloc.
941         (gfc_allocate_with_status): Ditto.
942         * trans-types.c (gfc_array_descriptor_base): Double size of this array.
943         (gfc_init_types): Build prvoid_type_node.
944         (gfc_build_array_type): New bool parameter "restricted".
945         (gfc_get_nodesc_array_type): Ditto, build restrict qualified pointers,
946         if it's true.
947         (gfc_get_array_descriptor_base): Ditto.
948         (gfc_get_array_type_bounds): Ditto.
949         (gfc_sym_type): Use symbol attributes to feed calls to above functions.
950         (gfc_get_derived_type): Ditto.
951         * trans.h (struct lang_type): Add nontarget_type member.
952         * trans-types.h (prvoid_type_node): Declare.
953         (gfc_get_array_type_bounds, gfc_get_nodesc_array_type): Declare new
954         parameter.
955         * trans-decl.c (gfc_finish_var_decl): Give scalars that can't be
956         aliased a type with a different alias set than the base type.
957         (gfc_build_dummy_array_decl): Adjust call to gfc_get_nodesc_array_type.
958
959 2009-08-18  Janus Weil  <janus@gcc.gnu.org>
960             Paul Thomas  <pault@gcc.gnu.org>
961
962         PR fortran/40870
963         * trans-types.c (gfc_get_ppc_type): Include formal args in backend_decl
964         using the interface symbol. Character types are returned by reference.
965         (gfc_get_derived_type): Prevent infinite recursion loop
966         if a PPC has a derived-type formal arg.
967
968 2008-08-17  Paul Thomas  <pault@gcc.gnu.org>
969
970         PR fortran/41062
971         * trans-decl.c (gfc_trans_use_stmts):  Keep going through use
972         list if symbol is not use associated.
973
974 2009-08-17  Daniel Kraft  <d@domob.eu>
975
976         PR fortran/37425
977         * resolve.c (get_checked_tb_operator_target): New routine to do checks
978         on type-bound operators in common between intrinsic and user operators.
979         (resolve_typebound_intrinsic_op): Call it.
980         (resolve_typebound_user_op): Ditto.
981
982 2009-08-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
983
984         PR fortran/41075
985         * scanner.c (gfc_next_char_literal): Add comment to improve 
986         readability.
987         * io.c (enum format_token): Add FMT_STAR. (format_lex): Add case
988         for '*'. (check_format): Check for left paren after '*'.  Change
989         format checks to use %L to improve format string error locus.
990
991 2009-08-17  Janus Weil  <janus@gcc.gnu.org>
992
993         PR fortran/40877
994         * array.c (gfc_resolve_character_array_constructor): Add NULL argument
995         to gfc_new_charlen.
996         * decl.c (add_init_expr_to_sym,variable_decl,match_char_spec,
997         gfc_match_implicit): Ditto.
998         * expr.c (simplify_const_ref): Fix memory leak.
999         (gfc_simplify_expr): Add NULL argument to gfc_new_charlen.
1000         * gfortran.h (gfc_new_charlen): Modified prototype.
1001         * iresolve.c (check_charlen_present,gfc_resolve_char_achar): Add NULL
1002         argument to gfc_new_charlen.
1003         * module.c (mio_charlen): Ditto.
1004         * resolve.c (gfc_resolve_substring_charlen,
1005         gfc_resolve_character_operator,fixup_charlen): Ditto.
1006         (resolve_fl_derived,resolve_symbol): Add argument to gfc_charlen.
1007         * symbol.c (gfc_new_charlen): Add argument 'old_cl' (to make a copy of
1008         an existing charlen).
1009         (gfc_set_default_type,generate_isocbinding_symbol): Fix memory leak.
1010         (gfc_copy_formal_args_intr): Add NULL argument to gfc_new_charlen.
1011         * trans-decl.c (create_function_arglist): Fix memory leak.
1012
1013 2009-08-17  Richard Guenther  <rguenther@suse.de>
1014
1015         * trans-expr.c (gfc_trans_scalar_assign): Replace hack with
1016         more proper hack.
1017
1018 2009-08-15  Tobias Burnus  <burnus@net-b.de>
1019
1020         PR fortran/41080
1021         * gfortranspec.c (lookup_option): Remove gfortran-specific
1022         version of -dumpversion.
1023
1024 2009-08-14  Janus Weil  <janus@gcc.gnu.org>
1025
1026         PR fortran/41070
1027         * resolve.c (resolve_structure_cons): Make sure that ts.u.derived is
1028         only used if type is BT_DERIVED.
1029
1030 2009-08-13  Janus Weil  <janus@gcc.gnu.org>
1031
1032         PR fortran/40941
1033         * gfortran.h (gfc_typespec): Put 'derived' and 'cl' into union.
1034         * decl.c (build_struct): Make sure 'cl' is only used
1035         if type is BT_CHARACTER.
1036         * symbol.c (gfc_set_default_type): Ditto.
1037         * resolve.c (resolve_symbol, resolve_fl_derived): Ditto.
1038         (resolve_equivalence,resolve_equivalence_derived): Make sure 'derived'
1039         is only used if type is BT_DERIVED.
1040         * trans-io.c (transfer_expr): Make sure 'derived' is only used if type
1041         is BT_DERIVED or BT_INTEGER (special case: C_PTR/C_FUNPTR).
1042         * array.c: Mechanical replacements to accomodate union in gfc_typespec.
1043         * check.c: Ditto.
1044         * data.c: Ditto.
1045         * decl.c: Ditto.
1046         * dump-parse-tree.c: Ditto.
1047         * expr.c: Ditto.
1048         * interface.c: Ditto.
1049         * iresolve.c: Ditto.
1050         * match.c: Ditto.
1051         * misc.c: Ditto.
1052         * module.c: Ditto.
1053         * openmp.c: Ditto.
1054         * parse.c: Ditto.
1055         * primary.c: Ditto.
1056         * resolve.c: Ditto.
1057         * simplify.c: Ditto.
1058         * symbol.c: Ditto.
1059         * target-memory.c: Ditto.
1060         * trans-array.c: Ditto.
1061         * trans-common.c: Ditto.
1062         * trans-const.c: Ditto.
1063         * trans-decl.c: Ditto.
1064         * trans-expr.c: Ditto.
1065         * trans-intrinsic.c: Ditto.
1066         * trans-io.c: Ditto.
1067         * trans-stmt.c: Ditto.
1068         * trans-types.c: Ditto.
1069
1070 2009-08-13  Janus Weil  <janus@gcc.gnu.org>
1071
1072         PR fortran/40995
1073         * resolve.c (resolve_symbol): Move some checking code to
1074         resolve_intrinsic, and call this from here.
1075         (resolve_intrinsic): Some checking code moved here from resolve_symbol.
1076         Make sure each intrinsic is only resolved once.
1077
1078 2009-08-12  Tobias Burnus  <burnus@net-b.de>
1079
1080         PR fortran/41034
1081         * symbol.c (gfc_copy_attr): Merge bits instead of replace
1082         bits in gfc_copy_attr.
1083         * gfc_check_pointer_assign (gfc_check_pointer_assign):
1084         Initialize ext_attr bits by zero.
1085
1086 2009-08-11  Richard Guenther  <rguenther@suse.de>
1087
1088         * trans-types.c (gfc_get_derived_type): Do not clear TYPE_CANONICAL.
1089
1090 2009-08-11  Janus Weil  <janus@gcc.gnu.org>
1091
1092         PR fortran/41022
1093         * trans-expr.c (gfc_conv_procedure_call): Handle procedure pointer
1094         components as actual arguments.
1095
1096 2009-08-10  Daniel Kraft  <d@domob.eu>
1097
1098         PR fortran/37425
1099         * gfortran.h (struct gfc_namespace): New fields tb_uop_root and tb_op.
1100         (gfc_find_typebound_user_op): New routine.
1101         (gfc_find_typebound_intrinsic_op): Ditto.
1102         (gfc_check_operator_interface): Now public routine.
1103         * decl.c (gfc_match_generic): Match OPERATOR(X) or ASSIGNMENT(=).
1104         * interface.c (check_operator_interface): Made public, renamed to
1105         `gfc_check_operator_interface' accordingly and hand in the interface
1106         as gfc_symbol rather than gfc_interface so it is useful for type-bound
1107         operators, too.  Return boolean result.
1108         (gfc_check_interfaces): Adapt call to `check_operator_interface'.
1109         * symbol.c (gfc_get_namespace): Initialize new field `tb_op'.
1110         (gfc_free_namespace): Free `tb_uop_root'-based tree.
1111         (find_typebound_proc_uop): New helper function.
1112         (gfc_find_typebound_proc): Use it.
1113         (gfc_find_typebound_user_op): New method.
1114         (gfc_find_typebound_intrinsic_op): Ditto.
1115         * resolve.c (resolve_tb_generic_targets): New helper function.
1116         (resolve_typebound_generic): Use it.
1117         (resolve_typebound_intrinsic_op), (resolve_typebound_user_op): New.
1118         (resolve_typebound_procedures): Resolve operators, too.
1119         (check_uop_procedure): New, code from gfc_resolve_uops.
1120         (gfc_resolve_uops): Moved main code to new `check_uop_procedure'.
1121
1122 2009-08-10  Janus Weil  <janus@gcc.gnu.org>
1123
1124         PR fortran/40940
1125         * decl.c (gfc_match_type_spec): Match CLASS statement and warn about
1126         missing polymorphism.
1127         * gfortran.h (gfc_typespec): Add field 'is_class'.
1128         * misc.c (gfc_clear_ts): Initialize 'is_class' to zero.
1129         * resolve.c (type_is_extensible): New function to check if a derived
1130         type is extensible.
1131         (resolve_fl_variable_derived): Add error checks for CLASS variables.
1132         (resolve_typebound_procedure): Disallow non-polymorphic passed-object
1133         dummy arguments, turning warning into error.
1134         (resolve_fl_derived): Use 'type_is_extensible'. Disallow non-polymorphic
1135         passed-object dummy arguments for procedure pointer components,
1136         turning warning into error. Add error check for CLASS components.
1137
1138 2009-08-05  Tobias Burnus  <burnus@net-b.de>
1139
1140         PR fortran/40955
1141         * gfortran.h (ext_attr_id_t): Add typedef for this enum.
1142         (gfc_add_ext_attribute): Use it.
1143         * decl.c (gfc_match_gcc_attributes): Ditto.
1144         * expr.c (gfc_check_pointer_assign): Ditto.
1145         * symbol.c (gfc_add_ext_attribute): Ditto.
1146         (gfc_copy_attr): Copy also ext_attr.
1147         * resolve.c (resolve_fl_derived,resolve_symbol): Ditto.
1148         * module.c (mio_symbol_attribute): Save ext_attr in the mod file.
1149
1150 2009-08-05  Tobias Burnus  <burnus@net-b.de>
1151
1152         PR fortran/40969
1153         Revert:
1154         2009-08-04  Tobias Burnus  <burnus@net-b.de>
1155
1156         PR fortran/40949
1157         * trans-types.c (gfc_get_function_type): Fix typelist of
1158         functions without argument.
1159
1160 2009-08-05  Paul Thomas  <pault@gcc.gnu.org>
1161
1162         PR fortran/40847
1163         * iresolve.c (gfc_resolve_transfer): Correct error in 'mold'
1164         character length for case where length expresson is NULL.
1165
1166 2009-08-04  Tobias Burnus  <burnus@net-b.de>
1167
1168         PR fortran/40949
1169         * trans-types.c (gfc_get_function_type): Fix typelist of
1170         functions without argument.
1171
1172 2009-08-04  Paul Thomas  <pault@gcc.gnu.org>
1173
1174         PR fortran/40875
1175         * decl.c (add_init_expr_to_sym): Character symbols can only be
1176         initialized with character expressions.
1177
1178 2009-08-02  Janus Weil  <janus@gcc.gnu.org>
1179
1180         PR fortran/40881
1181         * decl.c (match_char_length): Warn about old-style character length
1182         declarations.
1183         * match.c (match_arithmetic_if,gfc_match_if): Modify warning message
1184         for arithmetic if.
1185         (gfc_match_goto): Warn about computed gotos.
1186         (gfc_match_return): Warn about alternate return.
1187         (gfc_match_st_function): Warn about statement functions.
1188         * resolve.c (resolve_fl_procedure): Modify warning message for
1189         assumed-length character functions.
1190
1191 2009-08-01  Paul Thomas  <pault@gcc.gnu.org>
1192
1193         PR fortran/40011
1194         * error.c : Add static flag 'warnings_not_errors'.
1195         (gfc_error): If 'warnings_not_errors' is set, branch to code
1196         from gfc_warning.
1197         (gfc_clear_error): Reset 'warnings_not_errors'.
1198         (gfc_errors_to_warnings): New function.
1199         * options.c (gfc_post_options): If pedantic and flag_whole_file
1200         change the latter to a value of 2.
1201         * parse.c (parse_module): Add module namespace to gsymbol.
1202         (resolve_all_program_units): New function.
1203         (clean_up_modules): New function.
1204         (translate_all_program_units): New function.
1205         (gfc_parse_file): If whole_file, do not clean up module right
1206         away and add derived types to namespace derived types. In
1207         addition, call the three new functions above.
1208         * resolve.c (not_in_recursive): New function.
1209         (not_entry_self_reference): New function.
1210         (resolve_global_procedure): Symbol must not be IFSRC_UNKNOWN,
1211         procedure must not be in the course of being resolved and
1212         must return false for the two new functions. Pack away the
1213         current derived type list before calling gfc_resolve for the
1214         gsymbol namespace.  It is unconditionally an error if the ranks
1215         of the reference and ther procedure do not match. Convert
1216         errors to warnings during call to gfc_procedure_use if not
1217         pedantic or legacy.
1218         (gfc_resolve): Set namespace resolved flag to -1 during
1219         resolution and store current cs_base.
1220         * trans-decl.c (gfc_get_symbol_decl): If whole_file compilation
1221         substitute a use associated variable, if it is available in a
1222         gsymbolnamespace.
1223         (gfc_get_extern_function_decl): If the procedure is use assoc,
1224         do not attempt to find it in a gsymbol because it could be an
1225         interface. If the symbol exists in a module namespace, return
1226         its backend_decl.
1227         * trans-expr.c (gfc_trans_scalar_assign): If a derived type
1228         assignment, set the rhs TYPE_MAIN_VARIANT to that of the rhs.
1229         * trans-types.c (copy_dt_decls_ifequal): Add 'from_gsym' as a
1230         boolean argument. Copy component backend_decls directly if the
1231         components are derived types and from_gsym is true.
1232         (gfc_get_derived_type): If whole_file copy the derived type from
1233         the module if it is use associated, otherwise, if can be found
1234         in another gsymbol namespace, use the existing derived type as
1235         the TYPE_CANONICAL and build normally.
1236         * gfortran.h : Add derived_types and resolved fields to
1237         gfc_namespace. Include prototype for gfc_errors_to_warnings.
1238
1239 2009-07-29  Tobias Burnus  <burnus@net-b.de>
1240
1241         PR fortran/40898
1242         * trans-types.c (gfc_get_function_type): Do not add hidden
1243         string-length argument for BIND(C) procedures.
1244         * trans-decl.c (create_function_arglist): Skip over nonexisting
1245         string-length arguments for BIND(C) procedures.
1246
1247 2009-07-28  Jakub Jelinek  <jakub@redhat.com>
1248
1249         PR fortran/40878
1250         * openmp.c (gfc_match_omp_clauses): Use gfc_error_now instead of
1251         gfc_error to diagnose invalid COLLAPSE arguments.
1252
1253 2009-07-28  Janus Weil  <janus@gcc.gnu.org>
1254
1255         PR fortran/40882
1256         * trans-types.c (gfc_get_ppc_type): For derived types, directly use the
1257         backend_decl, instead of calling gfc_typenode_for_spec, to avoid
1258         infinte loop.
1259         (gfc_get_derived_type): Correctly handle PPCs returning derived types,
1260         avoiding infinite recursion.
1261
1262 2009-07-27  Janus Weil  <janus@gcc.gnu.org>
1263
1264         PR fortran/40848
1265         * interface.c (gfc_compare_interfaces): Call 'count_types_test' before
1266         'generic_correspondence', and only if checking a generic interface.
1267
1268 2009-07-27  Tobias Burnus  <burnus@net-b.de>
1269
1270         PR fortran/40851
1271         * resolve.c (resolve_symbol): Do not initialize pointer derived-types.
1272         * trans-decl.c (init_intent_out_dt): Ditto.
1273         (generate_local_decl): No need to set attr.referenced for DT pointers.
1274
1275 2009-07-26  Tobias Burnus  <burnus@net-b.de>
1276
1277         PR fortran/33197
1278         * intrinsic.c (make_generic): Remove assert as "atan" can be
1279         both ISYM_ATAN and ISYM_ATAN2.
1280         (add_functions): Add two-argument variant of ATAN.
1281         * intrinsic.h (gfc_check_atan_2): Add check for it.
1282         * intrinsic.texi (ATAN2): Correct and enhance description.
1283         (ATAN): Describe two-argument variant of ATAN.
1284
1285 2009-07-25  Tobias Burnus  <burnus@net-b.de>
1286             Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1287
1288         PR fortran/33197
1289         * intrinsic.c (add_functions): Support complex arguments for
1290         acos,acosh,asin,asinh,atan,atanh.
1291         * invoke.texi (ACOS,ACOSH,ASIN,ASINH,ATAN,ATANH): Support
1292         complex arguments.
1293         * simplify.c (gfc_simplify_acos,gfc_simplify_acosh,
1294         gfc_simplify_asin,gfc_simplify_asinh,gfc_simplify_atan,
1295         gfc_simplify_atanh,gfc_simplify_atan,gfc_simplify_asinh,
1296         gfc_simplify_acosh,gfc_simplify_atanh): Support
1297         complex arguments.
1298
1299 2009-07-25  Richard Guenther  <rguenther@suse.de>
1300
1301         PR fortran/40005
1302         * trans-types.c (gfc_get_array_type_bounds): Use
1303         build_distinct_type_copy with a proper TYPE_CANONICAL and
1304         re-use the type-decl of the original type.
1305         * trans-decl.c (build_entry_thunks): Signal cgraph we may not
1306         garbage collect.
1307         (create_main_function): Likewise.
1308         (gfc_generate_function_code): Likewise.
1309         * trans-expr.c (gfc_trans_subcomponent_assign): Do not use
1310         fold_convert on record types.
1311
1312 2009-07-25  Janus Weil  <janus@gcc.gnu.org>
1313
1314         PR fortran/39630
1315         * decl.c (match_ppc_decl): Implement the PASS attribute for procedure
1316         pointer components.
1317         (match_binding_attributes): Ditto.
1318         * gfortran.h (gfc_component): Add member 'tb'.
1319         (gfc_typebound_proc): Add member 'ppc' and make 'pass_arg' const.
1320         * module.c (MOD_VERSION): Bump module version.
1321         (binding_ppc): New string constants.
1322         (mio_component): Only use formal args if component is a procedure
1323         pointer and add 'tb' member.
1324         (mio_typebound_proc): Include pass_arg and take care of procedure
1325         pointer components.
1326         * resolve.c (update_arglist_pass): Add argument 'name' and take care of
1327         optional arguments.
1328         (extract_ppc_passed_object): New function, analogous to
1329         extract_compcall_passed_object, but for procedure pointer components.
1330         (update_ppc_arglist): New function, analogous to
1331         update_compcall_arglist, but for procedure pointer components.
1332         (resolve_typebound_generic_call): Added argument to update_arglist_pass.
1333         (resolve_ppc_call, resolve_expr_ppc): Take care of PASS attribute.
1334         (resolve_fl_derived): Check the PASS argument for procedure pointer
1335         components.
1336         * symbol.c (verify_bind_c_derived_type): Reject procedure pointer
1337         components in BIND(C) types.
1338
1339 2009-07-24  Janus Weil  <janus@gcc.gnu.org>
1340
1341         PR fortran/40822
1342         * array.c (gfc_resolve_character_array_constructor): Use new function
1343         gfc_new_charlen.
1344         * decl.c (add_init_expr_to_sym,variable_decl,match_char_spec,
1345         gfc_match_implicit): Ditto.
1346         * expr.c (gfc_simplify_expr): Ditto.
1347         * gfortran.h (gfc_new_charlen): New prototype.
1348         * iresolve.c (check_charlen_present,gfc_resolve_char_achar): Use new
1349         function gfc_new_charlen.
1350         * module.c (mio_charlen): Ditto.
1351         * resolve.c (gfc_resolve_substring_charlen,
1352         gfc_resolve_character_operator,fixup_charlen,resolve_fl_derived,
1353         resolve_symbol): Ditto.
1354         * symbol.c (gfc_new_charlen): New function to create a new gfc_charlen
1355         structure and add it to a namespace.
1356         (gfc_copy_formal_args_intr): Make sure ts.cl is present
1357         for CHARACTER variables.
1358
1359 2009-07-24  Jakub Jelinek  <jakub@redhat.com>
1360
1361         PR fortran/40643
1362         PR fortran/31067
1363         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc,
1364         gfc_conv_intrinsic_minmaxval): Handle Infinities and NaNs properly,
1365         optimize.
1366         * trans-array.c (gfc_trans_scalarized_loop_end): No longer static.
1367         * trans-array.h (gfc_trans_scalarized_loop_end): New prototype.
1368
1369 2009-07-23  Jakub Jelinek  <jakub@redhat.com>
1370
1371         PR fortran/40839
1372         * io.c (gfc_resolve_dt): Add LOC argument.  Fail if
1373         dt->io_unit is NULL.  Return FAILURE after issuing error about
1374         negative UNIT number.
1375         (match_io_element): Don't segfault if current_dt->io_unit is NULL.
1376         * gfortran.h (gfc_resolve_dt): Adjust prototype.
1377         * resolve.c (resolve_code): Adjust caller.
1378
1379 2009-07-22  Paul Thomas  <pault@gcc.gnu.org>
1380
1381         PR fortran/40796
1382         * trans-decl.c (generate_local_decl): Unreferenced result
1383         variables with allocatable components should be treated like
1384         INTENT_OUT dummy variables.
1385
1386 2009-07-22  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1387
1388         * trans.h (gfc_set_decl_assembler_name): New prototype.
1389         * trans-decl.c (gfc_set_decl_assembler_name): New function.
1390         (gfc_get_symbol_decl, gfc_get_extern_function_decl,
1391         build_function_decl): Use gfc_set_decl_assembler_name instead of
1392         SET_DECL_ASSEMBLER_NAME.
1393         * trans-common.c (build_common_decl): Use
1394         gfc_set_decl_assembler_name instead of SET_DECL_ASSEMBLER_NAME.
1395
1396 2009-07-21  Richard Guenther  <rguenther@suse.de>
1397
1398         PR fortran/40726
1399         * trans-decl.c (gfc_get_extern_function_decl): Do not set
1400         DECL_IS_MALLOC for pointer valued functions.
1401         (build_function_decl): The same.
1402
1403 2009-07-19  Steven G. Kargl  <kargl@gcc.gnu.org>
1404
1405         PR fortran/40727
1406         * fortran/check.c (gfc_check_cmplx, gfc_check_dcmplx): Add check that
1407         the optional second argument isn't of COMPLEX type.
1408
1409 2009-07-17  Richard Guenther  <rguenther@suse.de>
1410
1411         PR c/40401
1412         * f95-lang.c (gfc_be_parse_file): Do not finalize the CU here.
1413         * trans-decl.c (gfc_gimplify_function): Remove.
1414         (build_entry_thunks): Do not gimplify here.
1415         (create_main_function): Likewise.
1416         (gfc_generate_function_code): Likewise.
1417
1418 2009-07-17  Aldy Hernandez  <aldyh@redhat.com>
1419             Manuel López-Ibáñez  <manu@gcc.gnu.org>
1420
1421         PR 40435 
1422         * trans-expr.c, trans-array.c, trans-openmp.c, trans-stmt.c,
1423         trans.c, trans-io.c, trans-decl.c, trans-intrinsic.c: Add location
1424         argument to fold_{unary,binary,ternary}, fold_build[123],
1425         build_call_expr, build_size_arg, build_fold_addr_expr,
1426         build_call_array, non_lvalue, size_diffop,
1427         fold_build1_initializer, fold_build2_initializer,
1428         fold_build3_initializer, fold_build_call_array,
1429         fold_build_call_array_initializer, fold_single_bit_test,
1430         omit_one_operand, omit_two_operands, invert_truthvalue,
1431         fold_truth_not_expr, build_fold_indirect_ref, fold_indirect_ref,
1432         combine_comparisons, fold_builtin_*, fold_call_expr,
1433         build_range_check, maybe_fold_offset_to_address, round_up,
1434         round_down.
1435
1436 2009-07-15  Janus Weil  <janus@gcc.gnu.org>
1437
1438         PR fortran/40743
1439         * resolve.c (resolve_symbol): Don't resolve the formal namespace of a
1440         contained procedure.
1441
1442 2009-07-14  Taras Glek  <tglek@mozilla.com>
1443             Rafael Espindola  <espindola@google.com>
1444
1445         * Make-lang.in (fortran.install-plugin): New target for
1446         installing plugin headers.
1447
1448 2009-07-13  H.J. Lu  <hongjiu.lu@intel.com>
1449
1450         * module.c (mio_symbol): Remove the unused variable, formal.
1451
1452 2009-07-13  Janus Weil  <janus@gcc.gnu.org>
1453
1454         PR fortran/40646
1455         * module.c (mio_symbol): If the symbol has formal arguments,
1456         the formal namespace will be present.
1457         * resolve.c (resolve_actual_arglist): Correctly handle 'called'
1458         procedure pointer components as actual arguments.
1459         (resolve_fl_derived,resolve_symbol): Make sure the formal namespace
1460         is present.
1461         * trans-expr.c (gfc_conv_procedure_call): Correctly handle the formal
1462         arguments of procedure pointer components.
1463
1464 2009-07-12  Tobias Burnus  <burnus@net-b.de>
1465             Philippe Marguinaud <philippe.marguinaud@meteo.fr>
1466
1467         PR fortran/40588
1468         * primary.c (match_charkind_name): Fix condition for $ matching.
1469
1470         PR libfortran/22423
1471         * libgfortran.h: Typedef the GFC_DTYPE_* enum.
1472
1473 2009-07-11  Tobias Burnus  <burnus@net-b.de>
1474
1475         PR fortran/33197
1476         * check.c (gfc_check_fn_rc2008): New function.
1477         * intrinsic.h (gfc_check_fn_rc2008): New prototype.
1478         * intrinsic.c (add_functions): Add complex tan, cosh, sinh,
1479         and tanh.
1480
1481 2009-07-10  Paul Thomas  <pault@gcc.gnu.org>
1482
1483         PR fortran/39334
1484         * primary.c (match_kind_param): Return MATCH_NO if the symbol
1485         has no value.
1486
1487 2008-07-09  Paul Thomas  <pault@gcc.gnu.org>
1488
1489         PR fortran/40629
1490         * resolve.c (check_host_association):  Use the existing
1491         accessible symtree and treat function expressions with
1492         symbols that have procedure flavor.
1493
1494 2009-07-09  Janus Weil  <janus@gcc.gnu.org>
1495
1496         PR fortran/40646
1497         * dump-parse-tree.c (show_expr): Renamed 'is_proc_ptr_comp'.
1498         * expr.c (is_proc_ptr_comp): Renamed to 'gfc_is_proc_ptr_comp'.
1499         (gfc_check_pointer_assign): Renamed 'is_proc_ptr_comp'.
1500         (replace_comp,gfc_expr_replace_comp): New functions, analogous
1501         to 'replace_symbol' and 'gfc_expr_replace_symbol', just with components
1502         instead of symbols.
1503         * gfortran.h (gfc_expr_replace_comp): New prototype.
1504         (is_proc_ptr_comp): Renamed to 'gfc_is_proc_ptr_comp'.
1505         * interface.c (compare_actual_formal): Renamed 'is_proc_ptr_comp'.
1506         * match.c (gfc_match_pointer_assignment): Ditto.
1507         * primary.c (gfc_match_varspec): Handle array-valued procedure pointers
1508         and procedure pointer components. Renamed 'is_proc_ptr_comp'.
1509         * resolve.c (resolve_fl_derived): Correctly handle interfaces with
1510         RESULT statement, and handle array-valued procedure pointer components.
1511         (resolve_actual_arglist,resolve_ppc_call,resolve_expr_ppc): Renamed
1512         'is_proc_ptr_comp'.
1513         * trans-array.c (gfc_walk_function_expr): Ditto.
1514         * trans-decl.c (gfc_get_symbol_decl): Security check for presence of
1515         ns->proc_name.
1516         * trans-expr.c (gfc_conv_procedure_call): Handle array-valued procedure
1517         pointer components. Renamed 'is_proc_ptr_comp'.
1518         (conv_function_val,gfc_trans_arrayfunc_assign): Renamed
1519         'is_proc_ptr_comp'.
1520         (gfc_get_proc_ptr_comp): Do not modify the argument 'e', but instead
1521         make a copy of it.
1522         * trans-io.c (gfc_trans_transfer): Handle array-valued procedure
1523         pointer components.
1524
1525 2009-07-09  Tobias Burnus  <burnus@net-b.de>
1526
1527         PR fortran/40604
1528         * intrinsic.c (gfc_convert_type_warn): Set sym->result.
1529         * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
1530         for optional arguments.
1531
1532 2009-07-08  Tobias Burnus  <burnus@net-b.de>
1533
1534         PR fortran/40675
1535         * simplify.c (gfc_simplify_sign): Handle signed zero correctly.
1536         * trans-intrinsic.c (gfc_conv_intrinsic_sign): Support
1537         -fno-sign-zero.
1538         * invoke.texi (-fno-sign-zero): Add text regarding SIGN intrinsic.
1539
1540 2008-07-08  Paul Thomas  <pault@gcc.gnu.org>
1541
1542         PR fortran/40591
1543         * decl.c (match_procedure_interface):  Correct the association
1544         or creation of the interface procedure's symbol.
1545
1546 2009-07-04  Jakub Jelinek  <jakub@redhat.com>
1547
1548         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): For integer
1549         maxloc initialize limit to -huge-1 rather than just -huge.
1550
1551 2009-07-04  Janus Weil  <janus@gcc.gnu.org>
1552
1553         PR fortran/40593
1554         * interface.c (compare_actual_formal): Take care of proc-pointer-valued
1555         functions as actual arguments.
1556         * trans-expr.c (gfc_conv_procedure_call): Ditto.
1557         * resolve.c (resolve_specific_f0): Use the correct ts.
1558
1559 2009-07-02  Michael Matz  <matz@suse.de>
1560
1561         PR fortran/32131
1562         * trans-array.c (gfc_conv_descriptor_stride_get): Return
1563         constant one for strides in the first dimension of ALLOCATABLE
1564         arrays.
1565
1566 2009-06-30  Janus Weil  <janus@gcc.gnu.org>
1567
1568         PR fortran/40594
1569         * trans-types.c (gfc_get_derived_type): Bugfix, reverting one hunk from
1570         r147206.
1571
1572 2009-06-29  Tobias Burnus  <burnus@net-b.de>
1573
1574         PR fortran/40580
1575         * trans-expr.c  (gfc_conv_procedure_call): Add -fcheck=pointer check.
1576         * libgfortran.h: Add GFC_RTCHECK_POINTER.
1577         * invoke.texi (-fcheck): Document new pointer option.
1578         * options.c (gfc_handle_runtime_check_option): Handle pointer option.
1579
1580         * gfortran.texi (C Binding): Improve wording.
1581         * iso-c-binding.def: Remove obsolete comment.
1582
1583 2009-06-29  Paul Thomas  <pault@gcc.gnu.org>
1584
1585         PR fortran/40551
1586         * dependency.h : Add second bool* argument to prototype of
1587         gfc_full_array_ref_p.
1588         * dependency.c (gfc_full_array_ref_p): If second argument is
1589         present, return true if last dimension of reference is an
1590         element or has unity stride.
1591         * trans-array.c : Add NULL second argument to references to
1592         gfc_full_array_ref_p.
1593         * trans-expr.c : The same, except for;
1594         (gfc_trans_arrayfunc_assign): Return fail if lhs reference
1595         is not a full array or a contiguous section.
1596
1597 2009-06-28  Tobias Burnus  <burnus@net-b.de>
1598             Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1599
1600         PR fortran/34112
1601         * symbol.c (gfc_add_ext_attribute): New function.
1602         (gfc_get_sym_tree): New argument allow_subroutine.
1603         (gfc_get_symbol,gfc_get_ha_sym_tree,gen_cptr_param,gen_fptr_param
1604         gen_shape_param,generate_isocbinding_symbol): Use it.
1605         * decl.c (find_special): New argument allow_subroutine.
1606         (add_init_expr_to_sym,add_hidden_procptr_result,attr_decl1,
1607         match_procedure_in_type,gfc_match_final_decl): Use it.
1608         (gfc_match_gcc_attributes): New function.
1609         * gfortran.texi (Mixed-Language Programming): New section
1610         "GNU Fortran Compiler Directives".
1611         * gfortran.h (ext_attr_t): New struct.
1612         (symbol_attributes): Use it.
1613         (gfc_add_ext_attribute): New prototype.
1614         (gfc_get_sym_tree): Update pototype.
1615         * expr.c (gfc_check_pointer_assign): Check whether call
1616         convention is the same.
1617         * module.c (import_iso_c_binding_module, create_int_parameter,
1618         use_iso_fortran_env_module): Update gfc_get_sym_tree call.
1619         * scanner.c (skip_gcc_attribute): New function.
1620         (skip_free_comments,skip_fixed_comments): Use it.
1621         (gfc_next_char_literal): Support !GCC$ lines.
1622         * resolve.c (check_host_association): Update
1623         gfc_get_sym_tree call.
1624         * match.c (gfc_match_sym_tree,gfc_match_call): Update
1625         gfc_get_sym_tree call.
1626         * trans-decl.c (add_attributes_to_decl): New function.
1627         (gfc_get_symbol_decl,get_proc_pointer_decl,
1628         gfc_get_extern_function_decl,build_function_decl: Use it.
1629         * match.h (gfc_match_gcc_attributes): Add prototype.
1630         * parse.c (decode_gcc_attribute): New function.
1631         (next_free,next_fixed): Support !GCC$ lines.
1632         * primary.c (match_actual_arg,check_for_implicit_index,
1633         gfc_match_rvalue,gfc_match_rvalue): Update
1634         gfc_get_sym_tree call.
1635
1636 2009-06-28  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
1637
1638         * gfortran.h: Define HAVE_mpc_pow.
1639         * arith.c (complex_reciprocal, complex_pow): If HAVE_mpc_pow,
1640         don't define these functions.
1641         (arith_power): If HAVE_mpc_pow, use mpc_pow.
1642
1643 2009-06-26  Janus Weil  <janus@gcc.gnu.org>
1644
1645         PR fortran/39997
1646         PR fortran/40541
1647         * decl.c (add_hidden_procptr_result): Copy the typespec to the hidden
1648         result.
1649         * expr.c (gfc_check_pointer_assign): Enable interface check for
1650         procedure pointer assignments where the rhs is a function returning a
1651         procedure pointer.
1652         * resolve.c (resolve_symbol): If an external procedure with unspecified
1653         return type can not be implicitly typed, it must be a subroutine.
1654
1655 2009-06-24  Janus Weil  <janus@gcc.gnu.org>
1656
1657         PR fortran/40427
1658         * gfortran.h (gfc_component): New member 'formal_ns'.
1659         (gfc_copy_formal_args_ppc,void gfc_ppc_use): New.
1660         * interface.c (gfc_ppc_use): New function, analogous to
1661         gfc_procedure_use, but for procedure pointer components.
1662         * module.c (MOD_VERSION): Bump module version.
1663         (mio_component): Treat formal arguments.
1664         (mio_formal_arglist): Changed argument from gfc_symbol to
1665         gfc_formal_arglist.
1666         (mio_symbol): Changed argument of mio_formal_arglist.
1667         * resolve.c (resolve_ppc_call,resolve_expr_ppc): Call gfc_ppc_use,
1668         to check actual arguments and treat formal args correctly.
1669         (resolve_fl_derived): Copy formal args of procedure pointer components
1670         from their interface.
1671         * symbol.c (gfc_copy_formal_args_ppc): New function, analogous to
1672         gfc_copy_formal_args, but for procedure pointer components.
1673
1674 2009-06-22  Janus Weil  <janus@gcc.gnu.org>
1675
1676         PR fortran/37254
1677         PR fortran/39850
1678         * interface.c (compare_parameter): Set implicit type for function
1679         actual arguments with BT_UNKNOWN.
1680
1681 2009-06-22  Tobias Burnus  <burnus@net-b.de>
1682
1683         PR fortran/40472
1684         PR fortran/50520
1685         * simplify.c (gfc_simplify_spread): Fix the case that source=
1686         is a scalar.
1687
1688 2009-06-22  Paul Thomas  <pault@gcc.gnu.org>
1689
1690         PR fortran/40443
1691         * interface.c (gfc_search_interface): Hold back a match to an
1692         elementary procedure until all other possibilities are
1693         exhausted.
1694
1695 2009-06-22  Paul Thomas  <pault@gcc.gnu.org>
1696
1697         PR fortran/40472
1698         * simplify.c (gfc_simplify_spread): Restrict the result size to
1699         the limit for an array constructor.
1700
1701 2009-06-21  Janus Weil  <janus@gcc.gnu.org>
1702
1703         PR fortran/39850
1704         * interface.c (gfc_compare_interfaces): Take care of implicit typing
1705         when checking the function attribute. Plus another bugfix.
1706         (compare_parameter): Set attr.function and attr.subroutine according
1707         to the usage of a procedure as actual argument.
1708
1709 2009-06-20  Tobias Burnus  <burnus@net-b.de>
1710
1711         PR fortran/40452
1712         * trans-decl.c (add_argument_checking): Disable bounds check
1713         for allowed argument storage association.
1714
1715 2009-06-19  Paul Thomas  <pault@gcc.gnu.org>
1716
1717         PR fortran/40440
1718         * trans-expr.c (gfc_conv_procedure_call): Do not deallocate
1719         allocatable components if the argument is a pointer.
1720
1721 2009-06-19  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
1722
1723         * gfortran.h (gfc_expr): Use mpc_t to represent complex numbers.
1724
1725         * arith.c, dump-parse-tree.c, expr.c, module.c, resolve.c,
1726         simplify.c, target-memory.c, target-memory.h, trans-const.c,
1727         trans-expr.c: Convert to mpc_t throughout.
1728
1729 2009-06-19  Ian Lance Taylor  <iant@google.com>
1730
1731         * cpp.c (struct gfc_cpp_option_data): Give this struct, used for
1732         the global variable gfc_cpp_option, a name.
1733
1734 2009-06-19  Janus Weil  <janus@gcc.gnu.org>
1735
1736         PR fortran/40450
1737         * trans-expr.c (gfc_conv_procedure_call): Only add an extra addr_expr
1738         to a procedure pointer actual argument, if it is not itself a
1739         dummy arg.
1740
1741 2009-06-18  Janus Weil  <janus@gcc.gnu.org>
1742
1743         PR fortran/40451
1744         * resolve.c (resolve_contained_fntype): Prevent implicit typing for
1745         procedures with explicit interface.
1746         * symbol.c (gfc_check_function_type): Ditto.
1747
1748 2009-06-16  Ian Lance Taylor  <iant@google.com>
1749
1750         * decl.c (build_struct): Rewrite loop over constructor elements.
1751
1752 2009-06-16  Janus Weil  <janus@gcc.gnu.org>
1753
1754         PR fortran/36947
1755         PR fortran/40039
1756         * expr.c (gfc_check_pointer_assign): Call 'gfc_compare_interfaces' with
1757         error message.
1758         * gfortran.h (gfc_compare_interfaces): Additional argument.
1759         * interface.c (operator_correspondence): Removed.
1760         (gfc_compare_interfaces): Additional argument to return error message.
1761         Directly use the code from 'operator_correspondence' instead of calling
1762         the function. Check for OPTIONAL. Some rearrangements.
1763         (check_interface1): Call 'gfc_compare_interfaces' without error message.
1764         (compare_parameter): Call 'gfc_compare_interfaces' with error message.
1765         * resolve.c (check_generic_tbp_ambiguity): Call 'gfc_compare_interfaces'
1766         without error message.
1767
1768 2009-06-16  Tobias Burnus  <burnus@net-b.de>
1769
1770         PR fortran/40383
1771         * trans-decl.c (create_function_arglist): Copy formal charlist to
1772         have a proper passed_length for -fcheck=bounds.
1773
1774 2009-06-12  Steven G. Kargl  <kargls@comcast.net>
1775
1776         * arith.c (gfc_enum_initializer): Move function ...
1777         * decl.c: ... here.  Remove gfc_ prefix and make static.
1778         (enumerator_decl): Update function call.
1779         * gfortran.h:  Remove gfc_enum_initializer prototype.
1780
1781 2009-06-12  Aldy Hernandez  <aldyh@redhat.com>
1782
1783         * trans-array.c (gfc_trans_allocate_array_storage): Pass
1784         location on down.
1785         (gfc_trans_array_constructor_value): Same.
1786         (gfc_trans_scalarized_loop_end): Same.
1787         (gfc_conv_ss_startstride): Same.
1788         (gfc_trans_g77_array): Same.
1789         (gfc_trans_dummy_array_bias): Same.
1790         (gfc_conv_array_parameter): Same.
1791         (structure_alloc_comps): Same.
1792         * trans-expr.c (gfc_conv_function_call): Same.
1793         (fill_with_spaces): Same.
1794         (gfc_trans_string_copy): Same.
1795         (gfc_trans_scalar_assign): Same.
1796         * trans-stmt.c (gfc_trans_goto): Same.
1797         (gfc_trans_if_1): Same.
1798         (gfc_trans_simple_do): Same.
1799         (gfc_trans_do): Same.
1800         (gfc_trans_do_while): Same.
1801         (gfc_trans_logical_select): Same.
1802         (gfc_trans_select): Same.
1803         (gfc_trans_forall_loop): Same.
1804         (gfc_trans_nested_forall_loop): Same.
1805         (generate_loop_for_temp_to_lhs): Same.
1806         (generate_loop_for_rhs_to_temp): Same.
1807         (gfc_trans_forall_1): Same.
1808         (gfc_trans_where_assign): Same.
1809         (gfc_trans_where_3): Same.
1810         (gfc_trans_allocate): Same.
1811         * trans.c (gfc_finish_block): Same.
1812         (gfc_trans_runtime_check): Same.
1813         (gfc_call_malloc): Same.
1814         (gfc_allocate_with_status): Same.
1815         (gfc_call_free): Same.
1816         (gfc_deallocate_with_status): Same.
1817         (gfc_call_realloc): Same.
1818         (gfc_trans_code): Same.
1819         * trans-decl.c (gfc_init_default_dt): Same.
1820         (gfc_generate_constructors): Same.
1821         * trans-io.c (gfc_trans_io_runtime_check): Same.
1822         * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Same.
1823         (gfc_conv_intrinsic_fdate): Same.
1824         (gfc_conv_intrinsic_ttynam): Same.
1825         (gfc_conv_intrinsic_minmax): Same.
1826         (gfc_conv_intrinsic_minmax_char): Same.
1827         (gfc_conv_intrinsic_anyall): Same.
1828         (gfc_conv_intrinsic_count): Same.
1829         (gfc_conv_intrinsic_arith): Same.
1830         (gfc_conv_intrinsic_minmaxloc): Same.
1831         (gfc_conv_intrinsic_minmaxval): Same.
1832         (gfc_conv_intrinsic_rrspacing): Same.
1833         (gfc_conv_intrinsic_array_transfer): Same.
1834         (gfc_conv_intrinsic_trim): Same.
1835         (gfc_conv_intrinsic_repeat): Same.
1836         
1837 2009-06-12  Janus Weil  <janus@gcc.gnu.org>
1838
1839         PR fortran/40176
1840         * resolve.c (resolve_symbol): Additional error check, preventing an
1841         infinite loop.
1842
1843 2009-06-11  Paul Thomas  <pault@gcc.gnu.org>
1844
1845         PR fortran/40402
1846         * resolve.c (next_data_value): It is an error if the value is
1847         not constant.
1848
1849 2009-06-11  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
1850
1851         PR fortran/38718
1852         * intrinsic.c (add_functions): Add simplifiers for ISNAN,
1853         IS_IOSTAT_END and IS_IOSTAT_EOR.
1854         * intrinsic.h (gfc_simplify_is_iostat_end, gfc_simplify_is_iostat_eor,
1855         gfc_simplify_isnan): New prototypes.
1856         * intrinsic.c (gfc_simplify_is_iostat_end, gfc_simplify_is_iostat_eor,
1857         gfc_simplify_isnan): New functions.
1858
1859 2009-06-11  Jakub Jelinek  <jakub@redhat.com>
1860
1861         * interface.c (fold_unary): Rename to...
1862         (fold_unary_intrinsic): ... this.
1863         (gfc_extend_expr): Adjust caller.
1864         (gfc_match_generic_spec): Likewise.  Initialize *op to INTRINSIC_NONE
1865         to avoid warnings.
1866         * expr.c (gfc_simplify_expr): Initialize start and end before calling
1867         gfc_extract_int.
1868
1869 2009-06-10  Dave Korn  <dave.korn.cygwin@gmail.com>
1870
1871         * trans-decl.c (create_main_function):  Don't build main decl twice.
1872
1873 2009-06-09  Tobias Burnus  <burnus@net-b.de>
1874
1875         * trans-decl.c (gfc_generate_function_code): Use gfc_option.rtcheck
1876         instead of flag_bounds_check.
1877         * intrinsic.texi (ISO_FORTRAN_ENV): Document INT{8,16,32,64} and
1878         REAL{32,64,128}.
1879
1880 2009-06-08  Paul Thomas  <pault@gcc.gnu.org>
1881
1882         * trans-array.h : Replace prototypes for
1883         gfc_conv_descriptor_offset, gfc_conv_descriptor_stride,
1884         gfc_conv_descriptor_lbound, gfc_conv_descriptor_ubound with new
1885         prototypes of the same names with _get or _set appended.
1886         * trans-array.c : Make the originals of the above static and
1887         new functions for the _get and _set functions. Update all the
1888         references to these descriptor access functions.
1889         * trans-expr.c : Update references to the above descriptor
1890         access functions.
1891         * trans-intrinsic.c : The same.
1892         * trans-openmp.c : The same.
1893         * trans-stmt.c : The same.
1894
1895 2009-06-08  Alexandre Oliva  <aoliva@redhat.com>
1896
1897         * options.c (gfc_post_options): Disable dump_parse_tree
1898         during -fcompare-debug-second.
1899
1900 2009-06-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1901
1902         PR fortran/40008
1903         * gfortran.h (gfc_open): Add newunit expression to structure.
1904         * io.c (io_tag): Add new unit tag and fix whitespace.
1905         (match_open_element): Add matching for newunit.
1906         (gfc_free_open): Free the newunit expression.
1907         (gfc_resolve_open): Add newunit to resolution and check constraints.
1908         (gfc_resolve_close): Add check for non-negative unit.
1909         (gfc_resolve_filepos): Likewise.
1910         (gfc_resolve_dt): Likewise.
1911         * trans-io.c (set_parameter_value): Build runtime checks for unit
1912         numbers within range of kind=4 integer. (gfc_trans_open) Set the
1913         newunit parameter.
1914         * ioparm.def (IOPARM): Define the newunit parameter as a pointer
1915         to GFC_INTEGER_4, pint4.
1916
1917 2009-06-07  Daniel Franke  <franke.daniel@gmail.com>
1918
1919         PR fortran/25104
1920         PR fortran/29962
1921         * array.c (gfc_append_constructor): Added NULL-check.
1922         * check.c (gfc_check_spread): Check DIM.
1923         (gfc_check_unpack): Check that the ARRAY arguments provides enough
1924         values for MASK.
1925         * intrinsic.h (gfc_simplify_spread): New prototype.
1926         (gfc_simplify_unpack): Likewise.
1927         * intrinsic.c (add_functions): Added new simplifier callbacks.
1928         * simplify.c (gfc_simplify_spread): New.
1929         (gfc_simplify_unpack): New.
1930         * expr.c (check_transformational): Allow additional transformational
1931         intrinsics in initialization expression.
1932
1933 2009-06-07  Daniel Franke  <franke.daniel@gmail.com>
1934
1935         PR fortran/25104
1936         PR fortran/29962
1937         * check.c (gfc_check_all_any): Check rank of DIM.
1938         (gfc_check_count): Likewise.
1939         * intrinsic.h (gfc_simplify_all): New prototype.
1940         (gfc_simplify_any): Likewise.
1941         (gfc_simplify_count): Likewise.
1942         (gfc_simplify_sum): Likewise.
1943         (gfc_simplify_product): Likewise.
1944         * intrinsic.c (add_functions): Added new simplifier callbacks.
1945         * simplify.c (transformational_result): New.
1946         (simplify_transformation_to_scalar): New.
1947         (simplify_transformation_to_array): New.
1948         (gfc_count): New.
1949         (gfc_simplify_all): New.
1950         (gfc_simplify_any): New.
1951         (gfc_simplify_count): New.
1952         (gfc_simplify_sum): New.
1953         (gfc_simplify_product): New.
1954         * expr.c (check_transformational): Allow additional transformational
1955         intrinsics in initialization expression.
1956
1957 2009-06-07  Daniel Franke  <franke.daniel@gmail.com>
1958
1959         * check.c (dim_rank_check): Return SUCCESS if DIM=NULL.
1960         (gfc_check_lbound): Removed (now) redundant check for DIM=NULL.
1961         (gfc_check_minloc_maxloc): Likewise.
1962         (check_reduction): Likewise.
1963         (gfc_check_size): Likewise.
1964         (gfc_check_ubound): Likewise.
1965         (gfc_check_cshift): Added missing shape-conformance checks.
1966         (gfc_check_eoshift): Likewise.
1967         * gfortran.h (gfc_check_conformance): Modified prototype to printf-style.
1968         * expr.c (gfc_check_conformance): Accept error-message chunks in 
1969         printf-style. Changed all callers.
1970
1971
1972 2009-06-07  Daniel Franke  <franke.daniel@gmail.com>
1973
1974         PR fortran/25104
1975         PR fortran/29962
1976         * intrinsic.h (gfc_simplify_dot_product): New prototype.
1977         (gfc_simplify_matmul): Likewise.
1978         (gfc_simplify_transpose): Likewise.
1979         * intrinsic.c (add_functions): Added new simplifier callbacks.
1980         * simplify.c (init_result_expr): New.
1981         (compute_dot_product): New.
1982         (gfc_simplify_dot_product): New.
1983         (gfc_simplify_matmul): New.
1984         (gfc_simplify_transpose): New.
1985         * expr.c (check_transformational): Allow transformational intrinsics
1986         with simplifier in initialization expression.
1987
1988 2009-06-06  Daniel Franke  <franke.daniel@gmail.com>
1989
1990         PR fortran/37203
1991         * simplify.c (gfc_simplify_reshape): Fixed reshaping of empty arrays
1992         without padding.
1993
1994 2009-06-06  Daniel Franke  <franke.daniel@gmail.com>
1995
1996         PR fortran/32890
1997         * intrinsic.h (gfc_simplify_pack): New prototype.
1998         * intrinsic.c (add_functions): Added
1999         simplifier-callback to PACK.
2000         * simplify.c (is_constant_array_expr): Moved
2001         to beginning of file.
2002         (gfc_simplify_pack): New.
2003         * check.c (gfc_check_pack): Check that VECTOR has enough elements.
2004         Added safeguards for empty arrays.
2005
2006 2009-06-05  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
2007
2008         * simplify.c (call_mpc_func): Use mpc_realref/mpc_imagref
2009         instead of MPC_RE/MPC_IM.
2010
2011 2009-06-05  Alexandre Oliva  <aoliva@redhat.com>
2012
2013         * trans-decl.c (gfc_build_qualified_array): Don't skip generation
2014         of range types.
2015         * trans.h (struct lang_type): Add base_decls.
2016         (GFC_TYPE_ARRAY_BASE_DECL): New.
2017         * trans-types.c (gfc_get_array_type_bounds): Initialize base decls
2018         proactively and excessively.
2019         (gfc_get_array_descr_info): Use existing base decls if available.
2020
2021 2009-06-04  Daniel Franke  <franke.daniel@gmail.com>
2022
2023         PR fortran/37203
2024         * check.c (gfc_check_reshape): Additional checks for the
2025         SHAPE and ORDER arguments.
2026         * simplify.c (gfc_simplify_reshape): Converted argument checks
2027         to asserts.
2028
2029 2009-06-03  Tobias Burnus  <burnus@net-b.de>
2030
2031         * gfortran.texi: Add mixed-language programming, mention
2032         varying string lengths, some clean up of introduction parts.
2033         * intrinsic.texi (instrinsic modules): Create @menu for subsections.
2034         (ISO_C_BINDING): Support ISOCBINDING_INT_FAST128_T.
2035         * libgfortran.h: Comment to rember to keep gfortran.texi in sync.
2036         * iso-c-binding.def: Support ISOCBINDING_INT_FAST128_T.
2037
2038 2009-06-03  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2039             Tobias Burnus  <burnus@net-b.de>
2040
2041         * iso-c-binding.def: Use INTMAX_TYPE instead of intmax_type_node.
2042         * trans-types.c (init_c_interop_kinds): Remove intmax_type_node.
2043
2044 2009-06-03  Alexandre Oliva  <aoliva@redhat.com>
2045
2046         * module.c (mio_f2k_derived): Initialize cur.
2047
2048 2009-06-01  Tobias Burnus  <burnus@net-b.de>
2049
2050         PR fortran/40309
2051         * trans-decl.c (gfc_sym_identifier): Use "MAIN__" for PROGRAM "main".
2052         (create_main_function): Set main_identifier_node.
2053
2054 2009-05-29  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2055
2056         PR fortran/40019
2057         * trans-types.c (gfc_build_uint_type): Make nonstatic.
2058         * trans.h (gfor_fndecl_clz128, gfor_fndecl_ctz128): New prototypes.
2059         * trans-types.h (gfc_build_uint_type): Add prototype.
2060         * trans-decl.c (gfc_build_intrinsic_function_decls): Build
2061         gfor_fndecl_clz128 and gfor_fndecl_ctz128.
2062         * trans-intrinsic.c (gfc_conv_intrinsic_leadz,
2063         gfc_conv_intrinsic_trailz): Call the right builtins or library
2064         functions, and cast arguments to unsigned types first.
2065         * simplify.c (gfc_simplify_leadz): Deal with negative arguments.
2066
2067 2009-05-27  Ian Lance Taylor  <iant@google.com>
2068
2069         * Make-lang.in (gfortran$(exeext)): Change $(COMPILER) to
2070         $(LINKER).
2071         (f951$(exeext)): Likewise.
2072
2073 2009-05-27  Tobias Burnus  <burnus@net-b.de>
2074
2075         PR fortran/40270
2076         * trans-decl.c (create_main_function): Mark MAIN__ and
2077         argc/argv as TREE_USED and push/pop function_decl context
2078         if needed.
2079
2080 2009-05-26  Tobias Burnus  <burnus@net-b.de>
2081
2082         PR fortran/39178
2083         * gfortranspec.c (lang_specific_driver): Stop linking
2084         libgfortranbegin.
2085         * trans-decl.c (gfc_build_builtin_function_decls): Stop
2086         making MAIN__ publicly visible.
2087         (gfc_build_builtin_function_decls): Add
2088         gfor_fndecl_set_args.
2089         (create_main_function) New function.
2090         (gfc_generate_function_code): Use it.
2091
2092 2009-05-26  Tobias Burnus  <burnus@net-b.de>
2093
2094         PR fortran/40246
2095         * match.c (gfc_match_nullify): NULLify freed pointer.
2096
2097 2009-05-26  Ian Lance Taylor  <iant@google.com>
2098
2099         * Make-lang.in (gfortranspec.o): Use $(COMPILER).
2100         (gfortran$(exeext), f951$(exeext), fortran/cpp.o): Likewise.
2101
2102 2009-05-26  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
2103
2104         * gfortran.h (GFC_MPC_RND_MODE): New.
2105         * simplify.c (call_mpc_func): New helper function.
2106         (gfc_simplify_cos, gfc_simplify_exp, gfc_simplify_log,
2107         gfc_simplify_sin, gfc_simplify_sqrt): Add MPC support.
2108
2109 2009-05-25  Janus Weil  <janus@gcc.gnu.org>
2110
2111         PR fortran/40176
2112         * primary.c (gfc_match_varspec): Handle procedure pointer components
2113         with array return value.
2114         * resolve.c (resolve_expr_ppc): Ditto.
2115         (resolve_symbol): Make sure the interface of a procedure pointer has
2116         been resolved.
2117         * trans-array.c (gfc_walk_function_expr): Handle procedure pointer
2118         components with array return value.
2119         * trans-expr.c (gfc_conv_component_ref,gfc_conv_procedure_call,
2120         gfc_trans_arrayfunc_assign): Ditto.
2121         (gfc_trans_pointer_assignment): Handle procedure pointer assignments,
2122         where the rhs is a dummy argument.
2123         * trans-types.c (gfc_get_ppc_type,gfc_get_derived_type): Handle
2124         procedure pointer components with array return value.
2125
2126 2009-05-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2127             Dominique Dhumieres
2128
2129         PR fortran/35732
2130         PR fortran/39872
2131         * trans-array.c (gfc_conv_ss_startstride): Add one to index.
2132
2133 2009-05-22  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2134
2135         PR fortran/40195
2136         * module.c (read_md5_from_module_file): Close file before returning.
2137
2138 2009-05-18  Janus Weil  <janus@gcc.gnu.org>
2139
2140         PR fortran/40164
2141         * primary.c (gfc_match_rvalue): Handle procedure pointer components in
2142         arrays.
2143         * resolve.c (resolve_ppc_call,resolve_expr_ppc): Resolve component and
2144         array references.
2145         (resolve_fl_derived): Procedure pointer components are not required to
2146         have constant array bounds in their return value.
2147
2148 2009-05-18  Janus Weil  <janus@gcc.gnu.org>
2149
2150         * intrinsic.c (add_sym): Fix my last commit (r147655),
2151         which broke bootstrap.
2152
2153 2009-05-18  Richard Guenther  <rguenther@suse.de>
2154
2155         PR fortran/40168
2156         * trans-expr.c (gfc_trans_zero_assign): For local array
2157         destinations use an assignment from an empty constructor.
2158
2159 2009-05-18  Janus Weil  <janus@gcc.gnu.org>
2160
2161         PR fortran/36947
2162         PR fortran/40039
2163         * expr.c (gfc_check_pointer_assign): Check intents when comparing
2164         interfaces.
2165         * gfortran.h (typedef struct gfc_intrinsic_arg): Add 'intent' member.
2166         (gfc_compare_interfaces): Additional argument.
2167         * interface.c (operator_correspondence): Add check for equality of
2168         intents, and new argument 'intent_check'.
2169         (gfc_compare_interfaces): New argument 'intent_check', which is passed
2170         on to operator_correspondence.
2171         (check_interface1): Don't check intents when comparing interfaces.
2172         (compare_parameter): Do check intents when comparing interfaces.
2173         * intrinsic.c (add_sym): Add intents for arguments of intrinsic
2174         procedures.
2175         (add_sym_1,add_sym_1s,add_sym_1m,add_sym_2,add_sym_2s,add_sym_3,
2176         add_sym_3ml,add_sym_3red,add_sym_3s,add_sym_4): Use INTENT_IN by
2177         default.
2178         (add_sym_1_intent,add_sym_1s_intent,add_sym_2s_intent,add_sym_3s_intent)
2179         : New functions to add intrinsic symbols, specifying custom intents.
2180         (add_sym_4s,add_sym_5s): Add new arguments to specify intents.
2181         (add_functions,add_subroutines): Add intents for various intrinsics.
2182         * resolve.c (check_generic_tbp_ambiguity): Don't check intents when
2183         comparing interfaces.
2184         * symbol.c (gfc_copy_formal_args_intr): Copy intent.
2185
2186 2009-05-17  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2187
2188         * iso-fortran-env.def: Define INT8, INT16, INT32, INT64, REAL32,
2189         REAL64 and REAL128.
2190         * gfortran.h (gfc_get_int_kind_from_width_isofortranenv,
2191         gfc_get_real_kind_from_width_isofortranenv): New prototypes.
2192         * iso-c-binding.def: Update definitions for the INT*_T,
2193         INT_LEAST*_T and INT_FAST*_T named parameters.
2194         * trans-types.c (get_typenode_from_name, get_int_kind_from_name,
2195         gfc_get_real_kind_from_width_isofortranenv): New functions.
2196
2197 2009-05-17  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2198
2199         PR fortran/36260
2200         * intrinsic.c (add_functions, add_subroutines): Fix argument
2201         names and wrap long lines.
2202         * intrinsic.texi: Fix documentation and argument names of
2203         LOG_GAMMA, DATAN2, DBESJN, DTIME, ETIME, FSTAT, STAT, LSTAT,
2204         GET_COMMAND, IDATE, LTIME, MOVE_ALLOC, NINT, OR, PRODUCT,
2205         SUM, RAND, RANDOM_SEED, REAL, SELECTED_INT_KIND,
2206         SELECTED_REAL_KIND and XOR.
2207
2208 2009-05-16  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2209
2210         PR fortran/33197
2211         * intrinsic.c (add_functions): Use ERFC_SCALED simplification.
2212         * intrinsic.h (gfc_simplify_erfc_scaled): New prototype.
2213         * simplify.c (fullprec_erfc_scaled, asympt_erfc_scaled,
2214         gfc_simplify_erfc_scaled): New functions.
2215
2216 2009-05-16  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2217
2218         PR fortran/31243
2219         * resolve.c (resolve_substring): Don't allow too large substring
2220         indexes.
2221         (gfc_resolve_substring_charlen): Fix typo.
2222         (gfc_resolve_character_operator): Fix typo.
2223         (resolve_charlen): Catch unreasonably large string lengths.
2224         * simplify.c (gfc_simplify_len): Don't error out on LEN
2225         range checks.
2226
2227 2009-05-16  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2228
2229         PR fortran/36031
2230         * decl.c (set_enum_kind): Use global short-enums flag.
2231         * gfortran.h (gfc_option_t): Remove short_enums flag.
2232         * lang.opt (-fshort-enums): Refer to C documentation.
2233         * options.c (gfc_init_options, gfc_handle_option): Use global
2234         short-enums flag.
2235
2236 2009-05-15  Tobias Burnus  <burnus@net-b.de>
2237
2238         PR fortran/39352
2239         * f95-lang.c: Add gfc_maybe_initialize_eh.
2240         * gfortran.h: Add gfc_maybe_initialize_eh prototype.
2241         * Make-lang.in: Add new .h dendencies for f95-lang.c
2242         * openmp.c (resolve_omp_do): Call gfc_maybe_initialize_eh.
2243         * misc.c (gfc_free): Avoid #define trickery for free.
2244
2245 2009-05-14  Steven G. Kargl  <kargl@gcc.gnu.org>
2246
2247         * dump-parse-tree.c (show_code_node): Add ERRMSG to the dumping
2248         of allocate and deallocate statements.
2249
2250 2009-05-14  Ian Lance Taylor  <iant@google.com>
2251
2252         * decl.c (match_attr_spec): Change d to unsigned int.
2253         * dump-parse-tree.c (show_namespace): Change op to int.  Add cast.
2254         * interface.c (gfc_check_interfaces): Change i to int.  Add casts.
2255         * module.c (read_module): Change i to int.  Add cast.
2256         (write_module): Change i to int.
2257         * symbol.c (gfc_get_namespace): Change in to int.
2258         (gfc_free_namespace): Change i to int.
2259         * trans-io.c (gfc_build_io_library_fndecls): Change ptype to
2260         unsigned int.  Add cast.
2261         * trans-types.c (gfc_init_kinds): Change mode to unsigned int.
2262         Add casts.
2263
2264 2009-05-14  Daniel Kraft  <d@domob.eu>
2265
2266         PR fortran/40045
2267         * dump-parse-tree.c (show_typebound): Fix missing adaption to new
2268         type-bound procedure storage structure.
2269
2270 2009-05-14  Janus Weil  <janus@gcc.gnu.org>
2271
2272         PR fortran/39996
2273         * decl.c (gfc_match_function_decl): Use gfc_add_type.
2274         * symbol.c (gfc_add_type): Better checking for duplicate types in
2275         function declarations. And: Always give an error for duplicte types,
2276         not just a warning with -std=gnu.
2277
2278 2009-05-14  Jakub Jelinek  <jakub@redhat.com>
2279
2280         PR fortran/39865
2281         * io.c (resolve_tag_format): CHARACTER array in FMT= argument
2282         isn't an extension.  Reject non-CHARACTER array element of
2283         assumed shape or pointer or assumed size array.
2284         * trans-array.c (array_parameter_size): New function.
2285         (gfc_conv_array_parameter): Add size argument.  Call
2286         array_parameter_size if it is non-NULL.
2287         * trans-array.h (gfc_conv_array_parameter): Adjust prototype.
2288         * trans-expr.c (gfc_conv_function_call, gfc_trans_arrayfunc_assign):
2289         Adjust callers.
2290         * trans-intrinsic.c (gfc_conv_intrinsic_loc): Likewise.
2291         * trans-io.c (gfc_convert_array_to_string): Rewritten.
2292
2293 2009-05-13  Steven G. Kargl  <kargl@gcc.gnu.org>
2294
2295         * gfortran.h (gfc_code): Rename struct member expr to expr1.
2296         * openmp.c (resolve_omp_atomic): Update expr to expr1.
2297         * interface.c (gfc_extend_assign): Ditto.
2298         * trans-expr.c (gfc_conv_expr_reference, gfc_trans_assignment,
2299         gfc_trans_init_assign): Ditto.
2300         * dump-parse-tree.c (show_code_node): Ditto.
2301         * trans-openmp.c (gfc_trans_omp_atomic): Ditto.
2302         * trans-stmt.c ( gfc_trans_label_assign, gfc_trans_goto, gfc_trans_call,
2303         gfc_trans_return, gfc_trans_pause, gfc_trans_stop, gfc_trans_if_1,
2304         gfc_trans_arithmetic_if, gfc_trans_do_while, gfc_trans_integer_select,
2305         gfc_trans_logical_select, gfc_trans_character_select
2306         forall_make_variable_temp, check_forall_dependencies
2307         gfc_trans_forall_1, gfc_trans_where_2, gfc_trans_where_3
2308         gfc_trans_where, gfc_trans_allocate, gfc_trans_deallocate): Ditto.
2309         * io.c (match_io_element, gfc_match_inquire): Ditto.
2310         * resolve.c (resolve_typebound_call, resolve_ppc_call,
2311         resolve_allocate_expr, resolve_allocate_deallocate, resolve_select,
2312         resolve_transfer, resolve_where, gfc_resolve_assign_in_forall,
2313         gfc_resolve_blocks, resolve_code, build_init_assign): Ditto.
2314         * st.c (gfc_free_statement): Ditto.
2315         * match.c (gfc_match_assignment, gfc_match_pointer_assignment,
2316         match_arithmetic_if, gfc_match_if, gfc_match_elseif
2317         gfc_match_stopcode, gfc_match_assign, gfc_match_goto,
2318         gfc_match_nullify, match_typebound_call, gfc_match_call
2319         gfc_match_select, match_simple_where, gfc_match_where
2320         gfc_match_elsewhere, match_simple_forall, gfc_match_forall): Ditto.
2321         * trans-io.c (gfc_trans_transfer): Ditto.
2322         * parse.c (parse_where_block, parse_if_block): Ditto.
2323
2324 2009-05-13  Steven G. Kargl  <kargl@gcc.gnu.org>
2325
2326         * gfortran.h (gfc_code): Rename struct member label to label1.
2327         * dump-parse-tree.c (show_code_node): Update symbol.
2328         * trans-stmt.c (gfc_trans_label_assign, gfc_trans_goto,
2329         gfc_trans_arithmetic_if): Ditto.
2330         * resolve.c (gfc_resolve_blocks, resolve_code): Ditto.
2331         * match.c (match_arithmetic_if, gfc_match_if, gfc_reference_st_label,
2332         gfc_match_assign, gfc_match_goto): Ditto.
2333         * parse.c (parse_do_block): Ditto.
2334
2335 2009-05-13  Tobias Burnus  <burnus@net-b.de>
2336
2337         PR fortran/34153
2338         * gfortran.h (gfc_exec_op): Add EXEC_END_PROCEDURE.
2339         * dump-parse-tree.c (show_code_node): Use EXEC_END_PROCEDURE.
2340         * trans.c (gfc_trans_code): Ditto.
2341         * resolve.c (resolve_code): Ditto.
2342         * st.c (gfc_free_statement): Ditto.
2343         * parse.c (accept_statement): Ditto.
2344
2345 2009-05-12  Tobias Burnus  <burnus@net-b.de>
2346
2347         PR fortran/40110
2348         * decl.c (gfc_match_kind_spec): Turn C kind error into a warning.
2349
2350 2009-05-11  Steve Ellcey  <sje@cup.hp.com>
2351
2352         * resolve.c (check_host_association): Initialize tail.
2353
2354 2009-05-11  Janus Weil  <janus@gcc.gnu.org>
2355
2356         PR fortran/40089
2357         * resolve.c (resolve_fl_derived): Only return FAILURE if
2358         gfc_notify_std fails.
2359
2360 2009-05-10  Ian Lance Taylor  <iant@google.com>
2361
2362         * gfortran.h (enum gfc_omp_sched_kind): New enum, broken out of
2363         gfc_omp_clauses.
2364         (enum gfc_omp_default_sharing): Likewise.
2365         * module.c (enum gfc_rsym_state): New enum, broken out of
2366         pointer_info.
2367         (enum gfc_wsym_state): Likewise.
2368         * parse.c (enum state_order): New enum, broken out of st_state.
2369
2370 2009-05-10  Paul Thomas  <pault@gcc.gnu.org>
2371
2372         PR fortran/40018
2373         * trans-array.c (gfc_trans_array_constructor_value): Fold
2374         convert numeric constants.
2375         (gfc_build_constant_array_constructor): The same.
2376
2377 2009-05-10  Paul Thomas  <pault@gcc.gnu.org>
2378
2379         PR fortran/38863
2380         * trans-expr.c (gfc_conv_operator_assign): Remove function.
2381         * trans.h : Remove prototype for gfc_conv_operator_assign.
2382         * trans-stmt.c (gfc_conv_elemental_dependencies): Initialize
2383         derivde types with intent(out).
2384         (gfc_trans_call): Add mask, count1 and invert arguments. Add
2385         code to use mask for WHERE assignments.
2386         (gfc_trans_forall_1): Use new arguments for gfc_trans_call.
2387         (gfc_trans_where_assign): The gfc_symbol argument is replaced
2388         by the corresponding code. If this has a resolved_sym, then
2389         gfc_trans_call is called. The call to gfc_conv_operator_assign
2390         is removed.
2391         (gfc_trans_where_2): Change the last argument in the call to
2392         gfc_trans_where_assign.
2393         * trans-stmt.h : Modify prototype for gfc_trans_call.
2394         * trans.c (gfc_trans_code): Use new args for gfc_trans_call.
2395
2396 2009-05-08  Janus Weil  <janus@gcc.gnu.org>
2397
2398         PR fortran/39876
2399         * intrinsic.c (gfc_is_intrinsic): Do not add the EXTERNAL attribute if
2400         the symbol is a module procedure.
2401
2402 2009-05-08  Tobias Burnus  <burnus@net-b.de>
2403
2404         * invoke.texi: Add do/recursion to the -fcheck= summary.
2405
2406 2009-05-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2407
2408         PR fortran/38830
2409         * gfortran.texi: Document that we don't support variable FORMAT
2410         expressions.
2411
2412 2009-05-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2413
2414         PR fortran/39576
2415         * error.c (error_print): Add missing break statement.
2416
2417 2009-05-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2418
2419         PR fortran/36382
2420         * invoke.texi: Document that -fdollar-ok does not allow $ to be
2421         used in IMPLICIT statement.
2422
2423 2009-05-06  Janus Weil  <janus@gcc.gnu.org>
2424             Paul Thomas  <pault@gcc.gnu.org>
2425
2426         PR fortran/39630
2427         * decl.c (match_procedure_interface): New function to match the
2428         interface for a PROCEDURE statement.
2429         (match_procedure_decl): Call match_procedure_interface.
2430         (match_ppc_decl): New function to match the declaration of a
2431         procedure pointer component.
2432         (gfc_match_procedure):  Call match_ppc_decl.
2433         (match_binding_attributes): Add new argument 'ppc' and handle the
2434         POINTER attribute for procedure pointer components.
2435         (match_procedure_in_type,gfc_match_generic): Added new argument to
2436         match_binding_attributes.
2437         * dump-parse-tree.c (show_expr,show_components,show_code_node): Handle
2438         procedure pointer components.
2439         * expr.c (free_expr0,gfc_copy_expr,gfc_simplify_expr): Handle EXPR_PPC.
2440         (gfc_check_pointer_assign): Handle procedure pointer components, but no
2441         full checking yet.
2442         (is_proc_ptr_comp): New function to determine if an expression is a
2443         procedure pointer component.
2444         * gfortran.h (expr_t): Add EXPR_PPC.
2445         (symbol_attribute): Add new member 'proc_pointer_comp'.
2446         (gfc_component): Add new member 'formal'.
2447         (gfc_exec_op): Add EXEC_CALL_PPC.
2448         (gfc_get_default_type): Changed first argument.
2449         (is_proc_ptr_comp): Add prototype.
2450         (gfc_match_varspec): Add new argument.
2451         * interface.c (compare_actual_formal): Handle procedure pointer
2452         components.
2453         * match.c (gfc_match_pointer_assignment,match_typebound_call): Handle
2454         procedure pointer components.
2455         * module.c (mio_expr): Handle EXPR_PPC.
2456         * parse.c (parse_derived): Handle procedure pointer components.
2457         * primary.c (gfc_match_varspec): Add new argument 'ppc_arg' and handle
2458         procedure pointer components.
2459         (gfc_variable_attr): Handle procedure pointer components.
2460         (gfc_match_rvalue): Added new argument to gfc_match_varspec and changed
2461         first argument of gfc_get_default_type.
2462         (match_variable): Added new argument to gfc_match_varspec.
2463         * resolve.c (resolve_entries,set_type,resolve_fl_parameter): Changed
2464         first argument of gfc_get_default_type.
2465         (resolve_structure_cons,resolve_actual_arglist): Handle procedure
2466         pointer components.
2467         (resolve_ppc_call): New function to resolve a call to a procedure
2468         pointer component (subroutine).
2469         (resolve_expr_ppc): New function to resolve a call to a procedure
2470         pointer component (function).
2471         (gfc_resolve_expr): Handle EXPR_PPC.
2472         (resolve_code): Handle EXEC_CALL_PPC.
2473         (resolve_fl_derived): Copy the interface for a procedure pointer
2474         component.
2475         (resolve_symbol): Fix overlong line.
2476         * st.c (gfc_free_statement): Handle EXEC_CALL_PPC.
2477         * symbol.c (gfc_get_default_type): Changed first argument.
2478         (gfc_set_default_type): Changed first argument of gfc_get_default_type.
2479         (gfc_add_component): Initialize ts.type to BT_UNKNOWN.
2480         * trans.h (gfc_conv_function_call): Renamed.
2481         * trans.c (gfc_trans_code): Handle EXEC_CALL_PPC.
2482         * trans-expr.c (gfc_conv_component_ref): Ditto.
2483         (gfc_conv_function_val): Rename to 'conv_function_val', add new
2484         argument 'expr' and handle procedure pointer components.
2485         (gfc_conv_operator_assign): Renamed gfc_conv_function_val.
2486         (gfc_apply_interface_mapping_to_expr): Handle EXPR_PPC.
2487         (gfc_conv_function_call): Rename to 'gfc_conv_procedure_call', add new
2488         argument 'expr' and handle procedure pointer components.
2489         (gfc_get_proc_ptr_comp): New function to get the backend decl for a
2490         procedure pointer component.
2491         (gfc_conv_function_expr): Renamed gfc_conv_function_call.
2492         (gfc_conv_structure): Handle procedure pointer components.
2493         * trans-intrinsic.c (gfc_conv_intrinsic_funcall,
2494         conv_generic_with_optional_char_arg): Renamed gfc_conv_function_call.
2495         * trans-stmt.h (gfc_get_proc_ptr_comp): Add prototype.
2496         * trans-stmt.c (gfc_trans_call): Renamed gfc_conv_function_call.
2497         * trans-types.h (gfc_get_ppc_type): Add prototype.
2498         * trans-types.c (gfc_get_ppc_type): New function to build a tree node
2499         for a procedure pointer component.
2500         (gfc_get_derived_type): Handle procedure pointer components.
2501
2502 2009-05-06  Tobias Burnus  <burnus@net-b.de>
2503
2504         PR fortran/40041
2505         * resolve.c (resolve_symbol): Print no warning for implicitly
2506         typed intrinsic functions.
2507
2508 2009-05-05  Janus Weil  <janus@gcc.gnu.org>
2509
2510         PR fortran/39998
2511         * expr.c (gfc_check_pointer_assign): Check for statement functions and
2512         internal procedures in procedure pointer assignments.
2513
2514 2009-04-28  Janus Weil  <janus@gcc.gnu.org>
2515
2516         PR fortran/39946
2517         * resolve.c (resolve_symbol): Correctly copy the interface of a
2518         PROCEDURE statement if the interface involves a RESULT variable.
2519
2520 2009-04-28  Janus Weil  <janus@gcc.gnu.org>
2521
2522         PR fortran/39930
2523         PR fortran/39931
2524         * expr.c (gfc_check_pointer_assign): Correctly detect if the left hand
2525         side is a pointer.
2526         * parse.c (gfc_fixup_sibling_symbols): Don't check for ambiguity.
2527
2528 2009-04-28  Paul Thomas  <pault@gcc.gnu.org>
2529
2530         PR fortran/39879
2531         * trans_expr.c (gfc_conv_procedure_call): Deep copy a derived
2532         type parentheses argument if it is a variable with allocatable
2533         components.
2534
2535 2009-04-27  Ian Lance Taylor  <iant@google.com>
2536
2537         * trans-intrinsic.c (DEFINE_MATH_BUILTIN): Add casts to enum
2538         type.
2539         * trans-io.c (st_parameter_field): Add casts to enum type.
2540
2541 2009-04-26  Steven G. Kargl  <kargl@gcc.gnu.org>
2542
2543         PR fortran/39893
2544         fortran/data.c (gfc_assign_data_value): If the lvalue is an 
2545         assumed character length entity in a data statement, then 
2546         return FAILURE to prevent segmentation fault.
2547
2548 2009-04-26  Jakub Jelinek  <jakub@redhat.com>
2549
2550         * trans-decl.c: Include pointer-set.h.
2551         (nonlocal_dummy_decl_pset, tree nonlocal_dummy_decls): New variables.
2552         (gfc_nonlocal_dummy_array_decl): New function.
2553         (gfc_get_symbol_decl): Call it for non-local dummy args with saved
2554         descriptor.
2555         (gfc_get_symbol_decl): Set DECL_BY_REFERENCE when needed.
2556         (gfc_generate_function_code): Initialize nonlocal_dummy_decl{s,_pset},
2557         chain it to outermost block's vars, destroy it afterwards.
2558         * Make-lang.in (trans-decl.o): Depend on pointer-set.h.
2559
2560 2009-04-25  Janus Weil  <janus@gcc.gnu.org>
2561
2562         PR fortran/39688
2563         * decl.c (gfc_match_import): Use 'sym->name' instead of 'name'.
2564         They differ if the symbol has been use-renamed.
2565
2566 2009-04-24  Ian Lance Taylor  <iant@google.com>
2567
2568         * gfortran.h (enum gfc_symbol_type): New named enum type, broken
2569         out of struct gfc_symbol.
2570         (struct gfc_symbol): Use enum gfc_symbol_type.
2571         (enum gfc_array_ref_dimen_type): New named enum type, broken out
2572         of struct gfc_array_ref).
2573         (struct gfc_array_ref): Use enum gfc_array_ref_dimen_type.
2574         (mod_pointee_as): Update declaration.
2575         * decl.c (add_global_entry): Change type to enum gfc_symbol_type.
2576         (gfc_mod_pointee_as): Change return type to "match".
2577         * module.c (mio_array_ref): Add cast to enum type.
2578         (mio_symbol): Likewise.
2579         * resolve.c (resolve_global_procedure): Change type to enum
2580         gfc_symbol_type.
2581         * trans-io.c (gfc_build_st_parameter): Change type to unsigned
2582         int.
2583
2584 2009-04-24  Daniel Kraft  <d@domob.eu>
2585
2586         * gfortran.h (gfc_get_typebound_proc): Removed as macro, now a function.
2587         (struct gfc_symtree): Moved "typebound" member inside union.
2588         (struct gfc_namespace): Add "tb_sym_root" as new symtree to sort out
2589         type-bound procedures there.
2590         (gfc_get_tbp_symtree): New procedure.
2591         * symbol.c (tentative_tbp_list): New global.
2592         (gfc_get_namespace): NULL new "tb_sym_root" member.
2593         (gfc_new_symtree): Removed initialization of "typebound" member.
2594         (gfc_undo_symbols): Process list of tentative tbp's.
2595         (gfc_commit_symbols): Ditto.
2596         (free_tb_tree): New method.
2597         (gfc_free_namespace): Call it.
2598         (gfc_get_typebound_proc): New method.
2599         (gfc_get_tbp_symtree): New method.
2600         (gfc_find_typebound_proc): Adapt to structural changes of gfc_symtree
2601         and gfc_namespace with regards to tbp's.
2602         * dump-parse-tree.c (show_typebound): Ditto.
2603         * primary.c (gfc_match_varspec): Ditto.  Don't reference tbp-symbol
2604         as it isn't a symbol any longer.
2605         * module.c (mio_typebound_symtree): Adapt to changes.
2606         (mio_typebound_proc): Ditto, create symtrees using "gfc_get_tbp_symtree"
2607         rather than "gfc_get_sym_tree".
2608         (mio_f2k_derived): Ditto.
2609         * decl.c (match_procedure_in_type): Ditto.
2610         (gfc_match_generic): Ditto.  Don't reference tbp-symbol.
2611         * resolve.c (check_typebound_override): Adapt to changes.
2612         (resolve_typebound_generic): Ditto.
2613         (resolve_typebound_procedures): Ditto.
2614         (ensure_not_abstract_walker): Ditto.
2615         (ensure_not_abstract): Ditto.
2616         (resolve_typebound_procedure): Ditto, ignore erraneous symbols (for
2617         instance, through removed tentative ones).
2618         * gfc-internals.texi (Type-bound procedures): Document changes.
2619
2620 2009-04-24  Janus Weil  <janus@gcc.gnu.org>
2621
2622         PR fortran/39861
2623         PR fortran/39864
2624         * symbol.c (gfc_copy_formal_args_intr): Set attr.flavor and attr.dummy
2625         for the formal arguments.
2626
2627 2009-04-21  Taras Glek <tglek@mozilla.com>
2628
2629         * f95-lang.c: Update GTY annotations to new syntax.
2630         * trans-intrinsic.c: Likewise.
2631         * trans-io.c: Likewise.
2632         * trans.h: Likewise.
2633
2634 2009-04-22  Janus Weil  <janus@gcc.gnu.org>
2635
2636         PR fortran/39735
2637         * decl.c (add_hidden_procptr_result): Bugfix for procptr results.
2638         (match_procedure_decl): Set if_source.
2639         * expr.c (gfc_check_pointer_assign): Bugfix: Return after error.
2640         And: Check interface also for IFSRC_UNKNOWN (return type may be known).
2641         * gfortran.h (typedef enum ifsrc): Remove IFSRC_USAGE,
2642         add documentation. Rename copy_formal_args and copy_formal_args_intr.
2643         * interface.c (gfc_compare_interfaces): Check for return types,
2644         handle IFSRC_UNKNOWN.
2645         (compare_intr_interfaces,compare_actual_formal_intr): Obsolete, removed.
2646         (gfc_procedure_use): Modified handling of intrinsics.
2647         * intrinsic.c (add_functions): Bugfix for "dim".
2648         * resolve.c (resolve_intrinsic): New function to resolve intrinsics,
2649         which copies the interface from isym to sym.
2650         (resolve_procedure_expression,resolve_function): Use new function
2651         'resolve_intrinsic'.
2652         (resolve_symbol): Add function attribute for externals with return type
2653         and use new function 'resolve_intrinsic'.
2654         * symbol.c (ifsrc_types): Remove string for IFSRC_USAGE.
2655         (copy_formal_args): Renamed to gfc_copy_formal_args.
2656         (copy_formal_args_intr): Renamed to gfc_copy_formal_args_intr.
2657         * trans-const.c (gfc_conv_const_charlen): Handle cl==NULL.
2658
2659 2009-04-21  Joseph Myers  <joseph@codesourcery.com>
2660
2661         * ChangeLog, ChangeLog-2002, ChangeLog-2003, ChangeLog-2004,
2662         ChangeLog-2005, ChangeLog-2006, ChangeLog-2007, ChangeLog-2008,
2663         ChangeLog.ptr, config-lang.in, ioparm.def, mathbuiltins.def: Add
2664         copyright and license notices.
2665         * ChangeLog, ChangeLog-2005, ChangeLog-2006, ChangeLog-2007,
2666         ChangeLog-2008: Correct dates.
2667
2668 2009-04-20  Tobias Burnus  <burnus@net-b.de>
2669
2670         PR fortran/39811
2671         * scanner.c (load_line): Fix bogus "&" compile-time diagnostic.
2672
2673 2009-04-20  Paul Thomas  <pault@gcc.gnu.org>
2674
2675         PR fortran/39800
2676         * resolve.c (is_sym_host_assoc): New function.
2677         (resolve_fl_derived): Call it when checking PRIVATE components
2678         of PUBLIC derived types.  Change gfc_error to a gfc_notify_std
2679         with std=f2003.
2680         (resolve_fl_namelist): Call it twice to check for host
2681         association.
2682
2683 2009-04-20  Ian Lance Taylor  <iant@google.com>
2684
2685         * module.c (import_iso_c_binding_module): Add casts to enum type.
2686         * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Change op to enum
2687         tree_code.
2688         (gfc_conv_intrinsic_anyall): Likewise.
2689         (gfc_conv_intrinsic_arith): Likewise.
2690         (gfc_conv_intrinsic_minmaxloc): Likewise.
2691         (gfc_conv_intrinsic_minmaxval): Likewise.
2692         (gfc_conv_intrinsic_bitop): Likewise.
2693         (gfc_conv_intrinsic_singlebitop): Likewise.
2694         (gfc_conv_intrinsic_strcmp): Likewise.
2695
2696 2009-04-20  Vasilis Liaskovitis  <vliaskov@gmail.com>
2697             Jakub Jelinek  <jakub@redhat.com>
2698
2699         PR fortran/35423
2700         * trans.h (OMPWS_WORKSHARE_FLAG, OMPWS_CURR_SINGLEUNIT,
2701         OMPWS_SCALARIZER_WS, OMPWS_NOWAIT): Define.
2702         (ompws_flags): New extern decl.
2703         * trans-array.c (gfc_trans_scalarized_loop_end): Build OMP_FOR
2704         for the outer dimension if ompws_flags allow it.
2705         * trans.c (gfc_generate_code): Clear ompws_flags.
2706         * trans-expr.c (gfc_trans_assignment_1): Allow worksharing
2707         array assignments inside of !$omp workshare.
2708         * trans-stmt.c (gfc_trans_where_3): Similarly for where statements
2709         and constructs.
2710         * trans-openmp.c (ompws_flags): New variable.
2711         (gfc_trans_omp_workshare): Rewritten.
2712
2713 2009-04-11  Daniel Kraft  <d@domob.eu>
2714
2715         PR fortran/37746
2716         * gfortran.h (struct gfc_charlen): New field "passed_length" to store
2717         the actual passed string length for dummy arguments.
2718         * trans-decl.c (gfc_create_string_length): Formatting fixes and added
2719         assertion, moved a local variable into the innermost block it is needed.
2720         (create_function_arglist): Removed TODO about the check being
2721         implemented and initialize cl->passed_length here.
2722         (add_argument_checking): New method.
2723         (gfc_generate_function_code): Call the argument checking method.
2724
2725 2009-04-11  Janus Weil  <janus@gcc.gnu.org>
2726
2727         PR fortran/39692
2728         * symbol.c (check_conflict): Reject procedure pointers for -std=f95.
2729
2730 2009-04-11  Daniel Franke  <franke.daniel@gmail.com>
2731
2732         * resolve.c (resolve_global_procedure): Enable whole-file checking for
2733         procedures that are declared later in the file.
2734         
2735 2009-04-10  Paolo Bonzini  <bonzini@gnu.org>
2736
2737         PR middle-end/39701
2738         * trans.c (gfc_allocate_with_status): Fix type mismatches
2739         on "pstat == 0".
2740
2741 2009-04-10  Daniel Franke  <franke.daniel@gmail.com>
2742
2743         PR fortran/38709
2744         * expr.c (find_array_section): Leave early on zero-sized arrays.
2745
2746 2009-04-09  Janus Weil  <janus@gcc.gnu.org>
2747
2748         PR fortran/36704
2749         * decl.c (add_hidden_procptr_result): New function for handling
2750         procedure pointer return values by adding a hidden result variable.
2751         (variable_decl,match_procedure_decl,gfc_match_function_decl,
2752         gfc_match_subroutine,gfc_match_end,attr_decl1): Handle procedure pointer
2753         return values.
2754         * parse.c (parse_interface): Add EXTERNAL attribute only after
2755         FUNCTION/SUBROUTINE declaration is complete.
2756         * primary.c (replace_hidden_procptr_result): New function for replacing
2757         function symbol by hidden result variable.
2758         (gfc_match_rvalue,match_variable): Replace symbol by hidden result
2759         variable.
2760         * resolve.c (resolve_contained_fntype,resolve_function,resolve_variable,
2761         resolve_symbol): Allow for procedure pointer function results.
2762         (resolve_fl_procedure): Conflict detection moved here from
2763         'check_conflict'.
2764         * symbol.c (gfc_check_function_type): Allow for procedure pointer
2765         function results.
2766         (check_conflict): Move some conflict detection to resolution stage.
2767         * trans-types.c (gfc_sym_type,gfc_get_function_type): Handle hidden
2768         result variables.
2769
2770 2009-04-08  Jakub Jelinek  <jakub@redhat.com>
2771
2772         * trans-types.c (gfc_init_types): Ensure gfc_integer_types doesn't
2773         contain TYPE_STRING_FLAG types.
2774
2775 2009-04-08  Janne Blomqvist  <jb@gcc.gnu.org>
2776
2777         PR fortran/39670
2778         * invoke.texi (fdollar-ok): Fix typo.
2779         
2780 2009-04-08  Daniel Franke  <franke.daniel@gmail.com>
2781
2782         PR fortran/39670
2783         * invoke.texi (fdollar-ok): Clarify limitations.
2784
2785 2009-04-08  Paul Thomas  <pault@gcc.gnu.org>
2786
2787         PR fortran/38863
2788         * trans-array.c (gfc_trans_deferred_array): Return if this
2789         is a result variable.
2790
2791 2009-04-07  Janus Weil  <janus@gcc.gnu.org>
2792
2793         PR fortran/38152
2794         * trans-decl.c (gfc_get_symbol_decl): Correctly set decl location for
2795         procedure pointer decls.
2796
2797 2009-04-07  Janus Weil  <janus@gcc.gnu.org>
2798
2799         PR fortran/38290
2800         * expr.c (gfc_check_pointer_assign): Enable interface check for
2801         procedure pointers.
2802         * gfortran.h: Add copy_formal_args_intr.
2803         * interface.c (gfc_compare_interfaces): Call gfc_compare_intr_interfaces
2804         if second argument is an intrinsic.
2805         (compare_intr_interfaces): Correctly set attr.function, attr.subroutine
2806         and ts.
2807         (compare_parameter): Call gfc_compare_interfaces also for intrinsics.
2808         * resolve.c (resolve_specific_f0,resolve_specific_s0): Don't resolve
2809         intrinsic interfaces here. Must happen earlier.
2810         (resolve_symbol): Resolution of intrinsic interfaces moved here from
2811         resolve_specific_..., and formal args are now copied from intrinsic
2812         interfaces.
2813         * symbol.c (copy_formal_args_intr): New function to copy the formal
2814         arguments from an intinsic procedure.
2815
2816 2009-04-06  Paul Thomas  <pault@gcc.gnu.org>
2817
2818         PR fortran/38863
2819         * dependency.c (ref_same_as_full_array): New function.
2820         (gfc_dep_resolver): Call it.
2821
2822 2009-04-06  Janus Weil  <janus@gcc.gnu.org>
2823
2824         PR fortran/39414
2825         * decl.c (match_procedure_decl): Fix double declaration problems with
2826         PROCEDURE statements.
2827         * symbol.c (gfc_add_type): Ditto.
2828
2829 2009-04-06  Paul Thomas  <pault@gcc.gnu.org>
2830
2831         PR fortran/36091
2832         * trans-array.c (gfc_conv_array_ref): If the symbol has the
2833         temporary attribute use the array_spec for the bounds.
2834         * gfortran.h : Add the temporary field to the structure
2835         'symbol_attribute'.
2836         * trans-stmt.c (forall_make_variable_temp): Set the symbol's
2837         temporary attribute.
2838
2839 2009-04-05  Daniel Franke  <franke.daniel@gmail.com>
2840
2841         PR fortran/29458
2842         * trans-array.c (gfc_trans_array_constructor_value): Shadow
2843         implied do-loop variable to avoid spurious middle-end warnings.
2844
2845 2009-04-04  Tobias Burnus  <burnus@net-b.de>
2846
2847         PR fortran/39577
2848         * trans-decl.c (gfc_generate_function_code): Move recursive
2849         check to the right position.
2850
2851 2009-04-04  Paul Thomas  <pault@gcc.gnu.org>
2852
2853         PR fortran/37614
2854         * trans-common.c (translate_common): Do not offset the whole
2855         coomon block.
2856
2857 2009-04-03  Tobias Burnus  <burnus@net-b.de>
2858
2859         PR fortran/39594
2860         * resolve.c (resolve_common_vars): Add FL_VARIABLE to symbol
2861         if it is not a procedure pointer.
2862         * primary.c (match_actual_arg): Ditto.
2863
2864 2009-03-31  Joseph Myers  <joseph@codesourcery.com>
2865
2866         PR preprocessor/15638
2867         * cpp.c (cb_cpp_error): Handle CPP_DL_FATAL.
2868
2869 2009-03-30  Steven G. Kargl  <kargls@comcast.net>
2870
2871         PR fortran/38389
2872         * trans-stmt.c(gfc_trans_allocate): Add translation of ERRMSG.
2873         (gfc_trans_deallocate): Add translation of ERRMSG.  Remove stale
2874         comments.  Minor whitespace cleanup.
2875         * resolve.c(is_scalar_expr_ptr): Whitespace cleanup.
2876         (resolve_deallocate_expr (gfc_expr *e): Update error message.
2877         (resolve_allocate_expr):  Remove dead code.  Update error message.
2878         Move error checking to ...
2879         (resolve_allocate_deallocate): ... here.  Add additional error
2880         checking for STAT, ERRMSG, and allocate-objects.
2881         * match.c(gfc_match_allocate,gfc_match_deallocate):  Parse ERRMSG.
2882         Check for redundant uses of STAT and ERRMSG.  Reword error message
2883         and add checking for pointer, allocatable, and proc_pointer attributes.
2884
2885 2009-03-30  Paul Thomas  <pault@gcc.gnu.org>
2886
2887         PR fortran/22571
2888         PR fortran/26227
2889         PR fortran/24886
2890         * symbol.c : Add gfc_global_ns_list.
2891         * decl.c (add_global_entry): Set the namespace ('ns') field.
2892         * gfortran.h : Add the resolved field to gfc_namespace. Add the
2893         namespace ('ns') field to gfc_gsymbol.  Add flag_whole_file to
2894         gfc_option_t.  Add the prototype for gfc_free_dt_list.
2895         * lang.opt : Add the whole-file option.
2896         * invoke.texi : Document the whole-file option.
2897         * resolve.c (resolve_global_procedure): If the fwhole-file
2898         option is set, reorder gsymbols to ensure that translation is
2899         in the right order.  Resolve the gsymbol's namespace if that
2900         has not occurred and then check interfaces.
2901         (resolve_function): Move call to resolve_global_procedure.
2902         (resolve_call): The same.
2903         (resolve_codes): Store the current labels_obstack.
2904         (gfc_resolve) : Return if the namespace is already resolved.
2905         trans-decl.c (gfc_get_extern_function_decl): If the whole_file
2906         option is selected, use the backend_decl of a gsymbol, if it is
2907         available.
2908         parse.c (add_global_procedure, add_global_program): If the flag
2909         whole-file is set, add the namespace to the gsymbol.
2910         (gfc_parse_file): On -fwhole-file, put procedure namespaces on
2911         the global namespace list.  Rearrange to do resolution of all
2912         the procedures in a file, followed by their translation.
2913         * options.c (gfc_init_options): Add -fwhole-file.
2914         (gfc_handle_option): The same.
2915
2916 2009-03-30  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
2917
2918         * f95-lang.c (gfc_init_builtin_functions): Define BUILT_IN_HUGE_VAL
2919         family of intrinsics instead of BUILT_IN_INF family.
2920         * trans-intrinsics.c (gfc_conv_intrinsic_nearest): Use
2921         BUILT_IN_HUGE_VAL instead of BUILT_IN_INF.
2922
2923 2009-03-30  Jakub Jelinek  <jakub@redhat.com>
2924
2925         * trans-types.c (gfc_sym_type, gfc_return_by_reference): For
2926         sym->attr.result check sym->ns->proc_name->attr.is_bind_c.
2927
2928 2009-03-30  Joseph Myers  <joseph@codesourcery.com>
2929
2930         PR rtl-optimization/323
2931         * options.c (gfc_post_options): Set
2932         flag_excess_precision_cmdline.  Give an error for
2933         -fexcess-precision=standard for processors where the option is
2934         significant.
2935
2936 2009-03-29  Joseph Myers  <joseph@codesourcery.com>
2937
2938         PR preprocessor/34695
2939         * cpp.c (cb_cpp_error): New.
2940         (gfc_cpp_post_options): Don't set cpp_option->inhibit_warnings.
2941         Don't check cpp_errors (cpp_in).
2942         (gfc_cpp_init_0): Set cb->error.
2943
2944 2009-03-29  Steven G. Kargl  <kargl@gcc.gnu.org>
2945
2946         PR fortran/38823
2947         * gfortran.h: Add ARITH_PROHIBIT to arith enum.
2948         expr.c (gfc_match_init_expr): Add global variable init_flag to
2949         flag matching an initialization expression.
2950         (check_intrinsic_op): Move no longer reachable error message to ...
2951         * arith.c (arith_power): ... here.  Remove gfc_ prefix in
2952         gfc_arith_power.  Use init_flag.  Allow constant folding of x**y
2953         when y is REAL or COMPLEX.
2954         (eval_intrinsic): Remove restriction that y in x**y must be INTEGER
2955         for constant folding.
2956         * gfc_power: Update gfc_arith_power to arith_power
2957
2958 2009-03-29  Daniel Kraft  <d@domob.eu>
2959
2960         PR fortran/37423
2961         * gfortran.h (struct gfc_typebound_proc): Added new flag "deferred" and
2962         added a comment explaining DEFERRED binding handling.
2963         * decl.c (match_binding_attributes): Really match DEFERRED attribute.
2964         (match_procedure_in_type): Really match PROCEDURE(interface) syntax
2965         and do some validity checks for DEFERRED and this construct.
2966         * module.c (binding_overriding): New string constant for DEFERRED.
2967         (mio_typebound_proc): Module-IO DEFERRED flag.
2968         * resolve.c (check_typebound_override): Ensure that a non-DEFERRED
2969         binding is not overridden by a DEFERRED one.
2970         (resolve_typebound_procedure): Allow abstract interfaces as targets
2971         for DEFERRED bindings.
2972         (ensure_not_abstract_walker), (ensure_not_abstract): New methods.
2973         (resolve_fl_derived): Use new "ensure_not_abstract" method for
2974         non-ABSTRACT types extending ABSTRACT ones to ensure each DEFERRED
2975         binding is overridden.
2976         (check_typebound_baseobject): New method.
2977         (resolve_compcall), (resolve_typebound_call): Check base-object of
2978         the type-bound procedure call.
2979         * gfc-internals.texi (Type-bound procedures): Document a little bit
2980         about internal handling of DEFERRED bindings.
2981
2982 2009-03-29  Tobias Schlüter  <tobi@gcc.gnu.org>
2983
2984         PR fortran/38507
2985         * gfortran.h (gfc_st_label): Fix comment.
2986         (gfc_exec_op): Add statement code EXEC_END_BLOCK for end of block.
2987         * parse.c (accept_statement): Use EXEC_END_BLOCK for END IF and
2988         END SELECT with labels.
2989         (check_do_closure): Fix formatting.
2990         (parse_do_block): Fix typo in error message.
2991         * resolve.c (code_stack): Remove tail member.  Update comment to
2992         new use of reachable_labels.
2993         (reachable_labels): Rename to ...
2994         (find_reachable_labels): ... this.  Overhaul.  Update preceding
2995         comment.
2996         (resolve_branch): Fix comment preceding function.  Rewrite.
2997         (resolve_code): Update call to find_reachable_labels.  Add code to
2998         deal with EXEC_END_BLOCK.
2999         * st.c (gfc_free_statement): Add code to deal with EXEC_END_BLOCK.
3000         Add 2009 to copyright years.
3001         * trans.c (gfc_trans_code): Likewise on both counts.
3002
3003 2009-03-31  Paul Thomas  <pault@gcc.gnu.org>
3004
3005         PR fortran/38917
3006         * expr.c (gfc_check_assign): Allow pointer components when
3007         checking for NULL.
3008
3009         PR fortran/38918
3010         * resolve.c (check_data_variable): Treat pointer arrays with
3011         scalars.
3012
3013 2009-03-31  Paul Thomas  <pault@gcc.gnu.org>
3014
3015         PR fortran/38915
3016         * trans-expr.c (gfc_trans_assignment_1): Ensure temporaries
3017         have a string_length.
3018
3019 2009-03-28  Tobias Burnus  <burnus@net-b.de>
3020
3021         PR fortran/34656
3022         * trans-stmt.c (gfc_trans_simple_do, gfc_trans_do):
3023         Add GFC_RTCHECK_DO support.
3024         * option.c (gfc_handle_runtime_check_option): Enable GFC_RTCHECK_DO.
3025         * invoke.texi (-fcheck): Document "do" option.
3026
3027 2009-03-28  Paul Thomas  <pault@gcc.gnu.org>
3028
3029         PR fortran/38538
3030         * trans-array.c (get_elemental_fcn_charlen): Remove.
3031         (get_array_charlen): New function to replace previous.
3032
3033 2009-03-28  Paul Thomas  <pault@gcc.gnu.org>
3034
3035         PR fortran/38765
3036         * parse.c (parse_derived): Do not break on finding pointer,
3037         allocatable or private components.
3038
3039 2009-03-28  Tobias Burnus  <burnus@net-b.de>
3040
3041         PR fortran/32626
3042         * option.c (gfc_handle_runtime_check_option): Enable recursion check.
3043         * trans-decl.c (gfc_generate_function_code): Add recursion check.
3044         * invoke.texi (-fcheck): Add recursive option.
3045
3046 2009-03-28  Tobias Burnus  <burnus@net-b.de>
3047
3048         PR fortran/38432
3049         * resolve.c (gfc_resolve_iterator): Add zero-loop warning.
3050
3051 2009-03-28  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3052             Paul Thomas  <pault@gcc.gnu.org>
3053             Tobias Burnus  <burnus@net-b.de>
3054
3055         * gfortran.h (gfc_option_t): Add rtcheck.
3056         * lang.opt: New option -fcheck.
3057         * libgfortran.h: Add GFC_RTCHECK_* constants.
3058         * invoke.texi: Document -fcheck.
3059         * options.c (gfc_handle_runtime_check_option): New function.
3060         (gfc_init_options,gfc_post_options,gfc_handle_option):
3061         Add -fcheck option.
3062
3063 2009-03-27  Richard Guenther  <rguenther@suse.de>
3064
3065         * trans-array.c (gfc_conv_descriptor_data_addr): Use
3066         gfc_build_addr_expr instead of build_fold_addr_expr.
3067         (gfc_trans_allocate_array_storage, gfc_trans_array_constructor_value,
3068         gfc_trans_constant_array_constructor, gfc_conv_array_data,
3069         gfc_conv_expr_descriptor, gfc_conv_array_parameter): Likewise.
3070         * trans-expr.c (gfc_conv_missing_dummy, gfc_conv_variable,
3071         gfc_conv_function_val, gfc_conv_operator_assign,
3072         gfc_conv_subref_array_arg, gfc_conv_function_call,
3073         gfc_conv_expr_reference, gfc_trans_scalar_assign): Likewise.
3074         * trans-intrinsic.c (gfc_conv_intrinsic_exponent,
3075         gfc_conv_intrinsic_ctime, gfc_conv_intrinsic_fdate,
3076         gfc_conv_intrinsic_ttynam, gfc_conv_intrinsic_minmax_char,
3077         gfc_conv_intrinsic_fraction, gfc_conv_intrinsic_spacing,
3078         gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_set_exponent,
3079         gfc_conv_intrinsic_array_transfer, gfc_conv_intrinsic_transfer,
3080         gfc_conv_intrinsic_si_kind, gfc_conv_intrinsic_trim): Likewise.
3081         * trans-io.c (gfc_trans_io_runtime_check, set_parameter_ref,
3082         gfc_convert_array_to_string, gfc_trans_open, gfc_trans_close,
3083         build_filepos, gfc_trans_inquire, gfc_trans_wait,
3084         nml_get_addr_expr, transfer_namelist_element, build_dt,
3085         gfc_trans_dt_end, transfer_array_component, transfer_expr,
3086         transfer_array_desc, gfc_trans_transfer): Likewise.
3087         * trans-stmt.c (gfc_trans_allocate, gfc_trans_deallocate): Likewise.
3088         * trans.c (gfc_build_addr_expr): Mark the base of the address
3089         TREE_ADDRESSABLE.
3090
3091 2009-03-27  Tobias Burnus  <burnus@net-b.de>
3092
3093         * gfortran.h (enum init_local_real.): Add GFC_INIT_REAL_SNAN.
3094         (gfc_expr): Add is_snan.
3095         * trans-const.c (gfc_conv_mpfr_to_tree): Support SNaN.
3096         (gfc_conv_constant_to_tree): Update call to gfc_conv_mpfr_to_tree.
3097         * trans-const.h (gfc_conv_mpfr_to_tree): Update prototype.
3098         * resolve.c (build_default_init_expr): Update call.
3099         * target-memory.c (encode_float): Ditto.
3100         * trans-intrinsic.c (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod,
3101
3102 2009-03-18  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
3103
3104         * lang.opt: Unify help texts for -I, -Wconversion, -d, -fopenmp,
3105         and -fpreprocessed.
3106
3107 2009-03-06  Alexandre Oliva <aoliva@redhat.com>
3108
3109         * simplify.c (gfc_simplify_transfer): Zero-initialize the
3110         buffer.
3111
3112 2009-02-27  Tobias Burnus  <burnus@net-b.de>
3113
3114         PR fortran/39309
3115         * module.c (read_md5_from_module_file): Add missing quote.
3116
3117 2009-02-27  Tobias Burnus  <burnus@net-b.de>
3118
3119         PR fortran/39309
3120         * module.c (read_md5_from_module_file): Include mod version
3121         in had-changed test.
3122
3123 2009-02-26  Paul Thomas  <pault@gcc.gnu.org>
3124
3125         PR fortran/39295
3126         * interface.c (compare_type_rank_if): Return 1 if the symbols
3127         are the same and deal with external procedures where one is
3128         identified to be a function or subroutine by usage but the
3129         other is not.
3130
3131 2009-02-26  Paul Thomas  <pault@gcc.gnu.org>
3132
3133         PR fortran/39292
3134         * trans-array.c (gfc_conv_array_initializer): Convert all
3135         expressions rather than ICEing.
3136
3137 2009-02-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
3138
3139         PR fortran/38914
3140         * array.c (ref_dimen_size):  Rename to gfc_ref_dimen_size,
3141         make global.  Change function name in error messages.
3142         (ref_size):  Change ref_dimen_size to gfc_ref_dimen_size.
3143         (gfc_array_ref_shape):  Likewise.
3144         * gfortran.h:  Add prototype for gfc_ref_dimen_size.
3145         * simplify.c (simplify_bound_dim):  Add ref argument.
3146         If the reference isn't a full array, return one for
3147         the lower bound and the extent for the upper bound.
3148         (simplify_bound):  For array sections, take as from the
3149         argument.  Add reference to all to simplify_bound_dim.
3150
3151 2009-02-19  Daniel Franke  <franke.daniel@gmail.com>
3152
3153         * scanner.c (load_line): At end of line, skip '\r' without setting
3154         the truncation flag.
3155
3156 2009-02-18  Daniel Kraft  <d@domob.eu>
3157
3158         * gfortran.texi: New chapter about compiler characteristics.
3159         (Compiler Characteristics): Document KIND type parameters here.
3160
3161 2009-02-18  Tobias Burnus  <burnus@net-b.de>
3162
3163         * intrinsic.texi (MALLOC): Make example more portable.
3164
3165 2009-02-13  Mikael Morin  <mikael.morin@tele2.fr>
3166
3167         PR fortran/38259
3168         * module.c (gfc_dump_module,gfc_use_module): Add module
3169         version number.
3170
3171 2009-02-13  Paul Thomas  <pault@gcc.gnu.org>
3172
3173         PR fortran/36703
3174         PR fortran/36528
3175         * trans-expr.c (gfc_conv_function_val): Stabilize Cray-pointer
3176         function references to ensure that a valid expression is used.
3177         (gfc_conv_function_call): Pass Cray pointers to procedures.
3178
3179 2009-02-03  Jakub Jelinek  <jakub@redhat.com>
3180
3181         * gfortranspec.c (lang_specific_driver): Update copyright notice
3182         dates.
3183
3184 2009-01-28  Paul Thomas  <pault@gcc.gnu.org>
3185
3186         PR fortran/38852
3187         PR fortran/39006
3188         * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use the array
3189         descriptor ubound for UBOUND, when the array lbound == 1.
3190
3191 2009-01-27  Daniel Kraft  <d@domob.eu>
3192
3193         PR fortran/38883
3194         * trans-stmt.c (gfc_conv_elemental_dependencies):  Create temporary
3195         for the real type needed to make it work for subcomponent-references.
3196
3197 2009-01-21  Daniel Kraft  <d@domob.eu>
3198
3199         * trans-stmt.c (gfc_conv_elemental_dependencies):  Cleaned up comment.
3200
3201 2009-01-20  Paul Thomas  <pault@gcc.gnu.org>
3202
3203         PR fortran/38907
3204         * resolve.c (check_host_association): Remove the matching to
3205         correct an incorrect host association and use manipulation of
3206         the expression instead.
3207
3208 2009-01-20  Tobias Burnus  <burnus@net-b.de>
3209
3210         * invoke.texi (RANGE): RANGE also takes INTEGER arguments.
3211
3212 2009-01-19  Mikael Morin  <mikael.morin@tele2.fr>
3213
3214         PR fortran/38859
3215         * simplify.c (simplify_bound): Don't use array specification
3216         if variable or component has subsequent references.
3217
3218 2009-01-17  Paul Thomas  <pault@gcc.gnu.org>
3219
3220         PR fortran/38657
3221         * module.c (write_common_0): Add argument 'this_module' and
3222         check that non-use associated common blocks are written first.
3223         (write_common): Call write_common_0 twice, once with true and
3224         then with false.
3225
3226 2009-01-17  Paul Thomas  <pault@gcc.gnu.org>
3227
3228         PR fortran/34955
3229         * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): Has
3230         been absorbed into gfc_conv_intrinsic_transfer. All
3231         references to it in trans-intrinsic.c have been changed
3232         accordingly.  PR fixed by using a temporary for scalar
3233         character transfer, when the source is shorter than the
3234         destination.
3235
3236 2009-01-17  Paul Thomas  <pault@gcc.gnu.org>
3237
3238         PR fortran/38657
3239         * module.c (write_common_0): Revert patch of 2009-01-05.
3240
3241 2009-01-16  Janus Weil  <janus@gcc.gnu.org>
3242
3243         PR fortran/38152
3244         * expr.c (gfc_check_pointer_assign): Allow use-associated procedure
3245         pointers as lvalue.
3246         * trans-decl.c (get_proc_pointer_decl,gfc_create_module_variable):
3247         Enable procedure pointers as module variables.
3248
3249 2009-01-14  Steven G. Kargl  <kargl@gcc.gnu.org>
3250
3251         * ChangeLog-2007: Clean out svn merge droppings.
3252
3253 2009-01-10  Paul Thomas  <pault@gcc.gnu.org>
3254
3255         PR fortran/38763
3256         * target-memory.c (encode_derived): Encode NULL.
3257
3258 2009-01-10  Paul Thomas  <pault@gcc.gnu.org>
3259
3260         PR fortran/38765
3261         * resolve.c (check_host_association): Use the symtree name to
3262         search for a potential contained procedure, since this is the
3263         name by which it would be referenced.
3264
3265 2009-01-06  Thomas Koenig  <tkoenig@gcc.gnu.org>
3266
3267         PR fortran/38220
3268         * interface.c (gfc_procedure_use):  Don't warn about functions
3269         from ISO_C_BINDING.
3270         * symbol.c (generate_isocbinding_symbol):  Mark c_loc and
3271         c_funloc as pure.
3272
3273 2009-01-05  Paul Thomas  <pault@gcc.gnu.org>
3274
3275         PR fortran/38657
3276         * module.c (write_common_0): Use the name of the symtree rather
3277         than the common block, to determine if the common has been
3278         written.
3279
3280 2009-01-05  Daniel Franke  <franke.daniel@gmail.com>
3281
3282         PR fortran/37159
3283         * check.c (gfc_check_random_seed): Added size check for GET
3284         dummy argument, reworded error messages to follow common pattern.
3285
3286 2009-01-05  Thomas Koenig  <tkoenig@gcc.gnu.org>
3287
3288         PR fortran/38672
3289         * trans-types.c (gfc_get_derived_type):  Check for the
3290         presence of derived->ns->proc_name before
3291         accessing derived->ns->proc_name->attr.flavor .
3292         * resolve.c (resolve_symbol):  Likewise.
3293
3294 2009-01-05  Paul Thomas  <pault@gcc.gnu.org>
3295
3296         PR fortran/38665
3297         * gfortran.h : Add bit to gfc_expr 'user_operator'
3298         * interface.c (gfc_extend_expr): Set the above if the operator
3299         is substituted by a function. 
3300         * resolve.c (check_host_association): Return if above is set.
3301
3302 2009-01-04  Mikael Morin  <mikael.morin@tele2.fr>
3303
3304         PR fortran/35681
3305         * ChangeLog-2008: Fix function name.
3306
3307         PR fortran/38487
3308         * dependency.c (gfc_check_argument_var_dependency):
3309         Move the check for pointerness inside the if block
3310         so that it doesn't affect the return value.
3311
3312         PR fortran/38669
3313         * trans-stmt.c (gfc_trans_call):
3314         Add the dependency code after the loop bounds calculation one.
3315
3316 2009-01-04  Daniel Franke  <franke.daniel@gmail.com>
3317
3318         * intrinsic.c (do_simplify): Removed already implemented TODO.
3319
3320 2009-01-04  Daniel Franke  <franke.daniel@gmail.com>
3321
3322         PR fortran/38718
3323         * simplify.c (gfc_simplify_merge): New.
3324         * intrinsic.h (gfc_simplify_merge): New prototype.
3325         * intrinsic.c (add_functions): Added simplification for MERGE.
3326
3327 2009-01-04  Mikael Morin  <mikael.morin@tele2.fr>
3328
3329         PR fortran/38536
3330         * gfortran.h (gfc_is_data_pointer): Added prototype
3331         * resolve.c (gfc_iso_c_func_interface):
3332         Use gfc_is_data_pointer to test for pointer attribute.
3333         * dependency.c (gfc_is_data_pointer):
3334         Support pointer-returning functions.
3335
3336 2009-01-03  Daniel Franke  <franke.daniel@gmail.com>
3337
3338         * symbol.c (save_symbol): Don't SAVE function results.
3339
3340 2009-01-03  Paul Thomas  <pault@gcc.gnu.org>
3341
3342         PR fortran/38594
3343         * resolve.c (resolve_call): When searching for proper host
3344         association, use symtree rather than symbol.  For everything
3345         except generic subroutines, substitute the symtree in the call
3346         rather than the symbol.
3347
3348 \f
3349 Copyright (C) 2009 Free Software Foundation, Inc.
3350
3351 Copying and distribution of this file, with or without modification,
3352 are permitted in any medium without royalty provided the copyright
3353 notice and this notice are preserved.