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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [c-c++-common/] [torture/] [complex-sign-mixed-div.c] - Blame information for rev 749

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

Line No. Rev Author Line
1 686 jeremybenn
/* Test complex arithmetic with signed zeros.  Mixed real/complex
2
   division.  */
3
/* { dg-do run } */
4
/* { dg-options "-std=gnu99" { target c } } */
5
 
6
#include "complex-sign.h"
7
 
8
#define CHECK_DIV(TYPE, COPY, ZERO, ZEROI, ONE)                         \
9
  do {                                                                  \
10
    CHECK_ARITH_CR (TYPE, COPY, ZERO, ZEROI, /, +, +, +, ONE, +, +);    \
11
    CHECK_ARITH_CR (TYPE, COPY, ZERO, ZEROI, /, +, +, -, ONE, -, -);    \
12
    CHECK_ARITH_CR (TYPE, COPY, ZERO, ZEROI, /, +, -, +, ONE, +, -);    \
13
    CHECK_ARITH_CR (TYPE, COPY, ZERO, ZEROI, /, +, -, -, ONE, -, +);    \
14
    CHECK_ARITH_CR (TYPE, COPY, ZERO, ZEROI, /, -, +, +, ONE, -, +);    \
15
    CHECK_ARITH_CR (TYPE, COPY, ZERO, ZEROI, /, -, +, -, ONE, +, -);    \
16
    CHECK_ARITH_CR (TYPE, COPY, ZERO, ZEROI, /, -, -, +, ONE, -, -);    \
17
    CHECK_ARITH_CR (TYPE, COPY, ZERO, ZEROI, /, -, -, -, ONE, +, +);    \
18
  } while (0)
19
 
20
void
21
check_div_float (void)
22
{
23
#ifndef __SPU__
24
  CHECK_DIV (float, __builtin_copysignf, 0.0f, 0.0if, 1.0f);
25
#endif
26
}
27
 
28
void
29
check_div_double (void)
30
{
31
  CHECK_DIV (double, __builtin_copysign, 0.0, 0.0i, 1.0);
32
}
33
 
34
void
35
check_div_long_double (void)
36
{
37
  CHECK_DIV (long double, __builtin_copysignl, 0.0l, 0.0il, 1.0l);
38
}
39
 
40
int
41
main (void)
42
{
43
  check_div_float ();
44
  check_div_double ();
45
  check_div_long_double ();
46
  exit (0);
47
}

powered by: WebSVN 2.1.0

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