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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [no-vfa-vect-57.c] - Blame information for rev 826

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 298 jeremybenn
/* { dg-require-effective-target vect_float } */
2
 
3
#include <stdarg.h>
4
#include <string.h>
5
#include "tree-vect.h"
6
 
7
#define N 256
8
 
9
__attribute__ ((noinline))
10
void bar (float *pa, float *pb, float *pc)
11
{
12
  int i;
13
 
14
  /* check results:  */
15
  for (i = 0; i < N/2; i++)
16
    {
17
      if (pa[i] != (pb[i+1] * pc[i+1]))
18
        abort ();
19
    }
20
 
21
  return;
22
}
23
 
24
__attribute__ ((noinline))
25
void foo (float *pb, float *pc)
26
{
27
  float b[N] = {0,3,6,9,12,15,18,21,24,27,30,33,36,39,42,45,48,51,54,57};
28
  float c[N] = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19};
29
  memcpy (pb, b, sizeof (b));
30
  memcpy (pc, c, sizeof (c));
31
}
32
 
33
/* Unaligned pointer read accesses with known alignment,
34
   and an unaligned write access with unknown alignment.
35
   The loop bound is known and divisible by the vectorization factor.
36
   Can't prove that the pointers don't alias.
37
   vect-61.c is similar to this one with one difference:
38
        the loop bound is unknown.
39
   vect-56.c is similar to this one with two differences:
40
        aliasing is a problem, and the write access is aligned.  */
41
 
42
__attribute__ ((noinline)) int
43
main1 (float *pa)
44
{
45
  int i;
46
  float b[N] __attribute__ ((__aligned__(__BIGGEST_ALIGNMENT__)));
47
  float c[N] __attribute__ ((__aligned__(__BIGGEST_ALIGNMENT__)));
48
  float *pb = b;
49
  float *pc = c;
50
 
51
  foo (pb, pc);
52
 
53
  for (i = 0; i < N/2; i++)
54
    {
55
      pa[i] = pb[i+1] * pc[i+1];
56
    }
57
 
58
  bar (pa, pb, pc);
59
 
60
  return 0;
61
}
62
 
63
int main (void)
64
{
65
  int i;
66
  float a[N] __attribute__ ((__aligned__(__BIGGEST_ALIGNMENT__)));
67
 
68
  check_vect ();
69
  main1 (a);
70
 
71
  return 0;
72
}
73
 
74
/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { xfail vect_no_align } } } */
75
/* { 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.