[Bug ipa/65540] [5 Regression] internal error on s-fatllf.ads at -O2

[ebotcazou at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=65540

Eric Botcazou <ebotcazou at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
          Component|ada                         |ipa

--- Comment #3 from Eric Botcazou <ebotcazou at gcc dot gnu.org> ---
It's ICF folding Machine_Rounding into Rounding:

System.Fat_Llf.Attr_Long_Long_Float.Machine_Rounding (const
system__fat_llf__attr_long_long_float__t x)
{
  system__fat_llf__attr_long_long_float__t retval.8;

  <bb 2>:
  retval.8_2 = system.fat_llf.attr_long_long_float.rounding (x_1(D)); [return
slot optimization] [tail call]
  return retval.8_2;
}

and apparently messing up the call statement.