https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61261
--- Comment #5 from Jacob Abel <thatcadguy at gmail dot com> --- (In reply to Dominique d'Humieres from comment #4) > Slightly reduced test > > MODULE modu > > IMPLICIT NONE > > TYPE element > CLASS(*), ALLOCATABLE :: e > END TYPE element > > END MODULE modu > > PROGRAM x > > USE modu > IMPLICIT NONE > > CHARACTER(LEN=80), TARGET :: c80 > CLASS(*), POINTER :: p > TYPE(element) :: el > > c80 = 'the quick brown fox jumps over the lazy dog' > p => c80 > ALLOCATE(el%e, SOURCE = p) > > END PROGRAM x > > Could be related to pr51864(?). Even further works too: PROGRAM x IMPLICIT NONE CLASS(*), ALLOCATABLE :: e CHARACTER(LEN=80), TARGET :: c80 CLASS(*), POINTER :: p c80 = 'the quick brown fox jumps over the lazy dog' p => c80 ALLOCATE(e, SOURCE = p) END PROGRAM x
