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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [vect-38.c] - Blame information for rev 867

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


/* { dg-require-effective-target vect_double } */
 
#include <stdarg.h>
#include "tree-vect.h"
 
#define N 16
 
double cb[N] = {0,3,6,9,12,15,18,21,24,27,30,33,36,39,42,45};
double ca[N];
 
int main1 ()
{
  int i;
 
  for (i = 0; i < N; i++)
    {
      ca[i] = cb[i];
    }
 
  /* check results:  */
  for (i = 0; i < N; i++)
    {
      if (ca[i] != cb[i])
        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	149	jeremybenn	`/* { dg-require-effective-target vect_double } */`
2
3			`#include <stdarg.h>`
4			`#include "tree-vect.h"`
5
6			`#define N 16`
7
8			`double cb[N] = {0,3,6,9,12,15,18,21,24,27,30,33,36,39,42,45};`
9			`double ca[N];`
10
11			`int main1 ()`
12			`{`
13			`int i;`
14
15			`for (i = 0; i < N; i++)`
16			`{`
17			`ca[i] = cb[i];`
18			`}`
19
20			`/* check results: */`
21			`for (i = 0; i < N; i++)`
22			`{`
23			`if (ca[i] != cb[i])`
24			`abort ();`
25			`}`
26
27			`return 0;`
28			`}`
29
30			`int main (void)`
31			`{`
32			`check_vect ();`
33
34			`return main1 ();`
35			`}`
36
37
38			`/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } } */`
39			`/* { dg-final { cleanup-tree-dump "vect" } } */`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [vect-38.c] - Blame information for rev 867