[Bug fortran/51632] New: [OOP] Bogus argument checking for generated _def_init parameter and _copy procedure with CAF

[burnus at gcc dot gnu.org]

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

             Bug #: 51632
           Summary: [OOP] Bogus argument checking for generated _def_init
                    parameter and _copy procedure with CAF
    Classification: Unclassified
           Product: gcc
           Version: 4.7.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: burnus@gcc.gnu.org


The following program is rejected with:

    class(periodic_2nd_order), intent(in) :: this
                                                 1
Error: Component '_def_init' at (1) with coarray component shall be a
nonpointer, nonallocatable scalar

    class(periodic_2nd_order), intent(in) :: this
                                                 1
Error: Variable 'dst' at (1) is INTENT(OUT) and can thus not be an allocatable
coarray or have coarray components

    class(periodic_2nd_order), intent(in) :: this
                                                 1
Error: Component '_def_init' at (1) with coarray component shall be a
nonpointer, nonallocatable scalar




module periodic_2nd_order_module
  implicit none

  type periodic_2nd_order
    real, allocatable :: global_f(:)[:]
  contains
    procedure :: output
  end type

contains
  subroutine output (this)
    class(periodic_2nd_order), intent(in) :: this
  end subroutine
end module