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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [pr42193.c] - Blame information for rev 801

Line No.	Rev	Author	Line
1	689	jeremybenn	`/* { dg-do compile } */`
2			`/* { dg-require-effective-target vect_long } */`
3
4			`#include <stdarg.h>`
5
6			`unsigned long in[6], out[6];`
7
8			`void foo ()`
9			`{`
10			`unsigned long a, b, c, d, e, f;`
11
12			`a = in[0];`
13			`b = in[1];`
14			`c = in[2];`
15			`d = in[3];`
16			`e = in[4];`
17			`f = in[5];`
18
19			`out[0] = 2 * a + 7 * b + 8 * c + 31 * d + 10 * e + 21 * f;`
20			`out[1] = 3 * a + 6 * b + 12 * c + 13 * d + 15 * e + 28 * f;`
21			`out[2] = 4 * a + 5 * b + 72 * c + 23 * d + 14 * e + 24 * f;`
22			`out[3] = 8 * a + 71 * b + 18 * c + 33 * d + 13 * e + 25 * f;`
23			`out[4] = 12 * a + 16 * b + 19 * c + 41 * d + 22 * e + 26 * f;`
24			`out[5] = 17 * a + 15 * b + 13 * c + 14 * d + 11 * e + 9 * f;`
25			`}`
26
27			`/* { dg-final { cleanup-tree-dump "vect" } } */`
28