https://gcc.gnu.org/bugzilla/show_bug.cgi?id=97210
Bug ID: 97210 Summary: Intrinsic function get_team() does not work Product: gcc Version: 10.2.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: Bader at lrz dot de Target Milestone: --- Created attachment 49273 --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=49273&action=edit Test case The attached test program fails with the following error message: eams_02_pos.f90:8:9: 8 | init = get_team() | 1 Error: Cannot convert INTEGER(4) to TYPE(team_type) at (1) teams_02_pos.f90:16:19: 16 | if (this_image(init) == me) then | 1 Error: Expected coarray variable as ‘coarray’ argument to the this_image intrinsic at (1) Error: comand: `/opt/gcc/10.2/bin/gfortran -I/opt/gcc/10.2/coarrays_mpich/include/OpenCoarrays-2.9.0_GNU-10.2.0 -fcoarray=lib -Wl,-rpath -Wl,/opt/mpich/3.3.2_gcc10/lib -Wl,--enable-new-dtags teams_02_pos.f90 /opt/gcc/10.2/coarrays_mpich/lib/libcaf_mpi.a /opt/mpich/3.3.2_gcc10/lib/libmpifort.so /opt/mpich/3.3.2_gcc10/lib/libmpi.so` failed to compile. So, apart from missing or incorrectly implemented support for get_team also the TEAM argument for this_image() is not accepted.