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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [powerpc/] [ppc-paired.c] - Blame information for rev 801

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

Line No. Rev Author Line
1 691 jeremybenn
/* { dg-do compile { target { powerpc-*-linux*paired* && ilp32 } } } */
2
/* { dg-options "-mpaired -ffinite-math-only" } */
3
 
4
/* Test PowerPC PAIRED extensions.  */
5
 
6
#include <paired.h>
7
 
8
vector float a, b, c, d;
9
 
10
void
11
test_api ()
12
{
13
  b = paired_msub (b, c, d);
14
  b = paired_madd (b, c, d);
15
  b = paired_nmadd (b, c, d);
16
  b = paired_nmsub (b, c, d);
17
  b = paired_sum0 (a, b, c);
18
  b = paired_sum1 (a, b, c);
19
  b = paired_div (b, c);
20
  b = paired_add (a, c);
21
  b = paired_sub (a, c);
22
  b = paired_mul (a, c);
23
  b = paired_neg (a);
24
  b = paired_muls0 (a, c);
25
  b = paired_muls1 (a, c);
26
  b = paired_madds0 (a, c, d);
27
  b = paired_madds1 (a, c, d);
28
  b = paired_merge00 (a, c);
29
  b = paired_merge01 (a, c);
30
  b = paired_merge10 (a, c);
31
  b = paired_merge11 (a, c);
32
  b = paired_abs (a);
33
  b = paired_nabs (a);
34
  b = paired_sqrt (a);
35
  b = paired_res (a);
36
  b = paired_sel (a, b, c);
37
}
38
 
39
int
40
main (void)
41
{
42
  test_api ();
43
  return 0;
44
}
45
 

powered by: WebSVN 2.1.0

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