Sign in
llvm
/
llvm-test-suite
/
refs/heads/main
/
.
/
Fortran
/
gfortran
/
regression
/
used_types_18.f90
blob: 8cb8dab6d3accbc4691739542be85a0c116970c4 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
{
dg
-
options
"-std=f2003"
}
!
!
Fortran
2003
allowes TYPE without components
!
The
error message
for
-
std
=
f95
is
tested
in
!
gfortran
.
dg
/
access_spec_2
.
f90
!
!
PR fortran
/
33188
!
type t
end
type
type
(
t
)
::
a
print
*,
a
end