* testsuite/libgomp.fortran/vla7.f90: Add -w to options.

[official-gcc.git] / gcc / testsuite / gcc.dg / pr17024-1.c

/* PR middle-end/17024 */
/* { dg-do compile } */
/* { dg-options "-funsafe-math-optimizations" } */

#define MAX2(a,b) (((a)>(b)) ? (a) : (b))

void C(double);

void i(int k)
{
        double c[1];
        C(MAX2(0.,c[k]));
        return;
}