[Bug fortran/105526] New: [Coarray] Missing checks for arguments of type TEAM_TYPE

[anlauf at gcc dot gnu.org]

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

            Bug ID: 105526
           Summary: [Coarray] Missing checks for arguments of type
                    TEAM_TYPE
           Product: gcc
           Version: 13.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: anlauf at gcc dot gnu.org
  Target Milestone: ---

The following code is erroneously accepted:

subroutine bad
  use iso_fortran_env, only: team_type
  implicit none
  type(team_type) :: team
  change team (0)
  end team
  form team (0, 0)
  sync team (0)
end subroutine bad

It should rather read like:

subroutine good
  use iso_fortran_env, only: team_type
  implicit none
  type(team_type) :: team
  change team (team)
  end team
  form team (0, team)
  sync team (team)
end subroutine good