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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [slp-26.c] - Blame information for rev 298

Line No.	Rev	Author	Line
1	298	jeremybenn	`/* { dg-require-effective-target vect_int } */`
2
3			`#include <stdarg.h>`
4			`#include <stdio.h>`
5			`#include "tree-vect.h"`
6
7			`#define N 8`
8
9			`int`
10			`main1 ()`
11			`{`
12			`int i;`
13			`unsigned short in[N*8] = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63};`
14			`unsigned short out[N*8], a[N], b[N] = {3,6,9,12,15,18,21,24};`
15
16			`/* Partial SLP is not supported. */`
17			`for (i = 0; i < N; i++)`
18			`{`
19			`out[i4] = in[i4];`
20			`out[i4 + 1] = in[i4 + 1];`
21			`out[i4 + 2] = in[i4 + 2];`
22			`out[i4 + 3] = in[i4 + 3];`
23
24			`a[i] = b[i] / 3;`
25			`}`
26
27			`/* check results: */`
28			`for (i = 0; i < N; i++)`
29			`{`
30			`if (out[i4] != in[i4]`
31			`\|\| out[i4 + 1] != in[i4 + 1]`
32			`\|\| out[i4 + 2] != in[i4 + 2]`
33			`\|\| out[i4 + 3] != in[i4 + 3]`
34			`\|\| a[i] != b[i] / 3)`
35			`abort ();`
36			`}`
37
38			`return 0;`
39			`}`
40
41			`int main (void)`
42			`{`
43			`check_vect ();`
44
45			`main1 ();`
46
47			`return 0;`
48			`}`
49
50			`/* { dg-final { scan-tree-dump-times "vectorized 0 loops" 1 "vect" } } */`
51			`/* { dg-final { scan-tree-dump-times "vectorizing stmts using SLP" 0 "vect" } } */`
52			`/* { dg-final { cleanup-tree-dump "vect" } } */`
53