diff options
| author | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-15 18:02:20 +0000 |
|---|---|---|
| committer | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-15 18:02:20 +0000 |
| commit | d88b1bc07a5646f2894b9557d47b41e0746c5a15 (patch) | |
| tree | a2f7e67e6e38ab33d08e077762d35c4386c5e8b1 /gcc/fortran/match.h | |
| parent | 9ca4a77cdc957cd6773577976470f7b386d25941 (diff) | |
| download | gcc-d88b1bc07a5646f2894b9557d47b41e0746c5a15.tar.gz | |
fortran:
PR fortran/13826
* primary.c (match_structure_constructor): Rename ...
(gfc_match_structure_constructor): ... to this. Make non-static.
(gfc_match_rvalue): Call renamed function.
* match.h (gfc_match_structure_constructor): Declare.
* match.c (gfc_match_data_constant): Handle structure
constructor.
testsuite:
PR fortran/13826
* gfortran.fortran-torture/compile/data_1.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@81891 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/match.h')
| -rw-r--r-- | gcc/fortran/match.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/match.h b/gcc/fortran/match.h index 25e551caa6c..6cff5cc0aa0 100644 --- a/gcc/fortran/match.h +++ b/gcc/fortran/match.h @@ -120,6 +120,7 @@ match gfc_match_modproc (void); match gfc_match_target (void); /* primary.c */ +match gfc_match_structure_constructor (gfc_symbol *, gfc_expr **); match gfc_match_rvalue (gfc_expr **); match gfc_match_variable (gfc_expr **, int); match gfc_match_actual_arglist (int, gfc_actual_arglist **); |