This is the mail archive of the
gcc@gcc.gnu.org
mailing list for the GCC project.
Re: Someone has caused regressions in gfortran
> Jan Hubicka wrote:
> >Thanks, I sent the patch for testing and lets see if it solves the
> >problem.
>
> If the testsuite passes, and you intend to commit this, please add a FIXME.
Sadly, the testsuite regressions don't seems to be fixed. I will try to
figure out tomorrow why the function is still being inlined.
Honza
>
> Cheers,
> - Tobi
>
> >Honza
> >>Index: trans-decl.c
> >>===================================================================
> >>--- trans-decl.c (revision 127902)
> >>+++ trans-decl.c (working copy)
> >>@@ -1217,6 +1217,8 @@ build_function_decl (gfc_symbol * sym)
> >>
> >> type = gfc_get_function_type (sym);
> >> fndecl = build_decl (FUNCTION_DECL, gfc_sym_identifier (sym), type);
> >>+ if (!sym->attr.contained)
> >>+ DECL_UNINLINABLE (fndecl) = 1;
> >>
> >> /* Perform name mangling if this is a top level or module procedure.
> >> */
> >> if (current_function_decl == NULL_TREE)
> >>
> >>
> >>I have neither built nor regtested this, and I won't be able to do it
> >>in the next few days. If you feel like trying, please go ahead.
> >>
> >>FX
> >