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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [vect-vfa-04.c] - Blame information for rev 689

Line No.	Rev	Author	Line
1	689	jeremybenn	`/* { dg-require-effective-target vect_int } */`
2
3			`#include <stdarg.h>`
4			`#include "tree-vect.h"`
5
6			`#define N 16`
7			`int result[] = {10, 11, 15, 16, 20, 21, 25, 26, 30, 31, 35, 36, 40, 41, 45, 46, 50, 51};`
8			`int X[] = {10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 0, 0};`
9
10			`__attribute__ ((noinline)) void`
11			`foo (int in, int out)`
12			`{`
13			`int i;`
14
15			`for (i = 0; i < N; i++)`
16			`out[i] = in[i] + 5;`
17			`}`
18
19			`int`
20			`main (void)`
21			`{`
22			`int i;`
23
24			`check_vect ();`
25
26			`foo (X, &X[2]);`
27
28			`/* check results: */`
29			`for (i = 0; i < N+2; i++)`
30			`{`
31			`if (X[i] != result[i])`
32			`abort ();`
33			`}`
34			`return 0;`
35			`}`
36
37			`/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } } */`
38			`/* { dg-final { cleanup-tree-dump "vect" } } */`