[Bug fortran/82943] New: Error derived type-bound procedure PASS(this)

[dreich at yahoo dot com]

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

            Bug ID: 82943
           Summary: Error derived type-bound procedure PASS(this)
           Product: gcc
           Version: 8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: dreich at yahoo dot com
  Target Milestone: ---

Created attachment 42582
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=42582&action=edit
Sample program test case showing error

The attached code works without the (n) in the typedef and (n=*) or (*) in the
class line and works in Intel Fortran as submitted here. I tested this with
last night's update in svn gfortran 8 with Cygwin and Eclipse PTP Photran.
I looked through the test suite and found some test cases with NOPASS and
PASS(self) but non with an argument like this.

Error: Argument 'this' of 'foo' with PASS(this) at (1) must be of the
derived-type 'typedef'