Sign in
gnu
/
gcc
/
dc9b9e310659bc1320d94355d18ea0fe64b13df6
/
.
/
gcc
/
testsuite
/
g77.dg
/
pr3743-2.f
blob: 3e0eabc15f7d4a2afd1d0d30c57d912b3ebd2335 [
file
] [
log
] [
blame
]
C
Test
case
for
PR fortran
/
3743
C
Origin
:
David
Billinghurst
<
David
.
Billinghurst@riotinto
.
com
>
C
C
{
dg
-
do
link
}
C
{
dg
-
options
"-fcase-preserve -fintrin-case-upper"
}
integer i
i
=
BIT_SIZE
(
i
)
end
