OSDN Git Service

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