diff options
author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-03-03 18:55:57 +0000 |
---|---|---|
committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-03-03 18:55:57 +0000 |
commit | 9b88f526a61b661b2c0432481bbc6ea18c49c039 (patch) | |
tree | 23576630ebdb4add80a99df87ee7037ac84ad024 /gcc/fortran | |
parent | 75ee1af47c62a0ca7d7f88bf2751005da417f51a (diff) | |
download | gcc-9b88f526a61b661b2c0432481bbc6ea18c49c039.tar.gz |
2012-03-03 Tobias Burnus <burnus@net-b.de>
PR fortran/48820
* resolve.c (resolve_actual_arglist): Properly reset
assumed_type_expr_allowed.
2012-03-03 Tobias Burnus <burnus@net-b.de>
PR fortran/48820
* gfortran.dg/assumed_type_3.f90: Undo previous commit.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@184863 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran')
-rw-r--r-- | gcc/fortran/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/fortran/resolve.c | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index f488afc37bb..0234bede6f2 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,11 @@ 2012-03-03 Tobias Burnus <burnus@net-b.de> + PR fortran/48820 + * resolve.c (resolve_actual_arglist): Properly reset + assumed_type_expr_allowed. + +2012-03-03 Tobias Burnus <burnus@net-b.de> + * lang.opt (Wc-binding-type): New flag. * options.c (gfc_init_options, gfc_handle_option): Handle it. * invoke.texi (Wc-binding-type): Document it. diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 618c6f56c8c..b63a0c69e6a 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -1833,7 +1833,7 @@ resolve_actual_arglist (gfc_actual_arglist *arg, procedure_type ptype, return FAILURE; } } - assumed_type_expr_allowed = true; + assumed_type_expr_allowed = false; return SUCCESS; } |