Sign in
gnu
/
gcc
/
93ac832f1846e4867aa6537f76f510fab8e3e87d
/
.
/
gcc
/
testsuite
/
gfortran.fortran-torture
/
compile
/
named_args.f90
blob: 1e0b4a6733c8832a49192dbd9e1f2dd56a4a198e [
file
] [
log
] [
blame
]
!
This
caused problems because we created a symbol
for
P
while
!
trying to parse the argument list
as
a substring reference
.
program named_args
implicit
none
integer
,
parameter
::
realdp
=
selected_real_kind
(
p
=
8
,
r
=
30
)
end
program