| commit | 54b4ba60f20d3870a79467caa3b604971225d388 | |
| author | Paul Brook <paul@codesourcery.com> | |
| Tue, 18 May 2004 00:48:05 +0000 (18 00:48 +0000) | ||
| committer | Paul Brook <pbrook@gcc.gnu.org> | |
| Tue, 18 May 2004 00:48:05 +0000 (18 00:48 +0000) | ||
| tree | c59d49b2984c03bcf5e5f018b12cc2f44288e7a1 | treesnapshot (tar.gz zip) |
| parent | b7cefb87f053f26b4354d18f94c4e3baa4266645 | commitdiff |
re PR fortran/13930 (derived type with intent(in) attribute not accepted)
PR fortran/13930
* decl.c (add_init_expr_to_sym): Remove incorrect check.
(default_initializer): Move to expr.c.
(variable_decl): Don't assign default initializer to variables.
* expr.c (gfc_default_initializer): Move to here.
* gfortran.h (gfc_default_initializer): Add prototype.
* resolve.c (resolve_symbol): Check for illegal initializers.
Assign default initializer.
testsuite/
* gfortran.fortran-torture/execute/der_init_4.f90: New test.
From-SVN: r81966
PR fortran/13930
* decl.c (add_init_expr_to_sym): Remove incorrect check.
(default_initializer): Move to expr.c.
(variable_decl): Don't assign default initializer to variables.
* expr.c (gfc_default_initializer): Move to here.
* gfortran.h (gfc_default_initializer): Add prototype.
* resolve.c (resolve_symbol): Check for illegal initializers.
Assign default initializer.
testsuite/
* gfortran.fortran-torture/execute/der_init_4.f90: New test.
From-SVN: r81966