diff options
| author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-03-02 14:58:58 +0000 |
|---|---|---|
| committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-03-02 14:58:58 +0000 |
| commit | 95e5c406ef4fe7b75a7c4c7f561929c6e9b9d5ce (patch) | |
| tree | d8dd19ab649965b9520ec66f855aea93222e67ca /gcc/fortran | |
| parent | 95539e1deabbaa9dbc84b1d81ce6d0c8e7156a0f (diff) | |
| download | gcc-95e5c406ef4fe7b75a7c4c7f561929c6e9b9d5ce.tar.gz | |
2012-03-02 Tobias Burnus <burnus@net-b.de>
PR fortran/52325
* primary.c (gfc_match_varspec): Add missing ;.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@184790 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/primary.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index b2ed0066484..a00706b40d1 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,6 +1,11 @@ 2012-03-02 Tobias Burnus <burnus@net-b.de> PR fortran/52325 + * primary.c (gfc_match_varspec): Add missing ;. + +2012-03-02 Tobias Burnus <burnus@net-b.de> + + PR fortran/52325 * primary.c (gfc_match_varspec): Add diagnostic for % with nonderived types. diff --git a/gcc/fortran/primary.c b/gcc/fortran/primary.c index ae3a1f5778e..41e2fa81efb 100644 --- a/gcc/fortran/primary.c +++ b/gcc/fortran/primary.c @@ -1919,7 +1919,7 @@ gfc_match_varspec (gfc_expr *primary, int equiv_flag, bool sub_flag, && gfc_match_char ('%') == MATCH_YES) { gfc_error ("Unexpected '%%' for nonderived-type variable '%s' at %C", - sym->name) + sym->name); return MATCH_ERROR; } |