[Bug fortran/55849] New: [OOP] Implement temporary support for SELECT TYPE(name => array ( [vector-subscript] ))

burnus at gcc dot gnu.org gcc-bugzilla@gcc.gnu.org
Wed Jan 2 21:54:00 GMT 2013


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

             Bug #: 55849
           Summary: [OOP] Implement temporary support for SELECT TYPE(name
                    => array ( [vector-subscript] ))
    Classification: Unclassified
           Product: gcc
           Version: 4.8.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: burnus@gcc.gnu.org


>From http://gcc.gnu.org/ml/fortran/2013-01/msg00004.html. The following program
fails with:

   Error: CLASS selector at (1) needs a temporary which is not yet implemented

module gn
  type :: ncb
  end type ncb
  type, public :: tn
     class(ncb), allocatable, dimension(:) :: cb
  end type tn
contains
  integer function name(self)
    implicit none
    class (tn), intent(in) :: self
    select type (component => self%cb([4,7+1]))
    end select
  end function name
end module gn



More information about the Gcc-bugs mailing list