Sign in
chromium
/
chromiumos
/
third_party
/
gcc
/
fd31098434d7933a0471183f342473d1fb02389d
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
kind_tests_2.f03
blob: d740657a262fee2c761bee16f29cbc8db0b03a90 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
module
kind_tests_2
use
,
intrinsic
::
iso_c_binding
integer
,
parameter
::
myFKind
=
c_float
real
(
myFKind
),
bind
(
c
)
::
myF
end
module
kind_tests_2