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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [pr41123.c] - Blame information for rev 318

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

Line No. Rev Author Line
1 298 jeremybenn
/* PR middle-end/41123 */
2
/* { dg-do compile } */
3
/* { dg-options "-O2 -fno-strict-aliasing" } */
4
 
5
struct S { char a, b, c, d, e, f, g, h; };
6
struct T { int a, b; };
7
 
8
struct S
9
f1 (float _Complex x)
10
{
11
  return *(struct S *) & x;
12
}
13
 
14
int
15
f2 (float _Complex x)
16
{
17
  struct S f = f1 (x);
18
  return f.b;
19
}
20
 
21
struct T
22
f3 (float _Complex x)
23
{
24
  return *(struct T *) & x;
25
}
26
 
27
int
28
f4 (float _Complex x)
29
{
30
  struct T f = f3 (x);
31
  return f.a;
32
}
33
 
34
int
35
f5 (float _Complex x)
36
{
37
  struct T f = f3 (x);
38
  return f.b;
39
}
40
 
41
struct T
42
f6 (float _Complex x)
43
{
44
  struct T f = f3 (x);
45
  return f;
46
}

powered by: WebSVN 2.1.0

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