]> git.ipfire.org Git - thirdparty/gcc.git/commit - gcc/fortran/primary.cc
re PR fortran/45290 ([F08] pointer initialization)
authorJanus Weil <janus@gcc.gnu.org>
Wed, 18 Aug 2010 22:32:22 +0000 (00:32 +0200)
committerJanus Weil <janus@gcc.gnu.org>
Wed, 18 Aug 2010 22:32:22 +0000 (00:32 +0200)
commit80f9522847dffe96e819ac730d7caa46ddf101fe
treef271d1f77c0f13161bf127f660a05f91bcca1311
parentfbb12873f243b8e02582f77950d3a03d7453a0cc
re PR fortran/45290 ([F08] pointer initialization)

2010-08-19  Janus Weil  <janus@gcc.gnu.org>

PR fortran/45290
* gfortran.h (gfc_add_save): Modified prototype.
* decl.c (add_init_expr_to_sym): Defer checking of proc pointer init.
(match_pointer_init): New function to match F08 pointer initialization.
(variable_decl,match_procedure_decl,match_ppc_decl): Use
'match_pointer_init'.
(match_attr_spec): Module variables are implicitly SAVE.
(gfc_match_save): Modified call to 'gfc_add_save'.
* expr.c (gfc_check_assign_symbol): Extra checks for pointer
initialization.
* primary.c (gfc_variable_attr): Handle SAVE attribute.
* resolve.c (resolve_structure_cons): Add new argument and do pointer
initialization checks.
(gfc_resolve_expr): Modified call to 'resolve_structure_cons'.
(resolve_values): Call 'resolve_structure_cons' directly with init arg.
(resolve_fl_variable): Handle SAVE_IMPLICIT.
* symbol.c (gfc_add_save,gfc_copy_attr,save_symbol): Handle
SAVE_IMPLICIT.
* trans-decl.c (gfc_create_module_variable): Module variables with
TARGET can already exist.
* trans-expr.c (gfc_conv_variable): Check for 'current_function_decl'.
(gfc_conv_initializer): Implement non-NULL pointer
initialization.

2010-08-19  Janus Weil  <janus@gcc.gnu.org>

PR fortran/45290
* gfortran.dg/proc_ptr_comp_3.f90: Modified.
* gfortran.dg/pointer_init_2.f90: New.
* gfortran.dg/pointer_init_3.f90: New.
* gfortran.dg/pointer_init_4.f90: New.

From-SVN: r163356
14 files changed:
gcc/fortran/ChangeLog
gcc/fortran/decl.c
gcc/fortran/expr.c
gcc/fortran/gfortran.h
gcc/fortran/primary.c
gcc/fortran/resolve.c
gcc/fortran/symbol.c
gcc/fortran/trans-decl.c
gcc/fortran/trans-expr.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/pointer_init_2.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/pointer_init_3.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/pointer_init_4.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/proc_ptr_comp_3.f90