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
Unsigned constants for ISO_FORTRAN_ENV and ISO_C_BINDING.
[official-gcc.git]
/
gcc
/
testsuite
/
gcc.c-torture
/
execute
/
20030910-1.c
blob
8710cf35d612e776ff2daba2ed3fea3eb4a0a8de
1
/* The gimplifier was inserting unwanted temporaries for REALPART_EXPR
2
nodes. These need to be treated like a COMPONENT_REF so their address can
3
be taken. */
4
5
void
abort
(
void
);
6
void
exit
(
int
);
7
8
int
main
()
9
{
10
__complex
double
dc
;
11
double
*
dp
= &(
__real dc
);
12
*
dp
=
3.14
;
13
if
((
__real dc
) !=
3.14
)
abort
();
14
exit
(
0
);
15
}
16