OSDN Git Service

2010-10-21 Janus Weil <janus@gcc.gnu.org>
authorjanus <janus@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 21 Oct 2010 11:31:55 +0000 (11:31 +0000)
committerjanus <janus@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 21 Oct 2010 11:31:55 +0000 (11:31 +0000)
commitf3efaadaf83c4db4dc0bcf1e93b7050c5eeba890
tree9476e2f4bdc3f2072057ad7def2aa663cf81b0a9
parent85a846a29ab1ddab45ef5f8cc1640d27f0da5fc5
2010-10-21  Janus Weil  <janus@gcc.gnu.org>

PR fortran/46060
* match.h (gfc_matching_ptr_assignment): New global variable to indicate
we're currently matching a (non-proc-)pointer assignment.
* decl.c (match_pointer_init): Set it.
* match.c (gfc_match_pointer_assignment): Ditto.
* primary.c (matching_actual_arglist): New global variable to indicate
we're currently matching an actual argument list.
(gfc_match_actual_arglist): Set it.
(gfc_match_varspec): Reject procedure pointer component calls with
missing argument list.

2010-10-21  Janus Weil  <janus@gcc.gnu.org>

PR fortran/46060
* gfortran.dg/proc_ptr_comp_25.f90: New.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@165769 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/decl.c
gcc/fortran/match.c
gcc/fortran/match.h
gcc/fortran/primary.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/proc_ptr_comp_25.f90 [new file with mode: 0644]