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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.target/] [i386/] [sse-7.c] - Blame information for rev 318

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 318 jeremybenn
/* { dg-do run } */
2
/* { dg-options "-O2 -msse" } */
3
/* { dg-require-effective-target sse } */
4
 
5
#include "sse-check.h"
6
 
7
#include <xmmintrin.h>
8
#include <string.h>
9
 
10
#define SHIFT (4)
11
 
12
typedef union {
13
  __m64 v;
14
  unsigned char c[8];
15
  unsigned short int s[4];
16
  unsigned long long t;
17
  unsigned int u[2];
18
}vecInWord;
19
 
20
void sse_tests (void) __attribute__((noinline));
21
void dump64_16 (char *, char *, vecInWord);
22
int check (const char *, const char *[]);
23
 
24
char buf[8000];
25
char comparison[8000];
26
static int errors = 0;
27
 
28
vecInWord c64, e64;
29
__m64 m64_64;
30
 
31
const char *reference_sse[] = {
32
  "_mm_shuffle_pi16 0123 4567 89ab cdef \n",
33
  ""
34
};
35
 
36
static void
37
sse_test (void)
38
{
39
  e64.t  = 0x0123456789abcdefULL;
40
 
41
  m64_64 = e64.v;
42
 
43
  sse_tests();
44
  check (buf, reference_sse);
45
#ifdef DEBUG
46
  printf ("sse testing:\n");
47
  printf (buf);
48
  printf ("\ncomparison:\n");
49
  printf (comparison);
50
#endif
51
  buf[0] = '\0';
52
 
53
  if (errors != 0)
54
    abort ();
55
}
56
 
57
void __attribute__((noinline))
58
sse_tests (void)
59
{
60
  /* pshufw */
61
  c64.v = _mm_shuffle_pi16 (m64_64, 0x1b);
62
  dump64_16 (buf, "_mm_shuffle_pi16", c64);
63
}
64
 
65
void
66
dump64_16 (char *buf, char *name, vecInWord x)
67
{
68
  int i;
69
  char *p = buf + strlen (buf);
70
 
71
  sprintf (p, "%s ", name);
72
  p += strlen (p);
73
 
74
  for (i=0; i<4; i++)
75
    {
76
      sprintf (p, "%4.4x ", x.s[i]);
77
      p += strlen (p);
78
    }
79
  strcat (p, "\n");
80
}
81
 
82
int
83
check (const char *input, const char *reference[])
84
{
85
  int broken, i, j, len;
86
  const char *p_input;
87
  char *p_comparison;
88
  int new_errors = 0;
89
 
90
  p_comparison = &comparison[0];
91
  p_input = input;
92
 
93
  for (i = 0; *reference[i] != '\0'; i++)
94
    {
95
      broken = 0;
96
      len = strlen (reference[i]);
97
      for (j = 0; j < len; j++)
98
        {
99
          /* Ignore the terminating NUL characters at the end of every string in 'reference[]'.  */
100
          if (!broken && *p_input != reference[i][j])
101
            {
102
              *p_comparison = '\0';
103
              strcat (p_comparison, " >>> ");
104
              p_comparison += strlen (p_comparison);
105
              new_errors++;
106
              broken = 1;
107
            }
108
          *p_comparison = *p_input;
109
          p_comparison++;
110
          p_input++;
111
        }
112
      if (broken)
113
        {
114
          *p_comparison = '\0';
115
          strcat (p_comparison, "expected:\n");
116
          strcat (p_comparison, reference[i]);
117
          p_comparison += strlen (p_comparison);
118
        }
119
    }
120
  *p_comparison = '\0';
121
  strcat (p_comparison, new_errors ? "failure\n\n" : "O.K.\n\n") ;
122
  errors += new_errors;
123
  return 0;
124
}

powered by: WebSVN 2.1.0

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