[Bug fortran/63727] New: Checks missing for proc-pointer components: Usage as actual argument when elemental

[burnus at gcc dot gnu.org]

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

            Bug ID: 63727
           Summary: Checks missing for proc-pointer components: Usage as
                    actual argument when elemental
           Product: gcc
           Version: 5.0
            Status: UNCONFIRMED
          Keywords: accepts-invalid
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: burnus at gcc dot gnu.org

The PPC lacks some argument check as the code below should have been rejected
with something like: ELEMENTAL non-INTRINSIC procedure 'x%ptr' is not allowed
as an actual argument.


interface
  elemental subroutine foo()
  end subroutine
end interface

type t
  procedure(foo), pointer, nopass :: ptr
end type t

type(t) :: x
call bar(x%ptr)
end