URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [vect-double-reduc-2.c] - Blame information for rev 384

Line No.	Rev	Author	Line
1	298	jeremybenn	`/* { dg-require-effective-target vect_int_mult } */`
2
3			`#include <stdarg.h>`
4			`#include <stdio.h>`
5			`#include "tree-vect.h"`
6
7			`#define K 32`
8
9			`int in[2*K][K] __attribute__ ((__aligned__(__BIGGEST_ALIGNMENT__)));`
10			`int coeff[K][K] __attribute__ ((__aligned__(__BIGGEST_ALIGNMENT__)));`
11			`int out[K];`
12			`int check_result[K] = {357184,339264,321344,303424,285504,267584,249664,231744,213824,195904,177984,160064,142144,124224,106304,88384,70464,52544,34624,16704,-1216,-19136,-37056,-54976,-72896,-90816,-108736,-126656,-144576,-162496,-180416,-198336};`
13
14			`__attribute__ ((noinline)) void`
15			`foo ()`
16			`{`
17			`int res = 0, i, j, k;`
18
19			`for (k = 0; k < K; k++)`
20			`{`
21			`res = 1000000;`
22			`for (j = 0; j < K; j++)`
23			`for (i = 0; i < K; i++)`
24			`res -= in[i+k][j] * coeff[i][j];`
25
26			`out[k] = res;`
27			`}`
28			`}`
29
30			`int main ()`
31			`{`
32			`int i, j, k;`
33
34			`check_vect ();`
35
36			`for (j = 0; j < K; j++)`
37			`{`
38			`for (i = 0; i < 2*K; i++)`
39			`in[i][j] = i+j;`
40
41			`for (i = 0; i < K; i++)`
42			`coeff[i][j] = i+2;`
43			`}`
44
45			`foo();`
46
47			`for (k = 0; k < K; k++)`
48			`if (out[k] != check_result[k])`
49			`abort ();`
50
51			`return 0;`
52			`}`
53
54			`/* { dg-final { scan-tree-dump-times "OUTER LOOP VECTORIZED" 1 "vect" } } */`
55			`/* { dg-final { cleanup-tree-dump "vect" } } */`
56