https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88669
Bug ID: 88669
Summary: Contiguous attribute wrongly rejected
Product: gcc
Version: 8.2.1
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: mscfd at gmx dot net
Target Milestone: ---
The code below gives the following error
contiguous_pointer.f90:7:51:
class(t), dimension(:), contiguous, pointer :: x
1
Error: Component ‘x’ at (1) has the CONTIGUOUS attribute but is not an array
pointer
With type(t) instead of class(t) , the error does not occur.
program contiguous_pointer
type t
end type t
type s
class(t), dimension(:), contiguous, pointer :: x
end type s
end program contiguous_pointer
