repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
PR libfortran/64770 Segfault when trying to open existing file with status="new".
[official-gcc.git]
/
gcc
/
testsuite
/
gcc.dg
/
lto
/
pr61278_0.c
blob
36cdabc0f22decdd6f2fb7df16c445bd62eea70e
1
/* { dg-lto-do link } */
2
/* { dg-lto-options { { -flto -O0 } } } */
3
/* { dg-extra-ld-options " -flto -O1 " } */
4
5
static unsigned int
6
fn1
(
int
p1
,
int
p2
)
7
{
8
return
0
;
9
}
10
11
char
a
,
b
,
c
;
12
13
char
14
foo
(
char
*
p
)
15
{
16
int
i
;
17
for
(
b
=
1
;
b
>
0
;
b
++)
18
{
19
for
(
i
=
0
;
i
<
2
;
i
++)
20
;
21
for
(
a
=
1
;
a
>
0
;
a
++)
22
{
23
char
d
[
1
] = {
0
};
24
if
(*
p
)
25
break
;
26
c
^=
fn1
(
fn1
(
fn1
(
0
,
0
),
0
),
0
);
27
}
28
}
29
return
0
;
30
}