[prev in list] [next in list] [prev in thread] [next in thread] 

List:       gcc-bugs
Subject:    [Bug fortran/43214]  New: [OOP] TBP with non-scalar PASS
From:       "burnus at gcc dot gnu dot org" <gcc-bugzilla () gcc ! gnu ! org>
Date:       2010-02-28 21:05:27
Message-ID: bug-43214-13404 () http ! gcc ! gnu ! org/bugzilla/
[Download RAW message or body]

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

[prev in list] [next in list] [prev in thread] [next in thread]