OSDN Git Service

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