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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.target/] [mips/] [sb1-1.c] - Blame information for rev 455

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

Line No. Rev Author Line
1 149 jeremybenn
/* Test SB-1 v2sf extensions.  */
2
/* { dg-do compile } */
3
/* { dg-mips-options "-march=sb1 -O2 -mpaired-single -mhard-float -mgp64 -ffast-math" } */
4
/* { dg-final { scan-assembler "div.ps" } } */
5
/* { dg-final { scan-assembler "recip.ps" } } */
6
/* { dg-final { scan-assembler "sqrt.ps" } } */
7
/* { dg-final { scan-assembler "rsqrt.ps" } } */
8
 
9
typedef float v2sf __attribute__ ((vector_size (8)));
10
 
11
v2sf divide (v2sf a, v2sf b)
12
{
13
  return a / b;
14
}
15
 
16
v2sf recip (v2sf a)
17
{
18
  return ((v2sf) {1.0, 1.0}) / a;
19
}
20
 
21
v2sf squareroot (v2sf a)
22
{
23
  return __builtin_mips_sqrt_ps (a);
24
}
25
 
26
v2sf rsqrt (v2sf a)
27
{
28
  return ((v2sf) {1.0, 1.0}) / __builtin_mips_sqrt_ps (a);
29
}

powered by: WebSVN 2.1.0

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