URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [class_31.f90] - Rev 801
Go to most recent revision | Compare with Previous | Blame | View Log
! { 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
Go to most recent revision | Compare with Previous | Blame | View Log