1285163Sdim/* { dg-do compile } */
2285163Sdim/* { dg-require-effective-target ilp32 } */
3285163Sdim/* { dg-options "-O2 -mfpmath=387" } */
4285163Sdim
5285163Sdimdouble a, b;
6285163Sdimdouble f(double c)
7285163Sdim{
8285163Sdim  double x = a * b;
9285163Sdim  return x + c * a;
10285163Sdim}
11285163Sdim
12285163Sdim/* { dg-final { scan-assembler-not "fld\[ \t\]*%st" } } */
13285163Sdim/* { dg-final { scan-assembler "fmul\[ \t\]*%st" } } */
14285163Sdim