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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |rejects-valid
                 CC|                            |janus at gcc dot gnu.org
            Summary|Error derived type-bound    |[F03] Error with type-bound
                   |procedure PASS(this)        |procedure of parametrized
                   |                            |derived type

--- Comment #4 from janus at gcc dot gnu.org ---
Reduced test case for the error:


module testmod
   public :: foo
   type, public :: t(n)
      integer, len :: n = 1
   contains
      procedure :: foo
   end type

contains
   subroutine foo(this)
      class(t(*)), intent(inout) :: this
   end subroutine
end module



       procedure :: foo
               1
Error: Argument ‘this’ of ‘foo’ with PASS(this) at (1) must be of the
derived-type ‘t’

Reply via email to