Sign in
gnu
/
gcc
/
cd2fd5facb5e1882d3f338ed456ae9536f7c0593
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
class_31.f90
blob: eddf13f1beae498be3c5fa8b5535ad4ada02dd66 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
!
PR fortran
/
46413
!
type t
integer
::
ii
=
5
end
type t
class
(
t
),
allocatable
::
x
allocate
(
t
::
x
)
print
*,
x
!
{
dg
-
error
"Data transfer element at .1. cannot be polymorphic"
}
end