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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [slp-multitypes-10.c] - Blame information for rev 749

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 8`
7
8			`unsigned int 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};`
9
10			`struct s`
11			`{`
12			`unsigned char a;`
13			`unsigned char b;`
14			`};`
15
16			`__attribute__ ((noinline)) int`
17			`main1 ()`
18			`{`
19			`int i;`
20			`struct s out[N*4];`
21
22			`for (i = 0; i < N*4; i++)`
23			`{`
24			`out[i].a = (unsigned char) in[i*2] + 1;`
25			`out[i].b = (unsigned char) in[i*2 + 1] + 2;`
26			`}`
27
28			`/* check results: */`
29			`for (i = 0; i < N*4; i++)`
30			`{`
31			`if (out[i].a != (unsigned char) in[i*2] + 1`
32			`\|\| out[i].b != (unsigned char) in[i*2 + 1] + 2)`
33			`abort ();`
34			`}`
35
36			`return 0;`
37			`}`
38
39			`int main (void)`
40			`{`
41			`check_vect ();`
42
43			`main1 ();`
44
45			`return 0;`
46			`}`
47
48			`/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { target vect_pack_trunc } } } */`
49			`/* { dg-final { scan-tree-dump-times "vectorizing stmts using SLP" 1 "vect" { target vect_pack_trunc } } } */`
50			`/* { dg-final { cleanup-tree-dump "vect" } } */`
51