OSDN Git Service

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