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

Subversion Repositories openrisc

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

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

Line No. Rev Author Line
1 689 jeremybenn
/* { dg-require-effective-target vect_float } */
2
 
3
#include <stdarg.h>
4
#include "tree-vect.h"
5
 
6
#define N 256
7
 
8
__attribute__ ((noinline))
9
void bar (float *pd, float *pa, float *pb, float *pc)
10
{
11
  int i;
12
 
13
  /* check results:  */
14
  for (i = 0; i < N; i++)
15
    {
16
      if (pa[i] != (pb[i] * pc[i]))
17
        abort ();
18
      if (pd[i] != 5.0)
19
        abort ();
20
    }
21
 
22
  return;
23
}
24
 
25
 
26
__attribute__ ((noinline)) int
27
main1 (int n, float * __restrict__ pd, float * __restrict__ pa, float * __restrict__ pb, float * __restrict__ pc)
28
{
29
  int i;
30
 
31
  for (i = 0; i < n; i++)
32
    {
33
      pa[i] = pb[i] * pc[i];
34
      pd[i] = 5.0;
35
    }
36
 
37
  bar (pd,pa,pb,pc);
38
 
39
  return 0;
40
}
41
 
42
int main (void)
43
{
44
  int i;
45
  float a[N] __attribute__ ((__aligned__(__BIGGEST_ALIGNMENT__)));
46
  float d[N+1] __attribute__ ((__aligned__(__BIGGEST_ALIGNMENT__)));
47
  float b[N] = {0,3,6,9,12,15,18,21,24,27,30,33,36,39,42,45,48,51,54,57};
48
  float c[N] = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19};
49
 
50
  check_vect ();
51
 
52
  main1 (N,&d[1],a,b,c);
53
  main1 (N-2,&d[1],a,b,c);
54
 
55
  return 0;
56
}
57
 
58
/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } } */
59
/* { dg-final { scan-tree-dump-times "Alignment of access forced using peeling" 0 "vect" { xfail {vect_element_align} } } } */
60
 
61
/* For targets that support unaligned loads we version for the two unaligned
62
   stores and generate misaligned accesses for the loads. For targets that
63
   don't support unaligned loads we version for all four accesses.  */
64
 
65
/* { dg-final { scan-tree-dump-times "Vectorizing an unaligned access" 2 "vect" { xfail { vect_no_align || vect_element_align} } } }  */
66
/* { dg-final { scan-tree-dump-times "Alignment of access forced using versioning" 2 "vect" { xfail { vect_no_align || vect_element_align } } } } */
67
/*  { dg-final { scan-tree-dump-times "Vectorizing an unaligned access" 0 "vect" { target vect_no_align } } } */
68
/*  { dg-final { scan-tree-dump-times "Alignment of access forced using versioning" 4 "vect" { target vect_no_align } } } */
69
/* { dg-final { cleanup-tree-dump "vect" } } */

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.