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

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [931005-1.c] - Blame information for rev 12

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 12 jlechner
typedef struct
2
{
3
  char x;
4
} T;
5
 
6
T
7
f (s1)
8
     T s1;
9
{
10
  T s1a;
11
  s1a.x = s1.x;
12
  return s1a;
13
}
14
 
15
main ()
16
{
17
  T s1a, s1b;
18
  s1a.x = 100;
19
  s1b = f (s1a);
20
  if (s1b.x != 100)
21
    abort ();
22
  exit (0);
23
}

powered by: WebSVN 2.1.0

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