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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [costmodel/] [ppc/] [costmodel-vect-68b.c] - Blame information for rev 801

Go to most recent revision | Details | Compare with Previous | View Log


/* { dg-require-effective-target vect_int } */
 
#include <stdarg.h>
#include "../../tree-vect.h"
 
#define N 32
 
struct s{
  int m;
  int n[N][N][N];
};
 
struct test1{
  struct s a; /* array a.n is unaligned */
  int b;
  int c;
  struct s e; /* array e.n is aligned */
};
 
int main1 ()
{
  int i,j;
  struct test1 tmp1;
 
  /* 2. aligned */
  for (i = 3; i < N-1; i++)
    {
      tmp1.a.n[1][2][i] = 6;
    }
 
  /* check results:  */
  for (i = 3; i < N-1; i++)
    {
      if (tmp1.a.n[1][2][i] != 6)
        abort ();
    }
 
  return 0;
}
 
int main (void)
{
  check_vect ();
 
  return main1 ();
}
 
/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } } */
/* { dg-final { cleanup-tree-dump "vect" } } */

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 32`
7
8			`struct s{`
9			`int m;`
10			`int n[N][N][N];`
11			`};`
12
13			`struct test1{`
14			`struct s a; /* array a.n is unaligned */`
15			`int b;`
16			`int c;`
17			`struct s e; /* array e.n is aligned */`
18			`};`
19
20			`int main1 ()`
21			`{`
22			`int i,j;`
23			`struct test1 tmp1;`
24
25			`/* 2. aligned */`
26			`for (i = 3; i < N-1; i++)`
27			`{`
28			`tmp1.a.n[1][2][i] = 6;`
29			`}`
30
31			`/* check results: */`
32			`for (i = 3; i < N-1; i++)`
33			`{`
34			`if (tmp1.a.n[1][2][i] != 6)`
35			`abort ();`
36			`}`
37
38			`return 0;`
39			`}`
40
41			`int main (void)`
42			`{`
43			`check_vect ();`
44
45			`return main1 ();`
46			`}`
47
48			`/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } } */`
49			`/* { dg-final { cleanup-tree-dump "vect" } } */`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [costmodel/] [ppc/] [costmodel-vect-68b.c] - Blame information for rev 801