https://gcc.gnu.org/bugzilla/show_bug.cgi?id=99651

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |rejects-valid
                 CC|                            |burnus at gcc dot gnu.org

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> ---
Reduced example:

module m
    type :: CHAR_STAR
      character(len=1),dimension(:),pointer :: ptr
    end type
    type(CHAR_STAR), parameter ::CHAR_STAR_NULL = CHAR_STAR(NULL())
end module m

use m
type typeNode
    type(typeNode),   pointer       :: Next => null()
end type typeNode
end

Reply via email to