Message ID | 51E68844.9090202@sfr.fr |
---|---|
State | New |
Headers | show |
--- a/gcc/fortran/match.c +++ b/gcc/fortran/match.c @@ -556,8 +556,8 @@ gfc_match_name (char *buffer) if (c == '$' && !gfc_option.flag_dollar_ok) { - gfc_fatal_error ("Invalid character '$' at %C. Use -fdollar-ok to allow " - "it as an extension"); + gfc_fatal_error ("Invalid character '$' at %L. Use -fdollar-ok to allow " + "it as an extension", &old_loc); return MATCH_ERROR;