OSDN Git Service

2006-10-30 Andrew Pinski <pinskia@gmail.com>
[pf3gnuchains/gcc-fork.git] / gcc / fortran / ChangeLog
1 2006-10-30  Andrew Pinski  <pinskia@gmail.com>
2
3         PR fortran/29410
4         * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer):
5         Change over to create VIEW_CONVERT_EXPR instead of using an
6         ADDR_EXPR, a cast and then an indirect reference
7
8 2006-10-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
9
10         * trans-intrinsic.c (gfc_conv_intrinsic_loc): Make LOC return a
11         signed integer node.
12
13 2006-10-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
14
15         PR fortran/17741
16         * decl.c (get_proc_name): Bump current namespace refs count.
17
18 2006-10-29  Jakub Jelinek  <jakub@redhat.com>
19
20         PR fortran/29629
21         * trans-openmp.c (gfc_trans_omp_array_reduction): Set attr.flavor
22         of init_val_sym and outer_sym to FL_VARIABLE.
23
24 2006-10-29  Kazu Hirata  <kazu@codesourcery.com>
25
26         * intrinsic.texi: Fix a typo.
27
28 2006-10-27  Steven G. Kargl  <kargl@gcc.gnu.org>
29
30         * gfortran.h: Remove GFC_MPFR_TOO_OLD.
31         * arith.c (arctangent2): Remove function
32         (gfc_check_real_range): Remove subnormal kludge.
33         * arith.h: Remove arctangent2 prototype.
34         * simplify.c: (gfc_simplify_atan2): Remove use of arctangent2.
35         (gfc_simplify_exponent, gfc_simplify_log, gfc_simplify_nearest,
36         gfc_simplify_rrspacing, gfc_simplify_spacing): Remove mpfr kludges.
37
38 2006-10-28  Tobias Burnus  <burnus@net-b.de>
39
40         PR fortran/28224
41         * io.c (check_io_constraints): Allow namelists
42           for internal files for Fortran 2003.
43
44 2006-10-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
45
46         PR fortran/27954
47         * decl.c (gfc_free_data_all): New function to free all data structures
48         after errors in DATA statements and declarations.
49         (top_var_list): Use new function.(top_val_list): Use new function.
50         (gfc_match_data_decl): Use new function.
51         * misc.c (gfc_typename): Fixed incorrect function name in error text. 
52
53 2006-10-24  Erik Edelmann  <eedelman@gcc.gnu.org>
54
55         PR fortran/29393
56         * expr.c (simplify_parameter_variable): Keep rank of original
57         expression.
58
59 2006-10-23 Rafael Avila de Espindola  <rafael.espindola@gmail.com>
60
61         * Make-lang.in (f951$(exeext)): Depend on and link with attribs.o.
62         * trans.h (builtin_function): Rename to gfc_builtin_function.
63         Change the signature.
64         * 95-lang.c (LANG_HOOKS_BUILTIN_FUNCTION): Define as
65         gfc_builtin_function.
66         (builtin_function): Rename to gfc_builtin_function. Move common
67         code to builtin_function.
68         (gfc_define_builtin): Replace calls to builtin_function with
69         gfc_define_builtin.
70
71 2006-10-22  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
72
73         PR fortran/26025
74         * lang.opt: Add -fexternal-blas and -fblas-matmul-limit options.
75         * options.c (gfc_init_options): Initialize new flags.
76         (gfc_handle_option): Handle new flags.
77         * gfortran.h (gfc_option): Add flag_external_blas and
78         blas_matmul_limit flags.
79         * trans-expr.c (gfc_conv_function_call): Use new argument
80         append_args, appending it at the end of the argument list
81         built for a function call.
82         * trans-stmt.c (gfc_trans_call): Use NULL_TREE for the new
83         append_args argument to gfc_trans_call.
84         * trans.h (gfc_conv_function_call): Update prototype.
85         * trans-decl.c (gfc_build_intrinsic_function_decls): Add
86         prototypes for BLAS ?gemm routines.
87         * trans-intrinsic.c (gfc_conv_intrinsic_funcall): Generate the
88         extra arguments given to the library matmul function, and give
89         them to gfc_conv_function_call.
90         * invoke.texi: Add documentation for -fexternal-blas and
91         -fblas-matmul-limit.
92
93 2006-10-21  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
94
95         * Make-lang.in (F95_LIBS): Delete.
96         * f951$(exeext): Use $(LIBS) instead of $(F95_LIBS).
97         * config-lang.in (need_gmp): Delete.
98
99 2006-10-19  Brooks Moses  <bmoses@stanford.edu>
100
101         * invoke.texi: Fixed "denormal" typo.
102
103 2006-10-19  Paul Thomas <pault@gcc.gnu.org>
104
105         PR fortran/29216
106         PR fortran/29314
107         * gfortran.h : Add EXEC_INIT_ASSIGN.
108         * dump-parse-tree.c (gfc_show_code_node): The same.
109         * trans-openmp.c (gfc_trans_omp_array_reduction): Set new
110         argument for gfc_trans_assignment to false.
111         * trans-stmt.c (gfc_trans_forall_1): The same.
112         * trans-expr.c (gfc_conv_function_call, gfc_trans_assign,
113         gfc_trans_arrayfunc_assign, gfc_trans_assignment): The
114         same. In the latter function, use the new flag to stop
115         the checking of the lhs for deallocation.
116         (gfc_trans_init_assign): New function.
117         * trans-stmt.h : Add prototype for gfc_trans_init_assign.
118         * trans.c (gfc_trans_code): Implement EXEC_INIT_ASSIGN.
119         * trans.h : Add new boolean argument to the prototype of
120         gfc_trans_assignment.
121         * resolve.c (resolve_allocate_exp): Replace EXEC_ASSIGN by
122         EXEC_INIT_ASSIGN.
123         (resolve_code): EXEC_INIT_ASSIGN does not need resolution.
124         (apply_default_init): New function.
125         (resolve_symbol): Call it for derived types that become
126         defined but which do not already have an initialization
127         expression..
128         * st.c (gfc_free_statement): Include EXEC_INIT_ASSIGN.
129
130 2006-10-16  Tobias Burnus  <burnus@net-b.de>
131
132         * primary.c: Revert 'significand'-to-'significant' comment change.
133         * invoke.texi (Warning Options): Minor cleanup for
134           -Wimplicit-interface.
135
136 2006-10-17  Paul Thomas <pault@gcc.gnu.org>
137
138         PR fortran/20541
139         * trans-array.c (gfc_trans_array_bounds): Test for and set
140         negative stride of a non-constant bound array to zero.
141
142         PR fortran/29392
143         * data.c (create_character_intializer): Copy and simplify
144         the expressions for the start and end of a sub-string
145         reference.
146
147 2006-10-16  Kaz Kojima  <kkojima@rr.iij4u.or.jp>
148
149         * io.c (gfc_match_close): Ensure that status is terminated by
150         a NULL element.
151
152 2006-10-16  Tobias Burnus <burnus@net-b.de>
153
154         * trans-stmt.c: Fix a typo
155         * invoke.texi: Fix typos
156         * resolve.c: Fix a comment typo
157         * trans-decl.c: Fix a comment typo
158         * primary.c: Fix a comment typo
159
160 2006-10-15  Steven G. Kargl  <kargl@gcc.gnu.org>
161
162         PR fortran/29403
163         * io.c (match_io):  Check for a default-char-expr for PRINT format.
164
165 2006-10-15  Bernhard Fischer  <aldot@gcc.gnu.org>
166
167         PR fortran/24767
168         * lang.opt (Wunused-labels): Remove.
169         * options.c: Remove references to gfc_option.warn_unused_labels.
170         * gfortran.h: Remove variable warn_unused_labels.               
171         * resolve.c (warn_unused_fortran_label) : Use warn_unused_label
172         instead of gfc_option.warn_unused_labels.
173         * invoke.texi: Remove documentation of -Wunused-labels.
174
175 2006-10-14  Tobias Burnus  <burnus@net-b.de>
176
177         * gfortran.texi: Add link to GFortran apps
178         * intrinsic.texi: Updated documentation of ACCESS and CHMOD
179
180 2006-10-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
181
182         PR fortran/19261
183         * scanner.c (load_line): Add checks for illegal use of '&' and issue
184         warnings.  Issue errors with -pedantic.
185
186 2006-10-14 Paul Thomas <pault@gcc.gnu.org>
187
188         PR fortran/29371
189         * trans-expr.c (gfc_trans_pointer_assignment): Add the expression
190         for the assignment of null to the data field to se->pre, rather
191         than block.     
192
193 2006-10-14  Kazu Hirata  <kazu@codesourcery.com>
194
195         * intrinsic.texi: Fix typos.
196         * trans-array.c: Fix a comment typo.
197
198 2006-10-13  Brooks Moses  <bmoses@stanford.edu>
199
200         * intrinsic.texi (STAT): Reverted a format in example code to
201         octal; noted this in accompanying string.
202
203 2006-10-13 Paul Thomas <pault@gcc.gnu.org>
204
205         PR fortran/29373
206         * decl.c (get_proc_name, gfc_match_function_decl): Add
207         attr.implicit_type to conditions that throw error for
208         existing explicit interface and that allow new type-
209         spec to be applied.
210
211         PR fortran/29407
212         * resolve.c (resolve_fl_namelist): Do not check for
213         namelist/procedure conflict, if the symbol corresponds
214         to a good local variable declaration.
215
216         PR fortran/27701
217         * decl.c (get_proc_name): Replace the detection of a declared
218         procedure by the presence of a formal argument list by the
219         attributes of the symbol and the presence of an explicit
220         interface.
221
222         PR fortran/29232
223         * resolve.c (resolve_fl_variable): See if the host association
224         of a derived type is blocked by the presence of another type I
225         object in the current namespace.
226
227         PR fortran/29364
228         * resolve.c (resolve_fl_derived): Check for the presence of
229         the derived type for a derived type component.
230
231         PR fortran/24398
232         * module.c (gfc_use_module): Check that the first words in a
233         module file are 'GFORTRAN module'.
234
235         PR fortran/29422
236         * resolve.c (resolve_transfer): Test functions for suitability
237         for IO, as well as variables.
238
239         PR fortran/29428
240         * trans-expr.c (gfc_trans_scalar_assign): Remove nullify of
241         rhs expression.
242
243 2006-10-13  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
244
245         PR fortran/29391
246         * trans-intrinsic.c (gfc_conv_intrinsic_bound): Generate correct
247         code for LBOUND and UBOUND intrinsics.
248
249 2006-10-13  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
250
251         PR fortran/21435
252         * io.c (compare_to_allowed_values): New function.
253         (gfc_match_open): Add checks for constant values of specifiers.
254         (gfc_match_close): Add checks for constant values of the STATUS
255         specifier.
256
257 2006-10-12  Brooks Moses  <bmoses@stanford.edu>
258
259         * intrinsic.texi (STAT): Fixed a format typo in sample code.
260
261 2006-10-12  Brooks Moses  <bmoses@stanford.edu>
262
263         * intrinsic.texi (STAT): Shortened lines in sample code.
264
265 2006-10-11  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
266
267         * gfortran.h (gfc_show_actual_arglist, gfc_show_array_ref,
268         gfc_show_array_spec, gfc_show_attr, gfc_show_code,
269         gfc_show_components, gfc_show_constructor, gfc_show_equiv,
270         gfc_show_expr, gfc_show_namelist, gfc_show_ref, gfc_show_symbol,
271         gfc_show_typespec): Add prototypes.
272         * dump-parse-tree.c (gfc_show_actual_arglist, gfc_show_array_ref,
273         gfc_show_array_spec, gfc_show_attr, gfc_show_code,
274         gfc_show_components, gfc_show_constructor, gfc_show_equiv,
275         gfc_show_expr, gfc_show_namelist, gfc_show_ref, gfc_show_symbol,
276         gfc_show_typespec): Remove 'static' from declaration.
277
278 2006-10-10  Brooks Moses  <bmoses@stanford.edu>
279
280         * invoke.texi, gfortran.texi: Corrected erronous dashes.
281
282 2006-10-10  Brooks Moses  <bmoses@stanford.edu>
283
284         * Make-lang.in: Added "fortran.pdf", "gfortran.pdf" target
285         support.
286
287 2006-10-10  Daniel Franke  <franke.daniel@gmail.com>
288
289         * intrinsic.texi: added documentation for FSTAT, GETARG,GET_COMMAND,
290         GET_COMMAND_ARGUMENT, GETENV, GET_ENVIRONMENT_VARIABLE, IAND, IARGC,
291         LSTAT and STAT, removed the reference to PR19292 from ACCESS, CHMOD,
292         GMTIME, LSHIFT, LTIME, RSHIFT.
293
294 2006-10-10  Brooks Moses  <bmoses@stanford.edu>
295
296         * gfortran.texi (Standards): Update to current status.
297
298 2006-10-09  Brooks Moses  <bmoses@stanford.edu>
299
300         * Make-lang.in: Added intrinsic.texi to GFORTRAN_TEXI
301         dependences.
302
303 2006-10-09  Brooks Moses  <bmoses@stanford.edu>
304
305         * intrinsic.texi (MOVE_ALLOC): changed "Options" to "Standards".
306
307 2006-10-09  Steven G. Kargl  <kargl@gcc.gnu.org>
308
309         * gfortran.h: Define GFC_MPFR_TOO_OLD via mpfr version info.
310         * arith.c (arctangent, gfc_check_real_range): Use it.   
311         * simplify.c (gfc_simplify_atan2, gfc_simplify_exponent,
312         gfc_simplify_log, gfc_simplify_nearest): Use it.
313
314         PR fortran/15441
315         PR fortran/29312
316         * iresolve.c (gfc_resolve_rrspacing): Give rrspacing library
317         routine hidden precision argument.
318         (gfc_resolve_spacing): Give spacing library routine hidden
319         precision, emin - 1, and tiny(x) arguments.
320         * simplify.c (gfc_simplify_nearest): Remove explicit subnormalization.
321         (gfc_simplify_rrspacing): Implement formula from Fortran 95 standard.
322         (gfc_simplify_spacing): Implement formula from Fortran 2003 standard.
323         * trans-intrinsic.c (gfc_intrinsic_map_t) Declare rrspacing and
324         spacing via LIBF_FUNCTION
325         (prepare_arg_info, call_builtin_clz, gfc_conv_intrinsic_spacing,
326         gfc_conv_intrinsic_rrspacing): Remove functions.
327         (gfc_conv_intrinsic_function): Remove calls to
328         gfc_conv_intrinsic_spacing and gfc_conv_intrinsic_rrspacing.
329         * f95-lang.c (gfc_init_builtin_functions): Remove __builtin_clz,
330         __builtin_clzl and __builtin_clzll
331
332 2006-10-09  Richard Henderson  <rth@redhat.com>
333
334         Revert emutls patch.
335
336 2006-10-09  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
337
338         * intrinsic.c (add_sym_0s, add_sym_1s, add_sym_2s, add_sym_3s,
339         add_sym_4s, add_sym_5s, add_functions): Use macro ACTUAL_NO,
340         ACTUAL_YES, NOT_ELEMENTAL and ELEMENTAL instead of constants
341         0 and 1 as second and third arguments to add_sym* functions.
342
343 2006-10-08  Erik Edelmann <edelmann@gcc.gnu.org>
344             Paul Thomas <pault@gcc.gnu.org>
345
346         PR fortran/20541
347         * interface.c (gfc_compare_derived_types): Add comparison of
348         the allocatable field.
349         * intrinsic.c (add_subroutines): Add MOVE_ALLOC.
350         * trans-expr.c (gfc_conv_aliased_arg, gfc_trans_subarray_assign,
351         gfc_trans_subcomponent_assign, gfc_conv_string_parameter,
352         gfc_trans_scalar_assign): Add extra arguments l_is_temp
353         and r_is_var to references to latter function.
354         (gfc_conv_function_call): Add enum for types of argument and
355         an associated variable parm_kind. Deallocate components of
356         INTENT(OUT) and non-variable arrays.
357         (gfc_trans_subcomponent_assign): Add block to assign arrays
358         to allocatable components.
359         (gfc_trans_scalar_assign): Add block to handle assignments of
360         derived types with allocatable components, using the above new
361         arguments to control allocation/deallocation of memory and the
362         copying of allocated arrays.
363         * trans-array.c (gfc_array_allocate): Remove old identification 
364         of pointer and replace with that of an allocatable array. Add
365         nullify of structures with allocatable components. 
366         (gfc_conv_array_initializer): Treat EXPR_NULL.
367         (gfc_conv_array_parameter): Deallocate allocatable components
368         of non-variable structures.
369         (gfc_trans_dealloc_allocated): Use second argument of library
370         deallocate to inhibit, without error, freeing NULL pointers.
371         (get_full_array_size): New function to return the size of a
372         full array.
373         (gfc_duplicate_allocatable): New function to allocate and copy
374         allocated data.
375         (structure_alloc_comps): New recursive function to deallocate,
376         nullify or copy allocatable components.
377         (gfc_nullify_alloc_comp, gfc_deallocate_alloc_comp,
378         gfc_copy_alloc_comp): New interface functions to call previous.
379         (gfc_trans_deferred_array): Add the code to nullify allocatable
380         components, when entering scope, and to deallocate them on
381         leaving. Do not call gfc_trans_static_array_pointer and return
382         for structures with allocatable components and default
383         initializers.
384         * symbol.c (gfc_set_component_attr): Set allocatable field.
385         (gfc_get_component_attr): Set the allocatable attribute.
386         * intrinsic.h : Prototype for gfc_check_move_alloc.
387         * decl.c (build_struct): Apply TR15581 constraints for
388         allocatable components.
389         (variable_decl): Default initializer is always NULL for
390         allocatable components.
391         (match_attr_spec): Allow, or not, allocatable components,
392         according to the standard in force.
393         * trans-array.h : Prototypes for gfc_nullify_alloc_comp,
394         gfc_deallocate_alloc_comp, gfc_copy_alloc_comp and
395         gfc_duplicate_allocatable.
396         * gfortran.texi : Add mention of TR15581 extensions.
397         * gfortran.h : Add attribute alloc_comp, add
398         gfc_components field allocatable and add the prototype
399         for gfc_expr_to_initialize.
400         * trans-stmt.c (generate_loop_for_temp_to_lhs,
401         generate_loop_for_rhs_to_temp, gfc_trans_where_assign,
402         gfc_trans_where_3): Add extra arguments to calls to
403         gfc_trans_scalar_assign and set appropriately.
404         (gfc_trans_allocate): Nullify allocatable components.
405         (gfc_trans_deallocate): Deallocate to ultimate allocatable
406         components but stop at ultimate pointer components.
407         * module.c (mio_symbol_attribute, mio_symbol_attribute,
408         mio_component): Add module support for allocatable
409         components.
410         * trans-types.c (gfc_get_derived_type): Treat allocatable
411         components.
412         * trans.h : Add two boolean arguments to
413         gfc_trans_scalar_assign.
414         * resolve.c (resolve_structure_cons): Check conformance of
415         constructor element and the component.
416         (resolve_allocate_expr): Add expression to nullify the
417         constructor expression for allocatable components.
418         (resolve_transfer): Inhibit I/O of derived types with
419         allocatable components.
420         (resolve_fl_derived): Skip check of bounds of allocatable
421         components.
422         * trans-decl.c (gfc_get_symbol_decl): Add derived types
423         with allocatable components to deferred variable.
424         (gfc_trans_deferred_vars): Make calls for derived types
425         with allocatable components to gfc_trans_deferred_array.
426         (gfc_generate_function_code): Nullify allocatable
427         component function result on entry.
428         * parse.c (parse_derived): Set symbol attr.allocatable if
429         allocatable components are present.
430         * check.c (gfc_check_allocated): Enforce attr.allocatable
431         for intrinsic arguments.
432         (gfc_check_move_alloc): Check arguments of move_alloc.
433         * primary.c (gfc_variable_attr): Set allocatable attribute.
434         * intrinsic.texi : Add index entry and section for
435         for move_alloc.
436
437 2006-10-08  Paul Thomas <pault@gcc.gnu.org>
438
439         PR fortran/29115
440         * resolve.c (resolve_structure_cons): It is an error if the
441         pointer component elements of a derived type constructor are
442         not pointer or target.
443
444
445         PR fortran/29211
446         * trans-stmt.c (generate_loop_for_temp_to_lhs,
447         generate_loop_for_rhs_to_temp): Provide a string length for
448         the temporary by copying that of the other side of the scalar
449         assignment.
450
451 2006-10-08  Tobias Burnus  <burnus@net-b.de>
452
453         PR fortran/28585
454         * intrinsic.c (add_functions): Add new_line Fortran 2003 intrinsic.
455         * intrinsic.h: Add gfc_simplify_new_line and gfc_check_new_line
456         prototypes.
457         * check.c (gfc_check_new_line): New function.
458         * simplify.c (gfc_simplify_new_line): New function.
459         * intrinsic.texi: Document new_line intrinsic.
460
461 2006-10-07  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
462
463         PR fortran/16580
464         PR fortran/29288
465         * gcc/fortran/intrinsic.c (add_sym): Define the actual_ok when a
466         gfc_intrinsic_sym structure is filled.
467         (gfc_intrinsic_actual_ok): New function.
468         (add_sym_0s, add_sym_1s, add_sym_2s, add_sym_3s, add_sym_4s,
469         add_sym_5s): Intrinsic subroutines are not allowed as actual
470         arguments, so we remove argument actual_ok.
471         (add_functions): Correct the values for actual_ok of all intrinsics.
472         Add comments for gfc_check_access_func and gfc_resolve_index_func.
473         (add_subroutines): Remove the actual_ok argument, which was never used.
474         * gcc/fortran/intrinsic.h (gfc_intrinsic_actual_ok): New prototype.
475         * gcc/fortran/gfortran.h (gfc_resolve_index_func): New prototype.
476         * gcc/fortran/resolve.c (resolve_actual_arglist): Check whether
477         an intrinsic used as an argument list is allowed there.
478         * gcc/fortran/iresolve.c (gfc_resolve_index_func): New function.
479         (gfc_resolve_len): Change intrinsic function name to agree with
480         libgfortran.
481         * gcc/fortran/trans-decl.c (gfc_get_extern_function_decl): Add
482         new case, because some specific intrinsics take 3 arguments.
483         * gcc/fortran/intrinsic.texi: DIMAG is a GNU extension.
484
485 2006-10-06  Jakub Jelinek  <jakub@redhat.com>
486
487         PR fortran/28415
488         * trans-decl.c (gfc_finish_var_decl): With -fno-automatic, don't
489         make artificial variables or pointer to variable automatic array
490         TREE_STATIC.
491
492         * scanner.c (skip_free_comments): Return bool instead of void.
493         (gfc_next_char_literal): Don't return ' ' if & is missing after
494         !$omp or !$.  Use skip_{free,fixed}_comments directly instead
495         of gfc_skip_comments.
496
497 2006-10-04  Brooks Moses  <bmoses@stanford.edu>
498
499         * gfortran.texi: (Current Status): update and rewrite to reflect
500         actual status more accurately.
501
502 2006-10-04  Brooks Moses  <bmoses@stanford.edu>
503
504         * gfortran.texi: Consistently refer to the compiler as "GNU
505         Fortran".
506         * intrinsic.texi: Ditto.
507         * invoke.texi: Ditto.
508
509 2006-10-04  Richard Henderson  <rth@redhat.com>
510             Jakub Jelinek  <jakub@redhat.com>
511
512         * f95-lang.c (gfc_init_builtin_functions): Add __emutls_get_address
513         and __emutls_register_common.
514         * openmp.c (gfc_match_omp_threadprivate): Don't error if !have_tls.
515         * trans-common.c (build_common_decl): Don't check have_tls.
516         * trans-decl.c (gfc_finish_var_decl): Likewise.
517         * types.def (BT_WORD, BT_FN_PTR_PTR): New.
518         (BT_FN_VOID_PTR_WORD_WORD_PTR): New.
519
520 2006-10-04  Paul Thomas <pault@gcc.gnu.org>
521
522         PR fortran/29343
523         * resolve.c (resolve_allocate_expr): Exclude derived types from
524         search for dependences between allocated variables and the
525         specification expressions for other allocations in the same
526         statement.
527
528 2006-10-04  Paul Thomas  <pault@gcc.gnu.org>
529
530         PR fortran/29098
531         * resolve.c (resolve_structure_cons): Do not return FAILURE if
532         component expression is NULL.
533
534 2006-10-03  Paul Thomas  <pault@gcc.gnu.org>
535
536         PR fortran/20779
537         PR fortran/20891
538         * resolve.c (find_sym_in_expr): New function that returns true
539         if a symbol is found in an expression.
540         (resolve_allocate_expr): Check whether the STAT variable is
541         itself allocated in the same statement.  Use the call above to
542         check whether any of the allocated arrays are used in array
543         specifications in the same statement.
544
545 2006-10-03  Steven G. Kargl  <kargl@gcc.gnu.org>
546
547         * arith.c (gfc_check_real_range):  Use correct exponent range for
548         subnormal numbers.
549
550 2006-10-03  Paul Thomas  <pault@gcc.gnu.org>
551
552         PR fortran/29284
553         PR fortran/29321
554         PR fortran/29322
555         * trans-expr.c (gfc_conv_function_call): Check the expression
556         and the formal symbol are present when testing the actual
557         argument.
558
559         PR fortran/25091
560         PR fortran/25092
561         * resolve.c (resolve_entries): It is an error if the entries
562         of an array-valued function do not have the same shape.
563
564 2006-10-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
565
566         PR middle-end/27478
567         * trans-decl.c (gfc_get_fake_result_decl): Mark var as
568         TREE_ADDRESSABLE.
569
570 2006-10-02  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
571
572         PR fortran/19262
573         * gfortran.h (gfc_option_t): Add max_continue_fixed and
574         max_continue_free.
575         * options.c (gfc_init_options): Initialize fixed form and free form
576         consecutive continuation line limits.
577         * scanner.c (gfc_scanner_init_1): Initialize continue_line
578         and continue_count. (gfc_next_char_literal): Count the number of
579         continuation lines in the current statement and warn if limit
580         is exceeded.
581
582 2006-10-02  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
583
584         PR fortran/19260
585         * scanner.c (gfc_next_char_literal): Add check for missing '&'
586         and warn if in_string, otherwise return ' '.
587
588 2006-10-02  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
589
590         PR fortran/29210
591         * primary.c (match_sym_complex_part): Named constants as real or
592         imaginary part of complex a named constant are only allowed in
593         Fortran 2003.
594
595 2006-10-01  Brooks Moses  <bmoses@stanford.edu>
596
597         * gfortran.texi: Corrected references to MALLOC intrinsic.
598         * invoke.texi: Minor cleanup and clarification to the Dialect
599         Options section.
600
601 2006-09-30  Brooks Moses  <bmoses@stanford.edu>
602
603         * invoke.texi:  Add mention of BOZ constants and integer
604         overflow to -fno-range-check.
605         * gfortran.texi:  Add mention of -fno-range-check to
606         section on BOZ contants.
607
608 2006-09-30  Bernhard Fischer  <aldot@gcc.gnu.org>
609
610         * resolve.c: Fix commentary typo.  Fix whitespace.
611
612 2006-09-28  Steven G. Kargl  <kargl@gcc.gnu.org>
613
614         fortran/29147
615         * arith.c (gfc_check_integer_range): Disable range checking via
616         -fno-range-check.
617
618 2006-09-28  Steven G. Kargl <kargl@gcc.gnu.org>
619
620         * arith.c: Change conditional test for inclusion of arctangent().
621         (gfc_check_real_range): Change conditional test for use of
622         mpfr_subnormalize.
623         * simplify.c (gfc_simplify_atan2): Fix conditional for use of
624         mpfr_atan2() instead of arctangent().
625         (gfc_simplify_exponent): Fix conditional for use of mpfr_get_exp().
626         (gfc_simplify_log): Fix conditional for use of mpfr_atan2() instead
627          of arctangent().
628         (gfc_simplify_nearest): Fix conditional for use of mpfr_nextafter(). 
629
630 2006-09-27  Steven G. Kargl  <kargl@gcc.gnu.org>
631
632         * arith.c: Conditionally include arctangent2().
633         (gfc_check_real_range): Use mpfr_subnormalize in preference to local
634         hack.
635         * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl): Append
636         l for long double functions.
637         * simplify.c: Wrap Copyright to new line.
638         (gfc_simplify_atan2): Use mpfr_atan2 in preference to arctangent2().
639         (gfc_simplify_log): Ditto.
640
641
642         PR fortran/28276
643         * simplify.c (gfc_simplify_exponent): Use mpfr_get_exp in
644         preference to broken local hack.
645
646         PR fortran/27021
647         * simplify.c (gfc_simplify_nearest): Use mpfr_nexttoward and
648         mpfr_subnormalize to handle numbers near zero in preference to broken
649          local hack.
650
651 2006-09-26  Jakub Jelinek  <jakub@redhat.com>
652
653         PR fortran/29097
654         * scanner.c (include_line): Handle conditional include.
655
656 2006-09-25  Tobias Schluter  <tobias.schlueter@physik.uni-muenchen.de>
657
658         PR fortran/21203
659         * error.c (show_loci): No need to risk an ICE to output a
660         slightly nicer error message.
661
662 2006-09-19 Paul Thomas <pault@gcc.gnu.org>
663            Steven Bosscher  <steven@gcc.gnu.org>
664
665         PR fortran/29101
666         * trans-stmt.c (gfc_trans_character_select): Store the label
667         from select_string and then clean up any temporaries from the
668         conversion of the select expression, before branching to the
669         selected case.
670
671 2006-09-18 Paul Thomas <pault@gcc.gnu.org>
672
673         PR fortran/28526
674         * primary.c (match_variable): If the compiler is in a module
675         specification block, an interface block or a contains section,
676         reset host_flag to force the changed symbols mechanism.
677
678         PR fortran/29101
679         * trans-stmt.c (gfc_trans_character_select): Add the post block
680         for the expression to the main block, after the call to
681         select_string and the last label.
682
683 2006-09-18  Paul Thomas  <pault@gcc.gnu.org>
684
685         PR fortran/29060
686         * iresolve.c (resolve_spread): Build shape for result if the
687         source shape is available and dim and ncopies are constants.
688
689 2006-09-18  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
690
691         PR fortran/28817
692         PR fortran/21918
693         * trans-decl.c (generate_local_decl): Change from 'warning' to
694         'gfc_warning' to have line numbers correctly reported.
695
696 2006-09-15  Paul Thomas  <pault@gcc.gnu.org>
697
698         PR fortran/29051
699         * decl.c (match_old_style_init): Set the 'where' field of the
700         gfc_data structure 'newdata'.
701
702         * match.c (match_case_eos): Add a comprehensible error message.
703
704 2006-09-13  Wolfgang Gellerich  <gellerich@de.ibm.com>
705
706         * trans-expr.c (gfc_add_interface_mapping): For characters, dereference
707         pointer if necessary and then perform the cast.
708
709 2006-09-11  Steven G. Kargl  <kargl@gcc.gnu.org>
710
711         * intrinsic.c: Update Copyright date.
712         * intrinsic.h: Ditto.
713
714 2006-09-11  Paul Thomas  <pault@gcc.gnu.org>
715
716         PR fortran/28890
717         * trans-expr.c (gfc_conv_function_call): Obtain the string length
718         of a dummy character(*) function from the symbol if it is not
719         already translated.  For a call to a character(*) function, use
720         the passed, hidden string length argument, which is available
721         from the backend_decl of the formal argument.
722         * resolve.c (resolve_function): It is an error if a function call
723         to a character(*) function is other than a dummy procedure or
724         an intrinsic.
725
726 2006-09-10  Paul Thomas  <pault@gcc.gnu.org>
727
728         PR fortran/28959
729         * trans-types.c (gfc_get_derived_type): Use the parent namespace of
730         the procedure if the type's own namespace does not have a parent.
731
732 2006-09-10  Paul Thomas  <pault@gcc.gnu.org>
733
734         PR fortran/28923
735         * expr.c (find_array_section): Only use the array lower and upper
736         bounds for the start and end of the sections, where the expr is
737         NULL.
738
739 2006-09-10  Paul Thomas <pault@gcc.gnu.org>
740
741         PR fortran/28914
742         * trans-array.c (gfc_trans_array_constructor_value): Create a temporary
743         loop variable to hold the current loop variable in case it is modified
744         by the array constructor.
745
746 2006-09-07  Steven G. Kargl  <kargls@comcast.net>
747
748         * gfortran.h (gfc_integer_info): Eliminate max_int.
749         * arith.c (gfc_arith_init_1): Remove initialization of max_int.
750         (gfc_arith_done_1): Remove clearing of max_int.
751         (gfc_check_integer_range): Fix range chekcing of overflow.
752         * simplify.c (gfc_simplify_not): Construct mask that was max_int.
753
754 2006-09-05  Paul Thomas <pault@gcc.gnu.org>
755
756         PR fortran/28908
757         * gfortran.h : Restore the gfc_dt_list structure and reference
758         to it in gfc_namespace.
759         * resolve.c (resolve_fl_derived): Restore the building of the
760         list of derived types for the current namespace. Modify the
761         restored code so that a check is made to see if the symbol is
762         already in the list.
763         (resolve_fntype): Make sure that the specification block
764         version of the derived type is used for a module function that
765         returns that type. 
766         * symbol.c (gfc_free_dt_list): Restore.
767         (gfc_free_namespace): Restore call to previous.
768         * trans-types.c (copy_dt_decls_ifequal): Restore.
769         (gfc_get_derived_type): Restore all the paraphenalia for
770         association of derived types, including calls to previous.
771         Modify the restored code such that all derived types are built
772         if their symbols are found in the parent namespace; not just
773         non-module types.  Add backend_decls to like derived types in
774         sibling namespaces, as well as that of the derived type.
775
776 2006-08-30  Kazu Hirata  <kazu@codesourcery.com>
777
778         * match.c: Fix a comment typo.
779
780 2006-08-30  Paul Thomas  <pault@gcc.gnu.org>
781
782         PR fortran/28885
783         * trans-expr.c (gfc_conv_aliased_arg): Ensure that the temp
784         declaration is retained for INTENT(OUT) arguments.
785
786         PR fortran/28873
787         PR fortran/20067
788         * resolve.c (resolve_generic_f): Make error message more
789         comprehensible.
790         (resolve_generic_s): Restructure search for specific procedures
791         to be similar to resolve_generic_f and change to similar error
792         message.  Ensure that symbol reference is refreshed, in case
793         the search produces a NULL.
794         (resolve_specific_s): Restructure search, as above and as
795         resolve_specific_f. Ensure that symbol reference is refreshed,
796         in case the search produces a NULL.
797
798         PR fortran/25077
799         PR fortran/25102
800         * interface.c (check_operator_interface): Throw error if the
801         interface assignment tries to change intrinsic type assigments
802         or has less than two arguments.  Also, it is an error if an
803         interface operator contains an alternate return.
804
805         PR fortran/24866
806         * parse.c (gfc_fixup_sibling_symbols): Do not modify the symbol
807         if it is a dummy in the contained namespace.
808
809 2006-08-29  Steven G. Kargl  <kargls@comcast.net>
810
811         PR fortran/28866
812         * match.c: Wrap copyright.
813         (gfc_match_assignment):  Return MATCH_NO for failed lvalue.  Remove
814         gotos.  Move error handling of FL_PARAMETER to ...
815         * gfc_match_if: Deal with MATCH_NO from above.
816         * primary.c: Wrap copyright.
817         (match_variable): ... here.  Improve error messages.
818
819 2006-08-29  Paul Thomas  <pault@gcc.gnu.org>
820
821         PR fortran/28788
822         * symbol.c (gfc_use_derived): Never eliminate the symbol,
823         following reassociation of use associated derived types.
824
825 2006-08-26  Steven G. Kargl  <kargls@comcast.net>
826
827         * arith.h: Update Copyright dates.  Fix whitespace.
828         * arith.c: Update Copyright dates.  Fix whitespace.  Fix comments.
829         (gfc_arith_done_1): Clean up pedantic_min_int and subnormal.
830
831 2006-08-26  Tobias Burnus  <burnus@net-b.de>
832
833         * gfortran.texi: Note variable initialization causes SAVE attribute.
834         * intrinsic.texi: Clarify support for KIND=16 and KIND=10.
835         Mention -std=f2003.  Cross reference INQUIRE from ACCESS intrinsic.
836         Add missing ) in ACOS.
837
838 2006-08-26  Daniel Franke  <franke.daniel@gmail.com>
839
840         * intrinsic.texi: Update Copyright date.  Added documentation
841         for ACOSH, AND, ASINH, ATANH, CHDIR, FGET, FGETC, FPUT, FPUTC,
842         GETCWD, OR and XOR intrinsics, removed inadvertently introduced
843         doc-stubs for EQV and NEQV, corrected some typographical errors.
844
845 2006-08-24  Daniel Franke  <franke.daniel@gmail.com>,
846             Brooks Moses  <bmoses@stanford.edu>
847
848         * intrinsic.texi: Added doc-stubs for undocumented intrinsics,
849         added a "See Also" section, renamed the "Options" section to
850         "Standard", improved the index, and made numerous minor
851         typo corrections and grammatical fixes.
852
853 2006-08-24  Paul Thomas  <pault@gcc.gnu.org>
854
855         PR fortran/28788
856         * symbol.c (shift_types): Shift the derived type references in
857         formal namespaces.
858         (gfc_use_derived): Return if the derived type symbol is already
859         in another namspace.  Add searches for the derived type in
860         sibling namespaces.
861
862         PR fortran/28771
863         * decl.c (add_init_expr_to_sym): Restore the original but
864         restricted to parameter arrays to fix a regression.
865
866 2006-08-23  Steven G. Kargl  <kargls@comcast.net>
867
868         * gfortran.texi:  Fix last commit where a "no" was deleted and
869         a grammatical error was introduced.
870
871 2006-08-23  Steven G. Kargl  <kargls@comcast.net>
872
873         * gfortran.texi:  Spell check.  Add a few contributors to
874         Chapter 9.  Expand the description of BOZ constant handling.
875
876 2006-08-20  Janne Blomqvist  <jb@gcc.gnu.org>
877
878         PR fortran/25828
879         * gfortran.texi: Mention STREAM I/O among supported F2003
880         features.
881
882 2006-08-20  Paul Thomas  <pault@gcc.gnu.org>
883
884         PR fortran/28601
885         PR fortran/28630
886         * gfortran.h : Eliminate gfc_dt_list structure and reference
887         to it in gfc_namespace.
888         * resolve.c (resolve_fl_derived): Remove the building of the
889         list of derived types for the current namespace.
890         * symbol.c (find_renamed_type): New function to find renamed
891         derived types by symbol name rather than symtree name.
892         (gfc_use_derived): Search parent namespace for identical
893         derived type and use it, even if local version is complete,
894         except in interface bodies. Ensure that renamed derived types
895         are found by call to find_renamed_type. Recurse for derived
896         type components.
897         (gfc_free_dt_list): Remove.
898         (gfc_free_namespace): Remove call to previous.
899         * trans-types.c (copy_dt_decls_ifequal): Remove.
900         (gfc_get_derived_type): Remove all the paraphenalia for
901         association of derived types, including calls to previous.
902         * match.c (gfc_match_allocate): Call gfc_use_derived to
903         associate any derived types that are being allocated.
904
905         PR fortran/20886
906         * resolve.c (resolve_actual_arglist): The passing of
907         a generic procedure name as an actual argument is an
908         error.
909
910         PR fortran/28735
911         * resolve.c (resolve_variable): Check for a symtree before
912         resolving references.
913
914         PR fortran/28762
915         * primary.c (match_variable): Return MATCH_NO if the symbol
916         is that of the program.
917
918         PR fortran/28425
919         * trans-expr.c (gfc_trans_subcomponent_assign): Translate
920         derived type component expressions other than another derived
921         type constructor.
922
923         PR fortran/28496
924         * expr.c (find_array_section): Correct errors in
925         the handling of a missing start value for the
926         index triplet in an array reference.
927
928         PR fortran/18111
929         * trans-decl.c (gfc_build_dummy_array_decl): Before resetting
930         reference to backend_decl, set it DECL_ARTIFICIAL.
931         (gfc_get_symbol_decl): Likewise for original dummy decl, when
932         a copy is made of an array.
933         (create_function_arglist): Likewise for the _entry paramter
934         in entry_masters.
935         (build_entry_thunks): Likewise for dummies in entry thunks.
936
937         PR fortran/28600
938         * trans-decl.c (gfc_get_symbol_decl): Ensure that the
939         DECL_CONTEXT of the length of a character dummy is the
940         same as that of the symbol declaration.
941
942         PR fortran/28771
943         * decl.c (add_init_expr_to_sym): Remove setting of charlen for
944         an initializer of an assumed charlen variable.
945
946         PR fortran/28660
947         * trans-decl.c (generate_expr_decls): New function.
948         (generate_dependency_declarations): New function.
949         (generate_local_decl): Call previous if not either a dummy or
950         a declaration in an entry master.
951
952 2006-08-19  Erik Edelmann  <eedelman@gcc.gnu.org>
953
954         PR fortran/25217
955         * resolve.c (resolve_fl_variable): Set a default initializer for
956         derived types with INTENT(OUT) even if 'flag' is true.
957         * trans-expr.c (gfc_conv_function_call): Insert code to
958         reinitialize INTENT(OUT) arguments of derived type with default
959         initializers.
960
961 2006-08-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
962
963         PR fortran/25828
964         * gfortran.h: Add new pointer for stream position to st_inquire.
965         Rename gfc_large_io_int_kind to gfc_intio_kind.
966         * trans-types.c (gfc_init_kinds): use gfc_intio_kind.
967         * io.c: Add new IO tag for file position going in and another for out.
968         (match_dt_element): Match new tag_spos.
969         (gfc_resolve_dt): Resolve new tag_spos.
970         (gfc_free_inquire): Free inquire->strm_pos.
971         (match_inquire_element): Match new tag_strm_out.
972         (gfc_resolve_inquire): Resolve new tag_strm_out.
973         * trans-io.c: Rename IOPARM_type_large_io_int to IOPARM_type_intio.
974         (gfc_build_st_parameter): Same.
975         (gfc_build_io_library_fndecls) Same. and add build pointer type pintio.
976         (gfc_trans_inquire): Translate strm_pos for inquire.
977         * ioparm.def: Reorder flags to accomodate addition of new inquire
978         flag for strm_pos_out and add it in.
979
980 2006-08-06  Paul Thomas  <pault@gcc.gnu.org>
981
982         PR fortran/28590
983         * parse.c (parse_derived): Remove the test for sequence type
984         components of a sequence type.
985         * resolve.c (resolve_fl_derived): Put the test here so that
986         pointer components are tested.
987
988 2006-08-05  Steven G. Kargl <kargls@comcast.nt>
989
990         PR fortran/28548
991         * resolve.c(resolve_elemental_actual): Add flags.h to use -pedantic
992         and exclude conversion functions in conditional.  Change gfc_error
993         to gfc_warning.
994         (warn_unused_label) Rename to ...
995         (warn_unused_fortran_label) avoid warn_unused_label in flags.h.
996
997 2006-07-30  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
998
999         * intrinsic.c (add_functions): Add ACCESS, CHMOD, RSHIFT, LSHIFT.
1000         (add_subroutines): Add LTIME, GMTIME and CHMOD.
1001         * intrinsic.h (gfc_check_access_func, gfc_check_chmod,
1002         gfc_check_chmod_sub, gfc_check_ltime_gmtime, gfc_simplify_rshift,
1003         gfc_simplify_lshift, gfc_resolve_access, gfc_resolve_chmod,
1004         gfc_resolve_rshift, gfc_resolve_lshift, gfc_resolve_chmod_sub,
1005         gfc_resolve_gmtime, gfc_resolve_ltime): Add prototypes.
1006         * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_ACCESS,
1007         GFC_ISYM_CHMOD, GFC_ISYM_LSHIFT, GFC_ISYM_RSHIFT.
1008         * iresolve.c (gfc_resolve_access, gfc_resolve_chmod,
1009         gfc_resolve_rshift, gfc_resolve_lshift, gfc_resolve_chmod_sub,
1010         gfc_resolve_gmtime, gfc_resolve_ltime): New functions.
1011         * check.c (gfc_check_access_func, gfc_check_chmod,
1012         gfc_check_chmod_sub, gfc_check_ltime_gmtime): New functions.
1013         * trans-intrinsic.c (gfc_conv_intrinsic_rlshift): New function.
1014         (gfc_conv_intrinsic_function): Add cases for the new GFC_ISYM_*.
1015
1016 2006-07-28  Volker Reichelt  <reichelt@igpm.rwth-aachen.de>
1017
1018         * Make-lang.in: Use $(HEADER_H) instead of header.h in dependencies.
1019
1020 2006-07-26  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1021
1022         * intrinsic.c (add_functions): Add INT2, SHORT, INT8, LONG,
1023         LSTAT, MCLOCK and MCLOCK8 intrinsic functions.
1024         (add_subroutines): Add LSTAT intrinsic subroutine.
1025         * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_INT2,
1026         GFC_ISYM_INT8, GFC_ISYM_LONG, GFC_ISYM_LSTAT, GFC_ISYM_MCLOCK
1027         and GFC_ISYM_MCLOCK8.
1028         * iresolve.c (gfc_resolve_int2, gfc_resolve_int8,
1029         gfc_resolve_long, gfc_resolve_lstat, gfc_resolve_mclock,
1030         gfc_resolve_mclock8, gfc_resolve_lstat_sub): New functions.
1031         * check.c (gfc_check_intconv): New function.
1032         * trans-intrinsic.c (gfc_conv_intrinsic_function): Add cases for
1033         the added GFC_ISYM_*.
1034         * simplify.c (gfc_simplify_intconv, gfc_simplify_int2,
1035         gfc_simplify_int8, gfc_simplify_long): New functions.
1036         * intrinsic.h (gfc_check_intconv, gfc_simplify_int2,
1037         gfc_simplify_int8, gfc_simplify_long, gfc_resolve_int2,
1038         gfc_resolve_int8, gfc_resolve_long, gfc_resolve_lstat,
1039         gfc_resolve_mclock, gfc_resolve_mclock8, gfc_resolve_lstat_sub):
1040         Add prototypes.
1041
1042 2006-07-24  Erik Edelmann  <eedelman@gcc.gnu.org>
1043
1044         PR fortran/28416
1045         * trans-array.c (gfc_conv_array_parameter): Give special treatment for
1046         ALLOCATABLEs if they are themselves dummy variables.
1047
1048 2006-07-23  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1049
1050         PR fortran/25289
1051         * gfortran.h: Declare gfc_large_io_int_kind.
1052         * trans-types.c (gfc_init_kinds): Set gfc_large_io_int_kind
1053         to size 8 or 4.
1054         * trans-io.c (enum iofield_type): Add large_io_int type.
1055         (gfc_build_st_parameter): Same.
1056         (gfc_build_io_library_fndecls): Same.
1057         * ioparm_def: Use large_io_int to define rec.
1058
1059 2006-07-22  Steven Bosscher  <steven@gcc.gnu.org> 
1060
1061         PR fortran/28439
1062         * trans-stmt.c (gfc_trans_arithmetic_if): Evaluate the condition once.
1063
1064 2006-07-16  Jakub Jelinek  <jakub@redhat.com>
1065
1066         PR fortran/28390
1067         * trans-openmp.c (gfc_trans_omp_do): Look for LASTPRIVATE in
1068         code->exp.omp_clauses rather than in the 3rd function argument.
1069
1070 2006-07-16  Paul Thomas  <pault@gcc.gnu.org>
1071
1072         PR fortran/28384
1073         * trans-common.c (translate_common): If common_segment is NULL
1074         emit error that common block does not exist.
1075
1076         PR fortran/20844
1077         * io.c (check_io_constraints): It is an error if an ADVANCE
1078         specifier appears without an explicit format.
1079
1080         PR fortran/28201
1081         * resolve.c (resolve_generic_s): For a use_associated function,
1082         do not search for an alternative symbol in the parent name
1083         space.
1084
1085         PR fortran/20893
1086         * resolve.c (resolve_elemental_actual): New function t combine
1087         all the checks of elemental procedure actual arguments. In
1088         addition, check of array valued optional args(this PR) has
1089         been added.
1090         (resolve_function, resolve_call): Remove parts that treated
1091         elemental procedure actual arguments and call the above.
1092
1093 2006-07-14  Steven G. Kargl  <kargls@comcast.net>
1094
1095         * trans-expr.c (gfc_trans_string_copy): Evaluate the string lengths
1096
1097 006-07-13  Paul Thomas  <pault@gcc.gnu.org>
1098
1099         PR fortran/28353
1100         * trans-expr.c (gfc_conv_aliased_arg): Missing formal arg means
1101         that intent is INOUT (fixes regression).
1102
1103         PR fortran/25097
1104         * check.c (check_present): The only permitted reference is a
1105         full array reference.
1106
1107         PR fortran/20903
1108         * decl.c (variable_decl): Add error if a derived type is not
1109         from the current namespace if the namespace is an interface
1110         body.
1111
1112 2006-07-12  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1113
1114         PR fortran/28163
1115         * trans-expr.c (gfc_trans_string_copy): Generate inline code
1116         to perform string copying instead of calling a library function.
1117         * trans-decl.c (gfc_build_intrinsic_function_decls): Don't build
1118         decl for copy_string.
1119         * trans.h (gfor_fndecl_copy_string): Remove prototype.
1120
1121 2006-07-11  Feng Wang  <fengwang@nudt.edu.cn>
1122
1123         PR fortran/28213
1124         * trans-io.c (transfer_expr): Deal with Hollerith constants used in
1125         I/O list.
1126
1127 2006-07-07  Kazu Hirata  <kazu@codesourcery.com>
1128
1129         * intrinsic.texi: Fix typos.
1130
1131 2006-07-07  Paul Thomas  <pault@gcc.gnu.org>
1132
1133         PR fortran/28237
1134         PR fortran/23420
1135         * io.c (resolve_tag): Any integer that is not an assigned
1136         variable is an error.
1137
1138 2006-07-06  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1139
1140         PR fortran/28129
1141         * trans-array.c (gfc_trans_array_bound_check): Add a locus
1142         argument, and use it in the error messages.
1143         (gfc_conv_array_index_offset): Donc perform bounds checking on
1144         the last dimension of assumed-size arrays.
1145
1146 2006-07-06  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1147
1148         PR fortran/27874
1149         * trans-stmt.c (compute_inner_temp_size): Don't perform bounds
1150         checking when calculating the bounds of scalarization.
1151
1152 2006-07-05  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1153
1154         PR fortran/20892
1155         * interface.c (gfc_match_interface): Don't allow dummy procedures
1156         to have a generic interface.
1157
1158 2006-07-04  Paul Thomas  <pault@gcc.gnu.org>
1159
1160         PR fortran/28174
1161         * trans-array.c (gfc_conv_expr_descriptor): When building temp,
1162         ensure that the substring reference uses a new charlen.
1163         * trans-expr.c (gfc_conv_aliased_arg): Add the formal intent to
1164         the argument list, lift the treatment of missing string lengths
1165         from the above and implement the use of the intent.
1166         (gfc_conv_function_call): Add the extra argument to the call to
1167         the above.
1168
1169         PR fortran/28167
1170         * trans-array.c (get_array_ctor_var_strlen): Treat a constant
1171         substring reference.
1172         * array.c (gfc_resolve_character_array_constructor): Remove 
1173         static attribute and add the gfc_ prefix, make use of element
1174         charlens for the expression and pick up constant string lengths
1175         for expressions that are not themselves constant.
1176         * gfortran.h : resolve_character_array_constructor prototype
1177         added.
1178         * resolve.c (gfc_resolve_expr): Call resolve_character_array_
1179         constructor again after expanding the constructor, to ensure
1180         that the character length is passed to the expression.
1181
1182 2006-07-04  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1183             Daniel Franke  <franke.daniel@gmail.com>
1184
1185         * intrinsic.c (add_subroutines): Add ITIME and IDATE.
1186         * intrinsic.h (gfc_check_itime_idate,gfc_resolve_idate,
1187         fc_resolve_itime): New protos.
1188         * iresolve.c (gfc_resolve_itime, gfc_resolve_idate): New functions.
1189         * check.c (gfc_check_itime_idate): New function.
1190         * intrinsic.texi: Document the new intrinsics.
1191
1192 2006-07-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1193
1194         * intrinsics/date_and_time.c (itime0,idate0,itime_i4,itime_i8,
1195         idate_i4,idate_i8): New functions.
1196
1197
1198 2006-07-03  Asher Langton  <langton2@llnl.gov>
1199
1200         * decl.c (match_old_style_init): Add data attribute to symbol.
1201
1202 2006-07-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1203
1204         * iresolve.c (gfc_resolve_cpu_time, gfc_resolve_random_number):
1205         Remove ATTRIBUTE_UNUSED for used argument.
1206
1207 2006-07-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1208
1209         * intrinsic.texi: Document new intrinsics.
1210
1211 2006-07-01  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
1212
1213         PR fortran/19259
1214         * parse.c (next_free): Error out on line starting with semicolon.
1215         (next_fixed): Fix formatting.  Error out on line starting with
1216         semicolon.
1217
1218 2006-06-30  Kazu Hirata  <kazu@codesourcery.com>
1219
1220         * check.c: Fix a comment typo.
1221
1222 2006-06-25  Paul Thomas  <pault@gcc.gnu.org>
1223
1224         PR fortran/25056
1225         * interface.c (compare_actual_formal): Signal an error if the formal
1226         argument is a pure procedure and the actual is not pure.
1227
1228         PR fortran/27554
1229         * resolve.c (resolve_actual_arglist): If the type of procedure
1230         passed as an actual argument is not already declared, see if it is
1231         an intrinsic.
1232
1233         PR fortran/25073
1234         * resolve.c (resolve_select): Use bits 1 and 2 of a new int to
1235         keep track of  the appearance of constant logical case expressions.
1236         Signal an error is either value appears more than once.
1237
1238         PR fortran/20874
1239         * resolve.c (resolve_fl_procedure): Signal an error if an elemental
1240         function is not scalar valued.
1241
1242         PR fortran/20867
1243         * match.c (recursive_stmt_fcn): Perform implicit typing of variables.
1244
1245         PR fortran/22038
1246         * match.c (match_forall_iterator): Mark new variables as
1247         FL_UNKNOWN if the match fails.
1248
1249         PR fortran/28119
1250         * match.c (gfc_match_forall): Remove extraneous call to
1251         gfc_match_eos.
1252
1253         PR fortran/25072
1254         * resolve.c (resolve_code, resolve_function): Rework
1255         forall_flag scheme so that it is set and has a value of
1256         2, when the code->expr (ie. the forall mask) is resolved.
1257         This is used to change "block" to "mask" in the non-PURE
1258         error message.
1259
1260 2006-06-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1261
1262         PR fortran/28081
1263         * resolve.c (resolve_substring): Don't issue out-of-bounds
1264         error messages when the range has zero size.
1265
1266 2006-06-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1267
1268         PR fortran/23862
1269         * lang-specs.h (f95-cpp-input): Pass -ffree-form to f951 unless
1270         -ffixed-form is explicitly specified.
1271
1272 2006-06-24  Paul Thomas  <pault@gcc.gnu.org>
1273
1274         PR fortran/28118
1275         * trans-array.c (gfc_conv_expr_descriptor): When building temp,
1276         use the substring reference to calculate the length if the
1277         expression does not have a charlen.
1278
1279 2006-06-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1280
1281         PR fortran/28094
1282         * trans-intrinsic.c (gfc_conv_intrinsic_mod): Support cases where
1283         there is no integer kind equal to the resulting real kind.
1284         * intrinsic.c (add_functions): MODULO is not allowed as an actual
1285         argument.
1286
1287 2006-06-23  Steven G. Kargl  <kargls@comcast.net>
1288
1289         PR fortran/27981
1290         * match.c (gfc_match_if):  Handle errors in assignment in simple if.
1291
1292 2006-06-22  Asher Langton  <langton2@llnl.gov>
1293
1294         PR fortran/24748
1295         * primary.c (gfc_match_rvalue): Don't call match_substring for
1296         implicit non-character types.
1297
1298 2006-06-22  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1299
1300         PR libfortran/26769
1301         * iresolve.c (gfc_resolve_reshape): Call reshape_r4 and
1302         reshape_r8 instead of reshape_4 and reshape_8.
1303         (gfc_resolve_transpose): Likewise for transpose.
1304
1305 2006-06-21  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1306
1307         * trans-expr.c (gfc_conv_missing_dummy, gfc_conv_unary_op,
1308         gfc_conv_cst_int_power, gfc_conv_string_tmp,
1309         gfc_conv_function_call): Replace calls to convert on constant
1310         integer nodes by build_int_cst.
1311         * trans-stmt.c (gfc_trans_do): Likewise.
1312         * trans-io.c (set_internal_unit, transfer_namelist_element):
1313         Likewise.
1314         * trans-decl.c (build_entry_thunks): Likewise.
1315
1316 2006-06-20  Steven G. Kargl  <kargls@comcast.net>
1317
1318         * simplify.c (gfc_simplify_rrspacing): Initialize and clear mpfr_t
1319         variable.
1320
1321 2006-06-20  Paul Thomas  <pault@gcc.gnu.org>
1322
1323         PR fortran/25049
1324         PR fortran/25050
1325         * check.c (non_init_transformational): New function.
1326         (find_substring_ref): New function to signal use of disallowed
1327         transformational intrinsic in an initialization expression.
1328         (gfc_check_all_any): Call previous if initialization expr.
1329         (gfc_check_count): The same.
1330         (gfc_check_cshift): The same.
1331         (gfc_check_dot_product): The same.
1332         (gfc_check_eoshift): The same.
1333         (gfc_check_minloc_maxloc): The same.
1334         (gfc_check_minval_maxval): The same.
1335         (gfc_check_gfc_check_product_sum): The same.
1336         (gfc_check_pack): The same.
1337         (gfc_check_spread): The same.
1338         (gfc_check_transpose): The same.
1339         (gfc_check_unpack): The same.
1340
1341         PR fortran/18769
1342         *intrinsic.c (add_functions): Add gfc_simplify_transfer.
1343         *intrinsic.h : Add prototype for gfc_simplify_transfer.
1344         *simplify.c (gfc_simplify_transfer) : New function to act as
1345         placeholder for eventual implementation.  Emit error for now.
1346
1347         PR fortran/16206
1348         * expr.c (find_array_element): Eliminate condition on length of
1349         offset. Add bounds checking. Rearrange exit. Return try and
1350         put gfc_constructor result as an argument.
1351         (find_array_section): New function.
1352         (find_substring_ref): New function.
1353         (simplify_const_ref): Add calls to previous.
1354         (simplify_parameter_variable): Return on NULL expr.
1355         (gfc_simplify_expr): Only call gfc_expand_constructor for full
1356         arrays.
1357
1358         PR fortran/20876
1359         * match.c (gfc_match_forall): Add missing locus to gfc_code.
1360
1361 2006-06-18  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1362
1363         PR fortran/26801
1364         * trans-intrinsic.c (gfc_conv_associated): Use pre and post blocks
1365         of the scalarization expression.
1366
1367 2006-06-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1368
1369         PR fortran/19310
1370         PR fortran/19904
1371         * arith.c (gfc_range_check): Return ARITH_OK if -fno-range-check. Add
1372         return of ARITH_NAN, ARITH_UNDERFLOW, and ARITH_OVERFLOW.
1373         (gfc_arith_divide): If -fno-range-check allow mpfr to divide by zero.
1374         * gfortran.h (gfc_option_t): Add new flag.
1375         * invoke.texi: Document new flag.
1376         * lang.opt: Add option -frange-check.
1377         * options.c (gfc_init_options): Initialize new flag.
1378         (gfc_handle_options): Set flag if invoked.
1379         * simplify.c (range_check): Add error messages for
1380         overflow, underflow, and other errors.
1381         * trans-const.c (gfc_conv_mpfr_to_tree): Build NaN and Inf from mpfr
1382         result.
1383
1384 2006-06-17  Karl Berry  <karl@gnu.org>
1385
1386         * gfortran.texi (@dircategory): Use "Software development"
1387         instead of "Programming", following the Free Software Directory.
1388
1389 2006-06-16  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1390
1391         PR fortran/27965
1392         * trans-array.c (gfc_conv_ss_startstride): Correct the runtime
1393         conditions for bounds-checking. Check for nonzero stride.
1394         Don't check the last dimension of assumed-size arrays. Fix the
1395         dimension displayed in the error message.
1396
1397 2006-06-15  Thomas Koenig <Thomas.Koenig@online.de>
1398
1399         * trans-array.h (gfc_trans_create_temp_array):  Add bool
1400         argument.
1401         * trans-arrray.c (gfc_trans_create_temp_array): Add extra
1402         argument "function" to show if we are translating a function.
1403         If we are translating a function, perform checks whether
1404         the size along any argument is negative.  In that case,
1405         allocate size 0.
1406         (gfc_trans_allocate_storage):  Add function argument (as
1407         false) to gfc_trans_create_temp_array call.
1408         * trans-expr.c (gfc_conv_function_call):  Add function
1409         argument (as true) to gfc_trans_create_temp_array call.
1410         * trans-stmt.c (gfc_conv_elemental_dependencies): Add
1411         function argument (as false) to gfc_trans_create_temp_array
1412         call.
1413         * trans-intrinsic.c:  Likewise.
1414
1415 2006-06-10  Paul Thomas  <pault@gcc.gnu.org>
1416
1417         PR fortran/24558
1418         PR fortran/20877
1419         PR fortran/25047
1420         * decl.c (get_proc_name): Add new argument to flag that a
1421         module function entry is being treated. If true, correct
1422         error condition, add symtree to module namespace and add
1423         a module procedure.
1424         (gfc_match_function_decl, gfc_match_entry,
1425         gfc_match_subroutine): Use the new argument in calls to
1426         get_proc_name.
1427         * resolve.c (resolve_entries): ENTRY symbol reference to
1428         to master entry namespace if a module function.
1429         * trans-decl.c (gfc_create_module_variable): Return if
1430         the symbol is an entry.
1431         * trans-exp.c (gfc_conv_variable): Check that parent_decl
1432         is not NULL.
1433
1434 2006-06-09  Jakub Jelinek  <jakub@redhat.com>
1435
1436         PR fortran/27916
1437         * trans-openmp.c (gfc_omp_clause_default_ctor): New function.
1438         * trans.h (gfc_omp_clause_default_ctor): New prototype.
1439         * f95-lang.c (LANG_HOOKS_OMP_CLAUSE_DEFAULT_CTOR): Define.
1440
1441 2006-06-08  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1442
1443         PR fortran/27958
1444         * trans-expr.c (gfc_conv_substring): If the substring start is
1445         greater than its end, the length of the substring is zero, and
1446         not negative.
1447         (gfc_trans_string_copy): Don't generate a call to
1448         _gfortran_copy_string when destination length is zero.
1449
1450 2006-06-08  Asher Langton  <langton2@llnl.gov>
1451         
1452         PR fortran/27786
1453         * trans-array.c (gfc_conv_array_ref): Eliminate bounds checking
1454         for assumed-size Cray pointees.
1455
1456 2006-06-08  Steven G. Kargl  <kargls@comcat.net>
1457
1458         * intrinsic.c (add_subroutine):  Make make_noreturn() conditional on
1459         the appropriate symbol name.
1460         
1461 2006-06-07  Paul Thomas  <pault@gcc.gnu.org>
1462
1463         PR fortran/23091
1464         * resolve.c (resolve_fl_variable): Error if an automatic
1465         object has the SAVE attribute.
1466
1467         PR fortran/24168
1468         * expr.c (simplify_intrinsic_op): Transfer the rank and
1469         the locus to the simplified expression.
1470
1471         PR fortran/25090
1472         PR fortran/25058
1473         * gfortran.h : Add int entry_id to gfc_symbol.
1474         * resolve.c : Add static variables current_entry_id and
1475         specification_expr.
1476         (resolve_variable): During code resolution, check if a
1477         reference to a dummy variable in an executable expression
1478         is preceded by its appearance as a parameter in an entry.
1479         Likewise check its specification expressions.
1480         (resolve_code): Update current_entry_id on EXEC_ENTRY.
1481         (resolve_charlen, resolve_fl_variable): Set and reset
1482         specifiaction_expr.
1483         (is_non_constant_shape_array): Do not return on detection
1484         of a variable but continue to resolve all the expressions.
1485         (resolve_codes): set current_entry_id to an out of range
1486         value.
1487
1488 2006-06-06  Mike Stump  <mrs@apple.com>
1489
1490         * Make-lang.in: Rename to htmldir to build_htmldir to avoid
1491         installing during build.
1492
1493 2006-06-06  Paul Thomas  <pault@gcc.gnu.org>
1494
1495         PR fortran/27897
1496         * match.c (gfc_match_common):  Fix code typo.  Remove
1497         sym->name, since sym is NULL, and replace with name.
1498
1499 2006-06-05  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1500
1501         PR libfortran/27895
1502         * resolve.c (compute_last_value_for_triplet): New function.
1503         (check_dimension): Correctly handle zero-sized array sections.
1504         Add checking on last element of array sections.
1505
1506 2006-06-05  Steven G. Kargl  <kargls@comcast.net>
1507
1508         * data.c (gfc_assign_data_value):  Fix comment typo.  Remove
1509         a spurious return.
1510
1511 2006-06-05  Paul Thomas  <pault@gcc.gnu.org>
1512
1513         PR fortran/14067
1514         * data.c (create_character_intializer): Add warning message
1515         for truncated string.
1516
1517         PR fortran/16943
1518         * symbol.c : Include flags.h.
1519         (gfc_add_type): If a procedure and types are the same do not
1520         throw an error unless standard is less than gnu or pedantic.
1521
1522         PR fortran/20839
1523         * parse.c (parse_do_block): Error if named block do construct
1524         does not have a named enddo.
1525
1526         PR fortran/27655
1527         * check.c (gfc_check_associated): Pick up EXPR_NULL for pointer
1528         as well as target and put error return at end of function.
1529
1530 2006-06-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1531
1532         * trans.c (gfc_msg_bounds, gfc_msg_fault, gfc_msg_wrong_return):
1533         Add strings for common runtime error messages.
1534         (gfc_trans_runtime_check): Add a locus argument, use a string
1535         and not a string tree for the message.
1536         * trans.h (gfc_trans_runtime_check): Change prototype accordingly.
1537         (gfc_msg_bounds, gfc_msg_fault, gfc_msg_wrong_return): Add proto.
1538         * trans-const.c (gfc_strconst_bounds, gfc_strconst_fault,
1539         gfc_strconst_wrong_return, gfc_strconst_current_filename): Remove.
1540         (gfc_init_constants): Likewise.
1541         * trans-const.h: Likewise.
1542         * trans-decl.c (gfc_build_builtin_function_decls): Call to
1543         _gfortran_runtime_error has only one argument, the message string.
1544         * trans-array.h (gfc_conv_array_ref): Add a symbol argument and a
1545         locus.
1546         * trans-array.c (gfc_trans_array_bound_check): Build precise
1547         error messages.
1548         (gfc_conv_array_ref): Use the new symbol argument and the locus
1549         to build more precise error messages.
1550         (gfc_conv_ss_startstride): More precise error messages.
1551         * trans-expr.c (gfc_conv_variable): Give symbol reference and
1552         locus to gfc_conv_array_ref.
1553         (gfc_conv_function_call): Use the new prototype for
1554         gfc_trans_runtime_check.
1555         * trans-stmt.c (gfc_trans_goto): Build more precise error message.
1556         * trans-io.c (set_string): Likewise.
1557         * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use new prototype
1558         for gfc_trans_runtime_check.
1559
1560 2006-06-01  Thomas Koenig  <Thomas.Koenig@online.de>
1561
1562         PR fortran/27715
1563         * arith.c:  Cast the characters from the strings to unsigned
1564         char to avoid values less than 0 for extended ASCII.
1565
1566 2006-06-01  Per Bothner  <bothner@bothner.com>
1567
1568         * data.c (gfc_assign_data_value): Handle USE_MAPPED_LOCATION.
1569         * scanner.c (gfc_gobble_whitespace): Likewise.
1570
1571 2006-06-01  Paul Thomas  <pault@gcc.gnu.org>
1572
1573         PR fortran/25098
1574         PR fortran/25147
1575         * interface.c (compare_parameter): Return 1 if the actual arg
1576         is external and the formal is a procedure.
1577         (compare_actual_formal): If the actual argument is a variable
1578         and the formal a procedure, this an error.  If a gsymbol exists
1579         for a procedure of the same name, this is not yet resolved and
1580         the error is cleared.
1581
1582         * trans-intrinsic.c (gfc_conv_associated): Make provision for
1583         zero array length or zero string length contingent on presence
1584         of target, for consistency with standard.
1585
1586 2006-05-30  Asher Langton  <langton2@llnl.gov>
1587
1588         * symbol.c (check_conflict): Allow external, function, and
1589         subroutine attributes with Cray pointees.
1590         * trans-expr.c (gfc_conv_function_val): Translate Cray pointees
1591         that point to procedures.
1592         * gfortran.texi: Document new feature.
1593
1594 2006-05-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1595
1596         PR fortran/27634
1597         * io.c (check_format): Add error for missing period in format
1598         specifier unless -std=legacy.
1599         * gfortran.texi: Add description of expanded namelist read and
1600         missing period in format extensions.
1601
1602 2006-05-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1603
1604         PR fortran/19777
1605         * trans-array.c (gfc_conv_array_ref): Perform out-of-bounds
1606         checking for assumed-size arrrays for all but the last dimension.
1607
1608 2006-05-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1609
1610         * invoke.texi: Change -fpackderived into -fpack-derived.
1611
1612 2006-05-29  Kazu Hirata  <kazu@codesourcery.com>
1613
1614         * options.c, primary.c, resolve.c, trans-common.c: Fix typos
1615         in error messages.
1616
1617 2006-05-28  Kazu Hirata  <kazu@codesourcery.com>
1618
1619         * check.c, expr.c, resolve.c, trans-common.c,
1620         trans-intrinsic.c, trans-stmt.c, trans-types.c: Fix comment typos.
1621
1622 2006-05-27  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1623
1624         PR fortran/19777
1625         * trans-array.c (gfc_conv_array_ref): Don't perform out-of-bounds
1626         checking for assumed-size arrrays.
1627
1628 2006-05-27  Paul Thomas  <pault@gcc.gnu.org>
1629
1630         * trans-intrinsic.c (gfc_conv_associated): If pointer in first
1631         arguments has zero array length of zero string length, return
1632         false.
1633
1634 2006-05-26  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1635
1636         PR fortran/27524
1637         * trans-array.c (gfc_trans_dummy_array_bias): Don't use stride as
1638         a temporary variable when -fbounds-check is enabled, since its
1639         value will be needed later.
1640
1641 2006-05-26  Thomas Koenig  <Thomas.Koenig@online.de>
1642
1643         PR fortran/23151
1644         * io.c (match_io):  print (1,*) is an error.
1645
1646 2006-05-26  Paul Thomas  <pault@gcc.gnu.org>
1647
1648         PR fortran/27709
1649         * resolve.c (find_array_spec): Add gfc_symbol, derived, and
1650         use to track repeated component references.
1651
1652         PR fortran/27155
1653         PR fortran/27449
1654         * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): Use
1655         se->string_length throughout and use memcpy to populate the
1656         expression returned to the scalarizer.
1657         (gfc_size_in_bytes): New function.
1658
1659 2006-05-21  Paul Thomas  <pault@gcc.gnu.org>
1660
1661         PR fortran/27613
1662         * primary.c (gfc_match_rvalue): Test if symbol represents a
1663         direct recursive function reference.  Error if array valued,
1664         go to function0 otherwise.
1665
1666 2006-05-21  Paul Thomas  <pault@gcc.gnu.org>
1667
1668         PR fortran/25746
1669         * interface.c (gfc_extend_assign): Use new EXEC_ASSIGN_CALL.
1670         * gfortran.h : Put EXEC_ASSIGN_CALL in enum.
1671         * trans-stmt.c (gfc_conv_elemental_dependencies): New function.
1672         (gfc_trans_call): Call it.  Add new boolian argument to flag
1673         need for dependency checking. Assert intent OUT and IN for arg1
1674         and arg2.
1675         (gfc_trans_forall_1): Use new code EXEC_ASSIGN_CALL.
1676         trans-stmt.h : Modify prototype of gfc_trans_call.
1677         trans.c (gfc_trans_code): Add call for EXEC_ASSIGN_CALL.
1678         st.c (gfc_free_statement): Free actual for EXEC_ASSIGN_CALL.
1679         * dependency.c (gfc_check_fncall_dependency): Don't check other
1680         against itself.
1681
1682         PR fortran/25090
1683         * resolve.c : Remove resolving_index_expr.
1684         (entry_parameter): Remove.
1685         (gfc_resolve_expr, resolve_charlen, resolve_fl_variable): Lift
1686         calls to entry_parameter and references to resolving_index_expr.
1687
1688         PR fortran/27584
1689         * check.c (gfc_check_associated): Replace NULL assert with an
1690         error message, since it is possible to generate bad code that
1691         has us fall through to here..
1692
1693         PR fortran/19015
1694         * iresolve.c (maxloc, minloc): If DIM is not present, pass the
1695         rank of ARRAY as the shape of the result.  Otherwise, pass the
1696         shape of ARRAY, less the dimension DIM.
1697         (maxval, minval): The same, when DIM is present, otherwise no
1698         change.
1699
1700 2006-05-19  H.J. Lu  <hongjiu.lu@intel.com>
1701
1702         PR fortran/27662
1703         * trans-array.c (gfc_conv_expr_descriptor): Don't zero the
1704         first stride to indicate a temporary.
1705         * trans-expr.c (gfc_conv_function_call): Likewise.
1706
1707 2006-05-18  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1708             Feng Wang  <fengwang@nudt.edu.cn>
1709
1710         PR fortran/27552
1711         * dump-parse-tree.c (gfc_show_expr): Deal with Hollerith constants.
1712         * data.c (create_character_intializer): Set from_H flag if character is
1713         initialized by Hollerith constant.
1714
1715 2006-05-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1716
1717         PR fortran/26551
1718         * resolve.c (resolve_call, resolve_function): Issue an error
1719         if a function or subroutine call is recursive but the function or
1720         subroutine wasn't declared as such.
1721
1722 2006-05-07  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1723
1724         PR fortran/26551
1725         * gfortran.dg/recursive_check_1.f: New test.
1726
1727
1728 2006-05-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1729
1730         PR fortran/27320
1731         * dump-parse-tree.c (gfc_show_code_node): Try harder to find the
1732         called procedure name.
1733
1734 2006-05-17  Jakub Jelinek  <jakub@redhat.com>
1735
1736         PR middle-end/27415
1737         * trans-openmp.c (gfc_trans_omp_parallel_do,
1738         gfc_trans_omp_parallel_sections, gfc_trans_omp_parallel_workshare): Set
1739         OMP_PARALLEL_COMBINED flag.
1740
1741 2006-05-16  H.J. Lu  <hongjiu.lu@intel.com>
1742
1743         PR driver/26885
1744         * Make-lang.in (GFORTRAN_D_OBJS): Replace gcc.o with
1745         $(GCC_OBJS).
1746
1747 2006-05-15  Paul Thomas  <pault@gcc.gnu.org>
1748
1749         PR fortran/25090
1750         * resolve.c: Static resolving_index_expr initialized.
1751         (entry_parameter): New function to emit errors for variables
1752         that are not entry parameters.
1753         (gfc_resolve_expr): Call entry_parameter, when resolving
1754         variables, if the namespace has entries and resolving_index_expr
1755         is set.
1756         (resolve_charlen): Set resolving_index_expr before the call to
1757         resolve_index_expr and reset it afterwards.
1758         (resolve_fl_variable): The same before and after the call to
1759         is_non_constant_shape_array, which ultimately makes a call to
1760         gfc_resolve_expr.
1761
1762         PR fortran/25082
1763         * resolve.c (resolve_code): Add error condition that the return
1764         expression must be scalar.
1765
1766         PR fortran/27411
1767         * matchexp.c (gfc_get_parentheses): New function.
1768         (match_primary): Remove inline code and call above.
1769         * gfortran.h: Provide prototype for gfc_get_parentheses.
1770         * resolve.c (resolve_array_ref): Call the above, when start is a
1771         derived type variable array reference.
1772
1773 2006-05-15  Jakub Jelinek  <jakub@redhat.com>
1774
1775         PR fortran/27446
1776         * trans-openmp.c (gfc_trans_omp_array_reduction): Ensure
1777         OMP_CLAUSE_REDUCTION_{INIT,MERGE} are set to BIND_EXPR.
1778
1779 2006-05-14  H.J. Lu  <hongjiu.lu@intel.com>
1780
1781         * Make-lang.in (fortran/options.o): Depend on $(TARGET_H).
1782
1783 2006-05-11  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1784
1785         PR fortran/27553
1786         * parse.c (next_free): Return instead of calling decode_statement
1787         upon error.
1788
1789 2005-05-10  Thomas Koenig  <Thomas.Koenig@online.de>
1790
1791         PR fortran/27470
1792         * trans-array.c(gfc_array_allocate):  If ref->next exists
1793         that is if there is a statement like ALLOCATE(foo%bar(2)),
1794         F95 rules require that bar should be a pointer.
1795
1796 2006-05-10  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1797
1798         PR fortran/20460
1799         * resolve.c (gfc_resolve_index): Make REAL array indices a
1800         GFC_STD_LEGACY feature.
1801
1802 2006-05-10  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1803
1804         PR fortran/24549
1805         * parse.c (reject_statement): Clear gfc_new_block.
1806
1807 2006-05-09  Steven G. Kargl  <kargls@comcast.net>
1808
1809         * invoke.texi: Missed file in previous commit.  Update
1810          description of -fall-intrinsics
1811
1812 2006-05-07  Steven Boscher  <steven@gcc.gnu.org>
1813
1814         PR fortran/27378
1815         * parse.c (next_statement): Add check to avoid an ICE when
1816         gfc_current_locus.lb is not set.
1817
1818 2006-05-07  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
1819
1820         PR fortran/27457
1821         * match.c (match_case_eos): Error out on garbage following
1822         CASE(...).
1823
1824 2006-05-07  Paul Thomas  <pault@gcc.gnu.org>
1825
1826         PR fortran/24813
1827         * trans-array.c (get_array_ctor_strlen): Remove static attribute.
1828         * trans.h: Add prototype for get_array_ctor_strlen.
1829         * trans-intrinsic.c (gfc_conv_intrinsic_len): Switch on EXPR_ARRAY
1830         and call get_array_ctor_strlen.
1831
1832 2006-05-05  Steven G. Kargl  <kargls@comcast.net>
1833
1834         * invoke.texi: Update description of -fall-intrinsics
1835         * options.c (gfc_post_options): Disable -Wnonstd-intrinsics if
1836         -fall-intrinsics is used.
1837         (gfc_handle_option): Permit -Wno-nonstd-intrinsics.
1838
1839 2006-05-04  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
1840
1841         * simplify.c (ascii_table): Fix wrong entry.
1842
1843 2006-05-02  Steven G. Kargl  <kargls@comcast.net>
1844
1845         PR fortran/26896
1846         * lang.opt: Fix -Wtab description
1847
1848         PR fortran/20248  
1849         * lang.opt: New flag -fall-intrinsics.
1850         * invoke.texi:  Document option.
1851         * gfortran.h (options_t):  New member flag_all_intrinsics.
1852         * options.c (gfc_init_options, gfc_handle_option): Set new option.
1853         sort nearby misplaced options.
1854         * intrinsic.c (add_sym, make_generic, make_alias):  Use it.
1855
1856 2006-05-02 Paul Thomas <pault@gcc.gnu.org>
1857
1858         PR fortran/27269
1859         * module.c: Add static flag in_load_equiv.
1860         (mio_expr_ref): Return if no symtree and in_load_equiv.
1861         (load_equiv): If any of the equivalence members have no symtree, free
1862         the equivalence and the associated expressions.
1863
1864         PR fortran/27324
1865         * trans-common.c (gfc_trans_common): Invert the order of calls to
1866         finish equivalences and gfc_commit_symbols.
1867
1868 2006-04-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1869
1870         PR fortran/25681
1871         * simplify.c (simplify_len): Character variables with constant
1872         length can be simplified.
1873
1874 2006-04-29  H.J. Lu  <hongjiu.lu@intel.com>
1875
1876         PR fortran/27351
1877         * trans-array.c (gfc_conv_array_transpose): Move gcc_assert
1878         before gfc_conv_expr_descriptor.
1879
1880 2006-04-23  Paul Thomas  <pault@gcc.gnu.org>
1881
1882         PR fortran/25099
1883         * resolve.c (resolve_call): Check conformity of elemental
1884         subroutine actual arguments.
1885
1886 2006-04-22  Jakub Jelinek  <jakub@redhat.com>
1887
1888         PR fortran/26769
1889         * iresolve.c (gfc_resolve_reshape): Use reshape_r16 for real(16).
1890         (gfc_resolve_transpose): Use transpose_r16 for real(16).
1891
1892 2006-04-21 Paul Thomas <pault@gcc.gnu.org>
1893
1894         PR fortran/27122
1895         * resolve.c (resolve_function): Remove general restriction on auto
1896         character length function interfaces.
1897         (gfc_resolve_uops): Check restrictions on defined operator
1898         procedures.
1899         (resolve_types): Call the check for defined operators.
1900
1901         PR fortran/27113
1902         * trans-array.c (gfc_trans_array_constructor_subarray): Remove
1903         redundant gfc_todo_error.
1904         (get_array_ctor_var_strlen): Remove typo in enum.
1905
1906 2006-04-18  Bernhard Fischer  <aldot@gcc.gnu.org>
1907
1908         * parse.c (next_free): Use consistent error string between
1909         free-form and fixed-form for illegal statement label of zero.
1910         (next_fixed): Use consistent warning string between free-form
1911         and fixed-form for statement labels for empty statements.
1912
1913 2006-04-18  Steve Ellcey  <sje@cup.hp.com>
1914
1915         * trans-io.c (gfc_build_io_library_fndecls): Align pad.
1916
1917 2006-04-16  Thomas Koenig  <Thomas.Koenig@online.de>
1918
1919         PR fortran/26017
1920         * trans-array.c(gfc_array_init_size):  Introduce or_expr
1921         which is true if the size along any dimension
1922         is negative.  Create a temporary variable with base
1923         name size.  If or_expr is true, set the temporary to 0,
1924         to the normal size otherwise.
1925
1926 2006-04-16  Paul Thomas  <pault@gcc.gnu.org>
1927
1928         PR fortran/26822
1929         * intrinsic.c (add_functions): Mark LOGICAL as elemental.
1930
1931         PR fortran/26787
1932         * expr.c (gfc_check_assign): Extend scope of error to include
1933         assignments to a procedure in the main program or, from a
1934         module or internal procedure that is not that represented by
1935         the lhs symbol. Use VARIABLE rather than l-value in message.
1936
1937         PR fortran/27096
1938         * trans-array.c (gfc_trans_deferred_array): If the backend_decl
1939         is not a descriptor, dereference and then test and use the type.
1940
1941         PR fortran/25597
1942         * trans-decl.c (gfc_trans_deferred_vars): Check if an array
1943         result, is also automatic character length.  If so, process
1944         the character length.
1945
1946         PR fortran/18003
1947         PR fortran/25669
1948         PR fortran/26834
1949         * trans_intrinsic.c (gfc_walk_intrinsic_bound): Set
1950         data.info.dimen for bound intrinsics.
1951         * trans_array.c (gfc_conv_ss_startstride): Pick out LBOUND and
1952         UBOUND intrinsics and supply their shape information to the ss
1953         and the loop.
1954
1955         PR fortran/27124
1956         * trans_expr.c (gfc_trans_function_call):  Add a new block, post,
1957         in to which all the argument post blocks are put.  Add this block
1958         to se->pre after a byref call or to se->post, otherwise.
1959
1960 2006-04-14  Roger Sayle  <roger@eyesopen.com>
1961
1962         * trans-io.c (set_string): Use fold_build2 and build_int_cst instead
1963         of build2 and convert to construct "x < 0" rather than "x <= -1".
1964
1965 2006-04-13  Richard Henderson  <rth@redhat.com>
1966
1967         * trans-openmp.c (gfc_trans_omp_sections): Adjust for changed
1968         number of operands to OMP_SECTIONS.
1969
1970 2006-04-08  Kazu Hirata  <kazu@codesourcery.com>
1971
1972         * gfortran.texi: Fix typos.  Follow spelling conventions.
1973         * resolve.c, trans-expr.c, trans-stmt.c: Fix comment typos.
1974         Follow spelling conventions.
1975
1976 2006-04-05  Roger Sayle  <roger@eyesopen.com>
1977
1978         * dependency.c (get_no_elements): Delete function.
1979         (get_deps): Delete function.
1980         (transform_sections): Delete function.
1981         (gfc_check_section_vs_section): Significant rewrite.
1982
1983 2006-04-04  H.J. Lu  <hongjiu.lu@intel.com>
1984
1985         PR fortran/25619
1986         * trans-array.c (gfc_conv_expr_descriptor): Only dereference
1987         character pointer when copying temporary.
1988
1989         PR fortran/23634
1990         * trans-array.c (gfc_conv_expr_descriptor): Properly copy
1991         temporary character with non constant size.
1992
1993 2006-04-03  Paul Thomas  <pault@gcc.gnu.org>
1994
1995         PR fortran/26891
1996         * trans.h: Prototype for gfc_conv_missing_dummy.
1997         * trans-expr (gfc_conv_missing_dummy): New function
1998         (gfc_conv_function_call): Call it and tidy up some of the code.
1999         * trans-intrinsic (gfc_conv_intrinsic_function_args): The same.
2000
2001         PR fortran/26976
2002         * array.c (gfc_array_dimen_size): If available, return shape[dimen].
2003         * resolve.c (resolve_function): If available, use the argument
2004         shape for the function expression.
2005         * iresolve.c (gfc_resolve_transfer): Set shape[0] = size.
2006
2007 2006-04-02  Erik Edelmann  <eedelman@gcc.gnu.org>
2008
2009         * trans-array.c (gfc_trans_dealloc_allocated): Take a
2010         tree representation of the array to be deallocated as argument
2011         instead of its gfc_symbol.
2012         (gfc_trans_deferred_array): Update call to
2013         gfc_trans_dealloc_allocated.
2014         * trans-array.h (gfc_trans_dealloc_allocated): Update
2015         prototype.
2016         * trans-expr.c (gfc_conv_function_call): Update call to
2017         gfc_trans_dealloc_allocated, get indirect reference to dummy
2018         arguments.
2019
2020 2006-04-01  Roger Sayle  <roger@eyesopen.com>
2021
2022         PR fortran/25270
2023         * trans-array.c (gfc_trans_allocate_array_storage): In array index
2024         calculations use gfc_index_zero_node and gfc_index_one_node instead
2025         of integer_zero_node and integer_one_node respectively.
2026         (gfc_conv_array_transpose): Likewise.
2027         (gfc_conv_ss_startstride): Likewise.
2028         (gfc_trans_dummy_array_bias): Likewise.
2029
2030 2006-04-01  Roger Sayle  <roger@eyesopen.com>
2031
2032         * dependency.c (gfc_is_inside_range): Delete.
2033         (gfc_check_element_vs_section): Significant rewrite.
2034
2035 2006-04-01  Roger Sayle  <roger@eyesopen.com>
2036
2037         * dependency.c (gfc_dep_compare_expr): Strip parentheses and unary
2038         plus operators when comparing expressions.  Handle comparisons of
2039         the form "X+C vs. X", "X vs. X+C", "X-C vs. X" and "X vs. X-C" where
2040         C is an integer constant.  Handle comparisons of the form "P+Q vs.
2041         R+S" and "P-Q vs. R-S".  Handle comparisons of integral extensions
2042         specially (increasing functions) so extend(A) > extend(B), when A>B.
2043         (gfc_check_element_vs_element): Move test later, so that we ignore
2044         the fact that "A < B" or "A > B" when A or B contains a forall index.
2045
2046 2006-03-31  Asher Langton  <langton2@llnl.gov>
2047
2048         PR fortran/25358
2049         * expr.c (gfc_check_assign): Allow cray pointee to be assumes-size.
2050         
2051 2006-03-30  Paul Thomas <paulthomas2@wanadoo.fr>
2052             Bud Davis  <bdavis9659@sbcglobal.net>
2053
2054         PR 21130
2055         * module.c (load_needed): Traverse entire tree before returning.
2056
2057 2006-03-30  Roger Sayle  <roger@eyesopen.com>
2058
2059         PR middle-end/22375
2060         * trans.c (gfc_trans_runtime_check): Promote the arguments of
2061         __builtin_expect to the correct types, and the result back to
2062         boolean_type_node.
2063
2064 2006-03-29  Carlos O'Donell  <carlos@codesourcery.com>
2065
2066         * Make-lang.in: Rename docdir to gcc_docdir.
2067
2068 2006-03-28  Steven G. Kargl  <kargls@comcast.net>
2069
2070         * intrinsic.texi: s/floor/float in previous commit.
2071
2072 2006-03-28 Paul Thomas <pault@gcc.gnu.org>
2073
2074         PR fortran/26779
2075         * resolve.c (resolve_fl_procedure): Do not check the access of
2076         derived types for internal procedures.
2077
2078 2006-03-27  Jakub Jelinek  <jakub@redhat.com>
2079
2080         * io.c (check_io_constraints): Don't look at
2081         dt->advance->value.charater.string, unless it is a CHARACTER
2082         constant.
2083
2084         * f95-lang.c (gfc_get_alias_set): New function.
2085         (LANG_HOOKS_GET_ALIAS_SET): Define.
2086
2087 2006-03-25  Steven G. Kargl  <kargls@comcast.net>
2088
2089         PR fortran/26816
2090         * intrinsic.c (add_functions): Allow FLOAT to accept all integer kinds.
2091         * intrinsic.texi: Document FLOAT.
2092
2093 2006-03-25  Thomas Koenig  <Thomas.Koenig@online.de>
2094
2095         PR fortran/26769
2096         * iresolve.c (gfc_resolve_reshape):  Remove doubling of
2097         kind for complex. For real(kind=10), call reshape_r10.
2098         (gfc_resolve_transpose):  For real(kind=10), call
2099         transpose_r10.
2100
2101 2006-03-25  Roger Sayle  <roger@eyesopen.com>
2102
2103         * dependency.c (gfc_check_dependency): Improve handling of pointers;
2104         Two variables of different types can't have a dependency, and two
2105         variables with the same symbol are equal, even if pointers.
2106
2107 2006-03-24  Roger Sayle  <roger@eyesopen.com>
2108
2109         * gfortran.h (gfc_symbol): Add a new "forall_index" bit field.
2110         * match.c (match_forall_iterator): Set forall_index field on
2111         the iteration variable's symbol.
2112         * dependency.c (contains_forall_index_p): New function to
2113         traverse a gfc_expr to check whether it contains a variable
2114         with forall_index set in it's symbol.
2115         (gfc_check_element_vs_element): Return GFC_DEP_EQUAL for scalar
2116         constant expressions that don't variables used as FORALL indices.
2117
2118 2006-03-22  Volker Reichelt  <reichelt@igpm.rwth-aachen.de>
2119
2120         PR driver/22600
2121         * error.c (gfc_fatal_error): Return ICE_EXIT_CODE instead of 4.
2122
2123 2006-03-22  Thomas Koenig  <Thomas.Koenig@online.de>
2124
2125         PR fortran/19303
2126         * gfortran.h (gfc_option_t):  Add record_marker.
2127         * lang.opt:  Add -frecord-marker=4 and -frecord-marker=8.
2128         * trans-decl.c:  Add gfor_fndecl_set_record_marker.
2129         (gfc_build_builtin_function_decls): Set
2130         gfor_fndecl_set_record_marker.
2131         (gfc_generate_function_code):  If we are in the main program
2132         and -frecord-marker was provided, call set_record_marker.
2133         * options.c (gfc_handle_option):  Add handling for
2134         -frecord-marker=4 and -frecord-marker=8.
2135         * invoke.texi:  Document -frecord-marker.
2136
2137 2006-03-22  Paul Thomas  <pault@gcc.gnu.org>
2138
2139         PR fortran/17298
2140         * trans-intrinsic.c (gfc_conv_intrinsic_array_transfer): New
2141         function to implement array valued TRANSFER intrinsic.
2142         (gfc_conv_intrinsic_function): Call the new function if TRANSFER
2143         and non-null se->ss.
2144         (gfc_walk_intrinsic_function): Treat TRANSFER as one of the
2145         special cases by calling gfc_walk_intrinsic_libfunc directly.
2146
2147 2006-03-21  Toon Moene  <toon@moene.indiv.nluug.nl>
2148
2149         * options.c (gfc_init_options): Initialize
2150         flag_argument_noalias to 3.
2151
2152 2006-03-20  Thomas Koenig  <Thomas.Koenig@online.de>
2153
2154         PR fortran/20935
2155         * iresolve.c (gfc_resolve_maxloc):   If mask is scalar,
2156         prefix the function name with an "s".  If the mask is scalar
2157         or if its kind is smaller than gfc_default_logical_kind,
2158         coerce it to default kind.
2159         (gfc_resolve_maxval):  Likewise.
2160         (gfc_resolve_minloc):  Likewise.
2161         (gfc_resolve_minval):  Likewise.
2162         (gfc_resolve_product):  Likewise.
2163         (gfc_resolve_sum):  Likewise.
2164
2165 2006-03-19  Paul Thomas  <pault@gcc.gnu.org>
2166
2167         PR fortran/26741
2168         *expr.c (external_spec_function): Permit elemental functions.
2169
2170         PR fortran/26716
2171         *interface.c (compare_actual_formal): Detect call for procedure
2172         usage and require rank checking, in this case, for assumed shape
2173         and deferred shape arrays.
2174         (gfc_procedure_use): Revert to pre-PR25070 call to
2175         compare_actual_formal that does not require rank checking..
2176
2177 2006-03-16  Roger Sayle  <roger@eyesopen.com>
2178
2179         * gfortran.h (gfc_equiv_info): Add length field.
2180         * trans-common.c (copy_equiv_list_to_ns): Set the length field.
2181         * dependency.c (gfc_are_equivalenced_arrays): Use both the offset
2182         and length fields to determine whether the two equivalenced symbols
2183         overlap in memory.
2184
2185 2006-03-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2186
2187         PR fortran/19101
2188         * gfortran.h: Add warn_ampersand.
2189         * invoke.texi: Add documentation for new option.
2190         * lang.opt: Add Wampersand.
2191         * options.c (gfc_init_options): Initialize warn_ampersand.
2192         (gfc_post_options): Set the warn if pedantic.
2193         (set_Wall): Set warn_ampersand.
2194         (gfc_handle_option: Add Wampersand for itself, -std=f95, and -std=f2003.
2195         * scanner.c (gfc_next_char_literal): Add test for missing '&' in
2196         continued character constant and give warning if missing.
2197
2198 2006-03-14  Steven G. Kargl  <kargls@comcast.net>
2199
2200         PR 18537
2201         * gfortran.h: Wrap Copyright line.
2202         (gfc_option_t): add warn_tabs member.
2203         * lang.opt: Update Coyright year.  Add the Wtabs.
2204         * invoke.texi: Document -Wtabs.
2205         * scanner.c (gfc_gobble_whitespace): Use warn_tabs.  Add linenum to
2206         suppress multiple warnings.
2207         (load_line): Use warn_tabs.  Add linenum, current_line, seen_comment
2208         to suppress multiple warnings.
2209         * options.c (gfc_init_options): Initialize warn_tabs.
2210         (set_Wall): set warn_tabs for -Wall.
2211         (gfc_post_options): Adjust flag_tabs depending on -pedantic.
2212         (gfc_handle_option):  Process command-line option -W[no-]tabs
2213
2214 2006-03-13  Paul Thomas  <pault@gcc.gnu.org>
2215
2216         PR fortran/25378
2217         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Set the initial position to zero and
2218         modify the condition for updating it, to implement the F2003 requirement for all(mask)
2219         is false.
2220
2221 2006-03-13  Jakub Jelinek  <jakub@redhat.com>
2222
2223         * trans-openmp.c (gfc_trans_omp_variable): Handle references
2224         to parent result.
2225         * trans-expr.c (gfc_conv_variable): Remove useless setting
2226         of parent_flag, formatting.
2227
2228         * trans-decl.c (gfc_get_fake_result_decl): Re-add setting of
2229         GFC_DECL_RESULT flag.
2230
2231 2003-03-11  Roger Sayle  <roger@eyesopen.com>
2232
2233         * dependency.c (gfc_dep_compare_expr) <EXPR_OP>: Allow unary and
2234         binary operators to compare equal if their operands are equal.
2235         <EXPR_FUNCTION>: Allow "constant" intrinsic conversion functions
2236         to compare equal, if their operands are equal.
2237
2238 2006-03-11  Erik Edelmann  <eedelman@gcc.gnu.org>
2239
2240         * symbol.c (check_conflict): Allow allocatable function results,
2241         except for elemental functions.
2242         * trans-array.c (gfc_trans_allocate_temp_array): Rename to ...
2243         (gfc_trans_create_temp_array): ... this, and add new argument
2244         callee_alloc.
2245         (gfc_trans_array_constructor, gfc_conv_loop_setup): Update call
2246         to gfc_trans_allocate_temp_array.
2247         * trans-array.h (gfc_trans_allocate_temp_array): Update prototype.
2248         * trans-expr.c (gfc_conv_function_call): Use new arg of
2249         gfc_trans_create_temp_array avoid pre-allocation of temporary
2250         result variables of pointer AND allocatable functions.
2251         (gfc_trans_arrayfunc_assign): Return NULL for allocatable
2252         functions.
2253         * resolve.c (resolve_symbol): Copy value of 'allocatable' attribute
2254         from sym->result to sym.
2255
2256 2006-03-09  Erik Edelmann  <eedelman@gcc.gnu.org>
2257
2258         * trans-expr.c (gfc_add_interface_mapping): Copy 'allocatable'
2259         attribute from sym to new_sym.  Call build_fold_indirect_ref()
2260         for allocatable arguments.
2261
2262 2006-03-09 Paul Thomas <pault@gcc.gnu.org>
2263
2264         PR fortran/26257
2265         * trans-array.c (gfc_conv_expr_descriptor): Exclude calculation of
2266         the offset and data when se->data_not_needed is set.
2267         * trans.h: Include the data_not_need bit in gfc_se.
2268         * trans-intrinsic.c (gfc_conv_intrinsic_size): Set it for SIZE.
2269
2270 2006-03-06  Paul Thomas  <pault@gcc.gnu.org>
2271             Erik Edelmann  <eedelman@gcc.gnu.org>
2272
2273         * trans-array.c (gfc_trans_dealloc_allocated): New function.
2274         (gfc_trans_deferred_array): Use it, instead of inline code.
2275         * trans-array.h: Prototype for gfc_trans_dealloc_allocated().
2276         * trans-expr.c (gfc_conv_function_call): Deallocate allocated
2277         ALLOCATABLE, INTENT(OUT) arguments upon procedure entry.
2278
2279 2006-03-06  Paul Thomas  <pault@gcc.gnu.org>
2280
2281         PR fortran/26107
2282         * resolve.c (resolve_function): Add name after test for pureness.
2283
2284         PR fortran/19546
2285         * trans-expr.c (gfc_conv_variable): Detect reference to parent result,
2286         store current_function_decl, replace with parent, whilst calls are
2287         made to gfc_get_fake_result_decl, and restore afterwards. Signal this
2288         to gfc_get_fake_result_decl with a new argument, parent_flag.
2289         * trans-stmt.c (gfc_trans_return): gfc_get_fake_result_decl 2nd arg
2290         is set to zero.
2291         * trans.h: Add parent_flag to gfc_get_fake_result_decl prototype.
2292         * trans-decl.c (gfc_get_fake_result_decl): On parent_flag, being set,
2293         add decl to parent function. Replace refs to current_fake_result_decl
2294         with refs to this_result_decl.
2295         (gfc_generate_function_code): Null parent_fake_result_decl before the
2296         translation of code for contained procedures. Set parent_flag to zero
2297         in call to gfc_get_fake_result_decl.
2298         * trans-intrinsic.c (gfc_conv_intrinsic_len): The same.
2299
2300 2006-03-05  Steven G. Kargl  <kargls@comcast.net>
2301
2302         * simplify.c (gfc_simplify_verify):  Fix return when SET=''.
2303
2304 2006-03-05  Erik Edelmann  <eedelman@gcc.gnu.org>
2305
2306         PR fortran/16136
2307         * symbol.c (conf_std): New macro.
2308         (check_conflict): Use it to allow ALLOCATABLE dummy
2309         arguments for F2003.
2310         * trans-expr.c (gfc_conv_function_call): Pass the
2311         address of the array descriptor when dummy argument is
2312         ALLOCATABLE.
2313         * interface.c (compare_allocatable): New function.
2314         (compare_actual_formal): Use it.
2315         * resolve.c (resolve_deallocate_expr,
2316         resolve_allocate_expr): Check that INTENT(IN) variables
2317         aren't (de)allocated.
2318         * gfortran.texi (Fortran 2003 status): List ALLOCATABLE
2319         dummy arguments as supported.
2320
2321 2006-03-03  Roger Sayle  <roger@eyesopen.com>
2322
2323         * dependency.c (gfc_check_element_vs_element): Revert last change.
2324
2325 2006-03-03  Roger Sayle  <roger@eyesopen.com>
2326
2327         * dependency.c (gfc_check_element_vs_element): Consider two
2328         unordered scalar subscripts as (potentially) equal.
2329
2330 2006-03-03  Roger Sayle  <roger@eyesopen.com>
2331
2332         * dependency.c (gfc_check_dependency): Call gfc_dep_resolver to
2333         check whether two array references have a dependency.
2334         (gfc_check_element_vs_element): Assume lref and rref must be
2335         REF_ARRAYs.  If gfc_dep_compare_expr returns -2, assume these
2336         references could potentially overlap.
2337         (gfc_dep_resolver): Whitespace and comment tweaks.  Assume a
2338         dependency if the references have different depths.  Rewrite
2339         final term to clarrify we only have a dependency for overlaps.
2340
2341 2006-03-03  Thomas Koenig  <Thomas.Koenig@online.de>
2342
2343         PR fortran/25031
2344         * trans-array.h:  Adjust gfc_array_allocate prototype.
2345         * trans-array.c (gfc_array_allocate):  Change type of
2346         gfc_array_allocatate to bool.  Function returns true if
2347         it operates on an array.  Change second argument to gfc_expr.
2348         Find last reference in chain.
2349         If the function operates on an allocatable array, emit call to
2350         allocate_array() or allocate64_array().
2351         * trans-stmt.c (gfc_trans_allocate):  Code to follow to last
2352         reference has been moved to gfc_array_allocate.
2353         * trans.h:  Add declaration for gfor_fndecl_allocate_array and
2354         gfor_fndecl_allocate64_array.
2355         (gfc_build_builtin_function_decls):  Add gfor_fndecl_allocate_array
2356         and gfor_fndecl_allocate64_array.
2357
2358 2006-03-01  Roger Sayle  <roger@eyesopen.com>
2359
2360         * trans-stmt.c (generate_loop_for_temp_to_lhs): Add an additional
2361         INVERT argument to invert the sense of the WHEREMASK argument.
2362         Remove unneeded code to AND together a list of masks.
2363         (generate_loop_for_rhs_to_temp): Likewise.
2364         (gfc_trans_assign_need_temp): Likewise.
2365         (gfc_trans_forall_1): Likewise.
2366         (gfc_evaluate_where_mask): Likewise, add a new INVERT argument
2367         to specify the sense of the MASK argument.
2368         (gfc_trans_where_assign): Likewise.
2369         (gfc_trans_where_2): Likewise.  Restructure code that decides
2370         whether we need to allocate zero, one or two temporary masks.
2371         If this is a top-level WHERE (i.e. the incoming MASK is NULL),
2372         we only need to allocate at most one temporary mask, and can
2373         invert it's sense to provide the complementary pending execution
2374         mask.  Only calculate the size of the required temporary arrays
2375         if we need any.
2376         (gfc_trans_where): Update call to gfc_trans_where_2.
2377
2378 2006-03-01  Paul Thomas  <pault@gcc.gnu.org>
2379
2380         * iresolve.c (gfc_resolve_dot_product):  Remove any difference in
2381         treatment of logical types.
2382         * trans-intrinsic.c (gfc_conv_intrinsic_dot_product):  New function. 
2383
2384         PR fortran/26393
2385         * trans-decl.c (gfc_get_symbol_decl): Extend condition that symbols
2386         must be referenced to include unreferenced symbols in an interface
2387         body. 
2388
2389         PR fortran/20938
2390         * trans-array.c (gfc_conv_resolve_dependencies): Add call to
2391         gfc_are_equivalenced_arrays.
2392         * symbol.c (gfc_free_equiv_infos, gfc_free_equiv_lists): New
2393         functions. (gfc_free_namespace): Call them.
2394         * trans-common.c (copy_equiv_list_to_ns): New function.
2395         (add_equivalences): Call it.
2396         * gfortran.h: Add equiv_lists to gfc_namespace and define
2397         gfc_equiv_list and gfc_equiv_info.
2398         * dependency.c (gfc_are_equivalenced_arrays): New function.
2399         (gfc_check_dependency): Call it.
2400         * dependency.h: Prototype for gfc_are_equivalenced_arrays.
2401
2402 2006-03-01  Roger Sayle  <roger@eyesopen.com>
2403
2404         * dependency.c (gfc_is_same_range): Compare the stride, lower and
2405         upper bounds when testing array reference ranges for equality.
2406         (gfc_check_dependency): Fix indentation whitespace.
2407         (gfc_check_element_vs_element): Likewise.
2408         (gfc_dep_resolver): Likewise.
2409
2410 2006-02-28  Thomas Koenig  <Thomas.Koenig@online.de>
2411
2412         * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc):
2413         If the mask expression exists and has rank 0, enclose the
2414         generated loop in an "if (mask)".  Put the default
2415         initialization into the else branch.
2416
2417 2006-02-25  Thomas Koenig  <Thomas.Koenig@online.de>
2418
2419         PR fortran/23092
2420         * trans-intrinsic.c (gfc_conv_intrinsic_arith):  If the
2421         mask expression exists and has rank 0, enclose the generated
2422         loop in an "if (mask)".
2423         * (gfc_conv_intrinsic_minmaxloc):  Likewise.
2424
2425 2006-02-24  Paul Thomas  <pault@gcc.gnu.org>
2426
2427         PR fortran/26409
2428         * resolve.c (resolve_contained_functions, resolve_types,
2429         gfc_resolve): Revert patch of 2006-02-19.
2430
2431 2006-02-24  Paul Thomas  <pault@gcc.gnu.org>
2432
2433         PR fortran/24519
2434         * dependency.c (gfc_is_same_range): Correct typo.
2435         (gfc_check_section_vs_section): Call gfc_is_same_range.
2436
2437         PR fortran/25395
2438         * trans-common.c (add_equivalences): Add a new flag that is set when
2439         an equivalence is seen that prevents more from being reset until the
2440         start of a new traversal of the list, thus ensuring completion of
2441         all the equivalences.
2442
2443 2006-02-23  Erik Edelmann  <eedelman@gcc.gnu.org>
2444
2445         * module.c (read_module): Remove redundant code lines.
2446
2447 2006-02-20 Rafael \81Ávila de Esp\81índola <rafael.espindola@gmail.com>
2448         * Make-lang.in (FORTRAN): Remove
2449         (.PHONY): Remove F95 and f95. Add fortran
2450
2451 2006-02-20  Roger Sayle  <roger@eyesopen.com>
2452
2453         * trans-stmt.c (gfc_trans_where_2): Avoid updating unused current
2454         execution mask for empty WHERE/ELSEWHERE clauses.  Don't allocate
2455         temporary mask arrays if they won't be used.
2456
2457 2006-02-20  Roger Sayle  <roger@eyesopen.com>
2458
2459         * trans-stmt.c (gfc_trans_where_assign): Remove code to handle
2460         traversing a linked list of MASKs.  The MASK is now always a
2461         single element requiring no ANDing during the assignment.
2462
2463 2006-02-19  Thomas Koenig  <Thomas.Koenig@online.de>
2464
2465         * gfortran.texi:  Document environment variables which
2466         influence runtime behavior.
2467
2468 2006-02-19  H.J. Lu  <hongjiu.lu@intel.com>
2469
2470         * resolve.c (resolve_contained_functions): Call resolve_entries
2471         first.
2472         (resolve_types): Remove calls to resolve_entries and
2473         resolve_contained_functions.
2474         (gfc_resolve): Call resolve_contained_functions.
2475
2476 2006-02-19  Erik Edelmann  <eedelman@gcc.gnu.org>
2477
2478         PR fortran/26201
2479         * intrinsic.c (gfc_convert_type_warn): Call
2480         gfc_intrinsic_symbol() on the newly created symbol.
2481
2482 2006-02-19  Paul Thomas  <pault@gcc.gnu.org>
2483
2484         PR fortran/25054
2485         * resolve.c (is_non_constant_shape_array): New function.
2486         (resolve_fl_variable): Remove code for the new function and call it.
2487         (resolve_fl_namelist): New function.  Add test for namelist array
2488         with non-constant shape, using is_non_constant_shape_array.
2489         (resolve_symbol): Remove code for resolve_fl_namelist and call it.
2490
2491         PR fortran/25089
2492         * match.c (match_namelist): Increment the refs field of an accepted
2493         namelist object symbol.
2494         * resolve.c (resolve_fl_namelist): Test namelist objects for a conflict
2495         with contained or module procedures.
2496
2497 2006-02-18  Roger Sayle  <roger@eyesopen.com>
2498
2499         * trans-stmt.c (struct temporary_list): Delete.
2500         (gfc_trans_where_2): Major reorganization.  Remove no longer needed
2501         TEMP argument.  Allocate and deallocate the control mask and
2502         pending control mask locally.
2503         (gfc_trans_forall_1): Delete TEMP local variable, and update
2504         call to gfc_trans_where_2.  No need to deallocate arrays after.
2505         (gfc_evaluate_where_mask): Major reorganization.  Change return
2506         type to void.  Pass in parent execution mask, MASK, and two
2507         already allocated mask arrays CMASK and PMASK.  On return
2508         CMASK := MASK & COND, PMASK := MASK & !COND.  MASK, CMASK and
2509         CMASK may all be NULL, or refer to the same temporary arrays.
2510         (gfc_trans_where): Update call to gfc_trans_where_2.  We no
2511         longer need a TEMP variable or to deallocate temporary arrays
2512         allocated by gfc_trans_where_2.
2513
2514 2006-02-18   Danny Smith  <dannysmith@users.sourceforeg.net>
2515
2516         * gfortran.h (gfc_add_attribute): Change uint to unsigned int.
2517         * symbol.c (gfc_add_attribute): Likewise for definition.
2518         * resolve.c (resolve_global_procedure): Likewise for variable 'type'.
2519
2520 2006-02-17  Richard Sandiford  <richard@codesourcery.com>
2521
2522         * trans-common.c: Include rtl.h earlier.
2523         * trans-decl.c: Likewise.
2524
2525 2006-02-16  Jakub Jelinek  <jakub@redhat.com>
2526
2527         PR fortran/26224
2528         * parse.c (parse_omp_do, parse_omp_structured_block): Call
2529         gfc_commit_symbols and gfc_warning_check.
2530
2531         * openmp.c (resolve_omp_clauses): Add a dummy case label to workaround
2532         PR middle-end/26316.
2533
2534 2006-02-16  Paul Thomas  <pault@gcc.gnu.org>
2535
2536         PR fortran/24557
2537         * trans-expr.c (gfc_add_interface_mapping): Use the actual argument
2538         for character(*) arrays, rather than casting to the type and kind
2539         parameters of the formal argument.
2540
2541 2006-02-15  Toon Moene  <toon@moene.indiv.nluug.nl>
2542
2543         PR fortran/26054
2544         * options.c: Do not warn for Fortran 2003 features by default.
2545
2546 2006-02-15  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
2547
2548         * check.c: Update copyright years.
2549         
2550         * check.c (gfc_check_minloc_maxloc, check_reduction): Don't call
2551         dim_range_check on not-present optional dim argument.
2552
2553 2006-02-15  Jakub Jelinek  <jakub@redhat.com>
2554
2555         PR libgomp/25938
2556         PR libgomp/25984
2557         * Make-lang.in (install-finclude-dir): New goal.
2558         (fortran.install-common): Depend on install-finclude-dir.
2559         * lang-specs.h: If not -nostdinc, add -I finclude.
2560
2561 2006-02-14  Thomas Koenig  <Thomas.Koenig@online.de>
2562
2563         PR fortran/25045
2564         * check.c (dim_check):  Perform all checks if dim is optional.
2565         (gfc_check_minloc_maxloc):  Use dim_check and dim_rank_check
2566         to check dim argument.
2567         (check_reduction):  Likewise.
2568
2569 2006-02-14  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
2570
2571         PR fortran/26277
2572         * io.c (match_ltag): Mark label as referenced.
2573
2574 2006-02-14  Jakub Jelinek  <jakub@redhat.com>
2575             Richard Henderson  <rth@redhat.com>
2576             Diego Novillo  <dnovillo@redhat.com>
2577
2578         * invoke.texi: Document -fopenmp.
2579         * gfortran.texi (Extensions): Document OpenMP.
2580
2581         Backport from gomp-20050608-branch
2582         * trans-openmp.c: Call build_omp_clause instead of
2583         make_node when creating OMP_CLAUSE_* trees.
2584         (gfc_trans_omp_reduction_list): Remove argument 'code'.
2585         Adjust all callers.
2586
2587         * trans.h (build4_v): Define.
2588         * trans-openmp.c: Call build4_v to create OMP_PARALLEL nodes.
2589         Call build3_v to create OMP_SECTIONS nodes.
2590
2591         PR fortran/25162
2592         * openmp.c (gfc_match_omp_variable_list): Call gfc_set_sym_referenced
2593         on all symbols added to the variable list.
2594
2595         * openmp.c (gfc_match_omp_clauses): Fix check for non-INTRINSIC
2596         procedure symbol in REDUCTION.
2597
2598         * trans-openmp.c (gfc_trans_omp_array_reduction): Use gfc_add
2599         for MINUS_EXPR OMP_CLAUSE_REDUCTION_CODE.
2600
2601         * trans-openmp.c (gfc_trans_omp_do): Add PBLOCK argument.  If PBLOCK
2602         is non-NULL, evaluate INIT/COND/INCR and chunk size expressions in
2603         that statement block.
2604         (gfc_trans_omp_parallel_do): Pass non-NULL PBLOCK to gfc_trans_omp_do
2605         for non-ordered non-static combined loops.
2606         (gfc_trans_omp_directive): Pass NULL PBLOCK to gfc_trans_omp_do.
2607
2608         * openmp.c: Include target.h and toplev.h.
2609         (gfc_match_omp_threadprivate): Emit diagnostic if target does
2610         not support TLS.
2611         * Make-lang.in (fortran/openmp.o): Add dependencies on
2612         target.h and toplev.h.
2613
2614         * trans-decl.c (gfc_get_fake_result_decl): Set GFC_DECL_RESULT.
2615         * trans-openmp.c (gfc_omp_privatize_by_reference): Make
2616         DECL_ARTIFICIAL vars predetermined shared except GFC_DECL_RESULT.
2617         (gfc_omp_disregard_value_expr): Handle GFC_DECL_RESULT.
2618         (gfc_trans_omp_variable): New function.
2619         (gfc_trans_omp_variable_list, gfc_trans_omp_reduction_list): Use it.
2620         * trans.h (GFC_DECL_RESULT): Define.
2621
2622         * trans-openmp.c (gfc_omp_firstprivatize_type_sizes): New function.
2623         * f95-lang.c (LANG_HOOKS_OMP_FIRSTPRIVATIZE_TYPE_SIZES): Define.
2624         * trans.h (gfc_omp_firstprivatize_type_sizes): New prototype.
2625
2626         * trans-openmp.c (gfc_omp_privatize_by_reference): Return
2627         true if a pointer has GFC_DECL_SAVED_DESCRIPTOR set.
2628         (gfc_trans_omp_array_reduction, gfc_trans_omp_reduction_list): New
2629         functions.
2630         (gfc_trans_omp_clauses): Add WHERE argument.  Call
2631         gfc_trans_omp_reduction_list rather than gfc_trans_omp_variable_list
2632         for reductions.
2633         (gfc_trans_omp_do, gfc_trans_omp_parallel, gfc_trans_omp_parallel_do,
2634         gfc_trans_omp_parallel_sections, gfc_trans_omp_parallel_workshare,
2635         gfc_trans_omp_sections, gfc_trans_omp_single): Adjust
2636         gfc_trans_omp_clauses callers.
2637
2638         * openmp.c (omp_current_do_code): New var.
2639         (gfc_resolve_omp_do_blocks): New function.
2640         (gfc_resolve_omp_parallel_blocks): Call it.
2641         (gfc_resolve_do_iterator): Add CODE argument.  Don't propagate
2642         predetermination if argument is !$omp do or !$omp parallel do
2643         iteration variable.
2644         * resolve.c (resolve_code): Call gfc_resolve_omp_do_blocks
2645         for EXEC_OMP_DO.  Adjust gfc_resolve_do_iterator caller.
2646         * fortran.h (gfc_resolve_omp_do_blocks): New prototype.
2647         (gfc_resolve_do_iterator): Add CODE argument.
2648
2649         * trans.h (gfc_omp_predetermined_sharing,
2650         gfc_omp_disregard_value_expr, gfc_omp_private_debug_clause): New
2651         prototypes.
2652         (GFC_DECL_COMMON_OR_EQUIV, GFC_DECL_CRAY_POINTEE): Define.
2653         * trans-openmp.c (gfc_omp_predetermined_sharing,
2654         gfc_omp_disregard_value_expr, gfc_omp_private_debug_clause): New
2655         functions.
2656         * trans-common.c (build_equiv_decl, build_common_decl,
2657         create_common): Set GFC_DECL_COMMON_OR_EQUIV flag on the decls.
2658         * trans-decl.c (gfc_finish_cray_pointee): Set GFC_DECL_CRAY_POINTEE
2659         on the decl.
2660         * f95-lang.c (LANG_HOOKS_OMP_PREDETERMINED_SHARING,
2661         LANG_HOOKS_OMP_DISREGARD_VALUE_EXPR,
2662         LANG_HOOKS_OMP_PRIVATE_DEBUG_CLAUSE): Define.
2663
2664         * openmp.c (resolve_omp_clauses): Remove extraneous comma.
2665
2666         * symbol.c (check_conflict): Add conflict between cray_pointee and
2667         threadprivate.
2668         * openmp.c (gfc_match_omp_threadprivate): Fail if
2669         gfc_add_threadprivate returned FAILURE.
2670         (resolve_omp_clauses): Diagnose Cray pointees in SHARED,
2671         {,FIRST,LAST}PRIVATE and REDUCTION clauses and Cray pointers in
2672         {FIRST,LAST}PRIVATE and REDUCTION clauses.
2673
2674         * resolve.c (omp_workshare_flag): New variable.
2675         (resolve_function): Diagnose use of non-ELEMENTAL user defined
2676         function in WORKSHARE construct.
2677         (resolve_code): Cleanup forall_save use.  Make sure omp_workshare_flag
2678         is set to correct value in different contexts.
2679
2680         * openmp.c (resolve_omp_clauses): Replace %s with '%s' when printing
2681         variable name.
2682         (resolve_omp_atomic): Likewise.
2683
2684         PR fortran/24493
2685         * scanner.c (skip_free_comments): Set at_bol at the beginning of the
2686         loop, not before it.
2687         (skip_fixed_comments): Handle ! comments in the middle of line here
2688         as well.
2689         (gfc_skip_comments): Use skip_fixed_comments for FIXED_FORM even if
2690         not at BOL.
2691         (gfc_next_char_literal): Fix expected canonicalized *$omp string.
2692
2693         * trans-openmp.c (gfc_trans_omp_do): Use make_node and explicit
2694         initialization to build OMP_FOR instead of build.
2695
2696         * trans-decl.c (gfc_gimplify_function): Invoke
2697         diagnose_omp_structured_block_errors.
2698
2699         * trans-openmp.c (gfc_trans_omp_master): Use OMP_MASTER.
2700         (gfc_trans_omp_ordered): Use OMP_ORDERED.
2701
2702         * gfortran.h (gfc_resolve_do_iterator, gfc_resolve_blocks,
2703         gfc_resolve_omp_parallel_blocks): New prototypes.
2704         * resolve.c (resolve_blocks): Renamed to...
2705         (gfc_resolve_blocks): ... this.  Remove static.
2706         (gfc_resolve_forall): Adjust caller.
2707         (resolve_code): Only call gfc_resolve_blocks if code->block != 0
2708         and not for EXEC_OMP_PARALLEL* directives.  Call
2709         gfc_resolve_omp_parallel_blocks for EXEC_OMP_PARALLEL* directives.
2710         Call gfc_resolve_do_iterator if resolved successfully EXEC_DO
2711         iterator.
2712         * openmp.c: Include pointer-set.h.
2713         (omp_current_ctx): New variable.
2714         (gfc_resolve_omp_parallel_blocks, gfc_resolve_do_iterator): New
2715         functions.
2716         * Make-lang.in (fortran/openmp.o): Depend on pointer-set.h.
2717
2718         * openmp.c (gfc_match_omp_clauses): For max/min/iand/ior/ieor,
2719         look up symbol if it exists, use its name instead and, if it is not
2720         INTRINSIC, issue diagnostics.
2721
2722         * parse.c (parse_omp_do): Handle implied end do properly.
2723         (parse_executable): If parse_omp_do returned ST_IMPLIED_ENDDO,
2724         return it instead of continuing.
2725
2726         * trans-openmp.c (gfc_trans_omp_critical): Update for changed
2727         operand numbering.
2728         (gfc_trans_omp_do, gfc_trans_omp_parallel, gfc_trans_omp_parallel_do,
2729         gfc_trans_omp_parallel_sections, gfc_trans_omp_parallel_workshare,
2730         gfc_trans_omp_sections, gfc_trans_omp_single): Likewise.
2731
2732         * trans.h (gfc_omp_privatize_by_reference): New prototype.
2733         * f95-lang.c (LANG_HOOKS_OMP_PRIVATIZE_BY_REFERENCE): Redefine
2734         to gfc_omp_privatize_by_reference.
2735         * trans-openmp.c (gfc_omp_privatize_by_reference): New function.
2736
2737         * trans-stmt.h (gfc_trans_omp_directive): Add comment.
2738
2739         * openmp.c (gfc_match_omp_variable_list): Add ALLOW_COMMON argument.
2740         Disallow COMMON matching if it is set.
2741         (gfc_match_omp_clauses, gfc_match_omp_flush): Adjust all callers.
2742         (resolve_omp_clauses): Show locus in error messages.  Check that
2743         variable types in reduction clauses are appropriate for reduction
2744         operators.
2745
2746         * resolve.c (resolve_symbol): Don't error if a threadprivate module
2747         variable isn't SAVEd.
2748
2749         * trans-openmp.c (gfc_trans_omp_do): Put count into BLOCK, not BODY.
2750         Fix typo in condition.  Fix DOVAR initialization.
2751
2752         * openmp.c (gfc_match_omp_clauses): Match min/iand/ior/ieor
2753         rather than .min. etc.
2754
2755         * trans-openmpc.c (omp_not_yet): Remove.
2756         (gfc_trans_omp_parallel_do): Keep listprivate clause on parallel.
2757         Force creation of BIND_EXPR around the workshare construct.
2758         (gfc_trans_omp_parallel_sections): Likewise.
2759         (gfc_trans_omp_parallel_workshare): Likewise.
2760
2761         * types.def (BT_I16, BT_FN_I16_VPTR_I16,
2762         BT_FN_BOOL_VPTR_I16_I16, BT_FN_I16_VPTR_I16_I16): Add.
2763
2764         * trans-openmp.c (gfc_trans_omp_clauses): Create OMP_CLAUSE_DEFAULT.
2765         (gfc_trans_omp_code): New function.
2766         (gfc_trans_omp_do): Use it, remove omp_not_yet uses.
2767         (gfc_trans_omp_parallel, gfc_trans_omp_single): Likewise.
2768         (gfc_trans_omp_sections): Likewise.  Only treat empty last section
2769         specially if lastprivate clause is present.
2770         * f95-lang.c (gfc_init_builtin_functions): Create BUILT_IN_TRAP
2771         builtin.
2772
2773         * trans-openmp.c (gfc_trans_omp_variable_list): Update for
2774         OMP_CLAUSE_DECL name change.
2775         (gfc_trans_omp_do): Likewise.
2776
2777         * trans-openmp.c (gfc_trans_omp_clauses): Create OMP_CLAUSE_REDUCTION
2778         clauses.
2779         (gfc_trans_omp_atomic): Build OMP_ATOMIC instead of expanding
2780         sync builtins directly.
2781         (gfc_trans_omp_single): Build OMP_SINGLE statement.
2782
2783         * trans-openmp.c (gfc_trans_add_clause): New.
2784         (gfc_trans_omp_variable_list): Take a tree code and build the clause
2785         node here.  Link it to the head of a list.
2786         (gfc_trans_omp_clauses): Update to match.
2787         (gfc_trans_omp_do): Use gfc_trans_add_clause.
2788
2789         * trans-openmp.c (gfc_trans_omp_clauses): Change second argument to
2790         gfc_omp_clauses *.  Use gfc_evaluate_now instead of creating
2791         temporaries by hand.
2792         (gfc_trans_omp_atomic, gfc_trans_omp_critical): Use buildN_v macros.
2793         (gfc_trans_omp_do): New function.
2794         (gfc_trans_omp_master): Dont' check for gfc_trans_code returning NULL.
2795         (gfc_trans_omp_parallel): Adjust gfc_trans_omp_clauses caller.
2796         Use buildN_v macros.
2797         (gfc_trans_omp_parallel_do, gfc_trans_omp_parallel_sections,
2798         gfc_trans_omp_parallel_workshare, gfc_trans_omp_sections,
2799         gfc_trans_omp_single, gfc_trans_omp_workshare): New functions.
2800         (gfc_trans_omp_directive): Use them.
2801         * parse.c (parse_omp_do): Allow new_st.op == EXEC_NOP.
2802         * openmp.c (resolve_omp_clauses): Check for list items present
2803         in multiple clauses.
2804         (resolve_omp_do): Check that iteration variable is not THREADPRIVATE
2805         and is not present in any clause variable lists other than PRIVATE
2806         or LASTPRIVATE.
2807
2808         * gfortran.h (symbol_attribute): Add threadprivate bit.
2809         (gfc_common_head): Add threadprivate member, change use_assoc
2810         and saved into char to save space.
2811         (gfc_add_threadprivate): New prototype.
2812         * symbol.c (check_conflict): Handle threadprivate.
2813         (gfc_add_threadprivate): New function.
2814         (gfc_copy_attr): Copy threadprivate.
2815         * trans-openmp.c (gfc_trans_omp_clauses): Avoid creating a temporary
2816         if IF or NUM_THREADS is constant.  Create OMP_CLAUSE_SCHEDULE and
2817         OMP_CLAUSE_ORDERED.
2818         * resolve.c (resolve_symbol): Complain if a THREADPRIVATE symbol
2819         outside a module and not in COMMON has is not SAVEd.
2820         (resolve_equivalence): Ensure THREADPRIVATE objects don't get
2821         EQUIVALENCEd.
2822         * trans-common.c: Include target.h and rtl.h.
2823         (build_common_decl): Set DECL_TLS_MODEL if THREADPRIVATE.
2824         * trans-decl.c: Include rtl.h.
2825         (gfc_finish_var_decl): Set DECL_TLS_MODEL if THREADPRIVATE.
2826         * dump-parse-tree.c (gfc_show_attr): Handle THREADPRIVATE.
2827         * Make-lang.in (fortran/trans-decl.o): Depend on $(RTL_H).
2828         (fortran/trans-common.o): Depend on $(RTL_H) and $(TARGET_H).
2829         * openmp.c (gfc_match_omp_variable_list): Ensure COMMON block
2830         is from current namespace.
2831         (gfc_match_omp_threadprivate): Rewrite.
2832         (resolve_omp_clauses): Check some clause restrictions.
2833         * module.c (ab_attribute): Add AB_THREADPRIVATE.
2834         (attr_bits): Add THREADPRIVATE.
2835         (mio_symbol_attribute, mio_symbol_attribute): Handle threadprivate.
2836         (load_commons, write_common, write_blank_common): Adjust for type
2837         change of saved, store/load threadprivate bit from the integer
2838         as well.
2839
2840         * types.def (BT_FN_UINT_UINT): New.
2841         (BT_FN_VOID_UINT_UINT): Remove.
2842
2843         * trans-openmp.c (gfc_trans_omp_clauses, gfc_trans_omp_barrier,
2844         gfc_trans_omp_critical, gfc_trans_omp_flush, gfc_trans_omp_master,
2845         gfc_trans_omp_ordered, gfc_trans_omp_parallel): New functions.
2846         (gfc_trans_omp_directive): Use them.
2847
2848         * openmp.c (expr_references_sym): Add SE argument, don't look
2849         into SE tree.
2850         (is_conversion): New function.
2851         (resolve_omp_atomic): Adjust expr_references_sym callers.  Handle
2852         promoted expressions.
2853         * trans-openmp.c (gfc_trans_omp_atomic): New function.
2854         (gfc_trans_omp_directive): Call it.
2855
2856         * f95-lang.c (builtin_type_for_size): New function.
2857         (gfc_init_builtin_functions): Initialize synchronization and
2858         OpenMP builtins.
2859         * types.def: New file.
2860         * Make-lang.in (f95-lang.o): Depend on $(BUILTINS_DEF) and
2861         fortran/types.def.
2862
2863         * trans-openmp.c: Rename GOMP_* tree codes into OMP_*.
2864
2865         * dump-parse-tree.c (show_symtree): Don't crash if ns->proc_name
2866         is NULL.
2867
2868         * dump-parse-tree.c (gfc_show_namelist, gfc_show_omp_node): New
2869         functions.
2870         (gfc_show_code_node): Call gfc_show_omp_node for EXEC_OMP_* nodes.
2871
2872         * parse.c (parse_omp_do): Call pop_state before next_statement.
2873         * openmp.c (expr_references_sym, resolve_omp_atomic, resolve_omp_do):
2874         New functions.
2875         (gfc_resolve_omp_directive): Call them.
2876         * match.c (match_exit_cycle): Issue error if EXIT or CYCLE statement
2877         leaves an OpenMP structured block or if EXIT terminates !$omp do
2878         loop.
2879
2880         * Make-lang.in (F95_PARSER_OBJS): Add fortran/openmp.o.
2881         (F95_OBJS): Add fortran/trans-openmp.o.
2882         (fortran/trans-openmp.o): Depend on $(GFORTRAN_TRANS_DEPS).
2883         * lang.opt: Add -fopenmp option.
2884         * options.c (gfc_init_options): Initialize it.
2885         (gfc_handle_option): Handle it.
2886         * gfortran.h (ST_OMP_ATOMIC, ST_OMP_BARRIER, ST_OMP_CRITICAL,
2887         ST_OMP_END_CRITICAL, ST_OMP_END_DO, ST_OMP_END_MASTER,
2888         ST_OMP_END_ORDERED, ST_OMP_END_PARALLEL, ST_OMP_END_PARALLEL_DO,
2889         ST_OMP_END_PARALLEL_SECTIONS, ST_OMP_END_PARALLEL_WORKSHARE,
2890         ST_OMP_END_SECTIONS, ST_OMP_END_SINGLE, ST_OMP_END_WORKSHARE,
2891         ST_OMP_DO, ST_OMP_FLUSH, ST_OMP_MASTER, ST_OMP_ORDERED,
2892         ST_OMP_PARALLEL, ST_OMP_PARALLEL_DO, ST_OMP_PARALLEL_SECTIONS,
2893         ST_OMP_PARALLEL_WORKSHARE, ST_OMP_SECTIONS, ST_OMP_SECTION,
2894         ST_OMP_SINGLE, ST_OMP_THREADPRIVATE, ST_OMP_WORKSHARE): New
2895         statement codes.
2896         (OMP_LIST_PRIVATE, OMP_LIST_FIRSTPRIVATE, OMP_LIST_LASTPRIVATE,
2897         OMP_LIST_COPYPRIVATE, OMP_LIST_SHARED, OMP_LIST_COPYIN,
2898         OMP_LIST_PLUS, OMP_LIST_REDUCTION_FIRST, OMP_LIST_MULT,
2899         OMP_LIST_SUB, OMP_LIST_AND, OMP_LIST_OR, OMP_LIST_EQV,
2900         OMP_LIST_NEQV, OMP_LIST_MAX, OMP_LIST_MIN, OMP_LIST_IAND,
2901         OMP_LIST_IOR, OMP_LIST_IEOR, OMP_LIST_REDUCTION_LAST, OMP_LIST_NUM):
2902         New OpenMP variable list types.
2903         (gfc_omp_clauses): New typedef.
2904         (gfc_get_omp_clauses): Define.
2905         (EXEC_OMP_CRITICAL, EXEC_OMP_DO, EXEC_OMP_FLUSH, EXEC_OMP_MASTER,
2906         EXEC_OMP_ORDERED, EXEC_OMP_PARALLEL, EXEC_OMP_PARALLEL_DO,
2907         EXEC_OMP_PARALLEL_SECTIONS, EXEC_OMP_PARALLEL_WORKSHARE,
2908         EXEC_OMP_SECTIONS, EXEC_OMP_SINGLE, EXEC_OMP_WORKSHARE,
2909         EXEC_OMP_ATOMIC, EXEC_OMP_BARRIER, EXEC_OMP_END_NOWAIT,
2910         EXEC_OMP_END_SINGLE): New OpenMP gfc_exec_op codes.
2911         (struct gfc_code): Add omp_clauses, omp_name, omp_namelist
2912         and omp_bool fields to ext union.
2913         (flag_openmp): Declare.
2914         (gfc_free_omp_clauses, gfc_resolve_omp_directive): New prototypes.
2915         * scanner.c (openmp_flag, openmp_locus): New variables.
2916         (skip_free_comments, skip_fixed_comments, gfc_next_char_literal):
2917         Handle OpenMP directive lines and conditional compilation magic
2918         comments.
2919         * parse.h (COMP_OMP_STRUCTURED_BLOCK): New compile state.
2920         * parse.c (decode_omp_directive, parse_omp_do, parse_omp_atomic,
2921         parse_omp_structured_block): New functions.
2922         (next_free, next_fixed): Parse OpenMP directives.
2923         (case_executable, case_exec_markers, case_decl): Add ST_OMP_*
2924         codes.
2925         (gfc_ascii_statement): Handle ST_OMP_* codes.
2926         (parse_executable): Rearrange the loop slightly, so that
2927         parse_omp_do can return next_statement.
2928         * match.h (gfc_match_omp_eos, gfc_match_omp_atomic,
2929         gfc_match_omp_barrier, gfc_match_omp_critical, gfc_match_omp_do,
2930         gfc_match_omp_flush, gfc_match_omp_master, gfc_match_omp_ordered,
2931         gfc_match_omp_parallel, gfc_match_omp_parallel_do,
2932         gfc_match_omp_parallel_sections, gfc_match_omp_parallel_workshare,
2933         gfc_match_omp_sections, gfc_match_omp_single,
2934         gfc_match_omp_threadprivate, gfc_match_omp_workshare,
2935         gfc_match_omp_end_nowait, gfc_match_omp_end_single): New prototypes.
2936         * resolve.c (resolve_blocks): Ignore EXEC_OMP_* block directives.
2937         (resolve_code): Call gfc_resolve_omp_directive on EXEC_OMP_*
2938         directives.
2939         * trans.c (gfc_trans_code): Call gfc_trans_omp_directive for
2940         EXEC_OMP_* directives.
2941         * st.c (gfc_free_statement): Handle EXEC_OMP_* statement freeing.
2942         * trans-stmt.h (gfc_trans_omp_directive): New prototype.
2943         * openmp.c: New file.
2944         * trans-openmp.c: New file.
2945
2946 2006-02-13  Andrew Pinski  <pinskia@physics.uc.edu>
2947             Jakub Jelinek  <jakub@redhat.com>
2948
2949         PR fortran/26246
2950         * trans-decl.c (gfc_get_symbol_decl, gfc_get_fake_result_decl): Use
2951         gfc_add_decl_to_function rather than gfc_finish_var_decl on length.
2952
2953 2006-02-13  Paul Thomas  <pault@gcc.gnu.org>
2954
2955         PR fortran/26074
2956         PR fortran/25103
2957         * resolve.c (resolve_symbol): Extend the requirement that module
2958         arrays have constant bounds to those in the main program.  At the
2959         same time simplify the array bounds, to avoiding trapping parameter
2960         array references, and exclude automatic character length from main
2961         and modules. Rearrange resolve_symbol and resolve_derived to put as
2962         each flavor together, as much as is possible and move all specific
2963         code for flavors FL_VARIABLE, FL_PROCEDURE and FL_PARAMETER into new
2964         functions.
2965         (resolve_fl_var_and_proc, resolve_fl_variable, resolve_fl_procedure):
2966         New functions to do work of resolve_symbol.
2967         (resolve_index_expr): New function that is called from resolved_symbol
2968         and is extracted from resolve_charlen.
2969         (resolve_charlen): Call this new function.
2970         (resolve_fl_derived): Renamed resolve_derived to be consistent with
2971         the naming of the new functions for the other flavours.  Change the
2972         charlen checking so that the style is consistent with other similar
2973         checks. Add the generation of the gfc_dt_list, removed from resolve_
2974         symbol.
2975
2976         PR fortran/20861
2977         * resolve.c (resolve_actual_arglist): Prevent internal procedures
2978         from being dummy arguments.
2979
2980         PR fortran/20871
2981         * resolve.c (resolve_actual_arglist): Prevent pure but non-intrinsic
2982         procedures from being dummy arguments.
2983
2984         PR fortran/25083
2985         * resolve.c (check_data_variable): Add test that data variable is in
2986         COMMON.
2987
2988         PR fortran/25088
2989         * resolve.c (resolve_call): Add test that the subroutine does not
2990         have a type.
2991
2992 2006-02-12  Erik Edelmann  <eedelman@gcc.gnu.org>
2993
2994         PR fortran/25806
2995         * trans-array.c (gfc_trans_allocate_array_storage): New argument
2996         dealloc; free the temporary only if dealloc is true.
2997         (gfc_trans_allocate_temp_array): New argument bool dealloc, to be
2998         passed onwards to gfc_trans_allocate_array_storage.
2999         (gfc_trans_array_constructor, gfc_conv_loop_setup): Update call to
3000         gfc_trans_allocate_temp_array.
3001         * trans-array.h (gfc_trans_allocate_temp_array): Update function
3002         prototype.
3003         * trans-expr.c (gfc_conv_function_call): Set new argument 'dealloc'
3004         to gfc_trans_allocate_temp_array to false in case of functions
3005         returning pointers.
3006         (gfc_trans_arrayfunc_assign): Return NULL for functions returning
3007         pointers.
3008
3009 2006-02-10  Steven G. Kargl  <kargls@comcast.net>
3010
3011         PR fortran/20858
3012         *decl.c (variable_decl): Improve error message.  Remove initialization
3013         typespec.  Wrap long line.
3014         *expr.c (gfc_check_pointer_assign): Permit checking of type, kind type,
3015         and rank.
3016         *simplify.c (gfc_simplify_null): Ensure type, kind type, and rank
3017         are set.
3018
3019
3020 2006-02-10  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
3021
3022         PR fortran/14771
3023         * arith.c (eval_intrinsic): Accept INTRINSIC_PARENTHESES.
3024         * expr.c (check_intrinsic_op): Likewise.
3025         * module.c (mio_expr): Likewise.
3026
3027 2006-02-09  Tobias Schl\81üter  <tobias.schlueter@physik.uni-muenchen.de>
3028
3029         * dump-parse-tree.c: Update copyright years.
3030         * matchexp.c: Likewise.
3031         * module.c: Likewise.
3032
3033         PR fortran/14771
3034         * gfortran.h (gfc_intrinsic_op): Add INTRINSIC_PARENTHESES.
3035         * dump-parse-tree (gfc_show_expr): Handle INTRINSIC_PARENTHESES.
3036         * expr.c (simplify_intrinsic_op): Treat INTRINSIC_PARENTHESES as
3037         if it were INTRINSIC_UPLUS.
3038         * resolve.c (resolve_operator): Handle INTRINSIC_PARENTHESES.
3039         * match.c (intrinsic_operators): Add INTRINSIC_PARENTHESES.
3040         * matchexp.c (match_primary): Record parentheses surrounding
3041         numeric expressions.
3042         * module.c (intrinsics): Add INTRINSIC_PARENTHESES for module
3043         dumping.
3044         * trans-expr.c (gfc_conv_expr_op): Handle INTRINSIC_PARENTHESES.
3045
3046 2006-02-09  Paul Thomas  <pault@gcc.gnu.org>
3047
3048         PR fortran/26038
3049         * trans-stmt.c (gfc_trans_allocate): Provide assumed character length
3050         scalar with missing backend_decl for the hidden dummy charlen.
3051
3052         PR fortran/25059
3053         * interface.c (gfc_extend_assign): Remove detection of non-PURE
3054         subroutine in assignment interface, with gfc_error, and put it in
3055         * resolve.c (resolve_code).
3056
3057         PR fortran/25070
3058         * interface.c (gfc_procedure_use): Flag rank checking for non-
3059         elemental, contained or interface procedures in call to
3060         (compare_actual_formal), where ranks are checked for assumed
3061         shape arrays..
3062
3063 2006-02-08  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
3064
3065         PR libfortran/25425
3066         * trans-decl.c (gfc_generate_function_code): Add new argument,
3067         pedantic, to set_std call.
3068
3069 2006-02-06  Thomas Koenig  <Thomas.Koenig@online.de>
3070
3071         PR libfortran/23815
3072         * gfortran.texi: Document the GFORTRAN_CONVERT_UNIT environment
3073         variable.
3074         * invoke.texi:  Mention the "Runtime" chapter.
3075         Document the -fconvert= option.
3076         * gfortran.h:  Add options_convert.
3077         * lang.opt:  Add fconvert=little-endian, fconvert=big-endian,
3078         fconvert=native and fconvert=swap.
3079         * trans-decl.c (top level):  Add gfor_fndecl_set_convert.
3080         (gfc_build_builtin_function_decls):  Set gfor_fndecl_set_convert.
3081         (gfc_generate_function_code):  If -fconvert was specified,
3082         and this is the main program, add a call to set_convert().
3083         * options.c:  Handle the -fconvert options.
3084
3085 2006-02-06  Roger Sayle  <roger@eyesopen.com>
3086
3087         * trans-stmt.c (gfc_evaluate_where_mask): Allow the NMASK argument
3088         to be NULL to indicate that the not mask isn't required.
3089         (gfc_trans_where_2): Remove PMASK argument.  Avoid calculating the
3090         pending mask for the last clause of a WHERE chain.  Update recursive
3091         call.
3092         (gfc_trans_forall_1): Update call to gfc_trans_where_2.
3093         (gfc_trans_where): Likewise.
3094
3095 2006-02-06  Jakub Jelinek  <jakub@redhat.com>
3096
3097         Backport from gomp-20050608-branch
3098         * trans-decl.c (create_function_arglist): Handle dummy functions.
3099
3100         * trans-decl.c (gfc_get_symbol_decl): Revert explicit setting of
3101         TYPE_SIZE_UNIT.
3102         (gfc_trans_vla_type_sizes): Also "gimplify"
3103         GFC_TYPE_ARRAY_DATAPTR_TYPE for GFC_DESCRIPTOR_TYPE_P types.
3104         * trans-array.c (gfc_trans_deferred_array): Call
3105         gfc_trans_vla_type_sizes.
3106
3107         * trans-decl.c (saved_function_decls, saved_parent_function_decls):
3108         Remove unnecessary initialization.
3109         (create_function_arglist): Make sure __result has complete type.
3110         (gfc_get_fake_result_decl): Change current_fake_result_decl into
3111         a tree chain.  For entry master, create a separate variable
3112         for each result name.  For BT_CHARACTER results, call
3113         gfc_finish_var_decl on length even if it has been already created,
3114         but not pushdecl'ed.
3115         (gfc_trans_vla_type_sizes): For function/entry result, adjust
3116         result value type, not the FUNCTION_TYPE.
3117         (gfc_generate_function_code): Adjust for current_fake_result_decl
3118         changes.
3119         (gfc_trans_deferred_vars): Likewise.  Call gfc_trans_vla_type_sizes
3120         even on result if it is assumed-length character.
3121
3122         * trans-decl.c (gfc_trans_dummy_character): Add SYM argument.
3123         Call gfc_trans_vla_type_sizes.
3124         (gfc_trans_auto_character_variable): Call gfc_trans_vla_type_sizes.
3125         (gfc_trans_vla_one_sizepos, gfc_trans_vla_type_sizes_1,
3126         gfc_trans_vla_type_sizes): New functions.
3127         (gfc_trans_deferred_vars): Adjust gfc_trans_dummy_character
3128         callers.  Call gfc_trans_vla_type_sizes on assumed-length
3129         character parameters.
3130         * trans-array.c (gfc_trans_array_bounds,
3131         gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias): Call
3132         gfc_trans_vla_type_sizes.
3133         * trans.h (gfc_trans_vla_type_sizes): New prototype.
3134
3135         * trans-decl.c (gfc_build_qualified_array): For non-assumed-size
3136         arrays without constant size, create also an index var for
3137         GFC_TYPE_ARRAY_SIZE (type).  If the type is incomplete, complete
3138         it as 0..size-1.
3139         (gfc_create_string_length): Don't call gfc_defer_symbol_init
3140         if just creating DECL_ARGUMENTS.
3141         (gfc_get_symbol_decl): Call gfc_finish_var_decl and
3142         gfc_defer_symbol_init even if ts.cl->backend_decl is already
3143         set to a VAR_DECL that doesn't have DECL_CONTEXT yet.
3144         (create_function_arglist): Rework, so that hidden length
3145         arguments for CHARACTER parameters are created together with
3146         the parameters.  Resolve ts.cl->backend_decl for CHARACTER
3147         parameters.  If the argument is a non-constant length array
3148         or CHARACTER, ensure PARM_DECL has different type than
3149         its DECL_ARG_TYPE.
3150         (generate_local_decl): Call gfc_get_symbol_decl even
3151         for non-referenced non-constant length CHARACTER parameters
3152         after optionally issuing warnings.
3153         * trans-array.c (gfc_trans_array_bounds): Set last stride
3154         to GFC_TYPE_ARRAY_SIZE (type) to initialize it as well.
3155         (gfc_trans_dummy_array_bias): Initialize GFC_TYPE_ARRAY_SIZE (type)
3156         variable as well.
3157
3158         * trans-expr.c (gfc_conv_expr_val): Fix comment typo.
3159
3160         * trans-stmt.c (gfc_trans_simple_do): Fix comment.
3161
3162 2006-02-04  Roger Sayle  <roger@eyesopen.com>
3163
3164         * dependency.c (gfc_check_dependency): Remove unused vars and nvars
3165         arguments.  Replace with an "identical" argument.  A full array
3166         reference to the same symbol is a dependency if identical is true.
3167         * dependency.h (gfc_check_dependency): Update prototype.
3168         * trans-array.h (gfc_check_dependency): Delete duplicate prototype.
3169         * trans-stmt.c: #include dependency.h for gfc_check_dependency.
3170         (gfc_trans_forall_1): Update calls to gfc_check_dependency.
3171         (gfc_trans_where_2): Likewise.  Remove unneeded variables.
3172         (gfc_trans_where_3): New function for simple non-dependent WHEREs.
3173         (gfc_trans_where): Call gfc_trans_where_3 to translate simple
3174         F90-style WHERE statements without internal dependencies.
3175         * Make-lang.in (trans-stmt.o): Depend upon dependency.h.
3176
3177 2006-02-05  H.J. Lu  <hongjiu.lu@intel.com>
3178
3179         PR fortran/26041
3180         PR fortran/26064
3181         * resolve.c (resolve_types): New function.
3182         (resolve_codes): Likewise.
3183         (gfc_resolve): Use them.
3184
3185 2006-02-05  Roger Sayle  <roger@eyesopen.com>
3186
3187         * trans-stmt.c (gfc_evaluate_where_mask): Use LOGICAL*1 for WHERE
3188         masks instead of LOGICAL*4.
3189
3190 2006-02-05  Jakub Jelinek  <jakub@redhat.com>
3191
3192         * resolve.c (resolve_symbol): Initialize constructor_expr to NULL.
3193
3194 2006-02-04  Thomas Koenig  <Thomas.Koenig@online.de>
3195
3196         PR fortran/25075
3197         check.c (identical_dimen_shape):  New function.
3198         (check_dot_product):  Use identical_dimen_shape() to check sizes
3199         for dot_product.
3200         (gfc_check_matmul):  Likewise.
3201         (gfc_check_merge):  Check conformance between tsource and fsource
3202         and between tsource and mask.
3203         (gfc_check_pack):  Check conformance between array and mask.
3204
3205 2006-02-03  Steven G. Kargl  <kargls@comcast>
3206             Paul Thomas  <pault@gcc.gnu.org>
3207
3208         PR fortran/20845
3209         * resolve.c (resolve_symbol): Default initialization of derived type
3210         component reguires the SAVE attribute.
3211
3212 2006-02-02  Steven G. Kargl  <kargls@comcast>
3213
3214         PR fortran/24958
3215         match.c (gfc_match_nullify):  Free the list from head not tail.
3216
3217         PR fortran/25072
3218         * match.c (match_forall_header): Fix internal error caused by bogus
3219         gfc_epxr pointers.
3220
3221
3222 2006-01-31  Thomas Koenig  <Thomas.Koenig@online.de>
3223
3224         PR fortran/26039
3225         expr.c (gfc_check_conformance):  Reorder error message
3226         to avoid plural.
3227         check.c(gfc_check_minloc_maxloc):  Call gfc_check_conformance
3228         for checking arguments array and mask.
3229         (check_reduction):  Likewise.
3230
3231 2006-01-30  Erik Edelmann  <eedelman@gcc.gnu.org>
3232
3233         PR fortran/24266
3234         * trans-io.c (set_internal_unit): Check the rank of the
3235         expression node itself instead of its symbol.
3236
3237 2006-01-29  Paul Thomas  <pault@gcc.gnu.org>
3238
3239         PR fortran/18578
3240         PR fortran/18579
3241         PR fortran/20857
3242         PR fortran/20885
3243         * interface.c (compare_actual_formal): Error for INTENT(OUT or INOUT)
3244         if actual argument is not a variable.
3245
3246 2006-01-28  Paul Thomas  <pault@gcc.gnu.org>
3247
3248         PR fortran/17911
3249         * expr.c (gfc_check_assign, gfc_check_pointer_assign): Emit error if
3250         the lvalue is a use associated procedure.
3251
3252         PR fortran/20895
3253         PR fortran/25030
3254         * expr.c (gfc_check_pointer_assign): Emit error if lvalue and rvalue
3255         character lengths are not the same.  Use gfc_dep_compare_expr for the
3256         comparison.
3257         * gfortran.h: Add prototype for gfc_dep_compare_expr.
3258         * dependency.h: Remove prototype for gfc_dep_compare_expr.
3259
3260 2006-01-27  Paul Thomas  <pault@gcc.gnu.org>
3261
3262         PR fortran/25964
3263         * resolve.c (resolve_function): Add GFC_ISYM_LOC to the list of
3264         generic_ids exempted from assumed size checking.
3265
3266 2006-01-27  Jakub Jelinek  <jakub@redhat.com>
3267
3268         PR fortran/25324
3269         * Make-lang.in (fortran/scanner.o): Depend on toplev.h.
3270         * lang.opt (fpreprocessed): New option.
3271         * scanner.c: Include toplev.h.
3272         (gfc_src_file, gfc_src_preprocessor_lines): New variables.
3273         (preprocessor_line): Unescape filename if there were any
3274         backslashes.
3275         (load_file): If initial and gfc_src_file is not NULL,
3276         use it rather than opening the file.  If gfc_src_preprocessor_lines
3277         has non-NULL elements, pass it to preprocessor_line.
3278         (unescape_filename, gfc_read_orig_filename): New functions.
3279         * gfortran.h (gfc_option_t): Add flag_preprocessed.
3280         (gfc_read_orig_filename): New prototype.
3281         * options.c (gfc_init_options): Clear flag_preprocessed.
3282         (gfc_post_options): If flag_preprocessed, call
3283         gfc_read_orig_filename.
3284         (gfc_handle_option): Handle OPT_fpreprocessed.
3285         * lang-specs.h: Pass -fpreprocessed to f951 if preprocessing
3286         sources.
3287
3288 2006-01-27  Erik Edelmann  <eedelman@gcc.gnu.org>
3289
3290         * symbol.c (free_old_symbol): Fix confusing comment, and add code
3291           to free old_symbol->formal.
3292
3293 2006-01-26  Paul Thomas  <pault@gcc.gnu.org>
3294
3295         PR fortran/25964
3296         * resolve.c (resolve_function): Exclude statement functions from
3297         global reference checking.
3298
3299         PR fortran/25084
3300         PR fortran/20852
3301         PR fortran/25085
3302         PR fortran/25086
3303         * resolve.c (resolve_function): Declare a gfc_symbol to replace the
3304         references through the symtree to the symbol associated with the
3305         function expresion. Give error on reference to an assumed character
3306         length function is defined in an interface or an external function
3307         that is not a dummy argument.
3308         (resolve_symbol): Give error if an assumed character length function
3309         is array-valued, pointer-valued, pure or recursive. Emit warning
3310         that character(*) value functions are obsolescent in F95.
3311
3312         PR fortran/25416
3313         * trans-expr.c (gfc_conv_function_call): The above patch to resolve.c
3314         prevents any assumed character length function call from getting here
3315         except intrinsics such as SPREAD. In this case, ensure that no
3316         segfault occurs from referencing non-existent charlen->length->
3317         expr_type and provide a backend_decl for the charlen from the charlen
3318         of the first actual argument.
3319
3320         Cure temp name confusion.
3321         * trans-expr.c (gfc_get_interface_mapping_array): Change name of
3322         temporary from "parm" to "ifm" to avoid clash with temp coming from
3323         trans-array.c.
3324
3325 2006-01-25  Erik Edelmann  <eedelman@gcc.gnu.org>
3326
3327         PR fortran/25716
3328         * symbol.c (free_old_symbol): New function.
3329         (gfc_commit_symbols): Use it.
3330         (gfc_commit_symbol): New function.
3331         (gfc_use_derived): Use it.