Sign in
llvm
/
llvm-test-suite
/
refs/tags/llvmorg-19.1.2
/
.
/
Fortran
/
gfortran
/
regression
/
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
