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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [vect-iv-5.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 16
 
__attribute__ ((noinline)) int main1 ()
{
  float arr[N];
  float f = 1.0;
  int i;
 
  /* Vectorization of fp induction.  */
 
  for (i=0; i<N; i++)
    {
      arr[i] = f;
      f += 2.0;
    }
 
  /* check results:  */
  for (i = 0; i < N; i++)
    {
      if (arr[i] != 1.0 + 2.0*i)
        abort ();
    }
 
  return 0;
}
 
int main (void)
{
  check_vect ();
 
  return main1 ();
}
 
/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { xfail *-*-* } } } */
/* { 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 16`
7
8			`__attribute__ ((noinline)) int main1 ()`
9			`{`
10			`float arr[N];`
11			`float f = 1.0;`
12			`int i;`
13
14			`/* Vectorization of fp induction. */`
15
16			`for (i=0; i<N; i++)`
17			`{`
18			`arr[i] = f;`
19			`f += 2.0;`
20			`}`
21
22			`/* check results: */`
23			`for (i = 0; i < N; i++)`
24			`{`
25			`if (arr[i] != 1.0 + 2.0*i)`
26			`abort ();`
27			`}`
28
29			`return 0;`
30			`}`
31
32			`int main (void)`
33			`{`
34			`check_vect ();`
35
36			`return main1 ();`
37			`}`
38
39			`/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { xfail --* } } } */`
40			`/* { dg-final { cleanup-tree-dump "vect" } } */`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [vect-iv-5.c] - Blame information for rev 801