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
/
ipa
/
ipa-pta-5.c
blob
3359c534aaba54e5c87db61db71c1e7fcc297bd1
1
/* { dg-do run } */
2
/* { dg-options "-O2 -fipa-pta -fdump-ipa-pta-details" } */
3
4
int
**
x
;
5
6
static int
__attribute__
((
noinline
,
noclone
))
7
foo
(
int
**
q
)
8
{
9
int
a
=
1
;
10
**
q
=
0
;
11
*
x
= &
a
;
12
return
**
q
;
13
}
14
15
extern
void
abort
(
void
);
16
int
main
()
17
{
18
int
b
;
19
int
*
p
= &
b
;
20
x
= &
p
;
21
if
(
foo
(&
p
) !=
1
)
22
abort
();
23
return
0
;
24
}
25
26
/* { dg-final { cleanup-ipa-dump "pta" } } */