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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr45085.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
/* { dg-options "-O2  -Wuninitialized" } */
2
struct S { char *s1; long s2; };
3
struct T { int t1; long t2; long t3; };
4
extern int fn2 (void);
5
extern int fn3 (struct T);
6
extern struct T fn4 ();
7
extern int fn5 (char **, long *, int);
8
extern void fn6 (void);
9
extern void fn7 (void *);
10
struct S *fn10 ();
11
static int p;
12
static void *q;
13
extern struct T r;
14
 
15
static struct T
16
fn8 (struct T x, int y)
17
{
18
  struct S *u = fn10 ();
19
  int v = fn5 (&u->s1, &u->s2, 0);
20
  while (1)
21
    {
22
      if (p)
23
fn6 ();
24
      if (fn3 (x))
25
return fn4 ();
26
      if (y & 1)
27
return r;
28
      v = fn5 (&u->s1, &u->s2, 1);
29
    }
30
}
31
 
32
struct T
33
fn9 (struct T x, int y)
34
{
35
  struct T t = fn8 (x, y);
36
  if (fn2 ())
37
    fn7 (q);
38
  return t;
39
}
40
 
41
void *
42
fn1 (void)
43
{
44
  return fn9;
45
}

powered by: WebSVN 2.1.0

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