On Tue, Jan 27, 2015 at 01:52:12PM -0500, David Malcolm wrote:
> > @@ -398,6 +399,11 @@ gfc_post_options (const char **pfilename
> >
> > gfc_cpp_post_options ();
> >
> > + if (gfc_option.allow_std & GFC_STD_F2008)
> > + lang_hooks.name = "GNU Fortran2008";
> > + else if (gfc_option.allow_std & GFC_STD_F2003)
> > + lang_hooks.name = "GNU Fortran2003";
> > +
>
> Did you test this on rs6000?
>
> In particular, rs6000_output_function_epilogue has a:
> else if (! strcmp (language_string, "GNU F77")
> || ! strcmp (language_string, "GNU Fortran"))
> i = 1;
You're right, missed that. Consider that changed to lang_GNU_Fortran ().
Jakub
