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.c-torture/] [execute/] [960512-1.c] - Blame information for rev 149

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

Line No. Rev Author Line
1 149 jeremybenn
__complex__
2
double f ()
3
{
4
  int a[40];
5
  __complex__ double c;
6
 
7
  a[9] = 0;
8
  c = a[9];
9
  return c;
10
}
11
 
12
main ()
13
{
14
  __complex__ double c;
15
 
16
  if (c = f ())
17
    abort ();
18
  exit (0);
19
}

powered by: WebSVN 2.1.0

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