Commit 9f507235 by Tobias Burnus Committed by Tobias Burnus

re PR fortran/52325 (unclear error: Unclassifiable statement)

2012-03-02  Tobias Burnus  <burnus@net-b.de>

        PR fortran/52325
        * primary.c (gfc_match_varspec): Add missing ;.

From-SVN: r184790
parent c4ddde1b
2012-03-02 Tobias Burnus <burnus@net-b.de> 2012-03-02 Tobias Burnus <burnus@net-b.de>
PR fortran/52325 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 * primary.c (gfc_match_varspec): Add diagnostic for % with
nonderived types. nonderived types.
......
...@@ -1919,7 +1919,7 @@ gfc_match_varspec (gfc_expr *primary, int equiv_flag, bool sub_flag, ...@@ -1919,7 +1919,7 @@ gfc_match_varspec (gfc_expr *primary, int equiv_flag, bool sub_flag,
&& gfc_match_char ('%') == MATCH_YES) && gfc_match_char ('%') == MATCH_YES)
{ {
gfc_error ("Unexpected '%%' for nonderived-type variable '%s' at %C", gfc_error ("Unexpected '%%' for nonderived-type variable '%s' at %C",
sym->name) sym->name);
return MATCH_ERROR; return MATCH_ERROR;
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment