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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [pr28778.c] - Blame information for rev 816

Details | Compare with Previous | View Log


extern void abort(void);
typedef long GLint;
void aglChoosePixelFormat (const GLint *);
 
void
find (const int *alistp)
{
  const int *blist;
  int list[32];
  if (alistp)
    blist = alistp;
  else
    {
      list[3] = 42;
      blist = list;
    }
  aglChoosePixelFormat ((GLint *) blist);
}
 
void
aglChoosePixelFormat (const GLint * a)
{
  int *b = (int *) a;
  if (b[3] != 42)
    abort ();
}
 
int
main (void)
{
  find (0);
  return 0;
}

Line No.	Rev	Author	Line
1	149	jeremybenn	`extern void abort(void);`
2			`typedef long GLint;`
3			`void aglChoosePixelFormat (const GLint *);`
4
5			`void`
6			`find (const int *alistp)`
7			`{`
8			`const int *blist;`
9			`int list[32];`
10			`if (alistp)`
11			`blist = alistp;`
12			`else`
13			`{`
14			`list[3] = 42;`
15			`blist = list;`
16			`}`
17			`aglChoosePixelFormat ((GLint *) blist);`
18			`}`
19
20			`void`
21			`aglChoosePixelFormat (const GLint * a)`
22			`{`
23			`int b = (int ) a;`
24			`if (b[3] != 42)`
25			`abort ();`
26			`}`
27
28			`int`
29			`main (void)`
30			`{`
31			`find (0);`
32			`return 0;`
33			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [pr28778.c] - Blame information for rev 816