OSDN Git Service

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