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

Rich Townsend <townsend at astro dot wisc.edu> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |townsend at astro dot wisc.edu

--- Comment #3 from Rich Townsend <townsend at astro dot wisc.edu> ---
Here's a related test case using a length-type parameter, that also fails for
apparently the same reason:

Module AA
  Type :: parent(k)
     Integer, len :: k
   contains
     procedure :: SubA1
  end type parent
contains
  Subroutine SubA1(this)
    Class(parent(*)), Intent(In) :: this
  end Subroutine SubA1
end Module AA

$ gfortran -c AA.f90
foo.f90:5:14:

      procedure :: A1 => SubA1
              1
Error: Argument 'this' of 'suba1' with PASS(this) at (1) must be of the
derived-type 'parent'

cheers,

Rich

Reply via email to