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/] [vect-double-reduc-4.c] - Blame information for rev 298

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] = {652816,670736,688656,706576,724496,742416,760336,778256,796176,814096,832016,849936,867856,885776,903696,921616,939536,957456,975376,993296,1011216,1029136,1047056,1064976,1082896,1100816,1118736,1136656,1154576,1172496,1190416,1208336};`
13
14			`__attribute__ ((noinline)) void`
15			`foo ()`
16			`{`
17			`int sum = 0, i, j, k;`
18
19			`for (k = 0; k < K; k++)`
20			`{`
21			`sum = 10000;`
22			`for (j = 0; j < K; j++)`
23			`for (i = 0; i < K; i++)`
24			`sum += in[i+k][j] * coeff[i][j];`
25
26			`out[k] = sum;`
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