[Bug fortran/43214] New: [OOP] TBP with non-scalar PASS

[burnus at gcc dot gnu dot org]

I think there was not yet a PR about this. The following program compiles with
NAG f95 but fails in gfortran with:

call x(:)%foo
      1
Error: Non-scalar base object at (1) currently not implemented


module m
type t
contains
  procedure, pass :: foo => foo
end type t
contains
  elemental subroutine foo(x)
    class(t),intent(in) :: x
  end subroutine foo
end module m

use m
type(t) :: x(3)
call x(:)%foo
end


-- 
           Summary: [OOP] TBP with non-scalar PASS
           Product: gcc
           Version: 4.5.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43214