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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [complex-3.c] - Blame information for rev 774

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

Line No. Rev Author Line
1 688 jeremybenn
/* PR 22116 */
2
 
3
void g(_Complex float);
4
_Complex float f(int data, _Complex float x, _Complex float y)
5
{
6
  _Complex float i, t;
7
  if (data)
8
  {
9
    i = x +  __imag__ y;
10
    g(i);
11
  }
12
  else
13
    i = 5;
14
  t = x + __imag__ y;
15
  g(t);
16
  return t * i;
17
}

powered by: WebSVN 2.1.0

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