URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.target/] [powerpc/] [ppc-fmadd-3.c] - Blame information for rev 816

Line No.	Rev	Author	Line
1	149	jeremybenn	`/* { dg-do compile { target powerpc--* } } */`
2			`/* { dg-options "-O2" } */`
3			`/* { dg-final { scan-assembler-not "f(add\|sub\|mul)" } } */`
4
5			`void foo(double a, double b, double c, double d)`
6			`{`
7			`#if 0`
8			`a[1] = b[1] - c[1] * d[1]; // fneg, fmadd without fast-math`
9			`#endif`
10			`a[3] = -b[3] - c[3] * d[3]; // fneg, fmsub without fast-math`
11			`#if 0`
12			`a[5] = -( b[5] - c[5] * d[5]); // fneg, fnmadd without fast-math`
13			`#endif`
14			`a[7] = -(-b[7] - c[7] * d[7]); // fneg, fnmsub without fast-math`
15			`a[11] = b[11] + c[11] * -d[11]; // fneg, fmadd without fast-math`
16			`a[13] = -b[13] + c[13] * -d[13]; // fneg, fmsub without fast-math`
17			`a[15] = -( b[15] + c[15] * -d[15]); // fneg, fnmadd without fast-math`
18			`a[17] = -(-b[17] + c[17] * -d[17]); // fneg, fnmsub without fast-math`
19			`}`
20
21			`void foos(float a, float b, float c, float d)`
22			`{`
23			`#if 0`
24			`a[1] = b[1] - c[1] * d[1]; // fneg, fmadd without fast-math`
25			`#endif`
26			`a[3] = -b[3] - c[3] * d[3]; // fneg, fmsub without fast-math`
27			`#if 0`
28			`a[5] = -( b[5] - c[5] * d[5]); // fneg, fnmadd without fast-math`
29			`#endif`
30			`a[7] = -(-b[7] - c[7] * d[7]); // fneg, fnmsub without fast-math`
31			`a[11] = b[11] + c[11] * -d[11]; // fneg, fmadd without fast-math`
32			`a[13] = -b[13] + c[13] * -d[13]; // fneg, fmsub without fast-math`
33			`a[15] = -( b[15] + c[15] * -d[15]); // fneg, fnmadd without fast-math`
34			`a[17] = -(-b[17] + c[17] * -d[17]); // fneg, fnmsub without fast-math`
35			`}`
36